line |
true |
false |
branch |
87
|
0 |
0 |
if ($len > scalar @$arr) |
103
|
3 |
7 |
if ($l < 8) { } |
135
|
0 |
0 |
if (scalar @$arr == 0) |
139
|
0 |
0 |
if (defined $$val_type and ($len & 15) != $$val_type) |
144
|
0 |
0 |
if ($len & 8) |
146
|
0 |
0 |
unless (binrpc_read_int @$arr, $len & 7, $len) |
150
|
0 |
0 |
if ($len > scalar @$arr) |
153
|
0 |
0 |
if ($nesting eq 'S') { } |
154
|
0 |
0 |
if ($$val_type == $data_type{'STRUCT'}) { } |
|
0 |
0 |
elsif ($$val_type == $data_type{'AVP'}) { } |
155
|
0 |
0 |
if ($end_tag) { } |
168
|
0 |
0 |
if (scalar @$arr == 0) |
173
|
0 |
0 |
if ($$val_type == $data_type{'AVP'} or $$val_type == $data_type{'ARRAY'}) |
177
|
0 |
0 |
unless (binrpc_read_record @$arr, '', $$val_type, $$val, $dummy) |
187
|
0 |
0 |
if ($$val_type == $data_type{'INT'}) { } |
|
0 |
0 |
elsif ($$val_type == $data_type{'DOUBLE'}) { } |
|
0 |
0 |
elsif ($$val_type == $data_type{'STR'}) { } |
|
0 |
0 |
elsif ($$val_type == $data_type{'BYTES'}) { } |
|
0 |
0 |
elsif ($$val_type == $data_type{'STRUCT'}) { } |
|
0 |
0 |
elsif ($$val_type == $data_type{'ARRAY'}) { } |
188
|
0 |
0 |
unless (binrpc_read_int @$arr, $len, $$val) |
193
|
0 |
0 |
unless (binrpc_read_int @$arr, $len, $$val) |
212
|
0 |
0 |
if ($end_tag) |
219
|
0 |
0 |
unless (binrpc_read_record @$arr, 'S', $val_type2, $val2, $name2) |
222
|
0 |
0 |
if (defined $val_type2) |
229
|
0 |
0 |
if ($end_tag) |
230
|
0 |
0 |
if ($nesting eq 'A') { } |
241
|
0 |
0 |
unless (binrpc_read_record @$arr, 'A', $val_type2, $val2, $name2) |
244
|
0 |
0 |
if (defined $val_type2) |
279
|
2 |
8 |
if ($flds[0] eq 'unix') { } |
|
7 |
1 |
elsif ($flds[0] eq 'udp' or $flds[0] eq 'tcp') { } |
281
|
1 |
1 |
if $flds[1] |
287
|
3 |
4 |
if $flds[1] |
288
|
1 |
6 |
if $flds[2] |
301
|
0 |
39 |
if ($$self{'verbose'}) |
309
|
0 |
16 |
if ($$self{'verbose'}) |
317
|
0 |
0 |
if ($b >= 32 and $b < 128) { } |
324
|
0 |
0 |
if (($i & 15) == 0) |
331
|
0 |
0 |
if ($i & 15) |
353
|
0 |
4 |
if (defined $$self{'socket'}) |
357
|
1 |
3 |
if ($$self{'sock_domain'} == 1) { } |
|
3 |
0 |
elsif ($$self{'sock_domain'} == 2) { } |
364
|
1 |
0 |
unless ($sock) |
377
|
0 |
3 |
unless ($iaddr) |
387
|
1 |
2 |
unless ($sock) |
406
|
3 |
3 |
unless (defined $$self{'socket'}) |
410
|
2 |
1 |
unless ($sock->close) |
428
|
10 |
2 |
unless (defined @$params) |
433
|
0 |
12 |
unless ($cmd) |
437
|
4 |
8 |
unless (defined $$self{'socket'}) |
448
|
0 |
2 |
if ($item =~ /^\d+$/) { } |
|
0 |
2 |
elsif ($item =~ /^\d+\.\d+$/) { } |
454
|
1 |
1 |
if ($item =~ /^s:/) |
465
|
0 |
8 |
if ($body_len > 4294967295) |
471
|
0 |
8 |
if ($len_len == 0) |
474
|
0 |
8 |
if ($c_len == 0) |
503
|
4 |
4 |
unless ($sock->write($buf, length $buf)) |
509
|
4 |
0 |
unless ($sock->read($buf, 2)) |
517
|
0 |
0 |
if ($arr[0] >> 4 != $magic) |
521
|
0 |
0 |
if (($arr[0] & 15) != $version) |
529
|
0 |
0 |
unless ($sock->read($buf, $len_len + $c_len)) |
541
|
0 |
0 |
if ($cookie != $cookie2) |
546
|
0 |
0 |
unless ($sock->read($buf, $body_len)) |
560
|
0 |
0 |
unless (binrpc_read_record @arr, '', $val_type, $val, $dummy) |
567
|
0 |
0 |
if ($type == $message_type{'REPL'}) { } |
|
0 |
0 |
elsif ($type == $message_type{'FAULT'}) { } |
582
|
0 |
0 |
unless defined $indent |
584
|
0 |
0 |
if (ref $result eq 'ARRAY') { } |
|
0 |
0 |
elsif (ref $result eq 'HASH') { } |
586
|
0 |
0 |
if (ref $$result[$i] eq 'ARRAY') { } |
|
0 |
0 |
elsif (ref $$result[$i] eq 'HASH') { } |