| line |
true |
false |
branch |
|
138
|
0 |
2 |
unless my $class = $self->group_class |
|
141
|
0 |
2 |
unless ($gid) |
|
147
|
0 |
2 |
if $self->debug |
|
151
|
0 |
2 |
if $self->debug |
|
154
|
0 |
2 |
if $self->debug |
|
192
|
0 |
0 |
unless my $attr = shift() |
|
211
|
0 |
0 |
if ($msg->code) |
|
264
|
4 |
0 |
if ($self->ldap_entry) |
|
280
|
0 |
4 |
wantarray ? : |
|
295
|
0 |
1 |
unless my $group_class = $self->group_class |
|
296
|
0 |
1 |
unless my $ldap = $self->ldap |
|
298
|
0 |
1 |
unless (@DNs) |
|
304
|
1 |
1 |
unless my $dn = shift @DNs |
|
358
|
24 |
1 |
if (not defined $self->ldap_entry and grep {$_ eq $attribute;} @{$self->attributes;}) |
|
362
|
0 |
24 |
if (scalar @_) |
|
368
|
0 |
24 |
exists $self->{'_not_yet_set'}{$attribute} ? : |
|
373
|
0 |
1 |
if (@_) |
|
381
|
0 |
0 |
unless (exists $self->{'_was_set'}{$attribute}{'old'}) |
|
383
|
0 |
0 |
@old > 1 ? : |
|
392
|
0 |
24 |
if ($str =~ /^"\000.+"\000$/) |
|
400
|
0 |
24 |
unless my $pass = shift() |
|
403
|
0 |
24 |
if (_is_encoded($pass)) |
|
415
|
0 |
0 |
unless my $pass = shift() |
|
416
|
0 |
0 |
unless (_is_encoded($pass)) |
|
442
|
0 |
24 |
unless my $username = delete $opts{'sAMAccountName'} || $self->sAMAccountName |
|
476
|
21 |
3 |
if $gid |
|
481
|
24 |
24 |
if $name eq 'cn' |
|
484
|
0 |
24 |
if (not exists $attr{$name}) { } |
|
504
|
24 |
0 |
if (exists $self->{'groups'}) |
|
512
|
0 |
24 |
unless ($group->read) |
|
520
|
0 |
24 |
if $group->has_user($self) |
|
564
|
24 |
3 |
if ($group) |
|
565
|
23 |
1 |
if (ref $group and $group->isa('Net::LDAP::Class::Group')) { } |
|
|
0 |
1 |
elsif ($self->primaryGroupID == $PRIMARY_GROUP_NOT_USED) { } |
|
573
|
0 |
1 |
unless ($group_obj) |
|
581
|
0 |
0 |
unless ($self->displayName or $self->cn or $self->sn or $self->givenName) |
|
593
|
24 |
3 |
unless defined $givenName |
|
595
|
24 |
3 |
unless defined $sn |
|
597
|
0 |
27 |
unless defined $cn |
|
600
|
21 |
6 |
if ($cn ne $un and not $cn =~ m[/$un$]) |
|
605
|
24 |
3 |
unless defined $email |
|
622
|
0 |
3 |
unless ($username) |
|
649
|
1 |
1 |
if $attr eq 'cn' |
|
654
|
0 |
1 |
if (defined $old and not defined $new) { } |
|
|
0 |
1 |
elsif (not defined $old and defined $new) { } |
|
|
0 |
1 |
elsif (not defined $old || defined $new) { } |
|
|
1 |
0 |
elsif ($old ne $new) { } |
|
674
|
2 |
1 |
if (defined $group and $group ne $PRIMARY_GROUP_NOT_USED and not exists $replace{'primaryGroupID'} and $self->group->gid != $self->gid) |
|
691
|
2 |
1 |
if (exists $self->{'groups'}) |
|
712
|
1 |
1 |
unless (exists $existing{$cn}) |
|
715
|
0 |
1 |
unless ($group->ldap_entry) |
|
725
|
0 |
0 |
if "$u" eq "$self" |
|
740
|
2 |
1 |
unless (exists $new{$cn}) |
|
746
|
0 |
2 |
unless "$u" eq "$self" |
|
762
|
3 |
0 |
if (%replace) |
|
777
|
0 |
3 |
unless (@actions) |
|
782
|
0 |
3 |
if $self->debug |
|
805
|
0 |
0 |
unless ($username) |
|
827
|
0 |
0 |
unless defined $adts |
|
838
|
0 |
0 |
unless defined $epoch |