Mercurial > hg > nginx-tests

annotate fastcgi_header_params.t @ 166:c0ae29632905

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: nuke "master_process off;" usage. It's not really suitable for automatic testing due to number of reasons: it doesn't check for open sockets left on exit, it uses racy signal handling, it doesn't at all works on Windows.
author Maxim Dounin <mdounin@mdounin.ru>
date Wed, 17 Aug 2011 15:17:30 +0400
parents 26cf61c5ac35
children 8d2c6358d830
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
153
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
1 #!/usr/bin/perl
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
2
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
3 # (C) Maxim Dounin
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
4
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
5 # Test for fastcgi header params.
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
6
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
7 ###############################################################################
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
8
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
9 use warnings;
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
10 use strict;
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
11
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
12 use Test::More;
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
13
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
14 BEGIN { use FindBin; chdir($FindBin::Bin); }
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
15
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
16 use lib 'lib';
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
17 use Test::Nginx;
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
18
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
19 ###############################################################################
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
20
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
21 select STDERR; $| = 1;
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
22 select STDOUT; $| = 1;
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
23
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
24 eval { require FCGI; };
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
25 plan(skip_all => 'FCGI not installed') if $@;
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
26
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
27 my $t = Test::Nginx->new()->has(qw/http fastcgi/)->plan(1)
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
28 ->write_file_expand('nginx.conf', <<'EOF');
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
29
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
30 %%TEST_GLOBALS%%
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
31
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
32 daemon off;
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
33
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
34 events {
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
35 }
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
36
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
37 http {
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
38 %%TEST_GLOBALS_HTTP%%
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
39
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
40 server {
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
41 listen 127.0.0.1:8080;
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
42 server_name localhost;
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
43
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
44 location / {
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
45 fastcgi_pass 127.0.0.1:8081;
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
46 fastcgi_param HTTP_X_BLAH "blah";
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
47 }
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
48 }
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
49 }
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
50
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
51 EOF
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
52
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
53 $t->run_daemon(\&fastcgi_daemon);
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
54 $t->run();
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
55
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
56 ###############################################################################
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
57
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
58 SKIP: {
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
59 skip 'unsafe', 1 unless $ENV{TEST_NGINX_UNSAFE};
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
60
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
61 local $TODO = 'not yet';
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
62
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
63 like(http_get_headers('/'), qr/SEE-THIS/,
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
64 'fastcgi request with many ignored headers');
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
65
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
66 }
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
67
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
68 ###############################################################################
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
69
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
70 sub http_get_headers {
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
71 my ($url, %extra) = @_;
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
72 return http(<<EOF, %extra);
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
73 GET $url HTTP/1.0
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
74 Host: localhost
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
75 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
76 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
77 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
78 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
79 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
80 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
81 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
82 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
83 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
84 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
85 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
86 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
87 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
88 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
89 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
90 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
91 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
92 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
93 X-Blah: ignored header
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
94
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
95 EOF
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
96 }
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
97
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
98 ###############################################################################
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
99
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
100 sub fastcgi_daemon {
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
101 my $socket = FCGI::OpenSocket('127.0.0.1:8081', 5);
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
102 my $request = FCGI::Request(\*STDIN, \*STDOUT, \*STDERR, \%ENV,
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
103 $socket);
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
104
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
105 my $count;
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
106 while( $request->Accept() >= 0 ) {
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
107 $count++;
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
108
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
109 print <<EOF;
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
110 Location: http://127.0.0.1:8080/redirect
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
111 Content-Type: text/html
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
112
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
113 SEE-THIS
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
114 $count
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
115 EOF
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
116 }
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
117
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
118 FCGI::CloseSocket($socket);
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
119 }
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
120
26cf61c5ac35 Tests: fastcgi header params test.
Maxim Dounin <mdounin@mdounin.ru>
parents:
diff changeset
121 ###############################################################################