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

diff -Nur smeserver-shared-folders-0.1/root/etc/e-smith/events/actions/share-modify smeserver-shared-folders-0.1_mod/root/etc/e-smith/events/actions/share-modify
--- smeserver-shared-folders-0.1/root/etc/e-smith/events/actions/share-modify   2012-06-19 22:08:23.788834057 +0200
+++ smeserver-shared-folders-0.1_mod/root/etc/e-smith/events/actions/share-modify       2012-06-19 22:20:48.169250014 +0200
@@ -95,6 +95,7 @@
 my @writeusers = split(/[;,]/,($properties {'WriteUsers'} || ''));
 my @readusers = split(/[;,]/,($properties {'ReadUsers'} || ''));
 my $rsync = $properties{'rsyncAccess'} || 'none';
+my $ajaxplorer = $properties{'Ajaxplorer'} || 'disabled';
 
 # Don't reset permissions if ManualPermissions is set to 'yes'
 
@@ -127,6 +128,7 @@
         $acl .= 'u:'.$user.':rX,';
     }
     $acl .= 'u:rsync:rX,' if ($rsync =~ /^local|global$/);
+    $acl .= 'u:www:rwX,' unless (($http eq 'none') && ($ajaxplorer ne 'enabled'));
 
     # Set the effective ACLs
     system($setfacl,
@@ -161,6 +163,7 @@
         $acl .= 'u:'.$user.':rX,';
     }
     $acl .= 'u:rsync:rX,' if ($rsync =~ /^local|global$/);
+    $acl .= 'u:www:rX,' unless (($http eq 'none') && ($ajaxplorer ne 'enabled'));
 
     system($setfacl,
            '-m',
1	diff -Nur smeserver-shared-folders-0.1/root/etc/e-smith/events/actions/share-modify smeserver-shared-folders-0.1_mod/root/etc/e-smith/events/actions/share-modify
2	--- smeserver-shared-folders-0.1/root/etc/e-smith/events/actions/share-modify 2012-06-19 22:08:23.788834057 +0200
3	+++ smeserver-shared-folders-0.1_mod/root/etc/e-smith/events/actions/share-modify 2012-06-19 22:20:48.169250014 +0200
4	@@ -95,6 +95,7 @@
5	my @writeusers = split(/[;,]/,($properties {'WriteUsers'} \|\| ''));
6	my @readusers = split(/[;,]/,($properties {'ReadUsers'} \|\| ''));
7	my $rsync = $properties{'rsyncAccess'} \|\| 'none';
8	+my $ajaxplorer = $properties{'Ajaxplorer'} \|\| 'disabled';
9
10	# Don't reset permissions if ManualPermissions is set to 'yes'
11
12	@@ -127,6 +128,7 @@
13	$acl .= 'u:'.$user.':rX,';
14	}
15	$acl .= 'u:rsync:rX,' if ($rsync =~ /^local\|global$/);
16	+ $acl .= 'u:www:rwX,' unless (($http eq 'none') && ($ajaxplorer ne 'enabled'));
17
18	# Set the effective ACLs
19	system($setfacl,
20	@@ -161,6 +163,7 @@
21	$acl .= 'u:'.$user.':rX,';
22	}
23	$acl .= 'u:rsync:rX,' if ($rsync =~ /^local\|global$/);
24	+ $acl .= 'u:www:rX,' unless (($http eq 'none') && ($ajaxplorer ne 'enabled'));
25
26	system($setfacl,
27	'-m',