| line |
true |
false |
branch |
|
52
|
0 |
1 |
unless $fh->socket(10, 3, 58) |
|
60
|
0 |
1 |
if ($self->bind) |
|
61
|
0 |
0 |
unless $fh->bind(pack_sockaddr_in6(0, inet_pton(10, $self->bind))) |
|
66
|
0 |
0 |
unless my $self = shift() |
|
71
|
0 |
0 |
unless defined $from_data and ref $from_data eq 'HASH' |
|
79
|
0 |
0 |
unless defined $f and $from_data->{'id'} == $self->_pid and $from_data->{'seq'} == $self->seq |
|
81
|
0 |
0 |
if ($from_data->{'type'} == 129) { } |
|
|
0 |
0 |
elsif ($from_data->{'type'} == 1) { } |
|
|
0 |
0 |
elsif ($from_data->{'type'} == 3) { } |
|
149
|
0 |
0 |
if ($from_type == 129) { } |
|
|
0 |
0 |
elsif ($from_type == 1) { } |
|
152
|
0 |
0 |
if $err |
|
154
|
0 |
0 |
if length $recv_msg >= $offset + 8 |
|
168
|
0 |
0 |
if $ipv6->protocol != 58 |
|
174
|
0 |
0 |
if $to_type != 128 |
|
201
|
1 |
0 |
unless keys %params |
|
211
|
0 |
1 |
if my $legacy = &blessed($_[0]) |
|
212
|
0 |
1 |
$legacy ? : |
|
226
|
0 |
1 |
if $err |
|
233
|
0 |
1 |
if ($self->use_ping_socket) |
|
235
|
0 |
0 |
if ($ping_fh->socket(10, 2, 58)) |
|
238
|
0 |
0 |
if ($self->bind) |
|
239
|
0 |
0 |
unless $ping_fh->bind(pack_sockaddr_in6(0, inet_pton(10, $self->bind))) |
|
246
|
0 |
0 |
unless my $self = shift() |
|
256
|
0 |
0 |
unless $from_data->{'ip'} eq $dst_ip and $from_data->{'seq'} == $self->seq |
|
258
|
0 |
0 |
if ($from_data->{'type'} == 129) { } |
|
|
0 |
0 |
elsif ($from_data->{'type'} == 1) { } |
|
|
0 |
0 |
elsif ($from_data->{'type'} == 3) { } |
|
282
|
0 |
0 |
$legacy ? : |
|
288
|
1 |
0 |
unless (defined $socket) |
|
291
|
1 |
0 |
unless ($self->_is_raw_socket_setup_done) |
|
292
|
0 |
1 |
$legacy ? : |
|
298
|
1 |
0 |
unless ($ping_socket) |
|
299
|
0 |
1 |
if (exists $self->_raw_socket_queue->{$dst_ip}) |
|
316
|
0 |
1 |
if ($ping_socket) { } |