oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

added a new logger

Browse source
This commit is contained in:
JT Smith 2005-04-01 03:24:23 +00:00
parent 69cd257beb
commit 6aa9f76a71
23 changed files with 197 additions and 242 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lib/WebGUI/Auth/LDAP.pm
View file

@ -69,7 +69,7 @@ sub _isValidLDAPUser {
WebGUI::ErrorHandler::warn("Invalid LDAP information for registration of LDAP ID: ".$session{form}{'authLDAP.ldapId'});
} elsif ($auth->code > 0) {
$error .= '<li>LDAP error "'.$ldapStatusCode{$auth->code}.'" occured. '.WebGUI::International::get(69);
WebGUI::ErrorHandler::warn("LDAP error: ".$ldapStatusCode{$auth->code});
WebGUI::ErrorHandler::error("LDAP error: ".$ldapStatusCode{$auth->code});
}
$ldap->unbind;
} else {
@ -78,11 +78,11 @@ sub _isValidLDAPUser {
}
} else {
$error = WebGUI::International::get(2,'AuthLDAP');
WebGUI::ErrorHandler::warn("Couldn't bind to LDAP server: ".$session{setting}{ldapURL});
WebGUI::ErrorHandler::error("Couldn't bind to LDAP server: ".$session{setting}{ldapURL});
}
} else {
$error = WebGUI::International::get(2,'AuthLDAP');
WebGUI::ErrorHandler::warn("Couldn't create LDAP object: ".$uri->host);
WebGUI::ErrorHandler::error("Couldn't create LDAP object: ".$uri->host);
}
$self->error($error);
return $error eq "";
@ -153,12 +153,12 @@ sub authenticate {
$error .= WebGUI::International::get(68);
}elsif($auth->code > 0){
$error .= 'LDAP error "'.$ldapStatusCode{$auth->code}.'" occured.'.WebGUI::International::get(69);
WebGUI::ErrorHandler::warn("LDAP error: ".$ldapStatusCode{$auth->code});
WebGUI::ErrorHandler::error("LDAP error: ".$ldapStatusCode{$auth->code});
}
$ldap->unbind;
}else{
$error .= WebGUI::International::get(13,'AuthLDAP');
WebGUI::ErrorHandler::warn("Could not process this LDAP URL: ".$userData->{ldapUrl});
WebGUI::ErrorHandler::error("Could not process this LDAP URL: ".$userData->{ldapUrl});
}
if($error ne ""){
$self->error($error);