| line |
!l |
l&&!r |
l&&r |
condition |
|
143
|
0 |
0 |
0 |
$v[2] && $v[2] =~ /below/i |
|
201
|
0 |
0 |
3 |
$ok{$noff} and $ok{$nlen} |
|
|
0 |
0 |
3 |
$ok{$noff} and $ok{$nlen} and $ok{$nbas} |
|
|
0 |
0 |
3 |
$ok{$noff} and $ok{$nlen} and $ok{$nbas} and $ok{$nind} |
|
233
|
0 |
0 |
0 |
$et->{'QtDataRef'} and $et->{'QtDataRef'}[$drefIdx - 1] |
|
236
|
0 |
0 |
0 |
$dref->[1] == 1 and $dref->[0] ne "rsrc" |
|
245
|
3 |
0 |
6 |
$base_offset and not $constOff |
|
267
|
0 |
6 |
3 |
defined $minOffset and $minOffset > $base_offset |
|
315
|
22 |
0 |
0 |
$format and $format ne "string" |
|
|
0 |
20 |
2 |
not $format and $writable |
|
|
20 |
0 |
2 |
not $format and $writable and $writable ne "string" |
|
317
|
0 |
2 |
0 |
$writable and $qtFormat{$writable} |
|
393
|
0 |
0 |
2 |
$nvHash and $et->IsOverwriting($nvHash) > 0 |
|
|
0 |
1 |
1 |
$nvHash and $et->IsOverwriting($nvHash) > 0 and not defined $et->GetNewValue($nvHash) |
|
397
|
5 |
1 |
0 |
$newTags->{$t}{'SrcTagInfo'} and $newTags->{$t}{'SrcTagInfo'} eq $tagInfo |
|
399
|
0 |
0 |
0 |
$et->IsOverwriting($nv) and defined $et->GetNewValue($nv) |
|
423
|
11 |
0 |
1 |
$tagInfo->{'LangCode'} and $tagInfo->{'SrcTagInfo'} |
|
430
|
4 |
0 |
5 |
$nvHash->{'IsCreating'} and $et->IsOverwriting($nvHash) |
|
|
4 |
0 |
5 |
$nvHash->{'IsCreating'} and $et->IsOverwriting($nvHash) and defined $et->GetNewValue($nvHash) |
|
467
|
0 |
0 |
3 |
$items and $raf |
|
477
|
6 |
0 |
3 |
$item->{'RefersTo'} and $item->{'RefersTo'}{$primary} |
|
486
|
0 |
0 |
3 |
$item->{'Extents'} and @{$item->{'Extents'};} |
|
509
|
0 |
0 |
1 |
length $buff >= 4 and length $buff >= 4 + unpack("N", $buff) |
|
535
|
0 |
0 |
3 |
defined $newVal and $changed ne $et->{'CHANGED'} |
|
|
0 |
0 |
3 |
defined $newVal and $changed ne $et->{'CHANGED'} and $dirInfo{'DirLen'} || length $newVal |
|
539
|
2 |
0 |
1 |
length $hdr and length $newVal |
|
607
|
0 |
0 |
2 |
defined $newVal and $changed ne $et->{'CHANGED'} |
|
707
|
0 |
6 |
0 |
do {
$tag ne 'hdlr'
} && do {
my $n = &Get32u($outfile, $pos);
&Set32u($n + length($add{$tag}), $outfile, $pos)
} |
|
793
|
241 |
56 |
8 |
$addDirs->{'Keys'} and $curPath =~ /^MOV-Movie(-Meta)?$/ |
|
826
|
30 |
0 |
2 |
$newTags->{$_}{'LangCode'} and $newTags->{$_}{'SrcTagInfo'} |
|
839
|
1347 |
0 |
0 |
defined $atomCount and --$atomCount < 0 |
|
|
1347 |
0 |
0 |
defined $atomCount and --$atomCount < 0 and $dataPt |
|
847
|
305 |
0 |
0 |
$n == 4 and $hdr eq "\0\0\0\0" |
|
920
|
0 |
0 |
0 |
$got <= 256 and $size >= 1024 |
|
|
0 |
0 |
0 |
$got <= 256 and $size >= 1024 and $tag ne "mdat" |
|
931
|
0 |
0 |
0 |
$size > $maxReadLen and $got == 65536 |
|
941
|
946 |
0 |
75 |
$tag eq "hdlr" and length $buff >= 12 |
|
961
|
0 |
0 |
0 |
$dirInfo->{'DirID'} and $dirInfo->{'DirID'} eq "moov" |
|
|
0 |
0 |
0 |
$dirInfo->{'DirID'} and $dirInfo->{'DirID'} eq "moov" and length $buff > 8 |
|
989
|
192 |
808 |
21 |
$tagInfo and $tagInfo->{'WriteHook'} |
|
992
|
829 |
171 |
21 |
not $tagInfo and $dirName eq "ItemList" |
|
|
1000 |
0 |
21 |
not $tagInfo and $dirName eq "ItemList" and $et->{'Keys'} |
|
1017
|
0 |
14 |
7 |
$tagInfo && $tagInfo->{'SubDirectory'} |
|
|
12 |
7 |
14 |
$dirName eq "UserData" and not $tagInfo && $tagInfo->{'SubDirectory'} |
|
1027
|
171 |
785 |
0 |
$tagInfo and $tagInfo->{'Unknown'} |
|
1029
|
171 |
191 |
594 |
$tagInfo and !defined($tagInfo->{'Writable'}) || $tagInfo->{'Writable'} |
|
1075
|
503 |
0 |
62 |
$hdrLen and $hdrLen < $size |
|
1079
|
558 |
0 |
7 |
$subdir->{'ByteOrder'} and $subdir->{'ByteOrder'} =~ /^Little/ |
|
1095
|
178 |
378 |
9 |
defined $newData and not length $newData |
|
|
556 |
9 |
0 |
defined $newData and not length $newData and $tagInfo->{'Permanent'} || $tagTablePtr->{'PERMANENT'} && !defined($tagInfo->{'Permanent'}) |
|
1105
|
503 |
5 |
57 |
$start and defined $newData |
|
|
508 |
57 |
0 |
$start and defined $newData and length $newData || defined $tagInfo->{'Permanent'} && !$tagInfo->{'Permanent'} |
|
1112
|
339 |
190 |
36 |
$curPath eq $writePath and $addDirs->{$subName} |
|
|
190 |
2 |
34 |
$curPath eq $writePath and $addDirs->{$subName} and $addDirs->{$subName} eq $dirName |
|
1124
|
4 |
0 |
5 |
$dirInfo->{'HasData'} && $buff =~ /\0...data\0/s |
|
1126
|
0 |
0 |
4 |
$tag =~ /^\xa9/ || $tagInfo->{'IText'} and $size >= ($tagInfo->{'IText'} || 4) |
|
1136
|
1 |
0 |
1 |
$nvHash and not $didTag->{$nvHash} |
|
1138
|
0 |
0 |
1 |
$nvHash->{'IsCreating'} and $et->IsOverwriting($nvHash) |
|
1151
|
0 |
0 |
1 |
$1 and $1 ne "und" |
|
1154
|
0 |
0 |
1 |
$2 and $2 ne "ZZ" |
|
1180
|
0 |
1 |
4 |
not $nvHash and $nvHashNoLang |
|
1181
|
0 |
0 |
4 |
$lang eq $undLang and not $ctry |
|
|
0 |
0 |
4 |
$lang eq $undLang and not $ctry and not $didTag->{$nvHashNoLang} |
|
1188
|
0 |
0 |
5 |
$type eq "data" and $len >= 16 |
|
1200
|
0 |
0 |
0 |
$tagInfo->{'Writable'} and $qtFormat{$tagInfo->{'Writable'}} |
|
1210
|
1 |
1 |
3 |
$nvHash and $et->IsOverwriting($nvHash, $val) |
|
1240
|
1 |
4 |
0 |
defined $newData and $pos < $size |
|
1246
|
4 |
0 |
0 |
$tagInfo->{'IText'} and $tagInfo->{'IText'} >= 6 |
|
1261
|
4 |
0 |
0 |
$lang < 1024 and not $val =~ /^\xfe\xff/ |
|
1275
|
0 |
1 |
3 |
not $nvHash and $nvHashNoLang |
|
1276
|
0 |
0 |
3 |
$lang eq $undLang and not $didTag->{$nvHashNoLang} |
|
1292
|
1 |
5 |
3 |
$nvHash and defined $val |
|
1299
|
0 |
0 |
3 |
defined $newData and not $didTag->{$nvHash} |
|
1302
|
0 |
0 |
0 |
$format =~ /^string/ and not $tagInfo->{'Binary'} |
|
|
0 |
0 |
0 |
$format =~ /^string/ and not $tagInfo->{'Binary'} and not $tagInfo->{'ValueConv'} |
|
|
0 |
0 |
0 |
$format and not $tagInfo->{'Binary'} |
|
1339
|
359 |
27 |
8 |
$sizeDiff > 0 and $tagInfo->{'PreservePadding'} |
|
|
27 |
8 |
0 |
$sizeDiff > 0 and $tagInfo->{'PreservePadding'} and $et->Options("QuickTimePad") |
|
1366
|
529 |
0 |
33 |
$parent eq "DataInfo" and length $buff >= 4 |
|
|
496 |
0 |
33 |
$tag eq "stsd" and length $buff >= 8 |
|
1381
|
0 |
0 |
33 |
$drefTbl and $$drefTbl[$drefIdx - 1] |
|
1386
|
0 |
0 |
33 |
$dref->[1] == 1 && $dref->[0] ne 'rsrc' |
|
1404
|
171 |
391 |
0 |
$tagInfo and $tagInfo->{'WriteLast'} |
|
1418
|
191 |
111 |
3 |
$canCreate and exists $et->{'EDIT_DIRS'}{$dirName} || $createKeys |
|
1426
|
0 |
9 |
0 |
$curPath eq "MOV-Movie-Meta-ItemList" and $et->{'Keys'} |
|
1455
|
53 |
0 |
0 |
defined $tagInfo->{'CanCreate'} and not $tagInfo->{'CanCreate'} |
|
1457
|
53 |
0 |
0 |
defined $tagInfo->{'HandlerType'} and !$et->{'HandlerType'} || $et->{'HandlerType'} ne $tagInfo->{'HandlerType'} |
|
1461
|
0 |
8 |
31 |
$nvHash and not $didTag->{$nvHash} |
|
1462
|
13 |
0 |
18 |
$nvHash->{'IsCreating'} and $et->IsOverwriting($nvHash) |
|
1477
|
0 |
0 |
0 |
$1 and $1 ne "und" |
|
1480
|
0 |
0 |
0 |
$2 and $2 ne "ZZ" |
|
1486
|
5 |
0 |
2 |
$tagInfo->{'IText'} and $tagInfo->{'IText'} >= 6 |
|
1520
|
11 |
0 |
3 |
$createKeys and $curPath eq "MOV-Movie" |
|
|
11 |
1 |
2 |
$createKeys and $curPath eq "MOV-Movie" and $subName eq "Meta" |
|
|
11 |
1 |
0 |
$createKeys and $curPath eq "MOV-Movie-Meta" |
|
|
10 |
2 |
0 |
$subName eq "Meta" and $et->{'OPTIONS'}{'QuickTimeHandler'} |
|
1533
|
0 |
0 |
10 |
$curPath eq $writePath and $addDirs->{$subName} |
|
|
0 |
0 |
10 |
$curPath eq $writePath and $addDirs->{$subName} and $addDirs->{$subName} eq $dirName |
|
1548
|
0 |
0 |
14 |
$newData and length $newData <= 2147483639 |
|
1557
|
0 |
0 |
3 |
$cond and $cond =~ m[=~\s*\/\^(.*)/] |
|
1580
|
302 |
0 |
3 |
$curPath eq "MOV-Meta" and $et->{'EDIT_DIRS'}{'ItemInformation'} |
|
1589
|
305 |
0 |
0 |
$term and length $$outfile |
|
1646
|
0 |
1 |
2 |
$edit->[0] < $mdat->[1] || !$mdat->[1] and $edit->[1] > $mdat->[0] |
|
|
0 |
1 |
0 |
$edit->[0] == $edit->[1] and $edit->[0] == $mdat->[0] || $edit->[0] == $mdat->[1] |
|
1652
|
3 |
0 |
0 |
$edit->[1] > $mdat->[1] and $mdat->[1] |
|
1692
|
0 |
14 |
5 |
defined $co->[4] and $co->[4] == $edit->[3] |
|
1739
|
15 |
0 |
10 |
$_->[0] eq "uuid" and $_->[2] >= 24 |
|
1793
|
0 |
12 |
5 |
defined $id and $id == $mdat->[5] |
|
1795
|
9 |
3 |
0 |
$pos == $mdat->[0] and $mdat->[0] != $mdat->[1] |
|
1799
|
0 |
21 |
0 |
$pos >= $mdat->[0] and $pos <= $mdat->[1] || !$mdat->[1] |
|
1801
|
18 |
0 |
0 |
$pos == $mdat->[1] and $i + 1 < @mdat |
|
|
18 |
0 |
0 |
$pos == $mdat->[1] and $i + 1 < @mdat and $pos == $mdat[$i + 1][0] |
|
1874
|
18 |
0 |
0 |
$size < 8 and $size != 1 |
|
1882
|
9 |
0 |
9 |
$tag eq "ftyp" and $size >= 12 |
|
|
9 |
0 |
9 |
$tag eq "ftyp" and $size >= 12 and $size < 100000 |
|
|
0 |
0 |
9 |
$tag eq "ftyp" and $size >= 12 and $size < 100000 and $raf->Read($buff, $size - 8) == $size - 8 |
|
|
0 |
0 |
9 |
$tag eq "ftyp" and $size >= 12 and $size < 100000 and $raf->Read($buff, $size - 8) == $size - 8 and not $buff =~ /^(....)+(qt )/s |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
142
|
0 |
0 |
0 |
@v == 2 or @v == 3 |
|
162
|
0 |
0 |
0 |
@a == 2 or @a == 3 |
|
223
|
0 |
0 |
9 |
$ver == 1 or $ver == 2 |
|
255
|
0 |
0 |
9 |
$ver == 1 or $ver == 2 |
|
260
|
9 |
0 |
0 |
not defined $minOffset or $minOffset > $extent_offset |
|
302
|
3 |
364 |
147 |
$tagInfo->{'Format'} || $tagInfo->{'Writable'} || $tagInfo->{'Table'}{'FORMAT'} |
|
315
|
0 |
2 |
20 |
$format and $format ne "string" or not $format and $writable and $writable ne "string" |
|
316
|
0 |
2 |
0 |
$format || $writable |
|
380
|
0 |
0 |
15 |
$len < 8 or $pos + $len > $dirLen |
|
535
|
1 |
2 |
0 |
$dirInfo{'DirLen'} || length $newVal |
|
568
|
3 |
1 |
2 |
$did{$name} or not $et->{'ADD_DIRS'}{$name} |
|
570
|
4 |
0 |
0 |
$boxPos->{$_} or push @missing, $_ |
|
628
|
1 |
0 |
2 |
$items->{$id} or $usedID{$id} |
|
809
|
1 |
1 |
10 |
$keysInfo{$tagInfo} || $tagInfo->{'SrcTagInfo'} && $keysInfo{$tagInfo->{'SrcTagInfo'}} |
|
832
|
101 |
13 |
191 |
$curPath eq $writePath or $createKeys |
|
863
|
0 |
0 |
3 |
$hi or $lo > 2147483647 |
|
951
|
0 |
0 |
49 |
$tag eq "mfra" or $tag eq "moof" |
|
|
0 |
0 |
49 |
$tag eq "sidx" or $tag eq "saio" |
|
|
3 |
10 |
33 |
$tag eq "CTBO" or $tag eq "uuid" |
|
973
|
0 |
0 |
0 |
$et->{'CUR_WRITE_GROUP'} || $parent |
|
1029
|
774 |
11 |
0 |
!defined($tagInfo->{'Writable'}) || $tagInfo->{'Writable'} |
|
1037
|
145 |
420 |
0 |
$subdir->{'DirName'} || $tagInfo->{'Name'} |
|
1095
|
0 |
0 |
9 |
$tagInfo->{'Permanent'} || $tagTablePtr->{'PERMANENT'} && !defined($tagInfo->{'Permanent'}) |
|
1105
|
56 |
0 |
1 |
length $newData || defined $tagInfo->{'Permanent'} && !$tagInfo->{'Permanent'} |
|
1120
|
7 |
2 |
211 |
$nvHash or $langTags{$tag} |
|
|
2 |
0 |
211 |
$nvHash or $langTags{$tag} or $delGrp |
|
1126
|
4 |
0 |
0 |
$tag =~ /^\xa9/ || $tagInfo->{'IText'} |
|
1174
|
0 |
5 |
0 |
$nvHash or not $ctry |
|
|
5 |
0 |
0 |
$nvHash or not $ctry or $lang ne $undLang |
|
|
5 |
0 |
0 |
$nvHash or not $ctry or $lang ne $undLang or length $langCode == 2 |
|
1210
|
3 |
0 |
2 |
$nvHash and $et->IsOverwriting($nvHash, $val) or $delTag |
|
1212
|
0 |
0 |
3 |
$delTag or not defined $newVal |
|
|
0 |
0 |
3 |
$delTag or not defined $newVal or $didTag->{$nvHash} |
|
1256
|
0 |
0 |
4 |
$len > $size - 4 or $len < 0 |
|
1288
|
0 |
0 |
0 |
$tag =~ /^\xa9/ or $tagInfo->{'IText'} |
|
1295
|
3 |
0 |
0 |
defined $newData or $canCreate |
|
1302
|
0 |
0 |
0 |
not $format or $format =~ /^string/ and not $tagInfo->{'Binary'} and not $tagInfo->{'ValueConv'} |
|
1396
|
0 |
0 |
0 |
$et->{'CUR_WRITE_GROUP'} || $parent |
|
1418
|
76 |
3 |
35 |
exists $et->{'EDIT_DIRS'}{$dirName} || $createKeys |
|
1454
|
14 |
39 |
0 |
$dirs->{$tag} || $newTags->{$tag} |
|
1457
|
0 |
0 |
0 |
!$et->{'HandlerType'} || $et->{'HandlerType'} ne $tagInfo->{'HandlerType'} |
|
1482
|
5 |
0 |
2 |
$tag =~ /^\xa9/ or $tagInfo->{'IText'} |
|
|
0 |
0 |
0 |
$ctry or $lang |
|
1517
|
14 |
0 |
0 |
$subdir->{'DirName'} || $tagInfo->{'Name'} |
|
1589
|
0 |
0 |
0 |
&Write($outfile, $term) or $rtnVal = $rtnErr, $err = 1 |
|
1595
|
18 |
22 |
0 |
$emptyMeta{$_} or $isEmpty = 0, last |
|
1645
|
2 |
5 |
5 |
defined $mdat->[5] or $changed |
|
1646
|
3 |
0 |
0 |
$edit->[0] < $mdat->[1] || !$mdat->[1] |
|
|
1 |
0 |
0 |
$edit->[0] == $mdat->[0] || $edit->[0] == $mdat->[1] |
|
|
2 |
0 |
1 |
$edit->[0] < $mdat->[1] || !$mdat->[1] and $edit->[1] > $mdat->[0] or $edit->[0] == $edit->[1] and $edit->[0] == $mdat->[0] || $edit->[0] == $mdat->[1] |
|
|
2 |
0 |
3 |
not $edit->[0] or ($edit->[0] < $mdat->[1] || !$mdat->[1] and $edit->[1] > $mdat->[0] or $edit->[0] == $edit->[1] and $edit->[0] == $mdat->[0] || $edit->[0] == $mdat->[1]) |
|
1652
|
0 |
0 |
3 |
$edit->[0] < $mdat->[0] or $edit->[1] > $mdat->[1] and $mdat->[1] |
|
1758
|
9 |
0 |
3 |
&Get64u($outfile, $pos + 12) or $id == 1 |
|
|
9 |
0 |
3 |
&Get64u($outfile, $pos + 12) or $id == 1 or $id == 2 |
|
1760
|
0 |
0 |
0 |
$id == 1 or $id == 2 |
|
1799
|
18 |
0 |
3 |
$pos <= $mdat->[1] || !$mdat->[1] |