Mercurial > hg > nginx-tests
annotate grpc.t @ 1390:2c0955286894
Tests: unbreak grpc.t on stable versions.
Notably, this fixes tests on Solaris.
author | Sergey Kandaurov <pluknet@nginx.com> |
---|---|
date | Tue, 06 Nov 2018 20:33:13 +0300 |
parents | 97c8280de681 |
children | 01d806268a12 |
rev | line source |
---|---|
1303 | 1 #!/usr/bin/perl |
2 | |
3 # (C) Sergey Kandaurov | |
4 # (C) Nginx, Inc. | |
5 | |
6 # Tests for grpc backend. | |
7 | |
8 ############################################################################### | |
9 | |
10 use warnings; | |
11 use strict; | |
12 | |
13 use Test::More; | |
14 | |
15 BEGIN { use FindBin; chdir($FindBin::Bin); } | |
16 | |
17 use lib 'lib'; | |
18 use Test::Nginx; | |
19 use Test::Nginx::HTTP2; | |
20 | |
21 ############################################################################### | |
22 | |
23 select STDERR; $| = 1; | |
24 select STDOUT; $| = 1; | |
25 | |
1312
6f95c0ed2335
Tests: removed proxy prerequisite from grpc tests.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1303
diff
changeset
|
26 my $t = Test::Nginx->new()->has(qw/http rewrite http_v2 grpc/) |
1381
97c8280de681
Tests: removed TODO and try_run() checks for legacy versions.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1370
diff
changeset
|
27 ->has(qw/upstream_keepalive/)->plan(105); |
1303 | 28 |
29 $t->write_file_expand('nginx.conf', <<'EOF'); | |
30 | |
31 %%TEST_GLOBALS%% | |
32 | |
33 daemon off; | |
34 | |
35 events { | |
36 } | |
37 | |
38 http { | |
39 %%TEST_GLOBALS_HTTP%% | |
40 | |
41 upstream u { | |
42 server 127.0.0.1:8081; | |
43 keepalive 1; | |
44 } | |
45 | |
46 server { | |
47 listen 127.0.0.1:8080 http2; | |
48 server_name localhost; | |
49 | |
50 http2_max_field_size 128k; | |
51 http2_max_header_size 128k; | |
52 http2_body_preread_size 128k; | |
53 | |
54 location / { | |
55 grpc_pass grpc://127.0.0.1:8081; | |
56 | |
57 if ($arg_if) { | |
58 # nothing | |
59 } | |
60 | |
61 limit_except GET { | |
62 # nothing | |
63 } | |
64 } | |
65 | |
66 location /KeepAlive { | |
67 grpc_pass u; | |
68 } | |
69 | |
70 location /LongHeader { | |
71 grpc_pass 127.0.0.1:8081; | |
72 grpc_set_header X-LongHeader $arg_h; | |
73 } | |
74 | |
75 location /LongField { | |
76 grpc_pass 127.0.0.1:8081; | |
77 grpc_buffer_size 65k; | |
78 } | |
79 | |
80 location /SetHost { | |
81 grpc_pass 127.0.0.1:8081; | |
82 grpc_set_header Host custom; | |
83 } | |
84 | |
85 location /SetArgs { | |
86 grpc_pass 127.0.0.1:8081; | |
87 set $args $arg_c; | |
88 } | |
89 } | |
90 } | |
91 | |
92 EOF | |
93 | |
1381
97c8280de681
Tests: removed TODO and try_run() checks for legacy versions.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1370
diff
changeset
|
94 $t->run(); |
1303 | 95 |
96 ############################################################################### | |
97 | |
98 my $p = port(8081); | |
99 my $f = grpc(); | |
100 | |
101 my $frames = $f->{http_start}('/SayHello'); | |
102 my ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
103 is($frame->{flags}, 4, 'request - HEADERS flags'); | |
104 ok((my $sid = $frame->{sid}) % 2, 'request - HEADERS sid odd'); | |
105 is($frame->{headers}{':method'}, 'POST', 'request - method'); | |
106 is($frame->{headers}{':scheme'}, 'http', 'request - scheme'); | |
107 is($frame->{headers}{':path'}, '/SayHello', 'request - path'); | |
108 is($frame->{headers}{':authority'}, "127.0.0.1:$p", 'request - authority'); | |
109 is($frame->{headers}{'content-type'}, 'application/grpc', | |
110 'request - content type'); | |
111 is($frame->{headers}{te}, 'trailers', 'request - te'); | |
112 | |
113 $frames = $f->{data}('Hello'); | |
114 ($frame) = grep { $_->{type} eq "SETTINGS" } @$frames; | |
115 is($frame->{flags}, 1, 'request - SETTINGS ack'); | |
116 is($frame->{sid}, 0, 'request - SETTINGS sid'); | |
117 is($frame->{length}, 0, 'request - SETTINGS length'); | |
118 | |
119 ($frame) = grep { $_->{type} eq "DATA" } @$frames; | |
120 is($frame->{data}, 'Hello', 'request - DATA'); | |
121 is($frame->{length}, 5, 'request - DATA length'); | |
122 is($frame->{flags}, 1, 'request - DATA flags'); | |
123 is($frame->{sid}, $sid, 'request - DATA sid match'); | |
124 | |
125 $frames = $f->{http_end}(); | |
126 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
127 is($frame->{flags}, 4, 'response - HEADERS flags'); | |
128 is($frame->{sid}, 1, 'response - HEADERS sid'); | |
129 is($frame->{headers}{':status'}, '200', 'response - status'); | |
130 is($frame->{headers}{'content-type'}, 'application/grpc', | |
131 'response - content type'); | |
132 ok($frame->{headers}{server}, 'response - server'); | |
133 ok($frame->{headers}{date}, 'response - date'); | |
134 ok(my $c = $frame->{headers}{'x-connection'}, 'response - connection'); | |
135 | |
136 ($frame) = grep { $_->{type} eq "DATA" } @$frames; | |
137 is($frame->{data}, 'Hello world', 'response - DATA'); | |
138 is($frame->{length}, 11, 'response - DATA length'); | |
139 is($frame->{flags}, 0, 'response - DATA flags'); | |
140 is($frame->{sid}, 1, 'response - DATA sid'); | |
141 | |
142 (undef, $frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
143 is($frame->{flags}, 5, 'response - trailers flags'); | |
144 is($frame->{sid}, 1, 'response - trailers sid'); | |
145 is($frame->{headers}{'grpc-message'}, '', 'response - trailers message'); | |
146 is($frame->{headers}{'grpc-status'}, '0', 'response - trailers status'); | |
147 | |
148 # next request is on a new backend connection, no sid incremented | |
149 | |
150 $frames = $f->{http_start}('/SayHello'); | |
151 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
152 is($frame->{sid}, $sid, 'request 2 - HEADERS sid again'); | |
153 $f->{data}('Hello'); | |
154 $frames = $f->{http_end}(); | |
155 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
156 cmp_ok($frame->{headers}{'x-connection'}, '>', $c, 'response 2 - connection'); | |
157 | |
158 # upstream keepalive | |
159 | |
160 $frames = $f->{http_start}('/KeepAlive'); | |
161 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
162 is($frame->{sid}, $sid, 'keepalive - HEADERS sid'); | |
163 $f->{data}('Hello'); | |
164 $frames = $f->{http_end}(); | |
165 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
166 ok($c = $frame->{headers}{'x-connection'}, 'keepalive - connection'); | |
167 | |
168 $frames = $f->{http_start}('/KeepAlive', reuse => 1); | |
169 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
170 cmp_ok($frame->{sid}, '>', $sid, 'keepalive - HEADERS sid next'); | |
171 $f->{data}('Hello'); | |
172 $frames = $f->{http_end}(); | |
173 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
174 is($frame->{headers}{'x-connection'}, $c, 'keepalive - connection reuse'); | |
175 | |
1370
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
176 # upstream keepalive |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
177 # pending control frame ack after the response |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
178 |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
179 undef $f; |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
180 $f = grpc(); |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
181 |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
182 $frames = $f->{http_start}('/KeepAlive'); |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
183 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
184 is($frame->{sid}, $sid, 'keepalive 2 - HEADERS sid'); |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
185 $f->{data}('Hello'); |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
186 $f->{settings}(0, 1 => 4096); |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
187 $frames = $f->{http_end}(); |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
188 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
189 ok($c = $frame->{headers}{'x-connection'}, 'keepalive 2 - connection'); |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
190 |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
191 $frames = $f->{http_start}('/KeepAlive', reuse => 1); |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
192 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
193 |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
194 TODO: { |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
195 local $TODO = 'not yet' unless $t->has_version('1.15.4'); |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
196 |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
197 ok($frame, 'upstream keepalive reused'); |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
198 |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
199 } |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
200 |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
201 TODO: { |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
202 todo_skip 'upstream connection failed', 2 unless $frame; |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
203 |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
204 cmp_ok($frame->{sid}, '>', $sid, 'keepalive 2 - HEADERS sid next'); |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
205 $f->{data}('Hello'); |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
206 $frames = $f->{http_end}(); |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
207 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
208 is($frame->{headers}{'x-connection'}, $c, 'keepalive 2 - connection reuse'); |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
209 |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
210 } |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
211 |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
212 undef $f; |
1390
2c0955286894
Tests: unbreak grpc.t on stable versions.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1381
diff
changeset
|
213 # don't bother with a new instance until the old one is over |
2c0955286894
Tests: unbreak grpc.t on stable versions.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1381
diff
changeset
|
214 select undef, undef, undef, 0.2 unless $t->has_version('1.15.4'); |
1370
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
215 $f = grpc(); |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
216 |
1303 | 217 # various header compression formats |
218 | |
219 $f->{http_start}('/SayHello'); | |
220 $f->{data}('Hello'); | |
221 $frames = $f->{http_end}(mode => 3); | |
222 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
223 is($frame->{headers}{':status'}, '200', 'without indexing'); | |
224 is($frame->{headers}{'content-type'}, 'application/grpc', | |
225 'without indexing 2'); | |
226 | |
227 $f->{http_start}('/SayHello'); | |
228 $f->{data}('Hello'); | |
229 $frames = $f->{http_end}(mode => 4); | |
230 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
231 is($frame->{headers}{':status'}, '200', 'without indexing new'); | |
232 is($frame->{headers}{'content-type'}, 'application/grpc', | |
233 'without indexing new 2'); | |
234 | |
235 $f->{http_start}('/SayHello'); | |
236 $f->{data}('Hello'); | |
237 $frames = $f->{http_end}(mode => 5); | |
238 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
239 is($frame->{headers}{':status'}, '200', 'never indexed'); | |
240 is($frame->{headers}{'content-type'}, 'application/grpc', | |
241 'never indexed 2'); | |
242 | |
243 $f->{http_start}('/SayHello'); | |
244 $f->{data}('Hello'); | |
245 $frames = $f->{http_end}(mode => 6); | |
246 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
247 is($frame->{headers}{':status'}, '200', 'never indexed new'); | |
248 is($frame->{headers}{'content-type'}, 'application/grpc', | |
249 'never indexed new 2'); | |
250 | |
251 # padding & priority | |
252 | |
253 $f->{http_start}('/SayHello'); | |
254 $f->{data}('Hello'); | |
255 $frames = $f->{http_end}(padding => 7); | |
256 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
257 is($frame->{headers}{':status'}, '200', 'padding'); | |
258 | |
259 $f->{http_start}('/SayHello'); | |
260 $f->{data}('Hello'); | |
261 $frames = $f->{http_end}(prio => 137, dep => 0x01020304); | |
262 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
263 is($frame->{headers}{':status'}, '200', 'priority'); | |
264 | |
265 $f->{http_start}('/SayHello'); | |
266 $f->{data}('Hello'); | |
267 $frames = $f->{http_end}(padding => 7, prio => 137, dep => 0x01020304); | |
268 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
269 is($frame->{headers}{':status'}, '200', 'padding priority'); | |
270 | |
271 SKIP: { | |
272 skip 'long test', 1 unless $ENV{TEST_NGINX_UNSAFE}; | |
273 | |
274 $f->{http_start}('/SaySplit'); | |
275 $f->{data}('Hello'); | |
276 $frames = $f->{http_end}(padding => 7, prio => 137, dep => 0x01020304, | |
277 split => [(map{1}(1..20)), 30], split_delay => 0.1); | |
278 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
279 is($frame->{headers}{':status'}, '200', 'padding priority split'); | |
280 | |
281 } | |
282 | |
283 # grpc error, no empty data frame expected | |
284 | |
285 $f->{http_start}('/SayHello'); | |
286 $f->{data}('Hello'); | |
287 $frames = $f->{http_err}(); | |
288 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
289 is($frame->{flags}, 5, 'grpc error - HEADERS flags'); | |
290 ($frame) = grep { $_->{type} eq "DATA" } @$frames; | |
291 ok(!$frame, 'grpc error - no DATA frame'); | |
292 | |
293 # continuation from backend, expect parts assembled | |
294 | |
295 $f->{http_start}('/SayHello'); | |
296 $f->{data}('Hello'); | |
297 $frames = $f->{continuation}(); | |
298 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
299 is($frame->{flags}, 4, 'continuation - HEADERS flags'); | |
300 is($frame->{headers}{':status'}, '200', 'continuation - status'); | |
301 is($frame->{headers}{'content-type'}, 'application/grpc', | |
302 'continuation - content type'); | |
303 | |
304 ($frame) = grep { $_->{type} eq "DATA" } @$frames; | |
305 is($frame->{data}, 'Hello world', 'continuation - DATA'); | |
306 is($frame->{length}, 11, 'continuation - DATA length'); | |
307 is($frame->{flags}, 0, 'continuation - DATA flags'); | |
308 | |
309 (undef, $frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
310 is($frame->{flags}, 5, 'continuation - trailers flags'); | |
311 is($frame->{headers}{'grpc-message'}, '', 'continuation - trailers message'); | |
312 is($frame->{headers}{'grpc-status'}, '0', 'continuation - trailers status'); | |
313 | |
314 # continuation from backend, header split | |
315 | |
316 $f->{http_start}('/SayHello'); | |
317 $f->{data}('Hello'); | |
318 $frames = $f->{http_end}(mode => 6, continuation => [map { 1 } (1 .. 42)]); | |
319 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
320 is($frame->{headers}{':status'}, '200', 'continuation - header split'); | |
321 | |
322 # continuation to backend | |
323 | |
324 $frames = $f->{http_start}('/LongHeader?h=' . ('Z' x 31337)); | |
325 @$frames = grep { $_->{type} =~ "HEADERS|CONTINUATION" } @$frames; | |
326 is(@$frames, 4, 'continuation - frames'); | |
327 | |
328 $frame = shift @$frames; | |
329 is($frame->{type}, 'HEADERS', 'continuation - HEADERS'); | |
330 is($frame->{length}, 16384, 'continuation - HEADERS length'); | |
331 is($frame->{flags}, 1, 'continuation - HEADERS flags'); | |
332 ok($frame->{sid}, 'continuation - HEADERS sid'); | |
333 | |
334 $frame = shift @$frames; | |
335 is($frame->{type}, 'CONTINUATION', 'continuation - CONTINUATION'); | |
336 is($frame->{length}, 16384, 'continuation - CONTINUATION length'); | |
337 is($frame->{flags}, 0, 'continuation - CONTINUATION flags'); | |
338 ok($frame->{sid}, 'continuation - CONTINUATION sid'); | |
339 | |
340 $frame = shift @$frames; | |
341 is($frame->{type}, 'CONTINUATION', 'continuation - CONTINUATION 2'); | |
342 is($frame->{length}, 16384, 'continuation - CONTINUATION 2 length'); | |
343 is($frame->{flags}, 0, 'continuation - CONTINUATION 2 flags'); | |
344 | |
345 $frame = shift @$frames; | |
346 is($frame->{type}, 'CONTINUATION', 'continuation - CONTINUATION n'); | |
347 cmp_ok($frame->{length}, '<', 16384, 'continuation - CONTINUATION n length'); | |
348 is($frame->{flags}, 4, 'continuation - CONTINUATION n flags'); | |
349 is($frame->{headers}{':path'}, '/LongHeader?h=' . 'Z' x 31337, | |
350 'continuation - path'); | |
351 is($frame->{headers}{'x-longheader'}, 'Z' x 31337, 'continuation - header'); | |
352 | |
353 $f->{http_end}(); | |
354 | |
355 # long header field | |
356 | |
357 $f->{http_start}('/LongField'); | |
358 $f->{data}('Hello'); | |
359 $frames = $f->{field_len}(2**7); | |
360 ($frame) = grep { $_->{flags} & 0x4 } @$frames; | |
361 is($frame->{headers}{'x' x 2**7}, 'y' x 2**7, 'long header field 1'); | |
362 | |
363 $f->{http_start}('/LongField'); | |
364 $f->{data}('Hello'); | |
365 $frames = $f->{field_len}(2**8); | |
366 ($frame) = grep { $_->{flags} & 0x4 } @$frames; | |
367 is($frame->{headers}{'x' x 2**8}, 'y' x 2**8, 'long header field 2'); | |
368 | |
369 $f->{http_start}('/LongField'); | |
370 $f->{data}('Hello'); | |
371 $frames = $f->{field_len}(2**15); | |
372 ($frame) = grep { $_->{flags} & 0x4 } @$frames; | |
373 is($frame->{headers}{'x' x 2**15}, 'y' x 2**15, 'long header field 3'); | |
374 | |
375 # flow control | |
376 | |
377 $f->{http_start}('/FlowControl'); | |
378 $frames = $f->{data_len}(('Hello' x 13000) . ('x' x 550), 65535); | |
379 my $sum = eval join '+', map { $_->{type} eq "DATA" && $_->{length} } @$frames; | |
380 is($sum, 65535, 'flow control - iws length'); | |
381 | |
382 $f->{update}(10); | |
383 $f->{update_sid}(10); | |
384 | |
385 $frames = $f->{data_len}(undef, 10); | |
386 ($frame) = grep { $_->{type} eq "DATA" } @$frames; | |
387 is($frame->{length}, 10, 'flow control - update length'); | |
388 is($frame->{flags}, 0, 'flow control - update flags'); | |
389 | |
390 $f->{update_sid}(10); | |
391 $f->{update}(10); | |
392 | |
393 $frames = $f->{data_len}(undef, 5); | |
394 ($frame) = grep { $_->{type} eq "DATA" } @$frames; | |
395 is($frame->{length}, 5, 'flow control - rest length'); | |
396 is($frame->{flags}, 1, 'flow control - rest flags'); | |
397 | |
398 $f->{http_end}(); | |
399 | |
1318
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
400 # preserve output |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
401 |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
402 $f->{http_start}('/Preserve'); |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
403 $f->{data}('Hello'); |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
404 $frames = $f->{http_pres}(); |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
405 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
406 is($frame->{flags}, 4, 'preserve - HEADERS'); |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
407 |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
408 my @data = grep { $_->{type} eq "DATA" } @$frames; |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
409 $sum = eval join '+', map { $_->{length} } @data; |
1319
3b30e97acdcb
Tests: made grpc preserve output test pass on win32 and Solaris.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1318
diff
changeset
|
410 is($sum, 20480, 'preserve - DATA'); |
1318
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
411 |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
412 (undef, $frame) = grep { $_->{type} eq "HEADERS" } @$frames; |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
413 is($frame->{flags}, 5, 'preserve - trailers'); |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
414 |
1303 | 415 # DATA padding |
416 | |
417 $f->{http_start}('/SayPadding'); | |
418 $f->{data}('Hello'); | |
419 $frames = $f->{http_end}(body_padding => 42); | |
420 ($frame) = grep { $_->{type} eq "DATA" } @$frames; | |
1362
6874b32dc3d2
Tests: renamed some grpc.t tests.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1321
diff
changeset
|
421 is($frame->{data}, 'Hello world', 'DATA padding'); |
6874b32dc3d2
Tests: renamed some grpc.t tests.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1321
diff
changeset
|
422 is($frame->{length}, 11, 'DATA padding - length'); |
6874b32dc3d2
Tests: renamed some grpc.t tests.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1321
diff
changeset
|
423 is($frame->{flags}, 0, 'DATA padding - flags'); |
1303 | 424 |
425 # :authority inheritance | |
426 | |
427 $frames = $f->{http_start}('/SayHello?if=1'); | |
428 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
429 is($frame->{headers}{':authority'}, "127.0.0.1:$p", 'authority in if'); | |
430 $f->{data}('Hello'); | |
431 $f->{http_end}(); | |
432 | |
433 # misc tests | |
434 | |
435 $frames = $f->{http_start}('/SetHost'); | |
436 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
437 ok(!$frame->{headers}{':authority'}, 'set host - authority'); | |
438 is($frame->{headers}{'host'}, 'custom', 'set host - host'); | |
439 $f->{data}('Hello'); | |
440 $f->{http_end}(); | |
441 | |
442 $frames = $f->{http_start}('/SetArgs?f'); | |
443 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
444 is($frame->{headers}{':path'}, '/SetArgs', 'set args'); | |
445 $f->{data}('Hello'); | |
446 $f->{http_end}(); | |
447 | |
448 $frames = $f->{http_start}('/SetArgs?c=1'); | |
449 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
450 is($frame->{headers}{':path'}, '/SetArgs?1', 'set args len'); | |
451 $f->{data}('Hello'); | |
452 $f->{http_end}(); | |
453 | |
454 $frames = $f->{http_start}('/SetArgs esc'); | |
455 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
456 is($frame->{headers}{':path'}, '/SetArgs%20esc', 'uri escape'); | |
457 $f->{data}('Hello'); | |
458 $f->{http_end}(); | |
459 | |
460 $frames = $f->{http_start}('/'); | |
461 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
462 is($frame->{headers}{':path'}, '/', 'root index'); | |
463 $f->{data}('Hello'); | |
464 $f->{http_end}(); | |
465 | |
466 $frames = $f->{http_start}('/', method => 'GET'); | |
467 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
468 is($frame->{headers}{':method'}, 'GET', 'method get'); | |
469 $f->{data}('Hello'); | |
470 $f->{http_end}(); | |
471 | |
472 $frames = $f->{http_start}('/', method => 'HEAD'); | |
473 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
474 is($frame->{headers}{':method'}, 'HEAD', 'method head'); | |
475 $f->{data}('Hello'); | |
476 $f->{http_end}(); | |
477 | |
478 ############################################################################### | |
479 | |
480 sub grpc { | |
1318
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
481 my ($server, $client, $f, $s, $c, $sid, $csid, $uri); |
1303 | 482 my $n = 0; |
483 | |
484 $server = IO::Socket::INET->new( | |
485 Proto => 'tcp', | |
486 LocalHost => '127.0.0.1', | |
487 LocalPort => $p, | |
488 Listen => 5, | |
489 Reuse => 1 | |
490 ) | |
491 or die "Can't create listening socket: $!\n"; | |
492 | |
493 $f->{http_start} = sub { | |
494 ($uri, my %extra) = @_; | |
495 my $body_more = 1 if $uri !~ /LongHeader/; | |
496 my $meth = $extra{method} || 'POST'; | |
497 $s = Test::Nginx::HTTP2->new() if !defined $s; | |
1318
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
498 $csid = $s->new_stream({ body_more => $body_more, headers => [ |
1303 | 499 { name => ':method', value => $meth, mode => !!$meth }, |
500 { name => ':scheme', value => 'http', mode => 0 }, | |
501 { name => ':path', value => $uri, }, | |
502 { name => ':authority', value => 'localhost' }, | |
503 { name => 'content-type', value => 'application/grpc' }, | |
504 { name => 'te', value => 'trailers', mode => 2 }]}); | |
505 | |
506 if (!$extra{reuse}) { | |
1321
351b95be742b
Tests: fixed grpc tests hang in accept() on internal nginx error.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1319
diff
changeset
|
507 eval { |
351b95be742b
Tests: fixed grpc tests hang in accept() on internal nginx error.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1319
diff
changeset
|
508 local $SIG{ALRM} = sub { die "timeout\n" }; |
351b95be742b
Tests: fixed grpc tests hang in accept() on internal nginx error.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1319
diff
changeset
|
509 alarm(5); |
351b95be742b
Tests: fixed grpc tests hang in accept() on internal nginx error.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1319
diff
changeset
|
510 |
351b95be742b
Tests: fixed grpc tests hang in accept() on internal nginx error.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1319
diff
changeset
|
511 $client = $server->accept() or return; |
351b95be742b
Tests: fixed grpc tests hang in accept() on internal nginx error.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1319
diff
changeset
|
512 |
351b95be742b
Tests: fixed grpc tests hang in accept() on internal nginx error.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1319
diff
changeset
|
513 alarm(0); |
351b95be742b
Tests: fixed grpc tests hang in accept() on internal nginx error.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1319
diff
changeset
|
514 }; |
351b95be742b
Tests: fixed grpc tests hang in accept() on internal nginx error.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1319
diff
changeset
|
515 alarm(0); |
351b95be742b
Tests: fixed grpc tests hang in accept() on internal nginx error.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1319
diff
changeset
|
516 if ($@) { |
351b95be742b
Tests: fixed grpc tests hang in accept() on internal nginx error.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1319
diff
changeset
|
517 log_in("died: $@"); |
351b95be742b
Tests: fixed grpc tests hang in accept() on internal nginx error.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1319
diff
changeset
|
518 return undef; |
351b95be742b
Tests: fixed grpc tests hang in accept() on internal nginx error.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1319
diff
changeset
|
519 } |
351b95be742b
Tests: fixed grpc tests hang in accept() on internal nginx error.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1319
diff
changeset
|
520 |
1303 | 521 log2c("(new connection $client)"); |
522 $n++; | |
523 | |
524 $client->sysread(my $buf, 24) == 24 or return; # preface | |
525 | |
526 $c = Test::Nginx::HTTP2->new(1, socket => $client, | |
527 pure => 1, preface => "") or return; | |
528 } | |
529 | |
530 my $frames = $c->read(all => [{ fin => 4 }]); | |
531 | |
532 if (!$extra{reuse}) { | |
533 $c->h2_settings(0); | |
534 $c->h2_settings(1); | |
535 } | |
536 | |
537 my ($frame) = grep { $_->{type} eq "HEADERS" } @$frames; | |
538 $sid = $frame->{sid}; | |
539 return $frames; | |
540 }; | |
541 $f->{data} = sub { | |
542 my ($body, %extra) = @_; | |
543 $s->h2_body($body, { %extra }); | |
544 return $c->read(all => [{ sid => $sid, | |
545 length => length($body) }]); | |
546 }; | |
547 $f->{data_len} = sub { | |
548 my ($body, $len) = @_; | |
549 $s->h2_body($body) if defined $body; | |
550 return $c->read(all => [{ sid => $sid, length => $len }]); | |
551 }; | |
552 $f->{update} = sub { | |
553 $c->h2_window(shift); | |
554 }; | |
555 $f->{update_sid} = sub { | |
556 $c->h2_window(shift, $sid); | |
557 }; | |
1370
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
558 $f->{settings} = sub { |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
559 $c->h2_settings(@_); |
23e407a72fe9
Tests: upstream keepalive with grpc pending frames.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1362
diff
changeset
|
560 }; |
1303 | 561 $f->{http_end} = sub { |
562 my (%extra) = @_; | |
563 $c->new_stream({ body_more => 1, %extra, headers => [ | |
564 { name => ':status', value => '200', | |
565 mode => $extra{mode} || 0 }, | |
566 { name => 'content-type', value => 'application/grpc', | |
567 mode => $extra{mode} || 1, huff => 1 }, | |
568 { name => 'x-connection', value => $n, | |
569 mode => 2, huff => 1 }, | |
570 ]}, $sid); | |
571 $c->h2_body('Hello world', { body_more => 1, | |
572 body_padding => $extra{body_padding} }); | |
573 $c->new_stream({ headers => [ | |
574 { name => 'grpc-status', value => '0', | |
575 mode => 2, huff => 1 }, | |
576 { name => 'grpc-message', value => '', | |
577 mode => 2, huff => 1 }, | |
578 ]}, $sid); | |
579 | |
580 return $s->read(all => [{ fin => 1 }]); | |
581 }; | |
1318
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
582 $f->{http_pres} = sub { |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
583 my (%extra) = @_; |
1319
3b30e97acdcb
Tests: made grpc preserve output test pass on win32 and Solaris.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1318
diff
changeset
|
584 $s->h2_settings(0, 0x4 => 8192); |
1318
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
585 $c->new_stream({ body_more => 1, %extra, headers => [ |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
586 { name => ':status', value => '200', |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
587 mode => $extra{mode} || 0 }, |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
588 { name => 'content-type', value => 'application/grpc', |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
589 mode => $extra{mode} || 1, huff => 1 }, |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
590 { name => 'x-connection', value => $n, |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
591 mode => 2, huff => 1 }, |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
592 ]}, $sid); |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
593 for (1 .. 20) { |
1319
3b30e97acdcb
Tests: made grpc preserve output test pass on win32 and Solaris.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1318
diff
changeset
|
594 $c->h2_body(sprintf('Hello %02d', $_) x 128, { |
1318
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
595 body_more => 1, |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
596 body_padding => $extra{body_padding} }); |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
597 $c->h2_ping("PING"); |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
598 } |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
599 # reopen window |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
600 $s->h2_window(2**24); |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
601 $s->h2_window(2**24, $csid); |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
602 $c->new_stream({ headers => [ |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
603 { name => 'grpc-status', value => '0', |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
604 mode => 2, huff => 1 }, |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
605 { name => 'grpc-message', value => '', |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
606 mode => 2, huff => 1 }, |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
607 ]}, $sid); |
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
608 |
1319
3b30e97acdcb
Tests: made grpc preserve output test pass on win32 and Solaris.
Sergey Kandaurov <pluknet@nginx.com>
parents:
1318
diff
changeset
|
609 return $s->read(all => [{ sid => $csid, fin => 1 }]); |
1318
6de2a27af2d3
Tests: grpc preserve output tests added (ticket #1519).
Sergey Kandaurov <pluknet@nginx.com>
parents:
1312
diff
changeset
|
610 }; |
1303 | 611 $f->{http_err} = sub { |
612 $c->new_stream({ headers => [ | |
613 { name => ':status', value => '200', mode => 0 }, | |
614 { name => 'content-type', value => 'application/grpc', | |
615 mode => 1, huff => 1 }, | |
616 { name => 'grpc-status', value => '12', | |
617 mode => 2, huff => 1 }, | |
618 { name => 'grpc-message', value => 'unknown service', | |
619 mode => 2, huff => 1 }, | |
620 ]}, $sid); | |
621 | |
622 return $s->read(all => [{ fin => 1 }]); | |
623 }; | |
624 $f->{continuation} = sub { | |
625 $c->new_stream({ continuation => 1, body_more => 1, headers => [ | |
626 { name => ':status', value => '200', mode => 0 }, | |
627 ]}, $sid); | |
628 $c->h2_continue($sid, { continuation => 1, headers => [ | |
629 { name => 'content-type', value => 'application/grpc', | |
630 mode => 1, huff => 1 }, | |
631 ]}); | |
632 $c->h2_continue($sid, { headers => [ | |
633 # an empty CONTINUATION frame is legitimate | |
634 ]}); | |
635 $c->h2_body('Hello world', { body_more => 1 }); | |
636 $c->new_stream({ continuation => 1, headers => [ | |
637 { name => 'grpc-status', value => '0', | |
638 mode => 2, huff => 1 }, | |
639 ]}, $sid); | |
640 $c->h2_continue($sid, { headers => [ | |
641 { name => 'grpc-message', value => '', | |
642 mode => 2, huff => 1 }, | |
643 ]}); | |
644 | |
645 return $s->read(all => [{ fin => 1 }]); | |
646 }; | |
647 $f->{field_len} = sub { | |
648 my ($len) = @_; | |
649 $c->new_stream({ continuation => [map {2**14} (0..$len/2**13)], | |
650 body_more => 1, headers => [ | |
651 { name => ':status', value => '200', mode => 0 }, | |
652 { name => 'content-type', value => 'application/grpc', | |
653 mode => 1, huff => 1 }, | |
654 { name => 'x' x $len, value => 'y' x $len, mode => 6 }, | |
655 ]}, $sid); | |
656 $c->h2_body('Hello world', { body_more => 1 }); | |
657 $c->new_stream({ headers => [ | |
658 { name => 'grpc-status', value => '0', | |
659 mode => 2, huff => 1 }, | |
660 { name => 'grpc-message', value => '', | |
661 mode => 2, huff => 1 }, | |
662 ]}, $sid); | |
663 | |
664 return $s->read(all => [{ fin => 1 }]); | |
665 }; | |
666 return $f; | |
667 } | |
668 | |
669 sub log2i { Test::Nginx::log_core('|| <<', @_); } | |
670 sub log2o { Test::Nginx::log_core('|| >>', @_); } | |
671 sub log2c { Test::Nginx::log_core('||', @_); } | |
672 | |
673 ############################################################################### |