Changeset 2043

Timestamp:

06/13/17 20:43:05 (7 years ago)

Author:

nanardon

Message:

make la-ban-passwd use base->passCrypt()

File:

• trunk/LATMOS-Accounts/bin/la-ban-passwd (modified) (1 diff)

trunk/LATMOS-Accounts/bin/la-ban-passwd

@@ -82 +82 @@
 } else {
     if ($encrypted) {
-        my @salt_char = (('a' .. 'z'), ('A' .. 'Z'), (0 .. 9), '/', '.');
-        my $salt = join('', map { $salt_char[rand(scalar(@salt_char))] } (1 .. 8));
-        $password = crypt($password, '$1$' . $salt);
+        $password = $labase->passCrypt($password);
     }
     $obj->storeBannedPassword($password);