| line |
true |
false |
branch |
|
38
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
42
|
0 |
33 |
if (lc $proto eq 'tcp' or lc $proto eq 'inet') { }
|
|
|
33 |
0 |
elsif (lc $proto eq 'unix' or lc $proto eq 'local') { }
|
|
43
|
0 |
0 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
45
|
0 |
0 |
unless $sock = "IO::Socket::INET"->new("PeerAddr", $addr, "PeerPort", $port, "Proto", "tcp", "Type", 1, "Timeout", 10)
|
|
53
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
55
|
0 |
33 |
unless $sock = "IO::Socket::UNIX"->new("Peer", $addr, "Type", 1, "Timeout", $port)
|
|
62
|
0 |
33 |
if (not defined $sock) { }
|
|
78
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
86
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
92
|
99 |
99 |
if (defined $options{$action} and $options{$action} == 0) { }
|
|
108
|
0 |
231 |
if (defined $options{$content} and $options{$content} == 1) { }
|
|
123
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
131
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
139
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
143
|
0 |
33 |
if ($command ne "O")
|
|
147
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
148
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
149
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
152
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
158
|
0 |
0 |
if ($ret_actions & 2 ** $count)
|
|
166
|
0 |
0 |
if ($ret_protocol & 2 ** $count)
|
|
183
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
196
|
0 |
31 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
199
|
0 |
31 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
201
|
0 |
31 |
if (length $body > 65535) { }
|
|
210
|
0 |
31 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
225
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
228
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
249
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
251
|
0 |
33 |
if (lc $family eq 'unix') { }
|
|
|
33 |
0 |
elsif (lc $family eq 'tcp4') { }
|
|
|
0 |
0 |
elsif (lc $family eq 'tcp6') { }
|
|
258
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
272
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
277
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
292
|
0 |
399 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
311
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
328
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
344
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
362
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
379
|
0 |
890 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
385
|
0 |
890 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
387
|
0 |
0 |
if (length $data < 100) { }
|
|
393
|
0 |
890 |
unless (defined $self->{'socket'})
|
|
396
|
758 |
132 |
if length $data > 0
|
|
410
|
0 |
743 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
415
|
0 |
743 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
419
|
116 |
627 |
if ($length > 0)
|
|
433
|
0 |
1022 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
447
|
0 |
816 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
462
|
0 |
710 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
465
|
0 |
0 |
if (defined $data and not $command =~ /[hm]/)
|
|
472
|
0 |
710 |
if ($command eq '+') { }
|
|
|
0 |
710 |
elsif ($command eq '-') { }
|
|
|
0 |
710 |
elsif ($command eq 'a') { }
|
|
|
0 |
710 |
elsif ($command eq 'b') { }
|
|
|
627 |
83 |
elsif ($command eq 'c') { }
|
|
|
0 |
83 |
elsif ($command eq 'd') { }
|
|
|
9 |
74 |
elsif ($command eq 'h') { }
|
|
|
60 |
14 |
elsif ($command eq 'i') { }
|
|
|
13 |
1 |
elsif ($command eq 'm') { }
|
|
|
0 |
1 |
elsif ($command eq 'p') { }
|
|
|
0 |
1 |
elsif ($command eq 'r') { }
|
|
|
0 |
1 |
elsif ($command eq 't') { }
|
|
|
1 |
0 |
elsif ($command eq 'y') { }
|
|
565
|
0 |
628 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
568
|
0 |
710 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
574
|
0 |
710 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
575
|
627 |
83 |
if ($reply_ref->{'command'} eq 'c') { }
|
|
|
0 |
83 |
elsif ($reply_ref->{'command'} eq 'a') { }
|
|
|
0 |
83 |
elsif ($reply_ref->{'command'} eq 'r') { }
|
|
|
0 |
83 |
elsif ($reply_ref->{'command'} eq 't') { }
|
|
|
1 |
82 |
elsif ($reply_ref->{'command'} eq 'y') { }
|
|
|
0 |
82 |
elsif ($reply_ref->{'command'} eq 'd') { }
|
|
592
|
0 |
196 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
596
|
0 |
196 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
602
|
33 |
163 |
if (defined $macros{'j'})
|
|
603
|
0 |
196 |
if (defined $macros{'_'})
|
|
604
|
0 |
196 |
if (defined $macros{'{daemon_name}'})
|
|
605
|
0 |
196 |
if (defined $macros{'{if_name}'})
|
|
606
|
0 |
196 |
if (defined $macros{'{if_addr}'})
|
|
608
|
33 |
163 |
if (@data)
|
|
609
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
614
|
0 |
196 |
if (defined $macros{'{tls_version}'})
|
|
615
|
0 |
196 |
if (defined $macros{'{cipher}'})
|
|
616
|
0 |
196 |
if (defined $macros{'{cipher_bits}'})
|
|
617
|
0 |
196 |
if (defined $macros{'{cert_subject}'})
|
|
618
|
0 |
196 |
if (defined $macros{'{cert_issuer}'})
|
|
620
|
0 |
196 |
if (@data)
|
|
621
|
0 |
0 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
628
|
97 |
99 |
if (defined $macros{'i'})
|
|
629
|
0 |
196 |
if (defined $macros{'{auth_type}'})
|
|
630
|
0 |
196 |
if (defined $macros{'{auth_authen}'})
|
|
631
|
0 |
196 |
if (defined $macros{'{auth_ssf}'})
|
|
632
|
0 |
196 |
if (defined $macros{'{auth_author}'})
|
|
633
|
33 |
163 |
if (defined $macros{'{mail_mailer}'})
|
|
634
|
33 |
163 |
if (defined $macros{'{mail_host}'})
|
|
635
|
33 |
163 |
if (defined $macros{'{mail_addr}'})
|
|
637
|
130 |
66 |
if (@data)
|
|
638
|
0 |
130 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
644
|
33 |
163 |
if (defined $macros{'{rcpt_mailer}'})
|
|
645
|
33 |
163 |
if (defined $macros{'{rcpt_host}'})
|
|
646
|
33 |
163 |
if (defined $macros{'{rcpt_addr}'})
|
|
648
|
33 |
163 |
if (@data)
|
|
649
|
0 |
33 |
if ($Mail::Milter::Authentication::Net::Milter::DEBUG == 1)
|
|
669
|
2538 |
0 |
if (defined $len) { }
|
|
690
|
1602 |
0 |
if (defined $len) { }
|
|
705
|
33 |
0 |
if (defined $self->{'socket'})
|