655811671ac1ebe06abb4583d683f0f4a7bd6263
[openssl.git] / crypto / ocsp / v3_ocsp.c
1 /* v3_ocsp.c */
2 /*
3  * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL project
4  * 1999.
5  */
6 /* ====================================================================
7  * Copyright (c) 1999 The OpenSSL Project.  All rights reserved.
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted provided that the following conditions
11  * are met:
12  *
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  *
16  * 2. Redistributions in binary form must reproduce the above copyright
17  *    notice, this list of conditions and the following disclaimer in
18  *    the documentation and/or other materials provided with the
19  *    distribution.
20  *
21  * 3. All advertising materials mentioning features or use of this
22  *    software must display the following acknowledgment:
23  *    "This product includes software developed by the OpenSSL Project
24  *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
25  *
26  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
27  *    endorse or promote products derived from this software without
28  *    prior written permission. For written permission, please contact
29  *    licensing@OpenSSL.org.
30  *
31  * 5. Products derived from this software may not be called "OpenSSL"
32  *    nor may "OpenSSL" appear in their names without prior written
33  *    permission of the OpenSSL Project.
34  *
35  * 6. Redistributions of any form whatsoever must retain the following
36  *    acknowledgment:
37  *    "This product includes software developed by the OpenSSL Project
38  *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
39  *
40  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
41  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
42  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
43  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
44  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
45  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
46  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
47  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
49  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
50  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
51  * OF THE POSSIBILITY OF SUCH DAMAGE.
52  * ====================================================================
53  *
54  * This product includes cryptographic software written by Eric Young
55  * (eay@cryptsoft.com).  This product includes software written by Tim
56  * Hudson (tjh@cryptsoft.com).
57  *
58  */
59
60 # include <stdio.h>
61 # include "cryptlib.h"
62 # include <openssl/conf.h>
63 # include <openssl/asn1.h>
64 # include <openssl/ocsp.h>
65 # include "ocsp_lcl.h"
66 # include <openssl/x509v3.h>
67
68 /*
69  * OCSP extensions and a couple of CRL entry extensions
70  */
71
72 static int i2r_ocsp_crlid(const X509V3_EXT_METHOD *method, void *nonce,
73                           BIO *out, int indent);
74 static int i2r_ocsp_acutoff(const X509V3_EXT_METHOD *method, void *nonce,
75                             BIO *out, int indent);
76 static int i2r_object(const X509V3_EXT_METHOD *method, void *obj, BIO *out,
77                       int indent);
78
79 static void *ocsp_nonce_new(void);
80 static int i2d_ocsp_nonce(void *a, unsigned char **pp);
81 static void *d2i_ocsp_nonce(void *a, const unsigned char **pp, long length);
82 static void ocsp_nonce_free(void *a);
83 static int i2r_ocsp_nonce(const X509V3_EXT_METHOD *method, void *nonce,
84                           BIO *out, int indent);
85
86 static int i2r_ocsp_nocheck(const X509V3_EXT_METHOD *method,
87                             void *nocheck, BIO *out, int indent);
88 static void *s2i_ocsp_nocheck(const X509V3_EXT_METHOD *method,
89                               X509V3_CTX *ctx, const char *str);
90 static int i2r_ocsp_serviceloc(const X509V3_EXT_METHOD *method, void *in,
91                                BIO *bp, int ind);
92
93 const X509V3_EXT_METHOD v3_ocsp_crlid = {
94     NID_id_pkix_OCSP_CrlID, 0, ASN1_ITEM_ref(OCSP_CRLID),
95     0, 0, 0, 0,
96     0, 0,
97     0, 0,
98     i2r_ocsp_crlid, 0,
99     NULL
100 };
101
102 const X509V3_EXT_METHOD v3_ocsp_acutoff = {
103     NID_id_pkix_OCSP_archiveCutoff, 0, ASN1_ITEM_ref(ASN1_GENERALIZEDTIME),
104     0, 0, 0, 0,
105     0, 0,
106     0, 0,
107     i2r_ocsp_acutoff, 0,
108     NULL
109 };
110
111 const X509V3_EXT_METHOD v3_crl_invdate = {
112     NID_invalidity_date, 0, ASN1_ITEM_ref(ASN1_GENERALIZEDTIME),
113     0, 0, 0, 0,
114     0, 0,
115     0, 0,
116     i2r_ocsp_acutoff, 0,
117     NULL
118 };
119
120 const X509V3_EXT_METHOD v3_crl_hold = {
121     NID_hold_instruction_code, 0, ASN1_ITEM_ref(ASN1_OBJECT),
122     0, 0, 0, 0,
123     0, 0,
124     0, 0,
125     i2r_object, 0,
126     NULL
127 };
128
129 const X509V3_EXT_METHOD v3_ocsp_nonce = {
130     NID_id_pkix_OCSP_Nonce, 0, NULL,
131     ocsp_nonce_new,
132     ocsp_nonce_free,
133     d2i_ocsp_nonce,
134     i2d_ocsp_nonce,
135     0, 0,
136     0, 0,
137     i2r_ocsp_nonce, 0,
138     NULL
139 };
140
141 const X509V3_EXT_METHOD v3_ocsp_nocheck = {
142     NID_id_pkix_OCSP_noCheck, 0, ASN1_ITEM_ref(ASN1_NULL),
143     0, 0, 0, 0,
144     0, s2i_ocsp_nocheck,
145     0, 0,
146     i2r_ocsp_nocheck, 0,
147     NULL
148 };
149
150 const X509V3_EXT_METHOD v3_ocsp_serviceloc = {
151     NID_id_pkix_OCSP_serviceLocator, 0, ASN1_ITEM_ref(OCSP_SERVICELOC),
152     0, 0, 0, 0,
153     0, 0,
154     0, 0,
155     i2r_ocsp_serviceloc, 0,
156     NULL
157 };
158
159 static int i2r_ocsp_crlid(const X509V3_EXT_METHOD *method, void *in, BIO *bp,
160                           int ind)
161 {
162     OCSP_CRLID *a = in;
163     if (a->crlUrl) {
164         if (BIO_printf(bp, "%*scrlUrl: ", ind, "") <= 0)
165             goto err;
166         if (!ASN1_STRING_print(bp, (ASN1_STRING *)a->crlUrl))
167             goto err;
168         if (BIO_write(bp, "\n", 1) <= 0)
169             goto err;
170     }
171     if (a->crlNum) {
172         if (BIO_printf(bp, "%*scrlNum: ", ind, "") <= 0)
173             goto err;
174         if (i2a_ASN1_INTEGER(bp, a->crlNum) <= 0)
175             goto err;
176         if (BIO_write(bp, "\n", 1) <= 0)
177             goto err;
178     }
179     if (a->crlTime) {
180         if (BIO_printf(bp, "%*scrlTime: ", ind, "") <= 0)
181             goto err;
182         if (!ASN1_GENERALIZEDTIME_print(bp, a->crlTime))
183             goto err;
184         if (BIO_write(bp, "\n", 1) <= 0)
185             goto err;
186     }
187     return 1;
188  err:
189     return 0;
190 }
191
192 static int i2r_ocsp_acutoff(const X509V3_EXT_METHOD *method, void *cutoff,
193                             BIO *bp, int ind)
194 {
195     if (BIO_printf(bp, "%*s", ind, "") <= 0)
196         return 0;
197     if (!ASN1_GENERALIZEDTIME_print(bp, cutoff))
198         return 0;
199     return 1;
200 }
201
202 static int i2r_object(const X509V3_EXT_METHOD *method, void *oid, BIO *bp,
203                       int ind)
204 {
205     if (BIO_printf(bp, "%*s", ind, "") <= 0)
206         return 0;
207     if (i2a_ASN1_OBJECT(bp, oid) <= 0)
208         return 0;
209     return 1;
210 }
211
212 /*
213  * OCSP nonce. This is needs special treatment because it doesn't have an
214  * ASN1 encoding at all: it just contains arbitrary data.
215  */
216
217 static void *ocsp_nonce_new(void)
218 {
219     return ASN1_OCTET_STRING_new();
220 }
221
222 static int i2d_ocsp_nonce(void *a, unsigned char **pp)
223 {
224     ASN1_OCTET_STRING *os = a;
225     if (pp) {
226         memcpy(*pp, os->data, os->length);
227         *pp += os->length;
228     }
229     return os->length;
230 }
231
232 static void *d2i_ocsp_nonce(void *a, const unsigned char **pp, long length)
233 {
234     ASN1_OCTET_STRING *os, **pos;
235     pos = a;
236     if (!pos || !*pos)
237         os = ASN1_OCTET_STRING_new();
238     else
239         os = *pos;
240     if (!ASN1_OCTET_STRING_set(os, *pp, length))
241         goto err;
242
243     *pp += length;
244
245     if (pos)
246         *pos = os;
247     return os;
248
249  err:
250     if (os && (!pos || (*pos != os)))
251         ASN1_OCTET_STRING_free(os);
252     OCSPerr(OCSP_F_D2I_OCSP_NONCE, ERR_R_MALLOC_FAILURE);
253     return NULL;
254 }
255
256 static void ocsp_nonce_free(void *a)
257 {
258     ASN1_OCTET_STRING_free(a);
259 }
260
261 static int i2r_ocsp_nonce(const X509V3_EXT_METHOD *method, void *nonce,
262                           BIO *out, int indent)
263 {
264     if (BIO_printf(out, "%*s", indent, "") <= 0)
265         return 0;
266     if (i2a_ASN1_STRING(out, nonce, V_ASN1_OCTET_STRING) <= 0)
267         return 0;
268     return 1;
269 }
270
271 /* Nocheck is just a single NULL. Don't print anything and always set it */
272
273 static int i2r_ocsp_nocheck(const X509V3_EXT_METHOD *method, void *nocheck,
274                             BIO *out, int indent)
275 {
276     return 1;
277 }
278
279 static void *s2i_ocsp_nocheck(const X509V3_EXT_METHOD *method,
280                               X509V3_CTX *ctx, const char *str)
281 {
282     return ASN1_NULL_new();
283 }
284
285 static int i2r_ocsp_serviceloc(const X509V3_EXT_METHOD *method, void *in,
286                                BIO *bp, int ind)
287 {
288     int i;
289     OCSP_SERVICELOC *a = in;
290     ACCESS_DESCRIPTION *ad;
291
292     if (BIO_printf(bp, "%*sIssuer: ", ind, "") <= 0)
293         goto err;
294     if (X509_NAME_print_ex(bp, a->issuer, 0, XN_FLAG_ONELINE) <= 0)
295         goto err;
296     for (i = 0; i < sk_ACCESS_DESCRIPTION_num(a->locator); i++) {
297         ad = sk_ACCESS_DESCRIPTION_value(a->locator, i);
298         if (BIO_printf(bp, "\n%*s", (2 * ind), "") <= 0)
299             goto err;
300         if (i2a_ASN1_OBJECT(bp, ad->method) <= 0)
301             goto err;
302         if (BIO_puts(bp, " - ") <= 0)
303             goto err;
304         if (GENERAL_NAME_print(bp, ad->location) <= 0)
305             goto err;
306     }
307     return 1;
308  err:
309     return 0;
310 }