| line |
true |
false |
branch |
|
137
|
0 |
2 |
unless my $class = $self->group_class |
|
140
|
0 |
2 |
unless ($gid) |
|
146
|
0 |
2 |
if $self->debug |
|
150
|
0 |
2 |
if $self->debug |
|
153
|
0 |
2 |
if $self->debug |
|
171
|
0 |
0 |
if ($ENV{'LDAP_DEBUG'}) |
|
186
|
0 |
2 |
if $sub_authority_count != scalar @sub_authorities |
|
190
|
0 |
2 |
if ($ENV{'LDAP_DEBUG'}) |
|
227
|
0 |
0 |
unless my $attr = shift() |
|
246
|
0 |
0 |
if ($msg->code) |
|
299
|
4 |
0 |
if ($self->ldap_entry) |
|
315
|
0 |
4 |
wantarray ? : |
|
330
|
0 |
1 |
unless my $group_class = $self->group_class |
|
331
|
0 |
1 |
unless my $ldap = $self->ldap |
|
333
|
0 |
1 |
unless (@DNs) |
|
339
|
1 |
1 |
unless my $dn = shift @DNs |
|
393
|
24 |
1 |
if (not defined $self->ldap_entry and grep {$_ eq $attribute;} @{$self->attributes;}) |
|
397
|
0 |
24 |
if (scalar @_) |
|
402
|
0 |
24 |
exists $$self{'_not_yet_set'}{$attribute} ? : |
|
408
|
0 |
1 |
if (@_) |
|
416
|
0 |
0 |
unless (exists $$self{'_was_set'}{$attribute}{'old'}) |
|
417
|
0 |
0 |
@old > 1 ? : |
|
427
|
0 |
24 |
if ($str =~ /^"\000.+"\000$/) |
|
435
|
0 |
24 |
unless my $pass = shift() |
|
438
|
0 |
24 |
if (_is_encoded($pass)) |
|
450
|
0 |
0 |
unless my $pass = shift() |
|
451
|
0 |
0 |
unless (_is_encoded($pass)) |
|
477
|
0 |
24 |
unless my $username = delete $opts{'sAMAccountName'} || $self->sAMAccountName |
|
511
|
21 |
3 |
if $gid |
|
516
|
24 |
24 |
if $name eq 'cn' |
|
519
|
0 |
24 |
if (not exists $attr{$name}) { } |
|
539
|
24 |
0 |
if (exists $$self{'groups'}) |
|
547
|
0 |
24 |
unless ($group->read) |
|
555
|
0 |
24 |
if $group->has_user($self) |
|
599
|
24 |
3 |
if ($group) |
|
600
|
23 |
1 |
if (ref $group and $group->isa('Net::LDAP::Class::Group')) { } |
|
|
0 |
1 |
elsif ($self->primaryGroupID == $PRIMARY_GROUP_NOT_USED) { } |
|
608
|
0 |
1 |
unless ($group_obj) |
|
616
|
0 |
0 |
unless ($self->displayName or $self->cn or $self->sn or $self->givenName) |
|
628
|
24 |
3 |
unless defined $givenName |
|
630
|
24 |
3 |
unless defined $sn |
|
632
|
0 |
27 |
unless defined $cn |
|
635
|
21 |
6 |
if ($cn ne $un and not $cn =~ m[/$un$]) |
|
640
|
24 |
3 |
unless defined $email |
|
657
|
0 |
3 |
unless ($username) |
|
684
|
1 |
1 |
if $attr eq 'cn' |
|
689
|
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) { } |
|
709
|
2 |
1 |
if (defined $group and $group ne $PRIMARY_GROUP_NOT_USED and not exists $replace{'primaryGroupID'} and $self->group->gid != $self->gid) |
|
726
|
2 |
1 |
if (exists $$self{'groups'}) |
|
747
|
1 |
1 |
unless (exists $existing{$cn}) |
|
750
|
0 |
1 |
unless ($group->ldap_entry) |
|
760
|
0 |
0 |
if "$u" eq "$self" |
|
775
|
2 |
1 |
unless (exists $new{$cn}) |
|
781
|
0 |
2 |
unless "$u" eq "$self" |
|
797
|
3 |
0 |
if (%replace) |
|
812
|
0 |
3 |
unless (@actions) |
|
817
|
0 |
3 |
if $self->debug |
|
840
|
0 |
0 |
unless ($username) |
|
862
|
0 |
0 |
unless defined $adts |
|
873
|
0 |
0 |
unless defined $epoch |