diff options
| author | Alexander Barton <alex@barton.de> | 2002-09-09 22:56:07 +0000 |
|---|---|---|
| committer | Alexander Barton <alex@barton.de> | 2002-09-09 22:56:07 +0000 |
| commit | fc6f64742cf58203c5e14481498e592d21899f02 (patch) | |
| tree | 6025c0c52ffe4bb0f6ab63be8b91216bcd5b312f /src/testsuite/check-idle.e | |
| parent | d040fa2a7da818d84171fa1a5e3c5d2c2fca92a1 (diff) | |
| download | ngircd-fc6f64742cf58203c5e14481498e592d21899f02.tar.gz ngircd-fc6f64742cf58203c5e14481498e592d21899f02.zip | |
- EXTRA_DIST ergaenzt, clean-Target erweitert.
- neues Script "stress-server.sh" integriert.
Diffstat (limited to 'src/testsuite/check-idle.e')
| -rw-r--r-- | src/testsuite/check-idle.e | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/src/testsuite/check-idle.e b/src/testsuite/check-idle.e new file mode 100644 index 00000000..08d79cab --- /dev/null +++ b/src/testsuite/check-idle.e @@ -0,0 +1,31 @@ +# $Id: check-idle.e,v 1.1 2002/09/09 22:56:07 alex Exp $ + +spawn telnet localhost 6789 +expect { + timeout { exit 1 } + "Connected" +} + +send "nick IdleTest\r" +send "user idle . . :Idle-Test\r" +expect { + timeout { exit 1 } + "376" +} + +send "lusers\r" +expect { + timeout { exit 1 } + "251 IdleTest :There are 1 users and 0 services on 1 servers" { set r 0 } + "251 IdleTest :There are" { set r 99 } +} + +send "quit\r" +expect { + timeout { exit 1 } + "Connection closed" +} + +exit $r + +# -eof- |