nginx-tests: smtp.t annotate

annotate smtp.t @ 103:4ae2198b97ec

Tests: limit_req tests for 0.8.18 changes and bug. 1. Make sure rejected requests are not counted, as leaky bucket algorithm suggests (finally correctly done in 0.8.18). 2. Make sure negative excess values are handled properly (bug appeared in 0.8.18, fixed in 0.8.19).

author	Maxim Dounin <mdounin@mdounin.ru>
date	Fri, 09 Oct 2009 21:05:42 +0400
parents	ecff5407867c
children	1c0ec30614c6

rev	line source
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	1 #!/usr/bin/perl
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	2
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	3 # (C) Maxim Dounin
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	4
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	5 # Tests for nginx mail smtp module.
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	6
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	7 ###############################################################################
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	8
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	9 use warnings;
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	10 use strict;
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	11
27 fb94a224fef2 Tests: add has() functions for feature testing. Maxim Dounin <mdounin@mdounin.ru> parents: 26 diff changeset	12 use Test::More;
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	13
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	14 use MIME::Base64;
7 9eb509695651 Tests: drop our own CRLF constant, use Socket's one instead. Maxim Dounin <mdounin@mdounin.ru> parents: 5 diff changeset	15 use Socket qw/ CRLF /;
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	16
9 f772e2a1a13f Tests: change directory to allow runing from outside. Maxim Dounin <mdounin@mdounin.ru> parents: 7 diff changeset	17 BEGIN { use FindBin; chdir($FindBin::Bin); }
f772e2a1a13f Tests: change directory to allow runing from outside. Maxim Dounin <mdounin@mdounin.ru> parents: 7 diff changeset	18
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	19 use lib 'lib';
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	20 use Test::Nginx;
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	21 use Test::Nginx::SMTP;
5 4d75bdb05ecf Tests: some generic code and ssi tests. Maxim Dounin <mdounin@mdounin.ru> parents: 4 diff changeset	22
4d75bdb05ecf Tests: some generic code and ssi tests. Maxim Dounin <mdounin@mdounin.ru> parents: 4 diff changeset	23 ###############################################################################
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	24
2 33cb557f69d4 Tests: smtp pipelining is here, remove todo flags. Maxim Dounin <mdounin@mdounin.ru> parents: 1 diff changeset	25 select STDERR; $\| = 1;
33cb557f69d4 Tests: smtp pipelining is here, remove todo flags. Maxim Dounin <mdounin@mdounin.ru> parents: 1 diff changeset	26 select STDOUT; $\| = 1;
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	27
96 ecff5407867c Tests: better handle unexpected connection close from nginx. Maxim Dounin <mdounin@mdounin.ru> parents: 72 diff changeset	28 local $SIG{PIPE} = 'IGNORE';
ecff5407867c Tests: better handle unexpected connection close from nginx. Maxim Dounin <mdounin@mdounin.ru> parents: 72 diff changeset	29
26 0880e0fafde4 Tests: implement smtp test backend and use it. Maxim Dounin <mdounin@mdounin.ru> parents: 17 diff changeset	30 my $t = Test::Nginx->new()
58 d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	31 ->has('mail')->plan(25)
26 0880e0fafde4 Tests: implement smtp test backend and use it. Maxim Dounin <mdounin@mdounin.ru> parents: 17 diff changeset	32 ->run_daemon(\&Test::Nginx::SMTP::smtp_test_daemon)
0880e0fafde4 Tests: implement smtp test backend and use it. Maxim Dounin <mdounin@mdounin.ru> parents: 17 diff changeset	33 ->write_file_expand('nginx.conf', <<'EOF')->run();
17 7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	34
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	35 master_process off;
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	36 daemon off;
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	37
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	38 events {
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	39 }
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	40
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	41 mail {
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	42 proxy_pass_error_message on;
45 d68b85def521 Tests: use 127.0.0.1 instead of localhost. Maxim Dounin <mdounin@mdounin.ru> parents: 35 diff changeset	43 auth_http http://127.0.0.1:8080/mail/auth;
17 7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	44 xclient off;
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	45
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	46 server {
45 d68b85def521 Tests: use 127.0.0.1 instead of localhost. Maxim Dounin <mdounin@mdounin.ru> parents: 35 diff changeset	47 listen 127.0.0.1:8025;
17 7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	48 protocol smtp;
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	49 smtp_auth login plain none;
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	50 }
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	51 }
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	52
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	53 http {
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	54 access_log off;
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	55
35 7bf0e8a1d66c Tests: always define temp paths. Maxim Dounin <mdounin@mdounin.ru> parents: 28 diff changeset	56 client_body_temp_path %%TESTDIR%%/client_body_temp;
7bf0e8a1d66c Tests: always define temp paths. Maxim Dounin <mdounin@mdounin.ru> parents: 28 diff changeset	57 fastcgi_temp_path %%TESTDIR%%/fastcgi_temp;
7bf0e8a1d66c Tests: always define temp paths. Maxim Dounin <mdounin@mdounin.ru> parents: 28 diff changeset	58 proxy_temp_path %%TESTDIR%%/proxy_temp;
7bf0e8a1d66c Tests: always define temp paths. Maxim Dounin <mdounin@mdounin.ru> parents: 28 diff changeset	59
17 7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	60 server {
45 d68b85def521 Tests: use 127.0.0.1 instead of localhost. Maxim Dounin <mdounin@mdounin.ru> parents: 35 diff changeset	61 listen 127.0.0.1:8080;
17 7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	62 server_name localhost;
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	63
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	64 location = /mail/auth {
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	65 set $reply ERROR;
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	66
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	67 if ($http_auth_smtp_to ~ example.com) {
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	68 set $reply OK;
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	69 }
56 573c8293ac38 Tests: fix smtp auth plain tests to check username. Maxim Dounin <mdounin@mdounin.ru> parents: 45 diff changeset	70
573c8293ac38 Tests: fix smtp auth plain tests to check username. Maxim Dounin <mdounin@mdounin.ru> parents: 45 diff changeset	71 set $userpass "$http_auth_user:$http_auth_pass";
573c8293ac38 Tests: fix smtp auth plain tests to check username. Maxim Dounin <mdounin@mdounin.ru> parents: 45 diff changeset	72 if ($userpass ~ '^test@example.com:secret$') {
17 7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	73 set $reply OK;
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	74 }
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	75
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	76 add_header Auth-Status $reply;
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	77 add_header Auth-Server 127.0.0.1;
26 0880e0fafde4 Tests: implement smtp test backend and use it. Maxim Dounin <mdounin@mdounin.ru> parents: 17 diff changeset	78 add_header Auth-Port 8026;
17 7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	79 add_header Auth-Wait 1;
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	80 return 204;
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	81 }
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	82 }
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	83 }
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	84
7e28c64edf55 Tests: reorganize smtp tests (no real changes). Maxim Dounin <mdounin@mdounin.ru> parents: 14 diff changeset	85 EOF
4 6c41dbb2954f Tests: run nginx with appropriate config from test itself. Maxim Dounin <mdounin@mdounin.ru> parents: 3 diff changeset	86
6c41dbb2954f Tests: run nginx with appropriate config from test itself. Maxim Dounin <mdounin@mdounin.ru> parents: 3 diff changeset	87 ###############################################################################
6c41dbb2954f Tests: run nginx with appropriate config from test itself. Maxim Dounin <mdounin@mdounin.ru> parents: 3 diff changeset	88
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	89 my $s = Test::Nginx::SMTP->new();
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	90 $s->check(qr/^220 /, "greeting");
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	91
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	92 $s->send('EHLO example.com');
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	93 $s->check(qr/^250 /, "ehlo");
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	94
56 573c8293ac38 Tests: fix smtp auth plain tests to check username. Maxim Dounin <mdounin@mdounin.ru> parents: 45 diff changeset	95 $s->send('AUTH PLAIN ' . encode_base64("\0test\@example.com\0bad", ''));
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	96 $s->check(qr/^5.. /, 'auth plain with bad password');
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	97
56 573c8293ac38 Tests: fix smtp auth plain tests to check username. Maxim Dounin <mdounin@mdounin.ru> parents: 45 diff changeset	98 $s->send('AUTH PLAIN ' . encode_base64("\0test\@example.com\0secret", ''));
69 30d6cce3f0bd Tests: more checks for 235 code on successful smtp auth. Maxim Dounin <mdounin@mdounin.ru> parents: 64 diff changeset	99 $s->authok('auth plain');
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	100
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	101 # We are talking to backend from this point
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	102
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	103 $s->send('MAIL FROM:<test@example.com> SIZE=100');
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	104 $s->ok('mail from after auth');
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	105
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	106 $s->send('RSET');
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	107 $s->ok('rset');
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	108
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	109 $s->send('MAIL FROM:<test@xn--e1afmkfd.xn--80akhbyknj4f> SIZE=100');
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	110 $s->ok("idn mail from (example.test in russian)");
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	111
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	112 $s->send('QUIT');
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	113 $s->ok("quit");
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	114
58 d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	115 # Try auth login in simple form
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	116
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	117 $s = Test::Nginx::SMTP->new();
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	118 $s->read();
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	119 $s->send('EHLO example.com');
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	120 $s->read();
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	121
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	122 $s->send('AUTH LOGIN');
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	123 $s->check(qr/^334 VXNlcm5hbWU6/, 'auth login simple username challenge');
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	124 $s->send(encode_base64('test@example.com', ''));
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	125 $s->check(qr/^334 UGFzc3dvcmQ6/, 'auth login simple password challenge');
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	126 $s->send(encode_base64('secret', ''));
69 30d6cce3f0bd Tests: more checks for 235 code on successful smtp auth. Maxim Dounin <mdounin@mdounin.ru> parents: 64 diff changeset	127 $s->authok('auth login simple');
58 d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	128
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	129 # Try auth plain with username. Details:
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	130 #
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	131 # [MS-XLOGIN]: SMTP Protocol AUTH LOGIN Extension Specification
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	132 # http://download.microsoft.com/download/5/D/D/5DD33FDF-91F5-496D-9884-0A0B0EE698BB/%5BMS-XLOGIN%5D.pdf
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	133
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	134 $s = Test::Nginx::SMTP->new();
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	135 $s->read();
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	136 $s->send('EHLO example.com');
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	137 $s->read();
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	138
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	139 $s->send('AUTH LOGIN ' . encode_base64('test@example.com', ''));
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	140 $s->check(qr/^334 UGFzc3dvcmQ6/, 'auth login with username password challenge');
d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	141 $s->send(encode_base64('secret', ''));
60 11e33ba0656a Tests: check for 235 code on successful smtp auth. Maxim Dounin <mdounin@mdounin.ru> parents: 58 diff changeset	142 $s->authok('auth login with username');
58 d053b4bf6ec6 Tests: add smtp auth login tests. Maxim Dounin <mdounin@mdounin.ru> parents: 57 diff changeset	143
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	144 # Try auth plain with pipelining
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	145
57 b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	146 TODO: {
b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	147 local $TODO = 'pipelining not in official nginx';
72 24143894b91b Tests: shut up warnings for TODO tests. Maxim Dounin <mdounin@mdounin.ru> parents: 71 diff changeset	148 local $SIG{__WARN__} = sub {};
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	149
57 b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	150 $s = Test::Nginx::SMTP->new();
b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	151 $s->read();
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	152 $s->send('EHLO example.com');
57 b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	153 $s->read();
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	154
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	155 $s->send('INVALID COMMAND WITH ARGUMENTS' . CRLF
2 33cb557f69d4 Tests: smtp pipelining is here, remove todo flags. Maxim Dounin <mdounin@mdounin.ru> parents: 1 diff changeset	156 . 'RSET');
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	157 $s->read();
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	158 $s->ok('pipelined rset after invalid command');
1 c731d50dd6b1 Tests: check pipelining after invalid command. Maxim Dounin <mdounin@mdounin.ru> parents: 0 diff changeset	159
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	160 $s->send('AUTH PLAIN '
56 573c8293ac38 Tests: fix smtp auth plain tests to check username. Maxim Dounin <mdounin@mdounin.ru> parents: 45 diff changeset	161 . encode_base64("\0test\@example.com\0bad", '') . CRLF
2 33cb557f69d4 Tests: smtp pipelining is here, remove todo flags. Maxim Dounin <mdounin@mdounin.ru> parents: 1 diff changeset	162 . 'MAIL FROM:<test@example.com> SIZE=100');
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	163 $s->read();
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	164 $s->ok('mail from after failed pipelined auth');
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	165
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	166 $s->send('AUTH PLAIN '
56 573c8293ac38 Tests: fix smtp auth plain tests to check username. Maxim Dounin <mdounin@mdounin.ru> parents: 45 diff changeset	167 . encode_base64("\0test\@example.com\0secret", '') . CRLF
2 33cb557f69d4 Tests: smtp pipelining is here, remove todo flags. Maxim Dounin <mdounin@mdounin.ru> parents: 1 diff changeset	168 . 'MAIL FROM:<test@example.com> SIZE=100');
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	169 $s->read();
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	170 $s->ok('mail from after pipelined auth');
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	171
57 b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	172 }
b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	173
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	174 # Try auth none
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	175
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	176 $s = Test::Nginx::SMTP->new();
57 b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	177 $s->read();
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	178 $s->send('EHLO example.com');
57 b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	179 $s->read();
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	180
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	181 $s->send('MAIL FROM:<test@example.com> SIZE=100');
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	182 $s->ok('auth none - mail from');
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	183
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	184 $s->send('RCPT TO:<test@example.com>');
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	185 $s->ok('auth none - rcpt to');
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	186
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	187 $s->send('RSET');
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	188 $s->ok('auth none - rset, should go to backend');
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	189
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	190 # Auth none with pipelining
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	191
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	192 $s = Test::Nginx::SMTP->new();
57 b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	193 $s->read();
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	194 $s->send('EHLO example.com');
57 b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	195 $s->read();
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	196
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	197 $s->send('MAIL FROM:<test@example.com> SIZE=100' . CRLF
2 33cb557f69d4 Tests: smtp pipelining is here, remove todo flags. Maxim Dounin <mdounin@mdounin.ru> parents: 1 diff changeset	198 . 'RCPT TO:<test@example.com>' . CRLF
33cb557f69d4 Tests: smtp pipelining is here, remove todo flags. Maxim Dounin <mdounin@mdounin.ru> parents: 1 diff changeset	199 . 'RSET');
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	200
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	201 $s->ok('pipelined mail from');
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	202
57 b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	203 TODO: {
b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	204 local $TODO = 'pipelining not in official nginx';
72 24143894b91b Tests: shut up warnings for TODO tests. Maxim Dounin <mdounin@mdounin.ru> parents: 71 diff changeset	205 local $SIG{__WARN__} = sub {};
57 b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	206
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	207 $s->ok('pipelined rcpt to');
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	208 $s->ok('pipelined rset');
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	209
57 b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	210 }
b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	211
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	212 # Connection must stay even if error returned to rcpt to command
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	213
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	214 $s = Test::Nginx::SMTP->new();
57 b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	215 $s->read();
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	216 $s->send('EHLO example.com');
57 b5b4271554b0 Test: use TODO for smtp pipelining tests. Maxim Dounin <mdounin@mdounin.ru> parents: 56 diff changeset	217 $s->read();
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	218
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	219 $s->send('MAIL FROM:<test@example.com> SIZE=100');
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	220 $s->read(); # skip mail from reply
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	221
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	222 $s->send('RCPT TO:<example.com>');
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	223 $s->check(qr/^5.. /, "bad rcpt to");
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	224
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	225 $s->send('RCPT TO:<test@example.com>');
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	226 $s->ok('good rcpt to');
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	227
2 33cb557f69d4 Tests: smtp pipelining is here, remove todo flags. Maxim Dounin <mdounin@mdounin.ru> parents: 1 diff changeset	228 # Make sure command splitted into many packets processed correctly
33cb557f69d4 Tests: smtp pipelining is here, remove todo flags. Maxim Dounin <mdounin@mdounin.ru> parents: 1 diff changeset	229
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	230 $s = Test::Nginx::SMTP->new();
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	231 $s->read();
2 33cb557f69d4 Tests: smtp pipelining is here, remove todo flags. Maxim Dounin <mdounin@mdounin.ru> parents: 1 diff changeset	232
33cb557f69d4 Tests: smtp pipelining is here, remove todo flags. Maxim Dounin <mdounin@mdounin.ru> parents: 1 diff changeset	233 log_out('HEL');
33cb557f69d4 Tests: smtp pipelining is here, remove todo flags. Maxim Dounin <mdounin@mdounin.ru> parents: 1 diff changeset	234 $s->print('HEL');
14 d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	235 $s->send('O example.com');
d4b74207a627 Tests: refactor common functions. Maxim Dounin <mdounin@mdounin.ru> parents: 9 diff changeset	236 $s->ok('splitted command');
0 de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	237
de28d9f761be Tests for nginx. Initial smtp testing. Maxim Dounin <mdounin@mdounin.ru> parents: diff changeset	238 ###############################################################################

Mercurial > hg > nginx-tests

annotate smtp.t @ 103:4ae2198b97ec