comparison proxy_noclose.t @ 295:6fe0459b6668

Tests: eliminate startup races in proxy and fastcgi tests.
author Maxim Dounin <mdounin@mdounin.ru>
date Sat, 08 Jun 2013 07:02:11 +0400
parents 6a0d934950bc
children 71dfce15bbba
comparison
equal deleted inserted replaced
294:71e275487aeb 295:6fe0459b6668
67 } 67 }
68 68
69 EOF 69 EOF
70 70
71 $t->run_daemon(\&http_noclose_daemon); 71 $t->run_daemon(\&http_noclose_daemon);
72 $t->run(); 72 $t->run()->waitforsocket('127.0.0.1:8081');
73 73
74 ############################################################################### 74 ###############################################################################
75 75
76 like(http_get('/'), qr/SEE-THIS/, 'request to bad backend'); 76 like(http_get('/'), qr/SEE-THIS/, 'request to bad backend');
77 like(http_get('/multi'), qr/AND-THIS/, 'bad backend - multiple packets'); 77 like(http_get('/multi'), qr/AND-THIS/, 'bad backend - multiple packets');
93 LocalAddr => '127.0.0.1:8081', 93 LocalAddr => '127.0.0.1:8081',
94 Listen => 5, 94 Listen => 5,
95 Reuse => 1 95 Reuse => 1
96 ) 96 )
97 or die "Can't create listening socket: $!\n"; 97 or die "Can't create listening socket: $!\n";
98
99 local $SIG{PIPE} = 'IGNORE';
98 100
99 while (my $client = $server->accept()) { 101 while (my $client = $server->accept()) {
100 $client->autoflush(1); 102 $client->autoflush(1);
101 103
102 my $multi = 0; 104 my $multi = 0;