my $c = MockCxt->new;
$c->setup;
- $c->prepare_action;
+ $c->_load_session;
ok( !$c->_session, "without a session ID prepare doesn't load a session" );
}
$c->setup;
$c->sessionid("decafbad");
- $c->prepare_action;
+ $c->_load_session;
ok( $c->_session, 'session "restored" with session id' );
}
$c->setup;
$c->sessionid("decafbad");
- $c->prepare_action;
+ $c->_load_session;
ok( !$c->_session, "expired sessions are deleted" );
like( $c->session_delete_reason, qr/expire/i, "with appropriate reason" );
$c->setup;
$c->sessionid("decafbad");
- $c->prepare_action;
+ $c->_load_session;
ok( !$c->_session, "hijacked sessions are deleted" );
like( $c->session_delete_reason, qr/mismatch/, "with appropriate reason" );
$c->setup;
$c->sessionid("decafbad");
- $c->prepare_action;
+ $c->_load_session;
ok( $c->_session, "address mismatch is OK if verify_address is disabled" );
}
my $c = MockCxt->new;
$c->setup;
- $c->prepare_action;
+ $c->_load_session;
ok( $c->session, "creating a session works" );
ok( $c->sessionid, "session id generated" );
my $now = time();
$c->sessionid("decafbad");
- $c->prepare_action;
+ $c->_load_session;
$c->finalize;
ok( $c->_session,
$c->setup;
$c->sessionid("decafbad");
- $c->prepare_action;
+ $c->_load_session;
$c->finalize;
ok( !$c->session->{foo}, "foo was deleted, expired");