Branch Coverage

blib/lib/Image/ExifTool/RIFF.pm
Criterion Covered Total %
branch 56 200 28.0


line true false branch
1562 1 1 if (@part >= 5 and $mon = $monthNum{ucfirst lc $part[1]}) { }
1 0 elsif ($val =~ m[(\d{4})/\s*(\d+)/\s*(\d+)/?\s+(\d+):\s*(\d+)\s*(P?)]) { }
0 0 elsif ($val =~ m[(\d{4})[-/](\d+)[-/](\d+)\s+(\d+:\d+:\d+)]) { }
1569 0 1 $6 ? :
1589 0 0 if ($ss >= 60)
1591 0 0 if ++$min >= 60
1614 2 0 if $val[0]
1615 2 0 if ($val[2] and $val[3])
1618 0 2 if $rat > "1.9" and $rat < "3.1"
1620 2 0 if defined $dur1
1621 2 0 unless $subDoc++ < $et->{'DOC_COUNT'}
1627 0 0 if ($subDoc == 1) { }
1632 0 0 if $j
1633 0 0 unless defined $rawValue->{$key}
1641 0 0 if $i < 2
1643 0 0 $key ? :
1645 0 0 unless defined $val[0] and defined $val[1]
1660 0 0 if $size < 4
1661 0 0 if ($et->Options("Verbose"))
1666 0 0 unless ($tagInfo)
1668 0 0 unless $tagInfo
1671 0 0 if ($tagInfo->{'SubDirectory'}) { }
1684 0 0 unless ($offset)
1714 0 0 if $n > 2
1739 13 0 unless ($charset)
1740 0 13 if ($et->{'CodePage'}) { }
13 0 elsif (defined $charset and $charset eq '0') { }
1747 0 13 if $verbose
1753 0 34 if ($start + $len > $end)
1757 5 29 if ($tag eq "LIST" and $len >= 4)
1765 28 6 if ($tagInfo) { }
0 6 elsif ($verbose or $unknown) { }
1766 17 11 if ($tagInfo->{'SubDirectory'}) { }
10 1 elsif (not $tagInfo->{'Binary'}) { }
1769 1 16 if (defined $newBase)
1780 3 7 if ($format and $format eq "string")
1784 3 0 if $charset
1798 3 31 if $len & 1
1824 0 0 $a[2] ? :
0 0 $a[4] ? :
0 0 $a[6] ? :
1827 0 0 unless ($ee)
1862 0 0 $a[15] eq 'S' ? :
1863 0 0 $a[14] eq 'W' ? :
1867 0 0 unless ($ee)
1888 0 0 unless ($et->Options("ExtractEmbedded"))
1900 0 0 if $pos + $recLen{$rec} > $dataLen
1904 0 0 if ($rec eq '0GPS') { }
1907 0 0 if $endPos > $dataLen
1912 0 0 if ($1 eq 'GC') { }
1915 0 0 if ($buff =~ /\G(\d+),\d*,\d*,(\d+),([-\d.]+),(\d+),\d*,A/g)
1921 0 0 if ($buff =~ /\GA,([\d.]+),([\d.]+),(\d+),([NS]),([EW])/g)
1928 0 0 if $ns eq "S"
1929 0 0 if $ew eq "W"
1934 0 0 unless ($buff =~ /\$(GC|GA),$time,/g)
1936 0 0 if (not $$dataPt =~ /\$(GC|GA),(\d+)/ or $1 ne $time)
1938 0 0 if ($date) { }
1944 0 0 if (defined $lat)
1949 0 0 if (defined $alt)
1966 0 0 if $_ >= 2147483648
1993 0 7 unless $raf->Read($buff, 12) == 12
1994 7 0 if ($buff =~ /^(RIFF|RF64)....(.{4})/s) { }
1996 0 7 if $1 eq "RF64"
1999 0 0 unless $buff =~ /^(LA0[234]|OFR |LPAC|wvpk)/ and $raf->Read($buf2, 1024)
2002 0 0 unless $buff =~ /WAVE(.{4})?fmt /gs and $raf->Seek(pos($buff) - 4, 0)
2004 0 7 if $et->Options("FastScan")
2005 7 0 if $type
2007 0 0 if $rf64 and $et->{'VALUE'}{'FileType'}
2020 7 32 if ($num < 8)
2021 0 7 if $num
2022 0 7 if $validate and $pos != $riffEnd
2028 4 28 if $tag eq "VP8X" and $type eq "WEBP"
2030 10 22 if ($tag eq 'LIST') { }
0 22 elsif ($tag eq 'data' and $len == 4294967295 and $et->{'DataSize64'}) { }
2031 0 10 unless $raf->Read($buff, 4) == 4
2039 3 29 if ($len <= 0)
2040 0 3 if ($len < 0) { }
0 3 elsif ($tag eq "\000\000\000\000") { }
2052 0 0 if ($et->Options("FastScan") and $tag eq 'data' || $tag eq 'idx1' || $tag eq 'LIST_movi' && !$ee)
2061 0 29 if ($ee and $tag =~ /^(\d{2})tx$/)
2063 0 0 unless defined $tagTbl->{$tag}
2068 29 0 if ($tagInfo or $verbose || $unknown and not $tag =~ /^(data|idx1|LIST_movi|RIFF|\d{2}(db|dc|wb))$/) { }
0 0 elsif ($tag eq 'RIFF') { }
2069 0 29 unless $raf->Read($buff, $len2) == $len2
2070 0 0 if ($md5 and $isImageData{$tag})
2075 0 25 if ($tagInfo and ref $tagInfo eq "HASH" and $tagInfo->{'SetGroups'})
2078 0 0 if not $tagInfo and $verbose || $unknown
2086 0 29 if ($setGroups)
2090 0 29 if $ee
2092 0 0 if $validate and $pos - 8 != $riffEnd
2095 0 0 unless $raf->Read($buff, 4) == 4
2103 0 0 if ($md5 and $isImageData{$tag})
2107 0 0 if ($tag eq 'LIST_movi' and $ee) { }
0 0 elsif (not $rewind) { }
2108 0 0 if $rewind
2111 0 0 if ($len > 2147483647 and not $et->Options("LargeFileSupport"))
2115 0 0 if ($validate and $len2) { }
2117 0 0 unless $raf->Seek($len2 - 1, 1) and $raf->Read($buff, 1) == 1
2119 0 0 unless $raf->Seek($len2, 1)
2126 0 7 if $err