From 8403d92b82f9f775695a3f105a2b5b38b8d1bb20 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Thu, 10 Jul 2008 00:08:39 +0000 Subject: authentication: add back fix to force the password to be utf8 (#23273), wrongly reverted on r242842) --- perl-install/NEWS | 3 +++ perl-install/authentication.pm | 3 +++ perl-install/install/NEWS | 3 +++ 3 files changed, 9 insertions(+) diff --git a/perl-install/NEWS b/perl-install/NEWS index 8c2eef189..28d70c406 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,3 +1,6 @@ +- authentication: + o add back fix to force the password to be utf8 (#23273) + Version 10.45 - 09 July 2008 - update autologin file path for kdm4 diff --git a/perl-install/authentication.pm b/perl-install/authentication.pm index 664eb49ae..638cb7f92 100644 --- a/perl-install/authentication.pm +++ b/perl-install/authentication.pm @@ -815,6 +815,9 @@ sub salt { sub user_crypted_passwd { my ($u, $isMD5) = @_; if ($u->{password}) { + require utf8; + utf8::encode($u->{password}); #- we don't want perl to do "smart" things in crypt() + crypt($u->{password}, $isMD5 ? '$1$' . salt(8) : salt(2)); } else { $u->{pw} || ''; diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index b398f0e2f..cb83be3e9 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,3 +1,6 @@ +- authentication: + o add back fix to force the password to be utf8 (#23273) + Version 10.45 - 9 July 2008 - update autologin file path for kdm4 -- cgit v1.2.1