93 lines
2.2 KiB
Bash
Executable File
93 lines
2.2 KiB
Bash
Executable File
#!/bin/sh
|
|
|
|
top_srcdir=${top_srcdir:-..}
|
|
. ${top_srcdir}/test/setup_env.sh
|
|
|
|
libeinfo_srcdir="${srcdir}/../libeinfo"
|
|
libeinfo_builddir="${builddir}/../libeinfo"
|
|
librc_srcdir="${srcdir}/../librc"
|
|
librc_builddir="${builddir}/../librc"
|
|
rc_srcdir="${srcdir}/../rc"
|
|
rc_builddir="${builddir}/../rc"
|
|
|
|
checkit() {
|
|
local base=$1; shift
|
|
echo "$@" | tr ' ' '\n' > ${base}.out
|
|
diff -u ${base}.list ${base}.out
|
|
eend $?
|
|
: $(( ret += $? ))
|
|
}
|
|
|
|
ret=0
|
|
|
|
fail_on_out() {
|
|
if [ -n "${out}" ]; then
|
|
eerror "Last command failed; failing"
|
|
exit 1
|
|
fi
|
|
}
|
|
|
|
ebegin "Checking trailing whitespace in code"
|
|
# XXX: Should we check man pages too ?
|
|
out=$(cd ${top_srcdir}; find */ \
|
|
'(' -name '*.[ch]' -o -name '*.in' -o -name '*.sh' ')' \
|
|
-exec grep -n -E '[[:space:]]+$' {} +)
|
|
[ -z "${out}" ]
|
|
eend $? "Trailing whitespace needs to be deleted:"$'\n'"${out}"
|
|
fail_on_out
|
|
|
|
ebegin "Checking trailing newlines in code"
|
|
out=$(cd ${top_srcdir};
|
|
for f in `find */ -name '*.[ch]'` ; do
|
|
sed -n -e :a -e '/^\n*$/{$q1;N;ba' -e '}' $f || echo $f
|
|
done)
|
|
[ -z "${out}" ]
|
|
eend $? "Trailing newlines need to be deleted:"$'\n'"${out}"
|
|
fail_on_out
|
|
|
|
ebegin "Checking for obsolete functions"
|
|
out=$(cd ${top_srcdir}; find src -name '*.[ch]' \
|
|
! -name queue.h \
|
|
-exec grep -n -E '\<(malloc|memory|sys/(errno|fcntl|signal|stropts|termios|unistd))\.h\>' {} +)
|
|
[ -z "${out}" ]
|
|
eend $? "Avoid these obsolete functions:"$'\n'"${out}"
|
|
fail_on_out
|
|
|
|
ebegin "Checking for x* func usage"
|
|
out=$(cd ${top_srcdir}; find src -name '*.[ch]' \
|
|
! -name queue.h \
|
|
-exec grep -n -E '\<(malloc|strdup)[[:space:]]*\(' {} + \
|
|
| grep -v \
|
|
-e src/includes/helpers.h \
|
|
-e src/libeinfo/libeinfo.c)
|
|
[ -z "${out}" ]
|
|
eend $? "These need to be using the x* variant:"$'\n'"${out}"
|
|
fail_on_out
|
|
|
|
ebegin "Checking spacing style"
|
|
out=$(cd ${top_srcdir}; find src -name '*.[ch]' \
|
|
! -name queue.h \
|
|
-exec grep -n -E \
|
|
-e '\<(for|if|switch|while)\(' \
|
|
-e '\<(for|if|switch|while) \( ' \
|
|
-e ' ;' \
|
|
-e '[[:space:]]$' \
|
|
-e '\){' \
|
|
-e '(^|[^:])//' \
|
|
{} +)
|
|
[ -z "${out}" ]
|
|
eend $? "These lines violate style rules:"$'\n'"${out}"
|
|
fail_on_out
|
|
|
|
einfo "Running unit tests"
|
|
eindent
|
|
for u in units/*; do
|
|
[ -x "${u}" -a -f "${u}" ] || continue
|
|
ebegin "$(basename "${u}")"
|
|
./"${u}"
|
|
eend $?
|
|
: $(( ret += $? ))
|
|
done
|
|
|
|
exit ${ret}
|