blib/lib/Image/ExifTool/MIE.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 84 | 214 | 39.2 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
778 | 0 | 0 | 0 | ref $tagInfo eq "HASH" and $tagInfo->{'SubDirectory'} |
783 | 0 | 0 | 0 | $subTablePtr->{'PROCESS_PROC'} and $subTablePtr->{'PROCESS_PROC'} eq \&Image::ExifTool::MIE::ProcessMIE |
786 | 0 | 0 | 0 | $mieMap{$group} and $mieMap{$group} ne $parent |
810 | 48 | 0 | 0 | $tagInfo->{'Writable'} and $tagInfo->{'Writable'} ne "string" |
896 | 534 | 12 | 1 | $ulist and $$valPtr =~ /(.*)\((.*)\)$/ |
313 | 226 | 7 | not $format =~ /^(utf|string|undef)/ and $$valPtr =~ /\)$/ | |
906 | 266 | 273 | 0 | $format eq "string" and $et->{'OPTIONS'}{'Charset'} ne "UTF8" |
539 | 0 | 0 | $format eq "string" and $et->{'OPTIONS'}{'Charset'} ne "UTF8" and $$valPtr =~ /[\x80-\xff]/ | |
1011 | 124 | 0 | 0 | $delGroup and $tagLen |
124 | 0 | 0 | $delGroup and $tagLen and ($format & 240) != 16 | |
1029 | 81 | 17 | 40 | $tagLen and $editTags[0] gt $tag |
1044 | 0 | 11 | 27 | $subTablePtr->{'WRITE_PROC'} && $subTablePtr->{'WRITE_PROC'} eq \&Image::ExifTool::MIE::ProcessMIE |
1059 | 0 | 0 | 0 | $inflate and $stat == Compress::Zlib::Z_STREAM_END() |
1073 | 14 | 0 | 0 | $optCompress and not $dirInfo->{'IsCompressed'} |
1132 | 0 | 0 | 0 | $compress || $optCompress || $dirInfo->{'IsCompressed'} and eval { do { require Compress::Zlib } } |
1192 | 0 | 0 | 0 | $inflate and $stat == Compress::Zlib::Z_STREAM_END() |
1201 | 0 | 0 | 0 | $isOverwriting < 0 and defined $val |
1253 | 0 | 0 | 0 | $newTag eq $lastTag and $newInfo->{'List'} || $deletedTag eq $lastTag |
1313 | 64 | 0 | 0 | $compress || $optCompress and not $dirInfo->{'IsCompressed'} |
64 | 0 | 0 | $compress || $optCompress and not $dirInfo->{'IsCompressed'} and &HasZlib($et, "write") | |
1371 | 38 | 8 | 0 | $valLen and not $raf->Seek($valLen, 1) |
1381 | 0 | 0 | 9 | $len and $len <= 2147483647 |
1394 | 0 | 0 | 23 | $tagInfo and $tagInfo->{'SubDirectory'} |
1432 | 0 | 44 | 2 | not $msg and $toWrite |
1514 | 113 | 27 | 0 | $valLen and not $raf->Seek($valLen, 1) |
1547 | 0 | 0 | 0 | $formatStr eq "MIE" and $format & 4 |
1557 | 0 | 0 | 0 | $inflate and $stat == Compress::Zlib::Z_STREAM_END() |
1570 | 0 | 0 | 113 | $tagInfo and $tagInfo->{'SubDirectory'} |
1611 | 0 | 0 | 0 | $s and not $formatStr =~ /^(utf|string|undef)/ |
1650 | 320 | 51 | 117 | $notUTF8 and $formatStr =~ /^(utf|string)/ |
1664 | 423 | 0 | 65 | defined $rational and defined $key |
1674 | 132 | 0 | 8 | $mime and not $dirInfo->{'Parent'} |
1712 | 0 | 0 | 0 | $raf->Seek($curPos - 14, 0) and $raf->Read($buff, 4) |
1722 | 0 | 0 | 26 | defined $pos and $raf->Seek($pos, 0) |
1726 | 19 | 7 | 0 | $outfile and $et->{'DEL_GROUP'}{'MIE'} |
1747 | 0 | 35 | 0 | $len > 252 and not $raf->Seek(1 << 256 - $len, 1) |
1814 | 9 | 0 | 0 | defined $msg and $isCreating |
line | l | !l | condition |
---|---|---|---|
926 | 46 | 0 | $dirInfo->{'ToWrite'} || '' |
939 | 37 | 9 | $cnt->{'MIE-Main'} || 0 |
945 | 0 | 37 | $cnt->{$grp1} || 0 |
1181 | 0 | 0 | &HasZlib($et, "edit") or last |
1199 | 0 | 0 | $mieFormat{$format & 251} || 'undef' |
1462 | 113 | 27 | $cnt->{'MIE-Main'} || 0 |
1468 | 0 | 113 | $cnt->{$grp1} || 0 |
1546 | 606 | 0 | $mieFormat{$format & 251} || 'undef' |
1698 | 26 | 0 | $dirInfo->{'Offset'} || 0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
854 | 60 | 248 | 24 | $1 eq "utf8" or $1 eq "string" |
890 | 274 | 273 | 0 | $tagInfo->{'Writable'} || $tagInfo->{'Table'}{'WRITABLE'} |
893 | 0 | 0 | 547 | not $format or $format eq 1 |
960 | 0 | 0 | 9 | $et->{'DEL_GROUP'}{'MIE'} or $et->{'DEL_GROUP'}{$grp} |
0 | 0 | 9 | $et->{'DEL_GROUP'}{'MIE'} or $et->{'DEL_GROUP'}{$grp} or $et->{'DEL_GROUP'}{$grp1} | |
0 | 0 | 9 | $et->{'DEL_GROUP'}{'MIE'} or $et->{'DEL_GROUP'}{$grp} or $et->{'DEL_GROUP'}{$grp1} or $et->{'DEL_GROUP'}{"MIE$n"} | |
977 | 0 | 0 | 1 | $n or defined $sync |
1011 | 0 | 0 | 124 | $format == 128 or $delGroup and $tagLen and ($format & 240) != 16 |
1096 | 14 | 0 | 0 | $newInfo->{'SubDirectory'}{'DirName'} || $newTag |
1099 | 0 | 0 | 14 | $dirInfo->{'IsCompressed'} || $compress |
1132 | 0 | 0 | 0 | $compress || $optCompress || $dirInfo->{'IsCompressed'} |
1179 | 0 | 0 | 1 | $isOverwriting < 0 or $verbose > 1 |
1253 | 0 | 0 | 0 | $newInfo->{'List'} || $deletedTag eq $lastTag |
59 | 0 | 0 | $nvHash->{'IsCreating'} or $newTag eq $lastTag and $newInfo->{'List'} || $deletedTag eq $lastTag | |
1258 | 19 | 40 | 0 | $newInfo->{'Writable'} || $tagTablePtr->{'WRITABLE'} |
1313 | 0 | 0 | 64 | $compress || $optCompress |
1391 | 23 | 0 | 69 | $format == 16 or $format == 24 |
1409 | 23 | 0 | 0 | $dirName || $tag |
1432 | 46 | 0 | 0 | $ok || $msg |
1547 | 606 | 0 | 0 | $tagInfo or $formatStr eq "MIE" and $format & 4 |
1585 | 113 | 0 | 0 | $dirName || $tag |
1607 | 8 | 8 | 477 | $tag eq "0Type" or $tag eq "2MIME" |
1676 | 140 | 0 | 0 | $ok or $msg |
1703 | 26 | 0 | 26 | $buff =~ /~\0\0\x06.{4}(\x10|\x18)(\x04)$/s or $buff =~ /(\x10|\x18)(\x08)$/s |
1708 | 0 | 0 | 26 | $len < 12 or $len > $curPos |
1726 | 0 | 0 | 26 | $et->Options("Verbose") or $et->{'HTML_DUMP'} |
1763 | 0 | 0 | 1 | $num or not $outfile |
line | l&&r | l&&!r | !l&&r | !l&&!r | condition |
---|---|---|---|---|---|
1048 | 11 | 0 | 0 | 0 | $isMieGroup xor ($format & 243) == 16 |