/[smecontribs]/rpms/smeserver-shared-folders/contribs9/smeserver-shared-folders-0.1-purge_recycle.patch
ViewVC logotype

Annotation of /rpms/smeserver-shared-folders/contribs9/smeserver-shared-folders-0.1-purge_recycle.patch

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.2 - (hide annotations) (download)
Mon Nov 11 19:36:29 2013 UTC (10 years, 11 months ago) by unnilennium
Branch: MAIN
CVS Tags: HEAD
Changes since 1.1: +0 -0 lines
FILE REMOVED
cleaning tree from patchs

1 vip-ire 1.1 diff -Nur -x '*.orig' -x '*.rej' smeserver-shared-folders-0.1/root/etc/cron.daily/purge-shares-recycle mezzanine_patched_smeserver-shared-folders-0.1/root/etc/cron.daily/purge-shares-recycle
2     --- smeserver-shared-folders-0.1/root/etc/cron.daily/purge-shares-recycle 1970-01-01 01:00:00.000000000 +0100
3     +++ mezzanine_patched_smeserver-shared-folders-0.1/root/etc/cron.daily/purge-shares-recycle 2010-11-26 14:13:34.000000000 +0100
4     @@ -0,0 +1,54 @@
5     +#/usr/bin/perl -w
6     +
7     +#----------------------------------------------------------------------
8     +# copyright (C) 2010 Firewall Services
9     +# daniel@firewall-services.com
10     +#
11     +# This program is free software; you can redistribute it and/or modify
12     +# it under the terms of the GNU General Public License as published by
13     +# the Free Software Foundation; either version 2 of the License, or
14     +# (at your option) any later version.
15     +#
16     +# This program is distributed in the hope that it will be useful,
17     +# but WITHOUT ANY WARRANTY; without even the implied warranty of
18     +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19     +# GNU General Public License for more details.
20     +#
21     +# You should have received a copy of the GNU General Public License
22     +# along with this program; if not, write to the Free Software
23     +# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
24     +#----------------------------------------------------------------------
25     +
26     +
27     +use esmith::AccountsDB;
28     +use File::Find;
29     +use File::stat;
30     +
31     +my $a = esmith::AccountsDB->open_ro or die "Error opening accounts DB\n";
32     +
33     +foreach my $share ($a->get_all_by_prop(type=>'share')){
34     + my $key = $share->key;
35     + my $recycle = $share->prop('RecycleBin') || 'disabled';
36     + our $retention = $share->prop('RecycleBinRetention') || 'unlimited';
37     + # Skip the share if recycle bin is disabled or if retention is not limited
38     + next if (($recycle eq 'disabled') || ($retention eq 'unlimited'));
39     + # Convert retention in seconds
40     + $retention = 60*60*24*$retention;
41     + my $dir = $share->prop('RecycleBinDir') || 'Recycle Bin';
42     + # Skip if dir contains ./
43     + next if $dir =~ m#(\./)#;
44     + find(\&remove, "/home/e-smith/files/shares/$key/files/$dir/");
45     +}
46     +
47     +sub remove{
48     + # Remove files with last modification older than $retention
49     + if ( -f ){
50     + my $mtime = stat($_)->mtime;
51     + (time() - $mtime > $retention) && unlink($_);
52     + }
53     + # Remove empty directories
54     + elsif ( -d ){
55     + (scalar <"$_/*">) || rmdir($_);
56     + }
57     +}
58     +
59     diff -Nur -x '*.orig' -x '*.rej' smeserver-shared-folders-0.1/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/shares mezzanine_patched_smeserver-shared-folders-0.1/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/shares
60     --- smeserver-shared-folders-0.1/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/shares 2010-11-26 14:16:29.000000000 +0100
61     +++ mezzanine_patched_smeserver-shared-folders-0.1/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/shares 2010-11-26 14:16:26.000000000 +0100
62     @@ -181,6 +181,48 @@
63     </entry>
64    
65     <entry>
66     + <base>LABEL_RETENTION</base>
67     + <trans>
68     + Retention time
69     + </trans>
70     + </entry>
71     +
72     + <entry>
73     + <base>UNLIMITED</base>
74     + <trans>
75     + unlimited
76     + </trans>
77     + </entry>
78     +
79     + <entry>
80     + <base>ONE_WEEK</base>
81     + <trans>
82     + one week
83     + </trans>
84     + </entry>
85     +
86     + <entry>
87     + <base>ONE_MONTH</base>
88     + <trans>
89     + one month
90     + </trans>
91     + </entry>
92     +
93     + <entry>
94     + <base>SIX_MONTHS</base>
95     + <trans>
96     + six months
97     + </trans>
98     + </entry>
99     +
100     + <entry>
101     + <base>ONE_YEAR</base>
102     + <trans>
103     + one year
104     + </trans>
105     + </entry>
106     +
107     + <entry>
108     <base>DESC_HTTP_SETTINGS</base>
109     <trans>
110     The following settings control the access of this shared folder using the HTTP/HTTPS protocol.
111     diff -Nur -x '*.orig' -x '*.rej' smeserver-shared-folders-0.1/root/etc/e-smith/web/functions/shares mezzanine_patched_smeserver-shared-folders-0.1/root/etc/e-smith/web/functions/shares
112     --- smeserver-shared-folders-0.1/root/etc/e-smith/web/functions/shares 2010-11-26 14:16:29.000000000 +0100
113     +++ mezzanine_patched_smeserver-shared-folders-0.1/root/etc/e-smith/web/functions/shares 2010-11-26 14:10:14.000000000 +0100
114     @@ -79,6 +79,13 @@
115     <label>LABEL_RECYCLEBIN</label>
116     </field>
117    
118     + <field type="select"
119     + id="retention"
120     + options="'unlimited' => 'UNLIMITED', '7' => 'ONE_WEEK', '30' => 'ONE_MONTH',
121     + '180' => 'SIX_MONTHS', '365' => 'ONE_YEAR'">
122     + <label>LABEL_RETENTION</label>
123     + </field>
124     +
125     <subroutine src="print_section_bar()" />
126    
127     <field
128     diff -Nur -x '*.orig' -x '*.rej' smeserver-shared-folders-0.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm mezzanine_patched_smeserver-shared-folders-0.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm
129     --- smeserver-shared-folders-0.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm 2010-11-26 14:16:29.000000000 +0100
130     +++ mezzanine_patched_smeserver-shared-folders-0.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm 2010-11-26 14:09:58.000000000 +0100
131     @@ -177,6 +177,7 @@
132     my $q = $self->{cgi};
133     $q->param(-name=>'smbaccess',-value=>'browseable');
134     $q->param(-name=>'recyclebin',-value=>'disabled');
135     + $q->param(-name=>'retention',-value=>'unlimited');
136     $q->param(-name=>'httpaccess',-value=>'none');
137     $q->param(-name=>'webdav',-value=>'disabled');
138     $q->param(-name=>'requireSSL',-value=>'disabled');
139     @@ -211,6 +212,8 @@
140     ($rec->prop('smbAccess') || 'enabled'));
141     $q->param(-name=>'recyclebin',-value=>
142     ($rec->prop('RecycleBin') || 'disabled'));
143     + $q->param(-name=>'retention',-value=>
144     + ($rec->prop('RecycleBinRetention') || 'unlimited'));
145     $q->param(-name=>'httpaccess',-value=>
146     ($rec->prop('httpAccess') || 'none'));
147     $q->param(-name=>'webdav',-value=>
148     @@ -461,6 +464,7 @@
149     WriteGroups => $WriteGroups,
150     ReadGroups => $ReadGroups,
151     RecycleBin => $self->cgi->param('recyclebin'),
152     + RecycleBinRetention => $self->cgi->param('retention'),
153     smbAccess => $self->cgi->param('smbaccess'),
154     httpAccess => $self->cgi->param('httpaccess'),
155     WebDav => $self->cgi->param('webdav'),
156     @@ -509,6 +513,7 @@
157     WriteGroups => $WriteGroups,
158     ReadGroups => $ReadGroups,
159     RecycleBin => $self->cgi->param('recyclebin'),
160     + RecycleBinRetention => $self->cgi->param('retention'),
161     smbAccess => $self->cgi->param('smbaccess'),
162     httpAccess => $self->cgi->param('httpaccess'),
163     WebDav => $self->cgi->param('webdav'),

admin@koozali.org
ViewVC Help
Powered by ViewVC 1.2.1 RSS 2.0 feed