| line |
true |
false |
branch |
|
271
|
0 |
0 |
unless $attr[0] eq "name" |
|
274
|
0 |
0 |
if ($Regexp::Pattern::License::VERSION < v3.8.1) { } |
|
275
|
0 |
0 |
if @attr % 2 |
|
278
|
0 |
0 |
if exists $attr{'version'} |
|
279
|
0 |
0 |
if exists $attr{'until'} |
|
283
|
0 |
0 |
if exists $attr{'until'} |
|
286
|
0 |
0 |
if (exists $attr{'org'} and $attr{'org'} eq $org) |
|
360
|
340 |
7 |
if ($top_lines == 0) { } |
|
367
|
6 |
1 |
if ($offset and not $copyrights and $license eq "UNKNOWN") |
|
383
|
3506 |
51 |
if ($top_lines == 0) { } |
|
|
19 |
32 |
elsif (not defined $license && defined $copyrights) { } |
|
|
32 |
0 |
elsif ($offset) { } |
|
384
|
3166 |
340 |
if defined $content |
|
387
|
340 |
0 |
if (not defined $encoding) { } |
|
396
|
0 |
340 |
if $log->is_trace |
|
402
|
12 |
7 |
if defined $content |
|
407
|
7 |
0 |
if (not defined $encoding) { } |
|
418
|
7 |
70 |
if $fh->input_line_number > $top_lines |
|
421
|
7 |
0 |
if $log->is_trace |
|
424
|
7 |
0 |
if ($end_bytes) |
|
427
|
1 |
6 |
if ($position >= $filesize - $end_bytes) { } |
|
|
6 |
0 |
elsif ($position > 0) { } |
|
|
0 |
0 |
elsif ($position < 0) { } |
|
428
|
1 |
0 |
if ($position < $filesize) { } |
|
|
0 |
0 |
elsif ($position = $filesize) { } |
|
464
|
26 |
6 |
if defined $tail_content |
|
470
|
6 |
0 |
if $log->is_trace |
|
484
|
0 |
353 |
unless local $_ = $content |
|
490
|
133 |
220 |
if (@matches >= 4) |
|
496
|
3 |
350 |
if (@wordmatches >= 4) |
|
524
|
0 |
353 |
unless local $_ = $self->content |
|
542
|
0 |
3204 |
unless local $_ = $self->content |
|
582
|
280049 |
32275 |
unless $+{'prop'} and $+{'prop'} eq $prop |
|
583
|
27923 |
4352 |
unless $+{'org'} and $+{'org'} eq $org |
|
584
|
0 |
4352 |
if $+{'version'} |
|
585
|
178 |
4174 |
if $+{'other'} |
|
586
|
450 |
3724 |
if $+{'until_date'} |
|
607
|
342 |
11 |
if exists $L{'re_trait'} |
|
721
|
5522 |
6215 |
unless /$type_re/u |
|
723
|
2343 |
3872 |
if ($2 and $1 eq "singleversion") |
|
726
|
297 |
5918 |
if ($2 and $1 eq "usage") |
|
731
|
253 |
5962 |
if ($3 and $1 eq "trait") |
|
732
|
55 |
198 |
if (substr($key, 0, 14) eq 'except_prefix_') { } |
|
847
|
0 |
3 |
unless $ver |
|
862
|
5 |
352 |
if ($v) { } |
|
863
|
2 |
3 |
$later ? : |
|
864
|
2 |
3 |
if $later |
|
870
|
5 |
352 |
if ($id2) |
|
873
|
4 |
1 |
if ($v2) { } |
|
874
|
2 |
2 |
$later2 ? : |
|
875
|
2 |
2 |
if $later2 |
|
881
|
5 |
352 |
$v ? : |
|
|
5 |
352 |
$desc2 ? : |
|
|
4 |
353 |
$v2 ? : |
|
897
|
45890 |
126374 |
unless $RE{"LICENSE_$id"} |
|
910
|
1720 |
45 |
unless $licensetext =~ /$RE{"TRAIT_$trait"}/u |
|
915
|
0 |
49 |
if defined $coverage->get_range($-[0], $+[0])->get_element(0) |
|
931
|
329 |
144013 |
$pos_license{$pos}{$_} ? : |
|
940
|
0 |
297 |
unless $license |
|
943
|
21 |
276 |
if defined $coverage->get_range($pos, $pos_license{$pos}{$license}->end)->get_element(0) |
|
961
|
97 |
1617 |
if defined $coverage->get_range($-[0], $+[0])->get_element(0) |
|
995
|
9 |
1608 |
if ($+{'version_number'}) |
|
1004
|
0 |
9 |
if ($+{'version_later'}) |
|
1014
|
0 |
9 |
if (substr($licensetext, $pos + $+[0]) =~ /$L{'LEFTANCHOR_version_of'}/u) { } |
|
1034
|
598 |
788498 |
if (substr($licensetext, $pos) =~ /$RE{"NAME_$id"}/u) |
|
1047
|
1229 |
0 |
if $match{$_} and $match{$_}{'name'} |
|
1050
|
215 |
0 |
if ($name and $match{$name}{'name'}{$pos} and not defined $coverage->get_range($pos, $match{$name}{'name'}{$pos}->end)->get_element(0) and !$skip_stepwise || $L_grant_atomic_incomplete{$name}) |
|
1062
|
40 |
175 |
if (not $version and grep {$_ eq $name;} @L_type_versioned) { } |
|
|
96 |
79 |
elsif (not $version and grep {$_ eq $name;} @L_type_singleversion) { } |
|
1064
|
4 |
36 |
if ($+{'version_number'}) |
|
1073
|
0 |
4 |
if ($+{'version_later'}) |
|
1089
|
3 |
93 |
if ($+{'version_later'}) |
|
1100
|
4 |
211 |
if ($version) |
|
1105
|
3 |
212 |
if ($later) |
|
1114
|
3 |
0 |
if grep {$grant{$_};} @RE_NAME |
|
1127
|
103 |
250 |
if (grep {$match{$_}{'name'};} @agpl, @gpl, @lgpl) |
|
1135
|
14 |
115 |
if (defined $+{$_}) |
|
1150
|
56 |
12652 |
if ($licensetext =~ /$RE{"EXCEPTION_$_"}/u) |
|
1166
|
14 |
339 |
if ($licensetext =~ /$RE{'TRAIT_generated'}/u) |
|
1180
|
31 |
322 |
if (grep {$match{$_}{'name'};} @lgpl) |
|
1182
|
0 |
31 |
if ($licensetext =~ /$L{'multi_1'}/u) |
|
1199
|
74 |
279 |
if (grep {$match{$_}{'name'};} @gpl) |
|
1201
|
0 |
74 |
if ($licensetext =~ /$L{'multi_2'}/u) |
|
1210
|
0 |
353 |
if @multilicenses |
|
1213
|
31 |
322 |
if (grep {$match{$_}{'name'};} @lgpl) |
|
1217
|
5 |
26 |
if ($licensetext =~ /$L{'lgpl_5'}/u) |
|
1240
|
74 |
279 |
if (grep {$match{$_}{'name'};} @gpl) |
|
1242
|
2 |
72 |
if ($licensetext =~ /$L{'gpl_7'}/u) |
|
1256
|
1 |
352 |
if (grep {$match{$_}{'name'};} @L_contains_bsd and $licensetext =~ /$L{'bsd_1'}/u) |
|
1267
|
0 |
1 |
if $license{'bsd_4_clause'} |
|
1268
|
0 |
1 |
if ($licensetext =~ /$RE{'TRAIT_clause_advertising'}/u) |
|
1278
|
0 |
1 |
if $license{'bsd_3_clause'} |
|
1279
|
0 |
1 |
if ($licensetext =~ /$RE{'TRAIT_clause_non_endorsement'}/u) |
|
1289
|
0 |
1 |
if $license{'bsd_2_clause'} |
|
1290
|
1 |
0 |
if ($licensetext =~ /$RE{'TRAIT_clause_reproduction'}/u) |
|
1294
|
1 |
0 |
if defined $coverage->get_range($-[0], $+[0])->get_element(0) |
|
1311
|
11 |
342 |
if ($match{'apache'}{'name'}) |
|
1314
|
2 |
9 |
if ($licensetext =~ /$L{'apache_1'}/u) |
|
1325
|
0 |
9 |
if ($licensetext =~ /$L{'apache_2'}/u) |
|
1332
|
0 |
0 |
$3 ? : |
|
1339
|
1 |
8 |
if ($licensetext =~ /$L{'apache_4'}/u) |
|
1356
|
352 |
1 |
unless ($license{'fsful'}) |
|
1357
|
0 |
352 |
if ($licensetext =~ /$L{'fsful'}/u) |
|
1380
|
352 |
1 |
unless ($license{'fsfullr'}) |
|
1381
|
0 |
352 |
if ($licensetext =~ /$L{'fsfullr'}/u) |
|
1405
|
0 |
9531 |
if $match{$id}{'custom'} |
|
1406
|
0 |
9464 |
if (not $grant{$id} and $L_grant_stepwise_incomplete{$id} || $force_atomic) |
|
1409
|
0 |
0 |
if ($licensetext =~ /$RE{"GRANT_$id"}/u) |
|
1416
|
0 |
0 |
unless (defined $coverage->get_range($-[0], $+[0])->get_element(0)) |
|
1432
|
67 |
9464 |
if ($grant{$id}) |
|
1440
|
67 |
0 |
if ($L{'usage'}{$id}) |
|
1443
|
67 |
0 |
if ($L{'series'}{$L{'usage'}{$id}}) |
|
1457
|
343 |
74599 |
if (not $license{$id} || $grant{$id} || $match{$id}{'custom'} and $L_grant_stepwise_incomplete{$id} || $force_atomic) |
|
1462
|
0 |
343 |
if ($licensetext =~ /$RE{"GRANT_$id"}/u) |
|
1469
|
0 |
0 |
unless (defined $coverage->get_range($-[0], $+[0])->get_element(0)) |
|
1485
|
178 |
75011 |
if ($license{$id} or $grant{$id}) |
|
1489
|
91 |
87 |
if $grant{$id} |
|
1491
|
167 |
11 |
unless $match{$id}{'custom'} |
|
1494
|
178 |
0 |
if ($L{'series'}{$id}) |
|
1504
|
243 |
35410 |
if $match{$id}{'custom'} |
|
1510
|
2 |
35408 |
if $id eq "cc_by" and grep {$_->name eq "grant(cc_by_sa_3)";} @clues |
|
1513
|
2 |
35406 |
if $license{'rpsl_1'} and grep {$id eq $_;} "mpl", "python" |
|
1515
|
0 |
35406 |
if $license{$id} |
|
1516
|
590 |
34801 |
if (not $grant{$id} and $L_grant_stepwise_incomplete{$id} || $force_atomic) |
|
1519
|
590 |
0 |
if ($RE{"GRANT_$id"}) |
|
1520
|
5 |
585 |
if ($licensetext =~ /$RE{"GRANT_$id"}/u) |
|
1527
|
0 |
5 |
unless (defined $coverage->get_range($-[0], $+[0])->get_element(0)) |
|
1545
|
15 |
35391 |
if ($grant{$id}) |
|
1558
|
0 |
49680 |
if not $license{$id} and $match{$id}{'custom'} |
|
1563
|
48974 |
699 |
unless $license{$id} or $grant{$id} or $L_grant_stepwise_incomplete{$id} or $force_atomic |
|
1567
|
0 |
799 |
if $license{'caldera'} and $id eq "bsd" |
|
1568
|
0 |
799 |
if $license{'cube'} and $id eq "zlib" |
|
1569
|
0 |
799 |
if $license{'dsdp'} and $id eq "ntp" |
|
1570
|
0 |
799 |
if $license{'mit_cmu'} and $id eq "ntp_disclaimer" |
|
1571
|
0 |
799 |
if $license{'ntp_disclaimer'} and $id eq "ntp" |
|
1573
|
3 |
796 |
if (not $license{$id} || $grant{$id} and $licensetext =~ /$RE{"GRANT_$id"}/u) |
|
1583
|
3 |
0 |
unless (defined $coverage->get_range($-[0], $+[0])->get_element(0)) |
|
1597
|
103 |
696 |
if ($license{$id} or $grant{$id}) |
|
1601
|
16 |
87 |
if $grant{$id} |
|
1609
|
54 |
299 |
if (@exceptions) |
|
1610
|
20 |
34 |
if @expressions > 1 |
|
1617
|
28 |
325 |
if (@flaws) |