Mercurial > hg > nginx-tests

comparison h2.t @ 728:61800918f647

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: added HTTP/2 tests with invalid connection preface.
author Sergey Kandaurov <pluknet@nginx.com>
date Thu, 01 Oct 2015 17:43:54 +0300
parents 3e034902ebe7
children 41caaaff9b95
comparison
equal deleted inserted replaced
727:3e034902ebe7 728:61800918f647
30 eval { IO::Socket::SSL::SSL_VERIFY_NONE(); }; 30 eval { IO::Socket::SSL::SSL_VERIFY_NONE(); };
31 plan(skip_all => 'IO::Socket::SSL too old') if $@; 31 plan(skip_all => 'IO::Socket::SSL too old') if $@;
32 32
33 my $t = Test::Nginx->new()->has(qw/http http_ssl http_v2 proxy cache/) 33 my $t = Test::Nginx->new()->has(qw/http http_ssl http_v2 proxy cache/)
34 ->has(qw/limit_conn rewrite realip shmem/) 34 ->has(qw/limit_conn rewrite realip shmem/)
35 ->has_daemon('openssl')->plan(212); 35 ->has_daemon('openssl')->plan(216);
36 36
37 # FreeBSD has a bug in not treating zero iovcnt as EINVAL 37 # FreeBSD has a bug in not treating zero iovcnt as EINVAL
38 38
39 $t->todo_alerts() unless $^O eq 'freebsd'; 39 $t->todo_alerts() unless $^O eq 'freebsd';
40 40
1905 is($frame->{headers}->{':status'}, 200, 'http2_max_concurrent_streams 3'); 1905 is($frame->{headers}->{':status'}, 200, 'http2_max_concurrent_streams 3');
1906 1906
1907 1907
1908 # some invalid cases below 1908 # some invalid cases below
1909 1909
1910 # invalid connection preface
1911
1912 $sess = new_session(8080, preface => 'bogus preface');
1913 $sid = new_stream($sess, { path => '/pp' });
1914 $frames = h2_read($sess, all => [{ sid => $sid, fin => 1 }]);
1915
1916 ($frame) = grep { $_->{type} eq "GOAWAY" } @$frames;
1917 ok($frame, 'invalid preface - GOAWAY frame');
1918 is($frame->{code}, 1, 'invalid preface - error code');
1919
1920 $sess = new_session(8080, preface => 'PRI * HTTP/2.0' . CRLF . CRLF . 'bogus');
1921 $sid = new_stream($sess, { path => '/pp' });
1922 $frames = h2_read($sess, all => [{ sid => $sid, fin => 1 }]);
1923
1924 ($frame) = grep { $_->{type} eq "GOAWAY" } @$frames;
1925 ok($frame, 'invalid preface 2 - GOAWAY frame');
1926 is($frame->{code}, 1, 'invalid preface 2 - error code');
1927
1910 # invalid PROXY protocol string 1928 # invalid PROXY protocol string
1911 1929
1912 $sess = new_session(8082, proxy => 'bogus'); 1930 $sess = new_session(8082, proxy => 'bogus');
1913 $sid = new_stream($sess, { path => '/pp' }); 1931 $sid = new_stream($sess, { path => '/pp' });
1914 $frames = h2_read($sess, all => [{ sid => $sid, fin => 1 }]); 1932 $frames = h2_read($sess, all => [{ sid => $sid, fin => 1 }]);
2356 } 2374 }
2357 } 2375 }
2358 2376
2359 sub new_session { 2377 sub new_session {
2360 my ($port, %extra) = @_; 2378 my ($port, %extra) = @_;
2361 my ($s); 2379
2362 2380 my $s = new_socket($port, %extra);
2363 $s = new_socket($port, %extra); 2381 my $preface = $extra{preface}
2382 || 'PRI * HTTP/2.0' . CRLF . CRLF . 'SM' . CRLF . CRLF;
2364 2383
2365 if ($extra{proxy}) { 2384 if ($extra{proxy}) {
2366 raw_write($s, $extra{proxy}); 2385 raw_write($s, $extra{proxy});
2367 } 2386 }
2368 2387
2369 # preface 2388 # preface
2370 2389
2371 raw_write($s, 'PRI * HTTP/2.0' . CRLF . CRLF . 'SM' . CRLF . CRLF); 2390 raw_write($s, $preface);
2372 2391
2373 return { socket => $s, last_stream => -1, 2392 return { socket => $s, last_stream => -1,
2374 dynamic_encode => [ static_table() ], 2393 dynamic_encode => [ static_table() ],
2375 dynamic_decode => [ static_table() ], 2394 dynamic_decode => [ static_table() ],
2376 static_table_size => scalar @{[static_table()]} }; 2395 static_table_size => scalar @{[static_table()]} };