Branch Coverage

blib/lib/MBclient.pm
Criterion Covered Total %
branch 0 132 0.0


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
206 0 0 unless defined $timeout
208 0 0 if ($timeout =~ /^\d{1,5}$/ and $timeout < 180)
221 0 0 if $self->{'debug'}
223 0 0 if $self->is_open
226 0 0 unless ($ad_ip)
228 0 0 if $self->{'debug'}
234 0 0 if ($connect_ok) { }
239 0 0 if $self->{'debug'}
259 0 0 if ($self->{'sock'}) { }
283 0 0 unless $s_send
287 0 0 unless $f_body
311 0 0 unless $s_send
315 0 0 unless $f_body
340 0 0 unless $s_send
344 0 0 unless $f_body
367 0 0 unless $s_send
371 0 0 unless $f_body
390 0 0 $bit_value ? :
395 0 0 unless $s_send
399 0 0 unless $f_body
403 0 0 $rx_bit_addr == $bit_addr && $rx_bit_value == $bit_value ? :
421 0 0 unless $s_send
425 0 0 unless $f_body
429 0 0 $rx_reg_addr == $reg_addr && $rx_reg_value == $reg_value ? :
456 0 0 unless $s_send
460 0 0 unless $f_body
464 0 0 $rx_reg_addr == $reg_addr ? :
477 0 0 if ($self->{'MODE'} == 1) { }
0 0 elsif ($self->{'MODE'} == 2) { }
504 0 0 unless $bytes_send
506 0 0 if $self->{'debug'}
521 0 0 if ($self->{'MODE'} == 1) { }
0 0 elsif ($self->{'MODE'} == 2) { }
524 0 0 unless $rx_buffer
529 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'})
536 0 0 unless $rx_buffer
539 0 0 if $self->{'debug'}
545 0 0 unless $rx_buffer
548 0 0 if $self->{'debug'}
550 0 0 if (&bytes::length($rx_frame) < 5)
552 0 0 if $self->{'debug'}
557 0 0 unless ($self->_crc_is_ok($rx_frame))
559 0 0 if $self->{'debug'}
568 0 0 unless ($rx_unit_id == $self->{'UNIT_ID'})
574 0 0 if ($rx_bd_fc > 128) { }
579 0 0 if $self->{'debug'}
595 0 0 unless ($self->is_open)
596 0 0 if $self->{'debug'}
597 0 0 unless $self->open
603 0 0 if ($send_l != $data_l) { }
605 0 0 if $self->{'debug'}
621 0 0 unless ($self->_can_read)
628 0 0 unless (defined $s_recv)
630 0 0 if $self->{'debug'}
643 0 0 if ($_select) { }
647 0 0 if $self->{'debug'}
667 0 0 if $lsb
699 0 0 if ($self->{'MODE'} == 1) { }
0 0 elsif ($self->{'MODE'} == 2) { }