| line |
true |
false |
branch |
|
619
|
0 |
182 |
unless my $raf = $dirInfo->{'RAF'} |
|
625
|
0 |
182 |
unless $raf->Seek($blockStart + $blockSize - 4, 0) |
|
626
|
0 |
182 |
unless $raf->Read($buff, 4) == 4 |
|
628
|
0 |
182 |
unless $raf->Seek($dirOffset, 0) |
|
629
|
0 |
182 |
unless $raf->Read($buff, 2) == 2 |
|
632
|
0 |
182 |
unless $raf->Read($buff, 10 * $entries) == 10 * $entries |
|
634
|
7 |
175 |
if $verbose |
|
642
|
0 |
1008 |
if ($tag & 32768) |
|
650
|
156 |
852 |
if ($tagType == 40 || $tagType == 48 and not $valueInDir) |
|
653
|
156 |
0 |
if $tagInfo |
|
654
|
0 |
156 |
unless $name |
|
664
|
6 |
150 |
if ($verbose) |
|
677
|
684 |
168 |
if ($tagInfo) |
|
679
|
64 |
620 |
if $tagInfo->{'Format'} |
|
684
|
381 |
471 |
if ($valueInDir) { } |
|
690
|
282 |
97 |
if not defined $count and $format and $format ne "string" and not $subdir |
|
694
|
457 |
14 |
if ($size <= 512 or $verbose > 2 and $size <= 65536 or $tagInfo and $tagInfo->{'SubDirectory'} || grep(/^$tagInfo->{'Name'}$/i, $et->GetRequestedTags)) { } |
|
700
|
0 |
457 |
unless ($raf->Seek($ptr, 0) and $raf->Read($value, $size) == $size) |
|
706
|
2 |
12 |
if ($tagInfo) |
|
707
|
2 |
0 |
if ($et->Options("Binary") or $verbose) |
|
709
|
0 |
2 |
unless ($raf->Seek($ptr, 0) and $raf->Read($value, $size) == $size) |
|
723
|
540 |
312 |
if ($format and not $count) |
|
729
|
43 |
809 |
if ($verbose) |
|
731
|
39 |
4 |
if $format |
|
743
|
188 |
664 |
if ($buildMakerNotes) |
|
747
|
168 |
684 |
unless defined $tagInfo |
|
749
|
224 |
460 |
if ($subdir) { } |
|
752
|
224 |
0 |
if ($subdir->{'TagTable'}) { } |
|
754
|
0 |
224 |
unless ($newTagTable) |
|
764
|
0 |
224 |
if $subdir->{'Start'} |
|
779
|
0 |
224 |
if (defined $subdir->{'Validate'} and not eval $subdir->{'Validate'}) { } |
|
786
|
444 |
16 |
if $format |
|
789
|
2 |
458 |
if $delRawConv |
|
806
|
0 |
26 |
unless $raf->Read($buff, 2) == 2 |
|
807
|
0 |
26 |
unless &SetByteOrder($buff) |
|
808
|
0 |
26 |
unless $raf->Read($buff, 4) == 4 |
|
809
|
0 |
26 |
unless $raf->Read($sig, 8) == 8 |
|
810
|
0 |
26 |
unless $sig =~ /^HEAP(CCDR|JPGM)/ |
|
813
|
0 |
26 |
unless $raf->Seek(0, 2) |
|
814
|
0 |
26 |
unless my $filesize = $raf->Tell |
|
817
|
6 |
20 |
if $buildMakerNotes |
|
836
|
0 |
26 |
unless (&ProcessCanonRaw($et, \%dirInfo, $rawTagTable)) |
|
842
|
6 |
20 |
if $buildMakerNotes |
|
845
|
7 |
19 |
if ($et->{'FILE_TYPE'} eq "CRW") |
|
847
|
7 |
0 |
if $trailInfo |