line |
true |
false |
branch |
142
|
0 |
0 |
unless defined $hostname |
144
|
0 |
0 |
if ($hostname =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/ or $hostname =~ /^[a-z][a-z0-9\.\-]+$/) |
159
|
0 |
0 |
unless defined $port |
161
|
0 |
0 |
if ($port =~ /^\d{1,5}$/ and $port < 65536) |
176
|
0 |
0 |
unless defined $uid |
178
|
0 |
0 |
if ($uid =~ /^\d{1,3}$/) |
192
|
0 |
0 |
unless defined $mode |
204
|
0 |
0 |
if $$self{'debug'} |
206
|
0 |
0 |
if $self->is_open |
209
|
0 |
0 |
unless ($ad_ip) |
211
|
0 |
0 |
if $$self{'debug'} |
217
|
0 |
0 |
if ($connect_ok) { } |
222
|
0 |
0 |
if $$self{'debug'} |
242
|
0 |
0 |
if ($$self{'sock'}) { } |
266
|
0 |
0 |
unless $s_send |
270
|
0 |
0 |
unless $f_body |
294
|
0 |
0 |
unless $s_send |
298
|
0 |
0 |
unless $f_body |
323
|
0 |
0 |
unless $s_send |
327
|
0 |
0 |
unless $f_body |
350
|
0 |
0 |
unless $s_send |
354
|
0 |
0 |
unless $f_body |
373
|
0 |
0 |
$bit_value ? : |
378
|
0 |
0 |
unless $s_send |
382
|
0 |
0 |
unless $f_body |
386
|
0 |
0 |
$rx_bit_addr == $bit_addr && $rx_bit_value == $bit_value ? : |
404
|
0 |
0 |
unless $s_send |
408
|
0 |
0 |
unless $f_body |
412
|
0 |
0 |
$rx_reg_addr == $reg_addr && $rx_reg_value == $reg_value ? : |
439
|
0 |
0 |
unless $s_send |
443
|
0 |
0 |
unless $f_body |
447
|
0 |
0 |
$rx_reg_addr == $reg_addr ? : |
460
|
0 |
0 |
if ($$self{'MODE'} == 1) { } |
|
0 |
0 |
elsif ($$self{'MODE'} == 2) { } |
487
|
0 |
0 |
unless $bytes_send |
489
|
0 |
0 |
if $$self{'debug'} |
504
|
0 |
0 |
if ($$self{'MODE'} == 1) { } |
|
0 |
0 |
elsif ($$self{'MODE'} == 2) { } |
507
|
0 |
0 |
unless $rx_buffer |
512
|
0 |
0 |
unless ($rx_hd_tr_id == $$self{'hd_tr_id'} and $rx_hd_pr_id == 0 and $rx_hd_length < 256 and $rx_hd_unit_id == $$self{'UNIT_ID'}) |
519
|
0 |
0 |
unless $rx_buffer |
522
|
0 |
0 |
if $$self{'debug'} |
528
|
0 |
0 |
unless $rx_buffer |
531
|
0 |
0 |
if $$self{'debug'} |
535
|
0 |
0 |
unless ($rx_unit_id == $$self{'UNIT_ID'}) |
541
|
0 |
0 |
if ($rx_bd_fc > 128) { } |
546
|
0 |
0 |
if $$self{'debug'} |
562
|
0 |
0 |
unless ($self->is_open) |
563
|
0 |
0 |
if $$self{'debug'} |
564
|
0 |
0 |
unless $self->open |
570
|
0 |
0 |
if ($send_l != $data_l) { } |
572
|
0 |
0 |
if $$self{'debug'} |
588
|
0 |
0 |
unless ($self->_can_read) |
595
|
0 |
0 |
unless (defined $s_recv) |
597
|
0 |
0 |
if $$self{'debug'} |
610
|
0 |
0 |
if ($_select) { } |
614
|
0 |
0 |
if $$self{'debug'} |
634
|
0 |
0 |
if $lsb |
667
|
0 |
0 |
if ($$self{'MODE'} == 1) { } |
|
0 |
0 |
elsif ($$self{'MODE'} == 2) { } |