Condition Coverage

blib/lib/Image/ExifTool/MIE.pm
Criterion Covered Total %
condition 84 214 39.2


and 3 conditions

line !l l&&!r l&&r condition
771 0 0 0 ref $tagInfo eq "HASH" and $tagInfo->{'SubDirectory'}
776 0 0 0 $subTablePtr->{'PROCESS_PROC'} and $subTablePtr->{'PROCESS_PROC'} eq \&Image::ExifTool::MIE::ProcessMIE
779 0 0 0 $mieMap{$group} and $mieMap{$group} ne $parent
803 48 0 0 $tagInfo->{'Writable'} and $tagInfo->{'Writable'} ne "string"
889 530 12 1 $ulist and $$valPtr =~ /(.*)\((.*)\)$/
310 225 7 not $format =~ /^(utf|string|undef)/ and $$valPtr =~ /\)$/
899 262 273 0 $format eq "string" and $et->{'OPTIONS'}{'Charset'} ne "UTF8"
535 0 0 $format eq "string" and $et->{'OPTIONS'}{'Charset'} ne "UTF8" and $$valPtr =~ /[\x80-\xff]/
1004 124 0 0 $delGroup and $tagLen
124 0 0 $delGroup and $tagLen and ($format & 240) != 16
1022 80 15 39 $tagLen and $editTags[0] gt $tag
1037 0 11 25 $subTablePtr->{'WRITE_PROC'} && $subTablePtr->{'WRITE_PROC'} eq \&Image::ExifTool::MIE::ProcessMIE
1052 0 0 0 $inflate and $stat == Compress::Zlib::Z_STREAM_END()
1066 13 0 0 $optCompress and not $dirInfo->{'IsCompressed'}
1125 0 0 0 $compress || $optCompress || $dirInfo->{'IsCompressed'} and eval { do { require Compress::Zlib } }
1185 0 0 0 $inflate and $stat == Compress::Zlib::Z_STREAM_END()
1194 0 0 0 $isOverwriting < 0 and defined $val
1246 0 0 0 $newTag eq $lastTag and $newInfo->{'List'} || $deletedTag eq $lastTag
1307 63 0 0 $compress || $optCompress and not $dirInfo->{'IsCompressed'}
63 0 0 $compress || $optCompress and not $dirInfo->{'IsCompressed'} and &HasZlib($et, "write")
1365 37 8 0 $valLen and not $raf->Seek($valLen, 1)
1375 0 0 9 $len and $len <= 2147483647
1388 0 0 23 $tagInfo and $tagInfo->{'SubDirectory'}
1426 0 43 2 not $msg and $toWrite
1508 112 27 0 $valLen and not $raf->Seek($valLen, 1)
1541 0 0 0 $formatStr eq "MIE" and $format & 4
1551 0 0 0 $inflate and $stat == Compress::Zlib::Z_STREAM_END()
1564 0 0 112 $tagInfo and $tagInfo->{'SubDirectory'}
1605 0 0 0 $s and not $formatStr =~ /^(utf|string|undef)/
1644 319 51 117 $notUTF8 and $formatStr =~ /^(utf|string)/
1658 423 0 64 defined $rational and defined $key
1668 131 0 8 $mime and not $dirInfo->{'Parent'}
1706 0 0 0 $raf->Seek($curPos - 14, 0) and $raf->Read($buff, 4)
1716 0 0 26 defined $pos and $raf->Seek($pos, 0)
1720 19 7 0 $outfile and $et->{'DEL_GROUP'}{'MIE'}
1741 0 35 0 $len > 252 and not $raf->Seek(1 << 256 - $len, 1)
1808 9 0 0 defined $msg and $isCreating

or 2 conditions

line l !l condition
919 45 0 $dirInfo->{'ToWrite'} || ''
932 36 9 $cnt->{'MIE-Main'} || 0
938 0 36 $cnt->{$grp1} || 0
1174 0 0 &HasZlib($et, "edit") or last
1192 0 0 $mieFormat{$format & 251} || 'undef'
1456 112 27 $cnt->{'MIE-Main'} || 0
1462 0 112 $cnt->{$grp1} || 0
1540 604 0 $mieFormat{$format & 251} || 'undef'
1692 26 0 $dirInfo->{'Offset'} || 0

or 3 conditions

line l !l&&r !l&&!r condition
847 60 248 24 $1 eq "utf8" or $1 eq "string"
883 270 273 0 $tagInfo->{'Writable'} || $tagInfo->{'Table'}{'WRITABLE'}
886 0 0 543 not $format or $format eq 1
953 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"}
970 0 0 1 $n or defined $sync
1004 0 0 124 $format == 128 or $delGroup and $tagLen and ($format & 240) != 16
1089 13 0 0 $newInfo->{'SubDirectory'}{'DirName'} || $newTag
1092 0 0 13 $dirInfo->{'IsCompressed'} || $compress
1125 0 0 0 $compress || $optCompress || $dirInfo->{'IsCompressed'}
1172 0 0 1 $isOverwriting < 0 or $verbose > 1
1246 0 0 0 $newInfo->{'List'} || $deletedTag eq $lastTag
58 0 0 $nvHash->{'IsCreating'} or $newTag eq $lastTag and $newInfo->{'List'} || $deletedTag eq $lastTag
1251 18 40 0 $newInfo->{'Writable'} || $tagTablePtr->{'WRITABLE'}
1307 0 0 63 $compress || $optCompress
1385 23 0 69 $format == 16 or $format == 24
1403 23 0 0 $dirName || $tag
1426 45 0 0 $ok || $msg
1541 604 0 0 $tagInfo or $formatStr eq "MIE" and $format & 4
1579 112 0 0 $dirName || $tag
1601 8 8 476 $tag eq "0Type" or $tag eq "2MIME"
1670 139 0 0 $ok or $msg
1697 26 0 26 $buff =~ /~\0\0\x06.{4}(\x10|\x18)(\x04)$/s or $buff =~ /(\x10|\x18)(\x08)$/s
1702 0 0 26 $len < 12 or $len > $curPos
1720 0 0 26 $et->Options("Verbose") or $et->{'HTML_DUMP'}
1757 0 0 1 $num or not $outfile

xor 4 conditions

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