Side status line regress tests.

regress/side-status-scroll.sh

@@ -0,0 +1,148 @@
+#!/bin/sh
+
+# With more windows than rows, the default side status format scrolls the
+# window list to keep the current window visible and replaces the first and
+# last visible rows with up and down markers.
+
+PATH=/bin:/usr/bin
+TERM=screen
+LC_ALL=C.UTF-8
+export PATH TERM LC_ALL
+
+[ -z "$TEST_TMUX" ] && TEST_TMUX=$(readlink -f ../tmux)
+TMUX="$TEST_TMUX -LtestA$$ -f/dev/null"
+TMUX2="$TEST_TMUX -LtestB$$ -f/dev/null"
+
+TMP=$(mktemp) || exit 1
+cleanup()
+{
+	$TMUX2 kill-server >/dev/null 2>&1
+	$TMUX kill-server >/dev/null 2>&1
+	rm -f "$TMP"
+}
+trap cleanup 0 1 15
+
+$TMUX new-session -d -s inner -n w0 -x 60 -y 10 'sleep 100' || exit 1
+i=1
+while [ "$i" -lt 15 ]; do
+	$TMUX new-window -d -n "w$i" 'sleep 100' || exit 1
+	i=$((i + 1))
+done
+$TMUX set -g status off || exit 1
+$TMUX set -g side-status left || exit 1
+$TMUX select-window -t inner:7 || exit 1
+$TMUX2 new-session -d -s outer -x 60 -y 10 'sleep 100' || exit 1
+$TMUX2 set -g status off || exit 1
+$TMUX2 respawn-pane -k -t outer:0.0 "$TMUX attach -t inner" || exit 1
+sleep 1
+
+# Compare the outer pane with the expected rows on standard input.
+compare()
+{
+	$TMUX2 capture-pane -p -t outer:0.0 >"$TMP" || exit 1
+	if ! cmp -s - "$TMP"; then
+		echo "$1 differs:" >&2
+		cat "$TMP" >&2
+		exit 1
+	fi
+}
+
+compare "scrolled side status" <<EOF
+↑            │
+3:w3         │
+4:w4         │
+5:w5         │
+6:w6         │
+7:w7*        │
+8:w8         │
+9:w9         │
+10:w10       │
+↓            │
+EOF
+
+# A long current window name in the first row is cut on the right like the
+# other rows.
+$TMUX rename-window -t inner:0 dotfiles-repo || exit 1
+$TMUX select-window -t inner:0 || exit 1
+sleep 1
+compare "first row" <<EOF
+0:dotfiles-re│
+1:w1         │
+2:w2         │
+3:w3         │
+4:w4         │
+5:w5         │
+6:w6         │
+7:w7-        │
+8:w8         │
+↓            │
+EOF
+
+# A format with its list styles in the same order as on the status line, with
+# list=on before the markers, draws the same rows.
+$TMUX set -g side-status-format '#[list=on]#[list=left-marker]^#[nl]'\
+'#[list=right-marker]v#[nl]'\
+'#{W:#[range=window|#{window_index}]#I:#W#[norange]#[nl],'\
+'#[range=window|#{window_index} list=focus]#I:#W*#[norange list=on]#[nl]}' ||
+    exit 1
+$TMUX rename-window -t inner:0 w0 || exit 1
+$TMUX select-window -t inner:7 || exit 1
+sleep 1
+compare "status line order" <<EOF
+^            │
+3:w3         │
+4:w4         │
+5:w5         │
+6:w6         │
+7:w7*        │
+8:w8         │
+9:w9         │
+10:w10       │
+v            │
+EOF
+
+# With list=on at the start of each window row and the focus closed in the
+# current row, a long current window name is still cut on the right.
+$TMUX set -g side-status-format \
+    '#{W:#[list=on]#I:#W#[nl],#[list=on]#[list=focus]#I:#W*#[list=on]#[nl]}' ||
+    exit 1
+$TMUX rename-window -t inner:0 dotfiles-repo || exit 1
+$TMUX select-window -t inner:0 || exit 1
+sleep 1
+compare "list=on rows" <<EOF
+0:dotfiles-re│
+1:w1         │
+2:w2         │
+3:w3         │
+4:w4         │
+5:w5         │
+6:w6         │
+7:w7         │
+8:w8         │
+9:w9         │
+EOF
+
+# With only one or two rows, a marker is not drawn over the current window.
+$TMUX set -gu side-status-format || exit 1
+$TMUX rename-window -t inner:0 w0 || exit 1
+$TMUX select-window -t inner:7 || exit 1
+$TMUX2 resize-window -t outer -y 2 || exit 1
+sleep 1
+compare "two rows" <<EOF
+↑            │
+7:w7*        │
+EOF
+$TMUX select-window -t inner:1 || exit 1
+sleep 1
+compare "two rows at the top" <<EOF
+0:w0         │
+1:w1*        │
+EOF
+$TMUX select-window -t inner:7 || exit 1
+$TMUX2 resize-window -t outer -y 1 || exit 1
+sleep 1
+compare "one row" <<EOF
+7:w7*        │
+EOF
+
+exit 0