smeserver-shared-folders/contribs7/smeserver-shared-folders-0.1-add_ajaxplorer_support.patch

diff -Nur smeserver-shared-folders-0.1/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/shares smeserver-shared-folders-0.1_mod/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/shares
--- smeserver-shared-folders-0.1/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/shares 2011-06-28 15:44:43.000000000 +0200
+++ smeserver-shared-folders-0.1_mod/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/shares     2011-06-28 15:51:25.000000000 +0200
@@ -489,4 +489,18 @@
         </trans>
     </entry>
 
+    <entry>
+        <base>DESC_AJAXPLORER</base>
+        <trans>
+            The following settings control the access of this shared folder with the web based file manager Ajaxplorer
+        </trans>
+    </entry>
+
+    <entry>
+        <base>LABEL_AJAXPLORER</base>
+        <trans>
+            Ajaxplorer Access
+        </trans>
+    </entry>
+
 </lexicon>
diff -Nur smeserver-shared-folders-0.1/root/etc/e-smith/web/functions/shares smeserver-shared-folders-0.1_mod/root/etc/e-smith/web/functions/shares
--- smeserver-shared-folders-0.1/root/etc/e-smith/web/functions/shares  2011-06-28 15:44:43.000000000 +0200
+++ smeserver-shared-folders-0.1_mod/root/etc/e-smith/web/functions/shares      2011-06-28 15:52:03.000000000 +0200
@@ -117,6 +117,8 @@
                 <label>LABEL_DYNAMIC_CONTENT</label>
        </field>
 
+       <subroutine src="print_ajaxplorer_fields()" />
+
        <subroutine src="print_section_bar()" />
 
        <subroutine src="print_encryption_fields()" />
diff -Nur smeserver-shared-folders-0.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm smeserver-shared-folders-0.1_mod/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm
--- smeserver-shared-folders-0.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm 2011-06-28 15:44:43.000000000 +0200
+++ smeserver-shared-folders-0.1_mod/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm     2011-06-28 17:59:48.000000000 +0200
@@ -25,6 +25,7 @@
     print_share_table
     print_share_name_field
     print_encryption_fields
+    print_ajaxplorer_fields
     genGroupAccess
     smbAccess_list
     httpAccess_list
@@ -293,6 +294,32 @@
     return undef;
 }
 
+# If ajaxplorer is enabled:
+sub print_ajaxplorer_fields {
+    my ($self) = @_;
+    if (($configdb->get('ajaxplorer')->prop('status') || 'disabled') eq 'enabled'){
+        print_section_bar();
+        my ($enabled,$disabled) = ('','');
+        my $share = $self->{cgi}->param('name') || '';
+        if (($share ne '') && ($accountdb->get($share)->prop('Ajaxplorer') || 'disabled') eq 'enabled'){
+            $enabled = ' SELECTED';
+        }
+        else {
+            $disabled = ' SELECTED';
+        }
+        print qq(<tr><td colspan="2">) . $self->localise('DESC_AJAXPLORER') . qq(</td></tr>);
+        print qq(<tr><td class="sme-noborders-label">) .
+            $self->localise('LABEL_AJAXPLORER') . qq(</td>\n);
+        print qq(
+            <td class="sme-noborders-content"><SELECT NAME="ajaxplorer" TYPE="select"> 
+              <OPTION VALUE="disabled"$disabled>) . $self->localise('DISABLED') .
+              qq(<OPTION VALUE="enabled"$enabled>) . $self->localise('ENABLED') .
+            qq(</SELECT></td> 
+        );
+    }
+    return undef;
+}
+
 # Takes a comma delimited list of groups and returns a string of 
 # html checkboxes for all system groups with the groups having write and read access.
 
@@ -537,6 +564,7 @@
         smbAccess           => $self->cgi->param('smbaccess'),
         httpAccess          => $self->cgi->param('httpaccess'),
         WebDav              => $self->cgi->param('webdav'),
+        Ajaxplorer          => ($self->cgi->param('ajaxplorer') || 'disabled'),
         RequireSSL          => $self->cgi->param('requireSSL'),
         Indexes             => $self->cgi->param('indexes'),
         DynamicContent      => $self->cgi->param('dynamic'),
@@ -608,6 +636,7 @@
                smbAccess    => $self->cgi->param('smbaccess'),
                httpAccess   => $self->cgi->param('httpaccess'),
                WebDav       => $self->cgi->param('webdav'),
+               Ajaxplorer   => ($self->cgi->param('ajaxplorer') || 'disabled'),
                RequireSSL   => $self->cgi->param('requireSSL'),
                Indexes      => $self->cgi->param('indexes'),
                DynamicContent => $self->cgi->param('dynamic'),
1	vip-ire	1.1	diff -Nur smeserver-shared-folders-0.1/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/shares smeserver-shared-folders-0.1_mod/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/shares
2	vip-ire	1.3	--- smeserver-shared-folders-0.1/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/shares 2011-06-28 15:44:43.000000000 +0200
3			+++ smeserver-shared-folders-0.1_mod/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/shares 2011-06-28 15:51:25.000000000 +0200
4			@@ -489,4 +489,18 @@
5			</trans>
6	vip-ire	1.1	</entry>
7
8			+ <entry>
9	vip-ire	1.3	+ <base>DESC_AJAXPLORER</base>
10			+ <trans>
11			+ The following settings control the access of this shared folder with the web based file manager Ajaxplorer
12			+ </trans>
13	vip-ire	1.1	+ </entry>
14			+
15			+ <entry>
16	vip-ire	1.3	+ <base>LABEL_AJAXPLORER</base>
17			+ <trans>
18			+ Ajaxplorer Access
19			+ </trans>
20	vip-ire	1.1	+ </entry>
21			+
22	vip-ire	1.3	</lexicon>
23			diff -Nur smeserver-shared-folders-0.1/root/etc/e-smith/web/functions/shares smeserver-shared-folders-0.1_mod/root/etc/e-smith/web/functions/shares
24			--- smeserver-shared-folders-0.1/root/etc/e-smith/web/functions/shares 2011-06-28 15:44:43.000000000 +0200
25			+++ smeserver-shared-folders-0.1_mod/root/etc/e-smith/web/functions/shares 2011-06-28 15:52:03.000000000 +0200
26			@@ -117,6 +117,8 @@
27			<label>LABEL_DYNAMIC_CONTENT</label>
28			</field>
29
30			+ <subroutine src="print_ajaxplorer_fields()" />
31			+
32			<subroutine src="print_section_bar()" />
33
34			<subroutine src="print_encryption_fields()" />
35	vip-ire	1.1	diff -Nur smeserver-shared-folders-0.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm smeserver-shared-folders-0.1_mod/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm
36	vip-ire	1.3	--- smeserver-shared-folders-0.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm 2011-06-28 15:44:43.000000000 +0200
37	vip-ire	1.4	+++ smeserver-shared-folders-0.1_mod/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm 2011-06-28 17:59:48.000000000 +0200
38	vip-ire	1.3	@@ -25,6 +25,7 @@
39			print_share_table
40			print_share_name_field
41			print_encryption_fields
42			+ print_ajaxplorer_fields
43			genGroupAccess
44			smbAccess_list
45			httpAccess_list
46			@@ -293,6 +294,32 @@
47			return undef;
48			}
49	vip-ire	1.1
50	vip-ire	1.3	+# If ajaxplorer is enabled:
51			+sub print_ajaxplorer_fields {
52			+ my ($self) = @_;
53	vip-ire	1.1	+ if (($configdb->get('ajaxplorer')->prop('status') \|\| 'disabled') eq 'enabled'){
54	vip-ire	1.3	+ print_section_bar();
55			+ my ($enabled,$disabled) = ('','');
56	vip-ire	1.4	+ my $share = $self->{cgi}->param('name') \|\| '';
57			+ if (($share ne '') && ($accountdb->get($share)->prop('Ajaxplorer') \|\| 'disabled') eq 'enabled'){
58	vip-ire	1.3	+ $enabled = ' SELECTED';
59			+ }
60			+ else {
61			+ $disabled = ' SELECTED';
62			+ }
63			+ print qq(<tr><td colspan="2">) . $self->localise('DESC_AJAXPLORER') . qq(</td></tr>);
64			+ print qq(<tr><td class="sme-noborders-label">) .
65			+ $self->localise('LABEL_AJAXPLORER') . qq(</td>\n);
66			+ print qq(
67			+ <td class="sme-noborders-content"><SELECT NAME="ajaxplorer" TYPE="select">
68			+ <OPTION VALUE="disabled"$disabled>) . $self->localise('DISABLED') .
69			+ qq(<OPTION VALUE="enabled"$enabled>) . $self->localise('ENABLED') .
70			+ qq(</SELECT></td>
71			+ );
72	vip-ire	1.1	+ }
73	vip-ire	1.3	+ return undef;
74			+}
75			+
76			# Takes a comma delimited list of groups and returns a string of
77			# html checkboxes for all system groups with the groups having write and read access.
78	vip-ire	1.1
79	vip-ire	1.3	@@ -537,6 +564,7 @@
80			smbAccess => $self->cgi->param('smbaccess'),
81			httpAccess => $self->cgi->param('httpaccess'),
82			WebDav => $self->cgi->param('webdav'),
83			+ Ajaxplorer => ($self->cgi->param('ajaxplorer') \|\| 'disabled'),
84			RequireSSL => $self->cgi->param('requireSSL'),
85			Indexes => $self->cgi->param('indexes'),
86			DynamicContent => $self->cgi->param('dynamic'),
87			@@ -608,6 +636,7 @@
88			smbAccess => $self->cgi->param('smbaccess'),
89			httpAccess => $self->cgi->param('httpaccess'),
90			WebDav => $self->cgi->param('webdav'),
91			+ Ajaxplorer => ($self->cgi->param('ajaxplorer') \|\| 'disabled'),
92			RequireSSL => $self->cgi->param('requireSSL'),
93			Indexes => $self->cgi->param('indexes'),
94			DynamicContent => $self->cgi->param('dynamic'),