| line |
!l |
l&&!r |
l&&r |
condition |
|
69
|
104 |
1 |
38 |
$proto && $proto eq 'tls' |
|
79
|
3 |
1 |
0 |
$port and $port_a |
|
|
4 |
0 |
0 |
$port and $port_a and $port != $port_a |
|
93
|
143 |
0 |
0 |
$dst and not ref $dst |
|
106
|
3 |
140 |
0 |
$sock and $socketpool |
|
107
|
3 |
0 |
0 |
$socketpool && $socketpool->master |
|
168
|
0 |
140 |
0 |
not $dst and my $saddr = getpeername $sock |
|
339
|
0 |
0 |
7 |
($rr) = $packet->get_header('record-route') and sip_uri_eq($rr, $self->{'contact'}) |
|
395
|
119 |
0 |
78 |
!$isrq && $packet->code |
|
396
|
95 |
40 |
62 |
$method eq 'INVITE' and $isrq || $code =~ /^2/ |
|
|
75 |
60 |
0 |
not $isrq and $code == 405 || $method eq 'OPTIONS' && $code =~ /^2/ |
|
403
|
135 |
0 |
62 |
$need_contact and not my(@a) = $packet->get_header('contact') |
|
416
|
134 |
0 |
63 |
$need_allow and not my(@a) = $packet->get_header('allow') |
|
420
|
134 |
0 |
63 |
$need_supported and not my(@a) = $packet->get_header('supported') |
|
426
|
0 |
197 |
0 |
exists $dst->{'proto'} and $dst->{'proto'} ne $self->{'proto'} |
|
567
|
0 |
114 |
85 |
$spec{'proto'} and $spec{'proto'} ne $self->{'proto'} |
|
569
|
0 |
0 |
114 |
$spec{'family'} and $self->{'src'} |
|
|
0 |
114 |
0 |
$spec{'family'} and $self->{'src'} and $self->{'src'}{'family'} != $spec{'family'} |
|
589
|
0 |
0 |
2 |
$args->{'addr'} and $args->{'addr'} ne $self->{'src'}{'addr'} |
|
|
0 |
0 |
2 |
$args->{'addr'} and $args->{'addr'} ne $self->{'src'}{'addr'} and $args->{'addr'} ne $self->{'src'}{'host'} |
|
590
|
0 |
0 |
0 |
$args->{'port'} and $args->{'port'} != $self->{'src'}{'port'} |
|
591
|
0 |
0 |
0 |
$args->{'proto'} and $args->{'proto'} ne $self->{'proto'} |
|
592
|
0 |
0 |
0 |
$args->{'sub'} and not invoke_callback($args->{'sub'}, $self) |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
85
|
0 |
4 |
0 |
$host || $addr |
|
107
|
140 |
0 |
3 |
$sock ||= $socketpool && $socketpool->master |
|
124
|
0 |
0 |
0 |
$host || $srcip |
|
135
|
0 |
0 |
3 |
$proto eq 'tcp' or $proto eq 'tls' |
|
154
|
0 |
3 |
0 |
$src->{'port'} ||= $sock->sockport |
|
159
|
39 |
101 |
0 |
$proto ||= $sock->socktype == 2 ? 'udp' : 'tcp' |
|
175
|
0 |
143 |
0 |
$socketpool ||= 'Net::SIP::SocketPool'->new($proto, $sock, $dst, $sockpeer, $tls) |
|
183
|
0 |
143 |
0 |
delete $args{'contact'} || "${sip_proto}:$leg_addr" |
|
187
|
0 |
143 |
0 |
delete $args{'branch'} || md5_hex(@{$$self{'src'};}{'addr', 'port'}, $proto) |
|
241
|
6 |
0 |
1 |
not $maxf or $maxf > 70 |
|
396
|
44 |
18 |
40 |
$isrq || $code =~ /^2/ |
|
|
1 |
0 |
59 |
$code == 405 || $method eq 'OPTIONS' && $code =~ /^2/ |
|
427
|
197 |
0 |
0 |
$dst->{'port'} ||= $self->{'proto'} eq 'tls' ? 5061 : 5060 |
|
535
|
8 |
0 |
0 |
$param && $param->{'branch'} || $via |