Mercurial > hg > nginx-tests
annotate proxy_implicit.t @ 1962:f1ba89f735ba
Tests: fixed auth_basic.t on OpenBSD.
OpenBSD does not provide any crypt() schemes except bcrypt-based "$2"
anymore. As such, relevant tests are now skipped not for win32 only,
but based on crypt() results.
Note that just testing crypt('password', 'salt') is not enough, since
Perl on win32 provides its own crypt() implementation, which is able
to handle traditional DES crypt(), but rejects "$1$".
author | Maxim Dounin <mdounin@mdounin.ru> |
---|---|
date | Sun, 05 May 2024 23:56:07 +0300 |
parents | d57c7877b618 |
children |
rev | line source |
---|---|
1633
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
1 #!/usr/bin/perl |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
2 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
3 # (C) Sergey Kandaurov |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
4 # (C) Nginx, Inc. |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
5 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
6 # Tests for an upstream implicitly defined by proxy_pass. |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
7 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
8 ############################################################################### |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
9 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
10 use warnings; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
11 use strict; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
12 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
13 use Test::More; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
14 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
15 use Socket qw/ SOCK_STREAM IPPROTO_TCP AF_INET6 /; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
16 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
17 BEGIN { use FindBin; chdir($FindBin::Bin); } |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
18 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
19 use lib 'lib'; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
20 use Test::Nginx; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
21 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
22 ############################################################################### |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
23 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
24 select STDERR; $| = 1; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
25 select STDOUT; $| = 1; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
26 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
27 eval { die if $Socket::VERSION < 1.96; }; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
28 plan(skip_all => 'Socket too old for getaddrinfo') if $@; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
29 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
30 my $t = Test::Nginx->new()->has(qw/http proxy/); |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
31 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
32 $t->write_file_expand('nginx.conf', <<'EOF'); |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
33 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
34 %%TEST_GLOBALS%% |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
35 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
36 daemon off; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
37 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
38 events { |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
39 } |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
40 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
41 http { |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
42 %%TEST_GLOBALS_HTTP%% |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
43 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
44 server { |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
45 listen 127.0.0.1:8080; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
46 listen [::1]:%%PORT_8080%%; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
47 server_name localhost; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
48 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
49 location / { |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
50 proxy_pass http://localhost:%%PORT_8080%%/stub; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
51 proxy_next_upstream http_404; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
52 add_header X-Addr $upstream_addr always; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
53 } |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
54 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
55 location /var { |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
56 proxy_pass http://$arg_b/stub; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
57 proxy_next_upstream http_404; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
58 add_header X-Addr $upstream_addr always; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
59 } |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
60 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
61 location /stub { } |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
62 } |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
63 } |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
64 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
65 EOF |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
66 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
67 $t->try_run('no inet6 support')->plan(3); |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
68 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
69 ############################################################################### |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
70 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
71 my $p = port(8080); |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
72 my @addrs = resolve('localhost'); |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
73 my $exp = qr/$addrs[0]:$p/ if @addrs == 1; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
74 my $v1 = "$addrs[0]:$p", my $v2 = "$addrs[1]:$p" if @addrs == 2; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
75 $exp = qr/\Q$v1, $v2\E|\Q$v2, $v1\E/ if @addrs == 2; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
76 die "too many addresses in localhost" if @addrs > 2; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
77 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
78 like(http_get('/'), qr/Not Found/, 'implicit upstream'); |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
79 like(http_get('/'), $exp, 'implicit upstream all tried'); |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
80 like(http_get("/var?b=localhost:$p"), qr/Not Found/, |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
81 'implicit upstream by variable'); |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
82 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
83 ############################################################################### |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
84 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
85 sub resolve { |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
86 my ($name) = @_; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
87 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
88 my $ai_addrconfig = eval { Socket::AI_ADDRCONFIG() }; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
89 my ($err, @res) = Socket::getaddrinfo($name, "", |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
90 { socktype => SOCK_STREAM, protocol => IPPROTO_TCP, |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
91 flags => $ai_addrconfig }); |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
92 die "Cannot getaddrinfo - $err" if $err; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
93 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
94 my @addrs; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
95 foreach my $ai (@res) { |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
96 my ($err, $addr) = Socket::getnameinfo($ai->{addr}, |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
97 Socket::NI_NUMERICHOST(), Socket::NIx_NOSERV()); |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
98 die "Cannot getnameinfo - $err" if $err; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
99 $addr = '[' . $addr . ']' if $ai->{family} == AF_INET6; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
100 push @addrs, $addr; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
101 } |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
102 return @addrs; |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
103 } |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
104 |
d57c7877b618
Tests: basic proxy tests with implicit upstream.
Sergey Kandaurov <pluknet@nginx.com>
parents:
diff
changeset
|
105 ############################################################################### |