blob: fe969688a5e447e0922274ffbd8377c1b74e9613 (
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
|
# $NetBSD: check-portability.sh,v 1.17 2020/03/12 19:09:41 rillig Exp $
#
# This program checks all files in the current directory and any
# subdirectories for portability issues that are likely to result in
# false assumptions by the package.
#
# The most prominent example is the "==" operator of test(1), which is
# only implemented by bash and some versions of the ksh.
#
# usage: cd $WRKSRC && [SKIP_FILTER=...] check-portability.sh
#
set -eu
checkdir=`dirname "$0"`
. "$checkdir/check-subr.sh"
cs_setprogname "$0"
: ${SKIP_FILTER:=""}
# usage: check_shell <fname>
check_shell() {
env \
CK_FNAME="$1" \
CK_PROGNAME="check-portability.awk" \
awk -f "$checkdir/check-subr.awk" \
-f "$checkdir/check-portability.awk" \
< "$1" 1>&2 \
|| cs_exitcode=1
if test -f "${PREFIX}/bin/check-portability"; then
${PREFIX}/bin/check-portability "$1" 1>&2 \
|| cs_exitcode=1
fi
}
find ./* -type f -print 2>/dev/null \
| sed 's,$,_,' \
| {
opsys=`uname -s`-`uname -r`
while read fname; do
fname="${fname#./}"
fname="${fname%_}"
skip=no
eval "case \"\$fname\" in $SKIP_FILTER *.orig) skip=yes;; esac"
[ $skip = no ] || continue
skip_shebang_test=no
base="${fname##*/}"
ext="${base##*.}"
case "$ext" in
# A few file extensions cannot be skipped since the Makefiles
# will be generated from these, in the configure stage, which
# is run later.
(in|mk|Makefile|makefile|GNUmakefile) skip_shebang_test=yes;;
# echo */*/PLIST | xargs cat | sed s,'.*\.',, | sort | uniq -c | sort -nr | sed 40q
(png|html|svg|py|h|mo|php|js|xml|rb|go|txt|3|hpp) continue ;;
(tfm|gif|dtd|properties|json|ogg|gz|test|result|xpm|po) continue ;;
(page|1|kicad_mod|hxx|jpg|css|el|htm|a|docbook|vf|inc) continue ;;
# other source files:
(c|C|cc|cxx|f|go|pl|py|ac|m4) continue ;;
esac
if [ $skip_shebang_test = yes ]; then
check_shell "$fname"
continue
fi
case "$opsys" in
SunOS-5.9)
# See also (if you can):
# http://sunsolve.sun.com/search/document.do?assetkey=1-1-4250902-1
firstline=`sed 1q < "$fname"`
;;
*) read firstline < "$fname" || continue
;;
esac
case "$firstline" in
"#!"*"/bin/sh")
check_shell "$fname"
case "$opsys" in
SunOS-5.[0-9]|SunOS-5.10)
echo "WARNING: [check-portability.sh] $fname has /bin/sh as interpreter, which is horribly broken on Solaris." 1>&2
;;
esac
;;
esac
done
cs_exit
}
|
