| blib/lib/Net/SIP/Util.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 54 | 113 | 47.7 |
| line | l | !l | condition |
|---|---|---|---|
| 594 | 0 | 0 | $host =~ /:/ && 10 |
| 644 | 378 | 0 | $fam != 2 and !1 |
| 719 | 0 | 0 | not $family and !1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 39 | 0 | 312 | 120 | not defined $args{'GetAddrInfoFlags'} and $args{'Domain'} || $args{'Family'} |
| 130 | 0 | 0 | 29 | $bracket and not $quoted |
| 253 | 0 | 87 | 46 | $param && %$param |
| 274 | 0 | 169 | 9 | $proto && $proto eq 'sips' |
| 318 | 0 | 0 | 7 | lc $d1 eq lc $d2 && $port1 == $port2 && (defined $u1 ? defined $u2 && $u1 eq $u2 : !defined($u2)) && $p1 eq $p2 |
| 579 | 89 | 0 | 143 | exists $hash->{'use_host'} and $hash->{'use_host'} |
| 0 | 0 | 143 | exists $hash->{'use_host'} and $hash->{'use_host'} and $hash->{'host'} | |
| 0 | 0 | 143 | exists $hash->{'use_host'} and $hash->{'use_host'} and $hash->{'host'} and $fam | |
| 0 | 143 | 0 | exists $hash->{'use_host'} and $hash->{'use_host'} and $hash->{'host'} and $fam and $hash->{'host'} ne $hash->{'addr'} | |
| 586 | 88 | 138 | 6 | exists $hash->{'default_port'} and $port == $hash->{'default_port'} |
| 596 | 0 | 462 | 0 | $fam and $fam != 2 |
| line | l | !l | condition |
|---|---|---|---|
| 111 | 8 | 761 | $delimiter{$key} || ';' |
| 143 | 383 | 386 | pos $v || 0 |
| 184 | 0 | 154 | $delimiter{$key} || ';' |
| 226 | 158 | 156 | $proto ||= 'sip' |
| 247 | 133 | 0 | $proto || 'sip' |
| 341 | 2 | 3 | $port || 5060 |
| 371 | 0 | 5 | $proto ||= 'udp' |
| 414 | 15 | 37 | $range ||= 2 |
| 422 | 0 | 52 | $tries ||= 1000 |
| 436 | 104 | 0 | INETSOCK('Family', $fam, 'Proto', 'udp', 'LocalAddr', $laddr, 'LocalPort', $port + $i) || (last) |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 39 | 0 | 120 | 312 | $args{'Domain'} || $args{'Family'} |
| 127 | 0 | 0 | 29 | $bracket or $quoted |
| 133 | 0 | 37 | 388 | $quoted || $bracket |
| 314 | 2 | 0 | 0 | $1 || $2 |
| 316 | 2 | 0 | 0 | $1 || $2 |
| 389 | 5 | 0 | 0 | $p || (ip_sockaddr2parts(getsockname $sock))[1] |
| 417 | 0 | 52 | 0 | $max ||= $RTP_MAX_PORT |
| 419 | 0 | 0 | 0 | $max ||= $min + 10000 |
| 465 | 82 | 0 | 91 | UNIVERSAL::isa($cb, 'SCALAR') or UNIVERSAL::isa($cb, 'REF') |
| 578 | 232 | 0 | 0 | $hash->{'addr'} || $hash->{'host'} |
| 593 | 457 | 5 | 1 | $port or $ipv6_brackets |
| 594 | 462 | 0 | 0 | $fam ||= $host =~ /:/ && 10 |
| 620 | 130 | 94 | 0 | $fam ||= $addr =~ /:/ ? 10 : 2 |
| 643 | 0 | 378 | 0 | $fam ||= length $sockaddr >= 24 ? 10 : 2 |
| 667 | 0 | 0 | 0 | $fam ||= length $sockaddr >= 24 ? 10 : 2 |
| 686 | 68 | 0 | 0 | $family ||= $ip =~ /:/ ? 10 : 2 |
| 706 | 0 | 48 | 0 | $family ||= $ip =~ /:/ ? 10 : 2 |
| 722 | 0 | 0 | 0 | $err or not @result |