Branch Coverage

blib/lib/Mail/SpamAssassin/Plugin/DNSEval.pm
Criterion Covered Total %
branch 0 148 0.0


line true false branch
169 0 0 unless $ip
170 0 0 if exists $seen{$ip}
171 0 0 if $ip =~ /$IP_PRIVATE/o
184 0 0 unless (defined $pms->{'accreditor_tag'})
187 0 0 if ($pms->{'accreditor_tag'}{$accreditor})
210 0 0 if ($pms->get("EnvelopeFrom:addr") =~ /[\@.]a--([a-z0-9]{3,})\./i)
215 0 0 if (defined $accreditor_field)
219 0 0 if ($#terms >= 0)
234 0 0 if $self->{'main'}{'conf'}{'skip_rbl_checks'}
235 0 0 unless $pms->is_dns_available
237 0 0 if (not $rbl_server =~ /^(\d+)\.(\d+)\.(\d+)\.(\d+)$/ and index($rbl_server, ".") >= 0 and not $rbl_server =~ /\.$/)
253 0 0 !$_->{'internal'} ? :
264 0 0 unless defined $str and $str ne ""
274 0 0 unless scalar @ips + scalar(@originating) > 0
290 0 0 if ($set =~ /-(notfirsthop|lastexternal)$/) { }
0 0 elsif ($set =~ /-(first|un)trusted$/) { }
297 0 0 if ($1 eq 'lastexternal') { }
298 0 0 defined $ips[0] ? :
300 0 0 if scalar @ips > 1
311 0 0 if ($ip and not $trusted->contains_ip($ip))
316 0 0 if ($1 eq 'first') { }
317 0 0 defined $ips[0] ? :
326 0 0 if ($ip and not $trusted->contains_ip($ip))
338 0 0 if (scalar @ips > $checklast)
345 0 0 if (defined $tflags and not $tflags =~ /\bnice\b/)
350 0 0 unless (scalar @ips > 0)
360 0 0 if defined $revip
384 0 0 if $self->{'main'}{'conf'}{'skip_rbl_checks'}
385 0 0 unless $pms->is_dns_available
406 0 0 if $self->{'main'}{'conf'}{'skip_rbl_checks'}
407 0 0 unless $pms->is_dns_available
412 0 0 if (defined $test_headers) { }
420 0 0 if (defined $addr and $addr =~ /\@([^\@\s]+)/) { }
427 0 0 if ($host =~ /^$IP_ADDRESS$/) { }
428 0 0 if ($conf->{'tflags'}{$rule} || '') =~ /\bdomains_only\b/
431 0 0 if ($conf->{'tflags'}{$rule} || '') =~ /\bips_only\b/
432 0 0 unless is_fqdn_valid($host)
433 0 0 unless $pms->{'main'}{'registryboundaries'}->is_domain_valid($host)
472 0 0 if $self->{'main'}{'conf'}{'skip_rbl_checks'}
473 0 0 unless $pms->is_dns_available
476 0 0 unless defined $from
478 0 0 if ($from =~ / \@ ( [^\@\s]+ \. [^\@\s]+ )/x)
483 0 0 unless defined $domain
509 0 0 unless ($pkt)
520 0 0 unless defined $nshost
522 0 0 if (is_fqdn_valid($nshost))
523 0 0 if (defined $subtest) { }
550 0 0 if $self->{'main'}{'conf'}{'skip_rbl_checks'}
551 0 0 unless $pms->is_dns_available
557 0 0 if (defined $value and not $seen{$value}++)
563 0 0 if (defined $host and $host ne "")
565 0 0 if ($host =~ /^$IP_ADDRESS$/) { }
566 0 0 if ($pms->{'conf'}{'tflags'}{$rule} || '') =~ /\bdomains_only\b/
569 0 0 if ($pms->{'conf'}{'tflags'}{$rule} || '') =~ /\bips_only\b/
571 0 0 unless is_fqdn_valid($host)
572 0 0 unless $pms->{'main'}{'registryboundaries'}->is_domain_valid($host)
574 0 0 if (defined $subtest) { }
595 0 0 if $self->{'main'}{'conf'}{'skip_rbl_checks'}
596 0 0 unless $pms->is_dns_available
600 0 0 unless defined $_ and / \@ ( [^\@\s]+ )/x
606 0 0 if $address =~ /\./
608 0 0 unless scalar keys %hosts
610 0 0 if (not $rbl_server =~ /^(\d+)\.(\d+)\.(\d+)\.(\d+)$/ and index($rbl_server, ".") >= 0 and not $rbl_server =~ /\.$/)
617 0 0 if ($host =~ /^$IP_ADDRESS$/) { }
618 0 0 if ($pms->{'conf'}{'tflags'}{$rule} || '') =~ /\bdomains_only\b/
621 0 0 if ($pms->{'conf'}{'tflags'}{$rule} || '') =~ /\bips_only\b/
622 0 0 unless is_fqdn_valid($host)
623 0 0 unless $pms->{'main'}{'registryboundaries'}->is_domain_valid($host)
633 0 0 if $self->{'main'}{'conf'}{'skip_rbl_checks'}
634 0 0 unless $pms->is_dns_available
638 0 0 unless defined $from
641 0 0 if ($from =~ / \@ ( [^\@\s]+ \. [^\@\s]+ )/x)
646 0 0 unless defined $host
648 0 0 if ($host eq "compiling.spamassassin.taint.org")