summaryrefslogtreecommitdiff
path: root/lib9p/tests/runtest
blob: 0966000e69ea193b5cd5359f0d3320c182a97fdd (plain)
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
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
#!/usr/bin/env bash
# lib9p/tests/runtest - TODO
#
# Copyright (C) 2025  Luke T. Shumaker <lukeshu@lukeshu.com>
# SPDX-License-Identifier: AGPL-3.0-or-later

set -euE -o pipefail
set -x

valgrind --error-exitcode=2 ./tests/test_server/test_server &
server_pid=$!
# shellcheck disable=SC2064
trap "kill $server_pid || true; wait $server_pid || true" EXIT
server_addr='localhost:9000'

client=(9p -a "$server_addr")

expect_lines() (
	{ set +x; } &>/dev/null
	printf >&2 '+ diff -u expected.txt actual.txt\n'
	diff -u <(printf '%s\n' "$@") <(printf '%s\n' "$out")
)

while [[ -d /proc/$server_pid && "$(readlink /proc/$server_pid/fd/4 2>/dev/null)" != socket:* ]]; do sleep 0.1; done

out=$("${client[@]}" ls -l '')
expect_lines \
	'd-r-xr-xr-x M 0 root root  0 Oct  7 15:51 Documentation' \
	'--r--r--r-- M 0 root root 14 Oct  7 15:51 README.md' \
	'---w--w--w- M 0 root root  0 Oct  7 15:51 shutdown'

out=$("${client[@]}" ls -l 'Documentation/')
expect_lines \
	'--r--r--r-- M 0 root root 4 Oct  7 15:51 x'

out=$("${client[@]}" read 'README.md')
expect_lines \
	'Hello, world!'

out=$("${client[@]}" read 'Documentation/x')
expect_lines \
	'foo'

out=$("${client[@]}" stat 'Documentation/x')
expect_lines \
	"'x' 'root' 'root' 'root' q (0000000000000001 1 ) m 0444 at 1728337905 mt 1728337904 l 4 t 0 d 0"

out=$("${client[@]}" write 'shutdown' <<<1)
expect_lines ''

wait "$server_pid"
trap - EXIT