Lines Matching refs:license
10 # it under the terms of the GNU General Public License as published by
11 # the Free Software Foundation; either version 2 of the License, or
17 # GNU General Public License for more details.
19 # You should have received a copy of the GNU General Public License along
24 licensecheck - simple license checker for source files
37 B<licensecheck> attempts to determine the license that applies to each file
51 the corresponding license information.
58 for license information. (Default is 60).
74 decide which files to check the license of.
85 <file><tab><license>[<tab><copyright>] so that it can be easily sorted
115 the license(s) in use. This is equivalent to the B<--lines> command line
120 =head1 LICENSE
127 General Public License, version 2 or later.
284 my $license = '';
311 $license = parselicense($content);
313 print "$file\t$license";
319 print $license . "\n";
370 license information
372 should be parsed for license information
398 GNU General Public License, version 2, or (at your option) any
408 my $license = "";
410 if ($licensetext =~ /version ([^, ]+?)[.,]? (?:\(?only\)?.? )?(?:of the GNU (Affero )?(Lesser |Library )?General Public License )?(as )?published by the Free Software Foundation/i or
411 $licensetext =~ /GNU (?:Affero )?(?:Lesser |Library )?General Public License (?:as )?published by the Free Software Foundation; version ([^, ]+?)[.,]? /i) {
414 } elsif ($licensetext =~ /GNU (?:Affero )?(?:Lesser |Library )?General Public License, version (\d+(?:\.\d+)?)[ \.]/) {
416 } elsif ($licensetext =~ /either version ([^ ]+)(?: of the License)?, or \(at your option\) any later version/) {
429 $license = "GENERATED FILE";
432 if ($licensetext =~ /is (free software.? you can redistribute it and\/or modify it|licensed) under the terms of (version [^ ]+ of )?the (GNU (Library |Lesser )General Public License|LGPL)/i) {
433 $license = "LGPL$gplver$extrainfo $license";
436 if ($licensetext =~ /is free software.? you can redistribute it and\/or modify it under the terms of the (GNU Affero General Public License|AGPL)/i) {
437 $license = "AGPL$gplver$extrainfo $license";
440 if ($licensetext =~ /is free software.? you (can|may) redistribute it and\/or modify it under the terms of (?:version [^ ]+ (?:\(?only\)? )?of )?the GNU General Public License/i) {
441 $license = "GPL$gplver$extrainfo $license";
444 if ($licensetext =~ /is distributed under the terms of the GNU General Public License,/
446 $license = "GPL$gplver$extrainfo $license";
450 $license = "GPL (unversioned/unknown version) $license";
453 if ($licensetext =~ /This file is part of the .*Qt GUI Toolkit. This file may be distributed under the terms of the Q Public License as defined/) {
454 $license = "QPL (part of Qt) $license";
455 } elsif ($licensetext =~ /may be distributed under the terms of the Q Public License as defined/) {
456 $license = "QPL $license";
459 if ($licensetext =~ /opensource\.org\/licenses\/mit-license\.php/) {
460 $license = "MIT/X11 (BSD like) $license";
462 $license = "MIT/X11 (BSD like) $license";
463 } elsif ($licensetext =~ /Permission is hereby granted, without written agreement and without license or royalty fees, to use, copy, modify, and distribute this software and its documentation for any purpose/) {
464 $license = "MIT/X11 (BSD like) $license";
468 $license = "ISC $license";
473 $license = "BSD (4 clause) $license";
475 $license = "BSD (3 clause) $license";
477 $license = "BSD (2 clause) $license";
479 $license = "BSD $license";
483 if ($licensetext =~ /Mozilla Public License Version ([^ ]+)/) {
484 $license = "MPL (v$1) $license";
487 if ($licensetext =~ /Released under the terms of the Artistic License ([^ ]+)/) {
488 $license = "Artistic (v$1) $license";
492 $license = "Artistic $license";
496 $license = "Perl $license";
499 if ($licensetext =~ /under the Apache License, Version ([^ ]+)/) {
500 $license = "Apache (v$1) $license";
503 if ($licensetext =~ /(THE BEER-WARE LICENSE)/i) {
504 $license = "Beerware $license";
507 if ($licensetext =~ /This source file is subject to version ([^ ]+) of the PHP license/) {
508 $license = "PHP (v$1) $license";
512 $license = "CeCILL $license";
516 $license = "CeCILL-$1 $license";
519 if ($licensetext =~ /under the SGI Free Software License B/) {
520 $license = "SGI Free Software License B $license";
524 $license = "Public domain $license";
527 if ($licensetext =~ /terms of the Common Development and Distribution License(, Version ([^(]+))? \(the License\)/) {
528 $license = "CDDL " . ($1 ? "(v$2) " : '') . $license;
531 if ($licensetext =~ /Microsoft Permissive License \(Ms-PL\)/) {
532 $license = "Ms-PL $license";
535 if ($licensetext =~ /Permission is hereby granted, free of charge, to any person or organization obtaining a copy of the software and accompanying documentation covered by this license \(the \"Software\"\)/ or
536 $licensetext =~ /Boost Software License([ ,-]+Version ([^ ]+)?(\.))/i) {
537 $license = "BSL " . ($1 ? "(v$2) " : '') . $license;
540 if ($licensetext =~ /PYTHON SOFTWARE FOUNDATION LICENSE (VERSION ([^ ]+))/i) {
541 $license = "PSF " . ($1 ? "(v$2) " : '') . $license;
546 $license = "zlib/libpng $license";
547 } elsif ($licensetext =~ /This code is released under the libpng license/) {
548 $license = "libpng $license";
551 if ($licensetext =~ /Do What The Fuck You Want To Public License, Version ([^, ]+)/i) {
552 $license = "WTFPL (v$1) $license";
555 if ($licensetext =~ /Do what The Fuck You Want To Public License/i) {
556 $license = "WTFPL $license";
559 if ($licensetext =~ /(License WTFPL|Under (the|a) WTFPL)/i) {
560 $license = "WTFPL $license";
563 $license = "UNKNOWN" if (!length($license));
566 $license =~ s/\s+$//;
568 return $license;
