Mercurial > hg > nginx-tests
diff stream_ssl.t @ 974:882267679006
Tests: simplified parallel modifications in tests.
Mail tests were simplified in c227348453db.
author | Andrey Zelenkov <zelenkov@nginx.com> |
---|---|
date | Tue, 12 Jul 2016 17:39:03 +0300 |
parents | e9064d691790 |
children | 90a0d85436c1 |
line wrap: on
line diff
--- a/stream_ssl.t +++ b/stream_ssl.t @@ -53,32 +53,32 @@ stream { ssl_password_file password_http; server { - listen 127.0.0.1:%%PORT_0%% ssl; - proxy_pass 127.0.0.1:%%PORT_1%%; + listen 127.0.0.1:8080 ssl; + proxy_pass 127.0.0.1:8081; ssl_session_cache builtin; ssl_password_file password; } server { - listen 127.0.0.1:%%PORT_2%% ssl; - proxy_pass 127.0.0.1:%%PORT_1%%; + listen 127.0.0.1:8082 ssl; + proxy_pass 127.0.0.1:8081; ssl_session_cache off; ssl_password_file password_many; } server { - listen 127.0.0.1:%%PORT_3%% ssl; - proxy_pass 127.0.0.1:%%PORT_1%%; + listen 127.0.0.1:8083 ssl; + proxy_pass 127.0.0.1:8081; ssl_session_cache builtin:1000; ssl_password_file password_fifo; } server { - listen 127.0.0.1:%%PORT_4%% ssl; - proxy_pass 127.0.0.1:%%PORT_1%%; + listen 127.0.0.1:8084 ssl; + proxy_pass 127.0.0.1:8081; ssl_session_cache shared:SSL:1m; ssl_certificate_key inherits.key; @@ -123,48 +123,48 @@ fork() || exec("echo localhost > $d/pass $t->run_daemon(\&http_daemon); $t->run(); -$t->waitforsocket('127.0.0.1:' . port(1)); +$t->waitforsocket('127.0.0.1:' . port(8081)); ############################################################################### my ($s, $ssl, $ses); -($s, $ssl) = get_ssl_socket(port(0)); +($s, $ssl) = get_ssl_socket(port(8080)); Net::SSLeay::write($ssl, "GET / HTTP/1.0$CRLF$CRLF"); like(Net::SSLeay::read($ssl), qr/200 OK/, 'ssl'); # ssl_session_cache -($s, $ssl) = get_ssl_socket(port(0)); +($s, $ssl) = get_ssl_socket(port(8080)); $ses = Net::SSLeay::get_session($ssl); -($s, $ssl) = get_ssl_socket(port(0), $ses); +($s, $ssl) = get_ssl_socket(port(8080), $ses); is(Net::SSLeay::session_reused($ssl), 1, 'builtin session reused'); -($s, $ssl) = get_ssl_socket(port(2)); +($s, $ssl) = get_ssl_socket(port(8082)); $ses = Net::SSLeay::get_session($ssl); -($s, $ssl) = get_ssl_socket(port(2), $ses); +($s, $ssl) = get_ssl_socket(port(8082), $ses); isnt(Net::SSLeay::session_reused($ssl), 1, 'session not reused'); -($s, $ssl) = get_ssl_socket(port(3)); +($s, $ssl) = get_ssl_socket(port(8083)); $ses = Net::SSLeay::get_session($ssl); -($s, $ssl) = get_ssl_socket(port(3), $ses); +($s, $ssl) = get_ssl_socket(port(8083), $ses); is(Net::SSLeay::session_reused($ssl), 1, 'builtin size session reused'); -($s, $ssl) = get_ssl_socket(port(4)); +($s, $ssl) = get_ssl_socket(port(8084)); $ses = Net::SSLeay::get_session($ssl); -($s, $ssl) = get_ssl_socket(port(4), $ses); +($s, $ssl) = get_ssl_socket(port(8084), $ses); is(Net::SSLeay::session_reused($ssl), 1, 'shared session reused'); # ssl_certificate inheritance -($s, $ssl) = get_ssl_socket(port(0)); +($s, $ssl) = get_ssl_socket(port(8080)); like(Net::SSLeay::dump_peer_certificate($ssl), qr/CN=localhost/, 'CN'); -($s, $ssl) = get_ssl_socket(port(4)); +($s, $ssl) = get_ssl_socket(port(8084)); like(Net::SSLeay::dump_peer_certificate($ssl), qr/CN=inherits/, 'CN inner'); ############################################################################### @@ -191,7 +191,7 @@ sub get_ssl_socket { sub http_daemon { my $server = IO::Socket::INET->new( Proto => 'tcp', - LocalHost => '127.0.0.1:' . port(1), + LocalHost => '127.0.0.1:' . port(8081), Listen => 5, Reuse => 1 )