Branch Coverage

blib/lib/Protocol/DBus/Message.pm
Criterion Covered Total %
branch 28 42 66.6


line true false branch
27 6 0 if (my($hdr, $hdr_len, $is_be) = Protocol::DBus::Message::Header::parse_simple($buf_sr))
29 6 0 if (length $$buf_sr >= $hdr_len + $hdr->[4])
33 4 2 if ($hdr->[4])
34 0 4 unless defined $body_sig
39 4 2 if ($body_sig)
40 0 4 $is_be ? :
62 0 2 if @missing
67 0 2 if ($opts{'flags'})
77 2 0 if ($opts{'hfields'})
94 1 8 if ($field_num == {DESTINATION => 6, ERROR_NAME => 4, INTERFACE => 2, MEMBER => 3, PATH => 1, REPLY_SERIAL => 5, SENDER => 7, SIGNATURE => 8, UNIX_FDS => 9}->{'SIGNATURE'})
102 1 1 if ($opts{'body'}) { }
0 1 elsif ($opts{'body_sig'}) { }
103 0 1 unless $opts{'body_sig'}
128 27 0 if ($_[1] =~ tr[0-9][\000-/:-\377]c)
190 0 2 unless @names
193 0 2 unless $_[0]{'_flags'} & ({ALLOW_INTERACTIVE_AUTHORIZATION => 4, NO_AUTO_START => 2, NO_REPLY_EXPECTED => 1}->{$name} || do { die "Invalid flag name: \342\200\234$name\342\200\235" })
236 1 1 if ($self->{'_body_sig'})
239 0 1 $_use_be ? :
250 1 1 $body_m_sr ? :
253 0 2 $_use_be ? :
260 1 1 if $body_m_sr