From 2f11a6ba88fcf68718e8de30691617dcd7ce25f9 Mon Sep 17 00:00:00 2001 From: Vicent Guardiola Date: Thu, 17 Mar 2005 16:27:10 +0000 Subject: Apply chmo 700 to /etc/sysconfig/ldapwiz, password is clear text --- ldap_wizard/Ldap.pm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/ldap_wizard/Ldap.pm b/ldap_wizard/Ldap.pm index 0a0eb762..50f039ee 100644 --- a/ldap_wizard/Ldap.pm +++ b/ldap_wizard/Ldap.pm @@ -53,7 +53,7 @@ my $o = { nom => '', prenom => '', }, - needed_rpm => [ 'openldap-servers', 'openldap-clients', 'nss_ldap' ], + needed_rpm => [ 'openldap-servers' 'openldap-clients' 'nss_ldap' ], defaultimage => "$ENV{__WIZ_HOME__}ldap_wizard/images/ldap.png", init => sub { test_host_domain($wiz_host_name, $wiz_domain_name); @@ -188,6 +188,8 @@ $o->{pages} = { ], pre => sub { $o->{var}{rootdn} = "cn=" . N("Administrator,%s", $o->{var}{suffix}); + my $_cryptpass = crypt($o->{var}{rootpass}, "crypt"); + $o->{var}{rootpass} = $_cryptpass; }, complete => sub { if (!$o->{var}{suffix} || $o->{var}{suffix} !~ /dc/) { @@ -393,7 +395,7 @@ rootpass=$o->{var}{rootpass} users=$o->{var}{defou} EOF - +system("chmod 700 /etc/sysconfig/ldapwiz"); } -- cgit v1.2.1