#!/usr/bin/env bash
# test-send-message-verdict.sh — locks the fail-loud verdict logic of the patched
# send-message.sh against three real tmux-pane fixtures on a throwaway socket:
#
#   1. DELIVERED   — a REPL that renders a `❯ ` input box and submits on Enter
#                    (text scrolls to history, box clears) => exit 0 "✓ delivered".
#   2. UNCONFIRMED — a pane with NO locatable prompt glyph. This is the exact
#                    historical FALSE POSITIVE: pre-patch it printed "✓ delivered"
#                    exit 0; post-patch it MUST fail loud (exit 2, stderr
#                    "could not confirm submission").
#   3. DRAFT       — a `❯ `-prompt pane that never submits (message stays on the
#                    input line) => exit 2, stderr "unsubmitted draft".
set -uo pipefail

HERE=$(cd -- "$(dirname -- "$0")" && pwd)
SEND="$HERE/send-message.sh"
SOCKET="verdict-test-$RANDOM-$$"
TMP=$(mktemp -d)
trap 'tmux -L "$SOCKET" kill-server >/dev/null 2>&1 || true; rm -rf "$TMP"' EXIT

PASS=0; FAIL=0
ok() { PASS=$((PASS+1)); printf '  ok   %s\n' "$1"; }
no() { FAIL=$((FAIL+1)); printf '  FAIL %s\n       %s\n' "$1" "$2"; }

command -v tmux >/dev/null 2>&1 || { echo "tmux required" >&2; exit 1; }

# --- Fixture 1: a submitting REPL with a ❯ prompt box (interactive bash, glyph PS1).
#     readline strips bracketed-paste markers just like a real agent REPL; Enter
#     executes (text -> scrollback), leaving a fresh empty `❯ ` box.
tmux -L "$SOCKET" new-session -d -s repl -c "$TMP" \
  'PS1="❯ " exec bash --noprofile --norc -i'
sleep 0.3
out=$("$SEND" -L "$SOCKET" -t "=repl" -m "verdict fixture one delivered ok" 2>"$TMP/e1"); rc=$?
if [ "$rc" -eq 0 ] && printf '%s' "$out" | grep -qF "✓ delivered"; then
  ok "delivered: ❯-prompt REPL that submits => exit 0 ✓ delivered"
else
  no "delivered: ❯-prompt REPL that submits => exit 0 ✓ delivered" "rc=$rc out=[$out] err=[$(cat "$TMP/e1")]"
fi

# --- Fixture 2: NO prompt glyph (default bash PS1). THE regression: pre-patch this
#     was a silent false-positive "delivered"; post-patch it must be unconfirmed→exit 2.
tmux -L "$SOCKET" new-session -d -s noglyph -c "$TMP" \
  'PS1="sh-noglyph$ " exec bash --noprofile --norc -i'
sleep 0.3
if out=$("$SEND" -L "$SOCKET" -t "=noglyph" -m "verdict fixture two must fail loud" 2>"$TMP/e2"); then
  no "unconfirmed: glyphless pane must NOT report success" "expected exit 2, got 0 (out=[$out])"
else
  rc=$?
  if [ "$rc" -eq 2 ] && grep -qF "could not confirm submission" "$TMP/e2"; then
    ok "unconfirmed: glyphless pane => exit 2 + 'could not confirm submission' (false-positive FIXED)"
  else
    no "unconfirmed: glyphless pane => exit 2 + stderr" "rc=$rc err=[$(cat "$TMP/e2")]"
  fi
fi

# --- Fixture 3: a ❯ box that never submits (sleep ignores stdin; TTY echo keeps the
#     pasted tail sitting on the ❯ line) => draft => exit 2.
tmux -L "$SOCKET" new-session -d -s draft -c "$TMP" \
  'printf "❯ "; exec sleep infinity'
sleep 0.3
if out=$("$SEND" -L "$SOCKET" -t "=draft" -r 1 -m "verdict fixture three stuck unsubmitted draft" 2>"$TMP/e3"); then
  no "draft: unsubmitted message must NOT report success" "expected exit 2, got 0 (out=[$out])"
else
  rc=$?
  if [ "$rc" -eq 2 ] && grep -qF "unsubmitted draft" "$TMP/e3"; then
    ok "draft: stuck ❯-line message => exit 2 + 'unsubmitted draft'"
  else
    no "draft: stuck ❯-line message => exit 2 + stderr" "rc=$rc err=[$(cat "$TMP/e3")]"
  fi
fi

echo "---"
echo "PASS=$PASS FAIL=$FAIL"
[ "$FAIL" -eq 0 ]