Lines 316-322
ok(C4::Auth::checkpw_hash('password', $hash1), 'password validates with first ha
Link Here
|
316 |
ok(C4::Auth::checkpw_hash('password', $hash2), 'password validates with second hash'); |
316 |
ok(C4::Auth::checkpw_hash('password', $hash2), 'password validates with second hash'); |
317 |
|
317 |
|
318 |
subtest 'Check value of login_attempts in checkpw' => sub { |
318 |
subtest 'Check value of login_attempts in checkpw' => sub { |
319 |
plan tests => 6; |
319 |
plan tests => 11; |
320 |
|
320 |
|
321 |
t::lib::Mocks::mock_preference('FailedLoginAttempts', 3); |
321 |
t::lib::Mocks::mock_preference('FailedLoginAttempts', 3); |
322 |
|
322 |
|
Lines 341-346
subtest 'Check value of login_attempts in checkpw' => sub {
Link Here
|
341 |
is( @test, 0, 'checkpw failed again and returns nothing now' ); |
341 |
is( @test, 0, 'checkpw failed again and returns nothing now' ); |
342 |
$patron->discard_changes; # refresh |
342 |
$patron->discard_changes; # refresh |
343 |
is( $patron->login_attempts, 3, 'Login attempts not increased anymore' ); |
343 |
is( $patron->login_attempts, 3, 'Login attempts not increased anymore' ); |
|
|
344 |
|
345 |
# Administrative lockout cannot be undone? |
346 |
# Pass the right password now (or: add a nice mock). |
347 |
my $auth = Test::MockModule->new( 'C4::Auth' ); |
348 |
$auth->mock( 'checkpw_hash', sub { return 1; } ); # not for production :) |
349 |
$patron->login_attempts(0)->store; |
350 |
@test = checkpw( $dbh, $patron->userid, '123', undef, 'opac', 1 ); |
351 |
is( $test[0], 1, 'Build confidence in the mock' ); |
352 |
$patron->login_attempts(-1)->store; |
353 |
is( $patron->account_locked, 1, 'Check administrative lockout' ); |
354 |
@test = checkpw( $dbh, $patron->userid, '123', undef, 'opac', 1 ); |
355 |
is( @test, 0, 'checkpw gave red' ); |
356 |
$patron->discard_changes; # refresh |
357 |
is( $patron->login_attempts, -1, 'Still locked out' ); |
358 |
t::lib::Mocks::mock_preference('FailedLoginAttempts', ''); # disable |
359 |
is( $patron->account_locked, 1, 'Check administrative lockout without pref' ); |
344 |
}; |
360 |
}; |
345 |
|
361 |
|
346 |
$schema->storage->txn_rollback; |
362 |
$schema->storage->txn_rollback; |
347 |
- |
|
|