Mercurial > hg > nginx-tests
view uwsgi_ssl_certificate_vars.t @ 1821:1792ba2e8026
Tests: fixed js tests for Fetch API for nginx-1.22 and below.
The fix is to move a test with multiple headers returned by $http_a
variable under an nginx version check.
author | Dmitry Volyntsev <xeioex@nginx.com> |
---|---|
date | Mon, 06 Feb 2023 09:36:13 -0800 |
parents | 31ea330ac360 |
children | 2a0a6035a1af |
line wrap: on
line source
#!/usr/bin/perl # (C) Sergey Kandaurov # (C) Nginx, Inc. # Tests for http uwsgi module with variables in ssl certificates. ############################################################################### 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; my $t = Test::Nginx->new()->has(qw/http http_ssl uwsgi/) ->has_daemon('openssl'); $t->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; uwsgi_ssl_session_reuse off; location / { uwsgi_pass suwsgi://127.0.0.1:8081; uwsgi_ssl_certificate $arg_cert.example.com.crt; uwsgi_ssl_certificate_key $arg_cert.example.com.key; } location /encrypted { uwsgi_pass suwsgi://127.0.0.1:8082; uwsgi_ssl_certificate $arg_cert.example.com.crt; uwsgi_ssl_certificate_key $arg_cert.example.com.key; uwsgi_ssl_password_file password; } location /none { uwsgi_pass suwsgi://127.0.0.1:8082; uwsgi_ssl_certificate $arg_cert; uwsgi_ssl_certificate_key $arg_cert; } } # stub to implement SSL logic for tests server { listen 127.0.0.1:8081 ssl; server_name localhost; ssl_certificate 2.example.com.crt; ssl_certificate_key 2.example.com.key; ssl_verify_client optional_no_ca; ssl_trusted_certificate 1.example.com.crt; add_header X-Verify $ssl_client_verify always; add_header X-Name $ssl_client_s_dn always; } server { listen 127.0.0.1:8082 ssl; server_name localhost; ssl_certificate 1.example.com.crt; ssl_certificate_key 1.example.com.key; ssl_verify_client optional_no_ca; ssl_trusted_certificate 3.example.com.crt; add_header X-Verify $ssl_client_verify always; } } EOF $t->write_file('openssl.conf', <<EOF); [ req ] default_bits = 2048 encrypt_key = no distinguished_name = req_distinguished_name [ req_distinguished_name ] EOF my $d = $t->testdir(); foreach my $name ('1.example.com', '2.example.com') { system('openssl req -x509 -new ' . "-config $d/openssl.conf -subj /CN=$name/ " . "-out $d/$name.crt -keyout $d/$name.key " . ">>$d/openssl.out 2>&1") == 0 or die "Can't create certificate for $name: $!\n"; } foreach my $name ('3.example.com') { system("openssl genrsa -out $d/$name.key -passout pass:$name " . "-aes128 2048 >>$d/openssl.out 2>&1") == 0 or die "Can't create private key: $!\n"; system('openssl req -x509 -new ' . "-config $d/openssl.conf -subj /CN=$name/ " . "-out $d/$name.crt " . "-key $d/$name.key -passin pass:$name" . ">>$d/openssl.out 2>&1") == 0 or die "Can't create certificate for $name: $!\n"; } sleep 1 if $^O eq 'MSWin32'; $t->write_file('password', '3.example.com'); $t->write_file('index.html', ''); $t->try_run('no upstream ssl_certificate variables')->plan(4); ############################################################################### like(http_get('/?cert=1'), qr/X-Verify: SUCCESS/ms, 'variable - verify certificate'); like(http_get('/?cert=2'), qr/X-Verify: FAILED/ms, 'variable - fail certificate'); like(http_get('/encrypted?cert=3'), qr/X-Verify: SUCCESS/ms, 'variable - with encrypted key'); like(http_get('/none'), qr/X-Verify: NONE/ms, 'variable - no certificate'); ###############################################################################