Home | History | Annotate | Download | only in devscripts

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.
292 my $license = '';
308 $license = parselicense($header);
310 # If no license in header, check footer (slow, because read file backwards)
312 if ($license eq "UNKNOWN") {
324 $license = parselicense($footer);
328 print "$file\t$license";
334 print $license . "\n";
397 license information
399 should be parsed for license information
425 GNU General Public License, version 2, or (at your option) any
436 my $license = "";
438 if ($licensetext =~ /version ([^, ]+?)[.,]? (?:\(?only\)?.? )?(?:of the GNU (Affero )?General Public License )?(as )?published by the Free Software Foundation/i or
439 $licensetext =~ /GNU (?:Affero )?General Public License (?:as )?published by the Free Software Foundation; version ([^, ]+?)[.,]? /i or
440 $licensetext =~ /GNU (?:Affero )?General Public License,? [Vv]ersion (\d+(?:\.\d+)?)[ \.]/) {
442 } elsif ($licensetext =~ /either version ([^ ]+)(?: of the License)?, or \(at your option\) any later version/) {
446 if ($licensetext =~ /version ([^, ]+?)[.,]? (?:or later|or any later version) (?:of the GNU (?:Lesser |Library )General Public License )(as )?published by the Free Software Foundation/i or
447 $licensetext =~ /(?:GNU (?:Lesser |Library )|(?:Lesser|Library) GNU )General Public License (?:(?:as )?published by the Free Software Foundation;)?,? (?:either )?[Vv]ersion ([^, ]+?)(?: of the license)?[.,]? (?:or later|or (?:\(at your option\) )?any later version)/i or
448 $licensetext =~ /GNU (?:Lesser |Library )General Public License(?: \(LGPL\))?,? [Vv]ersion (\d+(?:\.\d+)?)[ \.]/) {
457 $license = "GENERATED FILE";
460 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 or
461 $licensetext =~ /(is distributed|may be used|can redistribute).*terms.*(LGPL|(Lesser|Library) GNU General Public License)/) {
463 $license = "LGPL$lgplver$extrainfo $license";
465 $license = "LGPL (unversioned/unknown version) $license";
469 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) {
470 $license = "GPL$gplver$extrainfo $license";
471 } elsif ($licensetext =~ /is distributed under the terms of the GNU General Public License,/
473 $license = "GPL$gplver$extrainfo $license";
476 $license = "GPL$gplver$extrainfo $license";
478 $license = "GPL (unversioned/unknown version) $license";
482 License as defined/) {
483 $license = "QPL (part of Qt) $license";
484 } elsif ($licensetext =~ /may be distributed under the terms of the Q Public License as defined/) {
485 $license = "QPL $license";
489 $license = "MIT/X11 (BSD like) $license";
491 $license = "MIT/X11 (BSD like) $license";
492 } 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/) {
493 $license = "MIT/X11 (BSD like) $license";
495 $license = "MIT/X11 (BSD like) $license";
496 } elsif ($licensetext =~ /MIT .* License/) {
497 $license = "MIT/X11 (BSD like) $license";
501 $license = "Independent JPEG Group License $license";
504 if ($licensetext =~ /the University of Illinois Open Source License/){
505 $license = "University of Illinois/NCSA Open Source License (BSD like) $license";
509 $license = "ISC $license";
515 $license = "BSD (4 clause) $license";
517 $license = "BSD (3 clause) $license";
519 $license = "BSD (2 clause) $license";
521 $license = "BSD $license";
523 } elsif ($licensetext =~ /Use of this source code is governed by a BSD-style license/) {
524 $license = "BSD-like $license";
526 $license = "BSD-like $license";
527 } elsif ($licensetext =~ /subject to the BSD License/) {
529 $license = "BSD-like $license";
530 } elsif ($licensetext =~ /license BSD/) {
531 $license = "BSD-like $license";
532 } elsif ($licensetext =~ /GOVERNED BY A BSD-STYLE SOURCE LICENSE/) {
533 $license = "BSD-like $license";
534 } elsif ($licensetext =~ /BSD 3-Clause license/) {
535 $license = "BSD (3 clause) $license";
538 if ($licensetext =~ /Mozilla Public License( Version|, v.) ([^ ]+[^., ]),?/) {
539 $license = "MPL (v$2) $license";
542 if ($licensetext =~ /Released under the terms of the Artistic License ([^ ]+)/) {
543 $license = "Artistic (v$1) $license";
547 $license = "Artistic $license";
551 $license = "Perl $license";
554 if ($licensetext =~ /under the terms of the Apache ([^ ]+) License OR version 2 of the GNU/) {
555 $license = "Apache (v$1) GPL (v2) $license";
556 } elsif ($licensetext =~ /under the Apache License, Version ([^ ]+)/) {
557 $license = "Apache (v$1) $license";
560 if ($licensetext =~ /(THE BEER-WARE LICENSE)/i) {
561 $license = "Beerware $license";
564 if ($licensetext =~ /This source file is subject to version ([^ ]+) of the PHP license/) {
565 $license = "PHP (v$1) $license";
569 $license = "CeCILL $license";
573 $license = "CeCILL-$1 $license";
576 if ($licensetext =~ /under the SGI Free Software (B License|License B)/) {
577 $license = "SGI Free Software License B $license";
581 $license = "Public domain $license";
584 if ($licensetext =~ /terms of the Common Development and Distribution License(, Version ([^(]+))? \(the License\)/) {
585 $license = "CDDL " . ($1 ? "(v$2) " : '') . $license;
588 if ($licensetext =~ /Microsoft Permissive License \(Ms-PL\)/) {
589 $license = "Ms-PL $license";
592 if ($licensetext =~ /as defined in and that are subject to the Apple Public Source License([ ,-]+Version ([^ ]+)?(\.))/) {
593 $license = "APSL " . ($1 ? "(v$2) " : '') . $license;
596 $license = "Apple MIT $license";
599 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
600 $licensetext =~ /Boost Software License([ ,-]+Version ([^ ]+)?(\.))/i) {
601 $license = "BSL " . ($1 ? "(v$2) " : '') . $license;
604 if ($licensetext =~ /PYTHON SOFTWARE FOUNDATION LICENSE (VERSION ([^ ]+))/i) {
605 $license = "PSF " . ($1 ? "(v$2) " : '') . $license;
610 $license = "zlib/libpng $license";
611 } elsif ($licensetext =~ /This code is released under the libpng license/) {
612 $license = "libpng $license";
615 if ($licensetext =~ /under MIT license/) {
616 $license = "MIT/X11 (BSD like) $license";
619 if ($licensetext =~ /License MIT(-| )License/) {
620 $license = "MIT/X11 (BSD like) $license";
624 $license = $license . "with Bison parser exception";
627 if ($licensetext =~ /As a special exception to the GNU General Public License, if you distribute this file as part of a program or library that is built using GNU Libtool, you may include this file under the same distribution terms that you use for the rest of that program/) {
628 $license = $license . "with libtool exception";
632 $license = $license . "Khronos Group";
635 if ($licensetext =~ /This file is part of the FreeType project, and may only be used(,)? modified(,)? and distributed under the terms of the FreeType project license, LICENSE\.TXT\. By continuing to use, modify, or distribute this file you indicate that you have read the license and understand and accept it fully/) {
636 $license = "FreeType (BSD like) $license";
638 if ($licensetext =~ /This software, and all works of authorship, whether in source or object code form as indicated by the copyright notice.*is made available, and may only be used, modified, and distributed under the FreeType Project License, LICENSE\.TXT\. Additionally, subject to the terms and conditions of the FreeType Project License, each contributor to the Work hereby grants to any individual or legal entity exercising permissions granted by the FreeType Project License and this section.*a perpetual, worldwide, non-exclusive, no-charge, royalty-free, irrevocable.*patent license to make/) {
639 $license = "FreeType (BSD like) with patent clause $license";
643 $license = "Anti-Grain Geometry $license";
646 $license = "UNKNOWN" unless $license;
649 $license =~ s/\s+$//;
651 return $license;