1 files changed, 142 insertions, 0 deletions
diff --git a/tests/test-bootstrap-packages.bats b/tests/test-bootstrap-packages.bats
new file mode 100644
index 00000000..7e511152
--- /dev/null
+++ b/tests/test-bootstrap-packages.bats
@@ -0,0 +1,142 @@
+#!/usr/bin/env bats
+# Tests for scripts/bootstrap-packages.sh — the headless package installer.
+#
+# The elisp tests cover what happens inside one Emacs.  What only a shell test
+# can cover is the pass loop: whether a run that reports packages still missing
+# gets another pass, whether a run that converges stops early, and whether a
+# broken init breaks out instead of burning every pass on the same failure.
+#
+# Every test drives a fake emacs whose exit statuses are scripted, so no test
+# touches the network, the real elpa directory, or a real Emacs.  The script
+# honours $EMACS, which is the seam these hang on.
+
+setup() {
+	SCRIPT="${BATS_TEST_DIRNAME}/../scripts/bootstrap-packages.sh"
+	BIN="${BATS_TEST_TMPDIR}/bin"
+	COUNTER="${BATS_TEST_TMPDIR}/attempts"
+	mkdir -p "$BIN"
+	echo 0 >"$COUNTER"
+	export BOOTSTRAP_PASSES=3
+	export BOOTSTRAP_TIMEOUT=30
+	# Point the script at a scratch config dir rather than the real checkout, so
+	# the byte-compiled-modules check reads fixture state instead of whatever
+	# this working tree happens to have compiled.
+	export BOOTSTRAP_DIR="${BATS_TEST_TMPDIR}/emacsd"
+	mkdir -p "$BOOTSTRAP_DIR/modules"
+}
+
+# Write a fake emacs that exits with the given statuses in order, repeating the
+# last one once the list runs out.  Status 1 also prints the "still missing"
+# line the real cj/package-bootstrap-batch prints, so the script's grep is
+# exercised rather than assumed.
+fake_emacs() {
+	{
+		echo '#!/usr/bin/env bash'
+		echo "n=\$(cat '$COUNTER')"
+		echo "n=\$((n + 1))"
+		echo "echo \$n >'$COUNTER'"
+		echo "statuses=($*)"
+		echo 'idx=$((n - 1))'
+		echo 'last=$((${#statuses[@]} - 1))'
+		echo '[ $idx -gt $last ] && idx=$last'
+		echo 'status=${statuses[$idx]}'
+		echo '[ "$status" -eq 1 ] && echo "package-bootstrap: 2 missing: foo bar"'
+		echo 'exit $status'
+	} >"$BIN/emacs"
+	chmod +x "$BIN/emacs"
+	export EMACS="$BIN/emacs"
+}
+
+attempts() { cat "$COUNTER"; }
+
+@test "normal: a clean first pass succeeds and stops there" {
+	fake_emacs 0
+	run bash "$SCRIPT"
+	[ "$status" -eq 0 ]
+	[ "$(attempts)" -eq 1 ]
+	[[ "$output" == *"every package is installed"* ]]
+}
+
+@test "normal: a pass reporting missing packages is retried until it converges" {
+	fake_emacs 1 0
+	run bash "$SCRIPT"
+	[ "$status" -eq 0 ]
+	[ "$(attempts)" -eq 2 ]
+	[[ "$output" == *"2 missing: foo bar"* ]]
+}
+
+@test "error: packages that never install exhaust the passes and fail" {
+	fake_emacs 1
+	run bash "$SCRIPT"
+	[ "$status" -eq 1 ]
+	[ "$(attempts)" -eq 3 ]
+	[[ "$output" == *"FAILED"* ]]
+}
+
+@test "error: exit 1 without a missing-packages line is not blamed on packages" {
+	# The fake exits 1 silently, which is any other failure, not a short install.
+	{
+		echo '#!/usr/bin/env bash'
+		echo "n=\$(cat '$COUNTER'); echo \$((n + 1)) >'$COUNTER'"
+		echo 'exit 1'
+	} >"$BIN/emacs"
+	chmod +x "$BIN/emacs"
+	export EMACS="$BIN/emacs"
+	run bash "$SCRIPT"
+	[ "$status" -eq 1 ]
+	[ "$(attempts)" -eq 1 ]
+	[[ "$output" == *"without reporting missing packages"* ]]
+}
+
+@test "error: a broken init breaks out instead of burning every pass" {
+	fake_emacs 255
+	run bash "$SCRIPT"
+	[ "$status" -eq 255 ]
+	[ "$(attempts)" -eq 1 ]
+	[[ "$output" == *"failed to load init"* ]]
+}
+
+@test "boundary: a timed-out pass is reported and still retried" {
+	fake_emacs 124 0
+	run bash "$SCRIPT"
+	[ "$status" -eq 0 ]
+	[ "$(attempts)" -eq 2 ]
+	[[ "$output" == *"timeout"* ]]
+}
+
+@test "boundary: the pass ceiling is honoured" {
+	export BOOTSTRAP_PASSES=1
+	fake_emacs 1
+	run bash "$SCRIPT"
+	[ "$status" -eq 1 ]
+	[ "$(attempts)" -eq 1 ]
+}
+
+@test "error: a byte-compiled tree is refused rather than passed vacuously" {
+	touch "$BOOTSTRAP_DIR/modules/foo.elc"
+	fake_emacs 0
+	run bash "$SCRIPT"
+	[ "$status" -eq 2 ]
+	[ "$(attempts)" -eq 0 ]
+	[[ "$output" == *"REFUSING"* ]]
+	[[ "$output" == *"clean-compiled"* ]]
+	[[ "$output" != *"every package is installed"* ]]
+}
+
+@test "boundary: a zero pass ceiling fails cleanly without a tail error" {
+	export BOOTSTRAP_PASSES=0
+	fake_emacs 0
+	run bash "$SCRIPT"
+	[ "$status" -ne 0 ]
+	[ "$(attempts)" -eq 0 ]
+	[[ "$output" != *"cannot open"* ]]
+	[[ "$output" == *"FAILED after 0 pass"* ]]
+}
+
+@test "boundary: recovery on the final allowed pass still succeeds" {
+	export BOOTSTRAP_PASSES=3
+	fake_emacs 1 1 0
+	run bash "$SCRIPT"
+	[ "$status" -eq 0 ]
+	[ "$(attempts)" -eq 3 ]
+}