Branch Coverage

blib/lib/Mail/SpamAssassin/Plugin/WLBLEval.pm
Criterion Covered Total %
branch 26 148 17.5


line true false branch
68 0 42 if ($self->_check_whitelist($self->{'main'}{'conf'}{'blacklist_from'}, $_))
77 0 57 if ($self->_check_whitelist($self->{'main'}{'conf'}{'blacklist_to'}, $_))
86 0 57 if ($self->_check_whitelist($self->{'main'}{'conf'}{'whitelist_to'}, $_))
95 0 0 if ($self->_check_whitelist($self->{'main'}{'conf'}{'more_spam_to'}, $_))
104 0 0 if ($self->_check_whitelist($self->{'main'}{'conf'}{'all_spam_to'}, $_))
113 0 14 unless (defined $list_ref)
119 0 22 if ($self->_check_whitelist($list_ref, $addr))
130 0 0 unless (defined $list_ref)
136 0 0 if $replyto eq ""
138 0 0 if ($self->_check_whitelist($list_ref, $replyto))
150 0 28 unless defined $params->{'permsgstatus'}
151 0 28 unless defined $params->{'type'}
152 0 28 unless defined $params->{'list'}
154 14 14 if (lc $params->{'type'} eq 'to') { }
14 0 elsif (lc $params->{'type'} eq 'from') { }
167 0 14 unless (defined $list_ref)
173 0 24 if ($self->_check_whitelist($list_ref, $addr))
185 81 0 unless exists $pms->{'from_in_whitelist'}
191 0 0 unless exists $pms->{'from_in_whitelist'}
192 0 0 unless exists $pms->{'from_in_default_whitelist'}
198 81 0 unless exists $pms->{'from_in_default_whitelist'}
204 0 0 unless exists $pms->{'from_in_default_whitelist'}
205 0 0 unless exists $pms->{'from_in_whitelist'}
215 0 42 if ($self->_check_whitelist($self->{'main'}{'conf'}{'whitelist_from'}, $_))
220 0 42 if ($wh == 1) { }
0 42 elsif ($wh == -1) { }
240 0 42 if ($wh == 1) { }
0 42 elsif ($wh == -1) { }
260 0 0 if $sender eq ""
270 0 0 unless $addr =~ / \@ ( [^\@]+ \. [^\@]+ ) \z/x
274 0 0 if ($pms->{'num_relays_untrusted'} > 0) { }
0 0 elsif ($pms->{'num_relays_trusted'} > 0) { }
282 0 0 unless @relays
290 0 0 if not defined $relay_rdns or $relay_rdns eq ""
294 0 0 if ($adrd eq $rlyd)
299 0 0 if ($any_tried and not $match)
314 82 2 unless $pms->{'num_relays_untrusted'} + $pms->{'num_relays_trusted'} > 0
318 2 0 if ($pms->{'num_relays_untrusted'} > 0)
324 0 2 if ($pms->{'num_relays_trusted'} > 0 and not $pms->{'num_relays_untrusted'})
335 0 0 if ($addr =~ /$regexp/)
340 0 0 if ($domain =~ m(^ \[ (.*) \] ( / \d{1,3} )? \z)sx) { }
343 0 0 if defined $2
345 0 0 if (not defined $rly_ip or $rly_ip eq '') { }
0 0 elsif ($wl_ip =~ /^\d+\.\d+\.\d+\.\d+\z/s) { }
0 0 elsif ($wl_ip =~ /^[\d\.]+\z/s) { }
350 0 0 if ($wl_ip eq $rly_ip)
354 0 0 if ($rly_ip =~ /^\Q$wl_ip\E/)
358 0 0 if (not defined $rly_ip_obj) { }
363 0 0 if (not defined $wl_ip_obj) { }
0 0 elsif ($wl_ip_obj->contains($rly_ip_obj)) { }
379 0 0 if ($rdns =~ /(?:^|\.)\Q$domain\E$/i)
382 0 0 if ($match)
392 0 2 if ($found_forged)
395 0 0 if ($addr =~ /$fuzzy_addr/i)
409 0 244 if (defined $list->{$addr})
412 0 0 if ($addr =~ qr/$regexp/i)
436 0 0 if ($host_enlisted_ref)
438 0 0 if ($matched_host)
450 0 0 if ($pms->{'uri_host_enlisted'})
455 0 0 unless ($uri_lists_href and %$uri_lists_href)
462 0 0 if (would_log("dbg", "rules"))
465 0 0 $uri_lists_href->{$nm}{$_} ? :
473 0 0 if $uri =~ /^mailto:/i
475 0 0 if $seen{$host}
479 0 0 if ($host =~ /^\[(.*)\]\z/) { }
0 0 elsif ($host =~ /^\d+\.\d+\.\d+\.\d+\z/) { }
0 0 elsif ($host ne '') { }
486 0 0 if @query_keys > 10
488 0 0 unless $h =~ s/^([^.]*)\.(.*)\z/$2/s
497 0 0 if (defined $verdict)
498 0 0 $q eq $host ? :
499 0 0 unless $verdict
503 0 0 if (defined $verdict)
504 0 0 if $verdict