Condition Coverage

blib/lib/Data/Radius/Packet.pm
Criterion Covered Total %
condition 21 66 31.8


and 3 conditions

line !l l&&!r l&&r condition
79 2 0 0 $self->is_reply($type) and not $h{'authenticator'}
94 4 0 1 $av->{'Name'} eq 'Message-Authenticator' and not $av->{'Value'}
218 5 0 0 defined $av->{'Tag'} and not $attr->{'has_tag'}
223 5 0 0 $attr->{'has_tag'} and not defined $av->{'Tag'}
246 5 0 2 $attr->{'id'} == 2 and not $vendor_id
251 0 6 1 $attr->{'type'} ne 'tlv' and is_enum_type($attr->{'type'})
6 1 0 $attr->{'type'} ne 'tlv' and is_enum_type($attr->{'type'}) and $dict
365 2 0 1 $attr_id == 80 and not $vendor
394 0 2 1 $type == 1 and $attr->{'id'} == 2
2 0 1 $type == 1 and $attr->{'id'} == 2 and not $attr->{'vendor'}

or 2 conditions

line l !l condition
233 0 0 $av->{'Tag'} // 0
450 0 3 $IS_REPLY{$type} // 0
455 0 0 $IS_REQUEST{$type} // 0

or 3 conditions

line l !l&&r !l&&!r condition
69 0 2 0 $h{'dict'} // $self->dict
87 2 0 0 $h{'authenticator'} // pack('L4', map({int rand 4294967295;} 0..3))
112 2 0 0 $h{'request_id'} // $request_id++ & 255
155 0 0 0 $md5 //= 'Digest::MD5'->new
234 0 0 0 $tag < 1 or $tag > 31
235 0 0 0 $av->{'Name'} // $av->{'Id'}
253 0 0 0 $dict->value($attr->{'name'}, $value) // $value
313 0 0 0 $md5 //= 'Digest::MD5'->new
351 0 0 0 $dict->vendor_name($vendor_id) // $vendor_id
390 0 0 0 $dict->constant($attr->{'name'}, $decoded) // $decoded