Mercurial > hg > nginx-tests

comparison mail_smtp.t @ 1937:2a0a6035a1af

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: removed TODO and try_run() checks for legacy versions.
author Sergey Kandaurov <pluknet@nginx.com>
date Fri, 25 Aug 2023 18:12:08 +0400
parents dbd19195df8a
children 92d90cc5f5e5
comparison
equal deleted inserted replaced
1936:716d7500317d 1937:2a0a6035a1af
256 $s->read(); 256 $s->read();
257 257
258 $s->print('MAIL FROM:<test@example.com> SIZE=100' . CRLF 258 $s->print('MAIL FROM:<test@example.com> SIZE=100' . CRLF
259 . 'RCPT TO:<test@example.com>' . CRLF 259 . 'RCPT TO:<test@example.com>' . CRLF
260 . 'RS'); 260 . 'RS');
261
262 $s->ok('split pipelined mail from'); 261 $s->ok('split pipelined mail from');
263
264 TODO: {
265 local $TODO = 'not yet' unless $t->has_version('1.21.0');
266
267 $s->ok('split pipelined rcpt to'); 262 $s->ok('split pipelined rcpt to');
268
269 }
270 263
271 $s->send('ET'); 264 $s->send('ET');
272 $s->ok('split pipelined rset'); 265 $s->ok('split pipelined rset');
273 266
274 # Pipelining longer than smtp_client_buffer 267 # Pipelining longer than smtp_client_buffer
282 . 'RCPT TO:<foo@example.com>' . CRLF 275 . 'RCPT TO:<foo@example.com>' . CRLF
283 . 'RCPT TO:<bar@example.com>' . CRLF 276 . 'RCPT TO:<bar@example.com>' . CRLF
284 . 'RCPT TO:<baz@example.com>' . CRLF 277 . 'RCPT TO:<baz@example.com>' . CRLF
285 . 'RCPT TO:<foobar@example.com>' . CRLF 278 . 'RCPT TO:<foobar@example.com>' . CRLF
286 . 'RSET'); 279 . 'RSET');
287
288 TODO: {
289 todo_skip 'long pipelined - not yet', 6 unless $t->has_version('1.21.0');
290
291 $s->ok('long pipelined mail from'); 280 $s->ok('long pipelined mail from');
292 $s->ok('long pipelined rcpt to'); 281 $s->ok('long pipelined rcpt to');
293 $s->ok('long pipelined rcpt to 2'); 282 $s->ok('long pipelined rcpt to 2');
294 $s->ok('long pipelined rcpt to 3'); 283 $s->ok('long pipelined rcpt to 3');
295 $s->ok('long pipelined rcpt to 4'); 284 $s->ok('long pipelined rcpt to 4');
296 $s->ok('long pipelined rset'); 285 $s->ok('long pipelined rset');
297 286
298 }
299
300 # Connection must stay even if error returned to rcpt to command 287 # Connection must stay even if error returned to rcpt to command
301 288
302 $s = Test::Nginx::SMTP->new(); 289 $s = Test::Nginx::SMTP->new();
303 $s->read(); 290 $s->read();
304 $s->send('EHLO example.com'); 291 $s->send('EHLO example.com');
331 $s->print('FOO B'); 318 $s->print('FOO B');
332 select undef, undef, undef, 0.1; 319 select undef, undef, undef, 0.1;
333 $s->send('AR'); 320 $s->send('AR');
334 $s->check(qr/^5.. /, 'invalid split command'); 321 $s->check(qr/^5.. /, 'invalid split command');
335 322
336 TODO: {
337 local $TODO = 'not yet' unless $t->has_version('1.21.0');
338
339 $s->send('HELO example.com'); 323 $s->send('HELO example.com');
340 $s->ok('good after invalid split command'); 324 $s->ok('good after invalid split command');
341 325
342 }
343
344 ############################################################################### 326 ###############################################################################