Ok, propose a release date of March 15th with a code freeze a few days before
[openssl.git] / apps / req.c
index 9b6041e1791bf4633d6e37f31ff42fca8c07b881..b2c1bb2578920ad1f401f6a93ec41af04ab3c525 100644 (file)
@@ -1,5 +1,5 @@
 /* apps/req.c */
-/* Copyright (C) 1995-1997 Eric Young (eay@cryptsoft.com)
+/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
  * All rights reserved.
  *
  * This package is an SSL implementation written
@@ -60,7 +60,7 @@
 #include <stdlib.h>
 #include <time.h>
 #include <string.h>
-#ifdef WIN16
+#ifdef NO_STDIO
 #define APPS_WIN16
 #endif
 #include "apps.h"
@@ -71,6 +71,7 @@
 #include "err.h"
 #include "asn1.h"
 #include "x509.h"
+#include "x509v3.h"
 #include "objects.h"
 #include "pem.h"
 
@@ -80,6 +81,7 @@
 #define KEYFILE                "default_keyfile"
 #define DISTINGUISHED_NAME     "distinguished_name"
 #define ATTRIBUTES     "attributes"
+#define V3_EXTENSIONS  "x509_extensions"
 
 #define DEFAULT_KEY_LENGTH     512
 #define MIN_KEY_LENGTH         384
@@ -111,7 +113,7 @@ static int add_attribute_object(STACK *n, char *text, char *def,
        char *value, int nid,int min,int max);
 static int add_DN_object(X509_NAME *n, char *text, char *def, char *value,
        int nid,int min,int max);
-static void MS_CALLBACK req_cb(int p,int n);
+static void MS_CALLBACK req_cb(int p,int n,char *arg);
 static int req_fix_data(int nid,int *type,int len,int min,int max);
 #else
 static int make_REQ();
@@ -135,7 +137,9 @@ int MAIN(argc, argv)
 int argc;
 char **argv;
        {
+#ifndef NO_DSA
        DSA *dsa_params=NULL;
+#endif
        int ex=1,x509=0,days=30;
        X509 *x509ss=NULL;
        X509_REQ *req=NULL;
@@ -145,6 +149,7 @@ char **argv;
        int informat,outformat,verify=0,noout=0,text=0,keyform=FORMAT_PEM;
        int nodes=0,kludge=0;
        char *infile,*outfile,*prog,*keyfile=NULL,*template=NULL,*keyout=NULL;
+       char *extensions = NULL;
        EVP_CIPHER *cipher=NULL;
        int modulus=0;
        char *p;
@@ -160,7 +165,7 @@ char **argv;
 
        if (bio_err == NULL)
                if ((bio_err=BIO_new(BIO_s_file())) != NULL)
-                       BIO_set_fp(bio_err,stderr,BIO_NOCLOSE);
+                       BIO_set_fp(bio_err,stderr,BIO_NOCLOSE|BIO_FP_TEXT);
 
        infile=NULL;
        outfile=NULL;
@@ -219,16 +224,21 @@ char **argv;
                        }
                else if (strcmp(*argv,"-newkey") == 0)
                        {
+                       int is_numeric;
+
                        if (--argc < 1) goto bad;
                        p= *(++argv);
-                       if ((strncmp("rsa:",p,4) == 0) ||
-                               ((p[0] >= '0') && (p[0] <= '9')))
+                       is_numeric = p[0] >= '0' && p[0] <= '9';
+                       if (strncmp("rsa:",p,4) == 0 || is_numeric)
                                {
                                pkey_type=TYPE_RSA;
-                               p+=4;
+                               if(!is_numeric)
+                                   p+=4;
                                newkey= atoi(p);
                                }
-                       else if (strncmp("dsa:",p,4) == 0)
+                       else
+#ifndef NO_DSA
+                               if (strncmp("dsa:",p,4) == 0)
                                {
                                X509 *xtmp=NULL;
                                EVP_PKEY *dtmp;
@@ -249,6 +259,9 @@ char **argv;
                                                BIO_printf(bio_err,"unable to load DSA parameters from file\n");
                                                goto end;
                                                }
+
+                                       /* This will 'disapear'
+                                        * when we free xtmp */
                                        dtmp=X509_get_pubkey(xtmp);
                                        if (dtmp->type == EVP_PKEY_DSA)
                                                dsa_params=DSAparams_dup(dtmp->pkey.dsa);
@@ -258,18 +271,21 @@ char **argv;
                                                BIO_printf(bio_err,"Certificate does not contain DSA parameters\n");
                                                goto end;
                                                }
-                                       
                                        }
                                BIO_free(in);
                                newkey=BN_num_bits(dsa_params->p);
                                in=NULL;
                                }
-                       else if (strncmp("dh:",p,4) == 0)
+                       else 
+#endif
+#ifndef NO_DH
+                               if (strncmp("dh:",p,4) == 0)
                                {
                                pkey_type=TYPE_DH;
                                p+=3;
                                }
                        else
+#endif
                                pkey_type=TYPE_RSA;
 
                        newreq=1;
@@ -319,7 +335,7 @@ bad:
                BIO_printf(bio_err,"where options  are\n");
                BIO_printf(bio_err," -inform arg    input format - one of DER TXT PEM\n");
                BIO_printf(bio_err," -outform arg   output format - one of DER TXT PEM\n");
-               BIO_printf(bio_err," -in arg        inout file\n");
+               BIO_printf(bio_err," -in arg        input file\n");
                BIO_printf(bio_err," -out arg       output file\n");
                BIO_printf(bio_err," -text          text form of request\n");
                BIO_printf(bio_err," -noout         do not output REQ\n");
@@ -333,7 +349,7 @@ bad:
                BIO_printf(bio_err," -newkey dsa:file generate a new DSA key, parameters taken from CA in 'file'\n");
 
                BIO_printf(bio_err," -[digest]      Digest to sign with (md5, sha1, md2, mdc2)\n");
-               BIO_printf(bio_err," -config file   request templace file.\n");
+               BIO_printf(bio_err," -config file   request template file.\n");
                BIO_printf(bio_err," -new           new request.\n");
                BIO_printf(bio_err," -x509          output a x509 structure instead of a cert. req.\n");
                BIO_printf(bio_err," -days          number of days a x509 generated by -x509 is valid for.\n");
@@ -344,15 +360,18 @@ bad:
                }
 
        ERR_load_crypto_strings();
+       X509V3_add_standard_extensions();
 
 #ifndef MONOLITH
        /* Lets load up our environment a little */
-       p=getenv("SSLEAY_CONF");
+       p=getenv("OPENSSL_CONF");
+       if (p == NULL)
+               p=getenv("SSLEAY_CONF");
        if (p == NULL)
                {
                strcpy(config_name,X509_get_default_cert_area());
                strcat(config_name,"/lib/");
-               strcat(config_name,SSLEAY_CONF);
+               strcat(config_name,OPENSSL_CONF);
                p=config_name;
                }
         default_config_file=p;
@@ -382,6 +401,29 @@ bad:
                        }
                }
 
+       if (req_conf != NULL)
+               {
+               p=CONF_get_string(req_conf,NULL,"oid_file");
+               if (p != NULL)
+                       {
+                       BIO *oid_bio;
+
+                       oid_bio=BIO_new_file(p,"r");
+                       if (oid_bio == NULL) 
+                               {
+                               /*
+                               BIO_printf(bio_err,"problems opening %s for extra oid's\n",p);
+                               ERR_print_errors(bio_err);
+                               */
+                               }
+                       else
+                               {
+                               OBJ_create_objects(oid_bio);
+                               BIO_free(oid_bio);
+                               }
+                       }
+               }
+
        if ((md_alg == NULL) &&
                ((p=CONF_get_string(req_conf,SECTION,"default_md")) != NULL))
                {
@@ -389,6 +431,8 @@ bad:
                        digest=md_alg;
                }
 
+       extensions = CONF_get_string(req_conf, SECTION, V3_EXTENSIONS);
+
        in=BIO_new(BIO_s_file());
        out=BIO_new(BIO_s_file());
        if ((in == NULL) || (out == NULL))
@@ -463,7 +507,8 @@ bad:
                if (pkey_type == TYPE_RSA)
                        {
                        if (!EVP_PKEY_assign_RSA(pkey,
-                               RSA_generate_key(newkey,0x10001,req_cb)))
+                               RSA_generate_key(newkey,0x10001,
+                                       req_cb,(char *)bio_err)))
                                goto end;
                        }
                else
@@ -559,8 +604,10 @@ loop:
 
        if (newreq || x509)
                {
+#ifndef NO_DSA
                if (pkey->type == EVP_PKEY_DSA)
                        digest=EVP_dss1();
+#endif
 
                if (pkey == NULL)
                        {
@@ -586,12 +633,12 @@ loop:
                        }
                if (x509)
                        {
+                       EVP_PKEY *tmppkey;
+                       X509V3_CTX ext_ctx;
                        if ((x509ss=X509_new()) == NULL) goto end;
 
-                       /* don't set the version number, for starters
-                        * the field is null and second, null is v0 
-                        * if (!ASN1_INTEGER_set(ci->version,0L)) goto end;
-                        */
+                       /* Set version to V3 */
+                       if(!X509_set_version(x509ss, 2)) goto end;
                        ASN1_INTEGER_set(X509_get_serialNumber(x509ss),0L);
 
                        X509_set_issuer_name(x509ss,
@@ -601,7 +648,27 @@ loop:
                                (long)60*60*24*days);
                        X509_set_subject_name(x509ss,
                                X509_REQ_get_subject_name(req));
-                       X509_set_pubkey(x509ss,X509_REQ_get_pubkey(req));
+                       tmppkey = X509_REQ_get_pubkey(req);
+                       X509_set_pubkey(x509ss,tmppkey);
+                       EVP_PKEY_free(tmppkey);
+
+                       /* Set up V3 context struct */
+
+                       ext_ctx.issuer_cert = x509ss;
+                       ext_ctx.subject_cert = x509ss;
+                       ext_ctx.subject_req = NULL;
+                       ext_ctx.crl = NULL;
+                       ext_ctx.flags = 0;
+
+                       /* Add extensions */
+                       if(extensions && !X509V3_EXT_add_conf(req_conf, 
+                                       &ext_ctx, extensions, x509ss))
+                           {
+                           BIO_printf(bio_err,
+                                      "Error Loading extension section %s\n",
+                                      extensions);
+                           goto end;
+                           }
 
                        if (!(i=X509_sign(x509ss,pkey,digest)))
                                goto end;
@@ -625,7 +692,10 @@ loop:
                        }
 
                i=X509_REQ_verify(req,pkey);
-               if (tmp) pkey=NULL;
+               if (tmp) {
+                       EVP_PKEY_free(pkey);
+                       pkey=NULL;
+               }
 
                if (i < 0)
                        {
@@ -682,9 +752,11 @@ loop:
                        goto end; 
                        }
                fprintf(stdout,"Modulus=");
+#ifndef NO_RSA
                if (pubkey->type == EVP_PKEY_RSA)
                        BN_print(out,pubkey->pkey.rsa->n);
                else
+#endif
                        fprintf(stdout,"Wrong Algorithm type");
                fprintf(stdout,"\n");
                }
@@ -733,7 +805,9 @@ end:
        if (pkey != NULL) EVP_PKEY_free(pkey);
        if (req != NULL) X509_REQ_free(req);
        if (x509ss != NULL) X509_free(x509ss);
+#ifndef NO_DSA
        if (dsa_params != NULL) DSA_free(dsa_params);
+#endif
        EXIT(ex);
        }
 
@@ -743,7 +817,7 @@ EVP_PKEY *pkey;
 int attribs;
        {
        int ret=0,i,j;
-       unsigned char *p;
+       unsigned char *p,*q;
        X509_REQ_INFO *ri;
        char buf[100];
        int nid,min,max;
@@ -800,19 +874,43 @@ start:            for (;;)
                        if ((int)sk_num(sk) <= i) break;
 
                        v=(CONF_VALUE *)sk_value(sk,i);
-                       p=NULL;
+                       p=q=NULL;
                        type=v->name;
+                       /* Allow for raw OIDs */
+                       /* [n.mm.ooo.ppp] */
                        for (j=0; type[j] != '\0'; j++)
                                {
                                if (    (type[j] == ':') ||
                                        (type[j] == ',') ||
                                        (type[j] == '.'))
-                                       p= (unsigned char *)&(type[j+1]);
+                                       p=(unsigned char *)&(type[j+1]);
+                               if (type[j] == '[')
+                                       {
+                                       p=(unsigned char *)&(type[j+1]);
+                                       for (j++; type[j] != '\0'; j++)
+                                               if (type[j] == ']')
+                                                       {
+                                                       q=(unsigned char *)&(type[j]);
+                                                       break;
+                                                       }
+                                       break;
+                                       }
                                }
                        if (p != NULL)
                                type=(char *)p;
                        if ((nid=OBJ_txt2nid(type)) == NID_undef)
-                               goto start;
+                               {
+                               /* Add a new one if possible */
+                               if ((p != NULL) && (q != NULL) && (*q == ']'))
+                                       {
+                                       *q='\0';
+                                       nid=OBJ_create((char *)p,NULL,NULL);
+                                       *q=']';
+                                       if (nid == NID_undef) goto start;
+                                       }
+                               else
+                                       goto start;
+                               }
 
                        sprintf(buf,"%s_default",v->name);
                        if ((def=CONF_get_string(req_conf,tmp,buf)) == NULL)
@@ -1044,9 +1142,10 @@ err:
        return(0);
        }
 
-static void MS_CALLBACK req_cb(p, n)
+static void MS_CALLBACK req_cb(p,n,arg)
 int p;
 int n;
+char *arg;
        {
        char c='*';
 
@@ -1054,8 +1153,8 @@ int n;
        if (p == 1) c='+';
        if (p == 2) c='*';
        if (p == 3) c='\n';
-       BIO_write(bio_err,&c,1);
-       BIO_flush(bio_err);
+       BIO_write((BIO *)arg,&c,1);
+       BIO_flush((BIO *)arg);
 #ifdef LINT
        p=n;
 #endif