Changeset 2259

Timestamp:

06/05/19 20:20:18 (5 years ago)

Author:

nanardon

Message:

Add log page to users objects

Location:

trunk

Files:

• LATMOS-Accounts-Web/MANIFEST (modified) (4 diffs)
• LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Users.pm (modified) (1 diff)
• LATMOS-Accounts-Web/root/html/includes/object_log.tt (added)
• LATMOS-Accounts-Web/root/html/users/log.tt (added)
• LATMOS-Accounts-Web/root/html/users/object_header.tt (modified) (1 diff)
• LATMOS-Accounts/lib/LATMOS/Accounts/Acls.pm (modified) (1 diff)

trunk/LATMOS-Accounts-Web/MANIFEST

@@ -13 +13 @@
 lib/Catalyst/Helper/View/CSV.pm
 lib/Catalyst/View/CSV.pm
+lib/I18N/AcceptLanguage.pm
 lib/LATMOS/Accounts/Web.pm
 lib/LATMOS/Accounts/Web/Controller/About.pm
@@ -110 +111 @@
 root/html/includes/list_objects.tt
 root/html/includes/object_header.tt
+root/html/includes/object_log.tt
 root/html/includes/select_objects_list.tt
 root/html/includes/sidebar.tt
@@ -162 +164 @@
 root/html/users/groups.tt
 root/html/users/index.tt
+root/html/users/log.tt
 root/html/users/mail.tt
 root/html/users/my.tt
@@ -382 +385 @@
 t/view_TT.t
 t/view_TTpart.t
-lib/I18N/AcceptLanguage.pm

trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Users.pm

@@ -240 +240 @@
 }
 
+sub log :PathPart('log') Chained('users') Args(0) {
+    my ($self, $c) = @_;
+}
+
 =head1 AUTHOR
 

trunk/LATMOS-Accounts-Web/root/html/users/object_header.tt

@@ -54 +54 @@
         <a href="[% c.uri_for('/users', username, 'passwd') %]"><span [% 'id="oactive"' IF subform == 'passwd' %]>Mot de passe</span></a>
 [% END %]
+[% IF c.model('Accounts').db.check_acl(user, 'log', 'r') %]
+        <a href="[% c.uri_for('/users', username, 'log') %]"><span [% 'id="oactive"' IF subform == 'log' %]>[% l('Log') %]</span></a>
+[% END %]
 </div>
 

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

@@ -32 +32 @@
         $acls->read_acl_file($file) or return;
     }
+
+    # Default ACLS:
+    $acls->add( '*.log', [ '$uid: read', '*: deny' ] );
+    $acls->add(
+        'user.{userPasswd,userPassword,encryptedPassword}',
+        [ '$uid: write', '*: deny' ],
+    );
     $acls
 }