Remove some unnecessary recursive includes from the internal apps.h header,
[openssl.git] / apps / ocsp.c
index e11e7b1f9a6f914bb3ba59e843864c38227303ff..52af592a4a6174f3336d63f3d5aa240f238837f4 100644 (file)
  * Hudson (tjh@cryptsoft.com).
  *
  */
+#ifndef OPENSSL_NO_OCSP
 
 #include <stdio.h>
 #include <string.h>
+#include "apps.h"
 #include <openssl/pem.h>
 #include <openssl/ocsp.h>
 #include <openssl/err.h>
 #include <openssl/ssl.h>
-#include "apps.h"
+#include <openssl/bn.h>
 
 /* Maximum leeway in validity period: default 5 minutes */
 #define MAX_VALIDITY_PERIOD    (5 * 60)
 
-/* CA index.txt definitions */
-#define DB_type         0
-#define DB_exp_date     1
-#define DB_rev_date     2
-#define DB_serial       3       /* index - unique */
-#define DB_file         4       
-#define DB_name         5       /* index - unique for active */
-#define DB_NUMBER       6
-
-#define DB_TYPE_REV    'R'
-#define DB_TYPE_EXP    'E'
-#define DB_TYPE_VAL    'V'
-
 static int add_ocsp_cert(OCSP_REQUEST **req, X509 *cert, X509 *issuer,
                                STACK_OF(OCSP_CERTID) *ids);
 static int add_ocsp_serial(OCSP_REQUEST **req, char *serial, X509 *issuer,
@@ -88,13 +77,14 @@ static int print_ocsp_summary(BIO *out, OCSP_BASICRESP *bs, OCSP_REQUEST *req,
                                STACK *names, STACK_OF(OCSP_CERTID) *ids,
                                long nsec, long maxage);
 
-static int make_ocsp_response(OCSP_RESPONSE **resp, OCSP_REQUEST *req, TXT_DB *db,
+static int make_ocsp_response(OCSP_RESPONSE **resp, OCSP_REQUEST *req, CA_DB *db,
                        X509 *ca, X509 *rcert, EVP_PKEY *rkey,
                        STACK_OF(X509) *rother, unsigned long flags,
                        int nmin, int ndays);
 
-static char **lookup_serial(TXT_DB *db, ASN1_INTEGER *ser);
-static OCSP_REQUEST *do_responder(BIO **cbio, char *port);
+static char **lookup_serial(CA_DB *db, ASN1_INTEGER *ser);
+static BIO *init_responder(char *port);
+static int do_responder(OCSP_REQUEST **preq, BIO **pcbio, BIO *acbio, char *port);
 static int send_ocsp_response(BIO *cbio, OCSP_RESPONSE *resp);
 
 #undef PROG
@@ -119,7 +109,8 @@ int MAIN(int argc, char **argv)
        X509 *issuer = NULL, *cert = NULL;
        X509 *signer = NULL, *rsigner = NULL;
        EVP_PKEY *key = NULL, *rkey = NULL;
-       BIO *cbio = NULL, *derbio = NULL;
+       BIO *acbio = NULL, *cbio = NULL;
+       BIO *derbio = NULL;
        BIO *out = NULL;
        int req_text = 0, resp_text = 0;
        long nsec = MAX_VALIDITY_PERIOD, maxage = -1;
@@ -130,18 +121,23 @@ int MAIN(int argc, char **argv)
        char *sign_certfile = NULL, *verify_certfile = NULL, *rcertfile = NULL;
        unsigned long sign_flags = 0, verify_flags = 0, rflags = 0;
        int ret = 1;
+       int accept_count = -1;
        int badarg = 0;
        int i;
+       int ignore_err = 0;
        STACK *reqnames = NULL;
        STACK_OF(OCSP_CERTID) *ids = NULL;
 
        X509 *rca_cert = NULL;
        char *ridx_filename = NULL;
        char *rca_filename = NULL;
-       TXT_DB *rdb = NULL;
+       CA_DB *rdb = NULL;
        int nmin = 0, ndays = -1;
 
        if (bio_err == NULL) bio_err = BIO_new_fp(stderr, BIO_NOCLOSE);
+
+       if (!load_config(bio_err, NULL))
+               goto end;
        SSL_load_error_strings();
        args = argv + 1;
        reqnames = sk_new_null();
@@ -188,17 +184,17 @@ int MAIN(int argc, char **argv)
                                }
                        else badarg = 1;
                        }
+               else if (!strcmp(*args, "-ignore_err"))
+                       ignore_err = 1;
                else if (!strcmp(*args, "-noverify"))
                        noverify = 1;
                else if (!strcmp(*args, "-nonce"))
                        add_nonce = 2;
                else if (!strcmp(*args, "-no_nonce"))
                        add_nonce = 0;
-               else if (!strcmp(*args, "-responder_no_certs"))
+               else if (!strcmp(*args, "-resp_no_certs"))
                        rflags |= OCSP_NOCERTS;
-               else if (!strcmp(*args, "-responder_no_time"))
-                       rflags |= OCSP_NOTIME;
-               else if (!strcmp(*args, "-responder_key_id"))
+               else if (!strcmp(*args, "-resp_key_id"))
                        rflags |= OCSP_RESPID_KEY;
                else if (!strcmp(*args, "-no_certs"))
                        sign_flags |= OCSP_NOCERTS;
@@ -442,6 +438,22 @@ int MAIN(int argc, char **argv)
                                        ndays = 0;
                        else badarg = 1;
                        }
+               else if (!strcmp (*args, "-nrequest"))
+                       {
+                       if (args[1])
+                               {
+                               args++;
+                               accept_count = atol(*args);
+                               if (accept_count < 0)
+                                       {
+                                       BIO_printf(bio_err,
+                                               "Illegal accept count %s\n",
+                                               *args);
+                                       badarg = 1;
+                                       }
+                               }
+                       else badarg = 1;
+                       }
                else if (!strcmp (*args, "-ndays"))
                        {
                        if (args[1])
@@ -503,7 +515,7 @@ int MAIN(int argc, char **argv)
                BIO_printf (bio_err, "-serial n          serial number to check\n");
                BIO_printf (bio_err, "-signer file       certificate to sign OCSP request with\n");
                BIO_printf (bio_err, "-signkey file      private key to sign OCSP request with\n");
-               BIO_printf (bio_err, "-sign_certs file   additional certificates to include in signed request\n");
+               BIO_printf (bio_err, "-sign_other file   additional certificates to include in signed request\n");
                BIO_printf (bio_err, "-no_certs          don't include any certificates in signed request\n");
                BIO_printf (bio_err, "-req_text          print text form of request\n");
                BIO_printf (bio_err, "-resp_text         print text form of response\n");
@@ -523,13 +535,24 @@ int MAIN(int argc, char **argv)
                BIO_printf (bio_err, "-validity_period n maximum validity discrepancy in seconds\n");
                BIO_printf (bio_err, "-status_age n      maximum status age in seconds\n");
                BIO_printf (bio_err, "-noverify          don't verify response at all\n");
-               BIO_printf (bio_err, "-verify_certs file additional certificates to search for signer\n");
+               BIO_printf (bio_err, "-verify_other file additional certificates to search for signer\n");
                BIO_printf (bio_err, "-trust_other       don't verify additional certificates\n");
                BIO_printf (bio_err, "-no_intern         don't search certificates contained in response for signer\n");
-               BIO_printf (bio_err, "-no_sig_verify     don't check signature on response\n");
+               BIO_printf (bio_err, "-no_signature_verify don't check signature on response\n");
                BIO_printf (bio_err, "-no_cert_verify    don't check signing certificate\n");
                BIO_printf (bio_err, "-no_chain          don't chain verify response\n");
                BIO_printf (bio_err, "-no_cert_checks    don't do additional checks on signing certificate\n");
+               BIO_printf (bio_err, "-port num          port to run responder on\n");
+               BIO_printf (bio_err, "-index file        certificate status index file\n");
+               BIO_printf (bio_err, "-CA file           CA certificate\n");
+               BIO_printf (bio_err, "-rsigner file      responder certificate to sign responses with\n");
+               BIO_printf (bio_err, "-rkey file         responder key to sign responses with\n");
+               BIO_printf (bio_err, "-rother file       other certificates to include in response\n");
+               BIO_printf (bio_err, "-resp_no_certs     don't include any certificates in response\n");
+               BIO_printf (bio_err, "-nmin n            number of minutes before next update\n");
+               BIO_printf (bio_err, "-ndays n           number of days before next update\n");
+               BIO_printf (bio_err, "-resp_key_id       identify reponse by signing certificate key ID\n");
+               BIO_printf (bio_err, "-nrequest n        number of requests to accept (default unlimited)\n");
                goto end;
                }
 
@@ -563,10 +586,44 @@ int MAIN(int argc, char **argv)
 
        if (!req && port)
                {
-               req = do_responder(&cbio, port);
-               if (!req && !cbio)
+               acbio = init_responder(port);
+               if (!acbio)
+                       goto end;
+               }
+
+       if (rsignfile && !rdb)
+               {
+               if (!rkeyfile) rkeyfile = rsignfile;
+               rsigner = load_cert(bio_err, rsignfile, FORMAT_PEM,
+                       NULL, e, "responder certificate");
+               if (!rsigner)
+                       {
+                       BIO_printf(bio_err, "Error loading responder certificate\n");
+                       goto end;
+                       }
+               rca_cert = load_cert(bio_err, rca_filename, FORMAT_PEM,
+                       NULL, e, "CA certificate");
+               if (rcertfile)
+                       {
+                       rother = load_certs(bio_err, rcertfile, FORMAT_PEM,
+                               NULL, e, "responder other certificates");
+                       if (!rother) goto end;
+                       }
+               rkey = load_key(bio_err, rkeyfile, FORMAT_PEM, 0, NULL, NULL,
+                       "responder private key");
+               if (!rkey)
+                       goto end;
+               }
+       if(acbio)
+               BIO_printf(bio_err, "Waiting for OCSP client connections...\n");
+
+       redo_accept:
+
+       if (acbio)
+               {
+               if (!do_responder(&req, &cbio, acbio, port))
                        goto end;
-               if (!req && cbio)
+               if (!req)
                        {
                        resp = OCSP_response_create(OCSP_RESPONSE_STATUS_MALFORMEDREQUEST, NULL);
                        send_ocsp_response(cbio, resp);
@@ -598,7 +655,7 @@ int MAIN(int argc, char **argv)
                                NULL, e, "signer certificates");
                        if (!sign_other) goto end;
                        }
-               key = load_key(bio_err, keyfile, FORMAT_PEM, NULL, NULL,
+               key = load_key(bio_err, keyfile, FORMAT_PEM, 0, NULL, NULL,
                        "signer private key");
                if (!key)
                        goto end;
@@ -611,28 +668,16 @@ int MAIN(int argc, char **argv)
 
        if (req_text && req) OCSP_REQUEST_print(out, req, 0);
 
-       if (rsignfile)
+       if (reqout)
                {
-               if (!rkeyfile) rkeyfile = rsignfile;
-               rsigner = load_cert(bio_err, rsignfile, FORMAT_PEM,
-                       NULL, e, "responder certificate");
-               if (!rsigner)
+               derbio = BIO_new_file(reqout, "wb");
+               if(!derbio)
                        {
-                       BIO_printf(bio_err, "Error loading responder certificate\n");
+                       BIO_printf(bio_err, "Error opening file %s\n", reqout);
                        goto end;
                        }
-               rca_cert = load_cert(bio_err, rca_filename, FORMAT_PEM,
-                       NULL, e, "CA certificate");
-               if (rcertfile)
-                       {
-                       rother = load_certs(bio_err, sign_certfile, FORMAT_PEM,
-                               NULL, e, "responder other certificates");
-                       if (!sign_other) goto end;
-                       }
-               rkey = load_key(bio_err, rkeyfile, FORMAT_PEM, NULL, NULL,
-                       "responder private key");
-               if (!rkey)
-                       goto end;
+               i2d_OCSP_REQUEST_bio(derbio, req);
+               BIO_free(derbio);
                }
 
        if (ridx_filename && (!rkey || !rsigner || !rca_cert))
@@ -641,31 +686,27 @@ int MAIN(int argc, char **argv)
                goto end;
                }
 
-       if (ridx_filename)
+       if (ridx_filename && !rdb)
+               {
+               rdb = load_index(ridx_filename, NULL);
+               if (!rdb) goto end;
+               if (!index_index(rdb)) goto end;
+               }
+
+       if (rdb)
                {
-               BIO *db_bio = NULL;
-               db_bio = BIO_new_file(ridx_filename, "r");
-               if (!db_bio)
-                       {
-                       BIO_printf(bio_err, "Error opening index file %s\n", ridx_filename);
-                       goto end;
-                       }
-               rdb = TXT_DB_read(db_bio, DB_NUMBER);
-               BIO_free(db_bio);
-               if (!rdb)
-                       {
-                       BIO_printf(bio_err, "Error reading index file %s\n", ridx_filename);
-                       goto end;
-                       }
-               if (!make_serial_index(rdb))
-                       goto end;
                i = make_ocsp_response(&resp, req, rdb, rca_cert, rsigner, rkey, rother, rflags, nmin, ndays);
                if (cbio)
                        send_ocsp_response(cbio, resp);
                }
        else if (host)
                {
+#ifndef OPENSSL_NO_SOCK
                cbio = BIO_new_connect(host);
+#else
+               BIO_printf(bio_err, "Error creating connect BIO - sockets not supported.\n");
+               goto end;
+#endif
                if (!cbio)
                        {
                        BIO_printf(bio_err, "Error creating connect BIO\n");
@@ -675,7 +716,16 @@ int MAIN(int argc, char **argv)
                if (use_ssl == 1)
                        {
                        BIO *sbio;
+#if !defined(OPENSSL_NO_SSL2) && !defined(OPENSSL_NO_SSL3)
                        ctx = SSL_CTX_new(SSLv23_client_method());
+#elif !defined(OPENSSL_NO_SSL3)
+                       ctx = SSL_CTX_new(SSLv3_client_method());
+#elif !defined(OPENSSL_NO_SSL2)
+                       ctx = SSL_CTX_new(SSLv2_client_method());
+#else
+                       BIO_printf(bio_err, "SSL is disabled\n");
+                       goto end;
+#endif
                        SSL_CTX_set_mode(ctx, SSL_MODE_AUTO_RETRY);
                        sbio = BIO_new_ssl(ctx, 1);
                        cbio = BIO_push(sbio, cbio);
@@ -735,8 +785,10 @@ int MAIN(int argc, char **argv)
 
        if (i != OCSP_RESPONSE_STATUS_SUCCESSFUL)
                {
-               BIO_printf(out, "Responder Error: %s (%ld)\n",
+               BIO_printf(out, "Responder Error: %s (%d)\n",
                                OCSP_response_status_str(i), i);
+               if (ignore_err)
+                       goto redo_accept;
                ret = 0;
                goto end;
                }
@@ -745,10 +797,27 @@ int MAIN(int argc, char **argv)
 
        /* If running as responder don't verify our own response */
        if (cbio)
+               {
+               if (accept_count > 0)
+                       accept_count--;
+               /* Redo if more connections needed */
+               if (accept_count)
+                       {
+                       BIO_free_all(cbio);
+                       cbio = NULL;
+                       OCSP_REQUEST_free(req);
+                       req = NULL;
+                       OCSP_RESPONSE_free(resp);
+                       resp = NULL;
+                       goto redo_accept;
+                       }
                goto end;
+               }
 
-       store = setup_verify(bio_err, CAfile, CApath);
-       if(!store) goto end;
+       if (!store)
+               store = setup_verify(bio_err, CAfile, CApath);
+       if (!store)
+               goto end;
        if (verify_certfile)
                {
                verify_other = load_certs(bio_err, verify_certfile, FORMAT_PEM,
@@ -782,7 +851,7 @@ int MAIN(int argc, char **argv)
 
                if(i <= 0)
                        {
-                       BIO_printf(bio_err, "Response Verify Failure\n", i);
+                       BIO_printf(bio_err, "Response Verify Failure\n");
                        ERR_print_errors(bio_err);
                        }
                else
@@ -805,8 +874,9 @@ end:
        X509_free(cert);
        X509_free(rsigner);
        X509_free(rca_cert);
-       TXT_DB_free(rdb);
+       free_index(rdb);
        BIO_free_all(cbio);
+       BIO_free_all(acbio);
        BIO_free(out);
        OCSP_REQUEST_free(req);
        OCSP_RESPONSE_free(resp);
@@ -824,7 +894,7 @@ end:
                SSL_CTX_free(ctx);
                }
 
-       EXIT(ret);
+       OPENSSL_EXIT(ret);
 }
 
 static int add_ocsp_cert(OCSP_REQUEST **req, X509 *cert, X509 *issuer,
@@ -946,7 +1016,7 @@ static int print_ocsp_summary(BIO *out, OCSP_BASICRESP *bs, OCSP_REQUEST *req,
        }
 
 
-static int make_ocsp_response(OCSP_RESPONSE **resp, OCSP_REQUEST *req, TXT_DB *db,
+static int make_ocsp_response(OCSP_RESPONSE **resp, OCSP_REQUEST *req, CA_DB *db,
                        X509 *ca, X509 *rcert, EVP_PKEY *rkey,
                        STACK_OF(X509) *rother, unsigned long flags,
                        int nmin, int ndays)
@@ -1038,33 +1108,37 @@ static int make_ocsp_response(OCSP_RESPONSE **resp, OCSP_REQUEST *req, TXT_DB *d
 
        }
 
-static char **lookup_serial(TXT_DB *db, ASN1_INTEGER *ser)
+static char **lookup_serial(CA_DB *db, ASN1_INTEGER *ser)
        {
        int i;
        BIGNUM *bn = NULL;
        char *itmp, *row[DB_NUMBER],**rrow;
        for (i = 0; i < DB_NUMBER; i++) row[i] = NULL;
        bn = ASN1_INTEGER_to_BN(ser,NULL);
-       itmp = BN_bn2hex(bn);
+       if (BN_is_zero(bn))
+               itmp = BUF_strdup("00");
+       else
+               itmp = BN_bn2hex(bn);
        row[DB_serial] = itmp;
        BN_free(bn);
-       rrow=TXT_DB_get_by_index(db,DB_serial,row);
+       rrow=TXT_DB_get_by_index(db->db,DB_serial,row);
        OPENSSL_free(itmp);
        return rrow;
        }
 
 /* Quick and dirty OCSP server: read in and parse input request */
 
-static OCSP_REQUEST *do_responder(BIO **pcbio, char *port)
+static BIO *init_responder(char *port)
        {
-       int have_post = 0, len;
-       OCSP_REQUEST *req = NULL;
-       char inbuf[1024];
-       BIO *acbio = NULL, *bufbio = NULL, *cbio = NULL;
+       BIO *acbio = NULL, *bufbio = NULL;
        bufbio = BIO_new(BIO_f_buffer());
        if (!bufbio) 
                goto err;
+#ifndef OPENSSL_NO_SOCK
        acbio = BIO_new_accept(port);
+#else
+       BIO_printf(bio_err, "Error setting up accept BIO - sockets not supported.\n");
+#endif
        if (!acbio)
                goto err;
        BIO_set_accept_bios(acbio, bufbio);
@@ -1077,33 +1151,43 @@ static OCSP_REQUEST *do_responder(BIO **pcbio, char *port)
                        goto err;
                }
 
-       BIO_printf(bio_err, "Waiting for OCSP client connection...\n");
+       return acbio;
+
+       err:
+       BIO_free_all(acbio);
+       BIO_free(bufbio);
+       return NULL;
+       }
+
+static int do_responder(OCSP_REQUEST **preq, BIO **pcbio, BIO *acbio, char *port)
+       {
+       int have_post = 0, len;
+       OCSP_REQUEST *req = NULL;
+       char inbuf[1024];
+       BIO *cbio = NULL;
 
        if (BIO_do_accept(acbio) <= 0)
                {
                        BIO_printf(bio_err, "Error accepting connection\n");
                        ERR_print_errors(bio_err);
-                       goto err;
+                       return 0;
                }
 
-       BIO_printf(bio_err, "Connection Established\n");
-
-
        cbio = BIO_pop(acbio);
-       BIO_free_all(acbio);
-       acbio = NULL;
+       *pcbio = cbio;
 
        for(;;)
                {
-               len = BIO_gets(cbio, inbuf, 1024);
-               if (len <= 0) goto err;
+               len = BIO_gets(cbio, inbuf, sizeof inbuf);
+               if (len <= 0)
+                       return 1;
                /* Look for "POST" signalling start of query */
                if (!have_post)
                        {
                        if(strncmp(inbuf, "POST", 4))
                                {
                                BIO_printf(bio_err, "Invalid request\n");
-                               goto err;
+                               return 1;
                                }
                        have_post = 1;
                        }
@@ -1116,22 +1200,16 @@ static OCSP_REQUEST *do_responder(BIO **pcbio, char *port)
 
        req = d2i_OCSP_REQUEST_bio(cbio, NULL);
 
-       *pcbio = cbio;
-
        if (!req)
                {
                BIO_printf(bio_err, "Error parsing OCSP request\n");
                ERR_print_errors(bio_err);
                }
 
-       return req;
+       *preq = req;
+
+       return 1;
 
-       err:
-       BIO_free_all(acbio);
-       BIO_free_all(cbio);
-       BIO_free(bufbio);
-       OCSP_REQUEST_free(req);
-       return NULL;
        }
 
 static int send_ocsp_response(BIO *cbio, OCSP_RESPONSE *resp)
@@ -1147,3 +1225,4 @@ static int send_ocsp_response(BIO *cbio, OCSP_RESPONSE *resp)
        return 1;
        }
 
+#endif