summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ldap_wizard/Ldap.pm19
1 files changed, 16 insertions, 3 deletions
diff --git a/ldap_wizard/Ldap.pm b/ldap_wizard/Ldap.pm
index c60de6ac..c1f2fb3f 100644
--- a/ldap_wizard/Ldap.pm
+++ b/ldap_wizard/Ldap.pm
@@ -1,5 +1,5 @@
#!/usr/bin/perl
-# version 1.33
+# version 1.34
# GPL like
# vguardiola@mandrakesoft.com
@@ -27,7 +27,7 @@ use Net::LDAP::Util qw(ldap_error_text);
my $o = {
name => N("Ldap wizard"),
var => {
- defou => 'ou=Users',
+ defou => 'ou=People',
srv => 'localhost',
suffix => '',
rootdn => '',
@@ -50,7 +50,7 @@ my $o = {
nom => '',
prenom => '',
},
- needed_rpm => [ 'openldap-servers','openldap-clients' ],
+ needed_rpm => [ 'openldap-servers','openldap-clients','nss_ldap' ],
defaultimage => "$ENV{__WIZ_HOME__}ldap_wizard/images/ldap.png",
};
@@ -326,12 +326,25 @@ sub do_it_setldap {
append_to_file($LDAPCONF, "rootpw $o->{var}{rootpass}");
}
+ # Modify /etc/ldap.conf
+ #
+require authentication;
+authentication::update_ldap_conf(
+ host => $o->{var}{srv},
+ base => $wiz_domain_name,
+ nss_base_shadow => "ou=People,$o->{var}{suffix}",
+ nss_base_passwd => "ou=People,$o->{var}{suffix}",
+ nss_base_group => "ou=Group,$o->{var}{suffix}",
+ );
# reset premisions
system("chown -R root.ldap /etc/openldap");
services::restart('ldap');
sleep(4);
init_ldap();
+
+
+
}