line |
true |
false |
branch |
51
|
0 |
0 |
unless length $bootsect == 512 and "U\252" eq substr($bootsect, -2) |
110
|
0 |
0 |
unless $$p{'type'} |
111
|
0 |
0 |
unless $offset_in_sectors |
114
|
0 |
0 |
unless defined $emit_prefat32 |
116
|
0 |
0 |
unless open F32, "> $emit_prefat32" |
119
|
0 |
0 |
if ($offset_in_sectors > 1) |
123
|
0 |
0 |
unless close F32 |
195
|
0 |
0 |
unless $dir =~ s/^((.).{31})//s |
196
|
0 |
0 |
if $2 eq "\000" |
197
|
0 |
0 |
if not $keep_del and 229 == ord $2 |
200
|
0 |
0 |
if 229 == ord $2 |
201
|
0 |
0 |
if ($f{'attrib'} == 15) |
204
|
0 |
0 |
if (not $keep_del) { } |
205
|
0 |
0 |
if $f{'seq_number'} & 128 |
207
|
0 |
0 |
if $f{'seq_number'} & 128 and $f{'seq_number'} != 229 |
208
|
0 |
0 |
if ($f{'seq_number'} == 229) { } |
209
|
0 |
0 |
if @lfn and not $lfn_del |
213
|
0 |
0 |
if @lfn and $lfn_del |
218
|
0 |
0 |
unless ($f{'deleted'}) |
219
|
0 |
0 |
if @lfn and $f{'seq_number'} & 64 |
220
|
0 |
0 |
unless @lfn or $f{'seq_number'} & 64 |
222
|
0 |
0 |
if @lfn and $f{'seq_number'} != ($lfn_seq & 18446744073709551551) - 1 |
226
|
0 |
0 |
if @lfn and $lfn_checksum != $f{'checksum_dosname'} |
231
|
0 |
0 |
unless @lfn |
234
|
0 |
0 |
if (@lfn) { } |
244
|
0 |
0 |
if not $keep_dots and $f{'basename'} =~ /^\.\.?$/ and $f{'ext'} eq '' |
247
|
0 |
0 |
if @lfn and not $lfn_del and $lfn_checksum != dos_chksum($f{'basename'}, $f{'ext'}) |
249
|
0 |
0 |
if $f{'attrib'} & 8 and not $keep_labels |
250
|
0 |
0 |
if ($is_fat32) { } |
255
|
0 |
0 |
if $f{'name_ext_case'} & 8 |
256
|
0 |
0 |
if $f{'name_ext_case'} & 16 |
257
|
0 |
0 |
length $f{'ext'} ? : |
261
|
0 |
0 |
if (@lfn) |
269
|
0 |
0 |
if @lfn |
424
|
0 |
0 |
if ($$s{'last_cluster'} >= 65536 or $$s{'root_dir_entries'} == 0 or $bpb{'ext_boot_signature'} != 40 and $bpb{'ext_boot_signature'} != 41) { } |
|
0 |
0 |
elsif ($$s{'last_cluster'} >= 4096) { } |
434
|
0 |
0 |
unless $w == 32 |
451
|
0 |
0 |
unless $$s{'sectors_per_FAT'} >= $exp |
453
|
0 |
0 |
unless $$s{'sectors_per_FAT'} <= $exp + 10 |
461
|
0 |
0 |
if shift() and not $$s{'raw'} =~ /^\xEB/ |
464
|
0 |
0 |
if $$s{'ext_boot_signature'} == 40 || $$s{'ext_boot_signature'} == 41 and $$s{'boot_signature'} == 43605 and $$s{'FS_type'} =~ /^fat(\d{2})?/i and !$1 || $1 eq $$s{'guessed_FAT_flavor'} |
478
|
0 |
0 |
if $w == 12 |
481
|
0 |
0 |
if ($w == 12) |
482
|
0 |
0 |
if ($n % 2) { } |
493
|
0 |
0 |
unless defined $lim |
494
|
0 |
0 |
if $lim + $offset > length $$s |
495
|
0 |
0 |
if ($w == 12) { } |
505
|
0 |
0 |
$w == 32 ? : |
510
|
0 |
0 |
$lim > 1000 ? : |
521
|
0 |
0 |
unless 'ARRAY' eq ref $fat |
525
|
0 |
0 |
unless $$fat[0] == (($$b{'media_type'} | 4294967040) & $max_cluster) |
530
|
0 |
0 |
unless $eof >> 3 == $max_cluster >> 3 + 4 * (32 == $$b{'guessed_FAT_flavor'}) |
538
|
0 |
0 |
unless $cluster >= 2 and $cluster <= $last_cluster |
548
|
0 |
0 |
if (ref $fat eq 'ARRAY') { } |
553
|
0 |
0 |
if ($compress) |
554
|
0 |
0 |
if $next == ++$cluster |
555
|
0 |
0 |
if ($subr) { } |
564
|
0 |
0 |
if $next >> 3 == $stop_3 |
565
|
0 |
0 |
unless defined $next |
566
|
0 |
0 |
unless $next >= 2 and $next <= $last_cluster |
573
|
0 |
0 |
$a > $b ? : |
577
|
0 |
0 |
if defined $seek |
578
|
0 |
0 |
unless defined $_[0] |
579
|
0 |
0 |
if ($_[1] || 0) > length $_[0] |
584
|
0 |
0 |
unless $t == $read |
591
|
0 |
0 |
unless (ref $fh) |
592
|
0 |
0 |
unless open IN, '<', $inif = $fh |
597
|
0 |
0 |
if (defined $$how{'do_MBR'}) |
599
|
0 |
0 |
if ($$how{'do_MBR'} eq 'maybe' and defined $$how{'do_bootsector'}) |
600
|
0 |
0 |
if eval {
do {
my $b1 = interpret_bootsector $mbr;
check_bootsector $b1;
$$out{'bootsect_off'} = $offset;
$b = $$out{'bootsector'} = $b1;
$b_read = 1
}
} |
606
|
0 |
0 |
if ($mbr and defined $$how{'parse_MBR'} || defined $$how{'do_bootsector'} || defined $$how{'do_rootdir'} || defined $$how{'do_FAT'}) |
608
|
0 |
0 |
unless my($fields, @p) = MBR_2_partitions $mbr |
609
|
0 |
0 |
defined $$how{'partition'} ? : |
612
|
0 |
0 |
unless (@valid) |
613
|
0 |
0 |
if $$how{'partition'} |
616
|
0 |
0 |
if @valid > 1 |
621
|
0 |
0 |
if (defined $$how{'do_bootsector'} and not $b_read) |
622
|
0 |
0 |
if $b |
624
|
0 |
0 |
if (defined $$how{'parse_bootsector'} or defined $$how{'do_rootdir'} or defined $$how{'do_FAT'}) { } |
634
|
0 |
0 |
if (defined $$how{'do_FAT'}) |
635
|
0 |
0 |
unless $b |
636
|
0 |
0 |
if $FAT |
638
|
0 |
0 |
unless $$how{'FAT_separate'} |
640
|
0 |
0 |
if $$b{'num_FAT_tables'} <= $$how{'do_FAT'} |
643
|
0 |
0 |
if (defined $$how{'parse_FAT'} and $$b{'last_cluster'} < ($$how{'parse_FAT'} || 3000000)) { } |
654
|
0 |
0 |
if $$how{'raw_FAT'} or not defined $$how{'parse_FAT'} |
656
|
0 |
0 |
if (defined $$how{'do_rootdir'}) |
657
|
0 |
0 |
unless $b |
659
|
0 |
0 |
if ($$how{'rootdir_is_standalone'}) { } |
665
|
0 |
0 |
if ($$b{'guessed_FAT_flavor'} == 32) { } |
671
|
0 |
0 |
if ($FAT) { } |
682
|
0 |
0 |
if (defined $$how{'parse_rootdir'}) |
685
|
0 |
0 |
if ($res || 0) eq 'mid' |
691
|
0 |
0 |
if $close |
698
|
0 |
0 |
unless $size |
704
|
0 |
0 |
if ($len > $size) |
705
|
0 |
0 |
if $len - $L >= $size |
709
|
0 |
0 |
$len > 16777216 ? : |
717
|
0 |
0 |
unless defined $FAT |
720
|
0 |
0 |
unless $total |
729
|
0 |
0 |
if not defined $FAT and defined $exp_len |
736
|
0 |
0 |
unless $total |
743
|
0 |
0 |
if $$f{'is_volume_label'} or $$f{'name'} eq 'EA DATA. SF' or $$f{'name'} eq 'WP ROOT. SF' |
745
|
0 |
0 |
if $$f{'is_subdir'} |
747
|
0 |
0 |
unless open O, '>', $name |
750
|
0 |
0 |
unless close O |
751
|
0 |
0 |
if $$f{'attrib'} & 1 |
765
|
0 |
0 |
if ($res and $$file{'is_subdir'} and not $$file{'deleted'} and not $$file{'name'} =~ /^\.(\.)?$/) |
769
|
0 |
0 |
unless defined $FAT |
783
|
0 |
0 |
unless defined $depth |
786
|
0 |
0 |
if $$f{'is_volume_label'} or $$f{'name'} =~ /^\.(\.)?$/ |
788
|
0 |
0 |
unless $$f{'is_subdir'} |
789
|
0 |
0 |
if @$path >= $depth |
790
|
0 |
0 |
unless $exists and not @$path |
800
|
0 |
0 |
unless defined $depth |
803
|
0 |
0 |
if $$f{'is_volume_label'} |
805
|
0 |
0 |
if $$f{'is_subdir'} |
806
|
0 |
0 |
if $$f{'deleted'} |
807
|
0 |
0 |
if $$f{'name'} =~ /^\.(\.)?$/ |
820
|
0 |
0 |
if (ref $FAT eq 'ARRAY') { } |
823
|
0 |
0 |
unless defined $remain |
825
|
0 |
0 |
if $l > 750000 |
831
|
0 |
0 |
if ($e) { } |
832
|
0 |
0 |
if $c0 |
833
|
0 |
0 |
if $e == $c |
834
|
0 |
0 |
if $cc |
837
|
0 |
0 |
if $cc |
840
|
0 |
0 |
if @out > 1000 |
842
|
0 |
0 |
unless $remain |
844
|
0 |
0 |
if $c0 |
845
|
0 |
0 |
if $cc |
851
|
0 |
0 |
if ($w eq 12) { } |
867
|
0 |
0 |
unless ref $FAT eq 'ARRAY' |
869
|
0 |
0 |
32 == $w ? : |
|
0 |
0 |
if $w != 12 |
871
|
0 |
0 |
$c > 750000 ? : |
881
|
0 |
0 |
if $w eq 12 and $outc % 2 |
883
|
0 |
0 |
$cut ? : |
891
|
0 |
0 |
32 == $w ? : |
|
0 |
0 |
if $w != 12 |
893
|
0 |
0 |
unless sysread $ifh, $F, 40000 |
896
|
0 |
0 |
if ($n1) { } |
900
|
0 |
0 |
if $ccc > 10000 |
901
|
0 |
0 |
if ($n1 == 2) { } |
907
|
0 |
0 |
if @out >= 10000 |
914
|
0 |
0 |
if @out >= 10000 |
917
|
0 |
0 |
if @out |