| line |
true |
false |
branch |
|
62
|
0 |
0 |
unless $self->brik_help_run_must_be_root('open') |
|
66
|
0 |
0 |
$self->family eq 'ipv6' ? : |
|
70
|
0 |
0 |
$self->protocol eq 'udp' ? : |
|
75
|
0 |
0 |
if ($self->layer == 2) { } |
|
|
0 |
0 |
elsif ($self->layer == 3) { } |
|
|
0 |
0 |
elsif ($self->layer == 4) { } |
|
78
|
0 |
0 |
unless $fd = 'Net::Write::Layer2'->new('dev', $arg2) |
|
86
|
0 |
0 |
unless (defined $arg2) |
|
90
|
0 |
0 |
unless $fd = 'Net::Write::Layer3'->new('dst', $arg2, 'protocol', Net::Write::Layer::NW_IPPROTO_RAW(), 'family', $family) |
|
100
|
0 |
0 |
unless (defined $self->target) |
|
104
|
0 |
0 |
unless $fd = 'Net::Write::Layer4'->new('dst', $arg2, 'protocol', $protocol, 'family', $family) |
|
113
|
0 |
0 |
unless $fd->open |
|
125
|
0 |
0 |
unless $self->brik_help_run_undef_arg('open', $fd) |
|
126
|
0 |
0 |
unless $self->brik_help_run_undef_arg('send', $data) |
|
137
|
0 |
0 |
unless (defined $fd) |
|
151
|
0 |
0 |
unless $self->brik_help_run_undef_arg('lsend', $data) |
|
157
|
0 |
0 |
unless $self->open |
|
158
|
0 |
0 |
unless $self->send($data) |
|
171
|
0 |
0 |
unless $self->brik_help_run_undef_arg('nsend', $data) |
|
177
|
0 |
0 |
unless $self->open |
|
178
|
0 |
0 |
unless $self->send($data) |
|
191
|
0 |
0 |
unless $self->brik_help_run_undef_arg('fnsend_reply', $frame) |
|
192
|
0 |
0 |
unless $self->brik_help_run_invalid_arg('fnsend_reply', $frame, 'Net::Frame::Simple') |
|
195
|
0 |
0 |
unless (defined $target) |
|
197
|
0 |
0 |
unless (defined $ip) |
|
203
|
0 |
0 |
unless my $nr = 'Metabrik::Network::Read'->new_from_brik_init($self) |
|
210
|
0 |
0 |
unless my $in = $nr->open |
|
218
|
0 |
0 |
unless my $out = $self->open |
|
220
|
0 |
0 |
unless $frame->send($out) |
|
224
|
0 |
0 |
if ($reply = $frame->recv($in)) |