| line |
true |
false |
branch |
|
319
|
0 |
0 |
if (not $cond) |
|
363
|
0 |
0 |
unless ($$self{'master_socket'}) |
|
367
|
0 |
0 |
unless ($$self{'master_select'}) |
|
395
|
0 |
0 |
unless $opaque |
|
404
|
0 |
0 |
unless $self->init_child($symbolic) |
|
420
|
0 |
0 |
if $$self{'is_child'} |
|
421
|
0 |
0 |
if $$self{'handler_pid'} |
|
427
|
0 |
0 |
unless ($$self{'handler_socket'}) |
|
433
|
0 |
0 |
unless ($$self{'handler_select'}) |
|
440
|
0 |
0 |
unless (defined $$self{'handler_pid'}) |
|
443
|
0 |
0 |
if ($$self{'handler_pid'}) { } |
|
467
|
0 |
0 |
exists $$self{'finished_children'}{$cid} ? : |
|
479
|
0 |
0 |
unless $$self{'handler_child_socket'}->send(pack('cN', 3, scalar keys %{$$self{'child_info'};}) . $finished_child_data) |
|
494
|
0 |
0 |
if ($queued) { } |
|
515
|
0 |
0 |
unless $r |
|
526
|
0 |
0 |
unless ($$self{'handler_child_socket'}) |
|
543
|
0 |
0 |
if ($r == 4) { } |
|
|
0 |
0 |
elsif ($r == 5 or $r == 6 or $r == 8 or $r == 7) { } |
|
|
0 |
0 |
elsif ($r != 2 and $r != 1) { } |
|
552
|
0 |
0 |
if ($r == 6) { } |
|
|
0 |
0 |
elsif ($r == 7 or $r == 8) { } |
|
570
|
0 |
0 |
if (scalar keys %{$$self{'finished_children'};}) { } |
|
|
0 |
0 |
elsif ($r == 7) { } |
|
576
|
0 |
0 |
if (keys %{$$self{'child_info'}{$cid}{'data'};} or keys %{$$self{'child_info'}{$cid}{'data_queue'};}) |
|
583
|
0 |
0 |
unless ($do_we_have_data) |
|
610
|
0 |
0 |
unless $$self{'handler_child_socket'}->send("\t") |
|
613
|
0 |
0 |
if ($r == 6) |
|
659
|
0 |
0 |
unless ($$self{'handler_pid'}) |
|
662
|
0 |
0 |
if ($keep_alive) { } |
|
663
|
0 |
0 |
if ($block == 0) { } |
|
|
0 |
0 |
elsif ($block == 2) { } |
|
|
0 |
0 |
elsif ($block == 1) { } |
|
675
|
0 |
0 |
unless $$self{'handler_socket_comm'}->send(pack('c', $msg)) |
|
684
|
0 |
0 |
unless ($keep_alive) |
|
722
|
0 |
0 |
if $$self{'is_child'} |
|
727
|
0 |
0 |
if (not defined $symbolic_name or length $symbolic_name == 0) |
|
735
|
0 |
0 |
unless ($$self{'child_socket'}) |
|
739
|
0 |
0 |
unless $$self{'child_socket'}->send(pack('cNN', 10, $$self{'shared_key'}, length $$self{'symbolic_name'}) . $$self{'symbolic_name'}) |
|
765
|
0 |
0 |
unless $$self{'is_child'} |
|
766
|
0 |
0 |
unless ($$self{'child_socket'}) |
|
786
|
0 |
0 |
unless $$self{'is_child'} |
|
787
|
0 |
0 |
unless ($$self{'child_socket'}) |
|
807
|
0 |
0 |
if ($$self{'is_child'} or not $$self{'child_info'}{$cid} or not $$self{'child_info'}{$cid}{'data'}) |
|
827
|
0 |
0 |
if $$self{'is_child'} |
|
830
|
0 |
0 |
unless defined $cid |
|
856
|
0 |
0 |
if ($$self{'is_child'} or not $$self{'child_info'}{$cid} or not $$self{'child_info'}{$cid}{'data_queue'} or not $$self{'child_info'}{$cid}{'data_queue'}{$name}) |
|
864
|
0 |
0 |
if (wantarray) { } |
|
884
|
0 |
0 |
if $$self{'is_child'} |
|
887
|
0 |
0 |
unless defined $cid |
|
889
|
0 |
0 |
if (wantarray) { } |
|
915
|
0 |
0 |
if ($$self{'is_handler_parent'} and $$self{'handler_pid'}) |
|
919
|
0 |
0 |
if (wantarray) { } |
|
920
|
0 |
0 |
if ($as_hash) { } |
|
948
|
0 |
0 |
if ($$self{'is_handler_parent'} and $$self{'handler_pid'}) |
|
955
|
0 |
0 |
unless (exists $$self{'finished_children'}) |
|
960
|
0 |
0 |
if (wantarray) { } |
|
961
|
0 |
0 |
if ($as_hash) { } |
|
993
|
0 |
0 |
if $$self{'is_child'} |
|
994
|
0 |
0 |
if $$self{'handler_pid'} |
|
1013
|
0 |
0 |
if (@children) { } |
|
1037
|
0 |
0 |
if (@children) { } |
|
1058
|
0 |
0 |
if $$self{'is_child'} |
|
1084
|
0 |
0 |
if $$self{'is_child'} |
|
1086
|
0 |
0 |
if ($$self{'is_handler_parent'}) { } |
|
1121
|
0 |
6 |
if ref $count |
|
1122
|
1 |
5 |
unless $count > 1 |
|
1130
|
3 |
2 |
if ($count < scalar @{$list;}) { } |
|
1133
|
2 |
1 |
if ($leftover) |
|
1141
|
4 |
11 |
if ($start >= scalar @{$list;}) { } |
|
1147
|
3 |
8 |
if ($leftover) |
|
1149
|
2 |
1 |
if ($leftover == 0) |
|
1168
|
0 |
0 |
unless (defined $data_flags) |
|
1178
|
0 |
0 |
$r ? : |
|
1192
|
0 |
0 |
if (defined $$self{'socket_to_cid'}{$s}) |
|
1195
|
0 |
0 |
if (not $$self{'handler_socket_comm'} or $s != $$self{'handler_socket_comm'}) |
|
1210
|
0 |
0 |
if ($start_ts > $$v{'ts'} + 30) |
|
1219
|
0 |
0 |
unless ($cond) |
|
1233
|
0 |
0 |
if (not defined $r or length $r == 0) |
|
1241
|
0 |
0 |
if (not defined $data or length $data != $more) |
|
1274
|
0 |
0 |
$block != 0 ? : |
|
1279
|
0 |
0 |
if ($$self{'handler_child_socket'}) |
|
1282
|
0 |
0 |
if ($ready[$i] == $$self{'handler_child_socket'}) |
|
1290
|
0 |
0 |
if ($$self{'master_socket'} and $s == $$self{'master_socket'}) { } |
|
1292
|
0 |
0 |
unless $new_sock |
|
1301
|
0 |
0 |
unless (defined $data) |
|
1302
|
0 |
0 |
if ($$self{'unauthenticated_clients'}{$s}) |
|
1314
|
0 |
0 |
if ($flags == 4 or $flags == 5 or $flags == 6 or $flags == 7 or $flags == 8 or $flags == 9) |
|
1324
|
0 |
0 |
if ($flags == 10) { } |
|
|
0 |
0 |
elsif ($flags == 2) { } |
|
|
0 |
0 |
elsif ($flags == 11) { } |
|
|
0 |
0 |
elsif ($flags == 3) { } |
|
1327
|
0 |
0 |
unless (defined $data) |
|
1328
|
0 |
0 |
if ($$self{'unauthenticated_clients'}{$s}) |
|
1338
|
0 |
0 |
unless &$VALIDATE($s, $name_len > 0) |
|
1339
|
0 |
0 |
unless &$VALIDATE($s, $proposed_key == $$self{'shared_key'}) |
|
1343
|
0 |
0 |
unless &$VALIDATE($s, defined $data) |
|
1355
|
0 |
0 |
unless defined $data |
|
1362
|
0 |
0 |
unless ($namelen and $datalen) |
|
1368
|
0 |
0 |
unless defined $data |
|
1375
|
0 |
0 |
unless ($$self{'handler_child_socket'}) |
|
1379
|
0 |
0 |
if ($data_flags & 16) { } |
|
1380
|
0 |
0 |
unless (exists $$self{'child_info'}{$cid}{'data_queue'}{$name}) |
|
1387
|
0 |
0 |
if ($block == 2) |
|
1391
|
0 |
0 |
unless defined $data |
|
1395
|
0 |
0 |
unless ($namelen and $datalen and $symboliclen) |
|
1401
|
0 |
0 |
unless defined $data |
|
1411
|
0 |
0 |
if ($data_flags & 16) { } |
|
1412
|
0 |
0 |
unless (exists $$self{'child_info'}{$cid}{'data_queue'}{$name}) |
|
1419
|
0 |
0 |
if ($block == 2) |
|
1423
|
0 |
0 |
unless defined $data |
|
1428
|
0 |
0 |
unless defined $data |
|
1434
|
0 |
0 |
unless defined $data |
|
1436
|
0 |
0 |
if ($is_finished) |
|
1440
|
0 |
0 |
unless (exists $$self{'child_info'}{$finished_cid}) |
|
1451
|
0 |
0 |
if (not exists $$self{'unauthenticated_clients'}) { } |
|
1463
|
0 |
0 |
if ($select->count == 0) |
|
1482
|
0 |
0 |
if $$self{'child_info'}{$cid}{'symbolic_name'} eq $name |
|
1493
|
0 |
0 |
unless $$self{'handler_socket_comm'}->send("\cD") |