check-idle.e 495 B

12345678910111213141516171819202122232425262728293031
  1. # ngIRCd test suite
  2. # Idle test
  3. spawn telnet 127.0.0.1 6789
  4. expect {
  5. timeout { exit 1 }
  6. "Connected"
  7. }
  8. send "nick IdleTest\r"
  9. send "user idle . . :Idle-Test\r"
  10. expect {
  11. timeout { exit 1 }
  12. "433 * IdleTest :Nickname already in use" { exit 99 }
  13. "376"
  14. }
  15. send "lusers\r"
  16. expect {
  17. timeout { exit 1 }
  18. "251 IdleTest :There are 1 users and 0 services on 1 servers" { set r 0 }
  19. "251 IdleTest :There are" { set r 99 }
  20. }
  21. send "quit\r"
  22. expect {
  23. timeout { exit 1 }
  24. "Connection closed"
  25. }
  26. exit $r