| line |
true |
false |
branch |
|
21
|
0 |
0 |
$debug & 256 ? : |
|
36
|
0 |
0 |
unpack('c', $c) >= 32 ? : |
|
45
|
0 |
0 |
if ($error) { } |
|
46
|
0 |
0 |
@_ ? : |
|
47
|
0 |
0 |
if $debug and $debug & 64 |
|
76
|
0 |
0 |
if fileno $fh < 0 |
|
83
|
0 |
0 |
unless @_ & 1 |
|
133
|
0 |
0 |
if $debug and $debug & 32 |
|
138
|
0 |
0 |
if (not defined $packet_len and length $$in_b >= 4) |
|
140
|
0 |
0 |
if $debug and $debug & 32 |
|
142
|
0 |
0 |
if ($packet_len > $in_buffer_max_size) |
|
148
|
0 |
0 |
if (defined $packet_len and $wait_for_packet) |
|
151
|
0 |
0 |
if $debug and $debug & 32 |
|
154
|
0 |
0 |
if $debug and $debug & 32 |
|
160
|
0 |
0 |
unless $wait_for_packet or length $$out_b |
|
163
|
0 |
0 |
if length $$in_b < $in_buffer_max_size and not $in_fh_closed |
|
168
|
0 |
0 |
if length $$out_b |
|
170
|
0 |
0 |
if $rb eq '' and $wb eq '' |
|
173
|
0 |
0 |
if $debug and $debug & 32 |
|
174
|
0 |
0 |
if ($n >= 0) { } |
|
175
|
0 |
0 |
if (vec $wb, $out_fn, 1) |
|
177
|
0 |
0 |
if ($debug and $debug & 32) |
|
181
|
0 |
0 |
if $debug & 2048 and $bytes |
|
183
|
0 |
0 |
if ($bytes) { } |
|
191
|
0 |
0 |
if (vec $rb, $in_fn, 1) |
|
193
|
0 |
0 |
if ($debug and $debug & 32) |
|
197
|
0 |
0 |
if $debug & 1024 and $bytes |
|
199
|
0 |
0 |
unless ($bytes) |
|
207
|
0 |
0 |
if $n < 0 and $! == 4 |
|
208
|
0 |
0 |
if $debug and $debug & 32 |
|
214
|
0 |
0 |
if $debug and $debug & 32 |
|
227
|
0 |
0 |
$in_b_len >= 4 ? : |
|
|
0 |
0 |
if $debug and $debug & 1 |
|
232
|
0 |
0 |
unless $in_b_len >= 4 |
|
234
|
0 |
0 |
unless $in_b_len >= 4 + $pkt_len |
|
235
|
0 |
0 |
if $debug and $debug & 1 |
|
252
|
0 |
0 |
if (length $$out_b) |
|
258
|
0 |
0 |
if (@_ == 1) { } |
|
262
|
0 |
0 |
if @_ & 1 |
|
267
|
0 |
0 |
if (defined $packer) { } |
|
279
|
0 |
0 |
if ($debug and $debug & 1) |
|
281
|
0 |
0 |
if $debug & 8 |
|
330
|
0 |
0 |
unless my($cmd) = buf_shift_uint8($_[0]) |
|
332
|
0 |
0 |
$cmd == 1 ? : |
|
|
0 |
0 |
unless my($id) = $cmd == 1 ? undef : buf_shift_uint32($_[0]) |
|
335
|
0 |
0 |
if $debug and $debug & 1 |
|
340
|
0 |
0 |
unless $self->can("handle_packet_${name}_v$$self{'protocol_version'}") or $self->can("handle_packet_$name") |
|
344
|
0 |
0 |
if $debug and $debug & 4096 |
|
362
|
0 |
0 |
if $debug and $debug & 2 |
|
380
|
0 |
0 |
if $debug and $debug & 2 |
|
402
|
0 |
0 |
if $debug and $debug & 2 |
|
412
|
0 |
0 |
unless $self->_do_io(1) |
|
414
|
0 |
0 |
if defined $pkt |
|
429
|
0 |
0 |
if defined $msg |
|
437
|
0 |
0 |
if $debug and $debug & 2 |
|
447
|
0 |
0 |
unless $self->can("handle_command_${name}_v$$self{'protocol_version'}") or $self->can("handle_command_$name") |
|
471
|
0 |
0 |
unless $version >= 3 |
|
494
|
0 |
36 |
if $debug and $debug & 16384 |
|
497
|
0 |
0 |
if $debug and $debug & 2 |
|
|
0 |
0 |
if $debug and $debug & 2 |
|
|
0 |
0 |
if $debug and $debug & 2 |
|
|
0 |
0 |
if $debug and $debug & 2 |
|
|
0 |
0 |
if $debug and $debug & 2 |
|
|
0 |
0 |
if $debug and $debug & 2 |
|
|
0 |
0 |
if $debug and $debug & 2 |
|
|
0 |
0 |
if $debug and $debug & 2 |
|
|
0 |
0 |
if $debug and $debug & 2 |
|
|
0 |
0 |
if $debug and $debug & 2 |
|
|
0 |
0 |
if $debug and $debug & 2 |
|
|
0 |
0 |
if $debug and $debug & 2 |
|
|
0 |
0 |
if $debug and $debug & 2 |
|
|
0 |
0 |
if $debug and $debug & 2 |
|
|
0 |
0 |
if $debug and $debug & 2 |
|
|
0 |
0 |
if $debug and $debug & 2 |
|
|
0 |
0 |
if $debug and $debug & 2 |
|
|
0 |
0 |
if $debug and $debug & 2 |