Mercurial > hg > nginx-tests

comparison h3_limit_req.t @ 1879:12d950e1165c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: HTTP/3 tests with limit_req.
author Sergey Kandaurov <pluknet@nginx.com>
date Thu, 12 Jan 2023 20:53:50 +0400
parents
children cc13f7b098db
comparison
equal deleted inserted replaced
1878:b69bae343c53 1879:12d950e1165c
1 #!/usr/bin/perl
2
3 # (C) Sergey Kandaurov
4 # (C) Nginx, Inc.
5
6 # Tests for HTTP/3 protocol with limit_req.
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::HTTP3;
20
21 ###############################################################################
22
23 select STDERR; $| = 1;
24 select STDOUT; $| = 1;
25
26 eval { require Crypt::Misc; die if $Crypt::Misc::VERSION < 0.067; };
27 plan(skip_all => 'CryptX version >= 0.067 required') if $@;
28
29 my $t = Test::Nginx->new()->has(qw/http http_v3 proxy limit_req/)
30 ->has_daemon('openssl')->plan(6);
31
32 $t->write_file_expand('nginx.conf', <<'EOF');
33
34 %%TEST_GLOBALS%%
35
36 daemon off;
37
38 events {
39 }
40
41 http {
42 %%TEST_GLOBALS_HTTP%%
43
44 ssl_certificate_key localhost.key;
45 ssl_certificate localhost.crt;
46
47 limit_req_zone $binary_remote_addr zone=req:1m rate=1r/s;
48
49 log_format test $status;
50
51 server {
52 listen 127.0.0.1:%%PORT_8980_UDP%% quic;
53 listen 127.0.0.1:8081;
54 server_name localhost;
55
56 location / {
57 add_header X-Body $request_body;
58 add_header X-Body-File $request_body_file;
59 client_body_in_file_only on;
60 proxy_pass http://127.0.0.1:8081/stub;
61 limit_req zone=req burst=2;
62 access_log %%TESTDIR%%/test.log test;
63 }
64
65 location /stub { }
66 }
67 }
68
69 EOF
70
71 $t->write_file('openssl.conf', <<EOF);
72 [ req ]
73 default_bits = 2048
74 encrypt_key = no
75 distinguished_name = req_distinguished_name
76 [ req_distinguished_name ]
77 EOF
78
79 my $d = $t->testdir();
80
81 foreach my $name ('localhost') {
82 system('openssl req -x509 -new '
83 . "-config $d/openssl.conf -subj /CN=$name/ "
84 . "-out $d/$name.crt -keyout $d/$name.key "
85 . ">>$d/openssl.out 2>&1") == 0
86 or die "Can't create certificate for $name: $!\n";
87 }
88
89 $t->write_file('stub', '');
90 $t->run();
91
92 ###############################################################################
93
94 # request body delayed in limit_req
95
96 my $s = Test::Nginx::HTTP3->new();
97 my $sid = $s->new_stream({ path => '/', body_more => 1 });
98 $s->h3_body('TEST', $sid);
99 my $frames = $s->read(all => [{ sid => $sid, fin => 1 }]);
100
101 my ($frame) = grep { $_->{type} eq "HEADERS" } @$frames;
102 is(read_body_file($frame->{headers}->{'x-body-file'}), 'TEST',
103 'request body - limit req');
104
105 $s = Test::Nginx::HTTP3->new();
106 $sid = $s->new_stream({ path => '/', body_more => 1 });
107 select undef, undef, undef, 1.1;
108 $s->h3_body('TEST', $sid);
109 $frames = $s->read(all => [{ sid => $sid, fin => 1 }]);
110
111 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames;
112 is(read_body_file($frame->{headers}->{'x-body-file'}), 'TEST',
113 'request body - limit req - limited');
114
115 # request body with request
116
117 $s = Test::Nginx::HTTP3->new();
118 $sid = $s->new_stream({ path => '/', body => 'TEST2' });
119 select undef, undef, undef, 1.1;
120 $frames = $s->read(all => [{ sid => $sid, fin => 1 }]);
121
122 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames;
123 is(read_body_file($frame->{headers}->{'x-body-file'}), 'TEST2',
124 'request body - limit req - with headers');
125
126 # delayed with an empty DATA frame
127
128 $s = Test::Nginx::HTTP3->new();
129 $sid = $s->new_stream({ path => '/', body_more => 1 });
130 $s->h3_body('', $sid);
131 select undef, undef, undef, 1.1;
132 $frames = $s->read(all => [{ sid => $sid, fin => 1 }]);
133
134 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames;
135 is($frame->{headers}->{':status'}, 200, 'request body - limit req - empty');
136
137 # detect RESET_STREAM while request is delayed
138
139 $s = Test::Nginx::HTTP3->new();
140 $sid = $s->new_stream({ path => '/', body_more => 1 });
141 $s->reset_stream($sid, 0x010c);
142 $frames = $s->read(all => [{ type => 'DECODER_C' }]);
143
144 ($frame) = grep { $_->{type} eq "DECODER_C" } @$frames;
145 is($frame->{'val'}, $sid, 'reset stream - cancellation');
146
147 $t->stop();
148
149 like($t->read_file('test.log'), qr/499/, 'reset stream - log');
150
151 ###############################################################################
152
153 sub read_body_file {
154 my ($path) = @_;
155 return unless $path;
156 open FILE, $path or return "$!";
157 local $/;
158 my $content = <FILE>;
159 close FILE;
160 return $content;
161 }
162
163 ###############################################################################