smeserver-shared-folders/contribs8/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	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	--- 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	</entry>
7
8	+ <entry>
9	+ <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	+ </entry>
14	+
15	+ <entry>
16	+ <base>LABEL_AJAXPLORER</base>
17	+ <trans>
18	+ Ajaxplorer Access
19	+ </trans>
20	+ </entry>
21	+
22	</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	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	--- 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	+++ 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	@@ -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
50	+# If ajaxplorer is enabled:
51	+sub print_ajaxplorer_fields {
52	+ my ($self) = @_;
53	+ if (($configdb->get('ajaxplorer')->prop('status') \|\| 'disabled') eq 'enabled'){
54	+ print_section_bar();
55	+ my ($enabled,$disabled) = ('','');
56	+ my $share = $self->{cgi}->param('name') \|\| '';
57	+ if (($share ne '') && ($accountdb->get($share)->prop('Ajaxplorer') \|\| 'disabled') eq 'enabled'){
58	+ $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	+ }
73	+ 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
79	@@ -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'),