From b143764aba756a28caf74fc4878e74ca66d2eeab Mon Sep 17 00:00:00 2001
From: Patrick McDermott <patrick.mcdermott@libiquity.com>
Date: Mon, 24 Dec 2018 18:44:25 -0500
Subject: tests/ob_reduce_deps.sh: Convert to TAP

---
(limited to 'tests/ob_reduce_deps.sh')

diff --git a/tests/ob_reduce_deps.sh b/tests/ob_reduce_deps.sh
index 406db0b..fd1a810 100644..100755
--- a/tests/ob_reduce_deps.sh
+++ b/tests/ob_reduce_deps.sh
@@ -17,36 +17,119 @@
 # You should have received a copy of the GNU General Public License
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
-. ./common.sh
-
-ret=0
-type=
-host_arch=
-deps=
-result=
-
-main()
-{
-	. ./ob_reduce_deps.rc
-
-	exit ${ret}
-}
-
-testcase()
-{
-	if [ "${type}" != 'u' ]; then
-		deps="$(ob_reduce_deps -a "${host_arch}" "${deps}")"
-	else
-		deps="$(ob_reduce_deps -u -a "${host_arch}" "${deps}")"
-	fi
-
-	if [ "${deps}" != "${result}" ]; then
-		printf 'Dependency list of type "%s" for host arch "%s":\n' \
-			"${type}" "${host_arch}"
-		printf '  "%s" != "%s"\n' \
-			"${deps}" "${result}"
-		ret=1
-	fi
-}
-
-main "${@}"
+srcdir="$(dirname "${0}")"
+top_builddir="${PWD}"
+
+. "${srcdir}/aux/tap-functions.sh"
+. "${top_builddir}/lib/libopkbuild.shso.1"
+
+plan_ 11
+
+# Normal and union AND-lists.
+
+command_ok_ \
+	'NORMAL LIST "foo, bar"' -- \
+	[ "$(ob_reduce_deps \
+		-a 'core-linux-eglibc' \
+		'foo, bar' \
+	)" = \
+		'foo, bar' \
+	]
+
+command_ok_ \
+	'NORMAL LIST "foo,bar"' -- \
+	[ "$(ob_reduce_deps \
+		-a 'core-linux-eglibc' \
+		'foo,bar' \
+	)" = \
+		'foo, bar' \
+	]
+
+command_ok_ \
+	'NORMAL LIST "foo,   bar"' -- \
+	[ "$(ob_reduce_deps \
+		-a 'core-linux-eglibc' \
+		'foo,   bar' \
+	)" = \
+		'foo, bar' \
+	]
+
+command_ok_ \
+	'UNION LIST "foo, bar"' -- \
+	[ "$(ob_reduce_deps \
+		-u \
+		-a 'core-linux-eglibc' \
+		'foo, bar' \
+	)" = \
+		'foo, bar' \
+	]
+
+command_ok_ \
+	'UNION LIST "foo,bar"' -- \
+	[ "$(ob_reduce_deps \
+		-u \
+		-a 'core-linux-eglibc' \
+		'foo,bar' \
+	)" = \
+		'foo, bar' \
+	]
+
+command_ok_ \
+	'UNION LIST "foo,   bar"' -- \
+	[ "$(ob_reduce_deps \
+		-u \
+		-a 'core-linux-eglibc' \
+		'foo,   bar' \
+	)" = \
+		'foo, bar' \
+	]
+
+# Normal and union OR-lists.
+
+command_ok_ \
+	'NORMAL LIST "foo | bar"' -- \
+	[ "$(ob_reduce_deps \
+		-a 'core-linux-eglibc' \
+		'foo | bar' \
+	)" = \
+		'foo | bar' \
+	]
+
+command_ok_ \
+	'NORMAL LIST "foo|bar"' -- \
+	[ "$(ob_reduce_deps \
+		-a 'core-linux-eglibc' \
+		'foo|bar' \
+	)" = \
+		'foo | bar' \
+	]
+
+command_ok_ \
+	'NORMAL LIST "foo   |   bar"' -- \
+	[ "$(ob_reduce_deps \
+		-a 'core-linux-eglibc' \
+		'foo   |   bar' \
+	)" = \
+		'foo | bar' \
+	]
+
+# Normal and union AND-lists with arch specs.
+
+command_ok_ \
+	'NORMAL LIST "foo [core-linux-eglibc], bar [!core-linux-eglibc]"' -- \
+	[ "$(ob_reduce_deps \
+		-a 'core-linux-eglibc' \
+		'foo [core-linux-eglibc], bar [!core-linux-eglibc]' \
+	)" = \
+		'foo' \
+	]
+
+command_ok_ \
+	'UNION LIST "foo [core-linux-eglibc], bar [!core-linux-eglibc]"' -- \
+	[ "$(ob_reduce_deps \
+		-u \
+		-a 'core-linux-eglibc' \
+		'foo [core-linux-eglibc], bar [!core-linux-eglibc]' \
+	)" = \
+		'foo' \
+	]
--
cgit v0.9.1