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
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
|
#!/usr/bin/env python
import os, sys, re
import argparse
# http://pexpect.sourceforge.net/pexpect.html
from pexpect import spawn, EOF, TIMEOUT
# TODO: do we need to support '\n' too
sep = "\r\n"
rundir = None
parser = argparse.ArgumentParser(
description="Run a test file against a Mal implementation")
parser.add_argument('--rundir',
help="change to the directory before running tests")
parser.add_argument('--start-timeout', default=10, type=int,
help="default timeout for initial prompt")
parser.add_argument('--test-timeout', default=20, type=int,
help="default timeout for each individual test action")
parser.add_argument('--pre-eval', default=None, type=str,
help="Mal code to evaluate prior to running the test")
parser.add_argument('--redirect', action='store_true',
help="Run implementation in bash and redirect output to /dev/null")
parser.add_argument('test_file', type=argparse.FileType('r'),
help="a test file formatted as with mal test data")
parser.add_argument('mal_cmd', nargs="*",
help="Mal implementation command line. Use '--' to "
"specify a Mal command line with dashed options.")
args = parser.parse_args(sys.argv[1:])
test_data = args.test_file.read().split('\n')
if args.rundir: os.chdir(args.rundir)
if args.redirect:
# Redirect to try and force raw mode (no ASCII codes)
p = spawn('/bin/bash -c "' + " ".join(args.mal_cmd) + ' |tee /dev/null"')
else:
p = spawn(args.mal_cmd[0], args.mal_cmd[1:])
test_idx = 0
def read_test(data):
global test_idx
form, output, ret = None, "", None
while data:
test_idx += 1
line = data.pop(0)
if re.match(r"^\s*$", line): # blank line
continue
elif line[0:3] == ";;;": # ignore comment
continue
elif line[0:2] == ";;": # output comment
print line[3:]
continue
elif line[0:2] == ";": # unexpected comment
print "Test data error at line %d:\n%s" % (test_idx, line)
return None, None, None, test_idx
form = line # the line is a form to send
# Now find the output and return value
while data:
line = data[0]
if line[0:3] == ";=>":
ret = line[3:].replace('\\r', '\r').replace('\\n', '\n')
test_idx += 1
data.pop(0)
break
elif line[0:2] == "; ":
output = output + line[2:] + sep
test_idx += 1
data.pop(0)
else:
ret = "*"
break
if ret: break
return form, output, ret, test_idx
def assert_prompt(timeout):
# Wait for the initial prompt
idx = p.expect(['user> ', 'mal-user> ', EOF, TIMEOUT],
timeout=timeout)
if idx not in [0,1]:
print "Did not get 'user> ' or 'mal-user> ' prompt"
print " Got : %s" % repr(p.before)
sys.exit(1)
# Wait for the initial prompt
assert_prompt(args.start_timeout)
# Send the pre-eval code if any
if args.pre_eval:
sys.stdout.write("RUNNING pre-eval: %s" % args.pre_eval)
p.sendline(args.pre_eval)
assert_prompt(args.test_timeout)
fail_cnt = 0
while test_data:
form, out, ret, line_num = read_test(test_data)
if form == None:
break
sys.stdout.write("TEST: %s -> [%s,%s]" % (form, repr(out), repr(ret)))
sys.stdout.flush()
expected = "%s%s%s%s" % (form, sep, out, ret)
p.sendline(form)
try:
idx = p.expect(['\r\nuser> ', '\nuser> ',
'\r\nmal-user> ', '\nmal-user> '],
timeout=args.test_timeout)
#print "%s,%s,%s" % (idx, repr(p.before), repr(p.after))
if ret == "*" or p.before == expected:
print " -> SUCCESS"
else:
print " -> FAIL (line %d):" % line_num
print " Expected : %s" % repr(expected)
print " Got : %s" % repr(p.before)
fail_cnt += 1
except EOF:
print "Got EOF"
sys.exit(1)
except TIMEOUT:
print "Got TIMEOUT, received: %s" % repr(p.before)
sys.exit(1)
if fail_cnt > 0:
print "FAILURES: %d" % fail_cnt
sys.exit(2)
sys.exit(0)
|
