116 lines
4.1 KiB
Bash
Executable file
116 lines
4.1 KiB
Bash
Executable file
#!/usr/bin/env bash
|
|
# verify-dvx-input.sh - Typed-character and present gate for DVX. Runs KEYS
|
|
# (examples/keys) as the desktop of a scratch DVX in DOSBox Staging under
|
|
# Xvfb and types the RetroNet definition-of-done string with xdotool (real X
|
|
# key events: ':' needs Shift, which DVX's keyboard layout applies before the
|
|
# window's onKey hands the character to jlInputGetChar). Two checks:
|
|
# 1. the present: a raw screenshot of the desktop must show KEYS's
|
|
# verification scanline (row 198: sentinel, count, every received
|
|
# character as two pixel nibbles) somewhere -- the window's content,
|
|
# expanded from the stage through the port's palette tables into DVX's
|
|
# 16-bit desktop -- decoding to exactly the typed bytes
|
|
# (scripts/lib/keysRow.py);
|
|
# 2. the typed history: after Escape, KEYS logs every received character
|
|
# as hex to its joeylog.txt (in its settings folder), which must equal
|
|
# the typed ASCII.
|
|
#
|
|
# Usage: scripts/verify-dvx-input.sh
|
|
# Requires: DOSBox Staging, Xvfb, xdotool, python3 + PIL, the dvx component;
|
|
# the keys program (make dvx).
|
|
set -uo pipefail
|
|
|
|
repo=$(cd "$(dirname "${BASH_SOURCE[0]}")/.." && pwd)
|
|
source "$repo/scripts/lib/joeyEnv.sh"
|
|
source "$repo/scripts/lib/dvxGate.sh"
|
|
joeyNeed DOSBOX dosbox
|
|
joeyNeed DVX_ROOT dvx
|
|
|
|
program=keys
|
|
target="192.168.1.10:6510"
|
|
wall=180 # hard cap on DOSBox, whatever happens to this script
|
|
readySeconds=60 # DVX boot until its shell reports ready
|
|
settleSeconds=3 # then KEYS opening its window and taking the focus
|
|
logSeconds=30 # Escape until KEYS's typed line is in its log
|
|
|
|
dvxNeedBuild "$program"
|
|
|
|
work=$(mktemp -d -t joeylib-dvx-input.XXXXXX)
|
|
guard=""
|
|
dosbox=""
|
|
xvfb=""
|
|
# 2>/dev/null: bash reports the SIGKILLed timeout wrapper as "Killed".
|
|
cleanup() {
|
|
joeyStop "$dosbox" "$guard" "$xvfb" 2> /dev/null
|
|
rm -rf "$work"
|
|
}
|
|
trap cleanup EXIT
|
|
|
|
dvxStage "$work/c" "$(dvxAppDir "$program")"
|
|
dvxDosboxConf "$work/dosbox.conf" "$work/c"
|
|
printf '\n[capture]\ncapture_dir = %s\ndefault_image_capture_formats = raw\n' "$work/shots" >> "$work/dosbox.conf"
|
|
mkdir -p "$work/xdg" "$work/shots"
|
|
|
|
display=":$((RANDOM % 400 + 2500))"
|
|
Xvfb "$display" -screen 0 1024x768x24 -nolisten tcp > /dev/null 2>&1 &
|
|
xvfb=$!
|
|
sleep 1
|
|
|
|
XDG_CONFIG_HOME="$work/xdg" DISPLAY="$display" SDL_AUDIODRIVER=dummy \
|
|
timeout -s KILL "$wall" "$DOSBOX" "${JOEY_DOSBOX_ISOLATE[@]}" \
|
|
--conf "$work/dosbox.conf" > "$work/dosbox.log" 2>&1 &
|
|
guard=$!
|
|
dosbox=$(joeyChild "$guard")
|
|
|
|
ready=""
|
|
for ((waited = 0; waited < readySeconds; waited++)); do
|
|
if dvxDvxLog "$work/c" 200 | grep -q "DVX Shell ready"; then
|
|
ready=1
|
|
break
|
|
fi
|
|
joeyAlive "$guard" || break
|
|
sleep 1
|
|
done
|
|
if [ -z "$ready" ]; then
|
|
echo "verify-dvx-input: FAIL - DVX did not come up within ${readySeconds}s (DVX.LOG follows)" >&2
|
|
dvxDvxLog "$work/c" >&2
|
|
exit 1
|
|
fi
|
|
sleep "$settleSeconds"
|
|
|
|
win=$(joeyFindWindow "$display" "$dosbox")
|
|
if [ -z "$win" ]; then
|
|
echo "verify-dvx-input: FAIL - DOSBox window not found" >&2
|
|
exit 1
|
|
fi
|
|
DISPLAY="$display" xdotool windowactivate --sync "$win" 2> /dev/null || true
|
|
DISPLAY="$display" xdotool type --window "$win" --delay 150 -- "$target"
|
|
sleep 2
|
|
# Ctrl+F5 = DOSBox screenshot hotkey.
|
|
DISPLAY="$display" xdotool key --window "$win" ctrl+F5
|
|
sleep 2
|
|
DISPLAY="$display" xdotool key --window "$win" Escape
|
|
|
|
log=$(dvxAwaitLog "$work/c" "$program" '^typed=' "$logSeconds" "$guard")
|
|
cp "$log" "$work/joeylog.txt" 2> /dev/null
|
|
joeyStop "$dosbox" "$guard" 2> /dev/null
|
|
dosbox=""
|
|
guard=""
|
|
|
|
png=$(ls "$work"/shots/*.png 2> /dev/null | head -1)
|
|
if [ -z "$png" ]; then
|
|
echo "verify-dvx-input: FAIL - no screenshot captured" >&2
|
|
exit 1
|
|
fi
|
|
if [ -z "$log" ]; then
|
|
echo "verify-dvx-input: FAIL - KEYS logged no typed line within ${logSeconds}s of Escape" >&2
|
|
exit 1
|
|
fi
|
|
|
|
fails=""
|
|
python3 "$repo/scripts/lib/keysRow.py" "$png" "$target" || fails="the present"
|
|
dvxKeysTyped "$work/joeylog.txt" "$target" || fails="${fails:+$fails, }the log"
|
|
if [ -n "$fails" ]; then
|
|
echo "verify-dvx-input: FAIL - $fails"
|
|
exit 1
|
|
fi
|
|
echo "verify-dvx-input: PASS (typed \"$target\": all ${#target} chars reached jlInputGetChar, and the present shows them)"
|