Commit | Line | Data |
---|---|---|
233e7676 | 1 | ;;; GNU Guix --- Functional package management for GNU |
2b8a9cca | 2 | ;;; Copyright © 2012, 2014, 2015, 2017, 2019, 2020 Ludovic Courtès <ludo@gnu.org> |
6d5e7ef3 | 3 | ;;; Copyright © 2013, 2015 Andreas Enge <andreas@enge.fr> |
e2034de5 | 4 | ;;; Copyright © 2012, 2013 Nikita Karetnikov <nikita@karetnikov.org> |
e5c35d9a | 5 | ;;; Copyright © 2015 Mark H Weaver <mhw@netris.org> |
da945758 | 6 | ;;; Copyright © 2015, 2019 Ricardo Wurmus <rekado@elephly.net> |
ea4a0e81 | 7 | ;;; Copyright © 2016 Eric Bavier <bavier@member.fsf.org> |
aaa49e8c | 8 | ;;; Copyright © 2016 Leo Famulari <leo@famulari.name> |
ca9eb489 | 9 | ;;; Copyright © 2016 Fabian Harfert <fhmgufs@web.de> |
a10bf139 | 10 | ;;; Copyright © 2016 Rene Saavedra <rennes@openmailbox.org> |
3c986a7d | 11 | ;;; Copyright © 2016, 2017 Nikita <nikita@n0.is> |
33143961 | 12 | ;;; Copyright © 2017 Clément Lassieur <clement@lassieur.org> |
2f3108ad | 13 | ;;; Copyright © 2017 Petter <petter@mykolab.ch> |
8b8bf88f | 14 | ;;; Copyright © 2017 Marius Bakke <mbakke@fastmail.com> |
41209a6f | 15 | ;;; Copyright © 2017 Arun Isaac <arunisaac@systemreboot.net> |
00cf98eb | 16 | ;;; Copyright © 2017 Rutger Helling <rhelling@mykolab.com> |
9c4aaa63 | 17 | ;;; Copyright © 2020 André Batista <nandre@riseup.net> |
f045a7a9 | 18 | ;;; Copyright © 2020 Helio Machado <0x2b3bfa0+guix@googlemail.com> |
74a625eb | 19 | ;;; Copyright © 2021 Felix Gruber <felgru@posteo.net> |
7e163215 | 20 | ;;; Copyright © 2021 Xinglu Chen <public@yoctocell.xyz> |
65e1d39f | 21 | ;;; Copyright © 2021 Noisytoot <noisytoot@disroot.org> |
71de612e | 22 | ;;; Copyright © 2021 Kyle Meyer <kyle@kyleam.com> |
838d78e3 | 23 | ;;; |
233e7676 | 24 | ;;; This file is part of GNU Guix. |
838d78e3 | 25 | ;;; |
233e7676 | 26 | ;;; GNU Guix is free software; you can redistribute it and/or modify it |
838d78e3 NK |
27 | ;;; under the terms of the GNU General Public License as published by |
28 | ;;; the Free Software Foundation; either version 3 of the License, or (at | |
29 | ;;; your option) any later version. | |
30 | ;;; | |
233e7676 | 31 | ;;; GNU Guix is distributed in the hope that it will be useful, but |
838d78e3 NK |
32 | ;;; WITHOUT ANY WARRANTY; without even the implied warranty of |
33 | ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
34 | ;;; GNU General Public License for more details. | |
35 | ;;; | |
36 | ;;; You should have received a copy of the GNU General Public License | |
233e7676 | 37 | ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>. |
838d78e3 NK |
38 | |
39 | (define-module (guix licenses) | |
40 | #:use-module (srfi srfi-9) | |
15976134 | 41 | #:export (license? license-name license-uri license-comment |
59b20347 | 42 | agpl1 agpl3 agpl3+ |
9c4aaa63 | 43 | apsl2 |
f88ce395 | 44 | asl1.1 asl2.0 |
838d78e3 | 45 | boost1.0 |
7e163215 | 46 | bsd-0 bsd-1 bsd-2 bsd-3 bsd-4 |
b3345dc4 | 47 | non-copyleft |
71639e1f | 48 | cc0 |
8b8bf88f MB |
49 | cc-by2.0 cc-by3.0 cc-by4.0 |
50 | cc-by-sa2.0 cc-by-sa3.0 cc-by-sa4.0 | |
965ba54b | 51 | cddl1.0 cddl1.1 |
756be979 | 52 | cecill cecill-b cecill-c |
f8e36623 | 53 | artistic2.0 clarified-artistic |
0eed5501 | 54 | copyleft-next |
838d78e3 | 55 | cpl1.0 |
f045a7a9 | 56 | cua-opl1.0 |
095494ed | 57 | edl1.0 |
838d78e3 | 58 | epl1.0 |
8057c9e9 | 59 | epl2.0 |
d3e88906 | 60 | eupl1.2 |
71de612e | 61 | expat expat-0 |
b387a1c5 | 62 | freetype |
7e67fdd1 | 63 | freebsd-doc |
921d9dc7 | 64 | giftware |
f15b31c5 | 65 | gpl1 gpl1+ gpl2 gpl2+ gpl3 gpl3+ |
dee38b7b | 66 | gfl1.0 |
b58691fa | 67 | fdl1.1+ fdl1.2+ fdl1.3+ |
446c7113 | 68 | opl1.0+ osl2.1 |
b1426f17 | 69 | isc |
838d78e3 NK |
70 | ijg |
71 | ibmpl1.0 | |
8835aed4 | 72 | imlib2 |
6d5e7ef3 | 73 | ipa |
942c4f81 | 74 | knuth |
74a625eb | 75 | lal1.3 |
cd0a9c91 | 76 | lgpl2.0 lgpl2.0+ lgpl2.1 lgpl2.1+ lgpl3 lgpl3+ llgpl |
da945758 | 77 | lppl lppl1.0+ lppl1.1+ lppl1.2 lppl1.2+ |
942c4f81 RW |
78 | lppl1.3 lppl1.3+ |
79 | lppl1.3a lppl1.3a+ | |
80 | lppl1.3b lppl1.3b+ | |
81 | lppl1.3c lppl1.3c+ | |
41209a6f | 82 | miros |
ea4a0e81 | 83 | mpl1.0 mpl1.1 mpl2.0 |
fdbb9ded | 84 | ms-pl |
499cdcc6 | 85 | ncsa |
2dba37e2 | 86 | nmap |
5d33e789 | 87 | ogl-psi1.0 |
1ca98280 | 88 | openldap2.8 openssl |
2f3108ad | 89 | perl-license |
e2034de5 | 90 | psfl public-domain |
d192efae | 91 | qpl |
d13d2826 | 92 | qwt1.0 |
0db71dd2 | 93 | repoze |
6ef8c59a | 94 | ruby |
e5c35d9a | 95 | sgifreeb2.0 |
d9e56454 | 96 | silofl1.1 |
2824146b | 97 | sleepycat |
d29f6470 | 98 | tcl/tk |
cb9cb2e8 | 99 | unicode |
aaa49e8c | 100 | unlicense |
99e6c1b1 | 101 | vim |
0a574d7b | 102 | w3c |
bbd60260 | 103 | x11 x11-style |
4a4dac20 | 104 | zpl2.1 |
6d36a6f3 | 105 | zlib |
d8c8e423 | 106 | fsf-free |
33143961 | 107 | wtfpl2 |
00cf98eb | 108 | wxwindows3.1+ |
78407a27 | 109 | hpnd |
33143961 | 110 | fsdg-compatible)) |
838d78e3 NK |
111 | |
112 | (define-record-type <license> | |
113 | (license name uri comment) | |
114 | license? | |
115 | (name license-name) | |
116 | (uri license-uri) | |
117 | (comment license-comment)) | |
118 | ||
119 | ;;; Commentary: | |
120 | ;;; | |
121 | ;;; Available licenses. | |
122 | ;;; | |
123 | ;;; This list is based on these links: | |
ca534666 | 124 | ;;; https://github.com/NixOS/nixpkgs/blob/master/lib/licenses.nix |
838d78e3 NK |
125 | ;;; https://www.gnu.org/licenses/license-list |
126 | ;;; | |
f045a7a9 HM |
127 | ;;; Please update spdx-string->license from guix/import/utils.scm |
128 | ;;; when modifying this list to avoid mismatches. | |
129 | ;;; | |
838d78e3 NK |
130 | ;;; Code: |
131 | ||
59b20347 DC |
132 | (define agpl1 |
133 | (license "AGPL 1" | |
134 | "https://gnu.org/licenses/agpl.html" | |
135 | "https://gnu.org/licenses/why-affero-gpl.html")) | |
136 | ||
ef7cf291 NK |
137 | (define agpl3 |
138 | (license "AGPL 3" | |
139 | "https://gnu.org/licenses/agpl.html" | |
140 | "https://gnu.org/licenses/why-affero-gpl.html")) | |
141 | ||
142 | (define agpl3+ | |
143 | (license "AGPL 3+" | |
144 | "https://gnu.org/licenses/agpl.html" | |
145 | "https://gnu.org/licenses/why-affero-gpl.html")) | |
146 | ||
9c4aaa63 AB |
147 | (define apsl2 |
148 | (license "APSL 2.0" | |
149 | "https://directory.fsf.org/wiki/License:APSL-2.0" | |
150 | "https://www.gnu.org/licenses/license-list.html#apsl2")) | |
151 | ||
f88ce395 RJ |
152 | (define asl1.1 |
153 | (license "ASL 1.1" | |
154 | "http://directory.fsf.org/wiki/License:Apache1.1" | |
155 | "https://www.gnu.org/licenses/license-list#apache1")) | |
156 | ||
838d78e3 NK |
157 | (define asl2.0 |
158 | (license "ASL 2.0" | |
159 | "http://directory.fsf.org/wiki/License:Apache2.0" | |
160 | "https://www.gnu.org/licenses/license-list#apache2")) | |
161 | ||
162 | (define boost1.0 | |
163 | (license "Boost 1.0" | |
164 | "http://directory.fsf.org/wiki/License:Boost1.0" | |
165 | "https://www.gnu.org/licenses/license-list#boost")) | |
166 | ||
60d1df78 AT |
167 | (define bsd-0 |
168 | (license "Zero-Clause BSD" | |
169 | "https://spdx.org/licenses/0BSD.html" | |
170 | "https://opensource.org/licenses/0BSD")) | |
171 | ||
7e163215 XC |
172 | (define bsd-1 |
173 | (license "BSD 1-Clause" | |
174 | "https://spdx.org/licenses/BSD-1-Clause.html" | |
175 | "https://opensource.org/licenses/BSD-1-Clause")) | |
176 | ||
838d78e3 NK |
177 | (define bsd-2 |
178 | (license "FreeBSD" | |
179 | "http://directory.fsf.org/wiki/License:FreeBSD" | |
180 | "https://www.gnu.org/licenses/license-list#FreeBSD")) | |
181 | ||
182 | (define bsd-3 | |
183 | (license "Modified BSD" | |
184 | "http://directory.fsf.org/wiki/License:BSD_3Clause" | |
185 | "https://www.gnu.org/licenses/license-list#ModifiedBSD")) | |
186 | ||
187 | (define bsd-4 | |
188 | (license "Original BSD" | |
189 | "http://directory.fsf.org/wiki/License:BSD_4Clause" | |
190 | "https://www.gnu.org/licenses/license-list#OriginalBSD")) | |
191 | ||
b3345dc4 LC |
192 | (define* (non-copyleft uri #:optional (comment "")) |
193 | "Return a lax, permissive, non-copyleft license (for example a variant of | |
194 | the 3-clause BSD license or the Expat license), whose full text can be found | |
195 | at URI, which may be a file:// URI pointing the package's tree." | |
196 | (license "non-copyleft" | |
f15b31c5 NK |
197 | uri |
198 | (string-append | |
b3345dc4 | 199 | "This is a lax, non-copyleft free software license. " |
f15b31c5 NK |
200 | "Check the URI for details. " |
201 | comment))) | |
202 | ||
71639e1f EB |
203 | (define cc0 |
204 | (license "CC0" | |
205 | "http://directory.fsf.org/wiki/License:CC0" | |
206 | "http://www.gnu.org/licenses/license-list.html#CC0")) | |
207 | ||
12abc6e3 LC |
208 | (define cc-by-sa4.0 |
209 | (license "CC-BY-SA 4.0" | |
210 | "http://creativecommons.org/licenses/by-sa/4.0/" | |
211 | "Creative Commons Attribution-ShareAlike 4.0 International")) | |
212 | ||
b7fa2f93 RW |
213 | (define cc-by-sa3.0 |
214 | (license "CC-BY-SA 3.0" | |
215 | "http://creativecommons.org/licenses/by-sa/3.0/" | |
216 | "Creative Commons Attribution-ShareAlike 3.0 Unported")) | |
217 | ||
a10bf139 RS |
218 | (define cc-by-sa2.0 |
219 | (license "CC-BY-SA 2.0" | |
220 | "http://creativecommons.org/licenses/by-sa/2.0/" | |
221 | "Creative Commons Attribution-ShareAlike 2.0 Generic")) | |
222 | ||
8b8bf88f MB |
223 | (define cc-by4.0 |
224 | (license "CC-BY 4.0" | |
225 | "http://creativecommons.org/licenses/by/4.0/" | |
226 | "Creative Commons Attribution 4.0 Unported")) | |
227 | ||
12abc6e3 LC |
228 | (define cc-by3.0 |
229 | (license "CC-BY 3.0" | |
230 | "http://creativecommons.org/licenses/by/3.0/" | |
231 | "Creative Commons Attribution 3.0 Unported")) | |
232 | ||
a10bf139 RS |
233 | (define cc-by2.0 |
234 | (license "CC-BY 2.0" | |
235 | "http://creativecommons.org/licenses/by/2.0/" | |
236 | "Creative Commons Attribution 2.0 Generic")) | |
237 | ||
838d78e3 NK |
238 | (define cddl1.0 |
239 | (license "CDDL 1.0" | |
240 | "http://directory.fsf.org/wiki/License:CDDLv1.0" | |
241 | "https://www.gnu.org/licenses/license-list#CDDL")) | |
242 | ||
965ba54b JL |
243 | ;; CDDL1.1 is the same as 1.0, except that "Sun Microsystems, Inc" becomes "Oracle", |
244 | ;; "LOST PROFITS" becoms "LOSS OF GOODWILL" and a section is added between 6.2 | |
245 | ;; and 6.3. | |
246 | (define cddl1.1 | |
247 | (license "CDDL 1.1" | |
248 | "https://oss.oracle.com/licenses/CDDL+GPL-1.1" | |
249 | "https://www.gnu.org/licenses/license-list#CDDL")) | |
250 | ||
756be979 LC |
251 | (define cecill ;copyleft |
252 | (license "CeCILL" | |
253 | "http://www.cecill.info/licences/Licence_CeCILL_V2.1-en.html" | |
254 | "https://www.gnu.org/licenses/license-list.html#CeCILL")) | |
255 | ||
256 | (define cecill-b ;non-copyleft | |
257 | (license "CeCILL-B" | |
258 | "http://www.cecill.info/licences/Licence_CeCILL-B_V1-en.html" | |
259 | "https://www.gnu.org/licenses/license-list.html#CeCILL")) | |
260 | ||
261 | (define cecill-c ;weak copyleft | |
c711f07c EB |
262 | (license "CeCILL-C" |
263 | "http://www.cecill.info/licences/Licence_CeCILL-C_V1-en.html" | |
264 | "https://www.gnu.org/licenses/license-list.html#CeCILL")) | |
265 | ||
f8e36623 EB |
266 | (define artistic2.0 |
267 | (license "Artistic License 2.0" | |
268 | "http://www.perlfoundation.org/artistic_license_2_0" | |
269 | "http://www.gnu.org/licenses/license-list.html#ArtisticLicense2")) | |
270 | ||
af8c2a15 LC |
271 | (define clarified-artistic |
272 | (license "Clarified Artistic" | |
273 | ;; http://directory.fsf.org/wiki/User:Jgay/license-categorization#Clarified_Artistic_License | |
274 | "http://gianluca.dellavedova.org/2011/01/03/clarified-artistic-license/" | |
275 | "https://www.gnu.org/licenses/license-list.html#ArtisticLicense2")) | |
276 | ||
0eed5501 LC |
277 | (define copyleft-next |
278 | (license "copyleft-next" | |
279 | "https://raw.github.com/richardfontana/copyleft-next/master/Releases/copyleft-next-0.3.0" | |
280 | "GPL-compatible copyleft license")) | |
281 | ||
838d78e3 NK |
282 | (define cpl1.0 |
283 | (license "CPL 1.0" | |
284 | "http://directory.fsf.org/wiki/License:CPLv1.0" | |
285 | "https://www.gnu.org/licenses/license-list#CommonPublicLicense10")) | |
286 | ||
f045a7a9 HM |
287 | (define cua-opl1.0 |
288 | (license "CUA Office Public License v1.0" | |
289 | "https://spdx.org/licenses/CUA-OPL-1.0.html" | |
290 | "https://opensource.org/licenses/CUA-OPL-1.0")) | |
291 | ||
095494ed RW |
292 | (define edl1.0 |
293 | (license "EDL 1.0" | |
294 | "http://directory.fsf.org/wiki/License:EDLv1.0" | |
295 | "https://eclipse.org/org/documents/edl-v10.php")) | |
296 | ||
838d78e3 NK |
297 | (define epl1.0 |
298 | (license "EPL 1.0" | |
299 | "http://directory.fsf.org/wiki/License:EPLv1.0" | |
300 | "https://www.gnu.org/licenses/license-list#EPL")) | |
301 | ||
8057c9e9 RW |
302 | (define epl2.0 |
303 | (license "EPL 2.0" | |
304 | "https://www.eclipse.org/legal/epl-2.0/" | |
305 | "https://www.gnu.org/licenses/license-list#EPL2")) | |
306 | ||
d3e88906 ST |
307 | (define eupl1.2 |
308 | (license "EUPL 1.2" | |
309 | "https://directory.fsf.org/wiki/License:EUPL-1.2" | |
310 | "https://www.gnu.org/licenses/license-list#EUPL-1.2")) | |
311 | ||
0c21ec1c AL |
312 | ;; Some people call it the MIT license. For clarification see: |
313 | ;; https://www.gnu.org/licenses/license-list.html#Expat | |
f15b31c5 NK |
314 | (define expat |
315 | (license "Expat" | |
316 | "http://directory.fsf.org/wiki/License:Expat" | |
317 | "https://www.gnu.org/licenses/license-list.html#Expat")) | |
318 | ||
71de612e KM |
319 | (define expat-0 |
320 | (license "Expat No Attribution" | |
321 | ;; Note: There is a later formulation of the same license at | |
322 | ;; <https://github.com/aws/mit-0>. | |
323 | "https://romanrm.net/mit-zero" | |
324 | "Expat license with the attribution paragraph removed.")) | |
325 | ||
b387a1c5 AE |
326 | (define freetype |
327 | (license "Freetype" | |
328 | "http://directory.fsf.org/wiki/License:Freetype" | |
329 | "https://www.gnu.org/licenses/license-list.html#freetype")) | |
330 | ||
921d9dc7 DT |
331 | (define giftware |
332 | (license "Giftware" | |
4968ea2c | 333 | "https://liballeg.org/license.html" |
921d9dc7 DT |
334 | "The Allegro 4 license")) |
335 | ||
f15b31c5 NK |
336 | (define gpl1 |
337 | (license "GPL 1" | |
338 | "https://www.gnu.org/licenses/old-licenses/gpl-1.0.html" | |
339 | #f)) | |
340 | ||
341 | (define gpl1+ | |
342 | (license "GPL 1+" | |
343 | "https://www.gnu.org/licenses/old-licenses/gpl-1.0.html" | |
344 | #f)) | |
345 | ||
838d78e3 NK |
346 | (define gpl2 |
347 | (license "GPL 2" | |
348 | "https://www.gnu.org/licenses/old-licenses/gpl-2.0.html" | |
349 | "https://www.gnu.org/licenses/license-list#GPLv2")) | |
350 | ||
351 | (define gpl2+ | |
352 | (license "GPL 2+" | |
353 | "https://www.gnu.org/licenses/old-licenses/gpl-2.0.html" | |
354 | "https://www.gnu.org/licenses/license-list#GPLv2")) | |
355 | ||
356 | (define gpl3 | |
357 | (license "GPL 3" | |
358 | "https://www.gnu.org/licenses/gpl.html" | |
359 | "https://www.gnu.org/licenses/license-list#GNUGPLv3")) | |
360 | ||
361 | (define gpl3+ | |
362 | (license "GPL 3+" | |
363 | "https://www.gnu.org/licenses/gpl.html" | |
364 | "https://www.gnu.org/licenses/license-list#GNUGPLv3")) | |
365 | ||
dee38b7b RW |
366 | ;; The “GUST font license” is legally equivalent to LPPL v1.3c as it only |
367 | ;; extends the LPPL with an optional request. | |
368 | (define gfl1.0 | |
369 | (license "GUST font license 1.0" | |
370 | "http://www.gust.org.pl/projects/e-foundry/licenses/GUST-FONT-LICENSE.txt" | |
371 | "https://www.gnu.org/licenses/license-list#LPPL-1.3a")) | |
372 | ||
ca9eb489 FH |
373 | (define fdl1.1+ |
374 | (license "FDL 1.1+" | |
375 | "https://www.gnu.org/licenses/fdl-1.1" | |
376 | "https://www.gnu.org/licenses/license-list#FDL")) | |
377 | ||
59b20347 DC |
378 | (define fdl1.2+ |
379 | (license "FDL 1.2+" | |
380 | "https://www.gnu.org/licenses/fdl-1.2" | |
381 | "https://www.gnu.org/licenses/license-list#FDL")) | |
382 | ||
66ea6713 LC |
383 | (define fdl1.3+ |
384 | (license "FDL 1.3+" | |
385 | "https://www.gnu.org/licenses/fdl.html" | |
386 | "https://www.gnu.org/licenses/license-list#FDL")) | |
387 | ||
7e67fdd1 | 388 | (define freebsd-doc |
389 | (license "FreeBSD Documentation License" | |
390 | "https://www.freebsd.org/copyright/freebsd-doc-license.html" | |
391 | "https://www.gnu.org/licenses/license-list.html#FreeBSDDL")) | |
392 | ||
c058f4ec MW |
393 | (define opl1.0+ |
394 | (license "Open Publication License 1.0 or later" | |
395 | "http://opencontent.org/openpub/" | |
396 | "https://www.gnu.org/licenses/license-list#OpenPublicationL")) | |
397 | ||
446c7113 RW |
398 | (define osl2.1 |
399 | (license "The Open Software License 2.1" | |
400 | "https://opensource.org/licenses/osl-2.1.php" | |
401 | "https://www.gnu.org/licenses/license-list#OSL")) | |
402 | ||
b1426f17 CR |
403 | (define isc |
404 | (license "ISC" | |
405 | "http://directory.fsf.org/wiki/License:ISC" | |
406 | "https://www.gnu.org/licenses/license-list.html#ISC")) | |
407 | ||
838d78e3 NK |
408 | (define ijg |
409 | (license "IJG" | |
410 | "http://directory.fsf.org/wiki/License:JPEG" | |
411 | "https://www.gnu.org/licenses/license-list#ijg")) | |
412 | ||
413 | (define ibmpl1.0 | |
414 | (license "IBMPL 1.0" | |
415 | "http://directory.fsf.org/wiki/License:IBMPLv1.0" | |
416 | "https://www.gnu.org/licenses/license-list#IBMPL")) | |
417 | ||
8835aed4 AK |
418 | (define imlib2 |
419 | (license "Imlib2" | |
420 | "http://directory.fsf.org/wiki/License:Imlib2" | |
421 | "https://www.gnu.org/licenses/license-list#imlib")) | |
422 | ||
6d5e7ef3 AE |
423 | (define ipa |
424 | (license "IPA Font License" | |
425 | "http://directory.fsf.org/wiki/License:IPA_Font_License" | |
426 | "https://www.gnu.org/licenses/license-list#IPAFONT")) | |
427 | ||
942c4f81 RW |
428 | (define knuth |
429 | (license "Donald Knuth's license for TeX" | |
430 | "http://www.ctan.org/license/knuth" | |
431 | "Modification are only permitted under a different name.")) | |
432 | ||
74a625eb FG |
433 | (define lal1.3 |
434 | (license "Free Art License 1.3" | |
435 | "http://artlibre.org/licence/lal/en/" | |
436 | "https://www.gnu.org/licenses/license-list#FreeArt")) | |
437 | ||
f15b31c5 NK |
438 | (define lgpl2.0 |
439 | (license "LGPL 2.0" | |
440 | "https://www.gnu.org/licenses/old-licenses/lgpl-2.0.html" | |
441 | "https://www.gnu.org/licenses/why-not-lgpl.html")) | |
442 | ||
443 | (define lgpl2.0+ | |
444 | (license "LGPL 2.0+" | |
445 | "https://www.gnu.org/licenses/old-licenses/lgpl-2.0.html" | |
446 | "https://www.gnu.org/licenses/why-not-lgpl.html")) | |
447 | ||
838d78e3 NK |
448 | (define lgpl2.1 |
449 | (license "LGPL 2.1" | |
450 | "https://www.gnu.org/licenses/old-licenses/lgpl-2.1.html" | |
451 | "https://www.gnu.org/licenses/license-list#LGPLv2.1")) | |
452 | ||
453 | (define lgpl2.1+ | |
454 | (license "LGPL 2.1+" | |
455 | "https://www.gnu.org/licenses/old-licenses/lgpl-2.1.html" | |
456 | "https://www.gnu.org/licenses/license-list#LGPLv2.1")) | |
457 | ||
458 | (define lgpl3 | |
459 | (license "LGPL 3" | |
460 | "https://www.gnu.org/licenses/lgpl.html" | |
461 | "https://www.gnu.org/licenses/license-list#LGPLv3")) | |
462 | ||
463 | (define lgpl3+ | |
464 | (license "LGPL 3+" | |
465 | "https://www.gnu.org/licenses/lgpl.html" | |
466 | "https://www.gnu.org/licenses/license-list#LGPLv3")) | |
467 | ||
cd0a9c91 KCB |
468 | (define llgpl |
469 | (license "LLGPL" | |
470 | "https://opensource.franz.com/preamble.html" | |
471 | "Lisp Lesser General Public License")) | |
472 | ||
942c4f81 RW |
473 | (define lppl |
474 | (license "LPPL (any version)" | |
475 | "https://www.latex-project.org/lppl/lppl-1-0/" | |
476 | "LaTeX Project Public License 1.0")) | |
477 | ||
478 | (define lppl1.0+ | |
479 | (license "LPPL 1.0+" | |
480 | "https://www.latex-project.org/lppl/lppl-1-0/" | |
481 | "LaTeX Project Public License 1.0")) | |
482 | ||
da945758 RW |
483 | (define lppl1.1+ |
484 | (license "LPPL 1.1+" | |
485 | "https://www.latex-project.org/lppl/lppl-1-1/" | |
486 | "LaTeX Project Public License 1.1")) | |
487 | ||
942c4f81 RW |
488 | (define lppl1.2 |
489 | (license "LPPL 1.2" | |
490 | "http://directory.fsf.org/wiki/License:LPPLv1.2" | |
491 | "https://www.gnu.org/licenses/license-list#LPPL-1.2")) | |
492 | ||
493 | (define lppl1.2+ | |
494 | (license "LPPL 1.2+" | |
495 | "http://directory.fsf.org/wiki/License:LPPLv1.2" | |
496 | "https://www.gnu.org/licenses/license-list#LPPL-1.2")) | |
497 | ||
498 | (define lppl1.3 | |
499 | (license "LPPL 1.3" | |
500 | "https://www.latex-project.org/lppl/lppl-1-3/" | |
501 | "LaTeX Project Public License 1.3")) | |
502 | ||
503 | (define lppl1.3+ | |
504 | (license "LPPL 1.3+" | |
505 | "https://www.latex-project.org/lppl/lppl-1-3/" | |
506 | "LaTeX Project Public License 1.3+")) | |
507 | ||
508 | (define lppl1.3a | |
509 | (license "LPPL 1.3a" | |
510 | "http://directory.fsf.org/wiki/License:LPPLv1.3a" | |
511 | "https://www.gnu.org/licenses/license-list#LPPL-1.3a")) | |
512 | ||
513 | (define lppl1.3a+ | |
514 | (license "LPPL 1.3a+" | |
515 | "http://directory.fsf.org/wiki/License:LPPLv1.3a" | |
516 | "https://www.gnu.org/licenses/license-list#LPPL-1.3a")) | |
517 | ||
518 | (define lppl1.3b | |
519 | (license "LPPL 1.3b" | |
520 | "https://www.latex-project.org/lppl/lppl-1-3b/" | |
521 | "LaTeX Project Public License 1.3b")) | |
522 | ||
523 | (define lppl1.3b+ | |
524 | (license "LPPL 1.3b+" | |
525 | "https://www.latex-project.org/lppl/lppl-1-3b/" | |
526 | "LaTeX Project Public License 1.3b or later")) | |
527 | ||
528 | (define lppl1.3c | |
529 | (license "LPPL 1.3c" | |
530 | "https://www.latex-project.org/lppl/lppl-1-3c/" | |
531 | "LaTeX Project Public License 1.3c")) | |
532 | ||
533 | (define lppl1.3c+ | |
534 | (license "LPPL 1.3c+" | |
535 | "https://www.latex-project.org/lppl/lppl-1-3c/" | |
536 | "LaTeX Project Public License 1.3c or later")) | |
537 | ||
41209a6f AI |
538 | (define miros |
539 | (license "MirOS" | |
540 | "https://www.mirbsd.org/MirOS-Licence.htm" | |
541 | "MirOS License")) | |
542 | ||
ea4a0e81 EB |
543 | (define mpl1.0 |
544 | (license "MPL 1.0" | |
545 | "http://www.mozilla.org/MPL/1.0/" | |
546 | "https://www.gnu.org/licenses/license-list.html#MPL")) | |
547 | ||
0ae332d3 LC |
548 | (define mpl1.1 |
549 | (license "MPL 1.1" | |
550 | "http://directory.fsf.org/wiki/License:MPLv1.1" | |
551 | "https://www.gnu.org/licenses/license-list#MPL")) | |
552 | ||
838d78e3 NK |
553 | (define mpl2.0 |
554 | (license "MPL 2.0" | |
555 | "http://directory.fsf.org/wiki/License:MPLv2.0" | |
556 | "https://www.gnu.org/licenses/license-list#MPL-2.0")) | |
557 | ||
fdbb9ded LC |
558 | (define ms-pl |
559 | (license "Ms-PL" ;Microsoft Public License | |
560 | "http://directory.fsf.org/wiki/License:MsPL" | |
561 | "http://www.gnu.org/licenses/license-list.html#ms-pl")) | |
562 | ||
499cdcc6 EB |
563 | (define ncsa |
564 | (license "NCSA/University of Illinois Open Source License" | |
565 | "http://directory.fsf.org/wiki/License:IllinoisNCSA" | |
566 | "https://www.gnu.org/licenses/license-list#NCSA")) | |
567 | ||
2dba37e2 LP |
568 | (define nmap |
569 | (license "Nmap license" | |
570 | "https://svn.nmap.org/nmap/COPYING" | |
571 | "https://fedoraproject.org/wiki/Licensing/Nmap")) | |
dcd19c0a | 572 | |
5d33e789 AI |
573 | (define ogl-psi1.0 |
574 | (license "Open Government Licence for Public Sector Information" | |
575 | "https://www.nationalarchives.gov.uk/doc/open-government-licence/version/1/" | |
576 | #f)) | |
577 | ||
838d78e3 NK |
578 | (define openssl |
579 | (license "OpenSSL" | |
580 | "http://directory.fsf.org/wiki/License:OpenSSL" | |
581 | "https://www.gnu.org/licenses/license-list#OpenSSL")) | |
582 | ||
1ca98280 AE |
583 | (define openldap2.8 |
584 | (license "OpenLDAPv2.8" | |
585 | "http://directory.fsf.org/wiki/License:OpenLDAPv2.8" | |
586 | "https://www.gnu.org/licenses/license-list#newOpenLDAP")) | |
587 | ;; lists OpenLDAPv2.7, which is virtually identical | |
588 | ||
2f3108ad P |
589 | (define perl-license |
590 | ;; The license of Perl, GPLv1+ or Artistic (we ignore the latter here). | |
591 | ;; We define this alias to avoid circular dependencies introduced by the use | |
592 | ;; of the '(package-license perl)' idiom. | |
593 | gpl1+) | |
594 | ||
e2034de5 NK |
595 | (define psfl |
596 | (license "Python Software Foundation License" | |
597 | "http://docs.python.org/license.html" | |
598 | #f)) | |
599 | ||
838d78e3 NK |
600 | (define public-domain |
601 | (license "Public Domain" | |
602 | "http://directory.fsf.org/wiki/License:PublicDomain" | |
603 | "https://www.gnu.org/licenses/license-list#PublicDomain")) | |
604 | ||
d192efae CR |
605 | (define qpl |
606 | (license "QPL" | |
607 | "http://directory.fsf.org/wiki/License:QPLv1.0" | |
608 | "http://www.gnu.org/licenses/license-list.html#QPL")) | |
609 | ||
d13d2826 AI |
610 | (define qwt1.0 |
611 | (license "QWT 1.0" | |
612 | "http://qwt.sourceforge.net/qwtlicense.html" | |
613 | "GNU Lesser General Public License with exceptions")) | |
614 | ||
0db71dd2 LF |
615 | (define repoze |
616 | (license "Repoze" | |
617 | "http://repoze.org/LICENSE.txt" | |
618 | "A BSD-like license with a clause requiring all changes to be | |
619 | attributed by author and date.")) | |
620 | ||
6ef8c59a PP |
621 | (define ruby |
622 | (license "Ruby License" | |
623 | "http://directory.fsf.org/wiki/License:Ruby" | |
624 | "https://www.ruby-lang.org/en/about/license.txt")) | |
625 | ||
e5c35d9a MW |
626 | (define sgifreeb2.0 |
627 | (license "SGI Free Software License B, version 2.0" | |
628 | "http://directory.fsf.org/wiki/License:SGIFreeBv2" | |
629 | "https://www.gnu.org/licenses/license-list.html#SGIFreeB")) | |
630 | ||
d9e56454 AK |
631 | (define silofl1.1 |
632 | (license "SIL OFL 1.1" | |
633 | "http://scripts.sil.org/OFL_web" | |
634 | "https://www.gnu.org/licenses/license-list#SILOFL")) | |
635 | ||
2824146b RW |
636 | (define sleepycat |
637 | (license "Sleepycat" | |
638 | "http://directory.fsf.org/wiki/License:Sleepycat" | |
639 | "https://www.gnu.org/licenses/license-list#BerkeleyDB")) | |
640 | ||
d29f6470 JN |
641 | (define tcl/tk |
642 | (license "Tcl/Tk" | |
643 | "http://www.tcl.tk/software/tcltk/license.html" | |
644 | "A non-copyleft free software license from the Tcl/Tk project")) | |
645 | ||
99e6c1b1 AE |
646 | (define vim |
647 | (license "Vim" | |
648 | "http://directory.fsf.org/wiki/License:Vim7.2" | |
649 | "http://www.gnu.org/licenses/license-list.html#Vim")) | |
650 | ||
cb9cb2e8 LP |
651 | (define unicode |
652 | (license "Unicode" | |
653 | "https://directory.fsf.org/wiki/License:Unicode" | |
654 | "http://www.gnu.org/licenses/license-list.html#Unicode")) | |
655 | ||
aaa49e8c LF |
656 | (define unlicense |
657 | (license "Unlicense" | |
658 | "https://unlicense.org/" | |
659 | "https://www.gnu.org/licenses/license-list.html#Unlicense")) | |
660 | ||
0a574d7b BH |
661 | (define w3c |
662 | (license "W3C Software Notice and License" | |
663 | "https://directory.fsf.org/wiki/License:W3C_31Dec2002" | |
664 | "https://www.gnu.org/licenses/license-list.en.html#W3C")) | |
665 | ||
d8c8e423 | 666 | (define wtfpl2 |
667 | (license "WTFPL 2" | |
668 | "http://www.wtfpl.net" | |
669 | "http://www.wtfpl.net/about/")) | |
670 | ||
00cf98eb RH |
671 | (define wxwindows3.1+ |
672 | (license "wxWindows 3.1+" | |
673 | "https://wxwidgets.org/about/licence" | |
674 | "https://www.gnu.org/licenses/license-list.html#Wxwind")) | |
675 | ||
838d78e3 NK |
676 | (define x11 |
677 | (license "X11" | |
678 | "http://directory.fsf.org/wiki/License:X11" | |
679 | "https://www.gnu.org/licenses/license-list#X11License")) | |
680 | ||
bbd60260 NK |
681 | (define* (x11-style uri #:optional (comment "")) |
682 | "Return an X11-style license, whose full text can be found at URI, | |
683 | which may be a file:// URI pointing the package's tree." | |
684 | (license "X11-style" | |
685 | uri | |
686 | (string-append | |
687 | "This is an X11-style, non-copyleft free software license. " | |
688 | "Check the URI for details. " | |
689 | comment))) | |
690 | ||
4a4dac20 RW |
691 | (define zpl2.1 |
692 | (license "Zope Public License 2.1" | |
693 | "http://directory.fsf.org/wiki?title=License:ZopePLv2.1" | |
694 | "https://www.gnu.org/licenses/license-list.html#Zope2.0")) | |
695 | ||
838d78e3 NK |
696 | (define zlib |
697 | (license "Zlib" | |
2b8a9cca | 698 | "https://zlib.net/zlib_license.html" |
838d78e3 NK |
699 | "https://www.gnu.org/licenses/license-list#ZLib")) |
700 | ||
78407a27 GB |
701 | (define hpnd |
702 | (license "HPND" | |
703 | "https://directory.fsf.org/wiki/License:HPND" | |
704 | "https://www.gnu.org/licenses/license-list#HPND")) | |
705 | ||
6d36a6f3 AE |
706 | (define* (fsf-free uri #:optional (comment "")) |
707 | "Return a license that does not fit any of the ones above or a collection | |
708 | of licenses, approved as free by the FSF. More details can be found at URI." | |
709 | (license "FSF-free" | |
710 | uri | |
711 | comment)) | |
712 | ||
33143961 CL |
713 | (define* (fsdg-compatible uri #:optional (comment "")) |
714 | "Return a license that does not fit any of the ones above or a collection | |
715 | of licenses, not necessarily free, but in accordance with FSDG as Non-functional | |
716 | Data. More details can be found at URI. See also | |
717 | https://www.gnu.org/distros/free-system-distribution-guidelines.en.html#non-functional-data." | |
718 | (license "FSDG-compatible" | |
719 | uri | |
720 | comment)) | |
721 | ||
838d78e3 | 722 | ;;; licenses.scm ends here |