Condition Coverage

blib/lib/Image/ExifTool/MIE.pm
Criterion Covered Total %
condition 85 217 39.1


and 3 conditions

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 538 13 1 $ulist and $$valPtr =~ /(.*)\((.*)\)$/
313 231 7 not $format =~ /^(utf|string|undef)/ and $$valPtr =~ /\)$/
906 271 273 0 $format eq "string" and $et->{'OPTIONS'}{'Charset'} ne "UTF8"
544 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)
1382 0 0 9 $len and $len <= 2147483647
1395 0 0 23 $tagInfo and $tagInfo->{'SubDirectory'}
1433 0 44 2 not $msg and $toWrite
1515 113 27 0 $valLen and not $raf->Seek($valLen, 1)
1548 0 0 0 $formatStr eq "MIE" and $format & 4
1558 0 0 0 $inflate and $stat == Compress::Zlib::Z_STREAM_END()
1571 0 0 113 $tagInfo and $tagInfo->{'SubDirectory'}
1613 0 0 0 $s and not $formatStr =~ /^(utf|string|undef)/
1652 320 51 117 $notUTF8 and $formatStr =~ /^(utf|string)/
1681 132 0 8 $mime and not $dirInfo->{'Parent'}
1719 0 0 0 $raf->Seek($curPos - 14, 0) and $raf->Read($buff, 4)
1729 0 0 26 defined $pos and $raf->Seek($pos, 0)
1733 19 7 0 $outfile and $et->{'DEL_GROUP'}{'MIE'}
1754 0 35 0 $len > 252 and not $raf->Seek(1 << 256 - $len, 1)
1823 9 0 0 defined $msg and $isCreating

or 2 conditions

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'
1379 7 0 length $$outfile || 0
1381 0 9 $dirInfo->{'OutPos'} || 0
1463 113 27 $cnt->{'MIE-Main'} || 0
1469 0 113 $cnt->{$grp1} || 0
1547 606 0 $mieFormat{$format & 251} || 'undef'
1705 26 0 $dirInfo->{'Offset'} || 0
1807 0 7 length $$outfile || 0

or 3 conditions

line l !l&&r !l&&!r condition
854 60 248 24 $1 eq "utf8" or $1 eq "string"
890 279 273 0 $tagInfo->{'Writable'} || $tagInfo->{'Table'}{'WRITABLE'}
893 0 0 552 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
1392 23 0 69 $format == 16 or $format == 24
1410 23 0 0 $dirName || $tag
1433 46 0 0 $ok || $msg
1548 606 0 0 $tagInfo or $formatStr eq "MIE" and $format & 4
1586 113 0 0 $dirName || $tag
1609 8 8 477 $tag eq "0Type" or $tag eq "2MIME"
1683 140 0 0 $ok or $msg
1710 26 0 26 $buff =~ /~\0\0\x06.{4}(\x10|\x18)(\x04)$/s or $buff =~ /(\x10|\x18)(\x08)$/s
1715 0 0 26 $len < 12 or $len > $curPos
1733 0 0 26 $et->Options("Verbose") or $et->{'HTML_DUMP'}
1770 0 0 1 $num or not $outfile

xor 4 conditions

line l&&r l&&!r !l&&r !l&&!r condition
1048 11 0 0 0 $isMieGroup xor ($format & 243) == 16