Mercurial > hg > nginx-tests

comparison stream_proxy_protocol_ipv6.t @ 952:e9064d691790

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: converted tests to run in parallel.
author Andrey Zelenkov <zelenkov@nginx.com>
date Tue, 21 Jun 2016 16:39:13 +0300
parents 77359b849cd5
children 882267679006
comparison
equal deleted inserted replaced
951:9361c7eddfc1 952:e9064d691790
36 events { 36 events {
37 } 37 }
38 38
39 stream { 39 stream {
40 server { 40 server {
41 listen 127.0.0.1:8080; 41 listen 127.0.0.1:%%PORT_0%%;
42 proxy_pass [::1]:8080; 42 proxy_pass [::1]:%%PORT_0%%;
43 } 43 }
44 44
45 server { 45 server {
46 listen 127.0.0.1:8081; 46 listen 127.0.0.1:%%PORT_1%%;
47 proxy_pass [::1]:8081; 47 proxy_pass [::1]:%%PORT_1%%;
48 } 48 }
49 49
50 server { 50 server {
51 listen [::1]:8080; 51 listen [::1]:%%PORT_0%%;
52 proxy_pass 127.0.0.1:8082; 52 proxy_pass 127.0.0.1:%%PORT_2%%;
53 proxy_protocol on; 53 proxy_protocol on;
54 } 54 }
55 55
56 server { 56 server {
57 listen [::1]:8081; 57 listen [::1]:%%PORT_1%%;
58 proxy_pass 127.0.0.1:8082; 58 proxy_pass 127.0.0.1:%%PORT_2%%;
59 } 59 }
60 } 60 }
61 61
62 EOF 62 EOF
63 63
64 $t->run_daemon(\&stream_daemon); 64 $t->run_daemon(\&stream_daemon);
65 $t->try_run('no inet6 support or stream proxy_protocol')->plan(2); 65 $t->try_run('no inet6 support or stream proxy_protocol')->plan(2);
66 $t->waitforsocket('127.0.0.1:8082'); 66 $t->waitforsocket('127.0.0.1:' . port(2));
67 67
68 ############################################################################### 68 ###############################################################################
69 69
70 like(stream()->io('close'), qr/PROXY TCP6 ::1 ::1 \d+ 8080$CRLF/, 70 my $dp = port(0);
71 'protocol on'); 71
72 unlike(stream('127.0.0.1:8081')->io('close'), qr/PROXY/, 'protocol off'); 72 like(stream('127.0.0.1:' . $dp)->io('close'),
73 qr/PROXY TCP6 ::1 ::1 \d+ $dp$CRLF/, 'protocol on');
74 unlike(stream('127.0.0.1:' . port(1))->io('close'), qr/PROXY/,
75 'protocol off');
73 76
74 ############################################################################### 77 ###############################################################################
75 78
76 sub stream_daemon { 79 sub stream_daemon {
77 my $server = IO::Socket::INET->new( 80 my $server = IO::Socket::INET->new(
78 Proto => 'tcp', 81 Proto => 'tcp',
79 LocalHost => '127.0.0.1:8082', 82 LocalHost => '127.0.0.1:' . port(2),
80 Listen => 5, 83 Listen => 5,
81 Reuse => 1 84 Reuse => 1
82 ) 85 )
83 or die "Can't create listening socket: $!\n"; 86 or die "Can't create listening socket: $!\n";
84 87