Branch Coverage

lib/SIRTX/VM/Chunk.pm
Criterion Covered Total %
branch 0 140 0.0


line true false branch
77 0 0 if (defined(my $from = delete $opts{'from'}))
78 0 0 if ($from->isa('File::Information::Inode')) { }
86 0 0 if (defined(my $v = delete $opts{'type'}))
90 0 0 if (defined(my $v = delete $opts{'flags'}))
96 0 0 if scalar keys %opts
106 0 0 defined $chunk_identifier ? :
112 0 0 if scalar @opts
114 0 0 if $out->tell & 1
116 0 0 if ($body_length_extra <= 65535) { }
0 0 elsif ($body_length_extra <= 4294967295) { }
128 0 0 if (defined $type)
134 0 0 if (defined $type)
140 0 0 if (defined $type)
146 0 0 if (defined $type)
154 0 0 if $self->{'standalone'}
155 0 0 if defined $chunk_identifier
156 0 0 if $data_length & 1
160 0 0 if (defined $chunk_identifier)
169 0 0 unless $in->seek($self->{'data'}{'offset'}, 0)
172 0 0 $todo > 4096 ? :
175 0 0 if (not defined $got or $got < 1)
184 0 0 unless $in->seek($restore, 0)
186 0 0 if $todo
189 0 0 if $data_length & 1
203 0 0 if scalar @opts
205 0 0 unless $in->read($data, 2) == 2
208 0 0 unless ($opcode & 65528) == 1592
210 0 0 if (($opcode & 7) == 1) { }
0 0 elsif (($opcode & 7) == 2) { }
211 0 0 unless $in->read($data, 2) == 2
214 0 0 unless $in->read($data, 4) == 2
220 0 0 unless $in->read($data, 4) == 4
223 0 0 if ($flags & 2)
224 0 0 unless $in->read($data, 2) == 2
228 0 0 $flags & 2 ? :
0 0 $flags & 1 ? :
230 0 0 unless $data_offset = $in->tell
234 0 0 if ($flags & 1)
235 0 0 unless $in->read($data, 1) == 1
236 0 0 unless ord $data == 0
244 0 0 if ($flags_type == 0) { }
0 0 elsif ($flags_type == 16384) { }
0 0 elsif ($flags_type == 32768) { }
0 0 elsif ($flags_type == 49152) { }
263 0 0 if scalar @opts
265 0 0 if (defined $n)
268 0 0 if (defined(my $pkg = $_type_to_pkg{$_util->render_sirtx($self->{'type'})}))
269 0 0 if (ref $self ne $pkg)
283 0 0 if scalar @opts
285 0 0 if (defined $n)
289 0 0 unless $n >= 0
291 0 0 if $self->{'read_only'}
293 0 0 unless $n > 0
304 0 0 if scalar @opts
313 0 0 if scalar @opts
315 0 0 unless $_flags{$flag}
317 0 0 if (defined $n)
337 0 0 if scalar @opts
339 0 0 unless ref $fh
343 0 0 unless (defined $length)
346 0 0 unless $fh->seek(0, 2)
350 0 0 unless $fh->seek($pos, 0)
369 0 0 if $length < 0
370 0 0 if $offset < 0
371 0 0 unless defined $data
373 0 0 if $offset >= $data->{'length'}
375 0 0 if $length + $offset > $data->{'length'}
380 0 0 unless $data->{'fh'}->seek($data->{'offset'} + $offset, 0)
384 0 0 unless $data->{'fh'}->seek($pos, 0)
395 0 0 unless defined $self->{'data'}