src/testsuite/who-away-test.e

   1 # $Id: who-away-test.e,v 1.1 2008/02/11 11:06:32 fw 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 . . :Real Name\r"
  11 expect {
  12         timeout { exit 1 }
  13         "376"
  14 }
  15
  16 send "who\r"
  17 expect {
  18         timeout { exit 1 }
  19         ":ngircd.test.server 352 nick * ~user localhost ngircd.test.server nick H :0 Real Name"
  20 }
  21
  22 send "who 0\r"
  23 expect {
  24         timeout { exit 1 }
  25         ":ngircd.test.server 352 nick * ~user localhost ngircd.test.server nick H :0 Real Name"
  26 }
  27
  28 send "who *\r"
  29 expect {
  30         timeout { exit 1 }
  31         ":ngircd.test.server 352 nick * ~user localhost ngircd.test.server nick H :0 Real Name"
  32 }
  33
  34 send "away :testing\r"
  35 expect {
  36         timeout { exit 1 }
  37         "306 nick"
  38 }
  39
  40 send "who localhost\r"
  41 expect {
  42         timeout { exit 1 }
  43         ":ngircd.test.server 352 nick * ~user localhost ngircd.test.server nick G :0 Real Name"
  44 }
  45
  46 send "who ngircd.test.server\r"
  47 expect {
  48         timeout { exit 1 }
  49         ":ngircd.test.server 352 nick * ~user localhost ngircd.test.server nick G :0 Real Name"
  50 }
  51
  52 send "who Real?Name\r"
  53 expect {
  54         timeout { exit 1 }
  55         ":ngircd.test.server 352 nick * ~user localhost ngircd.test.server nick G :0 Real Name"
  56 }
  57
  58 send "who nick\r"
  59 expect {
  60         timeout { exit 1 }
  61         ":ngircd.test.server 352 nick * ~user localhost ngircd.test.server nick G :0 Real Name"
  62 }
  63
  64 send "away\r"
  65 expect {
  66         timeout { exit 1 }
  67         "305 nick"
  68 }
  69
  70 send "who *cal*ho??\r"
  71 expect {
  72         timeout { exit 1 }
  73         ":ngircd.test.server 352 nick * ~user localhost ngircd.test.server nick H :0 Real Name"
  74 }
  75
  76 send "who *.server\r"
  77 expect {
  78         timeout { exit 1 }
  79         ":ngircd.test.server 352 nick * ~user localhost ngircd.test.server nick H :0 Real Name"
  80 }
  81
  82 send "who Real*me\r"
  83 expect {
  84         timeout { exit 1 }
  85         ":ngircd.test.server 352 nick * ~user localhost ngircd.test.server nick H :0 Real Name"
  86 }
  87
  88 send "who n?c?\r"
  89 expect {
  90         timeout { exit 1 }
  91         ":ngircd.test.server 352 nick * ~user localhost ngircd.test.server nick H :0 Real Name"
  92 }
  93
  94 send "quit\r"
  95 expect {
  96         timeout { exit 1 }
  97         "Connection closed"
  98 }
  99
 100 # -eof-