Changeset 321 for LATMOS-Accounts/lib/LATMOS/Accounts/Acls.pm

Timestamp:

08/10/09 01:04:07 (15 years ago)

Author:

nanardon

Message:

• allow to match authenticated and anonymous users in acls

File:

• LATMOS-Accounts/lib/LATMOS/Accounts/Acls.pm (modified) (2 diffs)

LATMOS-Accounts/lib/LATMOS/Accounts/Acls.pm

@@ -43 +43 @@
 =item an attribute of the accessed object which should contains the username,
 prefixed by '$'
+
+=item C<*> to math any user
+
+=item @authenticated or @anonymous for any authenticated user and non
+authenticated user ('*' include both)
 
 =back
@@ -193 +198 @@
         } elsif ($u->{user} eq '*' || $u->{user} eq $who) {
             return $u->{$perm} || 0;
+        } elsif (lc($u->{user}) eq '@authenticated' && $who) {
+            return $u->{$perm} || 0;
+        } elsif (lc($u->{user}) eq '@anonymous' && $who eq "") {
+            return $u->{$perm} || 0;
         } else {
             return