dani/lemonldap-ng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Split tests: certificate can exist without having wanted attribute

Browse Source
This commit is contained in:
Xavier Guimard 2013-10-13 12:13:48 +00:00
parent cf0bb9d98d
commit 01ae2b697d
1 changed files with 13 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/AuthSSL.pm
View File

@ -12,8 +12,6 @@ use Lemonldap::NG::Portal::AuthNull;
our $VERSION = '1.2.3';
our @ISA = qw(Lemonldap::NG::Portal::AuthNull);
*authenticate = *extractFormInfo;
## @apmethod int authInit()
# Check if SSL environment variables are set.
# @return Lemonldap::NG::Portal constant
@ -33,8 +31,13 @@ sub extractFormInfo {
$self->{user} = $user;
return PE_OK;
}
elsif ( $ENV{SSL_CLIENT_S_DN} ) {
$self->_sub( 'userError',
"$self->{SSLVar} was not found in user certificate" );
return PE_BADCERTIFICATE;
}
else {
$self->_sub( 'userError', "No certificate found for " . $self->ipAddr );
$self->_sub( 'userError', 'No certificate found' );
return PE_CERTIFICATEREQUIRED;
}
}
@ -52,6 +55,13 @@ sub setAuthSessionInfo {
PE_OK;
}
## @apmethod int authenticate()
# Does nothing, job is done in extractFormInfo()
# @return Lemonldap::NG::Portal constant
sub authenticate {
PE_OK;
}
## @method string getDisplayType
# @return display type
sub getDisplayType {