Mercurial > hg > nginx-tests

comparison stream_ssl_variables.t @ 974:882267679006

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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 eb111c5f7556
children 43eedbfea090
comparison
equal deleted inserted replaced
973:7d7aef8b9f3a 974:882267679006
55 stream { 55 stream {
56 ssl_certificate_key localhost.key; 56 ssl_certificate_key localhost.key;
57 ssl_certificate localhost.crt; 57 ssl_certificate localhost.crt;
58 58
59 server { 59 server {
60 listen 127.0.0.1:%%PORT_0%%; 60 listen 127.0.0.1:8080;
61 listen 127.0.0.1:%%PORT_1%% ssl; 61 listen 127.0.0.1:8081 ssl;
62 return $ssl_session_reused:$ssl_session_id:$ssl_cipher:$ssl_protocol; 62 return $ssl_session_reused:$ssl_session_id:$ssl_cipher:$ssl_protocol;
63 63
64 ssl_session_cache builtin; 64 ssl_session_cache builtin;
65 } 65 }
66 66
67 server { 67 server {
68 listen 127.0.0.1:%%PORT_2%% ssl; 68 listen 127.0.0.1:8082 ssl;
69 return $ssl_server_name; 69 return $ssl_server_name;
70 } 70 }
71 } 71 }
72 72
73 EOF 73 EOF
96 96
97 my ($s, $ssl); 97 my ($s, $ssl);
98 98
99 is(stream()->read(), ':::', 'no ssl'); 99 is(stream()->read(), ':::', 'no ssl');
100 100
101 ($s, $ssl) = get_ssl_socket(port(1)); 101 ($s, $ssl) = get_ssl_socket(port(8081));
102 like(Net::SSLeay::read($ssl), qr/^\.:(\w{64})?:[\w-]+:(TLS|SSL)v(\d|\.)+$/, 102 like(Net::SSLeay::read($ssl), qr/^\.:(\w{64})?:[\w-]+:(TLS|SSL)v(\d|\.)+$/,
103 'ssl variables'); 103 'ssl variables');
104 104
105 my $ses = Net::SSLeay::get_session($ssl); 105 my $ses = Net::SSLeay::get_session($ssl);
106 ($s, $ssl) = get_ssl_socket(port(1), $ses); 106 ($s, $ssl) = get_ssl_socket(port(8081), $ses);
107 like(Net::SSLeay::read($ssl), qr/^r:\w{64}:[\w-]+:(TLS|SSL)v(\d|\.)+$/, 107 like(Net::SSLeay::read($ssl), qr/^r:\w{64}:[\w-]+:(TLS|SSL)v(\d|\.)+$/,
108 'ssl variables - session reused'); 108 'ssl variables - session reused');
109 109
110 ($s, $ssl) = get_ssl_socket(port(2), undef, 'example.com'); 110 ($s, $ssl) = get_ssl_socket(port(8082), undef, 'example.com');
111 is(Net::SSLeay::ssl_read_all($ssl), 'example.com', 'ssl server name'); 111 is(Net::SSLeay::ssl_read_all($ssl), 'example.com', 'ssl server name');
112 112
113 ($s, $ssl) = get_ssl_socket(port(2)); 113 ($s, $ssl) = get_ssl_socket(port(8082));
114 is(Net::SSLeay::ssl_read_all($ssl), '', 'ssl server name empty'); 114 is(Net::SSLeay::ssl_read_all($ssl), '', 'ssl server name empty');
115 115
116 ############################################################################### 116 ###############################################################################
117 117
118 sub get_ssl_socket { 118 sub get_ssl_socket {