changeset 3:ce002b2323d3

Tests: test for smtp_greeting_delay.
author Maxim Dounin <mdounin@mdounin.ru>
date Wed, 03 Sep 2008 23:22:06 +0400
parents 33cb557f69d4
children 6c41dbb2954f
files smtp.t
diffstat 1 files changed, 10 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/smtp.t
+++ b/smtp.t
@@ -131,6 +131,15 @@ log_out('HEL');
 smtp_send('O example.com');
 smtp_ok('splitted command');
 
+# With smtp_greeting_delay session expected to be closed after first error
+# message if client sent something before greeting.  Use 10026 port
+# configured with smtp_greeting_delay 0.1s to check this.
+
+$s = smtp_connect(PeerPort => 10026);
+smtp_send('HELO example.com');
+smtp_check(qr/^5.. /, "command before greeting - session must be rejected");
+ok($s->eof(), "session have to be closed");
+
 ###############################################################################
 
 sub log_out {
@@ -152,6 +161,7 @@ sub smtp_connect {
 		Proto => "tcp",
 		PeerAddr => "localhost",
 		PeerPort => 10025,
+		@_
 	)
 		or die "Can't connect to nginx: $!\n";