| line |
true |
false |
branch |
|
115
|
0 |
0 |
if defined $self->config("remote_addr")
|
|
117
|
0 |
0 |
if defined $self->config("remote_port")
|
|
119
|
0 |
0 |
if defined $self->config("proto")
|
|
121
|
0 |
0 |
if defined $self->config("timeout")
|
|
132
|
0 |
0 |
if (ref $_[0] eq 'HASH') { }
|
|
137
|
0 |
0 |
unless defined $args->{'remote_addr'}
|
|
146
|
0 |
0 |
unless $client
|
|
152
|
0 |
0 |
unless $client->connected
|
|
171
|
0 |
0 |
unless defined $connection_handle
|
|
182
|
0 |
0 |
if ($eoi)
|
|
184
|
0 |
0 |
if $self->{'_nextseq'} > 255
|
|
202
|
0 |
0 |
if (ref $_[0] eq 'HASH') { }
|
|
213
|
0 |
0 |
unless defined $command
|
|
214
|
0 |
0 |
unless $connection_handle->{'socket'}->connected
|
|
217
|
0 |
0 |
unless $nb > 0
|
|
221
|
0 |
0 |
if ($eoi)
|
|
224
|
0 |
0 |
if (length $command & 1) == 0
|
|
229
|
0 |
0 |
if ($self->{'_flushunread'} and $self->{'_state'} ne "NetWaitHeader")
|
|
239
|
0 |
0 |
if $eoi
|
|
240
|
0 |
0 |
if $self->{'_remote'}
|
|
241
|
0 |
0 |
if $clr
|
|
242
|
0 |
0 |
if $poll
|
|
250
|
0 |
0 |
if ($nb >= 8192) { }
|
|
253
|
0 |
0 |
if (not defined $sent or $sent != 8)
|
|
266
|
0 |
0 |
if (not defined $sent or $sent != $nb)
|
|
285
|
0 |
0 |
if (ref $_[0] eq 'HASH') { }
|
|
304
|
0 |
0 |
if $#ready < 0
|
|
310
|
0 |
0 |
if $#ready < 0
|
|
316
|
0 |
0 |
if (length $buf > 0)
|
|
320
|
0 |
0 |
if $nb == 0
|
|
324
|
0 |
0 |
if ($nb > 8)
|
|
329
|
0 |
0 |
if ($nb == 8) { }
|
|
332
|
0 |
0 |
unless ($op & 128 and $ver == 1)
|
|
339
|
0 |
0 |
($op & 1) == 0 ? :
|
|
340
|
0 |
0 |
($op & 8) == 0 ? :
|
|
361
|
0 |
0 |
if $nr > $nb
|
|
365
|
0 |
0 |
unless defined $connection_handle->{'socket'}->recv($buf, $nr, 0)
|
|
373
|
0 |
0 |
if $n > 20
|
|
385
|
0 |
0 |
if (ref $_[0] eq 'HASH') { }
|
|
397
|
0 |
0 |
unless ($connection_handle->{'socket'}->connected)
|
|
416
|
0 |
0 |
if ($self->{'_state'} eq "NetWaitHeader")
|
|
419
|
0 |
0 |
if (defined $hdr) { }
|
|
433
|
0 |
0 |
if ($self->{'_flushread'} and $seq != 0 and $self->_lastseq > $seq)
|
|
441
|
0 |
0 |
if ($seq != 0) { }
|
|
455
|
0 |
0 |
if ($self->{'_state'} eq "NetWaitData")
|
|
457
|
0 |
0 |
if ($flush)
|
|
466
|
0 |
0 |
if ($#ready < 0)
|
|
475
|
0 |
0 |
if $got >= $size
|
|
478
|
0 |
0 |
if $nb > $self->{'_maxblocksize'}
|
|
481
|
0 |
0 |
if ($#ready < 0)
|
|
492
|
0 |
0 |
if (length $buf < 1)
|
|
506
|
0 |
0 |
if ($hdr->{'SRQ'})
|
|
508
|
0 |
0 |
if (substr($result, 0, 1) eq '1') { }
|
|
517
|
0 |
0 |
if ($eoi)
|
|
522
|
0 |
0 |
if ($self->{'_state'} eq "NetError")
|
|
528
|
0 |
0 |
if $eoi
|
|
541
|
0 |
0 |
if (ref $_[0] eq 'HASH') { }
|
|
578
|
0 |
0 |
if ($ib_bits->{'ERR'} == 1)
|
|
602
|
0 |
0 |
unless defined $connection_handle
|
|
604
|
0 |
0 |
unless defined $timo
|
|
606
|
0 |
0 |
unless (defined $timo and $timo =~ /^\s*\+?(\d+|\d+\.\d*|\.\d+)(e[\+\-]?\d+)?\s*/iu)
|
|
622
|
0 |
0 |
if (not $ibstatus =~ /[0-9]*/u or $ibstatus < 0 or $ibstatus > 65535)
|
|
649
|
0 |
0 |
if (ref(\$ibstatus) =~ /SCALAR/u) { }
|
|
|
0 |
0 |
elsif (not ref($ibstatus) =~ /HASH/u) { }
|