Mercurial > hg > nginx-tests

comparison mail_ssl.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 44620036fedf
children 918bf90466e0
comparison
equal deleted inserted replaced
1219:f373a718f646 1220:0af58b78df35
146 EOF 146 EOF
147 147
148 my $d = $t->testdir(); 148 my $d = $t->testdir();
149 149
150 foreach my $name ('localhost', 'inherits') { 150 foreach my $name ('localhost', 'inherits') {
151 system("openssl genrsa -out '$d/$name.key' -passout pass:localhost " 151 system("openssl genrsa -out $d/$name.key -passout pass:localhost "
152 . "-aes128 1024 >>$d/openssl.out 2>&1") == 0 152 . "-aes128 1024 >>$d/openssl.out 2>&1") == 0
153 or die "Can't create private key: $!\n"; 153 or die "Can't create private key: $!\n";
154 system('openssl req -x509 -new ' 154 system('openssl req -x509 -new '
155 . "-config '$d/openssl.conf' -subj '/CN=$name/' " 155 . "-config $d/openssl.conf -subj /CN=$name/ "
156 . "-out '$d/$name.crt' " 156 . "-out $d/$name.crt "
157 . "-key '$d/$name.key' -passin pass:localhost" 157 . "-key $d/$name.key -passin pass:localhost"
158 . ">>$d/openssl.out 2>&1") == 0 158 . ">>$d/openssl.out 2>&1") == 0
159 or die "Can't create certificate for $name: $!\n"; 159 or die "Can't create certificate for $name: $!\n";
160 } 160 }
161 161
162 my $ctx = Net::SSLeay::CTX_new() or die("Failed to create SSL_CTX $!"); 162 my $ctx = Net::SSLeay::CTX_new() or die("Failed to create SSL_CTX $!");