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
|
#!/bin/sh
# sbopkglint test, must be sourced by sbopkglint (not run standalone).
# PKG, PRGNAM, VERSION, ARCH are set by sbopkglint. also the current
# directory is the root of the installed package tree.
########################################################################
# checks file permissions and ownership in the package doc dir. files
# should all be mode 644, directories should be 755. everything should
# be owned by root:root. also checks for empty files or (possibly)
# install instructions.
# ideally, we'd require all files under the doc dir to be mode 0644.
# however, too many existing packages (including core Slackware
# ones) break that rule. so check for the minimum set of desired
# permissions: a doc file should be readable by all users (at least
# 444), and check that any +x file looks like some kind of script
# (perl/shell/python/etc).
# also, any PDF files found in the doc dir are checked with pdfinfo,
# to make sure they're really PDFs and don't contain errors that
# prevent them being displayed.
DOCDIR=usr/doc/$PRGNAM-$VERSION
# existence of the doc dir was already checked by a previous test,
# so just don't do anything if it's missing.
if [ -d "$DOCDIR" ]; then
badpermfiles="$( find $DOCDIR -mindepth 1 -type f -a \! -perm -444 )"
badpermdirs="$( find $DOCDIR -mindepth 1 -type d -a \! -perm 0755 )"
badowners="$( find $DOCDIR -mindepth 1 -user root -a -group root -o -print )"
empty="$( find $DOCDIR -mindepth 1 -maxdepth 1 -empty )"
bogus="$( find $DOCDIR -mindepth 1 -maxdepth 1 -type f -a \( -name INSTALL -o -name INSTALL.\* \) )"
files="$( find $DOCDIR -type f -perm /111 )"
for f in $files; do
head -1 $f | grep -q '^#!' && continue; # script file, +x is OK
badpermfiles+=" $f"
done
[ -n "$badpermfiles" ] && warn "bad file perms (should be 644, or at least 444) in doc dir:" && ls -l $badpermfiles
[ -n "$badpermdirs" ] && warn "bad directory perms (should be 755) in doc dir:" && ls -ld $badpermdirs
[ -n "$badowners" ] && warn "bad ownership (should be root:root) in doc dir:" && ls -ld $badowners
[ -n "$empty" ] && warn "empty files/dirs in doc dir: $empty"
if [ -z "$INSTALL_DOCS_OK" -a -n "$bogus" ]; then
for i in $bogus; do
if grep -q 'generic installation instructions' $i; then
warn "generic install instructions found, useless, please remove: $i"
else
note "install instructions found, is this relevant for binary package users?: $i"
fi
done
fi
# PDF filenames often have spaces/punctuation, don't use find.
# This is not ideal (only goes 3 levels deep), but it's easy.
for i in $DOCDIR/*.pdf $DOCDIR/*/*.pdf $DOCDIR/*/*/*.pdf \
$DOCDIR/*.PDF $DOCDIR/*/*.PDF $DOCDIR/*/*/*.PDF
do
if [ -e "$i" ]; then
# pdfinfo non-fatal errors don't result in non-zero exit status,
# but generally they do mean un-renderable PDFs, so check its stderr
# in addition to its exit status.
pdfinfo "$i" &> .tmp.pdfinfo
if [ "$?" != "0" ] || grep -q '^Syntax Error' .tmp.pdfinfo; then
warn "broken PDF file: $i"
fi
rm -f .tmp.pdfinfo
fi
done
fi
# allow /usr/doc/HTML to exist, though we don't check its contents here.
# this is the standard location for KDE5 help files.
baddocs="$( find usr/doc -mindepth 1 -maxdepth 1 \! -name $PRGNAM-$VERSION \! -name HTML )"
[ -n "$baddocs" ] && warn "docs outside of $DOCDIR:" && ls -ld $baddocs
|
