| line |
true |
false |
branch |
|
20
|
0 |
0 |
if $args{$k} |
|
22
|
0 |
0 |
unless $$self{'dbname'} |
|
24
|
0 |
0 |
unless $$self{'dbtype'} |
|
26
|
0 |
0 |
unless $args{'NO_SALT'} |
|
28
|
0 |
0 |
if ($algo == 256) { } |
|
|
0 |
0 |
elsif ($algo == 384) { } |
|
|
0 |
0 |
elsif ($algo == 512) { } |
|
42
|
0 |
0 |
if ($$self{'dbtype'} =~ /^MySQL/i) { } |
|
46
|
0 |
0 |
if $$self{'dbhost'} |
|
47
|
0 |
0 |
unless $$self{'dbh'} = 'DBI'->connect($$self{'dsn'}, $$self{'dbuser'}, $$self{'dbpass'}, $$self{'sqlparams'}) |
|
59
|
0 |
0 |
unless $$self{'dbh'} = 'DBI'->connect($$self{'dsn'}, $$self{'sqlparams'}) |
|
69
|
0 |
0 |
if $$tbl{'TABLE_NAME'} eq $$self{'authentication'} |
|
71
|
0 |
0 |
if ($need_table) |
|
72
|
0 |
0 |
unless ($$self{'create'}) |
|
85
|
0 |
0 |
unless $ok_create |
|
97
|
0 |
0 |
if ($row) |
|
100
|
0 |
0 |
$salt ? : |
|
103
|
0 |
0 |
if $user_pw_digest eq $stored_pw_digest |
|
111
|
0 |
0 |
unless $self->validate($group, $user, $password) |
|
112
|
0 |
0 |
unless $self->not_in_table($group, $user) |
|
115
|
0 |
0 |
if ($$self{'make_salt'}) { } |
|
143
|
0 |
0 |
if $r and $r == 1 |
|
153
|
0 |
0 |
unless $self->validate($group, $user, $password) |
|
155
|
0 |
0 |
if ($$self{'make_salt'}) { } |
|
165
|
0 |
0 |
if $update_all_sth->execute($password_sha, $fullname, $email, $question, $answer, $t, $t, $salt, _g_u_key($group, $user), $group, $user) |
|
179
|
0 |
0 |
if $update_all_sth->execute($password_sha, $fullname, $email, $question, $answer, $t, $t, _g_u_key($group, $user), $group, $user) |
|
190
|
0 |
0 |
unless $self->validate($group, $user, $password) |
|
192
|
0 |
0 |
if ($$self{'make_salt'}) { } |
|
202
|
0 |
0 |
if $update_pw_sth->execute($password_sha, $t, $t, $salt, $group, $user) |
|
213
|
0 |
0 |
if $update_pw_sth->execute($password_sha, $t, $t, $group, $user) |
|
227
|
0 |
0 |
if $update_fullname_sth->execute($fullname, $t, $group, $user) |
|
238
|
0 |
0 |
if $update_email_sth->execute($email, $t, $group, $user) |
|
249
|
0 |
0 |
if $update_additional_sth->execute($question, $answer, $t, $group, $user) |
|
260
|
0 |
0 |
if $delete_sth->execute($group, $user) |
|
271
|
0 |
0 |
if $nrows < 0 |
|
314
|
0 |
0 |
if $row |
|
321
|
0 |
0 |
if $row |
|
328
|
0 |
0 |
if $row |
|
335
|
0 |
0 |
if $row |
|
352
|
0 |
0 |
unless ($group) |
|
356
|
0 |
0 |
unless ($user) |
|
360
|
0 |
0 |
unless ($password) |
|
376
|
0 |
0 |
if @row |
|
382
|
0 |
0 |
if $self->not_in_table($group, $user) |