the encrypted pw in the passwd table can work on SLES now

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@4707 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
mxi1 2009-12-02 08:51:34 +00:00
parent a1833514d3
commit a7e307b952

View File

@ -1254,7 +1254,7 @@ sub becomeuser {
return undef;
}
$passent=$passent->{password};
if ($passent =~ /^\$1\$.*\$/) { #MD5 hash, calculate before comparison
if ($passent =~ /^\$(2a|1)\$.*\$/) { #MD5 or Blowfish hash, calculate before comparison
$pass = crypt($pass,$passent);
} #Not bothering with old DES method, for now assume plaintext if not set
if ($pass eq $passent) {