line |
true |
false |
branch |
1398
|
0 |
0 |
unless my $key = $et->{'EncryptionKey'} |
1399
|
0 |
0 |
unless my $format = $tagInfo->{'Writable'} || $tagInfo->{'Format'} |
1400
|
0 |
0 |
unless $formatMinMax{$format} |
1403
|
0 |
0 |
@salt > 1 ? : |
1406
|
0 |
0 |
if ($i == $newSalt) |
1409
|
0 |
0 |
$salt =~ s/^-// ? : |
1410
|
0 |
0 |
if @salt |
1414
|
0 |
0 |
if ($sign > 0) { } |
1415
|
0 |
0 |
if $a[$i] > $max |
1417
|
0 |
0 |
if $a[$i] < $min |
1438
|
0 |
0 |
unless ($tagTablePtr->{$tag}) |
1441
|
0 |
0 |
if $name |
1460
|
0 |
0 |
unless ($pos + 8 <= $end and substr($$dataPt, $pos, 4) eq "DOFS") |
1465
|
0 |
0 |
if ($ver == 3) |
1466
|
0 |
0 |
unless ($pos + 18 <= $end and &Get32u($dataPt, $pos + 12) == $dirInfo->{'DirLen'}) |
1475
|
0 |
0 |
if $pos + 2 > $end |
1478
|
0 |
0 |
if $pos + $n + 2 > $end |
1482
|
0 |
0 |
if $pos + $len > $end |
1483
|
0 |
0 |
if ($len == 4) { } |
1492
|
0 |
0 |
if $i < $num |
1505
|
0 |
0 |
unless $pos + 4 < $len |
1510
|
0 |
0 |
unless $buff =~ s/^([^\0])\0\0\0/$1\000$1\000/s |
1512
|
0 |
0 |
if ($et->{'HTML_DUMP'}) |
1547
|
0 |
26 |
unless ($raf) |
1551
|
0 |
26 |
unless $raf->Seek(-6 - $offset, 2) and $raf->Read($buff, 6) == 6 and $buff eq 'QDIOBS' || $buff eq "\000\000SEFT" |
1554
|
26 |
0 |
if $buff eq "QDIOBS" |
1562
|
0 |
52 |
unless $raf->Seek($blockEnd - 8, 0) and $raf->Read($buff, 8) == 8 |
1564
|
0 |
52 |
unless $type =~ /^\w+$/ |
1566
|
0 |
52 |
unless $len < 65536 and $len >= 4 and $len + 8 < $blockEnd |
1567
|
0 |
52 |
unless $raf->Seek(-8 - $len, 1) and $raf->Read($buff, $len) == $len |
1569
|
26 |
26 |
unless ($type eq "SEFT") |
1570
|
19 |
7 |
unless $outfile and $type eq "QDIO" |
1579
|
7 |
0 |
if ($len == 20) { } |
1587
|
0 |
26 |
unless $buff =~ /^SEFH/ and $len >= 12 |
1591
|
0 |
26 |
if 12 + 12 * $count > $len |
1600
|
26 |
26 |
if $firstBlock < $noff |
1605
|
0 |
0 |
if ($verbose || $et->{'HTML_DUMP'} and not $outfile and $dirInfo->{'RAF'}) |
1607
|
0 |
0 |
if $et->{'HTML_DUMP'} |
1616
|
0 |
52 |
if $noff > $dirPos or $size > $noff or $size < 8 |
1617
|
0 |
52 |
if $firstBlock < $noff |
1618
|
14 |
38 |
if ($outfile) |
1619
|
7 |
7 |
unless $type == 256 and not $audioNOff |
1621
|
0 |
7 |
unless $raf->Seek($dirPos - $noff, 0) and $raf->Read($buf2, 8) == 8 |
1629
|
17 |
21 |
unless ($tagTablePtr->{$tag}) |
1630
|
16 |
1 |
unless $unknown or $verbose |
1639
|
1 |
21 |
unless ($$tagTablePtr{"$tag-name"}) |
1647
|
0 |
22 |
unless $raf->Seek($dirPos - $noff, 0) and $raf->Read($buf2, $size) == $size |
1651
|
0 |
22 |
if $len + 8 > $size |
1666
|
7 |
19 |
if ($outfile) |
1667
|
0 |
7 |
unless $raf->Seek($dataPos, 0) and $raf->Read($buff, $dirLen) == $dirLen |
1669
|
7 |
0 |
if ($offsetPos and $audioNOff) |
1677
|
7 |
0 |
unless $fixup |
1681
|
0 |
7 |
if $verbose |
1682
|
0 |
7 |
unless &Write($dirInfo->{'OutFile'}, $buff) |
1702
|
0 |
76 |
if $et->{'PREVIEW_INFO'} |