| blib/lib/Data/Radius/Packet.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 32 | 61 | 52.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 85 | 4 | 0 | 0 | $self->is_reply($type) and not $h{'authenticator'} |
| 100 | 10 | 0 | 1 | $av->{'Name'} eq 'Message-Authenticator' and not $av->{'Value'} |
| 230 | 10 | 0 | 3 | $attr->{'id'} == 2 and not $vendor_id |
| 235 | 0 | 10 | 3 | $attr->{'type'} ne 'tlv' and is_enum_type($attr->{'type'}) |
| 10 | 1 | 2 | $attr->{'type'} ne 'tlv' and is_enum_type($attr->{'type'}) and $dict | |
| 344 | 8 | 0 | 2 | $attr_id == 80 and not $vendor |
| 373 | 2 | 6 | 2 | $type == 1 and $attr->{'id'} == 2 |
| 8 | 0 | 2 | $type == 1 and $attr->{'id'} == 2 and not $attr->{'vendor'} |
| line | l | !l | condition |
|---|---|---|---|
| 429 | 0 | 6 | $IS_REPLY{$type} // 0 |
| 434 | 3 | 0 | $IS_REQUEST{$type} // 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 67 | 0 | 0 | 4 | $h{'RaiseError'} //= $Data::Radius::Encode::RaiseError |
| 68 | 0 | 4 | 0 | $h{'PrintError'} //= $Data::Radius::Encode::PrintError |
| 75 | 0 | 4 | 0 | $h{'dict'} // $self->dict |
| 93 | 3 | 0 | 0 | $h{'authenticator'} // pack('L4', map({int rand 4294967295;} 0..3)) |
| 122 | 4 | 0 | 0 | $h{'request_id'} // $request_id++ & 255 |
| 165 | 0 | 1 | 0 | $md5 //= 'Digest::MD5'->new |
| 224 | 0 | 0 | 3 | $av->{'Tag'} < 1 or $av->{'Tag'} > 31 |
| 237 | 1 | 1 | 0 | $dict->value($attr->{'name'}, $value) // $value |
| 292 | 1 | 0 | 0 | $md5 //= 'Digest::MD5'->new |
| 330 | 1 | 0 | 0 | $dict->vendor_name($vendor_id) // $vendor_id |
| 369 | 1 | 1 | 0 | $dict->constant($attr->{'name'}, $decoded) // $decoded |