From: Richard Levitte <levitte@openssl.org>
Date: Tue, 22 Jun 2021 08:52:09 +0000 (+0200)
Subject: apps/CA.pl.in: restore the quotes around -CAfile, they were there for a reason
X-Git-Tag: openssl-3.0.0-beta2~173
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=f49b42e6eec9b7abee940a10e8e1125edcb61481;p=thirdparty%2Fopenssl.git

apps/CA.pl.in: restore the quotes around -CAfile, they were there for a reason

Reviewed-by: Paul Dale <pauli@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/15823)
---

diff --git a/apps/CA.pl.in b/apps/CA.pl.in
index 7087f55d278..f029470005d 100644
--- a/apps/CA.pl.in
+++ b/apps/CA.pl.in
@@ -209,7 +209,9 @@ if ($WHAT eq '-newcert' ) {
 } elsif ($WHAT eq '-verify' ) {
     my @files = @ARGV ? @ARGV : ( $NEWCERT );
     foreach my $file (@files) {
-        my $status = run("$VERIFY -CAfile ${CATOP}/$CACERT $file $EXTRA{verify}");
+        # -CAfile quoted for VMS, since the C RTL downcases all unquoted
+        # arguments to C programs
+        my $status = run("$VERIFY \"-CAfile\" ${CATOP}/$CACERT $file $EXTRA{verify}");
         $RET = $status if $status != 0;
     }
 } elsif ($WHAT eq '-crl' ) {