#!/bin/sh

# a client lost while the configuration is loading is freed

PATH=/bin:/usr/bin
TERM=screen

[ -z "$TEST_TMUX" ] && TEST_TMUX=$(readlink -f ../tmux)

TMPDIR=$(mktemp -d) || exit 1
TMUX="$TEST_TMUX -S$TMPDIR/tmux.sock"

cleanup()
{
	touch $TMPDIR/go
	$TMUX kill-server 2>/dev/null
	rm -rf "$TMPDIR"
}
trap cleanup 0 1 15

# Poll until a command succeeds.
wait_for()
{
	i=0
	while ! "$@"; do
		[ $i -eq 100 ] && exit 1
		i=$((i + 1))
		sleep 0.1
	done
}

# The run-shell holds the configuration until the go file exists.
cat <<EOF >$TMPDIR/conf
new-session -d -s keep
run-shell 'touch $TMPDIR/started; i=0; while [ ! -f $TMPDIR/go ] && [ \$i -lt 100 ]; do sleep 0.1; i=\$((i + 1)); done'
EOF

cd $TMPDIR || exit 1
$TMUX -v -f$TMPDIR/conf new-session -d -s first </dev/null &
pid=$!
wait_for test -f $TMPDIR/started
kill $pid
wait $pid
log=$(echo $TMPDIR/tmux-server-*.log)
wait_for grep -q 'lost client' $log
c=$(sed -n 's/.* lost client //p' $log)

# The client is freed straight away, well before the configuration ends.
wait_for grep -q "free client $c " $log

exit 0