line |
true |
false |
branch |
1396
|
0 |
0 |
unless my $key = $et->{'EncryptionKey'} |
1397
|
0 |
0 |
unless my $format = $tagInfo->{'Writable'} || $tagInfo->{'Format'} |
1398
|
0 |
0 |
unless $formatMinMax{$format} |
1401
|
0 |
0 |
@salt > 1 ? : |
1404
|
0 |
0 |
if ($i == $newSalt) |
1407
|
0 |
0 |
$salt =~ s/^-// ? : |
1408
|
0 |
0 |
if @salt |
1412
|
0 |
0 |
if ($sign > 0) { } |
1413
|
0 |
0 |
if $a[$i] > $max |
1415
|
0 |
0 |
if $a[$i] < $min |
1436
|
0 |
0 |
unless ($tagTablePtr->{$tag}) |
1439
|
0 |
0 |
if $name |
1458
|
0 |
0 |
unless ($pos + 8 <= $end and substr($$dataPt, $pos, 4) eq "DOFS") |
1463
|
0 |
0 |
if ($ver == 3) |
1464
|
0 |
0 |
unless ($pos + 18 <= $end and &Get32u($dataPt, $pos + 12) == $dirInfo->{'DirLen'}) |
1473
|
0 |
0 |
if $pos + 2 > $end |
1476
|
0 |
0 |
if $pos + $n + 2 > $end |
1480
|
0 |
0 |
if $pos + $len > $end |
1481
|
0 |
0 |
if ($len == 4) { } |
1490
|
0 |
0 |
if $i < $num |
1503
|
0 |
0 |
unless $pos + 4 < $len |
1508
|
0 |
0 |
unless $buff =~ s/^([^\0])\0\0\0/$1\000$1\000/s |
1510
|
0 |
0 |
if ($et->{'HTML_DUMP'}) |
1545
|
0 |
26 |
unless ($raf) |
1549
|
0 |
26 |
unless $raf->Seek(-6 - $offset, 2) and $raf->Read($buff, 6) == 6 and $buff eq 'QDIOBS' || $buff eq "\000\000SEFT" |
1552
|
26 |
0 |
if $buff eq "QDIOBS" |
1560
|
0 |
52 |
unless $raf->Seek($blockEnd - 8, 0) and $raf->Read($buff, 8) == 8 |
1562
|
0 |
52 |
unless $type =~ /^\w+$/ |
1564
|
0 |
52 |
unless $len < 65536 and $len >= 4 and $len + 8 < $blockEnd |
1565
|
0 |
52 |
unless $raf->Seek(-8 - $len, 1) and $raf->Read($buff, $len) == $len |
1567
|
26 |
26 |
unless ($type eq "SEFT") |
1568
|
19 |
7 |
unless $outfile and $type eq "QDIO" |
1577
|
7 |
0 |
if ($len == 20) { } |
1585
|
0 |
26 |
unless $buff =~ /^SEFH/ and $len >= 12 |
1589
|
0 |
26 |
if 12 + 12 * $count > $len |
1598
|
26 |
26 |
if $firstBlock < $noff |
1603
|
0 |
0 |
if ($verbose || $et->{'HTML_DUMP'} and not $outfile and $dirInfo->{'RAF'}) |
1605
|
0 |
0 |
if $et->{'HTML_DUMP'} |
1614
|
0 |
52 |
if $noff > $dirPos or $size > $noff or $size < 8 |
1615
|
0 |
52 |
if $firstBlock < $noff |
1616
|
14 |
38 |
if ($outfile) |
1617
|
7 |
7 |
unless $type == 256 and not $audioNOff |
1619
|
0 |
7 |
unless $raf->Seek($dirPos - $noff, 0) and $raf->Read($buf2, 8) == 8 |
1627
|
17 |
21 |
unless ($tagTablePtr->{$tag}) |
1628
|
16 |
1 |
unless $unknown or $verbose |
1637
|
1 |
21 |
unless ($$tagTablePtr{"$tag-name"}) |
1645
|
0 |
22 |
unless $raf->Seek($dirPos - $noff, 0) and $raf->Read($buf2, $size) == $size |
1649
|
0 |
22 |
if $len + 8 > $size |
1664
|
7 |
19 |
if ($outfile) |
1665
|
0 |
7 |
unless $raf->Seek($dataPos, 0) and $raf->Read($buff, $dirLen) == $dirLen |
1667
|
7 |
0 |
if ($offsetPos and $audioNOff) |
1675
|
7 |
0 |
unless $fixup |
1679
|
0 |
7 |
if $verbose |
1680
|
0 |
7 |
unless &Write($dirInfo->{'OutFile'}, $buff) |
1700
|
0 |
70 |
if $et->{'PREVIEW_INFO'} |