Archived
1
0
Fork 0

Really do an update for user

This commit is contained in:
Mercier Pierre-Olivier 2013-09-15 23:47:21 +02:00
parent 885b0f8efb
commit 29c5a66d25

View file

@ -122,24 +122,87 @@ sub user_update($$)
my $dn = shift;
my $args = shift;
LDAP::update_attribute($ldap, $dn, "cn", $args->{param}{cn}) if ($args->{param}{cn});
LDAP::update_attribute($ldap, $dn, "cn", $args->{param}{firstname}." ".$args->{param}{lastname}) if ($args->{param}{firstname} && $args->{param}{lastname});
LDAP::update_attribute($ldap, $dn, "l", $args->{param}{l}) if ($args->{param}{l});
LDAP::update_attribute($ldap, $dn, "mail", $args->{param}{mail}) if ($args->{param}{mail});
LDAP::update_attribute($ldap, $dn, "postalAddress", $args->{param}{postalAddress}) if ($args->{param}{postalAddress});
LDAP::update_attribute($ldap, $dn, "postalAddress", $args->{param}{postaladdress}) if ($args->{param}{postaladdress});
LDAP::update_attribute($ldap, $dn, "postalCode", $args->{param}{postalCode}) if ($args->{param}{postalCode});
LDAP::update_attribute($ldap, $dn, "postalCode", $args->{param}{postalcode}) if ($args->{param}{postalcode});
LDAP::update_attribute($ldap, $dn, "sn", $args->{param}{sn}) if ($args->{param}{sn});
LDAP::update_attribute($ldap, $dn, "telephoneNumber", $args->{param}{telephoneNumber}) if ($args->{param}{telephoneNumber});
LDAP::update_attribute($ldap, $dn, "telephoneNumber", $args->{param}{telephonenumber}) if ($args->{param}{telephonenumber});
LDAP::update_attribute($ldap, $dn, "strongAuthKey", $args->{param}{strongAuthKey}) if ($args->{param}{strongAuthKey});
LDAP::update_attribute($ldap, $dn, "strongAuthKey", $args->{param}{strongauthkey}) if ($args->{param}{strongauthkey});
LDAP::update_attribute($ldap, $dn, "c", $args->{param}{c}) if ($args->{param}{c});
LDAP::update_attribute($ldap, $dn, "title", $args->{param}{title}) if ($args->{param}{title});
LDAP::update_attribute($ldap, $dn, "intraTheme", $args->{param}{intraTheme}) if ($args->{param}{intraTheme});
LDAP::update_attribute($ldap, $dn, "intraTheme", $args->{param}{intratheme}) if ($args->{param}{intratheme});
LDAP::update_attribute($ldap, $dn, "birthdate", $args->{param}{birthdate}) if ($args->{param}{birthdate});
if ($args->{param}{cn}) {
LDAP::update_attribute($ldap, $dn, "cn", $args->{param}{cn});
} elsif ($args->{param}{firstname} && $args->{param}{lastname}) {
LDAP::update_attribute($ldap, $dn, "cn", $args->{param}{firstname}." ".$args->{param}{lastname});
}
if ($args->{param}{l}) {
LDAP::update_attribute($ldap, $dn, "l", $args->{param}{l});
} else {
LDAP::delete_attribute($ldap, $dn, "l");
}
if ($args->{param}{mail}) {
LDAP::update_attribute($ldap, $dn, "mail", $args->{param}{mail});
} else {
LDAP::delete_attribute($ldap, $dn, "mail");
}
if ($args->{param}{postalAddress}) {
LDAP::update_attribute($ldap, $dn, "postalAddress", $args->{param}{postalAddress});
} elsif ($args->{param}{postaladdress}) {
LDAP::update_attribute($ldap, $dn, "postalAddress", $args->{param}{postaladdress});
} else {
LDAP::delete_attribute($ldap, $dn, "postalAddress");
}
if ($args->{param}{postalCode}) {
LDAP::update_attribute($ldap, $dn, "postalCode", $args->{param}{postalCode});
} elsif ($args->{param}{postalcode}) {
LDAP::update_attribute($ldap, $dn, "postalCode", $args->{param}{postalcode});
} else {
LDAP::delete_attribute($ldap, $dn, "postalCode");
}
if ($args->{param}{sn}) {
LDAP::update_attribute($ldap, $dn, "sn", $args->{param}{sn});
} else {
LDAP::delete_attribute($ldap, $dn, "sn");
}
if ($args->{param}{telephoneNumber}) {
LDAP::update_attribute($ldap, $dn, "telephoneNumber", $args->{param}{telephoneNumber});
} elsif ($args->{param}{telephonenumber}) {
LDAP::update_attribute($ldap, $dn, "telephoneNumber", $args->{param}{telephonenumber});
} else {
LDAP::delete_attribute($ldap, $dn, "telephoneNumber");
}
if ($args->{param}{strongAuthKey}) {
LDAP::update_attribute($ldap, $dn, "strongAuthKey", $args->{param}{strongAuthKey});
} elsif ($args->{param}{strongauthkey}) {
LDAP::update_attribute($ldap, $dn, "strongAuthKey", $args->{param}{strongauthkey});
} else {
LDAP::delete_attribute($ldap, $dn, "strongAuthKey");
}
if ($args->{param}{c}) {
LDAP::update_attribute($ldap, $dn, "c", $args->{param}{c});
} else {
LDAP::delete_attribute($ldap, $dn, "c");
}
if ($args->{param}{title}) {
LDAP::update_attribute($ldap, $dn, "title", $args->{param}{title});
} else {
LDAP::delete_attribute($ldap, $dn, "title");
}
if ($args->{param}{intraTheme}) {
LDAP::update_attribute($ldap, $dn, "intraTheme", $args->{param}{intraTheme});
} elsif ($args->{param}{intratheme}) {
LDAP::update_attribute($ldap, $dn, "intraTheme", $args->{param}{intratheme});
} else {
LDAP::delete_attribute($ldap, $dn, "intraTheme");
}
if ($args->{param}{birthdate}) {
LDAP::update_attribute($ldap, $dn, "birthdate", $args->{param}{birthdate});
} else {
LDAP::delete_attribute($ldap, $dn, "birthdate");
}
}
sub alert_mail($$$$@)