line |
true |
false |
branch |
81
|
0 |
1 |
unless $self->[$__raw] = $self->SUPER::pack('nnNNnnnn', $self->[$__src], $self->[$__dst], $self->[$__seq], $self->[$__ack], $offX2Flags, $self->[$__win], $self->[$__checksum], $self->[$__urp]) |
92
|
0 |
1 |
if ($self->[$__options]) |
93
|
0 |
0 |
unless $self->[$__raw] = $self->[$__raw] . $self->SUPER::pack('a*', $self->[$__options]) |
105
|
0 |
1 |
if (length $self->[$__raw] < 20) |
109
|
0 |
1 |
unless my($src, $dst, $seq, $ack, $offX2Flags, $win, $checksum, $urp, $payload) = $self->SUPER::unpack('nnNNnnnn a*', $self->[$__raw]) |
125
|
0 |
1 |
unless my($options, $payload2) = $self->SUPER::unpack('a' . $self->getOptionsLength . 'a*', $self->[$__payload]) |
135
|
0 |
1 |
$self->[$__off] ? : |
141
|
0 |
1 |
$gLen > $hLen ? : |
166
|
0 |
0 |
unless ($start) |
167
|
0 |
0 |
if $l->layer eq 'TCP' |
174
|
0 |
0 |
if (defined $last->payload and length $last->payload) |
181
|
0 |
0 |
if ($l->layer eq 'IPv4') { } |
|
0 |
0 |
elsif ($l->layer eq 'IPv6') { } |
194
|
0 |
0 |
unless $phpkt .= $self->SUPER::pack('nnNNnnnn', $self->[$__src], $self->[$__dst], $self->[$__seq], $self->[$__ack], $offX2Flags, $self->[$__win], 0, $self->[$__urp]) |
199
|
0 |
0 |
if ($self->[$__options]) |
200
|
0 |
0 |
unless $phpkt .= $self->SUPER::pack('a*', $self->[$__options]) |
204
|
0 |
0 |
if (length $payload) |
205
|
0 |
0 |
unless $phpkt .= $self->SUPER::pack('a*', $payload) |
226
|
0 |
0 |
unless $with->[$__ack] == $self->[$__seq] + 1 |
252
|
0 |
1 |
if ($self->[$__options]) |
253
|
0 |
0 |
unless $buf .= sprintf("\n${l}: optionsLength:%d options:%s", $self->getOptionsLength, $self->SUPER::unpack('H*', $self->[$__options])) |