line |
true |
false |
branch |
393
|
0 |
0 |
unless defined $base |
394
|
0 |
0 |
if ($tagInfo) { } |
397
|
0 |
0 |
if ($tagInfo->{'Format'}) |
409
|
0 |
0 |
if ($size > 4) { } |
417
|
0 |
0 |
unless (ref $value) |
418
|
0 |
0 |
length $value > 32 ? : |
423
|
0 |
0 |
if ($size > 4) |
426
|
0 |
0 |
$subdir ? : |
437
|
197 |
2 |
unless $et |
441
|
0 |
0 |
unless %$newTags or $et->{'DropTags'} or $et->{'EDIT_DIRS'}{'PhaseOne'} |
450
|
0 |
2 |
if $dirLen < 12 |
451
|
0 |
2 |
unless ($tagTablePtr->{'VARS'} and $tagTablePtr->{'VARS'}{'ENTRY_SIZE'}) |
458
|
1 |
1 |
if ($entrySize == 16) { } |
|
0 |
1 |
elsif (not $hdr =~ /^(IIII\x01\0\0\0|MMMM\0\0\0\x01)/s) { } |
459
|
0 |
1 |
unless $hdr =~ /^(IIII.waR|MMMMRaw.)/s |
467
|
0 |
2 |
if $ifdStart + 8 > $dirLen |
473
|
0 |
2 |
if $numEntries < 2 or $numEntries > 300 or $ifdEnd > $dirLen |
483
|
58 |
44 |
if ($entrySize == 16) { } |
486
|
0 |
58 |
unless ($formatStr) |
496
|
56 |
46 |
if ($size > 4) |
497
|
0 |
56 |
if ($size > 2147483647) |
502
|
0 |
56 |
if ($valuePtr + $size > $dirLen) |
510
|
0 |
102 |
if $tagInfo and ref $tagInfo ne "HASH" |
511
|
2 |
100 |
if ($newTags->{$tagID}) { } |
|
1 |
99 |
elsif ($tagInfo and $tagInfo->{'SubDirectory'}) { } |
|
0 |
99 |
elsif ($et->{'DropTags'} and $tagInfo && $tagInfo->{'Drop'} || $size > 8192) { } |
512
|
2 |
0 |
if $tagInfo->{'Format'} |
516
|
2 |
0 |
if ($et->IsOverwriting($nvHash, $val)) |
519
|
2 |
0 |
if $formatStr eq "string" or $formatStr eq "undef" |
521
|
2 |
0 |
if (defined $newValue) |
537
|
1 |
0 |
if (defined $newValue and length $newValue) |
550
|
8 |
94 |
if $size & 3 or not $size |
551
|
46 |
56 |
if ($size <= 4) { } |
|
1 |
55 |
elsif ($tagInfo and $tagInfo->{'PutFirst'}) { } |
591
|
0 |
5 |
if $dirLen < 12 |
592
|
0 |
5 |
unless ($tagTablePtr->{'VARS'} and $tagTablePtr->{'VARS'}{'ENTRY_SIZE'}) |
600
|
3 |
2 |
if ($entrySize == 16) { } |
|
0 |
2 |
elsif (not $hdr =~ /^(IIII\x01\0\0\0|MMMM\0\0\0\x01)/s) { } |
601
|
0 |
3 |
unless $hdr =~ /^(IIII.waR|MMMMRaw.)/s |
609
|
1 |
4 |
if $ifdStart + 8 > $dirLen |
613
|
0 |
4 |
if $numEntries < 2 or $numEntries > 300 or $ifdEnd > $dirLen |
615
|
0 |
4 |
if ($htmlDump) |
629
|
116 |
88 |
if ($entrySize == 16) { } |
|
8 |
80 |
elsif ($size % 4) { } |
633
|
0 |
116 |
unless ($formatStr) |
645
|
112 |
92 |
if ($size > 4) |
646
|
0 |
112 |
if ($size > 2147483647) |
651
|
0 |
112 |
if ($valuePtr + $size > $dirLen) |
658
|
134 |
70 |
if ($tagInfo) { } |
659
|
65 |
69 |
if $tagInfo->{'Format'} |
661
|
70 |
0 |
unless $verbose or $htmlDump |
664
|
0 |
134 |
if ($count > 100000 and not $binary) { } |
669
|
67 |
67 |
if ($formatStr eq "int32s") |
671
|
66 |
1 |
if (defined $val) |
674
|
1 |
65 |
if ($exp > 120 and $exp < 140) |
681
|
0 |
0 |
if ($md5 and $tagInfo and $tagInfo->{'IsImageData'}) |
684
|
0 |
0 |
$len > 65536 ? : |
702
|
0 |
134 |
if $htmlDump |