| line |
true |
false |
branch |
|
52
|
0 |
1 |
unless $self->{'dbh'} = 'DBI'->connect(@{$$self{'dbi_connect'};}) |
|
53
|
1 |
0 |
if $self->{'post_connect_cb'} |
|
54
|
0 |
1 |
unless $self->{'insert_sth'} = $self->{'dbh'}->prepare($self->{'insert_user'}) |
|
55
|
0 |
1 |
unless $self->{'select_sth'} = $self->{'dbh'}->prepare($self->{'select_user'}) |
|
56
|
0 |
1 |
unless $self->{'update_sth'} = $self->{'dbh'}->prepare($self->{'update_pass'}) |
|
62
|
0 |
1 |
unless $self->{'insert_sth'}->execute($parms{'username'}, $self->hash_passphrase($parms{'password'}), $parms{'email'}) |
|
67
|
0 |
30 |
unless $self->{'select_sth'}->execute($user) |
|
73
|
1 |
12 |
unless ($self->{'cache'}) |
|
79
|
0 |
13 |
if exists $self->{'cache'}{$cachekey} |
|
81
|
1 |
12 |
unless $user |
|
83
|
9 |
3 |
if $ret or $self->{'cache_fail'} |
|
98
|
0 |
2 |
unless $self->{'update_sth'}->execute($self->hash_passphrase($passphrase), $username) |
|
112
|
1 |
0 |
$hours == 1 ? : |
|
177
|
1 |
16 |
unless $parms{$_} |
|
180
|
1 |
3 |
unless $parms{'username'} =~ /$self->{'username_regex'}/su |
|
181
|
1 |
2 |
if $self->get_user($parms{'username'}) |
|
182
|
1 |
1 |
unless $parms{'password'} eq $parms{'confirm_password'} |
|
190
|
1 |
4 |
unless $req->user |
|
194
|
1 |
9 |
unless $parms{$_} |
|
197
|
1 |
2 |
unless $self->check_passphrase($req->user, $parms{'password'}) |
|
198
|
1 |
1 |
unless $parms{'new_password'} eq $parms{'confirm_new_password'} |
|
205
|
1 |
3 |
unless $self->{'mail_from'} |
|
207
|
2 |
1 |
unless my $user = $self->get_user($username) |
|
208
|
0 |
1 |
unless eval {
do {
$self->send_reset_email($username);
1
}
} |
|
220
|
1 |
20 |
unless $parms{$_} |
|
223
|
1 |
4 |
unless my $user = $self->get_user($parms{'username'}) |
|
224
|
1 |
3 |
unless $parms{'new_password'} eq $parms{'confirm_new_password'} |
|
227
|
1 |
2 |
unless $token eq $goodtoken |
|
228
|
1 |
1 |
if time >= $exp |
|
236
|
1 |
29 |
unless ($self->{'init_done'}) |
|
242
|
10 |
20 |
if ($auth and $auth =~ /^Basic (.*)$/isu) |
|
244
|
7 |
3 |
if $self->check_passphrase($user, $pass) |
|
249
|
21 |
9 |
if ($req->method eq 'POST') |
|
250
|
5 |
16 |
if $req->path eq $self->{'register_url'} |
|
251
|
5 |
11 |
if $req->path eq $self->{'passwd_url'} |
|
252
|
4 |
7 |
if $req->path eq $self->{'request_reset_url'} |
|
253
|
6 |
1 |
if $req->path eq $self->{'reset_url'} |