Mercurial > hg > nginx-tests

annotate auth_delay.t @ 1982:fb25cbe9d4ec default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: explicit Valgrind support. Valgrind logging is done to a separate file, as it is not able to follow stderr redirection within nginx or append to a file without corrupting it. Further, Valgrind logging seems to interfere with error suppression in tests, and catches various startup errors and warnings, so the log is additionally filtered. Since startup under Valgrind can be really slow, timeout in waitforfile() was changed to 10 seconds. Prodded by Robert Mueller.
author Maxim Dounin <mdounin@mdounin.ru>
date Fri, 31 May 2024 06:23:00 +0300
parents 5ac6efbe5552
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1560
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
1 #!/usr/bin/perl
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
2
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
3 # (C) Sergey Kandaurov
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
4 # (C) Nginx, Inc.
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
5
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
6 # Tests for auth_delay directive using auth basic module.
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
7
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
8 ###############################################################################
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
9
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
10 use warnings;
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
11 use strict;
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
12
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
13 use Test::More;
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
14
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
15 use MIME::Base64;
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
16
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
17 BEGIN { use FindBin; chdir($FindBin::Bin); }
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
18
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
19 use lib 'lib';
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
20 use Test::Nginx;
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
21
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
22 ###############################################################################
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
23
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
24 select STDERR; $| = 1;
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
25 select STDOUT; $| = 1;
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
26
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
27 my $t = Test::Nginx->new()->has(qw/http auth_basic/)
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
28 ->write_file_expand('nginx.conf', <<'EOF');
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
29
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
30 %%TEST_GLOBALS%%
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
31
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
32 daemon off;
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
33
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
34 events {
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
35 }
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
36
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
37 http {
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
38 %%TEST_GLOBALS_HTTP%%
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
39
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
40 server {
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
41 listen 127.0.0.1:8080;
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
42 server_name localhost;
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
43
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
44 location / {
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
45 auth_delay 2s;
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
46
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
47 auth_basic "closed site";
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
48 auth_basic_user_file %%TESTDIR%%/htpasswd;
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
49 }
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
50 }
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
51 }
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
52
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
53 EOF
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
54
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
55 $t->write_file('index.html', '');
1561
75fb32094392 Tests: unbreak auth_delay tests on win32.
Sergey Kandaurov <pluknet@nginx.com>
parents: 1560
diff changeset
56 $t->write_file('htpasswd', 'user:' . '{PLAIN}good' . "\n");
1560
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
57
1693
5ac6efbe5552 Tests: removed TODO and try_run() checks for legacy versions.
Sergey Kandaurov <pluknet@nginx.com>
parents: 1561
diff changeset
58 $t->run()->plan(4);
1560
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
59
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
60 ###############################################################################
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
61
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
62 my $t1 = time();
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
63 like(http_get_auth('/', 'user', 'bad'), qr/401 Unauthorize/, 'not authorized');
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
64 cmp_ok(time() - $t1, '>=', 2, 'auth delay');
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
65
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
66 $t1 = time();
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
67 like(http_get_auth('/', 'user', 'good'), qr/200 OK/, 'authorized');
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
68 cmp_ok(time() - $t1, '<', 2, 'no delay');
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
69
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
70 ###############################################################################
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
71
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
72 sub http_get_auth {
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
73 my ($url, $user, $password) = @_;
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
74
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
75 my $auth = encode_base64($user . ':' . $password, '');
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
76
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
77 return http(<<EOF);
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
78 GET $url HTTP/1.0
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
79 Host: localhost
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
80 Authorization: Basic $auth
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
81
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
82 EOF
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
83 }
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
84
0f385f8922b5 Tests: auth_delay directive.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff changeset
85 ###############################################################################