Mercurial > hg > nginx-tests

comparison ssl_certificates.t @ 1220:0af58b78df35

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: removed single quotes from system() calls. Single quotes were used to escape paths with spaces but are neither supported in the Windows CMD shell, nor sufficient without proper %%TESTDIR%% expansion.
author Sergey Kandaurov <pluknet@nginx.com>
date Wed, 20 Sep 2017 14:46:51 +0300
parents de7d3e249b35
children 2ec9ce1bc820
comparison
equal deleted inserted replaced
1219:f373a718f646 1220:0af58b78df35
69 [ req_distinguished_name ] 69 [ req_distinguished_name ]
70 EOF 70 EOF
71 71
72 my $d = $t->testdir(); 72 my $d = $t->testdir();
73 73
74 system("openssl ecparam -genkey -out '$d/ec.key' -name prime256v1 " 74 system("openssl ecparam -genkey -out $d/ec.key -name prime256v1 "
75 . ">>$d/openssl.out 2>&1") == 0 or die "Can't create EC pem: $!\n"; 75 . ">>$d/openssl.out 2>&1") == 0 or die "Can't create EC pem: $!\n";
76 system("openssl genrsa -out '$d/rsa.key' 1024 >>$d/openssl.out 2>&1") == 0 76 system("openssl genrsa -out $d/rsa.key 1024 >>$d/openssl.out 2>&1") == 0
77 or die "Can't create RSA pem: $!\n"; 77 or die "Can't create RSA pem: $!\n";
78 78
79 foreach my $name ('ec', 'rsa') { 79 foreach my $name ('ec', 'rsa') {
80 system("openssl req -x509 -new -key '$d/$name.key' " 80 system("openssl req -x509 -new -key $d/$name.key "
81 . "-config '$d/openssl.conf' -subj '/CN=$name/' " 81 . "-config $d/openssl.conf -subj /CN=$name/ "
82 . "-out '$d/$name.crt' -keyout '$d/$name.key' " 82 . "-out $d/$name.crt -keyout $d/$name.key "
83 . ">>$d/openssl.out 2>&1") == 0 83 . ">>$d/openssl.out 2>&1") == 0
84 or die "Can't create certificate for $name: $!\n"; 84 or die "Can't create certificate for $name: $!\n";
85 } 85 }
86 86
87 $t->run()->plan(2); 87 $t->run()->plan(2);