| line |
true |
false |
branch |
|
70
|
0 |
1 |
unless my $raw = $self->SUPER::pack('CCna16', $self->type, $self->auxDataLen, $self->numSources, inet6Aton($self->multicastAddress)) |
|
81
|
0 |
1 |
if ($self->auxData ne '') |
|
82
|
0 |
0 |
unless $raw .= $self->SUPER::pack('a*', $self->auxData) |
|
93
|
0 |
1 |
unless my($type, $auxDataLen, $numSources, $multicastAddress, $payload) = $self->SUPER::unpack('CCna16 a*', $self->raw) |
|
104
|
0 |
0 |
if (defined $payload and length $payload >= 16) |
|
114
|
0 |
0 |
if ($self->auxDataLen > 0 and defined $payload and length($payload) / 4 >= $self->auxDataLen) |
|
128
|
0 |
1 |
if $self->nextLayer |
|
130
|
0 |
1 |
if ($self->payload) |
|
141
|
1 |
0 |
if ($self->auxData ne '' and $self->auxDataLen == 0) |
|
143
|
1 |
0 |
if (my $mod = length($self->auxData) * 8 % 32) |
|
154
|
1 |
0 |
if (scalar $self->sourceAddress and $self->numSources == 0) |
|
177
|
3 |
0 |
if ($self->auxData ne "\000") |