Mercurial > hg > nginx-tests

comparison smtp.t @ 71:4715bd4d4693

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: auth login with username in 0.7.34, remove TODO.
author Maxim Dounin <mdounin@mdounin.ru>
date Wed, 11 Feb 2009 15:14:42 +0300
parents 30d6cce3f0bd
children 24143894b91b
comparison
equal deleted inserted replaced
70:b9bf423929cc 71:4715bd4d4693
127 # Try auth plain with username. Details: 127 # Try auth plain with username. Details:
128 # 128 #
129 # [MS-XLOGIN]: SMTP Protocol AUTH LOGIN Extension Specification 129 # [MS-XLOGIN]: SMTP Protocol AUTH LOGIN Extension Specification
130 # http://download.microsoft.com/download/5/D/D/5DD33FDF-91F5-496D-9884-0A0B0EE698BB/%5BMS-XLOGIN%5D.pdf 130 # http://download.microsoft.com/download/5/D/D/5DD33FDF-91F5-496D-9884-0A0B0EE698BB/%5BMS-XLOGIN%5D.pdf
131 131
132 TODO: {
133 local $TODO = 'not supported yet';
134
135 $s = Test::Nginx::SMTP->new(); 132 $s = Test::Nginx::SMTP->new();
136 $s->read(); 133 $s->read();
137 $s->send('EHLO example.com'); 134 $s->send('EHLO example.com');
138 $s->read(); 135 $s->read();
139 136
140 $s->send('AUTH LOGIN ' . encode_base64('test@example.com', '')); 137 $s->send('AUTH LOGIN ' . encode_base64('test@example.com', ''));
141 $s->check(qr/^334 UGFzc3dvcmQ6/, 'auth login with username password challenge'); 138 $s->check(qr/^334 UGFzc3dvcmQ6/, 'auth login with username password challenge');
142 $s->send(encode_base64('secret', '')); 139 $s->send(encode_base64('secret', ''));
143 $s->authok('auth login with username'); 140 $s->authok('auth login with username');
144 141
145 }
146
147 # Try auth plain with pipelining 142 # Try auth plain with pipelining
148 143
149 TODO: { 144 TODO: {
150 local $TODO = 'pipelining not in official nginx'; 145 local $TODO = 'pipelining not in official nginx';
151 146