Modify authenticate() to be sure that SSL authentication has been done
See: http://mail.ow2.org/wws/arc/lemonldap-ng-dev/2013-10/msg00018.html
This commit is contained in:
parent
a20fd97a14
commit
954a9fe5d5
|
@ -9,7 +9,7 @@ use strict;
|
|||
use Lemonldap::NG::Portal::Simple;
|
||||
use Lemonldap::NG::Portal::AuthNull;
|
||||
|
||||
our $VERSION = '1.2.3';
|
||||
our $VERSION = '1.3.0';
|
||||
our @ISA = qw(Lemonldap::NG::Portal::AuthNull);
|
||||
|
||||
## @apmethod int authInit()
|
||||
|
@ -56,10 +56,12 @@ sub setAuthSessionInfo {
|
|||
}
|
||||
|
||||
## @apmethod int authenticate()
|
||||
# Does nothing, job is done in extractFormInfo()
|
||||
# Just test that SSL authentication has been done: job is done in
|
||||
# extractFormInfo()
|
||||
# @return Lemonldap::NG::Portal constant
|
||||
sub authenticate {
|
||||
PE_OK;
|
||||
my $self = shift;
|
||||
return $ENV{ $self->{SSLVar} } ? PE_OK : PE_ERROR;
|
||||
}
|
||||
|
||||
## @method string getDisplayType
|
||||
|
|
Loading…
Reference in New Issue
Block a user