From 5529e5a0ca43ea46e59a51bd77022b089242c795 Mon Sep 17 00:00:00 2001 From: Marcel de Rooy Date: Tue, 15 Nov 2022 13:53:17 +0000 Subject: [PATCH] Bug 32208: Extend Auth.t Test plan: Without follow-up patch, Auth.t should fail: not ok 5 - No permission response not ok 6 - checkauth returned failure Signed-off-by: Marcel de Rooy Signed-off-by: Nick Clemens Signed-off-by: Chris Cormack Signed-off-by: Lucas Gass (cherry picked from commit a1134bfd8a55181be627aba8a7af47df27fe4484) --- t/db_dependent/Auth.t | 29 ++++++++++++++++++++++++++--- 1 file changed, 26 insertions(+), 3 deletions(-) diff --git a/t/db_dependent/Auth.t b/t/db_dependent/Auth.t index b057cdd68b..992984bd33 100755 --- a/t/db_dependent/Auth.t +++ b/t/db_dependent/Auth.t @@ -109,7 +109,8 @@ subtest 'checkauth() tests' => sub { }; subtest 'While still logged in, relogin with another user' => sub { - plan tests => 4; + plan tests => 6; + my $patron = $builder->build_object({ class => 'Koha::Patrons', value => {} }); my $patron2 = $builder->build_object({ class => 'Koha::Patrons', value => {} }); # Create 'former' session @@ -135,12 +136,11 @@ subtest 'checkauth() tests' => sub { $cgi->param( -name => 'userid', -value => $patron2->userid ); $cgi->param( -name => 'password', -value => $password ); $cgi->param( -name => 'koha_login_context', -value => 1 ); - my @return; + my ( @return, $stdout ); { local *STDOUT; local %ENV; $ENV{REMOTE_ADDR} = '1.2.3.4'; - my $stdout; open STDOUT, '>', \$stdout; @return = C4::Auth::checkauth( $cgi, 0, {} ); close STDOUT; @@ -149,6 +149,29 @@ subtest 'checkauth() tests' => sub { is( $return[0], $patron2->userid, 'Login of patron2 approved' ); isnt( $return[2], $sessionID, 'Did not return previous session ID' ); ok( $return[2], 'New session ID not empty' ); + + # Similar situation: Relogin with former session of $patron, new user $patron2 has no permissions + $patron2->flags(undef)->store; + $session->param( 'number', $patron->id ); + $session->param( 'id', $patron->userid ); + $session->param( 'interface', 'intranet' ); + $session->flush; + $sessionID = $session->id; + C4::Context->_new_userenv($sessionID); + $cgi->param( -name => 'userid', -value => $patron2->userid ); + $cgi->param( -name => 'password', -value => $password ); + $cgi->param( -name => 'koha_login_context', -value => 1 ); + { + local *STDOUT; + local %ENV; + $ENV{REMOTE_ADDR} = '1.2.3.4'; + $stdout = q{}; + open STDOUT, '>', \$stdout; + @return = C4::Auth::checkauth( $cgi, 0, { catalogue => 1 }, 'intranet' ); # patron2 has no catalogue perm + close STDOUT; + } + like( $stdout, qr/You do not have permission to access this page/, 'No permission response' ); + is( @return, 0, 'checkauth returned failure' ); }; C4::Context->_new_userenv; # For next tests -- 2.39.5