Condition Coverage

blib/lib/OSPF/LSDB/View.pm
Criterion Covered Total %
condition 132 193 68.3


and 3 conditions

line !l l&&!r l&&r condition
503 26 24 2 $type ne "pointtopoint" and @hashes > 1
522 0 26 1 $ifaddrs->{$intf} and $ifaddrs->{$intf}{$rid} > 1
28 26 1 $type eq "pointtopoint" and ($ifaddrs->{$intf} and $ifaddrs->{$intf}{$rid} > 1)
529 28 26 1 $type eq "pointtopoint" and my(@badrids) = sort(grep({$_ ne $rid;} keys %{$$ifaddrs{$intf};}))
585 87 5 3 not $nethash->{$addr} and keys %$av > 1
593 90 8 3 not $nethash->{$addr} and keys %$ev > 1
630 14 1 178 $nethash->{$addr} and map {$_->{$area} ? 1 : ();} map({values %$_;} values %{$$nethash{$addr};})
679 0 192 3 $ifaddrs->{$intf} and $ifaddrs->{$intf}{$rid} > 1
735 107 72 2 $addr eq $intf and $netrid ne $rid
827 27 4 1 $netsmv{$net}{$mask} and my(@otherareas) = sort(grep({$_ ne $area;} map({keys %$_;} map({values %$_;} @{$netsmv{$net}{$mask};}))))
837 28 4 1 $netsmv{$net}{$mask} and grep {$_->{$rid};} @{$netsmv{$net}{$mask};}
1129 0 190 4 $routehash->{$arid}{'areas'} and not $routehash->{$arid}{'areas'}{$area}
1143 101 3 85 $arid eq $rid and $tv
104 74 11 $arid eq $rid and $tv and not grep({$addr eq $_->{'interface'};} @{$$tv{"hashes"};})
1258 0 52 3 $stubareas and my(@badareas) = grep({$stubareas->{$net}{$mask}{$_};} @areas)
1324 24 0 31 $mv->{'graph'} && $mv->{'graph'}{'N'}
1399 3 0 1 $elem->{'colors'}{'gray'} && $colors->{'gray'}
1436 1 0 9 $elem->{'colors'}{'gray'} && $colors->{'gray'}
1604 73 106 0 $routehash->{$asbr} and $routehash->{$asbr}{'areas'}{$area}
1668 0 0 2 $elem->{'colors'}{'gray'} && $colors->{'gray'}
1703 1 0 21 $elem->{'colors'}{'gray'} && $colors->{'gray'}
1815 0 82 5 $stubs and $stubs->{$net}{$mask}
1988 0 0 2 $elem->{'colors'}{'gray'} && $colors->{'gray'}
2023 0 0 73 $elem->{'colors'}{'gray'} && $colors->{'gray'}
2240 39 119 25 $todo->{'summary'} and $todo->{'summary'}{'aggregate'}
2242 32 121 30 $todo->{'boundary'} and $todo->{'boundary'}{'aggregate'}
2244 32 132 19 $todo->{'external'} and $todo->{'external'}{'aggregate'}

or 2 conditions

line l !l condition
2398 0 4 $_->{'shape'} ||= "box"
2399 2 2 $_->{'style'} ||= "solid"
2431 1 3 $_->{'shape'} ||= "ellipse"
2432 2 2 $_->{'style'} ||= "solid"
2463 2 2 $_->{'shape'} ||= "ellipse"
2464 1 3 $_->{'style'} ||= "solid"
2479 0 4 $_->{'shape'} ||= "box"
2480 0 4 $_->{'style'} ||= "solid"
2533 1 4 $_->{'label'} ||= "router"
2534 0 5 $_->{'shape'} ||= "box"
2535 0 5 $_->{'style'} ||= "solid"
2555 3 2 $_->{'label'} ||= "router"
3 2 $_->{'shape'} ||= "box"
2556 3 2 $_->{'style'} ||= "solid"
2576 2 3 $_->{'style'} ||= "solid"
2617 3 1 $_->{'shape'} ||= "ellipse"
2618 2 2 $_->{'style'} ||= "solid"
2631 1 3 $_->{'label'} ||= "area border\\nrouter"
2632 0 4 $_->{'shape'} ||= "box"
2633 1 3 $_->{'style'} ||= "bold"

or 3 conditions

line l !l&&r !l&&!r condition
147 182 0 0 unpack('N', &_ip2pack($a[0])) <=> unpack('N', &_ip2pack($b[0])) || unpack('N', &_ip2pack($a[1])) <=> unpack('N', &_ip2pack($b[1]))
508 44 2 2 $linkhash->{$rid} && $linkhash->{$rid}{$area} && $linkhash->{$rid}{$area}{$dstrid} || $routehash->{$dstrid}{'missing'}
602 7 4 3 $colors{'orange'} || $colors{'blue'}
1137 183 6 1 $tv or $routehash->{$arid}{'missing'}
1399 3 0 1 not $elem->{'colors'}{'gray'} && $colors->{'gray'} or $elem->{'colors'}{'gray'} ne $colors->{'gray'}
1408 0 0 3 delete $elem->{'colors'}{'gray'} || ()
0 0 3 $colors->{'gray'} || ()
1436 1 0 9 not $elem->{'colors'}{'gray'} && $colors->{'gray'} or $elem->{'colors'}{'gray'} ne $colors->{'gray'}
1442 0 0 1 delete $elem->{'colors'}{'gray'} || ()
0 0 1 $colors->{'gray'} || ()
1668 0 0 2 not $elem->{'colors'}{'gray'} && $colors->{'gray'} or $elem->{'colors'}{'gray'} ne $colors->{'gray'}
1677 0 0 0 delete $elem->{'colors'}{'gray'} || ()
0 0 0 $colors->{'gray'} || ()
1703 1 2 19 not $elem->{'colors'}{'gray'} && $colors->{'gray'} or $elem->{'colors'}{'gray'} ne $colors->{'gray'}
1709 2 0 1 delete $elem->{'colors'}{'gray'} || ()
3 0 0 $colors->{'gray'} || ()
1988 0 0 2 not $elem->{'colors'}{'gray'} && $colors->{'gray'} or $elem->{'colors'}{'gray'} ne $colors->{'gray'}
1997 0 0 0 delete $elem->{'colors'}{'gray'} || ()
0 0 0 $colors->{'gray'} || ()
2023 0 0 73 not $elem->{'colors'}{'gray'} && $colors->{'gray'} or $elem->{'colors'}{'gray'} ne $colors->{'gray'}
2029 0 0 0 delete $elem->{'colors'}{'gray'} || ()
0 0 0 $colors->{'gray'} || ()
2122 55 858 4341 $k eq "C" or $k eq "N"
2169 1234 1234 6071 $k eq "S" or $k eq "D"