line |
true |
false |
branch |
4981
|
71 |
199 |
if ($et->{'FILE_TYPE'} eq "TIFF" and not $et->{'IdentifiedRawFile'}) |
4982
|
3 |
68 |
if ($Image::ExifTool::Exif::compression{$comp} and $Image::ExifTool::Exif::compression{$comp} =~ /^\w+ ([A-Z]{3}) Compressed$/) |
4997
|
0 |
126 |
unless @_ >= 3 |
4999
|
0 |
373 |
unless $_ and /([+-]?(?=\d|\.\d)\d*(\.\d*)?([Ee]([+-]?\d+))?)/ and $1 > 0 |
5028
|
31 |
517 |
if $focal and $foc35 |
5034
|
51 |
466 |
if ($et->{'Make'} eq "Canon") |
5040
|
25 |
26 |
if $canonDiag |
5042
|
483 |
34 |
unless ($diag and &Image::ExifTool::IsFloat($diag)) |
5043
|
0 |
483 |
if ($sens and $sensXY =~ / (\d+(\.?\d*)?)$/) { } |
5049
|
16 |
467 |
if ($xsize and $ysize) |
5052
|
16 |
0 |
if (abs $a - "1.3333" < "0.1" or abs $a - "1.5" < "0.1") |
5057
|
467 |
16 |
unless ($diag) |
5063
|
0 |
123 |
unless &Image::ExifTool::IsFloat($x_res) and $x_res != 0 |
5064
|
0 |
123 |
unless &Image::ExifTool::IsFloat($y_res) and $y_res != 0 |
5067
|
0 |
125 |
if @_ < 2 |
5070
|
2 |
123 |
unless $w and $h |
5072
|
123 |
0 |
if $a > "0.5" and $a < 2 |
5079
|
116 |
7 |
unless $diag > 1 and $diag < 100 |
5091
|
286 |
0 |
if (defined $val) |
5093
|
258 |
28 |
if (not $val) { } |
|
5 |
23 |
elsif (int($val) / $val > 0.999) { } |
|
0 |
23 |
elsif (int($val * 2) / ($val * 2) > 0.999) { } |
|
10 |
13 |
elsif (int($val * 3) / ($val * 3) > 0.999) { } |
5113
|
436 |
731 |
if ($val =~ m[([-+]?\d+)/(\d+)]) |
5114
|
0 |
0 |
$1 ? : |
|
436 |
0 |
$2 ? : |
5128
|
0 |
85 |
if length $val < 8 |
5134
|
0 |
85 |
if ($et->{'OPTIONS'}{'Validate'} and $id =~ /^(ASCII|UNICODE|JIS)?\0* \0*$/) |
5135
|
0 |
0 |
$tag ? : |
5140
|
85 |
0 |
if ($id =~ /^(ASCII)?(\0|[\0 ]+$)/) { } |
|
0 |
0 |
elsif ($id =~ /^(UNICODE)[\0 ]$/) { } |
|
0 |
0 |
elsif ($id =~ /^(JIS)[\0 ]{5}$/) { } |
5145
|
84 |
1 |
if ($asciiFlex and $asciiFlex eq 1) |
5147
|
0 |
84 |
if $enc |
5162
|
0 |
0 |
if $asciiFlex and $asciiFlex ne 1 |
5163
|
0 |
0 |
$tag ? : |
5166
|
0 |
0 |
if ($et->{'WrongByteOrder'} and $et->{'OPTIONS'}{'Validate'}) |
5167
|
0 |
0 |
$tag ? : |
|
0 |
0 |
$type ? : |
5179
|
0 |
0 |
unless length $val > 4 |
5183
|
0 |
0 |
unless @cols == $n + 1 and $pos >= 4 |
5202
|
147 |
48 |
if $inv |
5203
|
48 |
0 |
if ($val > 0) |
5204
|
0 |
48 |
if ($val > 65520) { } |
5223
|
28 |
39 |
if $val =~ /\bn/i or $isFloat and $val == 0 |
5225
|
0 |
39 |
if $val =~ /\b(s|l)/i or $isFloat and $val < 0 |
5227
|
37 |
2 |
if $val =~ /\bh/i or $isFloat |
5252
|
146 |
82 |
unless $levels = shift() |
5254
|
0 |
82 |
if @levels < 2 |
5257
|
74 |
8 |
if ($g < 4) { } |
|
0 |
8 |
elsif ($levels[$$lookup[$blue * 3]] < 4) { } |
5258
|
0 |
74 |
if @levels < 3 |
5259
|
0 |
74 |
unless $g = ($levels[$g] + $levels[$lookup->[2]]) / 2 |
5266
|
4 |
0 |
if not defined $val and ($_[0] and $_[1]) |
5275
|
0 |
559 |
unless &Image::ExifTool::IsFloat($secs) |
5276
|
432 |
127 |
if ($secs < "0.25001" and $secs > 0) |
5289
|
342 |
0 |
if (&Image::ExifTool::IsFloat($val) and $val > 0) |
5291
|
14 |
328 |
$val < 1 ? : |
5304
|
0 |
5 |
if ($val =~ /^[0-6]+$/) |
5308
|
0 |
5 |
unless length $val >= 4 |
5309
|
2 |
3 |
&GetByteOrder() eq 'II' ? : |
5311
|
2 |
3 |
if ($end > @a) |
5314
|
0 |
2 |
if (@a < 2 + $x * $y) { } |
5331
|
0 |
6 |
unless @a >= 2 |
5332
|
0 |
6 |
unless $a[0] and $a[1] |
5334
|
0 |
6 |
if $end > @a |
5339
|
6 |
18 |
if ++$pos >= $end |
5340
|
12 |
6 |
if ($pos - 2) % $a[1] |
5353
|
0 |
0 |
if $inv |
5354
|
0 |
0 |
unless length $$val > 4 |
5359
|
0 |
0 |
unless $pos + 16 <= length $$val |
5375
|
0 |
13 |
unless @vals == 4 |
5378
|
48 |
4 |
if &Image::ExifTool::IsFloat($_) |
5379
|
0 |
4 |
if $_ eq "inf" |
5380
|
4 |
0 |
if $_ eq "undef" |
5382
|
0 |
13 |
unless $c == 4 |
5385
|
10 |
3 |
if $vals[1] and $vals[1] ne $vals[0] |
5387
|
6 |
7 |
if $vals[3] and $vals[3] ne $vals[2] |
5401
|
7 |
46 |
if $unk |
5402
|
20 |
33 |
unless $lens =~ m[($pat)(?:-($pat))?\s*mm.*?(?:[fF]/?\s*)($pat)(?:-($pat))?] |
5405
|
0 |
33 |
unless $a[1] |
5406
|
0 |
33 |
unless $a[3] |
5407
|
1 |
32 |
if ($unk) |
5421
|
0 |
4 |
if (@$try > 1 and $lensModel) |
5424
|
0 |
0 |
if ($lensModel =~ /((\d+-)?\d+mm)/) |
5427
|
0 |
0 |
if @filt and @filt < @$try |
5430
|
0 |
0 |
if (@$try > 1 and $lensModel =~ m[(?:F/?|1:)(\d+(\.\d+)?)]i) |
5433
|
0 |
0 |
if @filt and @filt < @$try |
5437
|
0 |
0 |
unless @$try > 1 and $lensModel =~ /\b($pat)\b/ |
5440
|
0 |
0 |
if @filt and @filt < @$try |
5458
|
0 |
34 |
unless defined $lensType |
5460
|
34 |
0 |
unless $printConv |
5463
|
0 |
34 |
unless (ref $printConv eq "HASH") |
5464
|
0 |
0 |
if (ref $printConv eq 'ARRAY' and ref $printConv->[0] eq 'HASH') { } |
5469
|
0 |
0 |
if $lensTypePrt =~ /mm/ |
5470
|
0 |
0 |
if $lensTypePrt =~ s[(\d)/F][$1mm F] |
5476
|
0 |
34 |
if ($lensSpecPrt) |
5478
|
0 |
0 |
unless $sa0 |
5481
|
2 |
32 |
unless $maxAperture |
5482
|
1 |
33 |
if ($lensFocalRange and $lensFocalRange =~ /^(\d+)(?: (?:to )?(\d+))?$/) |
5485
|
0 |
34 |
if ($et->{'Make'} eq 'SONY') { } |
|
28 |
6 |
elsif ($shortFocal and $longFocal and not $lensModel && $lensModel =~ /^TAMRON.*-\d+mm/) { } |
5486
|
0 |
0 |
if ($lensType eq 65535) { } |
|
0 |
0 |
elsif ($lensType != 65280) { } |
5488
|
0 |
0 |
if ($et->{'Model'} =~ /NEX|ILCE/) |
5489
|
0 |
0 |
unless (%sonyEtype) |
5494
|
0 |
0 |
if $did{$lens} |
5495
|
0 |
0 |
$index ? : |
5508
|
0 |
0 |
if ($Image::ExifTool::Minolta::metabonesID{$lensType & 65280}) { } |
|
0 |
0 |
elsif ($lensType >= 18688 and $lensType <= 22794) { } |
5509
|
0 |
0 |
$lensType >= 48128 ? : |
|
0 |
0 |
$lensType >= 61184 ? : |
5512
|
0 |
0 |
if $printConv->{$lensType} |
5520
|
0 |
0 |
if $printConv->{$lensType} |
5532
|
1 |
5 |
unless $lens |
5533
|
1 |
4 |
unless $$printConv{"$lensType.1"} |
5544
|
0 |
32 |
if $Image::ExifTool::userLens{$lens} |
5550
|
4 |
28 |
unless $sf |
5552
|
0 |
28 |
if ($sf0) |
5553
|
0 |
0 |
if abs $sf - $sf0 > "0.5" or abs $sa - $sa0 > "0.15" or abs $lf - $lf0 > "0.5" or abs $la - $la0 > "0.15" |
5560
|
0 |
0 |
if $lensSpecPrt and $lens =~ / \Q$lensSpecPrt\E( \(| GM$|$)/ |
5562
|
0 |
0 |
unless $lens =~ /^Sony / |
5566
|
0 |
28 |
if ($lens =~ / \+ .*? (\d+(\.\d+)?)x( |$)/) |
5571
|
28 |
0 |
if ($focalLength) |
5572
|
19 |
9 |
if $focalLength < $sf - "0.5" |
5573
|
1 |
8 |
if $focalLength > $lf + "0.5" |
5575
|
8 |
0 |
if ($maxAperture) |
5581
|
5 |
3 |
if $maxAperture < $sa - "0.15" |
5582
|
0 |
3 |
if $maxAperture > $la + "0.15" |
5585
|
3 |
0 |
if ($sf == $lf or $sa == $la or $focalLength <= $sf) { } |
|
0 |
0 |
elsif ($focalLength >= $lf) { } |
5599
|
0 |
3 |
if (defined $diff) |
5600
|
0 |
0 |
if $d > $diff + "0.15" |
5601
|
0 |
0 |
if $d < $diff - "0.15" |
5609
|
0 |
4 |
if (@user) |
5611
|
0 |
0 |
if (@user > 1) |
5615
|
0 |
0 |
if @good |
5621
|
1 |
3 |
unless @best |
5622
|
3 |
1 |
if (@best) |
5627
|
0 |
1 |
if $lensModel and $lens =~ / or / |
5681
|
52 |
8 |
ref $tagInfo eq 'HASH' ? : |
5682
|
0 |
60 |
unless defined $fmt |
5684
|
0 |
60 |
unless defined $val |
5687
|
4 |
56 |
if $tag == 273 |
5688
|
12 |
48 |
if (length $val > 4) { } |
5692
|
24 |
24 |
if length $val < 4 |
5697
|
0 |
4 |
unless $offsetPos |
5714
|
0 |
14 |
if $et->{'FILE_TYPE'} eq "RWZ" |
5717
|
26 |
14 |
$i ? : |
5718
|
14 |
26 |
unless defined $value->{$key} |
5719
|
14 |
12 |
unless $value->{$key} == 1 |
5722
|
6 |
6 |
unless $cmp == 1 |
5729
|
58 |
2 |
if defined $val |
5730
|
0 |
2 |
unless defined $vals{$_} |
5741
|
2 |
4 |
unless $len[$j] == $rowBytes * $vals{'RowsPerStrip'} |
5743
|
0 |
4 |
unless defined $tmp |
5766
|
0 |
4 |
if (not defined $img) { } |
|
0 |
4 |
elsif ($rtn or $w > 256) { } |
5767
|
0 |
0 |
$w > 256 ? : |
5775
|
0 |
14 |
unless wantarray |
5793
|
61 |
139 |
if not $len or $et->{'FILE_TYPE'} eq "XMP" |
5796
|
97 |
42 |
if (defined $dataPos and $offset >= $dataPos and $offset + $len <= $dataPos + length($$dataPt)) { } |
5800
|
5 |
37 |
unless defined $image |
5802
|
0 |
0 |
if ($tag and $tag eq "ThumbnailImage" and $et->{'TIFF_TYPE'} eq "ARW" and $et->{'Model'} eq "DSLR-A100" and $offset < 65536 and not $image =~ /^(Binary data|\xff\xd8\xff)/) |
5807
|
0 |
0 |
if (defined $try and $try =~ /^\xff\xd8\xff/) |
5824
|
19 |
1 |
$tagInfo ? : |
5836
|
0 |
0 |
defined $et->{'OffsetNum'} ? : |
5839
|
0 |
0 |
defined $id ? : |
5871
|
823 |
228 |
if $tagTablePtr->{'GROUPS'}{'0'} eq "EXIF" |
5874
|
7 |
0 |
if ($validate || $Image::ExifTool::MWG::strict and $dirName eq "IFD0" and $isExif and $et->{'FILE_TYPE'} =~ /^(JPEG|TIFF|PSD)$/) |
5878
|
0 |
7 |
unless ($path =~ /^(JPEG-APP1-IFD0|TIFF-IFD0|PSD-EXIFInfo-IFD0)$/) |
5879
|
0 |
0 |
if ($Image::ExifTool::MWG::strict) { } |
5888
|
0 |
1051 |
if $htmlDump |
5889
|
7 |
1044 |
if $validate and not $verbose |
5890
|
1 |
1050 |
if $dirName eq "EXIF" |
5891
|
270 |
781 |
if $dirName =~ /^(IFD0|SubIFD)$/ and not defined $dirInfo->{'Multi'} |
5894
|
500 |
30 |
unless $dir and $inMakerNotes and not $dir =~ /^MakerNote/ |
5897
|
975 |
76 |
if ($dirStart >= 0 and $dirStart <= $dataLen - 2) |
5902
|
361 |
614 |
if ($dirSize > $dirLen) |
5903
|
0 |
361 |
if ($verbose > 0 || $validate and not $dirInfo->{'SubIFD'}) |
5909
|
0 |
361 |
if $dirEnd > $dataLen |
5913
|
76 |
975 |
unless ($dirSize) |
5915
|
76 |
0 |
if ($raf) |
5919
|
76 |
0 |
if ($raf->Seek($offset + $base, 0) and $raf->Read($buff, 2) == 2) |
5922
|
76 |
0 |
if ($raf->Read($buf2, $len + 4) >= $len) |
5933
|
76 |
0 |
if ($success) { } |
5937
|
0 |
0 |
unless $inMakerNotes and $dirLen >= 14 and $dirStart >= 0 and $dirStart + $dirLen <= length $$dataPt |
5946
|
14 |
1037 |
if $verbose > 0 |
5948
|
4 |
1047 |
if ($bytesFromEnd < 4) |
5949
|
0 |
4 |
unless ($bytesFromEnd == 2 or $bytesFromEnd == 0) |
5955
|
123 |
928 |
if (defined $dirInfo->{'MakerNoteAddr'}) |
5958
|
3 |
120 |
if (&Image::ExifTool::MakerNotes::FixBase($et, $dirInfo)) |
5963
|
0 |
1051 |
if ($htmlDump) |
5965
|
0 |
0 |
$dir eq 'MakerNotes' ? : |
5966
|
0 |
0 |
if (defined $makerAddr) |
5968
|
0 |
0 |
if $hdrLen > 0 |
5970
|
0 |
0 |
unless ($dirInfo->{'NoDumpEntryCount'}) |
5976
|
0 |
0 |
if ($bytesFromEnd >= 4) |
5977
|
0 |
0 |
$dir =~ /^(.*?)(\d+)$/ ? : |
5980
|
0 |
0 |
if $off |
5987
|
0 |
172 |
if ($inMakerNotes and $et->{'Model'} eq "Canon EOS 40D" and $numEntries) |
5990
|
0 |
0 |
if ($fmt < 1 or $fmt > 13) |
6004
|
7 |
1044 |
if $tagTablePtr->{'VARS'} |
6008
|
0 |
14986 |
if ($warnCount > 10) |
6009
|
0 |
0 |
if $et->Warn("Too many warnings -- $dir parsing aborted", 2) |
6015
|
0 |
14986 |
if ($format < 1 or $format > 13) |
6016
|
0 |
0 |
if ($mapFmt and $mapFmt->{$format}) { } |
6022
|
0 |
0 |
if ($format or $validate) |
6027
|
0 |
0 |
unless $index or $et->{'Model'} eq "ILCE-7M2" |
6039
|
0 |
14986 |
if $saveFormat |
6041
|
0 |
8918 |
if ($count < 2 and ref $tagTablePtr->{$tagID} eq "HASH" and $tagTablePtr->{$tagID}{'FixCount'}) |
6042
|
0 |
0 |
unless $offList |
6045
|
0 |
0 |
if (defined $i and $i < $#$offList) |
6048
|
0 |
0 |
if $oldCount != $count |
6051
|
63 |
14923 |
if $validate and not $inMakerNotes |
6055
|
6739 |
8247 |
if ($size > 4) |
6056
|
0 |
6739 |
if ($size > 2147483647 and not $tagInfo && $tagInfo->{'ReadFromRAF'}) |
6062
|
20 |
6719 |
if ($validate and not $inMakerNotes) |
6064
|
0 |
20 |
if $valuePtr & 1 |
6065
|
0 |
20 |
if ($valuePtr < 8 or $valuePtr + $size > length $$dataPt and $valuePtr + $size > $et->{'VALUE'}{'FileSize'}) |
6072
|
0 |
20 |
if ($valuePtr + $size > $dirStart + $dataPos and $valuePtr < $dirEnd + $dataPos + 4) |
6076
|
81 |
0 |
if $_->[0] >= $valuePtr + $size or $_->[0] + $_->[1] <= $valuePtr |
6082
|
0 |
6739 |
if ($dirInfo->{'FixOffsets'}) |
6084
|
0 |
0 |
unless $valEnd |
6090
|
2 |
6737 |
if $valuePtr < 8 and not $dirInfo->{'ZeroOffsetOK'} |
6092
|
10 |
6729 |
if ($dirInfo->{'EntryBased'} or ref $tagTablePtr->{$tagID} eq 'HASH' and $tagTablePtr->{$tagID}{'EntryBased'}) { } |
6100
|
0 |
6739 |
if $valuePtr < $dirEnd and $valuePtr + $size > $dirStart |
6102
|
449 |
6290 |
if ($valuePtr < 0 or $valuePtr + $size > $dataLen) |
6105
|
449 |
0 |
if ($raf) { } |
6108
|
0 |
0 |
if ($tagInfo) { } |
6110
|
0 |
0 |
if $tagInfo->{'Unknown'} |
6111
|
0 |
0 |
unless $tagInfo->{'Binary'} |
6112
|
0 |
0 |
if $tagInfo->{'SubDirectory'} |
6114
|
0 |
0 |
if ($et->{'OPTIONS'}{'Binary'} and not $et->{'EXCL_TAG_LOOKUP'}{$lcTag}) |
6118
|
0 |
0 |
unless $et->{'TAGS_FROM_FILE'} and $tagInfo->{'Protected'} |
6121
|
0 |
0 |
if $et->{'REQ_TAG_LOOKUP'}{$lcTag} |
6124
|
0 |
0 |
if defined $tagInfo |
6134
|
449 |
0 |
unless (defined $buff) |
6137
|
0 |
449 |
if (not $raf->Seek($base + $valuePtr + $dataPos, 0)) { } |
|
0 |
449 |
elsif ($readFromRAF and $size > BINARY_DATA_LIMIT() and not $et->{'REQ_TAG_LOOKUP'}{lc $tagInfo->{'Name'}}) { } |
|
0 |
449 |
elsif ($raf->Read($buff, $size) != $size) { } |
|
0 |
449 |
elsif ($readFromRAF) { } |
6150
|
0 |
449 |
if ($wrn) |
6152
|
0 |
0 |
unless $inMakerNotes or $htmlDump |
6154
|
0 |
0 |
unless defined $buff |
6165
|
0 |
0 |
if ($tagInfo) { } |
|
0 |
0 |
elsif (defined $tagInfo) { } |
6170
|
0 |
0 |
if ($tmpInfo) |
6175
|
0 |
0 |
if ($tagInfo and $tagInfo->{'ChangeBase'}) |
6181
|
0 |
0 |
unless $tagStr |
6183
|
0 |
0 |
if ($tagStr eq 'PreviewImage' and $et->{'RAF'}) { } |
|
0 |
0 |
elsif ($leicaTrailer and $et->{'RAF'}) { } |
6192
|
0 |
0 |
if ($verbose > 0) |
6195
|
0 |
0 |
if ($et->Options('FastScan')) { } |
6210
|
0 |
0 |
unless (defined $buff) |
6220
|
2 |
6737 |
if (defined $suspect and $suspect == $warnCount) |
6221
|
2 |
0 |
$tagInfo ? : |
6222
|
2 |
0 |
if ($et->Warn("Suspicious $dir offset for $tagStr", $inMakerNotes)) |
6224
|
2 |
0 |
unless $verbose |
6229
|
298 |
14686 |
if $format == 7 and $count == 1 |
6232
|
0 |
14984 |
if ($tagID > 61440 and $isExif) |
6234
|
0 |
0 |
if (!$oldInfo || ref $oldInfo eq 'HASH' && $oldInfo->{'Condition'} && !$oldInfo->{'PSRaw'} and not $bad) |
6240
|
0 |
0 |
if (defined $val and $val =~ /(.*): (.*)/) |
6245
|
0 |
0 |
if ($tag) |
6254
|
0 |
0 |
if $oldInfo |
6259
|
387 |
14597 |
if (defined $tagInfo and not $tagInfo) |
6260
|
0 |
387 |
if ($bad) { } |
6264
|
169 |
218 |
$readSize < 128 ? : |
6271
|
0 |
14984 |
if ($format == 13 || $format == 18 and not $tagInfo && $tagInfo->{'SubIFD'}) |
6275
|
14436 |
548 |
if (defined $tagInfo) { } |
6280
|
702 |
543 |
if $subdir and not $tagInfo->{'SubIFD'} and not $readFormat |
6282
|
1737 |
12699 |
if ($readFormat) |
6285
|
946 |
791 |
if ($newNum and $newNum != $format) |
6288
|
0 |
946 |
if $tagInfo->{'FixedSize'} |
6294
|
0 |
14436 |
if ($tagInfo->{'IsOffset'} || $tagInfo->{'SubIFD'} and not $Image::ExifTool::Exif::intFormat{$formatStr}) |
6296
|
0 |
0 |
if ($validate) |
6300
|
0 |
0 |
unless $verbose |
6304
|
545 |
3 |
unless $verbose |
6306
|
14439 |
0 |
unless ($bad) |
6310
|
0 |
14439 |
if ($count > 100000 and not $formatStr =~ /^(undef|string|binary)$/) |
6311
|
0 |
0 |
$tagInfo ? : |
6313
|
0 |
0 |
if ($tagName ne "TransferFunction" or $count != 196608) |
6314
|
0 |
0 |
$count > 2000000 ? : |
6315
|
0 |
0 |
if ($et->Warn("Ignoring $dirName $tagName with excessive count", $minor)) |
6316
|
0 |
0 |
unless $et->{'OPTIONS'}{'HtmlDump'} |
6321
|
0 |
14439 |
if ($count > 500 and not $formatStr =~ /^(undef|string|binary)$/ and !$tagInfo || $tagInfo->{'LongBinary'} || $warned and not $et->{'OPTIONS'}{'IgnoreMinorErrors'}) { } |
6324
|
0 |
0 |
unless $warned |
6325
|
0 |
0 |
if $et->{'TAGS_FROM_FILE'} |
6331
|
0 |
0 |
if $strEnc and $formatStr eq "string" and defined $val |
6335
|
345 |
14094 |
if ($verbose) |
6338
|
40 |
305 |
if defined $rational |
6339
|
0 |
345 |
if ($htmlDump) { } |
6341
|
0 |
0 |
if ($tagID == 37500 and $dirName eq 'ExifIFD') { } |
|
0 |
0 |
elsif ($tagInfo) { } |
6350
|
0 |
0 |
if $size < 0 |
6352
|
0 |
0 |
if $origFormStr and $origFormStr ne $fstr |
6353
|
0 |
0 |
if $wrongFormat |
6356
|
0 |
0 |
if ($size > 4) { } |
6362
|
0 |
0 |
$bad || !defined($tval) ? : |
6363
|
0 |
0 |
if ($actPt != $offPt) |
6365
|
0 |
0 |
$actPt < $offPt ? : |
6367
|
0 |
0 |
if $style eq "H" |
6369
|
0 |
0 |
if ($et->{'EXIF_POS'} and not $et->{'BASE_FUDGE'}) |
6373
|
0 |
0 |
if $offPt & 1 |
6377
|
0 |
0 |
if $wrongFormat |
6378
|
0 |
0 |
if $tagID <= $lastID and not $inMakerNotes |
6380
|
0 |
0 |
if (not defined $tval) { } |
6383
|
0 |
0 |
if length $tval > 32 |
6384
|
0 |
0 |
if ($formatStr =~ /^(string|undef|binary)/) { } |
|
0 |
0 |
elsif ($tagInfo and &Image::ExifTool::IsInt($tval)) { } |
6388
|
0 |
0 |
if ($tagInfo->{'IsOffset'} or $tagInfo->{'SubIFD'}) { } |
|
0 |
0 |
elsif ($tagInfo->{'PrintHex'}) { } |
6391
|
0 |
0 |
if ($actPt != $val) |
6393
|
0 |
0 |
$actPt < $val ? : |
6404
|
0 |
0 |
if $tagInfo and $tagInfo->{'SubIFD'} |
6406
|
0 |
0 |
if $valueDataLen < 0 |
6407
|
0 |
0 |
if ($size > 4) |
6410
|
0 |
0 |
if ($subdir) |
6411
|
0 |
0 |
if ($tagInfo->{'MakerNotes'}) { } |
|
0 |
0 |
elsif ($tagInfo->{'NestedHtmlDump'}) { } |
6414
|
0 |
0 |
$tagInfo->{'NestedHtmlDump'} == 2 ? : |
6421
|
0 |
345 |
if ($tagID <= $lastID and not $inMakerNotes) |
6422
|
0 |
0 |
$tagInfo ? : |
6423
|
0 |
0 |
if ($tagID == $lastID) { } |
6430
|
257 |
88 |
if ($verbose > 0) |
6432
|
13 |
244 |
if $origFormStr |
6446
|
3 |
342 |
if not $tagInfo or $wrongFormat |
6448
|
0 |
14436 |
unless defined $val |
6452
|
1245 |
13191 |
if ($subdir) |
6454
|
0 |
1245 |
unless ($size) |
6455
|
0 |
0 |
unless ($tagInfo->{'MakerNotes'} or $inMakerNotes) |
6462
|
144 |
1101 |
if ($subdir->{'MaxSubdirs'}) |
6466
|
0 |
144 |
if ($over > 0) |
6472
|
902 |
343 |
if ($subdir->{'TagTable'}) { } |
6474
|
0 |
902 |
unless $newTagTable |
6485
|
443 |
808 |
if (defined $subdir->{'Start'}) |
6490
|
0 |
443 |
unless (&Image::ExifTool::IsInt($newStart)) |
6497
|
51 |
0 |
unless ($tagInfo->{'SubIFD'} or $subdir->{'BadOffset'}) |
6506
|
171 |
1080 |
if ($newByteOrder) { } |
6507
|
31 |
140 |
if ($newByteOrder =~ /^Little/i) { } |
|
29 |
111 |
elsif ($newByteOrder =~ /^Big/i) { } |
|
0 |
111 |
elsif ($subdir->{'OffsetPt'}) { } |
|
111 |
0 |
elsif ($subdirStart + 2 <= $subdirDataLen) { } |
6520
|
4 |
107 |
if ($num & 65280 and $num >> 8 > ($num & 255)) { } |
6532
|
35 |
1216 |
if ($subdir->{'Base'}) |
6539
|
24 |
1227 |
if ($subdir->{'OffsetPt'}) |
6542
|
0 |
24 |
if ($pos + 4 > $subdirDataLen) |
6550
|
31 |
1220 |
if ($subdirStart < 0 or $subdirStart + 2 > $subdirDataLen) |
6552
|
31 |
0 |
if ($raf) { } |
6559
|
0 |
0 |
if ($verbose > 0) |
6560
|
0 |
0 |
if ($subdirStart < 0) { } |
6596
|
130 |
1121 |
if ($tagInfo->{'MakerNotes'}) |
6599
|
1 |
129 |
if $fast and $fast > 1 |
6601
|
33 |
96 |
if defined $subdir->{'Base'} |
6606
|
392 |
858 |
if ($tagInfo->{'Groups'} and not $tagInfo->{'Writable'}) |
6609
|
6 |
386 |
if $dirNum |
6616
|
0 |
1250 |
if (defined $subdir->{'Validate'} and not eval $subdir->{'Validate'}) { } |
6620
|
622 |
628 |
if (not $subdirInfo{'DirName'} and $inMakerNotes) |
6627
|
0 |
7 |
if (not $ok and $verbose > 1 and $subdirStart != $valuePtr) |
6633
|
1244 |
6 |
unless @values |
6637
|
1041 |
2 |
unless $doMaker or $et->{'REQ_TAG_LOOKUP'}{lc $tagStr} or $tagInfo->{'BlockExtract'} |
6639
|
20 |
184 |
if ($tagInfo->{'MakerNotes'}) { } |
6641
|
20 |
0 |
if ($subdir->{'ByteOrder'} and not $invalid) |
6644
|
1 |
19 |
defined $et->{'UnknownByteOrder'} ? : |
6646
|
0 |
20 |
if ($doMaker and $doMaker eq '2') { } |
|
20 |
0 |
elsif (not $tagInfo->{'NotIFD'} or $tagInfo->{'IsPhaseOne'}) { } |
6667
|
0 |
20 |
if ($tagInfo->{'IsPhaseOne'}) { } |
6672
|
1 |
19 |
if $subdir->{'FixBase'} |
6676
|
20 |
0 |
if (defined $val2) { } |
|
0 |
0 |
elsif ($size > 4) { } |
6684
|
168 |
16 |
unless $tagInfo->{'Writable'} |
6690
|
224 |
13003 |
if ($tagInfo->{'IsOffset'} and eval $tagInfo->{'IsOffset'}) |
6691
|
4 |
220 |
$tagInfo->{'IsOffset'} eq '2' ? : |
6694
|
0 |
224 |
if ($tagInfo->{'WrongBase'}) |
6705
|
70 |
13157 |
if ($validate) |
6706
|
10 |
60 |
if ($tagInfo->{'OffsetPair'}) { } |
|
10 |
100 |
elsif ($Image::ExifTool::Exif::saveForValidate{$tagID} and $isExif) { } |
6714
|
13216 |
11 |
if (defined $tagKey) |
6716
|
9885 |
3331 |
if $tagTablePtr->{'SET_GROUP1'} |
6718
|
2872 |
10344 |
if defined $rational |
6719
|
0 |
13216 |
if $saveFormat |
6724
|
5 |
1046 |
if ($validate and %offsetInfo) |
6729
|
289 |
762 |
if ($dirInfo->{'Multi'} and $bytesFromEnd >= 4) { } |
|
170 |
592 |
elsif (defined $dirInfo->{'Multi'}) { } |
6738
|
289 |
169 |
unless my $offset = &Get32u($dataPt, $dirEnd) |
6741
|
169 |
0 |
$newDirInfo{'DirName'} =~ s/(\d+)$// ? : |
6744
|
169 |
0 |
if ($newDirInfo{'DirName'} ne 'SubIFD1' or &ValidateIFD(\%newDirInfo)) { } |
|
0 |
0 |
elsif ($verbose or $et->{'TIFF_TYPE'} eq 'TIFF') { } |
6746
|
0 |
169 |
unless $et->ProcessDirectory(\%newDirInfo, $tagTablePtr) |
6748
|
169 |
0 |
if ($success and $newDirInfo{'BytesFromEnd'} >= 4) |