Changeset 1367

Timestamp:

07/08/15 15:06:49 (9 years ago)

Author:

nanardon

Message:

Split authentication function per base fonctionnality

Location:

trunk/LATMOS-Accounts/lib/LATMOS/Accounts

Files:

• Bases.pm (modified) (1 diff)
• Bases/Sql.pm (modified) (1 diff)

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

@@ -969 +969 @@
     };
 
-    if ($self->attribute('user', 'exported')) {
-        if (!$uobj->_get_c_field('exported')) {
-            la_log(LA_ERR, "User $username found but currently unexported");
-            return;
-        }
-    }
-
     if ($uobj->_get_c_field('expired')) {
         la_log(LA_ERR, "Account $username has expired (%s)",

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql.pm

@@ -176 +176 @@
 } 
 
+sub authenticate_user {
+    my ($self, $username, $passwd) = @_;
+    $username or return;
+    my $uobj = $self->get_object('user', $username) or do {
+        la_log(LA_ERR, "Cannot authenticate non existing user $username");
+        return;
+    };
+
+    if ($self->attribute('user', 'exported')) {
+        if (!$uobj->_get_c_field('exported')) {
+            la_log(LA_ERR, "User $username found but currently unexported");
+            return;
+        }
+    }
+
+    $self->SUPER::authenticate_user($username, $passwd);
+}
+
 =head1 SPECIFICS FUNCTIONS