code-be-01
7ad47152c2
ci/woodpecker/pr/ci Pipeline was successful
${VAR:-} collapsed exported-empty into genuinely-unset, mis-filing
both-empty and the two mixed empty/unset states as informational where
the charter requires WARNs. Presence now tracked via [[ -v VAR ]]
alongside value: NOTES only when both variables are genuinely absent;
any present-but-empty or single-present state emits a loud WARN per
missing/empty anchor, each naming the launchers as authority (unset and
empty get distinct wording). Suite: the wrong both-empty note arm
replaced by three warn arms (both-empty, host-empty+brain-unset,
host-unset+brain-empty); warn arms accept >=1 warn with zero notes
(single-present states warn once, both-present-empty warns twice — per
anchor, by design); red control now mutates presence tracking back to
the nonemptiness collapse (the reviewed defect shape) and must emit
NOTEs for both-empty. 10 arms green; gates green.
132 lines
5.8 KiB
Bash
Executable File
132 lines
5.8 KiB
Bash
Executable File
#!/usr/bin/env bash
|
|
# Covers the structure-anchor provisioning check in `mosaic-doctor` (T51 WP0b).
|
|
#
|
|
# Same discipline as test-brain-home-check.sh: functions are extracted from the
|
|
# shipped script (exact header + closing brace), never copied — a test carrying
|
|
# its own copy of the logic keeps passing after the shipped copy changes.
|
|
#
|
|
# Four contract states (charter T51P2WP0B-20260824):
|
|
# 1. both present+nonempty -> pass ([OK]), no warns, no notes
|
|
# 2a. host missing, brain set -> warn naming MOSAIC_HOST_ROOT + launchers
|
|
# 2b. brain missing, host set -> warn naming MOSAIC_BRAIN_HOME + launchers
|
|
# 2c. present-but-EMPTY counts as missing (warns; NEVER informational)
|
|
# 3. neither present -> informational notes, NON-AUTHORITATIVE, never warn
|
|
# Arms include genuinely-UNSET (env -u) forms, not only empty strings.
|
|
# Red control: empty-vs-unset distinction removed in a mutated copy -> suite red.
|
|
set -euo pipefail
|
|
|
|
SCRIPT_DIR=$(cd -- "$(dirname "$0")" && pwd)
|
|
DOCTOR="$SCRIPT_DIR/mosaic-doctor"
|
|
|
|
fail() {
|
|
echo "FAIL: $*" >&2
|
|
exit 1
|
|
}
|
|
|
|
[ -f "$DOCTOR" ] || fail "missing mosaic-doctor at $DOCTOR"
|
|
|
|
extract_function() {
|
|
local name="$1"
|
|
local extracted
|
|
extracted=$(sed -n "/^${name}() {/,/^}/p" "$DOCTOR")
|
|
[ -n "$extracted" ] || fail "could not extract ${name}() from mosaic-doctor — script reshaped?"
|
|
printf '%s\n' "$extracted"
|
|
}
|
|
|
|
for fn in check_structure_anchor_provisioning; do
|
|
extract_function "$fn" >/dev/null
|
|
done
|
|
|
|
# run_case LABEL EXPECT(ok|warn|note) [env assignments as args; -u VAR tokens for unset]
|
|
run_case() {
|
|
local label="$1" expect="$2"
|
|
shift 2
|
|
local envs=() unsets=()
|
|
local a
|
|
for a in "$@"; do
|
|
case "$a" in
|
|
-u:*) unsets+=("${a#-u:}") ;;
|
|
*) envs+=("$a") ;;
|
|
esac
|
|
done
|
|
local out warns notes oks
|
|
# build the env command with proper -u flags (array expansion must not
|
|
# glue '-u VAR' into one word)
|
|
local cmd=(env)
|
|
local e u
|
|
# env(1) parses options only before the first assignment — -u flags FIRST
|
|
for u in "${unsets[@]:-}"; do [ -n "$u" ] && cmd+=(-u "$u"); done
|
|
for e in "${envs[@]:-}"; do [ -n "$e" ] && cmd+=("$e"); done
|
|
cmd+=(bash -c "warn() { echo \"[WARN] \$*\"; }; note() { echo \"[NOTE] \$*\"; return 0; }; pass() { echo \"[OK] \$*\"; return 0; }; $(extract_function check_structure_anchor_provisioning); check_structure_anchor_provisioning")
|
|
out=$("${cmd[@]}" 2>&1)
|
|
warns=$(printf '%s\n' "$out" | grep -c '^\[WARN\]' || true)
|
|
notes=$(printf '%s\n' "$out" | grep -c '^\[NOTE\]' || true)
|
|
oks=$(printf '%s\n' "$out" | grep -c '^\[OK\]' || true)
|
|
if [[ "$expect" == ok && "$oks" -gt 0 && "$warns" -eq 0 && "$notes" -eq 0 ]]; then
|
|
echo "ok - $label"
|
|
elif [[ "$expect" == warn && "$warns" -ge 1 && "$notes" -eq 0 ]]; then
|
|
echo "ok - $label (warned x$warns)"
|
|
elif [[ "$expect" == note && "$notes" -gt 0 && "$warns" -eq 0 ]]; then
|
|
echo "ok - $label (noted)"
|
|
else
|
|
echo "output: $out" >&2
|
|
fail "$label: expected $expect (oks=$oks warns=$warns notes=$notes)"
|
|
fi
|
|
}
|
|
|
|
ROOT=$(mktemp -d)
|
|
trap 'rm -rf "$ROOT"' EXIT
|
|
HOST="$ROOT/host"
|
|
BRAIN="$ROOT/brain"
|
|
|
|
# ── state 1: both present + nonempty → pass ────────────────────────────────
|
|
run_case "both anchors present passes" ok \
|
|
MOSAIC_HOST_ROOT="$HOST" MOSAIC_BRAIN_HOME="$BRAIN"
|
|
|
|
# ── state 2a: host missing (unset), brain set → exactly one warn ───────────
|
|
run_case "unset host root warns" warn \
|
|
-u:MOSAIC_HOST_ROOT MOSAIC_BRAIN_HOME="$BRAIN"
|
|
|
|
# ── state 2b: brain missing (unset), host set → exactly one warn ───────────
|
|
run_case "unset brain home warns" warn \
|
|
MOSAIC_HOST_ROOT="$HOST" -u:MOSAIC_BRAIN_HOME
|
|
|
|
# ── state 2c-empty: present-but-empty counts as missing ────────────────────
|
|
run_case "empty-string host root warns (empty != set)" warn \
|
|
MOSAIC_HOST_ROOT= MOSAIC_BRAIN_HOME="$BRAIN"
|
|
run_case "empty-string brain home warns (empty != set)" warn \
|
|
MOSAIC_HOST_ROOT="$HOST" MOSAIC_BRAIN_HOME=
|
|
|
|
# ── state 3: neither present (genuinely unset) → notes, never warn ─────────
|
|
run_case "both unset yields non-authoritative notes" note \
|
|
-u:MOSAIC_HOST_ROOT -u:MOSAIC_BRAIN_HOME
|
|
run_case "both empty-string warns (empty is present, not absent)" warn \
|
|
MOSAIC_HOST_ROOT= MOSAIC_BRAIN_HOME=
|
|
run_case "host empty + brain unset warns" warn \
|
|
MOSAIC_HOST_ROOT= -u:MOSAIC_BRAIN_HOME
|
|
run_case "host unset + brain empty warns" warn \
|
|
-u:MOSAIC_HOST_ROOT MOSAIC_BRAIN_HOME=
|
|
|
|
# ── red control (mutation): presence tracking removed → red ────────────────
|
|
# Mutant regresses to the reviewed defect shape: presence derived from
|
|
# NONEMPTINESS (the `${VAR:-}` collapse) instead of true -v tracking. Both-empty
|
|
# then looks genuinely-absent and is mis-filed as informational; the both-empty
|
|
# warn arm above finds no WARN and the suite reds.
|
|
MUT="$ROOT/mosaic-doctor.mutant"
|
|
sed 's/\[\[ -v MOSAIC_HOST_ROOT \]\] \&\& host_set=1/[[ -n "${MOSAIC_HOST_ROOT:-}" ]] \&\& host_set=1/; s/\[\[ -v MOSAIC_BRAIN_HOME \]\] \&\& brain_set=1/[[ -n "${MOSAIC_BRAIN_HOME:-}" ]] \&\& brain_set=1/' \
|
|
"$DOCTOR" > "$MUT"
|
|
if cmp -s "$DOCTOR" "$MUT"; then
|
|
echo "SKIP red control (mutation anchor not found — sed pattern drifted)" >&2
|
|
else
|
|
mut_fn=$(sed -n "/^check_structure_anchor_provisioning() {/,/^}/p" "$MUT")
|
|
outm=$(env MOSAIC_HOST_ROOT= MOSAIC_BRAIN_HOME= bash -c \
|
|
"warn() { echo \"[WARN] \$*\"; }; note() { echo \"[NOTE] \$*\"; return 0; }; pass() { echo \"[OK] \$*\"; return 0; }; $mut_fn; check_structure_anchor_provisioning" 2>&1)
|
|
if printf '%s\n' "$outm" | grep -q '^\[NOTE\]'; then
|
|
echo "ok - red control bites (mutant collapses empty into informational; shipped does not)"
|
|
else
|
|
fail "red control did not reproduce the regression shape (mutant output unexpected)"
|
|
fi
|
|
fi
|
|
|
|
echo "structure anchor doctor check: all arms passed"
|