File: _testcase

package info (click to toggle)
swordfish 0.12-1
  • links: PTS, VCS
  • area: main
  • in suites: squeeze
  • size: 736 kB
  • ctags: 204
  • sloc: sh: 1,470; ansic: 1,404; python: 510; makefile: 25
file content (77 lines) | stat: -rw-r--r-- 912 bytes parent folder | download
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
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77

set -eu

SERVER_HOST="localhost"
SERVER_PORT="2929"

DB="swordfish_test.db"

if [ "${1:-}" = "runner" ]
then
	RUNNER=1
else
	RUNNER=0
fi

Exit () {
	RET="${?}"

	if [ "${RET}" = "0" ]
	then
		if [ ${RUNNER} = 1 ]
		then
			printf "."
		else
			echo "OK."
		fi
	else
		if [ ${RUNNER} = 1 ]
		then
			printf "F"
		else
			echo "FAIL."
		fi
	fi

	exit ${RET}
}

trap Exit EXIT

Assert () {
	VAL="${1:-}"

	if [ "${RET}" = "${VAL}" ]
	then
		return 0
	fi

	if [ ${RUNNER} = 0 ]
	then
		printf 'Assertion failed: %s != %s\n' "${RET}" "${VAL}"
	fi

	return 1
}
		

POST () {
	URI="${1}"
	DATA="${2:-}"

	RET="$(wget -q -O- --post-data "${DATA}" http://${SERVER_HOST}:${SERVER_PORT}${URI})"
}

GET () {
	URI="${1}"

	RET="$(wget -q -O- http://${SERVER_HOST}:${SERVER_PORT}${URI})"
}

# Flush testing database
if ! POST /databases/${DB}/delete
then
	echo "Could not flush database; is Swordfish running?"

	return 1
fi