Lines 855-861
sub checkauth {
Link Here
|
855 |
); |
855 |
); |
856 |
|
856 |
|
857 |
if ( $return eq 'ok' || $return eq 'additional-auth-needed' ) { |
857 |
if ( $return eq 'ok' || $return eq 'additional-auth-needed' ) { |
858 |
$userid = $session->param('id'); |
858 |
$userid = $session->param('userid'); |
859 |
} |
859 |
} |
860 |
|
860 |
|
861 |
$auth_state = |
861 |
$auth_state = |
Lines 1217-1223
sub checkauth {
Link Here
|
1217 |
} |
1217 |
} |
1218 |
|
1218 |
|
1219 |
$session->param( 'number', $borrowernumber ); |
1219 |
$session->param( 'number', $borrowernumber ); |
1220 |
$session->param( 'id', $userid ); |
1220 |
$session->param( 'userid', $userid ); |
1221 |
$session->param( 'cardnumber', $cardnumber ); |
1221 |
$session->param( 'cardnumber', $cardnumber ); |
1222 |
$session->param( 'firstname', $firstname ); |
1222 |
$session->param( 'firstname', $firstname ); |
1223 |
$session->param( 'surname', $surname ); |
1223 |
$session->param( 'surname', $surname ); |
Lines 1237-1243
sub checkauth {
Link Here
|
1237 |
} |
1237 |
} |
1238 |
$session->param('cas_ticket', $cas_ticket) if $cas_ticket; |
1238 |
$session->param('cas_ticket', $cas_ticket) if $cas_ticket; |
1239 |
C4::Context->set_userenv( |
1239 |
C4::Context->set_userenv( |
1240 |
$session->param('number'), $session->param('id'), |
1240 |
$session->param('number'), $session->param('userid'), |
1241 |
$session->param('cardnumber'), $session->param('firstname'), |
1241 |
$session->param('cardnumber'), $session->param('firstname'), |
1242 |
$session->param('surname'), $session->param('branch'), |
1242 |
$session->param('surname'), $session->param('branch'), |
1243 |
$session->param('branchname'), $session->param('flags'), |
1243 |
$session->param('branchname'), $session->param('flags'), |
Lines 1654-1660
sub check_api_auth {
Link Here
|
1654 |
} |
1654 |
} |
1655 |
} |
1655 |
} |
1656 |
$session->param( 'number', $borrowernumber ); |
1656 |
$session->param( 'number', $borrowernumber ); |
1657 |
$session->param( 'id', $userid ); |
1657 |
$session->param( 'userid', $userid ); |
1658 |
$session->param( 'cardnumber', $cardnumber ); |
1658 |
$session->param( 'cardnumber', $cardnumber ); |
1659 |
$session->param( 'firstname', $firstname ); |
1659 |
$session->param( 'firstname', $firstname ); |
1660 |
$session->param( 'surname', $surname ); |
1660 |
$session->param( 'surname', $surname ); |
Lines 1668-1674
sub check_api_auth {
Link Here
|
1668 |
} |
1668 |
} |
1669 |
$session->param( 'cas_ticket', $cas_ticket); |
1669 |
$session->param( 'cas_ticket', $cas_ticket); |
1670 |
C4::Context->set_userenv( |
1670 |
C4::Context->set_userenv( |
1671 |
$session->param('number'), $session->param('id'), |
1671 |
$session->param('number'), $session->param('userid'), |
1672 |
$session->param('cardnumber'), $session->param('firstname'), |
1672 |
$session->param('cardnumber'), $session->param('firstname'), |
1673 |
$session->param('surname'), $session->param('branch'), |
1673 |
$session->param('surname'), $session->param('branch'), |
1674 |
$session->param('branchname'), $session->param('flags'), |
1674 |
$session->param('branchname'), $session->param('flags'), |
Lines 1754-1760
sub check_cookie_auth {
Link Here
|
1754 |
C4::Context::_unset_userenv($sessionID); # remove old userenv first |
1754 |
C4::Context::_unset_userenv($sessionID); # remove old userenv first |
1755 |
my $session = get_session($sessionID); |
1755 |
my $session = get_session($sessionID); |
1756 |
if ($session) { |
1756 |
if ($session) { |
1757 |
my $userid = $session->param('id'); |
1757 |
my $userid = $session->param('userid'); |
1758 |
my $ip = $session->param('ip'); |
1758 |
my $ip = $session->param('ip'); |
1759 |
my $lasttime = $session->param('lasttime'); |
1759 |
my $lasttime = $session->param('lasttime'); |
1760 |
my $timeout = _timeout_syspref(); |
1760 |
my $timeout = _timeout_syspref(); |
Lines 1782-1788
sub check_cookie_auth {
Link Here
|
1782 |
C4::Context->_new_userenv($sessionID); |
1782 |
C4::Context->_new_userenv($sessionID); |
1783 |
C4::Context->interface($session->param('interface')); |
1783 |
C4::Context->interface($session->param('interface')); |
1784 |
C4::Context->set_userenv( |
1784 |
C4::Context->set_userenv( |
1785 |
$session->param('number'), $session->param('id') // '', |
1785 |
$session->param('number'), $session->param('userid') // '', |
1786 |
$session->param('cardnumber'), $session->param('firstname'), |
1786 |
$session->param('cardnumber'), $session->param('firstname'), |
1787 |
$session->param('surname'), $session->param('branch'), |
1787 |
$session->param('surname'), $session->param('branch'), |
1788 |
$session->param('branchname'), $session->param('flags'), |
1788 |
$session->param('branchname'), $session->param('flags'), |
Lines 1883-1889
sub create_basic_session {
Link Here
|
1883 |
my $session = get_session(""); |
1883 |
my $session = get_session(""); |
1884 |
|
1884 |
|
1885 |
$session->param( 'number', $patron->borrowernumber ); |
1885 |
$session->param( 'number', $patron->borrowernumber ); |
1886 |
$session->param( 'id', $patron->userid ); |
1886 |
$session->param( 'userid', $patron->userid ); |
1887 |
$session->param( 'cardnumber', $patron->cardnumber ); |
1887 |
$session->param( 'cardnumber', $patron->cardnumber ); |
1888 |
$session->param( 'firstname', $patron->firstname ); |
1888 |
$session->param( 'firstname', $patron->firstname ); |
1889 |
$session->param( 'surname', $patron->surname ); |
1889 |
$session->param( 'surname', $patron->surname ); |
Lines 1891-1897
sub create_basic_session {
Link Here
|
1891 |
$session->param( 'branchname', $patron->library->branchname ); |
1891 |
$session->param( 'branchname', $patron->library->branchname ); |
1892 |
$session->param( 'flags', $patron->flags ); |
1892 |
$session->param( 'flags', $patron->flags ); |
1893 |
$session->param( 'emailaddress', $patron->email ); |
1893 |
$session->param( 'emailaddress', $patron->email ); |
1894 |
$session->param( 'ip', $session->remote_addr() ); |
1894 |
$session->param( 'ip', $ENV{REMOTE_ADDR} ); # FIXME $session->remote_addr() ); |
1895 |
$session->param( 'lasttime', time() ); |
1895 |
$session->param( 'lasttime', time() ); |
1896 |
$session->param( 'interface', $interface); |
1896 |
$session->param( 'interface', $interface); |
1897 |
|
1897 |
|