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

Append debug messages (#1509)

Browse Source
This commit is contained in:
Christophe Maudoux 2018-10-22 22:28:37 +02:00
parent 52ac044205
commit 14391d07d1
3 changed files with 6 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lemonldap-ng-common/lib/Lemonldap/NG/Common/Session/REST.pm
View File

@ -257,6 +257,7 @@ sub getApacheSession {
$self->error( $apacheSession->error );
return undef;
}
$self->logger->debug("Get session $id from Common::Session::REST");
return $apacheSession;
}

3
lemonldap-ng-handler/lib/Lemonldap/NG/Handler/Main/Run.pm
View File

@ -460,8 +460,7 @@ sub retrieveSession {
unless ( $session->error ) {
$class->data( $session->data );
$class->logger->debug("Get session $id");
$class->logger->debug("Get session $id from Handler::Main::Run");
# Update the session to notify activity, if necessary
if (

9
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Main/Run.pm
View File

@ -322,7 +322,6 @@ sub autoRedirect {
sub getApacheSession {
my ( $self, $id, %args ) = @_;
$args{kind} ||= "SSO";
if ($id) {
$self->logger->debug("Try to get $args{kind} session $id");
}
@ -359,17 +358,17 @@ sub getApacheSession {
$self->logger->debug("Session $args{kind} $id not found");
return;
}
$self->logger->debug("Get session $id from Portal::Main::Run") if ( $id );
$self->logger->debug( "Check session timeoutActivity" );
my $now = time;
if (
$id
and defined $as->data->{_utime}
and (
$now - $as->data->{_utime} > $self->conf->{timeout}
( ( $now - $as->data->{_utime} ) > $self->conf->{timeout} )
or ( $self->conf->{timeoutActivity}
and $as->data->{_lastSeen}
and $now - $as->data->{_lastSeen} >
$self->conf->{timeoutActivity} )
and ( ( $now - $as->data->{_lastSeen} ) > $self->conf->{timeoutActivity} ) )
)
)
{