Branch Coverage

blib/lib/Metabrik/Network/Frame.pm
Criterion Covered Total %
branch 0 72 0.0


line true false branch
71 0 0 unless $self->update_device_info
83 0 0 unless my $nd = 'Metabrik::Network::Device'->new_from_brik_init($self)
85 0 0 unless my $device_info = $nd->get($device)
103 0 0 unless $self->brik_help_run_undef_arg('from_read', $frames)
104 0 0 unless my $ref = $self->brik_help_run_invalid_arg('from_read', $frames, 'HASH', 'ARRAY')
108 0 0 if ($ref eq 'HASH')
109 0 0 if (not exists $frames->{'raw'} && exists $frames->{'firstLayer'} && exists $frames->{'timestamp'}) { }
120 0 0 if ($ref ne 'ARRAY')
123 0 0 if (@$frames <= 0)
127 0 0 if (ref $first ne 'HASH')
130 0 0 unless (exists $first->{'raw'} and exists $first->{'firstLayer'} and exists $first->{'timestamp'})
138 0 0 unless my $simple = 'Net::Frame::Simple'->newFromDump($h)
149 0 0 unless $self->brik_help_run_undef_arg('to_read', $frame)
150 0 0 unless my $ref = $self->brik_help_run_invalid_arg('to_read', $frame, 'ARRAY', 'Net::Frame::Simple')
153 0 0 $ref eq 'ARRAY' ? :
154 0 0 if ($ref eq 'ARRAY') { }
0 0 elsif ($ref eq 'Net::Frame::Simple') { }
156 0 0 if (ref $first eq 'Net::Frame::Simple') { }
188 0 0 unless $self->brik_help_run_undef_arg('from_hexa', $data)
190 0 0 unless my $sh = 'Metabrik::String::Hexa'->new_from_brik_init($self)
192 0 0 unless ($sh->is_hexa($data))
196 0 0 unless my $raw = $sh->decode($data)
202 0 0 if ($@)
214 0 0 unless $self->brik_help_run_undef_arg('from_raw', $raw)
223 0 0 unless $self->brik_help_run_undef_arg('show', $frame)
224 0 0 unless $self->brik_help_run_invalid_arg('show', $frame, 'Net::Frame::Simple')
238 0 0 unless $self->brik_help_run_undef_arg('mac2eui64', $mac)
292 0 0 unless $self->brik_help_run_undef_arg('ipv4', $dst)
312 0 0 unless $self->brik_help_run_undef_arg('tcp', $dst)
327 0 0 unless $self->brik_help_run_undef_arg('udp', $dst)
361 0 0 unless $self->brik_help_run_undef_arg('frame', $layers)
362 0 0 unless $self->brik_help_run_invalid_arg('frame', $layers, 'ARRAY')
375 0 0 unless $self->brik_help_run_undef_arg('is_read', $data)
377 0 0 if (ref $data eq 'HASH' and exists $data->{'raw'} and exists $data->{'firstLayer'} and exists $data->{'timestamp'})
391 0 0 unless $self->brik_help_run_undef_arg('is_simple', $data)
393 0 0 if (ref $data eq 'Net::Frame::Simple')