Revision d3d6cb31
Von Moritz Bunkus vor mehr als 13 Jahren hinzugefügt
| SL/Auth/Password.pm | ||
|---|---|---|
| 40 | 40 |
|
| 41 | 41 |
my ($algorithm, $password) = $class->parse($params{password}, 'NONE');
|
| 42 | 42 |
|
| 43 |
return $algorithm eq 'NONE' ? $class->hash(%params) : $params{password};
|
|
| 43 |
return $params{password} unless $algorithm eq 'NONE';
|
|
| 44 |
|
|
| 45 |
if ($params{look_up_algorithm}) {
|
|
| 46 |
my $stored_password = $params{auth}->get_stored_password($params{login});
|
|
| 47 |
my ($stored_algorithm) = $class->parse($stored_password); |
|
| 48 |
$params{algorithm} = $stored_algorithm;
|
|
| 49 |
} |
|
| 50 |
|
|
| 51 |
return $class->hash(%params); |
|
| 44 | 52 |
} |
| 45 | 53 |
|
| 46 | 54 |
sub parse {
|
Auch abrufbar als: Unified diff
Fall 'kein Hash-Algorithmus angegeben' bei alten Passwörtern richtig behandeln