Mercurial > hg > nginx-tests
view stream_upstream_zone_ssl.t @ 572:ca54b445d982
Tests: masked nginx bug in proxy next upstream.
When iterating through several next upstreams per a worker cycle,
a previously reported event about upstream connection error may
be improperly applied to the next upstream, thus leading to the
invalid connection error. E.g., in kqueue, where the problem is
visible, this is caused by "ev->instance" that does not tolerate
more than one next upstream at once, and kevents placed on the
kqueue separately for read and write events.
The change is to limit test case to the only one next upstream.
author | Sergey Kandaurov <pluknet@nginx.com> |
---|---|
date | Thu, 14 May 2015 11:54:24 +0300 |
parents | ca74dc9abd1a |
children | e9064d691790 |
line wrap: on
line source
#!/usr/bin/perl # (C) Sergey Kandaurov # (C) Nginx, Inc. # Stream tests for upstream zone with ssl backend. ############################################################################### use warnings; use strict; use Test::More; BEGIN { use FindBin; chdir($FindBin::Bin); } use lib 'lib'; use Test::Nginx; ############################################################################### select STDERR; $| = 1; select STDOUT; $| = 1; my $t = Test::Nginx->new()->has(qw/stream stream_ssl http http_ssl/) ->has(qw/stream_upstream_zone/)->has_daemon('openssl')->plan(8); $t->write_file_expand('nginx.conf', <<'EOF'); %%TEST_GLOBALS%% daemon off; events { } stream { proxy_ssl on; proxy_ssl_session_reuse on; upstream u { zone u 32k; server 127.0.0.1:8087; } upstream u2 { zone u2 32k; server 127.0.0.1:8087 backup; server 127.0.0.1:8088 down; } server { listen 127.0.0.1:8080; proxy_pass u; proxy_ssl_session_reuse off; } server { listen 127.0.0.1:8081; proxy_pass u; } server { listen 127.0.0.1:8082; proxy_pass u2; proxy_ssl_session_reuse off; } server { listen 127.0.0.1:8083; proxy_pass u2; } } http { %%TEST_GLOBALS_HTTP%% server { listen 127.0.0.1:8087 ssl; ssl_certificate_key localhost.key; ssl_certificate localhost.crt; ssl_session_cache builtin; location / { add_header X-Session $ssl_session_reused; } } } EOF $t->write_file('openssl.conf', <<EOF); [ req ] default_bits = 2048 encrypt_key = no distinguished_name = req_distinguished_name [ req_distinguished_name ] EOF $t->write_file('index.html', ''); my $d = $t->testdir(); foreach my $name ('localhost') { system('openssl req -x509 -new ' . "-config '$d/openssl.conf' -subj '/CN=$name/' " . "-out '$d/$name.crt' -keyout '$d/$name.key' " . ">>$d/openssl.out 2>&1") == 0 or die "Can't create certificate for $name: $!\n"; } $t->run(); ############################################################################### like(http_get('/', socket => getconn('127.0.0.1:8080')), qr/200 OK.*X-Session: \./s, 'ssl'); like(http_get('/', socket => getconn('127.0.0.1:8081')), qr/200 OK.*X-Session: \./s, 'ssl 2'); like(http_get('/', socket => getconn('127.0.0.1:8080')), qr/200 OK.*X-Session: \./s, 'ssl reuse session'); like(http_get('/', socket => getconn('127.0.0.1:8081')), qr/200 OK.*X-Session: r/s, 'ssl reuse session 2'); like(http_get('/', socket => getconn('127.0.0.1:8082')), qr/200 OK.*X-Session: \./s, 'ssl backup'); like(http_get('/', socket => getconn('127.0.0.1:8083')), qr/200 OK.*X-Session: \./s, 'ssl backup 2'); like(http_get('/', socket => getconn('127.0.0.1:8082')), qr/200 OK.*X-Session: \./s, 'ssl reuse session backup'); like(http_get('/', socket => getconn('127.0.0.1:8083')), qr/200 OK.*X-Session: r/s, 'ssl reuse session backup 2'); ############################################################################### sub getconn { my $peer = shift; my $s = IO::Socket::INET->new( Proto => 'tcp', PeerAddr => $peer || '127.0.0.1:8080' ) or die "Can't connect to nginx: $!\n"; return $s; } ###############################################################################