line |
true |
false |
branch |
59
|
0 |
0 |
unless $self->brik_help_run_undef_arg('from_pcap', $file) |
60
|
0 |
0 |
unless $self->brik_help_run_file_not_found('from_pcap', $file) |
64
|
0 |
0 |
unless my $fp = 'Metabrik::File::Pcap'->new_from_brik_init($self) |
65
|
0 |
0 |
unless $fp->open($file, 'read', $filter) |
74
|
0 |
0 |
if @$h == 0 |
76
|
0 |
0 |
unless my $simple = $fp->from_read($this) |
80
|
0 |
0 |
if (defined $network and defined $transport) |
94
|
0 |
0 |
unless defined $src_ip |
96
|
0 |
0 |
if ($this_src_ip eq $src_ip || $this_src_ip eq $dst_ip and $this_src_port eq $src_port || $this_src_port eq $dst_port) |
108
|
0 |
0 |
if (defined $transport and length $transport->payload and defined $network) |
125
|
0 |
0 |
unless $self->brik_help_run_undef_arg('to_pcap', $file) |
126
|
0 |
0 |
unless $self->brik_help_run_undef_arg('to_pcap', $stream) |
127
|
0 |
0 |
unless $self->brik_help_run_invalid_arg('to_pcap', $stream, 'ARRAY') |
128
|
0 |
0 |
unless $self->brik_help_run_empty_array_arg('to_pcap', $stream) |
131
|
0 |
0 |
if (ref $first ne 'Net::Frame::Simple') |
135
|
0 |
0 |
unless my $fp = 'Metabrik::File::Pcap'->new_from_brik_init($self) |
136
|
0 |
0 |
unless $fp->open($file, 'write', $first->firstLayer) |
137
|
0 |
0 |
unless my $frames = $fp->to_read($stream) |
138
|
0 |
0 |
unless $fp->write($frames) |
148
|
0 |
0 |
unless $self->brik_help_run_undef_arg('list_source_ip_addresses', $stream) |
149
|
0 |
0 |
unless $self->brik_help_run_invalid_arg('list_source_ip_addresses', $stream, 'ARRAY') |
150
|
0 |
0 |
unless $self->brik_help_run_empty_array_arg('list_source_ip_addresses', $stream) |
152
|
0 |
0 |
if (ref $stream->[0] ne 'Net::Frame::Simple') |
159
|
0 |
0 |
if (defined $network) |
171
|
0 |
0 |
unless $self->brik_help_run_undef_arg('list_destination_ip_addresses', $stream) |
172
|
0 |
0 |
unless $self->brik_help_run_invalid_arg('list_destination_ip_addresses', $stream, 'ARRAY') |
173
|
0 |
0 |
unless $self->brik_help_run_empty_array_arg('list_destination_ip_addresses', $stream) |
175
|
0 |
0 |
if (ref $stream->[0] ne 'Net::Frame::Simple') |
182
|
0 |
0 |
if (defined $network) |
194
|
0 |
0 |
unless $self->brik_help_run_undef_arg('list_tcp_streams', $frames) |
195
|
0 |
0 |
unless $self->brik_help_run_invalid_arg('list_tcp_streams', $frames, 'ARRAY') |
196
|
0 |
0 |
unless $self->brik_help_run_empty_array_arg('list_tcp_streams', $frames) |
198
|
0 |
0 |
if (ref $frames->[0] ne 'Net::Frame::Simple') |
214
|
0 |
0 |
if (exists $streams{$id1}) { } |
229
|
0 |
0 |
unless $self->brik_help_run_undef_arg('save_stream_payload', $frames) |
230
|
0 |
0 |
unless $self->brik_help_run_invalid_arg('save_stream_payload', $frames, 'ARRAY') |
231
|
0 |
0 |
unless $self->brik_help_run_empty_array_arg('save_stream_payload', $frames) |
233
|
0 |
0 |
if (ref $frames->[0] ne 'Net::Frame::Simple') |
240
|
0 |
0 |
unless my $payload = $transport->payload |
241
|
0 |
0 |
if (length $payload) |
253
|
0 |
0 |
unless $self->brik_help_run_undef_arg('get_payloads_from_pcap', $file) |
254
|
0 |
0 |
unless $self->brik_help_run_file_not_found('get_payloads_from_pcap', $file) |
258
|
0 |
0 |
unless my $fp = 'Metabrik::File::Pcap'->new_from_brik_init($self) |
259
|
0 |
0 |
unless $fp->open($file, 'read', $filter) |
264
|
0 |
0 |
if @$h == 0 |
266
|
0 |
0 |
unless my $simple = $fp->from_read($this) |
270
|
0 |
0 |
if (defined $network and defined $transport) |
271
|
0 |
0 |
if (defined $transport and length $transport->payload) |