diff --git a/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Main/Run.pm b/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Main/Run.pm index 4e0883b43..381c6e8b5 100644 --- a/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Main/Run.pm +++ b/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Main/Run.pm @@ -560,7 +560,10 @@ sub _deleteSession { # Log my $user = $req->{sessionInfo}->{ $self->conf->{whatToTrace} }; - $self->userLogger->notice("User $user has been disconnected") if $user; + my $mod = $req->{sessionInfo}->{_auth}; + $self->userLogger->notice( +"User $user has been disconnected from $mod ($req->{sessionInfo}->{ipAddr})" + ) if $user; return $session->error ? 0 : 1; } diff --git a/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Plugins/GrantSession.pm b/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Plugins/GrantSession.pm index 459f21057..4bf9c633e 100644 --- a/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Plugins/GrantSession.pm +++ b/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Plugins/GrantSession.pm @@ -92,6 +92,13 @@ sub run { } } } + + # Log + my $user = $req->{sessionInfo}->{ $self->conf->{whatToTrace} }; + my $mod = $req->{sessionInfo}->{_auth}; + $self->userLogger->notice( + "Session granted for $user by $mod ($req->{sessionInfo}->{ipAddr})") + if $user; return PE_OK; }