FIX logins history display (#1501)
This commit is contained in:
parent
e65c086af6
commit
e7d7ef1e0a
|
@ -284,7 +284,7 @@ sub getUser {
|
||||||
sub authenticate {
|
sub authenticate {
|
||||||
my ( $self, $req ) = @_;
|
my ( $self, $req ) = @_;
|
||||||
my $ret = $req->authResult( $self->_authentication->authenticate($req) );
|
my $ret = $req->authResult( $self->_authentication->authenticate($req) );
|
||||||
$self->logger->debug(" -> authResult = $ret");
|
$self->logger->debug(" -> authResult = " . $req->authResult);
|
||||||
if ( $ret == PE_OK ) {
|
if ( $ret == PE_OK ) {
|
||||||
$req->{sessionInfo}->{_lastAuthnUTime} = time();
|
$req->{sessionInfo}->{_lastAuthnUTime} = time();
|
||||||
return $ret;
|
return $ret;
|
||||||
|
@ -297,6 +297,7 @@ sub authenticate {
|
||||||
sub {PE_BADCREDENTIALS}
|
sub {PE_BADCREDENTIALS}
|
||||||
]
|
]
|
||||||
);
|
);
|
||||||
|
|
||||||
return PE_OK;
|
return PE_OK;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -843,6 +843,8 @@ sub registerLogin {
|
||||||
$login->{error} = $self->error( $req->authResult )
|
$login->{error} = $self->error( $req->authResult )
|
||||||
if ( $req->authResult );
|
if ( $req->authResult );
|
||||||
|
|
||||||
|
$self->logger->debug(" Current login -> " . $login->{error} );
|
||||||
|
|
||||||
# Add current login into history
|
# Add current login into history
|
||||||
unshift @{ $history->{$type} }, $login;
|
unshift @{ $history->{$type} }, $login;
|
||||||
|
|
||||||
|
|
|
@ -1,5 +1,6 @@
|
||||||
package Lemonldap::NG::Portal::Plugins::History;
|
package Lemonldap::NG::Portal::Plugins::History;
|
||||||
|
|
||||||
|
use Data::Dumper;
|
||||||
use strict;
|
use strict;
|
||||||
use Mouse;
|
use Mouse;
|
||||||
use Lemonldap::NG::Portal::Main::Constants qw(PE_INFO PE_OK);
|
use Lemonldap::NG::Portal::Main::Constants qw(PE_INFO PE_OK);
|
||||||
|
@ -21,6 +22,8 @@ sub run {
|
||||||
my ( $self, $req ) = @_;
|
my ( $self, $req ) = @_;
|
||||||
if ( $req->param('checkLogins') ) {
|
if ( $req->param('checkLogins') ) {
|
||||||
$self->logger->debug('History asked');
|
$self->logger->debug('History asked');
|
||||||
|
$self->logger->debug(' successLogins -> ' . Dumper($req->sessionInfo->{_loginHistory}->{successLogin} ));
|
||||||
|
$self->logger->debug(' failedLogins -> ' . Dumper($req->sessionInfo->{_loginHistory}->{failedLogin} ));
|
||||||
$req->info(
|
$req->info(
|
||||||
(
|
(
|
||||||
$req->sessionInfo->{_loginHistory}->{successLogin}
|
$req->sessionInfo->{_loginHistory}->{successLogin}
|
||||||
|
@ -29,7 +32,8 @@ sub run {
|
||||||
'lastLogins', 0, 0 )
|
'lastLogins', 0, 0 )
|
||||||
: ""
|
: ""
|
||||||
)
|
)
|
||||||
. (
|
. ("<hr>") .
|
||||||
|
(
|
||||||
$req->sessionInfo->{_loginHistory}->{failedLogin}
|
$req->sessionInfo->{_loginHistory}->{failedLogin}
|
||||||
? $self->p->mkSessionArray(
|
? $self->p->mkSessionArray(
|
||||||
$req->sessionInfo->{_loginHistory}->{failedLogin},
|
$req->sessionInfo->{_loginHistory}->{failedLogin},
|
||||||
|
|
|
@ -28,8 +28,8 @@
|
||||||
<TMPL_LOOP NAME="values">
|
<TMPL_LOOP NAME="values">
|
||||||
<td><TMPL_VAR NAME="v"></td>
|
<td><TMPL_VAR NAME="v"></td>
|
||||||
</TMPL_LOOP>
|
</TMPL_LOOP>
|
||||||
<TMPL_IF NAME="displayError">
|
<TMPL_IF NAME="error">
|
||||||
<td><TMPL_VAR NAME="error"></td>
|
<td trspan="PE<TMPL_VAR NAME="error">">PE<TMPL_VAR NAME="error"></td>
|
||||||
</TMPL_IF>
|
</TMPL_IF>
|
||||||
</tr>
|
</tr>
|
||||||
</TMPL_LOOP>
|
</TMPL_LOOP>
|
||||||
|
|
Loading…
Reference in New Issue
Block a user