test: Add tests for batpipe

.gitignore

@@ -11,3 +11,7 @@
 .download
 bin
 man
+
+# Side-Effects
+/test/data/.config/fish
+/test/data/.local/share/fish

test/shim/batpipe.sh

@@ -0,0 +1,7 @@
+batpipe() {
+	"$(batpipe_path)" "$@" || return $?
+}
+
+batpipe_path() {
+	echo "${BIN_DIR}/batpipe${BIN_SUFFIX}"
+}

test/suite/batpipe.sh

@@ -0,0 +1,26 @@
+setup() {
+	use_shim 'batpipe'
+}
+
+test:detected_bash_shell() {
+	description "Test it can detect a bash shell."
+	command -v "bash" &>/dev/null || skip "Test requires bash shell."
+	
+	output="$(SHELL="bash" bash --login -c "{ \"$(batpipe_path)\"; }")" # This hack prevents bash from exec()'ing itself.
+	grep '^LESSOPEN=' <<< "$output" >/dev/null || fail "Detected the wrong shell for bash."
+}
+
+test:detected_fish_shell() {
+	description "Test it can detect a bash shell."
+	command -v "fish" &>/dev/null || skip "Test requires fish shell."
+	
+	output="$(SHELL="fish" fish --login -c "$(batpipe_path)")"
+	grep '^set -x' <<< "$output" >/dev/null || fail "Detected the wrong shell for fish."
+}
+
+test:viewer_gzip() {
+	description "Test it can view .gz files."
+	command -v "gunzip" &>/dev/null || skip "Test requires gunzip."
+	
+	assert_equal "$(batpipe compressed.txt.gz)" "OK"
+}