summaryrefslogtreecommitdiffstats
path: root/perl-install/authentication.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2008-12-05 13:03:30 +0000
committerPascal Rigaux <pixel@mandriva.com>2008-12-05 13:03:30 +0000
commit74d65415dca9721fe3be0c3d5b070bf9b7fcc4fa (patch)
tree9a4f7ce51188f645386f03818150332edef11da1 /perl-install/authentication.pm
parente2dbf3c0624b141cd29f3153eeae6be2146d3600 (diff)
downloaddrakx-74d65415dca9721fe3be0c3d5b070bf9b7fcc4fa.tar
drakx-74d65415dca9721fe3be0c3d5b070bf9b7fcc4fa.tar.gz
drakx-74d65415dca9721fe3be0c3d5b070bf9b7fcc4fa.tar.bz2
drakx-74d65415dca9721fe3be0c3d5b070bf9b7fcc4fa.tar.xz
drakx-74d65415dca9721fe3be0c3d5b070bf9b7fcc4fa.zip
- finish-install
o use /dev/urandom instead of /dev/random to generate salt for passwords (since reading on /dev/random can block boot process) (bug found/fixed by blino)
Diffstat (limited to 'perl-install/authentication.pm')
-rw-r--r--perl-install/authentication.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/authentication.pm b/perl-install/authentication.pm
index 716128e49..06b718ea2 100644
--- a/perl-install/authentication.pm
+++ b/perl-install/authentication.pm
@@ -815,7 +815,7 @@ sub enable_shadow() {
sub salt {
my ($nb) = @_;
require devices;
- open(my $F, devices::make("random")) or die "missing random";
+ open(my $F, devices::make("urandom")) or die "missing urandom";
my $s; read $F, $s, $nb;
$s = pack("b8" x $nb, unpack "b6" x $nb, $s);
$s =~ tr|\0-\x3f|0-9a-zA-Z./|;