| line |
true |
false |
branch |
|
364
|
0 |
1 |
if $verbose |
|
370
|
0 |
9 |
if $size < 6 |
|
371
|
0 |
9 |
unless ($vers == 0) |
|
380
|
0 |
9 |
if $pos + $tagLen > $dirLen |
|
384
|
0 |
9 |
if $pos + 6 > $dirLen |
|
388
|
0 |
9 |
if $pos + $valLen > $dirLen |
|
394
|
0 |
9 |
unless ($tagInfo) |
|
397
|
0 |
0 |
unless $tagName =~ /^\w+$/ |
|
401
|
0 |
9 |
if ($verbose) |
|
432
|
5 |
2 |
if $prefix |
|
434
|
0 |
7 |
if $verbose |
|
437
|
7 |
14 |
if $pos + 28 > $dirEnd |
|
445
|
0 |
14 |
if $pos + $size > $dirEnd |
|
446
|
0 |
14 |
if $pos + 28 + $nameLen > $dirEnd |
|
447
|
0 |
14 |
if $valuePos < $pos + 28 + $nameLen |
|
448
|
0 |
14 |
if $valuePos + 4 > $dirEnd |
|
454
|
0 |
14 |
if $valuePos + $valueLen > $dirEnd |
|
458
|
10 |
4 |
unless ($tagInfo) |
|
464
|
0 |
14 |
if ($verbose) |
|
465
|
0 |
0 |
unless defined $format |
|
468
|
9 |
5 |
if ($valueLen and $format) |
|
470
|
0 |
9 |
if ($format eq 'flag') { } |
|
|
0 |
18 |
elsif ($type == 7 and $tagInfo) { } |
|
471
|
0 |
0 |
$valueLen == 4 ? : |
|
474
|
0 |
0 |
unless $tagInfo->{'ValueConv'} |
|
479
|
0 |
0 |
unless $tagInfo->{'PrintConv'} |
|
492
|
6 |
8 |
if ($numSubProps) |
|
505
|
0 |
7 |
unless ($pos == $dirEnd) |
|
522
|
0 |
3 |
unless $raf->Read($buff, 8) == 8 |
|
523
|
0 |
3 |
unless $buff =~ m[^(\.RMF|\.ra\xfd|pnm://|rtsp://|http://)] |
|
527
|
1 |
2 |
if ($1 eq '.RMF') { } |
|
|
1 |
1 |
elsif ($1 eq ".ra\375") { } |
|
536
|
0 |
1 |
$ext && $ext eq 'RPM' ? : |
|
541
|
0 |
1 |
if length $buff > 256 |
|
542
|
0 |
1 |
unless $buff |
|
544
|
1 |
0 |
if ($type) |
|
546
|
0 |
1 |
if $buff =~ /^http/ and not $buff =~ /\.(ra|rm|rv|rmvb|smil)$/i |
|
548
|
0 |
1 |
if $fast3 |
|
552
|
1 |
0 |
$buff =~ m[^[a-z]{3,4}://] ? : |
|
559
|
0 |
2 |
if $fast3 |
|
565
|
1 |
1 |
if ($type eq "RA") |
|
569
|
0 |
1 |
unless ($raf->Read($buff, 512)) |
|
574
|
0 |
1 |
if ($verbose > 2) |
|
577
|
1 |
0 |
if ($tagInfo) { } |
|
596
|
0 |
1 |
unless ($raf->Seek($size - 8, 1)) |
|
603
|
1 |
5 |
unless $raf->Read($buff, 10) == 10 |
|
605
|
0 |
5 |
if $tag eq "\0\0\0\0" |
|
606
|
0 |
5 |
if ($verbose) { } |
|
609
|
0 |
5 |
if $tag eq "DATA" |
|
611
|
0 |
5 |
if ($size & 2147483648 or $size < 10) |
|
616
|
4 |
1 |
if ($tagInfo and $tagInfo->{'SubDirectory'}) { } |
|
618
|
0 |
4 |
unless ($raf->Read($buff, $size - 10) == $size - 10) |
|
622
|
0 |
4 |
if ($verbose > 2) |
|
632
|
1 |
3 |
if ($dirCount{$tag}) { } |
|
641
|
2 |
2 |
if ($mime) |
|
644
|
1 |
1 |
unless $mime =~ /^logical-/ |
|
647
|
0 |
1 |
unless ($raf->Seek($size - 10, 1)) |
|
654
|
1 |
0 |
if (@mimeTypes == 1 and length $mimeTypes[0]) |
|
661
|
1 |
0 |
if ($raf->Seek(-140, 2) and $raf->Read($buff, 12) == 12 and $buff =~ /^RMJE/) |
|
663
|
1 |
0 |
if ($raf->Seek(-$metaSize - 12, 1) and $raf->Read($buff, $metaSize) == $metaSize and $buff =~ /^RJMD/) { } |
|
678
|
1 |
0 |
if ($raf->Seek(-128, 2) and $raf->Read($buff, 128) == 128 and $buff =~ /^TAG/) |