From d1adc7c60425c2b34039f713881c3cdf75534ef1 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Lucio=20Andr=C3=A9s=20Illanes=20Albornoz=20=28arab=2C=20vx?=
 =?UTF-8?q?p=29?= <l.illanes@gmx.de>
Date: Fri, 3 Feb 2017 05:10:58 +0100
Subject: build.sh, subr/pre_{prereqs,subdirs}.subr: moved prereqs/subdirs code
 into subr/pre_*.subr. subr/rtl.subr: move subst_tgts() back.

---
 subr/pre_prereqs.subr | 39 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 39 insertions(+)
 create mode 100644 subr/pre_prereqs.subr

(limited to 'subr/pre_prereqs.subr')

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
-- 
cgit v1.2.3