Mercurial > hg > nginx-tests
changeset 1458:e95133e85798
Tests: unbreak stream_ssl_realip.t with TLS 1.3.
author | Sergey Kandaurov <pluknet@nginx.com> |
---|---|
date | Tue, 02 Apr 2019 13:21:47 +0300 |
parents | 80911c4fe023 |
children | 2710e9505937 |
files | stream_ssl_realip.t |
diffstat | 1 files changed, 5 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/stream_ssl_realip.t Wed Mar 27 15:10:50 2019 +0300 +++ b/stream_ssl_realip.t Tue Apr 02 13:21:47 2019 +0300 @@ -17,8 +17,7 @@ BEGIN { use FindBin; chdir($FindBin::Bin); } use lib 'lib'; -use Test::Nginx; -use Test::Nginx::Stream qw/ stream /; +use Test::Nginx qw/ :DEFAULT http_end /; ############################################################################### @@ -128,14 +127,14 @@ sub pp_get { my ($port, $proxy) = @_; - my $s = stream(PeerPort => port($port)); - $s->write($proxy); + my $s = IO::Socket::INET->new('127.0.0.1:' . port($port)) or return; + http($proxy, start => 1, socket => $s); eval { local $SIG{ALRM} = sub { die "timeout\n" }; local $SIG{PIPE} = sub { die "sigpipe\n" }; alarm(8); - IO::Socket::SSL->start_SSL($s->{_socket}, + IO::Socket::SSL->start_SSL($s, SSL_verify_mode => IO::Socket::SSL::SSL_VERIFY_NONE(), SSL_error_trap => sub { die $_[1] } ); @@ -148,7 +147,7 @@ return undef; } - return $s->read(); + http_end($s); } ###############################################################################