Lines 1018-1024
sub checkauth {
Link Here
|
1018 |
} |
1018 |
} |
1019 |
} |
1019 |
} |
1020 |
|
1020 |
|
1021 |
# $return: 1 = valid user, 2 = superlibrarian |
1021 |
# $return: 1 = valid user, 2 = DB user |
1022 |
if ($return) { |
1022 |
if ($return) { |
1023 |
|
1023 |
|
1024 |
#_session_log(sprintf "%20s from %16s logged in at %30s.\n", $userid,$ENV{'REMOTE_ADDR'},(strftime '%c', localtime)); |
1024 |
#_session_log(sprintf "%20s from %16s logged in at %30s.\n", $userid,$ENV{'REMOTE_ADDR'},(strftime '%c', localtime)); |
Lines 1115-1121
sub checkauth {
Link Here
|
1115 |
} |
1115 |
} |
1116 |
elsif ( $return == 2 ) { |
1116 |
elsif ( $return == 2 ) { |
1117 |
|
1117 |
|
1118 |
#We suppose the user is the superlibrarian |
1118 |
# It's the DB user, again! |
|
|
1119 |
# He won't be able to do something interesting |
1119 |
$borrowernumber = 0; |
1120 |
$borrowernumber = 0; |
1120 |
$session->param( 'number', 0 ); |
1121 |
$session->param( 'number', 0 ); |
1121 |
$session->param( 'id', C4::Context->config('user') ); |
1122 |
$session->param( 'id', C4::Context->config('user') ); |
Lines 1124-1130
sub checkauth {
Link Here
|
1124 |
$session->param( 'surname', C4::Context->config('user') ); |
1125 |
$session->param( 'surname', C4::Context->config('user') ); |
1125 |
$session->param( 'branch', 'NO_LIBRARY_SET' ); |
1126 |
$session->param( 'branch', 'NO_LIBRARY_SET' ); |
1126 |
$session->param( 'branchname', 'NO_LIBRARY_SET' ); |
1127 |
$session->param( 'branchname', 'NO_LIBRARY_SET' ); |
1127 |
$session->param( 'flags', 1 ); |
1128 |
$session->param( 'flags', 0 ); |
1128 |
$session->param( 'emailaddress', C4::Context->preference('KohaAdminEmailAddress') ); |
1129 |
$session->param( 'emailaddress', C4::Context->preference('KohaAdminEmailAddress') ); |
1129 |
$session->param( 'ip', $session->remote_addr() ); |
1130 |
$session->param( 'ip', $session->remote_addr() ); |
1130 |
$session->param( 'lasttime', time() ); |
1131 |
$session->param( 'lasttime', time() ); |
Lines 1246-1251
sub checkauth {
Link Here
|
1246 |
PatronSelfRegistrationDefaultCategory => C4::Context->preference("PatronSelfRegistrationDefaultCategory"), |
1247 |
PatronSelfRegistrationDefaultCategory => C4::Context->preference("PatronSelfRegistrationDefaultCategory"), |
1247 |
persona => C4::Context->preference("Persona"), |
1248 |
persona => C4::Context->preference("Persona"), |
1248 |
opac_css_override => $ENV{'OPAC_CSS_OVERRIDE'}, |
1249 |
opac_css_override => $ENV{'OPAC_CSS_OVERRIDE'}, |
|
|
1250 |
user_added => $query->param('user_added'), |
1249 |
); |
1251 |
); |
1250 |
|
1252 |
|
1251 |
$template->param( OpacPublic => C4::Context->preference("OpacPublic") ); |
1253 |
$template->param( OpacPublic => C4::Context->preference("OpacPublic") ); |
Lines 1543-1549
sub check_api_auth {
Link Here
|
1543 |
$session->param( 'lasttime', time() ); |
1545 |
$session->param( 'lasttime', time() ); |
1544 |
} elsif ( $return == 2 ) { |
1546 |
} elsif ( $return == 2 ) { |
1545 |
|
1547 |
|
1546 |
#We suppose the user is the superlibrarian |
1548 |
# It's the DB user, again! |
|
|
1549 |
# He won't be able to do something interesting |
1547 |
$session->param( 'number', 0 ); |
1550 |
$session->param( 'number', 0 ); |
1548 |
$session->param( 'id', C4::Context->config('user') ); |
1551 |
$session->param( 'id', C4::Context->config('user') ); |
1549 |
$session->param( 'cardnumber', C4::Context->config('user') ); |
1552 |
$session->param( 'cardnumber', C4::Context->config('user') ); |
Lines 1551-1557
sub check_api_auth {
Link Here
|
1551 |
$session->param( 'surname', C4::Context->config('user') ); |
1554 |
$session->param( 'surname', C4::Context->config('user') ); |
1552 |
$session->param( 'branch', 'NO_LIBRARY_SET' ); |
1555 |
$session->param( 'branch', 'NO_LIBRARY_SET' ); |
1553 |
$session->param( 'branchname', 'NO_LIBRARY_SET' ); |
1556 |
$session->param( 'branchname', 'NO_LIBRARY_SET' ); |
1554 |
$session->param( 'flags', 1 ); |
1557 |
$session->param( 'flags', 0 ); |
1555 |
$session->param( 'emailaddress', C4::Context->preference('KohaAdminEmailAddress') ); |
1558 |
$session->param( 'emailaddress', C4::Context->preference('KohaAdminEmailAddress') ); |
1556 |
$session->param( 'ip', $session->remote_addr() ); |
1559 |
$session->param( 'ip', $session->remote_addr() ); |
1557 |
$session->param( 'lasttime', time() ); |
1560 |
$session->param( 'lasttime', time() ); |
Lines 1980-1988
sub haspermission {
Link Here
|
1980 |
my $row = $sth->fetchrow(); |
1983 |
my $row = $sth->fetchrow(); |
1981 |
my $flags = getuserflags( $row, $userid ); |
1984 |
my $flags = getuserflags( $row, $userid ); |
1982 |
if ( $userid eq C4::Context->config('user') ) { |
1985 |
if ( $userid eq C4::Context->config('user') ) { |
1983 |
|
1986 |
# DB User Account from /etc/koha.conf |
1984 |
# Super User Account from /etc/koha.conf |
1987 |
if ( $flagsrequired->{DB_user} == 1 ) { |
1985 |
$flags->{'superlibrarian'} = 1; |
1988 |
$flags->{DB_user} = 1; |
|
|
1989 |
return $flags; |
1990 |
} |
1991 |
return 0; |
1986 |
} |
1992 |
} |
1987 |
elsif ( $userid eq 'demo' && C4::Context->config('demo') ) { |
1993 |
elsif ( $userid eq 'demo' && C4::Context->config('demo') ) { |
1988 |
|
1994 |
|