diff options
Diffstat (limited to 'installer/OpenSLX/OSSetup/Distro/SUSE.pm')
| -rw-r--r-- | installer/OpenSLX/OSSetup/Distro/SUSE.pm | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/installer/OpenSLX/OSSetup/Distro/SUSE.pm b/installer/OpenSLX/OSSetup/Distro/SUSE.pm index 2ea20fc3..c6d81747 100644 --- a/installer/OpenSLX/OSSetup/Distro/SUSE.pm +++ b/installer/OpenSLX/OSSetup/Distro/SUSE.pm @@ -70,5 +70,16 @@ sub updateDistroConfig return; } +sub hashPassword +{ + my $self = shift; + my $password = shift; + + my $busyboxBin = $self->{engine}->{'busybox-binary'}; + my $hashedPassword = qx{$busyboxBin cryptpw -a blowfish '$password'}; + chomp $hashedPassword; + + return $hashedPassword; +} 1; |