| line |
true |
false |
branch |
|
215
|
0 |
0 |
unless $args{'PARENT'} |
|
216
|
0 |
0 |
unless $ret = $new->_parent($args{'PARENT'}) |
|
218
|
0 |
0 |
if ($args{'KEYS'}) |
|
219
|
0 |
0 |
if (ref $args{'KEYS'}[0] and UNIVERSAL::isa($args{'KEYS'}[0], 'ARRAY')) { } |
|
229
|
0 |
0 |
unless $ret = Unix::Conf::Bind8::Conf::_add_trustedkeys($new) |
|
231
|
0 |
0 |
unless $args{'WHERE'} |
|
232
|
0 |
0 |
unless $ret = Unix::Conf::Bind8::Conf::_insert_in_list($new, $args{'WHERE'}, $args{'WARG'}) |
|
264
|
0 |
0 |
if (@_ == 5) { } |
|
|
0 |
0 |
elsif (@_ == 2) { } |
|
267
|
0 |
0 |
unless __valid_protocol($$args[2]) |
|
269
|
0 |
0 |
unless __valid_algorithm($$args[3]) |
|
271
|
0 |
0 |
if $$args[4] =~ /^[^"]/ |
|
279
|
0 |
0 |
unless __valid_algorithm $algorithm |
|
282
|
0 |
0 |
unless $$self{'keys'}{$domain} or keys %{$$self{'keys'}{$domain};} |
|
288
|
0 |
0 |
unless $$self{'keys'}{$domain}{$algorithm} or keys %{$$self{'keys'}{$domain};} |
|
315
|
0 |
0 |
unless @_ == 5 |
|
319
|
0 |
0 |
unless __valid_protocol($$args[2]) |
|
321
|
0 |
0 |
unless __valid_algorithm($$args[3]) |
|
324
|
0 |
0 |
if $$self{'keys'}{$$args[0]}{$$args[3]} |
|
329
|
0 |
0 |
if $$args[4] =~ /^[^"]/ |
|
354
|
0 |
0 |
unless $$self{'keys'}{$domain} |
|
357
|
0 |
0 |
if (defined $algorithm) |
|
358
|
0 |
0 |
unless __valid_protocol $algorithm |
|
361
|
0 |
0 |
unless $$self{'keys'}{$domain}{$algorithm} |
|
367
|
0 |
0 |
if keys %{$$self{'keys'}{$domain};} |
|
370
|
0 |
0 |
unless keys %{$$self{'keys'};} |
|
395
|
0 |
0 |
unless ($itr) |
|
403
|
0 |
0 |
if (wantarray) |
|
409
|
0 |
0 |
if $itr and not $itr %= scalar @keys |
|
427
|
0 |
0 |
wantarray ? : |
|
446
|
0 |
0 |
unless defined $domain |
|
448
|
0 |
0 |
wantarray ? : |
|
460
|
0 |
0 |
unless $rec = $self->key($domain, $algo) |
|
471
|
0 |
0 |
if $_[0] >= 0 and $_[0] <= 4 or $_[0] == 255 |
|
477
|
0 |
0 |
if $_[0] >= 0 and $_[0] <= 4 |