nginx-tests: h2_priority.t annotate

annotate h2_priority.t @ 876:a6abbfed42c0

Tests: split HTTP/2 tests, HTTP2 package introduced.

author	Andrey Zelenkov <zelenkov@nginx.com>
date	Wed, 23 Mar 2016 17:23:08 +0300
parents
children	4dc302d8e04f

rev	line source
876 a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	1 #!/usr/bin/perl
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	2
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	3 # (C) Sergey Kandaurov
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	4 # (C) Nginx, Inc.
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	5
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	6 # Tests for HTTP/2 protocol with priority.
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	7
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	8 ###############################################################################
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	9
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	10 use warnings;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	11 use strict;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	12
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	13 use Test::More;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	14
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	15 BEGIN { use FindBin; chdir($FindBin::Bin); }
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	16
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	17 use lib 'lib';
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	18 use Test::Nginx;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	19 use Test::Nginx::HTTP2 qw/ :DEFAULT :frame /;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	20
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	21 ###############################################################################
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	22
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	23 select STDERR; $\| = 1;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	24 select STDOUT; $\| = 1;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	25
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	26 my $t = Test::Nginx->new()->has(qw/http http_v2/)->plan(20)
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	27 ->write_file_expand('nginx.conf', <<'EOF');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	28
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	29 %%TEST_GLOBALS%%
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	30
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	31 daemon off;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	32
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	33 events {
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	34 }
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	35
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	36 http {
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	37 %%TEST_GLOBALS_HTTP%%
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	38
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	39 server {
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	40 listen 127.0.0.1:8080 http2;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	41 server_name localhost;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	42 }
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	43 }
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	44
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	45 EOF
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	46
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	47 $t->run();
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	48
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	49 # file size is slightly beyond initial window size: 2**16 + 80 bytes
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	50
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	51 $t->write_file('t1.html',
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	52 join('', map { sprintf "X%04dXXX", $_ } (1 .. 8202)));
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	53
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	54 $t->write_file('t2.html', 'SEE-THIS');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	55
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	56 ###############################################################################
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	57
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	58 # stream muliplexing + PRIORITY frames
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	59
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	60 my $sess = new_session();
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	61 my $sid = new_stream($sess, { path => '/t1.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	62 h2_read($sess, all => [{ sid => $sid, length => 2**16 - 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	63
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	64 my $sid2 = new_stream($sess, { path => '/t2.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	65 h2_read($sess, all => [{ sid => $sid2, fin => 0x4 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	66
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	67 h2_priority($sess, 0, $sid);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	68 h2_priority($sess, 255, $sid2);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	69
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	70 h2_window($sess, 2**17, $sid);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	71 h2_window($sess, 2**17, $sid2);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	72 h2_window($sess, 2**17);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	73
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	74 my $frames = h2_read($sess, all => [
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	75 { sid => $sid, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	76 { sid => $sid2, fin => 1 }
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	77 ]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	78
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	79 my @data = grep { $_->{type} eq "DATA" } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	80 is(join(' ', map { $_->{sid} } @data), "$sid2 $sid", 'weight - PRIORITY 1');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	81
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	82 # and vice versa
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	83
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	84 $sess = new_session();
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	85 $sid = new_stream($sess, { path => '/t1.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	86 h2_read($sess, all => [{ sid => $sid, length => 2**16 - 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	87
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	88 $sid2 = new_stream($sess, { path => '/t2.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	89 h2_read($sess, all => [{ sid => $sid2, fin => 0x4 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	90
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	91 h2_priority($sess, 255, $sid);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	92 h2_priority($sess, 0, $sid2);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	93
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	94 h2_window($sess, 2**17, $sid);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	95 h2_window($sess, 2**17, $sid2);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	96 h2_window($sess, 2**17);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	97
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	98 $frames = h2_read($sess, all => [
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	99 { sid => $sid, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	100 { sid => $sid2, fin => 1 }
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	101 ]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	102
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	103 @data = grep { $_->{type} eq "DATA" } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	104 is(join(' ', map { $_->{sid} } @data), "$sid $sid2", 'weight - PRIORITY 2');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	105
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	106 # stream muliplexing + HEADERS PRIORITY flag
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	107
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	108 $sess = new_session();
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	109 $sid = new_stream($sess, { path => '/t1.html', prio => 0 });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	110 h2_read($sess, all => [{ sid => $sid, length => 2**16 - 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	111
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	112 $sid2 = new_stream($sess, { path => '/t2.html', prio => 255 });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	113 h2_read($sess, all => [{ sid => $sid2, fin => 0x4 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	114
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	115 h2_window($sess, 2**17, $sid);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	116 h2_window($sess, 2**17, $sid2);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	117 h2_window($sess, 2**17);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	118
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	119 $frames = h2_read($sess, all => [
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	120 { sid => $sid, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	121 { sid => $sid2, fin => 1 }
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	122 ]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	123
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	124 @data = grep { $_->{type} eq "DATA" } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	125 my $sids = join ' ', map { $_->{sid} } @data;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	126 is($sids, "$sid2 $sid", 'weight - HEADERS PRIORITY 1');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	127
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	128 # and vice versa
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	129
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	130 $sess = new_session();
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	131 $sid = new_stream($sess, { path => '/t1.html', prio => 255 });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	132 h2_read($sess, all => [{ sid => $sid, length => 2**16 - 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	133
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	134 $sid2 = new_stream($sess, { path => '/t2.html', prio => 0 });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	135 h2_read($sess, all => [{ sid => $sid2, fin => 0x4 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	136
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	137 h2_window($sess, 2**17, $sid);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	138 h2_window($sess, 2**17, $sid2);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	139 h2_window($sess, 2**17);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	140
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	141 $frames = h2_read($sess, all => [
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	142 { sid => $sid, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	143 { sid => $sid2, fin => 1 }
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	144 ]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	145
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	146 @data = grep { $_->{type} eq "DATA" } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	147 $sids = join ' ', map { $_->{sid} } @data;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	148 is($sids, "$sid $sid2", 'weight - HEADERS PRIORITY 2');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	149
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	150 # 5.3.1. Stream Dependencies
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	151
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	152 # PRIORITY frame
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	153
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	154 $sess = new_session();
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	155
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	156 h2_priority($sess, 16, 3, 0);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	157 h2_priority($sess, 16, 1, 3);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	158
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	159 $sid = new_stream($sess, { path => '/t1.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	160 h2_read($sess, all => [{ sid => $sid, length => 2**16 - 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	161
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	162 $sid2 = new_stream($sess, { path => '/t2.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	163 h2_read($sess, all => [{ sid => $sid2, fin => 0x4 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	164
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	165 h2_window($sess, 2**17, $sid);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	166 h2_window($sess, 2**17, $sid2);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	167 h2_window($sess, 2**17);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	168
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	169 $frames = h2_read($sess, all => [
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	170 { sid => $sid, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	171 { sid => $sid2, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	172 ]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	173
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	174 @data = grep { $_->{type} eq "DATA" } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	175 $sids = join ' ', map { $_->{sid} } @data;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	176 is($sids, "$sid2 $sid", 'dependency - PRIORITY 1');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	177
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	178 # and vice versa
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	179
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	180 $sess = new_session();
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	181
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	182 h2_priority($sess, 16, 1, 0);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	183 h2_priority($sess, 16, 3, 1);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	184
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	185 $sid = new_stream($sess, { path => '/t1.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	186 h2_read($sess, all => [{ sid => $sid, length => 2**16 - 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	187
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	188 $sid2 = new_stream($sess, { path => '/t2.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	189 h2_read($sess, all => [{ sid => $sid2, fin => 0x4 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	190
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	191 h2_window($sess, 2**17, $sid);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	192 h2_window($sess, 2**17, $sid2);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	193 h2_window($sess, 2**17);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	194
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	195 $frames = h2_read($sess, all => [
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	196 { sid => $sid, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	197 { sid => $sid2, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	198 ]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	199
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	200 @data = grep { $_->{type} eq "DATA" } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	201 $sids = join ' ', map { $_->{sid} } @data;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	202 is($sids, "$sid $sid2", 'dependency - PRIORITY 2');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	203
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	204 # PRIORITY - self dependency
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	205
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	206 # 5.3.1. Stream Dependencies
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	207 # A stream cannot depend on itself. An endpoint MUST treat this as a
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	208 # stream error of type PROTOCOL_ERROR.
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	209
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	210 $sess = new_session();
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	211 $sid = new_stream($sess);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	212 h2_read($sess, all => [{ sid => $sid, fin => 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	213
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	214 h2_priority($sess, 0, $sid, $sid);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	215 $frames = h2_read($sess, all => [{ type => 'RST_STREAM' }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	216
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	217 my ($frame) = grep { $_->{type} eq "RST_STREAM" } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	218 is($frame->{sid}, $sid, 'dependency - PRIORITY self - RST_STREAM');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	219 is($frame->{code}, 1, 'dependency - PRIORITY self - PROTOCOL_ERROR');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	220
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	221 # HEADERS PRIORITY flag, reprioritize prior PRIORITY frame records
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	222
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	223 $sess = new_session();
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	224
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	225 h2_priority($sess, 16, 1, 0);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	226 h2_priority($sess, 16, 3, 0);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	227
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	228 $sid = new_stream($sess, { path => '/t1.html', dep => 3 });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	229 h2_read($sess, all => [{ sid => $sid, length => 2**16 - 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	230
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	231 $sid2 = new_stream($sess, { path => '/t2.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	232 h2_read($sess, all => [{ sid => $sid2, fin => 0x4 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	233
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	234 h2_window($sess, 2**17, $sid);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	235 h2_window($sess, 2**17, $sid2);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	236 h2_window($sess, 2**17);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	237
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	238 $frames = h2_read($sess, all => [
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	239 { sid => $sid, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	240 { sid => $sid2, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	241 ]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	242
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	243 @data = grep { $_->{type} eq "DATA" } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	244 $sids = join ' ', map { $_->{sid} } @data;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	245 is($sids, "$sid2 $sid", 'dependency - HEADERS PRIORITY 1');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	246
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	247 # and vice versa
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	248
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	249 $sess = new_session();
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	250
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	251 h2_priority($sess, 16, 1, 0);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	252 h2_priority($sess, 16, 3, 0);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	253
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	254 $sid = new_stream($sess, { path => '/t1.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	255 h2_read($sess, all => [{ sid => $sid, length => 2**16 - 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	256
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	257 $sid2 = new_stream($sess, { path => '/t2.html', dep => 1 });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	258 h2_read($sess, all => [{ sid => $sid2, fin => 0x4 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	259
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	260 h2_window($sess, 2**17, $sid);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	261 h2_window($sess, 2**17, $sid2);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	262 h2_window($sess, 2**17);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	263
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	264 $frames = h2_read($sess, all => [
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	265 { sid => $sid, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	266 { sid => $sid2, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	267 ]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	268
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	269 @data = grep { $_->{type} eq "DATA" } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	270 $sids = join ' ', map { $_->{sid} } @data;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	271 is($sids, "$sid $sid2", 'dependency - HEADERS PRIORITY 2');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	272
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	273 # HEADERS - self dependency
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	274
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	275 $sess = new_session();
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	276 $sid = new_stream($sess, { dep => 1 });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	277 $frames = h2_read($sess, all => [{ type => 'RST_STREAM' }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	278
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	279 ($frame) = grep { $_->{type} eq "RST_STREAM" } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	280 is($frame->{sid}, $sid, 'dependency - HEADERS self - RST_STREAM');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	281 is($frame->{code}, 1, 'dependency - HEADERS self - PROTOCOL_ERROR');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	282
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	283 # PRIORITY frame, weighted dependencies
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	284
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	285 $sess = new_session();
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	286
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	287 h2_priority($sess, 16, 5, 0);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	288 h2_priority($sess, 255, 1, 5);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	289 h2_priority($sess, 0, 3, 5);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	290
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	291 $sid = new_stream($sess, { path => '/t1.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	292 h2_read($sess, all => [{ sid => $sid, length => 2**16 - 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	293
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	294 $sid2 = new_stream($sess, { path => '/t2.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	295 h2_read($sess, all => [{ sid => $sid2, fin => 0x4 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	296
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	297 my $sid3 = new_stream($sess, { path => '/t2.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	298 h2_read($sess, all => [{ sid => $sid3, fin => 0x4 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	299
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	300 h2_window($sess, 2**16, 1);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	301 h2_window($sess, 2**16, 3);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	302 h2_window($sess, 2**16, 5);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	303 h2_window($sess, 2**16);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	304
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	305 $frames = h2_read($sess, all => [
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	306 { sid => $sid, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	307 { sid => $sid2, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	308 { sid => $sid3, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	309 ]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	310
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	311 @data = grep { $_->{type} eq "DATA" } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	312 $sids = join ' ', map { $_->{sid} } @data;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	313 is($sids, "$sid3 $sid $sid2", 'weighted dependency - PRIORITY 1');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	314
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	315 # and vice versa
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	316
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	317 $sess = new_session();
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	318
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	319 h2_priority($sess, 16, 5, 0);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	320 h2_priority($sess, 0, 1, 5);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	321 h2_priority($sess, 255, 3, 5);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	322
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	323 $sid = new_stream($sess, { path => '/t1.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	324 h2_read($sess, all => [{ sid => $sid, length => 2**16 - 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	325
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	326 $sid2 = new_stream($sess, { path => '/t2.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	327 h2_read($sess, all => [{ sid => $sid2, fin => 0x4 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	328
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	329 $sid3 = new_stream($sess, { path => '/t2.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	330 h2_read($sess, all => [{ sid => $sid3, fin => 0x4 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	331
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	332 h2_window($sess, 2**16, 1);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	333 h2_window($sess, 2**16, 3);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	334 h2_window($sess, 2**16, 5);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	335 h2_window($sess, 2**16);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	336
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	337 $frames = h2_read($sess, all => [
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	338 { sid => $sid, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	339 { sid => $sid2, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	340 { sid => $sid3, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	341 ]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	342
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	343 @data = grep { $_->{type} eq "DATA" } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	344 $sids = join ' ', map { $_->{sid} } @data;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	345 is($sids, "$sid3 $sid2 $sid", 'weighted dependency - PRIORITY 2');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	346
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	347 # PRIORITY - reprioritization with circular dependency - after [3] removed
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	348 # initial dependency tree:
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	349 # 1 <- [3] <- 5
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	350
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	351 $sess = new_session();
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	352
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	353 h2_window($sess, 2**18);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	354
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	355 h2_priority($sess, 16, 1, 0);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	356 h2_priority($sess, 16, 3, 1);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	357 h2_priority($sess, 16, 5, 3);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	358
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	359 $sid = new_stream($sess, { path => '/t1.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	360 h2_read($sess, all => [{ sid => $sid, length => 2**16 - 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	361
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	362 $sid2 = new_stream($sess, { path => '/t1.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	363 h2_read($sess, all => [{ sid => $sid2, length => 2**16 - 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	364
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	365 $sid3 = new_stream($sess, { path => '/t1.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	366 h2_read($sess, all => [{ sid => $sid3, length => 2**16 - 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	367
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	368 h2_window($sess, 2**16, $sid2);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	369
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	370 $frames = h2_read($sess, all => [{ sid => $sid2, fin => 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	371 $sids = join ' ', map { $_->{sid} } grep { $_->{type} eq "DATA" } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	372 is($sids, $sid2, 'removed dependency');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	373
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	374 for (1 .. 40) {
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	375 h2_read($sess, all => [{ sid => new_stream($sess), fin => 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	376 }
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	377
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	378 # make circular dependency
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	379 # 1 <- 5 -- current dependency tree before reprioritization
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	380 # 5 <- 1
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	381 # 1 <- 5
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	382
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	383 h2_priority($sess, 16, 1, 5);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	384 h2_priority($sess, 16, 5, 1);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	385
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	386 h2_window($sess, 2**16, $sid);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	387 h2_window($sess, 2**16, $sid3);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	388
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	389 $frames = h2_read($sess, all => [
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	390 { sid => $sid, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	391 { sid => $sid3, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	392 ]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	393
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	394 ($frame) = grep { $_->{type} eq "DATA" && $_->{sid} == $sid } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	395 is($frame->{length}, 81, 'removed dependency - first stream');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	396
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	397 ($frame) = grep { $_->{type} eq "DATA" && $_->{sid} == $sid3 } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	398 is($frame->{length}, 81, 'removed dependency - last stream');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	399
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	400 # PRIORITY - reprioritization with circular dependency - exclusive [5]
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	401 # 1 <- [5] <- 3
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	402
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	403 $sess = new_session();
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	404
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	405 h2_window($sess, 2**18);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	406
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	407 h2_priority($sess, 16, 1, 0);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	408 h2_priority($sess, 16, 3, 1);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	409 h2_priority($sess, 16, 5, 1, excl => 1);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	410
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	411 $sid = new_stream($sess, { path => '/t1.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	412 h2_read($sess, all => [{ sid => $sid, length => 2**16 - 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	413
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	414 $sid2 = new_stream($sess, { path => '/t1.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	415 h2_read($sess, all => [{ sid => $sid2, length => 2**16 - 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	416
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	417 $sid3 = new_stream($sess, { path => '/t1.html' });
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	418 h2_read($sess, all => [{ sid => $sid3, length => 2**16 - 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	419
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	420 h2_window($sess, 2**16, $sid);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	421
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	422 $frames = h2_read($sess, all => [{ sid => $sid, fin => 1 }]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	423 $sids = join ' ', map { $_->{sid} } grep { $_->{type} eq "DATA" } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	424 is($sids, $sid, 'exclusive dependency - parent removed');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	425
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	426 # make circular dependency
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	427 # 5 <- 3 -- current dependency tree before reprioritization
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	428 # 3 <- 5
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	429
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	430 h2_priority($sess, 16, 5, 3);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	431
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	432 h2_window($sess, 2**16, $sid2);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	433 h2_window($sess, 2**16, $sid3);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	434
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	435 $frames = h2_read($sess, all => [
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	436 { sid => $sid2, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	437 { sid => $sid3, fin => 1 },
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	438 ]);
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	439
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	440 ($frame) = grep { $_->{type} eq "DATA" && $_->{sid} == $sid2 } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	441 is($frame->{length}, 81, 'exclusive dependency - first stream');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	442
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	443 ($frame) = grep { $_->{type} eq "DATA" && $_->{sid} == $sid3 } @$frames;
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	444 is($frame->{length}, 81, 'exclusive dependency - last stream');
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	445
a6abbfed42c0 Tests: split HTTP/2 tests, HTTP2 package introduced. Andrey Zelenkov <zelenkov@nginx.com> parents: diff changeset	446 ###############################################################################

Mercurial > hg > nginx-tests

annotate h2_priority.t @ 876:a6abbfed42c0