Attachment 122173 Details for Bug 28571 – Bug 28571: Remove C4::Auth::_session_log

[patch] Bug 28571: Remove C4::Auth::_session_log

Bug-28571-Remove-C4Authsessionlog.patch (text/plain), 2.24 KB, created by David Nind on 2021-06-18 19:29:47 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: David Nind

Created: 2021-06-18 19:29:47 UTC

Size: 2.24 KB

patch

obsolete

>From 18547283e04c2acc81a6967df5a1ab44d61c6285 Mon Sep 17 00:00:00 2001
>From: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
>Date: Wed, 16 Jun 2021 15:28:01 +0200
>Subject: [PATCH] Bug 28571: Remove C4::Auth::_session_log
>
>It's not used and must be removed
>
>Test plan:
>  % git grep _session_log
>must not return any result.
>
>Signed-off-by: David Nind <david@davidnind.com>
>---
> C4/Auth.pm | 11 -----------
> 1 file changed, 11 deletions(-)
>
>diff --git a/C4/Auth.pm b/C4/Auth.pm
>index 2a2e3b6779..168b04c35b 100644
>--- a/C4/Auth.pm
>+++ b/C4/Auth.pm
>@@ -776,13 +776,6 @@ sub _version_check {
>     }
> }
> 
>-sub _session_log {
>-    (@_) or return 0;
>-    open my $fh, '>>', "/tmp/sessionlog" or warn "ERROR: Cannot append to /tmp/sessionlog";
>-    printf $fh join( "\n", @_ );
>-    close $fh;
>-}
>-
> sub _timeout_syspref {
>     my $default_timeout = 600;
>     my $timeout = C4::Context->preference('timeout') || $default_timeout;
>@@ -925,7 +918,6 @@ sub checkauth {
>             $session->flush;
>             C4::Context->_unset_userenv($sessionID);
> 
>-            #_session_log(sprintf "%20s from %16s logged out at %30s (manually).\n", $userid,$ip,(strftime "%c",localtime));
>             $sessionID = undef;
>             $userid    = undef;
> 
>@@ -948,7 +940,6 @@ sub checkauth {
>             }
>             C4::Context->_unset_userenv($sessionID);
> 
>-            #_session_log(sprintf "%20s from %16s logged out at %30s (inactivity).\n", $userid,$ip,(strftime "%c",localtime));
>             $userid    = undef;
>             $sessionID = undef;
>         }
>@@ -962,7 +953,6 @@ sub checkauth {
>             $session->flush;
>             C4::Context->_unset_userenv($sessionID);
> 
>-            #_session_log(sprintf "%20s from %16s logged out at %30s (ip changed to %16s).\n", $userid,$ip,(strftime "%c",localtime), $info{'newip'});
>             $sessionID = undef;
>             $userid    = undef;
>         }
>@@ -1123,7 +1113,6 @@ sub checkauth {
>             # $return: 1 = valid user
>             if ($return) {
> 
>-                #_session_log(sprintf "%20s from %16s logged in  at %30s.\n", $userid,$ENV{'REMOTE_ADDR'},(strftime '%c', localtime));
>                 if ( $flags = haspermission( $userid, $flagsrequired ) ) {
>                     $loggedin = 1;
>                 }
>-- 
>2.20.1

Actions: View | Diff | Splinter Review

Attachments on bug 28571: 122039 | 122173 | 122342