Mercurial > hg > nginx-tests
view fastcgi_header_params.t @ 1328:a682c219af45
Tests: updated ssl_engine_keys.t test.
After merge with libp11, pkcs11 engine shared object was renamed
from "engine_pkcs11.so" to "pkcs11.so". Changed configuration
accordingly.
Additionally, changed "init" to "1" in the engine configuration. This
keeps pkcs11 engine loaded and prevents segmentation faults observed
during nginx shutdown.
While here, restored correct order of ssl_certificate and ssl_certificate_key.
author | Maxim Dounin <mdounin@mdounin.ru> |
---|---|
date | Tue, 22 May 2018 17:46:59 +0300 |
parents | 882267679006 |
children | b7d0e595e927 |
line wrap: on
line source
#!/usr/bin/perl # (C) Maxim Dounin # Test for fastcgi header params. ############################################################################### use warnings; use strict; use Test::More; BEGIN { use FindBin; chdir($FindBin::Bin); } use lib 'lib'; use Test::Nginx; ############################################################################### select STDERR; $| = 1; select STDOUT; $| = 1; eval { require FCGI; }; plan(skip_all => 'FCGI not installed') if $@; plan(skip_all => 'win32') if $^O eq 'MSWin32'; my $t = Test::Nginx->new()->has(qw/http fastcgi/)->plan(1) ->write_file_expand('nginx.conf', <<'EOF'); %%TEST_GLOBALS%% daemon off; events { } http { %%TEST_GLOBALS_HTTP%% server { listen 127.0.0.1:8080; server_name localhost; location / { fastcgi_pass 127.0.0.1:8081; fastcgi_param HTTP_X_BLAH "blah"; } } } EOF $t->run_daemon(\&fastcgi_daemon); $t->run()->waitforsocket('127.0.0.1:' . port(8081)); ############################################################################### like(http_get_headers('/'), qr/SEE-THIS/, 'fastcgi request with many ignored headers'); ############################################################################### sub http_get_headers { my ($url, %extra) = @_; return http(<<EOF, %extra); GET $url HTTP/1.0 Host: localhost X-Blah: ignored header X-Blah: ignored header X-Blah: ignored header X-Blah: ignored header X-Blah: ignored header X-Blah: ignored header X-Blah: ignored header X-Blah: ignored header X-Blah: ignored header X-Blah: ignored header X-Blah: ignored header X-Blah: ignored header X-Blah: ignored header X-Blah: ignored header X-Blah: ignored header X-Blah: ignored header X-Blah: ignored header X-Blah: ignored header X-Blah: ignored header EOF } ############################################################################### sub fastcgi_daemon { my $socket = FCGI::OpenSocket('127.0.0.1:' . port(8081), 5); my $request = FCGI::Request(\*STDIN, \*STDOUT, \*STDERR, \%ENV, $socket); my $count; while( $request->Accept() >= 0 ) { $count++; print <<EOF; Location: http://localhost/redirect Content-Type: text/html SEE-THIS $count EOF } FCGI::CloseSocket($socket); } ###############################################################################