| 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 |