Branch Coverage

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


line true false branch
139 0 0 if ($self->packet and $with->packet)
144 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') { }
148 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) { }
173 0 0 if ($self->packet and not ref $self->packet) { }
0 0 elsif ($self->packet) { }
201 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)
207 0 1 if ($self->packet and ref $self->packet) { }
0 1 elsif ($self->packet) { }
220 0 1 unless my($version, $type, $length, $routerId, $areaId, $checksum, $authType, $authData, $payload) = $self->SUPER::unpack('CCna4a4nnH16 a*', $self->raw)
240 0 1 if ($tail)
241 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) { }
258 0 1 if ($next) { }
261 0 0 if ($payload)
266 0 0 if ($payload)
268 0 0 if ($next->layer eq 'OSPF::Hello') { }
0 0 elsif ($next->layer eq 'OSPF::DatabaseDesc') { }
269 0 0 if ($next->options & 16)
279 0 0 if ($next->options == 82)
311 0 0 if ($self->packet and ref $self->packet)