| line |
true |
false |
branch |
|
68
|
5 |
17 |
if (defined $self->{'KeyFile'}) |
|
73
|
0 |
22 |
unless ($self->{'Algorithm'}) |
|
78
|
17 |
5 |
unless ($self->{'Domain'}) |
|
83
|
5 |
17 |
unless ($self->{'SrvId'}) |
|
88
|
0 |
22 |
unless ($self->{'Selector'}) |
|
95
|
0 |
22 |
unless $self->{'Algorithm'} eq "rsa-sha256" |
|
97
|
0 |
22 |
unless $self->{'Chain'} and $self->{'Chain'} =~ /^(pass|fail|none|ar)$/ |
|
112
|
29 |
168 |
if ($header =~ /^Authentication-Results:/) { } |
|
119
|
1 |
28 |
unless (eval {
do {
$parsed = "Mail::AuthenticationResults::Parser"->new->parse($header);
1
}
}) |
|
127
|
3 |
25 |
unless lc $ardom eq $self->{'SrvId'} |
|
131
|
23 |
2 |
unless $arval =~ /^\015\012/ |
|
132
|
5 |
20 |
if ($ar) { } |
|
141
|
18 |
7 |
if $self->{'Chain'} eq "ar" and $arval =~ /\barc=(none|pass|fail)/ |
|
147
|
19 |
149 |
if ($header =~ /^ARC-/) |
|
148
|
0 |
19 |
unless ($ar) |
|
154
|
1 |
18 |
if ($self->{'Chain'} eq "ar") |
|
163
|
6 |
161 |
if ($header =~ /^ARC-Seal:/) { } |
|
|
6 |
155 |
elsif ($header =~ /^ARC-Message-Signature:/) { } |
|
|
6 |
149 |
elsif ($header =~ /^ARC-Authentication-Results:\s*i=(\d+)/) { } |
|
166
|
0 |
6 |
if ($as[$i]) |
|
176
|
0 |
6 |
if ($ams[$i]) |
|
186
|
0 |
6 |
if ($aar[$i]) |
|
198
|
2 |
19 |
unless ($ar) |
|
204
|
1 |
18 |
if $self->{'Chain'} eq "ar" |
|
206
|
0 |
19 |
if ($#ams > $#as) |
|
211
|
0 |
19 |
if ($#aar > $#as) |
|
218
|
0 |
6 |
unless ($as[$i]) |
|
223
|
0 |
6 |
unless ($ams[$i]) |
|
250
|
16 |
3 |
$self->{'Timestamp'} ? : |
|
|
0 |
19 |
$self->{'Expiration'} ? : |
|
267
|
3 |
19 |
if ($self->{'result'} eq "skipped") |
|
284
|
0 |
19 |
if (defined $key and not ref $key) |
|
288
|
0 |
19 |
unless $key |
|
316
|
16 |
3 |
$self->{'Timestamp'} ? : |
|
|
0 |
19 |
$self->{'Expiration'} ? : |
|
344
|
0 |
19 |
if (defined $key and not ref $key) |
|
348
|
0 |
19 |
unless $key |
|
369
|
0 |
38 |
unless my $algorithm_class = $signature->get_algorithm_class($signature->algorithm) |
|
383
|
0 |
0 |
if (@_ == 1) |
|
392
|
0 |
0 |
if (@_ == 1) |
|
420
|
0 |
0 |
if $header eq lc $header |
|
421
|
0 |
0 |
if (exists $self->{'ExtendedHeaders'}{lc $header}) { } |
|
426
|
0 |
0 |
if ($first eq '+' or $second eq '+') { } |
|
|
0 |
0 |
elsif ($first eq '*' or $second eq '*') { } |
|
445
|
0 |
0 |
unless ($self->{'NoDefaultHeaders'}) |
|
447
|
0 |
0 |
unless (exists $self->{'ExtendedHeaders'}{lc $default}) |
|
456
|
0 |
0 |
if (not exists $$header_counts{lc $header}) { } |
|
468
|
0 |
0 |
if ($want_count eq '+') { } |
|
|
0 |
0 |
elsif ($want_count eq '*') { } |
|
475
|
0 |
0 |
if ($want_count > $have_count) { } |
|
497
|
0 |
38 |
if @_ |
|
499
|
0 |
38 |
if (exists $self->{'ExtendedHeaders'}) |
|
508
|
6 |
32 |
unless ($self->{'NoDefaultHeaders'}) |
|
511
|
32 |
6 |
if ($self->{'Headers'}) |
|
535
|
0 |
0 |
if (@_) |
|
545
|
0 |
0 |
if (@_) |
|
556
|
0 |
0 |
if (@_ == 1) |
|
565
|
0 |
0 |
if @_ |
|
572
|
1 |
16 |
unless $self->{'_AS'} |