line |
true |
false |
branch |
667
|
0 |
0 |
if $i + $n >= $len |
668
|
0 |
0 |
if $i |
688
|
0 |
4 |
unless $fileType eq "PSD" or $fileType eq "PSB" |
691
|
0 |
4 |
$fileType eq 'PSB' ? : |
695
|
0 |
4 |
unless $raf->Read($data, $n) == $n |
696
|
0 |
4 |
$psb ? : |
697
|
0 |
4 |
if $tot == 0 |
700
|
0 |
4 |
$psb ? : |
703
|
4 |
0 |
if ($len == 0 and $num == 0) |
704
|
0 |
4 |
unless $raf->Read($data, 10) == 10 |
705
|
0 |
4 |
if ($data =~ /^..8BIMLr16/s) { } |
|
0 |
4 |
elsif ($data =~ /^..8BIMMt16/s) { } |
706
|
0 |
0 |
unless $raf->Read($data, $psiz + 2) == $psiz + 2 |
707
|
0 |
0 |
$psb ? : |
709
|
0 |
0 |
unless $raf->Read($data, $psiz) == $psiz |
710
|
0 |
0 |
unless $raf->Read($data, 8) == 8 |
711
|
0 |
0 |
if ($data eq '8BIMLr16') { } |
712
|
0 |
0 |
unless $raf->Read($data, $psiz + 2) == $psiz + 2 |
713
|
0 |
0 |
$psb ? : |
715
|
0 |
0 |
unless $raf->Seek(-18 - $psiz, 1) |
718
|
0 |
4 |
unless $raf->Seek(-10, 1) |
722
|
0 |
4 |
unless $raf->Seek(-2, 1) |
731
|
4 |
0 |
$raf->Seek($end, 0) ? : |
749
|
0 |
4 |
if $dirLen < 2 |
750
|
0 |
4 |
unless $raf->Read($buff, 2) == 2 |
752
|
0 |
4 |
if $num < 0 |
760
|
0 |
4 |
$psb ? : |
763
|
0 |
0 |
if $pos + 18 > $dirLen |
764
|
0 |
0 |
unless $raf->Read($buff, 18) == 18 |
770
|
0 |
0 |
unless $raf->Seek($n, 1) |
772
|
0 |
0 |
if $pos + 20 > $dirLen |
773
|
0 |
0 |
unless $raf->Read($buff, 20) == 20 |
776
|
0 |
0 |
unless $sig =~ /^(8BIM|MIB8)$/ |
782
|
0 |
0 |
if $pos + 4 > $dirLen |
783
|
0 |
0 |
unless $raf->Seek($n, 1) and $raf->Read($buff, 4) == 4 |
786
|
0 |
0 |
if $pos + 1 > $dirLen |
787
|
0 |
0 |
unless $raf->Seek($n, 1) and $raf->Read($buff, 1) == 1 |
789
|
0 |
0 |
if $pos + 1 + $n > $dirLen |
790
|
0 |
0 |
unless $raf->Read($buff, $n) == $n |
794
|
0 |
0 |
if $frag |
799
|
0 |
0 |
unless $raf->Read($buff, 12) == 12 |
801
|
0 |
0 |
if &GetByteOrder() eq "II" |
803
|
0 |
0 |
unless $sig eq "8BIM" or $sig eq "8B64" |
808
|
0 |
0 |
if ($psb and $tag =~ /^(LMsk|Lr16|Lr32|Layr|Mt16|Mt32|Mtrn|Alph|FMsk|lnk2|FEid|FXid|PxSD)$/) { } |
809
|
0 |
0 |
if $pos + 16 > $nxt |
810
|
0 |
0 |
unless $raf->Read($buf2, 4) == 4 |
818
|
0 |
0 |
if $pos + $n > $nxt |
820
|
0 |
0 |
if ($tagTablePtr->{$tag} or $verbose) { } |
822
|
0 |
0 |
unless defined $count{$tag} |
823
|
0 |
0 |
unless $raf->Read($buff, $n) == $n |
831
|
0 |
0 |
if ($frag) |
832
|
0 |
0 |
unless $raf->Seek(4 - $frag, 1) |
836
|
0 |
0 |
if $frag |
837
|
0 |
0 |
unless $raf->Seek($n, 1) |
861
|
0 |
0 |
unless ($raf) |
865
|
0 |
0 |
if $start |
866
|
0 |
0 |
unless defined $dirLen |
869
|
0 |
0 |
unless ($raf->Read($buff, $pos) == $pos and $buff =~ /^Adobe Photoshop Document Data (Block|V0002)\0/) |
879
|
0 |
0 |
unless $raf->Read($buff, 8) == 8 |
881
|
0 |
0 |
$buff =~ /^(8BIM|8B64)/ ? : |
|
0 |
0 |
if $pos == 36 |
882
|
0 |
0 |
if &GetByteOrder() eq "II" |
884
|
0 |
0 |
unless $sig eq "8BIM" or $sig eq "8B64" |
886
|
0 |
0 |
if ($psb and $tag =~ /^(LMsk|Lr16|Lr32|Layr|Mt16|Mt32|Mtrn|Alph|FMsk|lnk2|FEid|FXid|PxSD)$/) { } |
887
|
0 |
0 |
if $pos + 16 > $dirLen |
888
|
0 |
0 |
unless $raf->Read($buff, 8) == 8 |
892
|
0 |
0 |
unless $raf->Read($buff, 4) == 4 |
896
|
0 |
0 |
if $pos + $n > $dirLen |
899
|
0 |
0 |
if ($tagInfo or $verbose) { } |
900
|
0 |
0 |
if ($tagInfo and $tagInfo->{'SubDirectory'}) { } |
904
|
0 |
0 |
unless $raf->Seek($fpos, 0) |
909
|
0 |
0 |
unless $raf->Read($buff, $n) == $n |
911
|
0 |
0 |
unless $raf->Seek($pad, 1) |
914
|
0 |
0 |
unless $raf->Seek($n + $pad, 1) |
918
|
0 |
0 |
if $err |
937
|
5 |
88 |
if ($Image::ExifTool::MWG::strict || $et->Options('Validate') and $et->{'FILE_TYPE'} =~ /^(JPEG|TIFF|PSD)$/) |
941
|
0 |
5 |
unless ($path =~ /^(JPEG-APP13-Photoshop|TIFF-IFD0-Photoshop|PSD)$/) |
942
|
0 |
0 |
if ($Image::ExifTool::MWG::strict) { } |
950
|
0 |
93 |
if ($et->{'FILE_TYPE'} eq "JPEG" and $dirInfo->{'Parent'} ne "APP13") |
954
|
0 |
93 |
if $verbose |
965
|
1182 |
0 |
if ($type eq '8BIM') { } |
|
0 |
0 |
elsif ($type =~ /^(PHUT|DCSR|AgHg|MeSa)$/) { } |
980
|
1182 |
0 |
unless $nameLen & 1 |
981
|
0 |
1182 |
if ($pos + 4 > $dirEnd) |
987
|
0 |
1182 |
if ($size + $pos > $dirEnd) |
992
|
0 |
1182 |
if ($nameLen) { } |
1000
|
0 |
0 |
if ($tagInfo and defined $tagInfo->{'SetResourceName'} and $tagInfo->{'SetResourceName'} eq 1 and not $name =~ m[/#]) |
1015
|
388 |
794 |
if $size & 1 |
1019
|
32 |
28 |
if ($et->{'VALUE'}{'IPTCDigest'} and $et->{'VALUE'}{'CurrentIPTCDigest'} and $et->{'VALUE'}{'IPTCDigest'} ne $et->{'VALUE'}{'CurrentIPTCDigest'}) |
1039
|
0 |
5 |
unless $raf->Read($data, 30) == 30 |
1040
|
0 |
5 |
unless $data =~ /^8BPS\0([\x01\x02])/ |
1042
|
5 |
0 |
$1 eq "\cA" ? : |
1049
|
1 |
4 |
if ($outfile) { } |
1050
|
0 |
1 |
unless &Write($outfile, $data) |
1051
|
0 |
1 |
unless $raf->Read($data, $len) == $len |
1052
|
0 |
1 |
unless &Write($outfile, $data) |
1060
|
0 |
4 |
unless $raf->Seek($len, 1) |
1063
|
0 |
5 |
unless $raf->Read($data, 4) == 4 |
1065
|
0 |
5 |
unless $raf->Read($data, $len) == $len |
1069
|
1 |
4 |
if ($outfile) { } |
|
0 |
4 |
elsif ($err) { } |
1072
|
1 |
0 |
if ($data) { } |
1074
|
0 |
1 |
unless &Write($outfile, $len, $data) |
1077
|
1 |
0 |
if ($trailInfo) |
1081
|
1 |
0 |
if ($et->ProcessTrailers($trailInfo)) { } |
1083
|
1 |
0 |
if ($copyBytes >= 0) { } |
1086
|
0 |
1 |
$copyBytes > 65536 ? : |
1087
|
0 |
1 |
unless $raf->Read($data, $n) == $n |
1088
|
0 |
1 |
unless &Write($outfile, $data) |
1092
|
0 |
1 |
unless $et->WriteTrailerBuffer($trailInfo, $outfile) |
1101
|
0 |
1 |
unless ($trailInfo) |
1104
|
0 |
0 |
unless &Write($outfile, $data) |
1110
|
0 |
1 |
if $err |
1121
|
4 |
0 |
if (&ProcessLayersAndMask($et, \%dirInfo, $tagTablePtr) and $raf->Read($data, 2) == 2) |
1135
|
4 |
0 |
if $trailInfo |