| line |
true |
false |
branch |
|
52
|
2 |
5 |
unless &reftype($params) eq 'HASH' |
|
54
|
4 |
5 |
unless exists $params->{$p} |
|
57
|
0 |
1 |
unless $params->{'store'}->isa('Net::LDAP::SimpleServer::LDIFStore') |
|
59
|
0 |
1 |
unless $params->{'root_dn'} |
|
61
|
0 |
1 |
unless my $canon_dn = &canonical_dn($params->{'root_dn'}) |
|
115
|
0 |
0 |
if $self->{'allow_anon'} and not $request->{'name'} and exists $request->{'authentication'}{'simple'} |
|
119
|
0 |
0 |
unless exists $request->{'authentication'}{'simple'} |
|
125
|
0 |
0 |
$bind_dn ? : |
|
131
|
0 |
0 |
if $size == 0 |
|
134
|
0 |
0 |
if $size > 1 |
|
148
|
0 |
0 |
if ($bind_dn->isa('Net::LDAP::Entry')) { } |
|
|
0 |
0 |
elsif (uc $bind_dn eq uc $self->{'root_dn'}) { } |
|
154
|
0 |
0 |
if $entry_pw =~ /$regexp/ |
|
156
|
0 |
0 |
unless $entry_pw eq $bind_pw |
|
163
|
0 |
0 |
unless $bind_pw eq $self->{'root_pw'} |
|
183
|
0 |
0 |
unless grep {/person/;} $entry->get_value('objectclass') |
|
184
|
0 |
0 |
unless $entry->exists($pw_attr) |
|
190
|
0 |
0 |
if /$regexp/ |
|
203
|
0 |
0 |
if $clone->exists($pw_attr) |
|
211
|
0 |
0 |
if $self->{'user_passwords'} eq 'all' |
|
214
|
0 |
0 |
if $self->{'user_passwords'} eq 'none' |
|
217
|
0 |
0 |
if $self->{'user_passwords'} eq 'md5' |
|
224
|
0 |
0 |
if (defined $request->{'baseObject'}) { } |
|
229
|
0 |
0 |
unless defined $list |