line |
true |
false |
branch |
104
|
0 |
1 |
unless my $raw = $self->SUPER::pack('CCn', $self->version, $self->ttl, $self->checksum) |
124
|
0 |
0 |
if ($type == 1) { } |
|
0 |
0 |
elsif ($type == 2) { } |
|
0 |
0 |
elsif ($type == 3) { } |
|
0 |
0 |
elsif ($type == 4) { } |
|
0 |
0 |
elsif ($type == 5) { } |
|
0 |
0 |
elsif ($type == 6) { } |
|
0 |
0 |
elsif ($type == 7) { } |
|
0 |
0 |
elsif ($type == 9) { } |
|
0 |
0 |
elsif ($type == 10) { } |
|
0 |
0 |
elsif ($type == 11) { } |
|
0 |
0 |
elsif ($type == 14) { } |
|
0 |
0 |
elsif ($type == 15) { } |
|
0 |
0 |
elsif ($type == 16) { } |
|
0 |
0 |
elsif ($type == 17) { } |
|
0 |
0 |
elsif ($type == 18) { } |
|
0 |
0 |
elsif ($type == 19) { } |
|
0 |
0 |
elsif ($type == 22) { } |
173
|
0 |
1 |
unless my($version, $ttl, $checksum, $payload) = $self->SUPER::unpack('CCn a*', $self->raw) |
181
|
0 |
1 |
if (defined $payload and length $payload) |
194
|
0 |
0 |
unless my $phpkt = $self->SUPER::pack('CCn', $self->version, $self->ttl, 0) |
203
|
0 |
0 |
unless ($start) |
204
|
0 |
0 |
if $l->layer eq 'CDP' |
210
|
0 |
0 |
if (defined $last->payload and length $last->payload) |
230
|
0 |
0 |
if (length($payload) % 2) |
231
|
0 |
0 |
if (substr($payload, -1) ge "\200") { } |
240
|
0 |
0 |
if (length $payload) |
241
|
0 |
0 |
unless $phpkt .= $self->SUPER::pack('a*', $payload) |
253
|
0 |
1 |
if $self->nextLayer |