| line |
true |
false |
branch |
|
146
|
0 |
8 |
ref $_[0] eq 'HASH' ? :
|
|
154
|
1 |
7 |
if $args{'users_source'}
|
|
157
|
1 |
7 |
if $args{'roles_source'}
|
|
160
|
1 |
7 |
if $args{'user_roles_source'}
|
|
164
|
1 |
7 |
if ($args{'users_table'})
|
|
167
|
1 |
0 |
unless $args{'users_source'}
|
|
170
|
1 |
7 |
if ($args{'roles_table'})
|
|
173
|
1 |
0 |
unless $args{'roles_source'}
|
|
176
|
1 |
7 |
if ($args{'user_roles_table'})
|
|
179
|
1 |
0 |
unless $args{'user_roles_source'}
|
|
512
|
0 |
10 |
if $self->plugin->disable_roles
|
|
528
|
10 |
0 |
if ($info->{'class'} eq $user_roles_class and $info->{'attrs'}{'accessor'} eq 'multi' and $info->{'attrs'}{'join_type'} eq 'LEFT' and scalar keys %cond == 1)
|
|
553
|
0 |
9 |
if $self->plugin->disable_roles
|
|
583
|
40 |
0 |
$column eq 'pw_reset_code' ? :
|
|
|
771 |
40 |
$column eq 'username' ? :
|
|
599
|
6 |
196 |
unless defined $username and defined $password
|
|
603
|
120 |
76 |
unless $user
|
|
605
|
0 |
76 |
if (my $password_check = $self->users_password_check)
|
|
614
|
60 |
16 |
if (my $match = $self->match_password($password, $user->$password_column))
|
|
617
|
56 |
4 |
if ($options{'lastlogin'})
|
|
618
|
36 |
20 |
if (my $lastlogin = $user->lastlogin)
|
|
619
|
36 |
0 |
if (ref $lastlogin eq '')
|
|
640
|
6 |
20 |
unless defined $username and defined $password
|
|
646
|
18 |
2 |
if (my $pwchanged = $self->users_pwchanged_column)
|
|
656
|
2 |
272 |
unless defined $username
|
|
663
|
136 |
136 |
unless $self->user_as_object
|
|
668
|
26 |
246 |
unless ($user)
|
|
673
|
123 |
123 |
unless ($self->user_as_object)
|
|
674
|
123 |
0 |
if (my $roles_key = $self->roles_key)
|
|
686
|
4 |
40 |
unless $code and $code ne ''
|
|
690
|
32 |
8 |
unless $user
|
|
700
|
4 |
28 |
unless defined $username and $username ne ''
|
|
713
|
4 |
136 |
unless $username
|
|
718
|
10 |
126 |
unless $user
|
|
721
|
126 |
0 |
if (my $roles_key = $self->roles_key)
|
|
722
|
4 |
122 |
if (my $new_roles = delete $update{$roles_key})
|
|
735
|
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}) { }
|
|
777
|
126 |
0 |
if (my $users_pwresetcode_column = $self->users_pwresetcode_column)
|
|
778
|
10 |
116 |
if (exists $update{'pw_reset_code'})
|
|
785
|
0 |
126 |
if $update{'username'}
|
|
791
|
2 |
167 |
unless defined $username
|
|
803
|
4 |
163 |
unless ($user)
|
|
821
|
2 |
5 |
unless defined $user and ref $user eq 'HASH' || &blessed($user) && $user->isa('DBIx::Class::Row')
|
|
826
|
0 |
10 |
unless my $expiry = $self->password_expiry_days
|
|
828
|
10 |
0 |
if (my $pwchanged = $self->users_pwchanged_column) { }
|
|
830
|
5 |
5 |
$self->user_as_object ? :
|
|
833
|
2 |
8 |
unless $last_changed
|
|
835
|
8 |
0 |
if (ref $last_changed ne 'DateTime')
|
|
841
|
4 |
4 |
$duration->in_units('days') > $expiry ? :
|