Branch Coverage

blib/lib/Image/ExifTool/M2TS.pm
Criterion Covered Total %
branch 91 302 30.1


line true false branch
256 1 0 if ($$dataPt =~ /\x0b\x77..(.)/gs)
272 0 1 if length $$dataPt < 3
292 0 2 unless defined $type
294 0 2 if ($verbose > 1)
300 0 2 if ($type == 1 or $type == 2) { }
0 2 elsif ($type == 3 or $type == 4) { }
0 2 elsif ($type == 6 and $pid == 768) { }
1 1 elsif ($type == 27) { }
1 0 elsif ($type == 129 or $type == 135 or $type == 145) { }
0 0 elsif ($type == 21) { }
0 0 elsif ($type < 0) { }
310 0 0 if ($$dataPt =~ /^LIGOGPSINFO/s)
322 0 1 if ($et->{'OPTIONS'}{'ExtractEmbedded'}) { }
1 0 elsif (not $et->{'OPTIONS'}{'Validate'}) { }
332 0 0 if ($$dataPt =~ /^.{5}\x06\x0e\x2b\x34/s)
334 0 0 if (not $et->{'OPTIONS'}{'ExtractEmbedded'}) { }
0 0 elsif ($et->{'OPTIONS'}{'ExtractEmbedded'} > 2) { }
349 0 0 if ($$dataPt =~ /^(.{164})?(.{24})A[NS][EW]/s) { }
0 0 elsif ($$dataPt =~ /^(V00|A([NS])([EW]))\0/s) { }
0 0 elsif ($$dataPt =~ /^\$(GPSINFO|GSNRINFO),/) { }
0 0 elsif ($$dataPt =~ /\$GPRMC,/) { }
0 0 elsif ($$dataPt =~ /\$GSENSORD,\s*(\d+),\s*(\d+),\s*(\d+),/) { }
0 0 elsif ($$dataPt =~ /^.{44}A\0{3}.{4}([NS])\0{3}.{4}([EW])\0{3}/s and length $$dataPt >= 84) { }
0 0 elsif (length $$dataPt >= 64 and substr($$dataPt, 32, 2) eq '$S') { }
0 0 elsif ($$dataPt =~ /^skip.{4}LIGOGPSINFO\0/s) { }
0 0 elsif ($et->{'FoundGoodGPS'}) { }
381 0 0 if ($2 ne "V00")
387 0 0 substr($dat, 1, 1) eq 'S' ? :
388 0 0 substr($dat, 2, 1) eq 'W' ? :
395 0 0 if $_ >= 2147483648
410 0 0 if ($line =~ /^\$GPSINFO/) { }
0 0 elsif ($line =~ /^\$GSNRINFO/) { }
412 0 0 unless @a > 7
414 0 0 if $lastTime and $a[2] eq $lastTime
456 0 0 $15 >= 70 ? :
461 0 0 if length $11
462 0 0 if length $12
471 0 0 if $_ < 48 or $_ > 57
473 0 0 if ($bad) { }
479 0 0 $7 eq 'N' ? :
480 0 0 $10 eq 'E' ? :
501 0 0 $1 eq 'S' ? :
502 0 0 $2 eq 'W' ? :
515 0 0 unless substr($$dataPt, $n, 2) eq "\$S"
517 0 0 if $last gt $dateTime
521 0 0 if $n > length($$dataPt) - 32
522 0 0 unless substr($$dataPt, $n, 2) eq "\$S"
525 0 0 if $a[2] & 32768
567 0 1 unless $raf->Read($buff, 383) == 383
569 0 1 unless $buff =~ /^(.{0,190}?)\x47(.{187}|.{191})\x47/s
576 0 1 if $start < 0
580 0 1 unless $raf->Read($buff, $readSize) >= $pLen * 4
583 3 0 if substr($buff, $tcLen + $pLen * $j, 1) eq "G"
584 0 0 if $tcLen
592 1 0 $tcLen ? :
593 0 1 if $start
617 0 1 if (($et->Options('ExtractEmbedded') || 0) > 2)
628 0 8 unless (%needPID)
629 0 0 unless defined $startTime
631 0 0 unless (defined $backScan)
634 0 0 if $et->Options("FastScan")
635 0 0 if $verbose
639 0 0 unless $raf->Seek(0, 2)
646 0 0 if ($nMax < int -$maxBack / $pLen) { }
657 0 8 if (defined $backScan) { }
658 0 0 if defined $endTime
660 0 0 if ($pos < 0)
662 0 0 if $backScan <= $maxBack
664 0 0 if $buffLen > $readSize
666 0 0 unless $raf->Seek($backScan, 2)
667 0 0 unless $raf->Read($buff, $buffLen) == $buffLen
672 1 7 if ($pos + $pLen > length $buff)
673 1 0 unless $raf->Read($buff, $readSize) >= $pLen
682 0 7 unless (($prefix & 4278190080) == 1191182336)
683 0 0 unless defined $backScan
694 0 7 if ($verbose > 1)
698 0 0 $pidName{$pid} ? :
699 0 0 if $pLen == 192
701 0 0 $payload_unit_start_indicator ? :
706 1 6 if ($adaptation_field_exists)
708 0 1 if $pos + $len > $pEnd
710 1 0 if ($len > 6)
712 1 0 if ($flags & 16)
719 1 0 unless defined $startTime
727 1 6 unless $payload_data_exists and not defined $backScan
730 3 3 if ($pid == 0 or defined $pmt{$pid}) { }
3 0 elsif (not defined $didPID{$pid}) { }
735 3 0 if ($payload_unit_start_indicator) { }
739 0 3 if $pos >= $pEnd
744 0 0 unless $sectLen{$pid}
747 0 0 if $size > $more
749 0 0 unless $size == $more
758 0 3 if $pos + 8 > $slen
762 2 1 $pid ? :
763 1 2 unless ($table_id == $expectedID)
764 0 1 if $verbose > 1
771 0 2 unless $section_syntax_indicator == 128
773 0 2 if $section_length > 1021
774 0 2 if ($slen < $section_length + 3)
783 0 2 if ($verbose > 1)
785 0 0 if $pid
786 0 0 unless $pid
792 1 1 if ($pid == 0) { }
800 2 0 unless $didPID{$program_map_PID}
801 0 2 if $verbose
806 0 1 if $pos + 4 > $slen
811 0 1 if $verbose
813 0 1 if $pos + $program_info_length > $slen
815 0 1 if ($verbose > 1)
819 0 0 if $j + $descriptor_length > $program_info_length
831 0 0 $stream_type < 127 ? :
0 2 unless $str
834 0 2 if $verbose
835 2 0 if ($str =~ /(Audio|Video)/)
836 2 0 unless ($pidName{$elementary_pid})
840 2 0 unless $didPID{$elementary_pid}
846 0 2 if $pos + $es_info_length > $slen
852 0 3 if $j + $descriptor_length > $es_info_length
855 0 3 if ($verbose > 1)
861 3 0 unless ($didPID{$pid})
862 1 2 if ($descriptor_tag == 129)
875 2 1 if ($payload_unit_start_indicator) { }
876 0 2 if (defined $data{$pid})
882 0 0 unless ($more)
891 0 2 if $pos + 6 > $pEnd
893 0 2 unless ($start_code & 4294967040) == 256
896 0 2 if ($verbose > 1)
901 2 0 unless ($noSyntax{$stream_id})
902 0 2 if $pos + 3 > $pEnd
905 0 2 unless $syntax == 128
909 0 2 if $pos >= $pEnd
915 1 1 if ($pes_packet_length > 8) { }
921 0 1 unless (defined $data{$pid})
923 0 0 unless $gpsPID{$pid}
932 2 1 if (not $pidType{$pid} or $pidType{$pid} == 27) { }
0 1 elsif ($pidType{$pid} == 21) { }
937 0 0 if defined $packLen{$pid} and $saveLen > $packLen{$pid}
941 0 3 if (length $data{$pid} >= $saveLen)
943 0 0 if $more < 0
945 0 0 unless $more or $fromStart{$pid}
948 0 0 if $more
954 2 0 if ($needPID{$pid})
963 0 1 unless defined $endTime
964 1 0 if (defined $startTime and defined $endTime)
965 0 1 if $startTime > $endTime
969 0 1 if ($verbose)
972 0 0 if $needPID{$_} > 0
974 0 0 if (@need) { }
978 0 0 $eof ? :
991 0 0 if ($et->Options("ExtractEmbedded") and $raf->Seek(-8, 2) and $raf->Read($buff, 8) == 8 and $buff =~ /^&&&&/)
996 0 0 if ($len < $raf->Tell and $raf->Seek(-$len, 2) and $raf->Read($buff, $len) == $len)