diff options
Diffstat (limited to 'subr/pre_prereqs.subr')
-rw-r--r-- | subr/pre_prereqs.subr | 39 |
1 files changed, 39 insertions, 0 deletions
diff --git a/subr/pre_prereqs.subr b/subr/pre_prereqs.subr new file mode 100644 index 00000000..c5a965b3 --- /dev/null +++ b/subr/pre_prereqs.subr @@ -0,0 +1,39 @@ +# +# . ./build.vars and set -o errexit -o noglob are assumed. +# + +pre_prereqs() { + for __ in ${CHECK_PATH_VARS}; do + if [ -z "${___:=$(get_var_unsafe "${__}")}" ]; then + log_msg failexit "Error: variable \`${__}' is empty or unset."; + elif [ "${___#* *}" != "${___}" ]; then + log_msg failexit "Error: variable \`${__}' contains one or more whitespace characters."; + fi; + done; + for __ in ${CHECK_PREREQ_CMDS} $(eval echo ${CHECK_PREREQ_FILES_DYNAMIC}) ${CHECK_PREREQ_FILES}; do + if [ "${__#/}" != "${__}" ]; then + if [ ! -e "${__}" ]; then + log_msg fail "Error: missing prerequisite file \`${__}'."; + __exit=1; + fi; + else + if ! test_cmd "${__}"; then + log_msg fail "Error: missing prerequisite command \`${__}'."; + __exit=1; + fi; + fi; + done; + for __ in ${CHECK_PREREQ_PERL_MODULES}; do + if ! perl -M"${__}" -e "" 2>/dev/null; then + log_msg fail "Error: missing prerequisite Perl module \`${__}'."; + __exit=1; + fi; + done; + if [ ${__exit:-0} = 1 ]; then + exit 1; + elif [ -n "${__exit}" ]; then + unset __exit; + fi; +}; + +# vim:filetype=sh |