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