| line |
true |
false |
branch |
|
26
|
0 |
8 |
ref $_[0] eq 'HASH' ? :
|
|
34
|
1 |
7 |
if $args{'users_source'}
|
|
37
|
1 |
7 |
if $args{'roles_source'}
|
|
40
|
1 |
7 |
if $args{'user_roles_source'}
|
|
44
|
1 |
7 |
if ($args{'users_table'})
|
|
47
|
1 |
0 |
unless $args{'users_source'}
|
|
50
|
1 |
7 |
if ($args{'roles_table'})
|
|
53
|
1 |
0 |
unless $args{'roles_source'}
|
|
56
|
1 |
7 |
if ($args{'user_roles_table'})
|
|
59
|
1 |
0 |
unless $args{'user_roles_source'}
|
|
195
|
0 |
10 |
if $self->plugin->disable_roles
|
|
211
|
0 |
10 |
unless ref $rel_info->{'cond'} eq "HASH"
|
|
213
|
10 |
0 |
if ($rel_info->{'class'} eq $user_roles_class and $rel_info->{'attrs'}{'accessor'} eq "multi" and $rel_info->{'attrs'}{'join_type'} eq "LEFT" and scalar keys %cond == 1)
|
|
238
|
0 |
9 |
if $self->plugin->disable_roles
|
|
263
|
40 |
0 |
$column eq 'pw_reset_code' ? :
|
|
|
778 |
40 |
$column eq 'username' ? :
|
|
278
|
6 |
196 |
unless defined $username and defined $password
|
|
282
|
120 |
76 |
unless $user
|
|
284
|
0 |
76 |
if (my $password_check = $self->users_password_check)
|
|
294
|
60 |
16 |
if (my $match = $self->match_password($password, $user->$password_column))
|
|
295
|
56 |
4 |
if ($options{'lastlogin'})
|
|
296
|
36 |
20 |
if (my $lastlogin = $user->lastlogin)
|
|
297
|
36 |
0 |
if (ref $lastlogin eq "")
|
|
318
|
6 |
20 |
unless defined $username and defined $password
|
|
324
|
18 |
2 |
if (my $pwchanged = $self->users_pwchanged_column)
|
|
334
|
2 |
278 |
unless defined $username
|
|
341
|
139 |
139 |
unless $self->user_as_object
|
|
346
|
30 |
248 |
unless ($user)
|
|
351
|
124 |
124 |
unless ($self->user_as_object)
|
|
352
|
124 |
0 |
if (my $roles_key = $self->roles_key)
|
|
364
|
4 |
40 |
unless $code and $code ne ""
|
|
368
|
32 |
8 |
unless $user
|
|
378
|
4 |
28 |
unless defined $username and $username ne ""
|
|
393
|
4 |
136 |
unless $username
|
|
398
|
10 |
126 |
unless $user
|
|
401
|
126 |
0 |
if (my $roles_key = $self->roles_key)
|
|
402
|
4 |
122 |
if (my $new_roles = delete $update{$roles_key})
|
|
414
|
4 |
8 |
if ($new_roles->{$role_name} and not $existing_roles{$role_name}) { }
|
|
|
0 |
8 |
elsif (not $new_roles->{$role_name} and $existing_roles{$role_name}) { }
|
|
448
|
126 |
0 |
if (my $users_pwresetcode_column = $self->users_pwresetcode_column)
|
|
449
|
10 |
116 |
if (exists $update{'pw_reset_code'})
|
|
457
|
0 |
126 |
if $update{'username'}
|
|
463
|
2 |
168 |
unless defined $username
|
|
474
|
4 |
164 |
unless ($user)
|
|
490
|
2 |
5 |
unless defined $user and ref $user eq 'HASH' || &blessed($user) && $user->isa('DBIx::Class::Row')
|
|
495
|
0 |
10 |
unless my $expiry = $self->password_expiry_days
|
|
497
|
10 |
0 |
if (my $pwchanged = $self->users_pwchanged_column) { }
|
|
498
|
5 |
5 |
$self->user_as_object ? :
|
|
501
|
2 |
8 |
unless $last_changed
|
|
503
|
8 |
0 |
if (ref $last_changed ne "DateTime")
|
|
510
|
4 |
4 |
$duration->in_units('days') > $expiry ? :
|