1 # $Id: channel-test.e,v 1.3 2003/12/27 13:01:12 alex Exp $
2 
3 spawn telnet localhost 6789
4 expect {
5 	timeout { exit 1 }
6 	"Connected"
7 }
8 
9 send "nick nick\r"
10 send "user user . . :User\r"
11 expect {
12 	timeout { exit 1 }
13 	"376"
14 }
15 
16 send "join #channel\r"
17 expect {
18 	timeout { exit 1 }
19 	"@* JOIN :#channel"
20 }
21 expect {
22 	timeout { exit 1 }
23 	"366"
24 }
25 
26 send "topic #channel :Test-Topic\r"
27 expect {
28 	timeout { exit 1 }
29 	"@* TOPIC #channel :Test-Topic"
30 }
31 
32 send "who #channel\r"
33 expect {
34 	timeout { exit 1 }
35 	"352 nick #channel"
36 }
37 expect {
38 	timeout { exit 1 }
39 	"* nick H@ :0 User"
40 }
41 expect {
42 	timeout { exit 1 }
43 	"315 nick #channel"
44 }
45 
46 send "names #channel\r"
47 expect {
48 	timeout { exit 1 }
49 	"353 nick = #channel :@nick"
50 }
51 expect {
52 	timeout { exit 1 }
53 	"366 nick #channel"
54 }
55 
56 send "list\r"
57 expect {
58 	timeout { exit 1 }
59 	"322 nick #channel 1 :Test-Topic"
60 }
61 expect {
62 	timeout { exit 1 }
63 	"323 nick :End of LIST"
64 }
65 
66 send "part #channel\r"
67 expect {
68 	timeout { exit 1 }
69 	"@* PART #channel :nick"
70 }
71 
72 send "quit\r"
73 expect {
74 	timeout { exit 1 }
75 	"Connection closed"
76 }
77 
78 # -eof-