1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
#!/bin/sh
set -e
cd $AUTOPKGTEST_TMP
rls() {
echo $(ls /etc/rc*.d/[SK][0-9][0-9]$1 | sed -r 's,.*/([SK])[^/]*,\1,g')
}
do_tmux() {
echo "+ tmux" "$@"
tmux -Lui-test "$@"
}
send_wait_get() {
[ -z "$1" ] || do_tmux send-key $1
sleep ${2:-0}
do_tmux capture-pane -p | tee screen
}
do_tmux new-session -d /usr/sbin/sysv-rc-conf; sleep 3
send_wait_get
if grep 'systemd is init' screen
then
send_wait_get Enter 1
fi
grep -E 'atd +\[ \] +\[X\] +\[X\] +\[X\] +\[X\] +\[ \] +\[ \] +\[~\]' screen
test "$(rls atd)" = "K K S S S S K"
send_wait_get m 1
grep -E 'atd +\[ \] +\[ \] +\[ \] +\[ \] +\[ \] +\[ \] +\[ \] +\[~\]' screen
test "$(rls atd)" = "K K K K K K K"
send_wait_get d 1
test "$(rls atd)" = "K K S S S S K"
send_wait_get q 1 || true
do_tmux kill-session || true
echo "Done."
|
