]> arthur.barton.de Git - ngircd-alex.git/blob - src/testsuite/stress-B.e
Fixes to who-test: accept any ident, escape some '*' flags.
[ngircd-alex.git] / src / testsuite / stress-B.e
1 # $Id: stress-B.e,v 1.3 2005/12/30 22:12:28 alex Exp $
2
3 send "user user . . :User\r"
4 expect {
5         timeout { exit 1 }
6         " 376"
7 }
8
9 sleep 2
10
11 send "oper TestOp 123\r"
12 expect {
13         timeout { exit 1 }
14         "MODE test* :+o"
15 }
16 expect {
17         timeout { exit 1 }
18         " 381 test"
19 }
20
21 sleep 2
22
23 send "join #channel\r"
24 expect {
25         timeout { exit 1 }
26         " 353 * = #channel "
27 }
28 expect {
29         timeout { exit 1 }
30         " 366 * #channel :"
31 }
32
33 send "mode #channel\r"
34 expect {
35         timeout { exit 1 }
36         " 324 test* #channel"
37 }
38
39 send "join #channel2\r"
40 expect {
41         timeout { exit 1 }
42         " 353 * = #channel2 "
43 }
44 expect {
45         timeout { exit 1 }
46         " 366 * #channel2 :"
47 }
48
49 send "names\r"
50 expect {
51         timeout { exit 1 }
52         " 366 "
53 }
54
55 sleep 3
56
57 send "part #channel2\r"
58 expect {
59         timeout { exit 1 }
60         " PART #channel2 "
61 }
62
63 send "part #channel\r"
64 expect {
65         timeout { exit 1 }
66         " PART #channel "
67 }
68
69 sleep 1
70
71 send "quit\r"
72 expect {
73         timeout { exit 1 }
74         "Connection closed"
75 }
76
77 # -eof-