blob: 7dfe309334ad3bc20280ea7387e323b3748089cd (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
|
#!/bin/bash
# pkgbuild-check-licenses
# Copyright 2010 Haase Hernández
# Copyright 2010 Joseph Graham
# Copyright 2010 Joshua Ismael
# Copyright 2010 Nicolás Reynolds
# Copyright 2012-2013 Luke Shumaker
#
# This file is part of Parabola.
#
# Parabola is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation, either version 3 of the License, or
# (at your option) any later version.
#
# Parabola is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with Parabola. If not, see <http://www.gnu.org/licenses/>.
. libremessages
# Unset any PKGBUILD variables inherited from the environment
# I took these from makepkg 4.1.1-1
unset pkgname pkgbase pkgver pkgrel epoch pkgdesc url license groups provides
unset md5sums replaces depends conflicts backup source install changelog build
unset makedepends optdepends options noextract
# Usage: check_deps $pkgbuild
# Check whether a PKGBUILD package depends on non-free packages
check_licenses() (
# Note that we use () instead of {} for this function; so that variables
# from the PKBUILD don't bubble up
local pkgbuild=$1
. "$pkgbuild"
if [[ -z $pkgname ]]; then
return 1 # not a PKGBUILD
fi
if [[ -z "${license[*]}" ]]; then
error "license array of ${pkgbase:-${pkgname[0]}} $(get_full_version) is not set"
return 1
fi
msg2 "Looking at license array of ${pkgbase:-${pkgname[0]}} $(get_full_version)"
local ret=$_E_OK
for _license in "${license[@]}"; do
if [[ ! -e "/usr/share/licenses/common/$_license" ]]; then
local s=$_E_OK
case "${_license#custom:}" in
WTFPL)
# accept as common, I think it should be in the licenses package.
:;;
BSD1|BSD2|BSD3|MIT|X11)
# accept these as common; they can't be included in the licenses package because some of the text must be customized
:;;
BSD4)
warning "The 4-clause BSD license is free but has practical problems.";;
BSD)
warning "License \"BSD\" is ambiguous, please use one of \"BSD{1..4}\" to specify the number of clauses."
s=$_E_UNCOMMON
;;
JSON)
error "License \"$_license\" is a known non-free license."
s=$_E_NONFREE
;;
*)
warning "License \"$_license\" is not a common license."
s=$_E_UNCOMMON
;;
esac
ret=$(($ret|$s))
fi
done
return $ret
)
cmd=${0##*/}
usage() {
echo "Usage: $cmd [OPTIONS] [PKGBUILD1 PKGBUILD2 ...]"
echo ''
echo "If no PKGBUILD is specified, \`./PKGBUILD' is implied"
echo ''
echo "Exit status (add them for combinations):"
echo " 0: Everything OK, no freedom issues"
echo " 1: Ran with error"
echo " 2: Uses uncommon licenses, check them"
echo " 4: Uses known unacceptable licenses"
echo ''
echo "Options:"
echo ' -f Allow running as root user'
echo ' -h Show this message'
}
_E_OK=0
_E_ERROR=1
_E_UNCOMMON=2
_E_NONFREE=4
main() {
local asroot=false
while getopts 'fh' arg; do
case "$arg" in
f) asroot=true;;
h) usage; return 0;;
*) usage; return 1;;
esac
done
shift $(($OPTIND - 1))
if [[ $# -lt 1 ]]; then
pkgbuilds=("`pwd`/PKGBUILD")
else
pkgbuilds=("$@")
fi
if [[ -w / ]] && ! $asroot; then
error "Run as normal user, or use the -f option to run as root."
return 1
fi
blacklist-update || return 1
local ret=0
for pkgbuild in "${pkgbuilds[@]}"; do
check_deps "$pkgbuild" || ret=$(($ret|$?))
done
return $ret
}
main "$@"
|
