Branch Coverage

blib/lib/Image/ExifTool/Matroska.pm
Criterion Covered Total %
branch 50 138 36.2


line true false branch
833 0 0 unless (ref $tagInfo eq "HASH")
837 0 0 if length $name < 2
841 0 0 if ($pid) { }
844 0 0 unless ($tagTbl->{$id})
852 0 0 if (defined $struct->{'TagString'} or defined $struct->{'TagBinary'})
853 0 0 defined $struct->{'TagString'} ? :
857 0 0 $lang ? :
0 0 if $ctry
858 0 0 if ($code) { }
865 0 0 if ($tag eq "COUNTRY")
870 0 0 if ($struct->{'struct'})
883 1 131 if $_[1] >= length $_[0]
886 0 131 unless ($val)
887 0 0 if $_[1] >= length $_[0]
889 0 0 unless $val
899 0 131 if $_[1] + $num > length $_[0]
902 67 0 if $b != 255
906 0 131 $unknown ? :
919 0 1 unless $raf->Read($buff, 4) == 4
920 0 1 unless $buff =~ /^\x1a\x45\xdf\xa3/
923 0 1 unless $raf->Read($buff, 65532)
929 0 1 unless $hlen and $hlen > 0
930 0 1 if $pos + $hlen > $dataLen
937 0 1 $verbose || $et->Options('Unknown') > 1 ? :
938 0 1 if $et->Options("ExtractEmbedded")
947 11 62 if ($pos + $dataPos >= $dirEnd[-1][0]) { }
949 0 11 if ($struct)
950 0 0 if (@dirEnd and $dirEnd[-1][2]) { }
952 0 0 unless $dirEnd[-1][2]{'struct'}
961 11 0 @dirEnd ? :
963 2 9 if $trackIndent and $trackIndent eq $et->{'INDENT'}
972 0 66 if ($pos + 24 > $dataLen and $raf->Read($buf2, 65536))
980 1 65 unless defined $tag and $tag >= 0
982 0 65 unless defined $size
984 0 65 if $size < 0
985 0 65 if (@dirEnd and $pos + $dataPos + $size > $dirEnd[-1][0])
988 0 0 if ($pos < 0 or $pos > $dataLen)
993 0 0 unless $raf->Seek($dataPos, 0)
999 65 0 if ($tagInfo) { }
0 0 elsif ($verbose) { }
1000 12 53 if ($tagInfo->{'SubDirectory'})
1002 0 12 if ($tagInfo->{'Name'} eq 'Cluster' and $processAll < 2) { }
1003 0 0 unless $processAll
1010 0 12 if $dirName eq "SimpleTag"
1011 0 12 if ($tagInfo->{'Name'} eq "ChapterAtom")
1021 0 53 if $unknownSize
1022 0 53 if ($pos + $size > $dataLen)
1026 0 0 if (not $tagInfo or $more > 10000000) { }
1028 0 0 if $more >= 2147483648 and not $et->Options("LargeFileSupport")
1029 0 0 unless $raf->Seek($more, 1)
1038 0 0 if ($raf->Read($buf2, $more))
1045 0 0 if $pos + $size > $dataLen
1048 0 53 unless ($tagInfo)
1054 48 5 if ($tagInfo->{'Format'})
1056 10 38 if ($fmt eq 'string' or $fmt eq 'utf8') { }
4 34 elsif ($fmt eq 'float') { }
1058 2 8 if $fmt eq "utf8"
1060 4 0 if ($size == 4) { }
0 0 elsif ($size == 8) { }
1070 1 33 if ($fmt eq 'signed' or $fmt eq 'date') { }
1077 0 1 if $vals[0] & 128
1079 1 0 if ($fmt eq "date")
1092 2 46 if ($tagInfo->{'Name'} eq "TrackNumber")
1103 0 53 if ($tagInfo->{'NoSave'} or $struct) { }
1104 0 0 if $verbose
1105 0 0 if $struct
1114 0 0 unless ($trackTypes{'1'} or $trackTypes{'3'})
1115 0 0 if ($trackTypes{'2'}) { }
0 0 elsif ($trackTypes{'17'}) { }