line |
true |
false |
branch |
138
|
0 |
0 |
unless ($call) |
163
|
0 |
0 |
unless ($call) |
196
|
0 |
0 |
if ($call->is_empty) |
273
|
0 |
0 |
if (my $max = $self->{'max_sockets_in_group'}) |
274
|
0 |
0 |
if ($need_sockets > $max) |
281
|
0 |
0 |
if (my $max = $self->{'max_sockets'}) |
282
|
0 |
0 |
if ($self->{'socket_count'} + $need_sockets > $max) |
293
|
0 |
0 |
unless (@socks) |
298
|
0 |
0 |
if (not $port or $addr eq '0.0.0.0' or $addr eq '::') { } |
373
|
0 |
0 |
unless ($data) |
375
|
0 |
0 |
if ($cseq_data) |
377
|
0 |
0 |
if ($_ > $cseq) |
399
|
0 |
0 |
if ($side == 0) { } |
402
|
0 |
0 |
unless 'Net::SIP::NATHelper::SocketGroup'->new($nathelper, $idfrom, $addr, $media) |
408
|
0 |
0 |
unless 'Net::SIP::NATHelper::SocketGroup'->new($nathelper, $idto, $addr, $media) |
427
|
0 |
0 |
unless ($data) |
433
|
0 |
0 |
if (my $sess = $sessions->{$idto}) |
440
|
0 |
0 |
unless ($gfrom and $gto) |
479
|
0 |
0 |
if ($cseq) { } |
483
|
0 |
0 |
if (my $sess = $data && delete $data->{'sessions'}{$idto}) { } |
489
|
0 |
0 |
if ($data and not %{$data->{'sessions'};}) |
506
|
0 |
0 |
if (my $sess = delete $data->{'sessions'}{$to}) |
510
|
0 |
0 |
unless (%{$data->{'sessions'};}) |
517
|
0 |
0 |
if @del_cseq |
519
|
0 |
0 |
unless (@info) |
562
|
0 |
0 |
if ($lastmod < $expire_active) { } |
|
0 |
0 |
elsif (my $created = &max($active_pairs{"$idfrom\000$idto"} || 0, $active_pairs{"$idto\000$idfrom"} || 0)) { } |
571
|
0 |
0 |
if ($created > $sess->{'created'}) { } |
|
0 |
0 |
elsif ($created < $sess->{'created'}) { } |
601
|
0 |
0 |
if $data->{'socket_group_from'} |
603
|
0 |
0 |
if $used{$v} |
605
|
0 |
0 |
if (not $lastmod) { } |
|
0 |
0 |
elsif ($lastmod < $expire_active) { } |
607
|
0 |
0 |
if ($v->{'created'} < $expire_unused) |
618
|
0 |
0 |
if %expired_sg and delete $expired_sg{$data->{'socket_group_from'}} |
619
|
0 |
0 |
if (%expired_sg) |
621
|
0 |
0 |
if delete $expired_sg{$groups->{$id}} |
622
|
0 |
0 |
unless %expired_sg |
629
|
0 |
0 |
unless $need_next_pass |
648
|
0 |
0 |
unless (%{$data->{'socket_groups_to'};} or $data->{'socket_group_from'}) |
653
|
0 |
0 |
unless (%$by_cseq) |
658
|
0 |
0 |
%$by_from ? : |
713
|
0 |
0 |
if $sf |
758
|
0 |
0 |
if (@{$sfrom->get_socks;} != @{$sto->get_socks;}) |
836
|
0 |
0 |
if $callbacks |
871
|
0 |
0 |
if $dstaddr |
885
|
0 |
0 |
if $recvaddr |
905
|
0 |
0 |
if (not $$bytes) { } |
|
0 |
0 |
elsif ($$rfrom and $peer ne $$rfrom) { } |
906
|
0 |
0 |
if ($peer eq $$rfrom) { } |
909
|
0 |
0 |
if connect $read_socket, $peer |
924
|
0 |
0 |
if ($$rto) { } |
925
|
0 |
0 |
unless (send $write_socket, $buf, 0, $$rto) |
934
|
0 |
0 |
unless (send $write_socket, $buf, 0) |
982
|
0 |
0 |
unless my $new_media = $nathelper->get_rtp_sockets($new_addr, $media) |