Branch Coverage

blib/lib/Crypt/IDA/ShareFile.pm
Criterion Covered Total %
branch 116 256 45.3


line true false branch
32 0 10 if ($_[0] eq $classname or ref $_[0] eq $classname) { }
53 0 9 if ($_[0] eq $classname or ref $_[0] eq $classname) { }
63 0 9 unless defined $default_bytes_per_read
64 0 9 if (not defined $filename or $default_bytes_per_read <= 0 or $default_bytes_per_read > 4 or int $default_bytes_per_read != $default_bytes_per_read)
69 0 9 if $default_bytes_per_read > 4
73 0 9 unless sysopen $fh, $filename, 0
90 99 0 if ($override_bytes = shift()) { }
92 0 99 if int $bytes_to_read != $bytes_to_read or $bytes_to_read <= 0
94 0 99 if $bytes_to_read > 4
107 0 99 unless defined $bytes_read
108 0 99 if ($bytes_read == 0)
114 0 99 if $bytes_read < $bytes_to_read
148 0 9 if (not defined $filename && defined $default_bytes_per_write or $default_bytes_per_write <= 0)
154 0 9 unless sysopen $fh, $filename, 577
165 99 0 if ($override_bytes = shift()) { }
178 0 99 if ($num >= 256 ** $bytes_to_write)
265 99 0 if ($vec = $$istream{'READ'}($bytes), defined $vec) { }
266 72 27 if (defined $conversion)
267 9 63 if ($conversion eq 'hex') { }
63 0 elsif ($conversion eq 'dec') { }
292 0 9 unless read_some(2, 'magic', 'hex')
293 0 9 if ($$header_info{'magic'} ne '5346')
298 0 9 unless read_some(1, 'version', 'dec')
299 0 9 if ($$header_info{'version'} != 1)
305 0 9 unless read_some(1, 'options', 'dec')
312 0 9 $$header_info{'opt_large_k'} ? :
0 9 unless read_some($$header_info{'opt_large_k'} ? 2 : 1, 'k', 'dec')
314 0 9 if (defined $k and $k != $$header_info{'k'}) { }
321 0 9 $$header_info{'opt_large_w'} ? :
0 9 unless read_some($$header_info{'opt_large_w'} ? 2 : 1, 'w', 'dec')
323 0 9 if (defined $w and $w != $$header_info{'w'}) { }
343 0 9 unless read_some(1, 'offset_width', 'dec')
348 0 9 if ($offset_width > 4)
354 0 9 if ($offset_width) { }
355 0 0 unless read_some($offset_width, 'chunk_start', 'dec')
357 0 0 if ($$header_info{'chunk_start'} % $colsize)
365 0 9 if (defined $start and $start != $$header_info{'chunk_start'}) { }
373 0 9 unless read_some(1, 'offset_width', 'dec')
375 0 9 if ($offset_width > 4)
378 9 0 if ($offset_width) { }
379 0 9 unless read_some($offset_width, 'chunk_next', 'dec')
381 0 9 if (not $$header_info{'opt_final'} and $$header_info{'chunk_next'} % $colsize)
392 0 9 if (defined $next and $next != $$header_info{'chunk_next'}) { }
401 0 9 if ($$header_info{'chunk_start'} > $$header_info{'chunk_next'})
407 9 0 if ($$header_info{'opt_transform'})
410 0 27 unless read_some($$header_info{'w'}, 'element')
423 0 9 if (defined $hdr and $hdr != $header_size) { }
436 0 12 if ($_[0] eq $classname or ref $_[0] eq $classname) { }
457 108 0 exists $header_info{$_} ? :
464 0 12 unless defined $version and $version == 1
465 0 12 unless defined $k and defined $s and defined $chunk_start and defined $chunk_next
468 0 12 if defined $transform and scalar @$transform != $k
470 3 9 if ($dry_run)
487 12 0 if ($k < 256) { }
0 0 elsif ($k < 65536) { }
495 12 0 if ($s < 256) { }
0 0 elsif ($s < 65536) { }
503 12 0 defined $transform ? :
523 12 0 if ($chunk_start == 0) { }
536 0 12 if ($chunk_next == 0) { }
549 12 0 if ($opt_transform)
582 0 3 if ($_[0] eq $classname or ref $_[0] eq $classname) { }
608 27 0 exists $o{$_} ? :
616 0 0 unless ($w == 1 or $w == 2 or $w == 4)
620 0 3 if ($k < 1 or $k >= 256 ** $w)
630 0 3 unless (defined $file_size)
640 3 0 if (defined $save_transform and $save_transform) { }
650 0 3 if defined $n_chunks
651 0 3 if defined $in_chunk_size
652 0 3 if defined $out_chunk_size
653 0 3 if defined $out_file_size
655 0 3 if ($defined_methods > 1) { }
3 0 elsif ($file_size == 0 or $defined_methods == 0) { }
660 0 3 unless ($file_size)
667 0 3 unless (defined $hs and $hs > 0)
683 0 0 if (defined $n_chunks) { }
0 0 elsif (defined $in_chunk_size or defined $out_chunk_size) { }
0 0 elsif (defined $out_chunk_size) { }
684 0 0 unless ($n_chunks > 0)
689 0 0 if ($n_chunks > $max_n_chunks)
707 0 0 unless $cs
714 0 0 unless (defined $hs and $hs > 0)
749 0 0 if $cb >= $padded_file_size
768 0 3 if ($_[0] eq $classname or ref $_[0] eq $classname) { }
814 51 0 exists $o{$_} ? :
834 0 3 unless (defined $chunks[0])
843 0 3 if (defined $filespec) { }
844 0 0 unless ($filespec =~ /\%s/)
848 0 0 unless (scalar @chunks == 1 or $filespec =~ /\%c/)
853 3 0 scalar @chunks == 1 ? :
860 1 2 if (defined $sharelist) { }
862 0 1 unless (scalar @$sharelist == $n)
870 0 3 if (defined $chunklist) { }
872 0 0 unless (scalar @$chunklist > 0)
903 0 3 unless (defined $filler)
927 0 3 if (ida_check_transform_opts(%o))
931 2 1 unless (defined $mat)
932 1 1 if (defined $key) { }
933 0 1 if (ida_check_key($k, $n, $w, $key))
939 0 1 unless (defined $rng)
953 0 2 unless (defined $mat)
974 0 9 unless (defined $sharestream)
980 0 9 unless (defined $hs and $hs > 0)
984 0 9 unless ($hs + $chunk_size == $file_size)
1003 0 3 unless (defined $mat)
1083 0 3 if ($_[0] eq $classname or ref $_[0] eq $classname) { }
1120 39 0 exists $o{$_} ? :
1129 0 3 if (defined $key and defined $mat)
1133 0 3 if (defined $key and not defined $shares && defined $sharelist)
1143 0 3 unless (scalar @$infiles)
1150 0 9 if (exists $saw_file{$infile}) { }
1153 0 9 if (defined $sharelist)
1165 0 3 if (defined $k and scalar @$infiles < $k)
1183 0 9 unless (defined $istream)
1195 0 9 if ($$header_info{'error'})
1207 9 0 if (++$nshares <= $k) { }
1208 9 0 if ($$header_info{'opt_transform'}) { }
1209 0 9 if (defined $mat) { }
0 9 elsif (defined $key) { }
1221 0 0 unless (defined $mat or defined $key)
1241 0 3 unless ($nshares >= $k)
1246 3 0 unless (defined $key or defined $mat)
1261 0 3 unless (defined $mat)
1273 0 3 if ($bytes % ($k * $w))
1274 0 0 unless ($$header_info{'opt_final'})
1289 3 0 unless defined $key
1296 0 3 unless defined $output_bytes
1298 3 0 if ($$header_info{'opt_final'})