| line |
true |
false |
branch |
|
1439
|
0 |
3 |
if $pos >= length $$dataPt |
|
1441
|
0 |
3 |
$unicode ? : |
|
|
3 |
0 |
if $unicode ? $$dataPt =~ /\G((?:..)*?)\0\0/gs : $$dataPt =~ /\G(.*?)\0/gs |
|
1462
|
0 |
2 |
if $pos + 2 > $dataLen |
|
1464
|
1 |
1 |
if ($size == 0) { } |
|
|
0 |
1 |
elsif ($size < 4) { } |
|
1466
|
0 |
1 |
if $more |
|
1473
|
0 |
1 |
if ($pos + $size > $dataLen) |
|
1478
|
1 |
0 |
unless ($tagTablePtr->{$tag}) |
|
1482
|
1 |
0 |
if (ref $tagTablePtr->{$srcTag} eq "HASH") |
|
1491
|
0 |
1 |
unless $tagTablePtr->{$tag} |
|
1504
|
1 |
0 |
if ($dat =~ /.{5}\0\xef\xbe/gs) |
|
1507
|
1 |
0 |
if ($off == $off2) { } |
|
1513
|
1 |
0 |
$beefStart ? : |
|
1517
|
0 |
1 |
if ($verbose > 1 and $beefStart) |
|
1525
|
1 |
1 |
if ($beefStart + 8 > $end) |
|
1526
|
0 |
1 |
unless $beefStart == $end |
|
1531
|
0 |
1 |
unless ($beefID & 4294901760) == 3203334144 |
|
1532
|
0 |
1 |
unless $beefStart + $len <= $end |
|
1536
|
0 |
1 |
unless $tagTablePtr->{$beefID} |
|
1541
|
0 |
1 |
if $len & 1 |
|
1559
|
0 |
0 |
if $dirLen < 56 |
|
1566
|
0 |
0 |
if $pos + 8 > $end |
|
1570
|
0 |
0 |
unless $size |
|
1571
|
0 |
0 |
if $pos + $size > $end |
|
1594
|
0 |
1 |
if $dataLen < 36 |
|
1604
|
1 |
0 |
if ($lif & 1) |
|
1607
|
1 |
0 |
if ($off and $off + 32 <= $dataLen) |
|
1612
|
0 |
1 |
if ($pos == 20) |
|
1619
|
1 |
0 |
if (defined $val) |
|
1621
|
0 |
1 |
if $unicode |
|
1626
|
0 |
1 |
if ($hdrLen >= 36) { } |
|
1634
|
1 |
0 |
if (defined $val) |
|
1636
|
0 |
1 |
if $unicode |
|
1640
|
0 |
1 |
if ($lif & 2) |
|
1643
|
0 |
0 |
if ($off and $off + 20 <= $dataLen) |
|
1645
|
0 |
0 |
if $off + $siz > $dataLen |
|
1647
|
0 |
0 |
if ($pos > 20 and $siz >= 24) { } |
|
1654
|
0 |
0 |
if (defined $val) |
|
1656
|
0 |
0 |
if $unicode |
|
1660
|
0 |
0 |
if ($flg & 1) |
|
1662
|
0 |
0 |
if ($pos > 20 and $siz >= 28) { } |
|
1669
|
0 |
0 |
if (defined $val) |
|
1671
|
0 |
0 |
if $unicode |
|
1675
|
0 |
0 |
if ($flg & 2) |
|
1682
|
1 |
0 |
if ($off and $off < $dataLen) |
|
1686
|
0 |
1 |
if ($hdrLen >= 36) |
|
1688
|
0 |
0 |
if ($off and $off < $dataLen) |
|
1708
|
1 |
13 |
if ($buff =~ /^\[(.*?)\]/) { } |
|
|
13 |
0 |
elsif ($buff =~ /^\s*(\w+)=(.*)\x0d\x0a$/) { } |
|
1728
|
0 |
2 |
unless $raf->Read($buff, 76) == 76 |
|
1729
|
1 |
1 |
unless ($buff =~ /^.{4}\x01\x14\x02\0{5}\xc0\0{6}\x46/s) |
|
1731
|
0 |
1 |
unless $buff =~ /^\[[InternetShortcut\][\x0d\x0a]/ |
|
1732
|
0 |
1 |
unless $raf->Seek(0, 0) |
|
1737
|
0 |
1 |
unless $len >= 76 |
|
1738
|
0 |
1 |
if ($len > 76) |
|
1739
|
0 |
0 |
unless $raf->Read($buf2, $len - 76) == $len - 76 |
|
1757
|
1 |
0 |
if $flags & 128 |
|
1760
|
1 |
0 |
if ($flags & 1) |
|
1761
|
0 |
1 |
unless $raf->Read($buff, 2) == 2 |
|
1763
|
0 |
1 |
unless $raf->Read($buff, $len) == $len |
|
1772
|
1 |
0 |
if ($flags & 2) |
|
1773
|
0 |
1 |
unless $raf->Read($buff, 4) == 4 |
|
1775
|
0 |
1 |
if $len < 4 |
|
1776
|
0 |
1 |
unless $raf->Read($buf2, $len - 4) == $len - 4 |
|
1791
|
1 |
4 |
unless $flags & $mask |
|
1792
|
0 |
4 |
unless $raf->Read($buff, 2) == 2 |
|
1794
|
0 |
4 |
unless $len = unpack("v", $buff) |
|
1797
|
0 |
4 |
if ($i != 3 and $len >= 260) |
|
1799
|
0 |
0 |
if ($len > 260) |
|
1805
|
4 |
0 |
if $isUnicode |
|
1806
|
0 |
4 |
unless $raf->Read($buff, $len) |
|
1808
|
0 |
4 |
if ($limit) |
|
1809
|
0 |
0 |
$isUnicode ? : |
|
1812
|
4 |
0 |
if $isUnicode |
|
1823
|
1 |
2 |
if $len < 4 |
|
1825
|
0 |
2 |
unless $raf->Read($buf2, $len) == $len |
|
1826
|
0 |
2 |
unless $len > 4 |
|
1830
|
0 |
2 |
unless (ref $tagInfo eq "HASH" and $tagInfo->{'SubDirectory'}) |
|
1844
|
1 |
0 |
unless $i |
|
1846
|
0 |
0 |
if not $bad and $buff =~ /[^\0]/ |
|
1848
|
0 |
1 |
if ($bad) { } |
|
|
0 |
1 |
elsif ($len) { } |