mirror of
https://github.com/tmux/tmux.git
synced 2026-07-03 10:22:29 +00:00
73 lines
2.1 KiB
Bash
Executable File
73 lines
2.1 KiB
Bash
Executable File
#!/bin/sh
|
|
|
|
# Command failure scope.
|
|
#
|
|
# Failure scope is the active sequence (CMD_PARSE_SEQUENCE): commands joined by
|
|
# ';' share one scope, so a failure skips the rest of that sequence; commands on
|
|
# separate lines are independent sequences and are not skipped. After a failed
|
|
# inner brace the enclosing sequence still resumes.
|
|
#
|
|
# Each case below creates windows around a deliberately invalid command and the
|
|
# resulting window list shows exactly which commands ran.
|
|
|
|
PATH=/bin:/usr/bin
|
|
TERM=screen
|
|
|
|
[ -z "$TEST_TMUX" ] && TEST_TMUX=$(readlink -f ../tmux)
|
|
TMUX="$TEST_TMUX -Ltest -f/dev/null"
|
|
$TMUX kill-server 2>/dev/null
|
|
|
|
TMP=$(mktemp)
|
|
CONF=$(mktemp)
|
|
trap "rm -f $TMP $CONF" 0 1 15
|
|
|
|
# kill-server is asynchronous, so wait for the old server to actually exit
|
|
# before starting a fresh one (otherwise the next start races a dying server).
|
|
fresh_server() {
|
|
$TMUX kill-server 2>/dev/null
|
|
i=0
|
|
while $TMUX list-sessions >/dev/null 2>&1; do
|
|
sleep 0.05
|
|
i=$((i + 1))
|
|
[ $i -gt 100 ] && break
|
|
done
|
|
$TMUX -f/dev/null start \; new-session -d -swork -nbase || exit 1
|
|
}
|
|
|
|
# $1 label, $2 config body, $3 expected comma-separated window list.
|
|
run() {
|
|
fresh_server
|
|
printf '%s\n' "$2" >$CONF
|
|
$TMUX source-file $CONF >/dev/null 2>&1
|
|
got=$($TMUX list-windows -t work -F '#{window_name}' | tr '\n' ',')
|
|
if [ "$got" != "$3" ]; then
|
|
echo "$1: got [$got] expected [$3]" >&2
|
|
exit 1
|
|
fi
|
|
}
|
|
|
|
# ';' sequence in a brace body: A runs, the bad command skips B (same sequence),
|
|
# the outer sequence resumes so C runs.
|
|
run "semicolon body" 'if-shell true { new-window -dn A ; nonexistent_cmd ; new-window -dn B }
|
|
new-window -dn C' 'base,A,C,'
|
|
|
|
# Newlines are independent sequences: the bad command skips only itself, so both
|
|
# B and C still run.
|
|
run "newline body" 'if-shell true {
|
|
new-window -dn A
|
|
nonexistent_cmd
|
|
new-window -dn B
|
|
}
|
|
new-window -dn C' 'base,A,B,C,'
|
|
|
|
# Top-level ';' sequence: failure skips the rest of the line.
|
|
run "top-level semicolon" 'new-window -dn A ; nonexistent_cmd ; new-window -dn B' 'base,A,'
|
|
|
|
# Top-level newlines: independent, both run.
|
|
run "top-level newline" 'new-window -dn A
|
|
nonexistent_cmd
|
|
new-window -dn B' 'base,A,B,'
|
|
|
|
$TMUX kill-server 2>/dev/null
|
|
exit 0
|