Branch Coverage

blib/lib/Image/ExifTool/ASF.pm
Criterion Covered Total %
branch 53 110 48.1


line true false branch
529 0 50 unless length $val == 16
544 0 0 if $dirLen < 10
550 0 0 unless $len
551 0 0 if $pos + $len > $dirLen
568 0 0 if $dirLen < 40
575 0 0 if $pos + 4 > $dirLen
578 0 0 unless $size
579 0 0 if $pos + $size > $dirLen
596 8 11 if ($format == 0) { }
3 8 elsif ($format == 2) { }
4 4 elsif ($format == 3) { }
0 4 elsif ($format == 4) { }
0 4 elsif ($format == 5) { }
601 1 2 $_ ? :
624 0 1 if $dirLen < 2
630 0 11 if $pos + 6 > $dirLen
633 0 11 if $pos + $nameLen + 4 > $dirLen
639 0 11 if $pos + $dLen > $dirLen
660 0 2 if $dirLen < 2
666 0 8 if $pos + 12 > $dirLen
669 0 8 if $pos + $nameLen + $dLen > $dirLen
694 0 1 unless $dirLen > 9
701 0 1 if $n & 1 or $n < 4
703 1 0 if ($str =~ /^((?:..)*?)\0\0((?:..)*?)\0\0/s)
706 0 1 if length $desc
721 0 1 if $dirLen < 20
728 0 2 if $pos + 8 > $dirLen
733 0 2 if $pos + $nameLen + 2 > $dirLen
738 0 2 if $pos + $descLen + 2 > $dirLen
761 1 16 unless $raf->Read($buff, 24) == 24
764 1 15 unless ($tagTablePtr)
766 0 1 unless $tag eq "75B22630-668E-11CF-A6D9-00AA0062CE6C"
768 0 1 unless $fileType and $fileType =~ /^(ASF|WMV|WMA|DIVX)$/
775 0 16 if ($size < 0)
779 0 16 if ($size > 2147483647)
780 0 0 if ($size > 9223372032559808512) { }
0 0 elsif ($et->Options('LargeFileSupport')) { }
783 0 0 if ($raf->Seek($size, 1))
795 1 15 if (@childEnd and $pos >= $childEnd[-1])
801 0 16 if $verbose
802 13 3 if ($tagInfo)
804 9 4 if ($subdir)
806 2 7 if ($subTable->{'PROCESS_PROC'} eq \&Image::ExifTool::ASF::ProcessASF) { }
7 0 elsif ($raf->Read($buff, $size) == $size) { }
807 2 0 if (defined $subdir->{'Size'})
809 0 2 if ($verbose > 2) { }
0 2 elsif (not $raf->Seek($s, 1)) { }
810 0 0 unless $raf->Read($buff, $s) == $s
821 0 2 if ($verbose)
834 0 7 if $verbose > 2
835 0 7 unless ($et->ProcessDirectory(\%subdirInfo, $subTable, $subdir->{'ProcessProc'}))
846 0 7 if ($verbose > 2) { }
0 7 elsif (not $raf->Seek($size, 1)) { }
847 0 0 unless $raf->Read($buff, $size) == $size
855 0 1 if $err