Branch Coverage

blib/lib/Net/Frame/Layer/OSPF.pm
Criterion Covered Total %
branch 6 54 11.1


line true false branch
138 0 0 if ($self->packet and $with->packet)
143 0 0 if ($s eq 'OSPF::Hello' and $w eq 'OSPF::DatabaseDesc') { }
0 0 elsif ($s eq 'OSPF::DatabaseDesc' and $w eq 'OSPF::DatabaseDesc') { }
0 0 elsif ($s eq 'OSPF::LinkStateRequest' and $w eq 'OSPF::LinkStateRequest') { }
147 0 0 if ($sHdr->flags == 7 and $wHdr->flags == 2) { }
0 0 elsif ($sHdr->flags == 3 and $wHdr->flags == 0) { }
0 0 elsif ($sHdr->flags == 1 and $wHdr->flags == 0) { }
172 0 0 if ($self->packet and not ref $self->packet) { }
0 0 elsif ($self->packet) { }
200 0 1 unless my $raw = $self->SUPER::pack('CCna4a4nnH16', $self->version, $self->type, $self->length, inetAton($self->routerId), inetAton($self->areaId), $self->checksum, $self->authType, $self->authData)
206 0 1 if ($self->packet and ref $self->packet) { }
0 1 elsif ($self->packet) { }
219 0 1 unless my($version, $type, $length, $routerId, $areaId, $checksum, $authType, $authData, $payload) = $self->SUPER::unpack('CCna4a4nnH16 a*', $self->raw)
239 0 1 if ($tail)
240 0 0 if ($type == 1) { }
0 0 elsif ($type == 2) { }
0 0 elsif ($type == 4) { }
0 0 elsif ($type == 3) { }
0 0 elsif ($type == 5) { }
257 0 1 if ($next) { }
260 0 0 if ($payload)
265 0 0 if ($payload)
267 0 0 if ($next->layer eq 'OSPF::Hello') { }
0 0 elsif ($next->layer eq 'OSPF::DatabaseDesc') { }
268 0 0 if ($next->options & 16)
278 0 0 if ($next->options == 82)
310 0 0 if ($self->packet and ref $self->packet)