OLD | NEW |
| (Empty) |
1 --- licensecheck.pl.orig 2011-11-02 20:24:19.000000000 +0000 | |
2 +++ licensecheck.pl 2011-11-02 20:24:38.000000000 +0000 | |
3 @@ -241,6 +241,12 @@ | |
4 my @find_args = (); | |
5 my $files_count = @ARGV; | |
6 | |
7 +push @find_args, qw(-not ( -path */LayoutTests/* -prune ) ); | |
8 +push @find_args, qw(-not ( -path */out/Debug/* -prune ) ); | |
9 +push @find_args, qw(-not ( -path */out/Release/* -prune ) ); | |
10 +push @find_args, qw(-not ( -path *.git* -prune ) ); | |
11 +push @find_args, qw(-not ( -path *.svn* -prune ) ); | |
12 + | |
13 push @find_args, qw(-maxdepth 1) unless $opt_recursive; | |
14 push @find_args, qw(-follow -type f -print); | |
15 | |
16 @@ -277,10 +283,6 @@ | |
17 while (<F>) { | |
18 last if ($. > $opt_lines); | |
19 $content .= $_; | |
20 - $copyright_match = parse_copyright($_); | |
21 - if ($copyright_match) { | |
22 - $copyrights{lc("$copyright_match")} = "$copyright_match"; | |
23 - } | |
24 } | |
25 close(F); | |
26 | |
27 @@ -298,7 +300,6 @@ | |
28 | |
29 $license = parselicense($content); | |
30 print "$file: "; | |
31 - print "*No copyright* " unless $copyright; | |
32 print $license . "\n"; | |
33 print " [Copyright: " . $copyright . "]\n" | |
34 if $copyright and $opt_copyright; | |
35 @@ -398,15 +399,11 @@ | |
36 $gplver = " (v$1 or later)"; | |
37 } | |
38 | |
39 - if ($licensetext =~ /(?:675 Mass Ave|59 Temple Place|51 Franklin Steet|0213
9|02111-1307)/i) { | |
40 - $extrainfo = " (with incorrect FSF address)$extrainfo"; | |
41 - } | |
42 - | |
43 if ($licensetext =~ /permission (?:is (also granted|given))? to link (the c
ode of )?this program with (any edition of )?(Qt|the Qt library)/i) { | |
44 $extrainfo = " (with Qt exception)$extrainfo" | |
45 } | |
46 | |
47 - if ($licensetext =~ /(All changes made in this file will be lost|DO NOT (ED
IT|delete this file)|Generated by)/i) { | |
48 + if ($licensetext =~ /(All changes made in this file will be lost|DO NOT (ED
IT|delete this file)|Generated (automatically|by|from)|generated.*file)/i) { | |
49 $license = "GENERATED FILE"; | |
50 } | |
51 | |
52 @@ -414,20 +411,12 @@ | |
53 $license = "LGPL$gplver$extrainfo $license"; | |
54 } | |
55 | |
56 - if ($licensetext =~ /is free software.? you can redistribute it and\/or mod
ify it under the terms of the (GNU Affero General Public License|AGPL)/i) { | |
57 - $license = "AGPL$gplver$extrainfo $license"; | |
58 - } | |
59 - | |
60 if ($licensetext =~ /is free software.? you (can|may) redistribute it and\/
or modify it under the terms of (?:version [^ ]+ (?:\(?only\)? )?of )?the GNU Ge
neral Public License/i) { | |
61 $license = "GPL$gplver$extrainfo $license"; | |
62 - } | |
63 - | |
64 - if ($licensetext =~ /is distributed under the terms of the GNU General Publ
ic License,/ | |
65 + } elsif ($licensetext =~ /is distributed under the terms of the GNU General
Public License,/ | |
66 and length $gplver) { | |
67 $license = "GPL$gplver$extrainfo $license"; | |
68 - } | |
69 - | |
70 - if ($licensetext =~ /is distributed.*terms.*GPL/) { | |
71 + } elsif ($licensetext =~ /is distributed.*terms.*GPL/) { | |
72 $license = "GPL (unversioned/unknown version) $license"; | |
73 } | |
74 | |
75 @@ -437,9 +426,9 @@ | |
76 $license = "QPL $license"; | |
77 } | |
78 | |
79 - if ($licensetext =~ /http:\/\/opensource\.org\/licenses\/mit-license\.php/)
{ | |
80 + if ($licensetext =~ /opensource\.org\/licenses\/mit-license\.php/) { | |
81 $license = "MIT/X11 (BSD like) $license"; | |
82 - } elsif ($licensetext =~ /Permission is hereby granted, free of charge, to
any person obtaining a copy of this software and associated documentation files
\(the Software\), to deal in the Software/) { | |
83 + } elsif ($licensetext =~ /Permission is hereby granted, free of charge, to
any person obtaining a copy of this software and(\/or)? associated documentation
files \(the (Software|Materials)\), to deal in the (Software|Materials)/) { | |
84 $license = "MIT/X11 (BSD like) $license"; | |
85 } | |
86 | |
87 @@ -448,15 +437,21 @@ | |
88 } | |
89 | |
90 if ($licensetext =~ /THIS SOFTWARE IS PROVIDED .*AS IS AND ANY EXPRESS OR I
MPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERC
HANTABILITY/) { | |
91 - if ($licensetext =~ /All advertising materials mentioning features or us
e of this software must display the following acknowledge?ment.*This product inc
ludes software developed by/i) { | |
92 + if ($licensetext =~ /All advertising materials mentioning features or us
e of this software must display the following/) { | |
93 $license = "BSD (4 clause) $license"; | |
94 - } elsif ($licensetext =~ /(The name of .*? may not|Neither the names? of
.*? nor the names of (its|their) contributors may) be used to endorse or promot
e products derived from this software/i) { | |
95 + } elsif ($licensetext =~ /be used to endorse or promote products derived
from this software/) { | |
96 $license = "BSD (3 clause) $license"; | |
97 - } elsif ($licensetext =~ /Redistributions of source code must retain the
above copyright notice/i) { | |
98 + } elsif ($licensetext =~ /Redistributions of source code must retain the
above copyright notice/) { | |
99 $license = "BSD (2 clause) $license"; | |
100 } else { | |
101 $license = "BSD $license"; | |
102 } | |
103 + } elsif ($licensetext =~ /Use of this source code is governed by a BSD-styl
e license/) { | |
104 + $license = "BSD-like $license"; | |
105 + } elsif ($licensetext =~ /BSD terms apply/) { | |
106 + $license = "BSD-like $license"; | |
107 + } elsif ($licensetext =~ /GOVERNED BY A BSD-STYLE SOURCE LICENSE/) { | |
108 + $license = "BSD-like $license"; | |
109 } | |
110 | |
111 if ($licensetext =~ /Mozilla Public License Version ([^ ]+)/) { | |
112 @@ -475,7 +470,9 @@ | |
113 $license = "Perl $license"; | |
114 } | |
115 | |
116 - if ($licensetext =~ /under the Apache License, Version ([^ ]+)/) { | |
117 + if ($licensetext =~ /under the terms of the Apache ([^ ]+) License OR versi
on 2 of the GNU/) { | |
118 + $license = "Apache (v$1) GPL (v2) $license"; | |
119 + } elsif ($licensetext =~ /under the Apache License, Version ([^ ]+)/) { | |
120 $license = "Apache (v$1) $license"; | |
121 } | |
122 | |
123 @@ -491,11 +488,11 @@ | |
124 $license = "CeCILL-$1 $license"; | |
125 } | |
126 | |
127 - if ($licensetext =~ /under the SGI Free Software License B/) { | |
128 + if ($licensetext =~ /under the SGI Free Software (B License|License B)/) { | |
129 $license = "SGI Free Software License B $license"; | |
130 } | |
131 | |
132 - if ($licensetext =~ /is in the public domain/i) { | |
133 + if ($licensetext =~ /in the public domain/i) { | |
134 $license = "Public domain"; | |
135 } | |
136 | |
137 @@ -503,6 +500,17 @@ | |
138 $license = "CDDL " . ($1 ? "(v$2) " : '') . $license; | |
139 } | |
140 | |
141 + if ($licensetext =~ /Microsoft Permissive License \(Ms-PL\)/) { | |
142 + $license = "Ms-PL $license"; | |
143 + } | |
144 + | |
145 + if ($licensetext =~ /as defined in and that are subject to the Apple Public
Source License([ ,-]+Version ([^ ]+)?(\.))/) { | |
146 + $license = "APSL " . ($1 ? "(v$2) " : '') . $license; | |
147 + } elsif ($licensetext =~ /provided that if you redistribute the Apple Softw
are in its entirety and without modifications, you must retain this notice and t
he following text and disclaimers in all such redistributions of the Apple Softw
are/) { | |
148 + # https://fedoraproject.org/wiki/Licensing/Apple_MIT_License | |
149 + $license = "Apple MIT $license"; | |
150 + } | |
151 + | |
152 if ($licensetext =~ /Permission is hereby granted, free of charge, to any p
erson or organization obtaining a copy of the software and accompanying document
ation covered by this license \(the \"Software\"\)/ or | |
153 $licensetext =~ /Boost Software License([ ,-]+Version ([^ ]+)?(\.))/i) { | |
154 $license = "BSL " . ($1 ? "(v$2) " : '') . $license; | |
155 @@ -515,18 +523,12 @@ | |
156 if ($licensetext =~ /The origin of this software must not be misrepresented
.*Altered source versions must be plainly marked as such.*This notice may not be
removed or altered from any source distribution/ or | |
157 $licensetext =~ /see copyright notice in zlib\.h/) { | |
158 $license = "zlib/libpng $license"; | |
159 + } elsif ($licensetext =~ /This code is released under the libpng license/)
{ | |
160 + $license = "libpng $license"; | |
161 } | |
162 | |
163 - if ($licensetext =~ /Do What The Fuck You Want To Public License, Version (
[^, ]+)/i) { | |
164 - $license = "WTFPL (v$1)"; | |
165 - } | |
166 - | |
167 - if ($licensetext =~ /Do what The Fuck You Want To Public License/i) { | |
168 - $license = "WTFPL"; | |
169 - } | |
170 - | |
171 - if ($licensetext =~ /(License WTFPL|Under (the|a) WTFPL)/i) { | |
172 - $license = "WTFPL"; | |
173 + if ($licensetext =~ /under MIT license/) { | |
174 + $license = "MIT/X11 (BSD like) $license"; | |
175 } | |
176 | |
177 $license = "UNKNOWN" if (!length($license)); | |
OLD | NEW |