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