Mercurial > hg > nginx-tests
comparison geo.t @ 1012:a0758fe11465
Tests: style and rearrangements in geo tests.
author | Andrey Zelenkov <zelenkov@nginx.com> |
---|---|
date | Fri, 26 Aug 2016 16:30:54 +0300 |
parents | 882267679006 |
children | 8f92d97cf40e |
comparison
equal
deleted
inserted
replaced
1011:9b87810c75ca | 1012:a0758fe11465 |
---|---|
34 | 34 |
35 http { | 35 http { |
36 %%TEST_GLOBALS_HTTP%% | 36 %%TEST_GLOBALS_HTTP%% |
37 | 37 |
38 geo $geo { | 38 geo $geo { |
39 127.0.0.0/8 loopback; | 39 127.0.0.0/8 loopback; |
40 192.0.2.0/24 test; | 40 192.0.2.0/24 test; |
41 0.0.0.0/0 world; | 41 0.0.0.0/0 world; |
42 } | 42 } |
43 | 43 |
44 geo $arg_ip $geo_from_arg { | 44 geo $arg_ip $geo_from_arg { |
45 default default; | 45 default default; |
46 | 46 127.0.0.0/8 loopback; |
47 127.0.0.0/8 loopback; | 47 192.0.2.0/24 test; |
48 192.0.2.0/24 test; | |
49 } | 48 } |
50 | 49 |
51 geo $geo_proxy { | 50 geo $geo_proxy { |
52 default default; | 51 default default; |
53 proxy 127.0.0.1; | 52 proxy 127.0.0.1; |
54 127.0.0.0/8 loopback; | 53 127.0.0.0/8 loopback; |
55 192.0.2.0/24 test; | 54 192.0.2.0/24 test; |
56 } | 55 } |
57 | 56 |
58 geo $geo_proxy_recursive { | 57 geo $geo_proxy_recursive { |
59 default default; | |
60 proxy 127.0.0.1; | |
61 127.0.0.0/8 loopback; | |
62 192.0.2.0/24 test; | |
63 proxy_recursive; | 58 proxy_recursive; |
59 default default; | |
60 proxy 127.0.0.1; | |
61 127.0.0.0/8 loopback; | |
62 192.0.2.0/24 test; | |
64 } | 63 } |
65 | 64 |
66 geo $geo_ranges { | 65 geo $geo_ranges { |
67 ranges; | 66 ranges; |
68 default default; | 67 default default; |
69 127.0.0.0-127.255.255.255 loopback; | 68 127.0.0.0-127.255.255.255 loopback; |
70 192.0.2.0-192.0.2.255 test; | 69 192.0.2.0-192.0.2.255 test; |
71 } | 70 } |
72 | 71 |
73 server { | 72 server { |
74 listen 127.0.0.1:8080; | 73 listen 127.0.0.1:8080; |
75 server_name localhost; | 74 server_name localhost; |
76 | 75 |
77 location / { | 76 location / { |
78 add_header X-IP $remote_addr; | 77 add_header X-IP $remote_addr; |
79 add_header X-Geo $geo; | 78 add_header X-Geo $geo; |
80 add_header X-Arg $geo_from_arg; | 79 add_header X-Ran $geo_ranges; |
81 add_header X-XFF $geo_proxy; | 80 add_header X-Arg $geo_from_arg; |
82 add_header X-XFR $geo_proxy_recursive; | 81 add_header X-XFF $geo_proxy; |
83 add_header X-Ran $geo_ranges; | 82 add_header X-XFR $geo_proxy_recursive; |
84 } | 83 } |
85 } | 84 } |
86 } | 85 } |
87 | 86 |
88 EOF | 87 EOF |
95 | 94 |
96 $t->plan(9); | 95 $t->plan(9); |
97 | 96 |
98 ############################################################################### | 97 ############################################################################### |
99 | 98 |
100 like(http_get('/1'), qr/^X-Geo: loopback/m, 'geo'); | 99 my $r = http_get('/1'); |
100 like($r, qr/^X-Geo: loopback/m, 'geo'); | |
101 like($r, qr/^X-Ran: loopback/m, 'geo ranges'); | |
101 | 102 |
102 like(http_get('/1?ip=192.0.2.1'), qr/^X-Arg: test/m, 'geo from variable'); | 103 like(http_get('/1?ip=192.0.2.1'), qr/^X-Arg: test/m, 'geo from variable'); |
103 like(http_get('/1?ip=10.0.0.1'), qr/^X-Arg: default/m, 'geo default'); | 104 like(http_get('/1?ip=10.0.0.1'), qr/^X-Arg: default/m, 'geo default'); |
104 | 105 |
105 like(http_xff('192.0.2.1'), qr/^X-XFF: test/m, 'geo proxy'); | 106 like(http_xff('192.0.2.1'), qr/^X-XFF: test/m, 'geo proxy'); |
108 | 109 |
109 like(http_xff('192.0.2.1, 127.0.0.1'), qr/^X-XFF: loopback/m, | 110 like(http_xff('192.0.2.1, 127.0.0.1'), qr/^X-XFF: loopback/m, |
110 'geo proxy_recursive off'); | 111 'geo proxy_recursive off'); |
111 like(http_xff('192.0.2.1, 127.0.0.1'), qr/^X-XFR: test/m, | 112 like(http_xff('192.0.2.1, 127.0.0.1'), qr/^X-XFR: test/m, |
112 'geo proxy_recursive on'); | 113 'geo proxy_recursive on'); |
113 | |
114 like(http_get('/1'), qr/^X-Ran: loopback/m, 'geo ranges'); | |
115 | 114 |
116 ############################################################################### | 115 ############################################################################### |
117 | 116 |
118 sub http_xff { | 117 sub http_xff { |
119 my ($xff) = @_; | 118 my ($xff) = @_; |