| line |
true |
false |
branch |
|
410
|
0 |
0 |
unless defined $base |
|
411
|
0 |
0 |
if ($tagInfo) { } |
|
414
|
0 |
0 |
if ($tagInfo->{'Format'}) |
|
426
|
0 |
0 |
if ($size > 4) { } |
|
434
|
0 |
0 |
unless (ref $value) |
|
435
|
0 |
0 |
length $value > 32 ? : |
|
440
|
0 |
0 |
if ($size > 4) |
|
443
|
0 |
0 |
$subdir ? : |
|
454
|
201 |
2 |
unless $et |
|
458
|
0 |
0 |
unless %$newTags or $et->{'DropTags'} or $et->{'EDIT_DIRS'}{'PhaseOne'} |
|
467
|
0 |
2 |
if $dirLen < 12 |
|
468
|
0 |
2 |
unless ($tagTablePtr->{'VARS'} and $tagTablePtr->{'VARS'}{'ENTRY_SIZE'}) |
|
475
|
1 |
1 |
if ($entrySize == 16) { } |
|
|
0 |
1 |
elsif (not $hdr =~ /^(IIII\x01\0\0\0|MMMM\0\0\0\x01)/s) { } |
|
476
|
0 |
1 |
unless $hdr =~ /^(IIII.waR|MMMMRaw.)/s |
|
484
|
0 |
2 |
if $ifdStart + 8 > $dirLen |
|
490
|
0 |
2 |
if $numEntries < 2 or $numEntries > 300 or $ifdEnd > $dirLen |
|
500
|
58 |
44 |
if ($entrySize == 16) { } |
|
503
|
0 |
58 |
unless ($formatStr) |
|
513
|
56 |
46 |
if ($size > 4) |
|
514
|
0 |
56 |
if ($size > 2147483647) |
|
519
|
0 |
56 |
if ($valuePtr + $size > $dirLen) |
|
527
|
0 |
102 |
if $tagInfo and ref $tagInfo ne "HASH" |
|
528
|
2 |
100 |
if ($newTags->{$tagID}) { } |
|
|
1 |
99 |
elsif ($tagInfo and $tagInfo->{'SubDirectory'}) { } |
|
|
0 |
99 |
elsif ($et->{'DropTags'} and $tagInfo && $tagInfo->{'Drop'} || $size > 8192) { } |
|
529
|
2 |
0 |
if $tagInfo->{'Format'} |
|
533
|
2 |
0 |
if ($et->IsOverwriting($nvHash, $val)) |
|
536
|
2 |
0 |
if $formatStr eq "string" or $formatStr eq "undef" |
|
538
|
2 |
0 |
if (defined $newValue) |
|
554
|
1 |
0 |
if (defined $newValue and length $newValue) |
|
567
|
8 |
94 |
if $size & 3 or not $size |
|
568
|
46 |
56 |
if ($size <= 4) { } |
|
|
1 |
55 |
elsif ($tagInfo and $tagInfo->{'PutFirst'}) { } |
|
608
|
0 |
5 |
if $dirLen < 12 |
|
609
|
0 |
5 |
unless ($tagTablePtr->{'VARS'} and $tagTablePtr->{'VARS'}{'ENTRY_SIZE'}) |
|
617
|
3 |
2 |
if ($entrySize == 16) { } |
|
|
0 |
2 |
elsif (not $hdr =~ /^(IIII\x01\0\0\0|MMMM\0\0\0\x01)/s) { } |
|
618
|
0 |
3 |
unless $hdr =~ /^(IIII.waR|MMMMRaw.)/s |
|
626
|
1 |
4 |
if $ifdStart + 8 > $dirLen |
|
630
|
0 |
4 |
if $numEntries < 2 or $numEntries > 300 or $ifdEnd > $dirLen |
|
632
|
0 |
4 |
if ($htmlDump) |
|
646
|
116 |
88 |
if ($entrySize == 16) { } |
|
|
8 |
80 |
elsif ($size % 4) { } |
|
650
|
0 |
116 |
unless ($formatStr) |
|
662
|
112 |
92 |
if ($size > 4) |
|
663
|
0 |
112 |
if ($size > 2147483647) |
|
668
|
0 |
112 |
if ($valuePtr + $size > $dirLen) |
|
675
|
134 |
70 |
if ($tagInfo) { } |
|
676
|
65 |
69 |
if $tagInfo->{'Format'} |
|
678
|
70 |
0 |
unless $verbose or $htmlDump |
|
681
|
0 |
134 |
if ($count > 100000 and not $binary) { } |
|
686
|
67 |
67 |
if ($formatStr eq "int32s") |
|
688
|
66 |
1 |
if (defined $val) |
|
691
|
1 |
65 |
if ($exp > 120 and $exp < 140) |
|
698
|
0 |
0 |
if ($hash and $tagInfo and $tagInfo->{'IsImageData'}) |
|
701
|
0 |
0 |
$len > 65536 ? : |
|
719
|
0 |
134 |
if $htmlDump |