Branch Coverage

blib/lib/Image/ExifTool/H264.pm
Criterion Covered Total %
branch 61 156 39.1


line true false branch
603 3 0 if ($pos + 4 <= $bstr->{'Len'}) { }
0 0 elsif ($pos < $bstr->{'Len'}) { }
636 0 1 unless &ReadNextWord($bstr)
666 28 39 if $bstr->{'Mask'} & $bstr->{'Word'}
667 66 1 if $bstr->{'Mask'} >>= 1
668 0 1 unless &ReadNextWord($bstr)
684 13 1 if $bstr->{'Mask'} >>= 1
685 0 1 unless &ReadNextWord($bstr)
699 0 0 $val & 1 ? :
712 1 0 if (&GetIntN($bstr, 1))
715 6 2 $i < 6 ? :
716 8 0 unless &GetIntN($bstr, 1)
719 0 0 if $next
720 0 0 unless $j or $next
734 0 1 unless my $bstr = &NewBitStream($dataPt)
741 1 0 if ($t >= 100)
743 0 1 if ($t == 3) { }
756 1 0 if ($t == 0) { }
0 0 elsif ($t == 1) { }
772 1 0 unless $f
779 1 0 if ($t)
787 0 1 unless $bstr->{'Mask'}
788 1 0 if ($w >= 160 and $w <= 4096 and $h >= 120 and $h <= 3072)
794 1 0 unless $parsePictureTiming
797 0 0 unless &GetIntN($bstr, 1)
799 0 0 if ($t)
801 0 0 if ($t == 255)
806 0 0 if $t
808 0 0 if ($t)
811 0 0 if $t
814 0 0 if ($t)
819 0 0 if ($t)
820 0 0 if &BitsLeft($bstr) < 65
828 0 0 if ($t)
844 0 0 if $hard
857 0 0 unless my $bstr = &NewBitStream($dataPt)
862 0 0 if ($et->{'VUI_hard'})
866 0 0 if ($et->{'VUI_pic'})
870 0 0 unless $n
873 0 0 unless $t
882 0 0 if ($t) { }
888 0 0 if ($t)
891 0 0 if ($t)
894 0 0 if $t
898 0 0 if ($et->{'VUI_toff'})
942 0 2 if $pos >= $end
945 2 0 unless $t == 255
947 0 2 if $type == 128
950 0 2 if $pos >= $end
953 2 0 unless $t == 255
955 0 2 if $pos + $size > $end
957 0 2 if ($type == 1) { }
1 1 elsif ($type == 5) { }
958 0 0 if ($parsePictureTiming)
971 0 1 unless $size > 20 and substr($$dataPt, $pos, 20) eq "\27\356\214`\370M\21\331\214\326\b\0 \f\232fMDPM"
984 0 1 if $et->Options("Verbose")
988 0 6 if ($tag <= $lastTag)
996 6 0 if ($tagInfo)
998 0 6 if ($tagInfo->{'Unknown'} and not $tagInfo->{'SetPrintConv'})
1005 0 1 if $pos + 5 >= $end
1007 0 1 if $t != $lastTag + 1
1010 1 0 unless defined $from
1015 1 5 defined $from ? :
1045 5 1 if ($$dataPt =~ /(\0{2,3}\x01)/g) { }
1048 1 4 unless $pos
1050 0 1 unless $pos
1053 0 5 if $pos >= $len
1058 0 5 if $nal_unit_type & 128
1061 3 2 unless $parseNalUnit{$nal_unit_type} or $verbose
1066 1 4 if pos $$dataPt > $end
1071 0 2 if ($verbose > 1)
1077 1 1 if ($nal_unit_type == 6) { }
1 0 elsif ($nal_unit_type == 7) { }
1079 0 1 if ($et->{'GotNAL06'})
1081 0 0 unless $et->Options("ExtractEmbedded")
1087 0 1 unless $foundUserData
1093 0 1 if $et->{'GotNAL07'}
1102 1 0 if $foundUserData or $et->{'ParsedH264'}