Lines 703-709
sub checkauth {
Link Here
|
703 |
$session->flush; |
703 |
$session->flush; |
704 |
$session->delete(); |
704 |
$session->delete(); |
705 |
C4::Context->_unset_userenv($sessionID); |
705 |
C4::Context->_unset_userenv($sessionID); |
706 |
_session_log(sprintf "%20s from %16s logged out at %30s (manually).\n", $userid,$ip,(strftime "%c",localtime)); |
706 |
#_session_log(sprintf "%20s from %16s logged out at %30s (manually).\n", $userid,$ip,(strftime "%c",localtime)); |
707 |
$sessionID = undef; |
707 |
$sessionID = undef; |
708 |
$userid = undef; |
708 |
$userid = undef; |
709 |
|
709 |
|
Lines 716-722
sub checkauth {
Link Here
|
716 |
$info{'timed_out'} = 1; |
716 |
$info{'timed_out'} = 1; |
717 |
$session->delete(); |
717 |
$session->delete(); |
718 |
C4::Context->_unset_userenv($sessionID); |
718 |
C4::Context->_unset_userenv($sessionID); |
719 |
_session_log(sprintf "%20s from %16s logged out at %30s (inactivity).\n", $userid,$ip,(strftime "%c",localtime)); |
719 |
#_session_log(sprintf "%20s from %16s logged out at %30s (inactivity).\n", $userid,$ip,(strftime "%c",localtime)); |
720 |
$userid = undef; |
720 |
$userid = undef; |
721 |
$sessionID = undef; |
721 |
$sessionID = undef; |
722 |
} |
722 |
} |
Lines 727-733
sub checkauth {
Link Here
|
727 |
$info{'different_ip'} = 1; |
727 |
$info{'different_ip'} = 1; |
728 |
$session->delete(); |
728 |
$session->delete(); |
729 |
C4::Context->_unset_userenv($sessionID); |
729 |
C4::Context->_unset_userenv($sessionID); |
730 |
_session_log(sprintf "%20s from %16s logged out at %30s (ip changed to %16s).\n", $userid,$ip,(strftime "%c",localtime), $info{'newip'}); |
730 |
#_session_log(sprintf "%20s from %16s logged out at %30s (ip changed to %16s).\n", $userid,$ip,(strftime "%c",localtime), $info{'newip'}); |
731 |
$sessionID = undef; |
731 |
$sessionID = undef; |
732 |
$userid = undef; |
732 |
$userid = undef; |
733 |
} |
733 |
} |
Lines 765-771
sub checkauth {
Link Here
|
765 |
$userid = $retuserid if ($retuserid ne ''); |
765 |
$userid = $retuserid if ($retuserid ne ''); |
766 |
} |
766 |
} |
767 |
if ($return) { |
767 |
if ($return) { |
768 |
_session_log(sprintf "%20s from %16s logged in at %30s.\n", $userid,$ENV{'REMOTE_ADDR'},(strftime '%c', localtime)); |
768 |
#_session_log(sprintf "%20s from %16s logged in at %30s.\n", $userid,$ENV{'REMOTE_ADDR'},(strftime '%c', localtime)); |
769 |
if ( $flags = haspermission( $userid, $flagsrequired ) ) { |
769 |
if ( $flags = haspermission( $userid, $flagsrequired ) ) { |
770 |
$loggedin = 1; |
770 |
$loggedin = 1; |
771 |
} |
771 |
} |