tsget: remove call of WWW::Curl::Easy::global_cleanup

[openssl.git] / apps / CA.pl.in

diff --git a/apps/CA.pl.in b/apps/CA.pl.in
index d97f0ce9c9a9a810a3132ffc074fe7f9194d5b5f..3bf4c99f31029e3923e7c03ac8dd959505211d96 100644 (file)
--- a/apps/CA.pl.in
+++ b/apps/CA.pl.in
@@ -64,7 +64,7 @@ $RET = 0;
 
 foreach (@ARGV) {
        if ( /^(-\?|-h|-help)$/ ) {
-           print STDERR "usage: CA -newcert|-newreq|-newreq-nodes|-newca|-sign|-verify\n";
+           print STDERR "usage: CA -newcert|-newreq|-newreq-nodes|-newca|-sign|-signcert|-verify\n";
            exit 0;
        } elsif (/^-newcert$/) {
            # create a certificate
@@ -94,6 +94,9 @@ foreach (@ARGV) {
                mkdir "${CATOP}/private", $DIRMODE;
                open OUT, ">${CATOP}/index.txt";
                close OUT;
+               open OUT, ">${CATOP}/crlnumber";
+               print OUT "01\n";
+               close OUT;
            }
            if ( ! -f "${CATOP}/private/$CAKEY" ) {
                print "CA certificate filename (or enter to create)\n";
@@ -113,7 +116,7 @@ foreach (@ARGV) {
                    system ("$CA -create_serial " .
                        "-out ${CATOP}/$CACERT $CADAYS -batch " . 
                        "-keyfile ${CATOP}/private/$CAKEY -selfsign " .
-                       "-extensions v3_ca" .
+                       "-extensions v3_ca " .
                        "-infiles ${CATOP}/$CAREQ ");
                    $RET=$?;
                }
@@ -183,4 +186,3 @@ while (<IN>) {
        }
 }
 }
-