Branch Coverage

blib/lib/Image/ExifTool/M2TS.pm
Criterion Covered Total %
branch 88 268 32.8


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) { }
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) { }
313 0 1 if ($et->{'OPTIONS'}{'ExtractEmbedded'}) { }
1 0 elsif (not $et->{'OPTIONS'}{'Validate'}) { }
323 0 0 if ($$dataPt =~ /^.{5}\x06\x0e\x2b\x34/s)
325 0 0 if (not $et->{'OPTIONS'}{'ExtractEmbedded'}) { }
0 0 elsif ($et->{'OPTIONS'}{'ExtractEmbedded'} > 2) { }
332 0 0 if ($$dataPt =~ /^(.{164})?(.{24})A[NS][EW]/s) { }
0 0 elsif ($$dataPt =~ /^A([NS])([EW])\0/s) { }
0 0 elsif ($$dataPt =~ /^\$(GPSINFO|GSNRINFO),/) { }
0 0 elsif ($$dataPt =~ /\$GPRMC,/) { }
0 0 elsif ($$dataPt =~ /^.{44}A\0{3}.{4}([NS])\0{3}.{4}([EW])\0{3}/s and length $$dataPt >= 84) { }
368 0 0 if $_ >= 2147483648
371 0 0 substr($dat, 1, 1) eq 'S' ? :
372 0 0 substr($dat, 2, 1) eq 'W' ? :
390 0 0 if ($line =~ /^\$GPSINFO/) { }
0 0 elsif ($line =~ /^\$GSNRINFO/) { }
392 0 0 unless @a > 7
394 0 0 if $lastTime and $a[2] eq $lastTime
433 0 0 $15 >= 70 ? :
438 0 0 if length $11
439 0 0 if length $12
448 0 0 if $_ < 48 or $_ > 57
450 0 0 if ($bad) { }
456 0 0 $7 eq 'N' ? :
457 0 0 $10 eq 'E' ? :
473 0 0 $1 eq 'S' ? :
474 0 0 $2 eq 'W' ? :
502 0 1 unless $raf->Read($buff, 8) == 8
504 0 1 unless $buff =~ /^(....)?\x47/s
505 1 0 if ($1) { }
516 0 1 unless $raf->Read($buff, $readSize) >= $pLen * 4
519 0 3 unless substr($buff, $prePos + $pLen * $j, 1) eq "G"
544 0 1 if (($et->Options('ExtractEmbedded') || 0) > 2)
555 0 8 unless (%needPID)
556 0 0 unless defined $startTime
558 0 0 unless (defined $backScan)
561 0 0 if $et->Options("FastScan")
562 0 0 if $verbose
566 0 0 unless $raf->Seek(0, 2)
573 0 0 if ($nMax < int -$maxBack / $pLen) { }
584 0 8 if (defined $backScan) { }
585 0 0 if defined $endTime
587 0 0 if ($pos < 0)
589 0 0 if $backScan <= $maxBack
591 0 0 if $buffLen > $readSize
593 0 0 unless $raf->Seek($backScan, 2)
594 0 0 unless $raf->Read($buff, $buffLen) == $buffLen
599 1 7 if ($pos + $pLen > length $buff)
600 1 0 unless $raf->Read($buff, $readSize) >= $pLen
609 0 7 unless (($prefix & 4278190080) == 1191182336)
610 0 0 unless defined $backScan
621 0 7 if ($verbose > 1)
625 0 0 $pidName{$pid} ? :
626 0 0 if $pLen == 192
628 0 0 $payload_unit_start_indicator ? :
633 1 6 if ($adaptation_field_exists)
635 0 1 if $pos + $len > $pEnd
637 1 0 if ($len > 6)
639 1 0 if ($flags & 16)
646 1 0 unless defined $startTime
654 1 6 unless $payload_data_exists and not defined $backScan
657 3 3 if ($pid == 0 or defined $pmt{$pid}) { }
3 0 elsif (not defined $didPID{$pid}) { }
662 3 0 if ($payload_unit_start_indicator) { }
666 0 3 if $pos >= $pEnd
671 0 0 unless $sectLen{$pid}
674 0 0 if $size > $more
676 0 0 unless $size == $more
685 0 3 if $pos + 8 > $slen
689 2 1 $pid ? :
690 1 2 unless ($table_id == $expectedID)
691 0 1 if $verbose > 1
698 0 2 unless $section_syntax_indicator == 128
700 0 2 if $section_length > 1021
701 0 2 if ($slen < $section_length + 3)
710 0 2 if ($verbose > 1)
712 0 0 if $pid
713 0 0 unless $pid
719 1 1 if ($pid == 0) { }
727 2 0 unless $didPID{$program_map_PID}
728 0 2 if $verbose
733 0 1 if $pos + 4 > $slen
738 0 1 if $verbose
740 0 1 if $pos + $program_info_length > $slen
742 0 1 if ($verbose > 1)
746 0 0 if $j + $descriptor_length > $program_info_length
758 0 0 $stream_type < 127 ? :
0 2 unless $str
761 0 2 if $verbose
762 2 0 if ($str =~ /(Audio|Video)/)
763 2 0 unless ($pidName{$elementary_pid})
767 2 0 unless $didPID{$elementary_pid}
773 0 2 if $pos + $es_info_length > $slen
779 0 3 if $j + $descriptor_length > $es_info_length
782 0 3 if ($verbose > 1)
788 3 0 unless ($didPID{$pid})
789 1 2 if ($descriptor_tag == 129)
802 2 1 if ($payload_unit_start_indicator) { }
803 0 2 if (defined $data{$pid})
809 0 0 unless ($more)
818 0 2 if $pos + 6 > $pEnd
820 0 2 unless ($start_code & 4294967040) == 256
823 0 2 if ($verbose > 1)
828 2 0 unless ($noSyntax{$stream_id})
829 0 2 if $pos + 3 > $pEnd
832 0 2 unless $syntax == 128
836 0 2 if $pos >= $pEnd
842 1 1 if ($pes_packet_length > 8) { }
848 0 1 unless (defined $data{$pid})
850 0 0 unless $gpsPID{$pid}
859 2 1 if (not $pidType{$pid} or $pidType{$pid} == 27) { }
0 1 elsif ($pidType{$pid} == 21) { }
864 0 0 if defined $packLen{$pid} and $saveLen > $packLen{$pid}
868 0 3 if (length $data{$pid} >= $saveLen)
870 0 0 if $more < 0
872 0 0 unless $more or $fromStart{$pid}
875 0 0 if $more
881 2 0 if ($needPID{$pid})
890 0 1 unless defined $endTime
891 1 0 if (defined $startTime and defined $endTime)
892 0 1 if $startTime > $endTime
896 0 1 if ($verbose)
899 0 0 if $needPID{$_} > 0
901 0 0 if (@need) { }
905 0 0 $eof ? :