Mercurial > hg > nginx-tests

comparison h2_ssl.t @ 1038:a034903de974

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: use port numbers from 8xxx pool.
author Sergey Kandaurov <pluknet@nginx.com>
date Tue, 20 Sep 2016 13:08:53 +0300
parents 45c80276d691
children efccab043dd3
comparison
equal deleted inserted replaced
1037:92479d9429ff 1038:a034903de974
79 79
80 open OLDERR, ">&", \*STDERR; close STDERR; 80 open OLDERR, ">&", \*STDERR; close STDERR;
81 $t->run(); 81 $t->run();
82 open STDERR, ">&", \*OLDERR; 82 open STDERR, ">&", \*OLDERR;
83 83
84 plan(skip_all => 'no ALPN/NPN negotiation') unless defined getconn(port(0)); 84 plan(skip_all => 'no ALPN/NPN negotiation') unless defined getconn(port(8080));
85 $t->plan(1); 85 $t->plan(1);
86 86
87 ############################################################################### 87 ###############################################################################
88 88
89 # client cancels 2nd stream after HEADERS has been created 89 # client cancels 2nd stream after HEADERS has been created
90 # while some unsent data was left in the SSL buffer 90 # while some unsent data was left in the SSL buffer
91 # HEADERS frame may stuck in SSL buffer and won't be sent producing alert 91 # HEADERS frame may stuck in SSL buffer and won't be sent producing alert
92 92
93 my $s = getconn(port(0)); 93 my $s = getconn(port(8080));
94 ok($s, 'ssl connection'); 94 ok($s, 'ssl connection');
95 95
96 my $sid = $s->new_stream({ path => '/tbig.html' }); 96 my $sid = $s->new_stream({ path => '/tbig.html' });
97 97
98 select undef, undef, undef, 0.2; 98 select undef, undef, undef, 0.2;