libressl: Fix validation errors in certificate chains with expired certificates
[dragonfly.git] / crypto / libressl / crypto / x509 / x509_bcons.c
1 /* $OpenBSD: x509_bcons.c,v 1.1 2020/06/04 15:19:31 jsing Exp $ */
2 /* Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL
3  * project 1999.
4  */
5 /* ====================================================================
6  * Copyright (c) 1999 The OpenSSL Project.  All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  *
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  *
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in
17  *    the documentation and/or other materials provided with the
18  *    distribution.
19  *
20  * 3. All advertising materials mentioning features or use of this
21  *    software must display the following acknowledgment:
22  *    "This product includes software developed by the OpenSSL Project
23  *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
24  *
25  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
26  *    endorse or promote products derived from this software without
27  *    prior written permission. For written permission, please contact
28  *    licensing@OpenSSL.org.
29  *
30  * 5. Products derived from this software may not be called "OpenSSL"
31  *    nor may "OpenSSL" appear in their names without prior written
32  *    permission of the OpenSSL Project.
33  *
34  * 6. Redistributions of any form whatsoever must retain the following
35  *    acknowledgment:
36  *    "This product includes software developed by the OpenSSL Project
37  *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
38  *
39  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
40  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
41  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
42  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
43  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
44  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
45  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
46  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
48  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
49  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
50  * OF THE POSSIBILITY OF SUCH DAMAGE.
51  * ====================================================================
52  *
53  * This product includes cryptographic software written by Eric Young
54  * (eay@cryptsoft.com).  This product includes software written by Tim
55  * Hudson (tjh@cryptsoft.com).
56  *
57  */
58
59 #include <stdio.h>
60 #include <string.h>
61
62 #include <openssl/asn1.h>
63 #include <openssl/asn1t.h>
64 #include <openssl/conf.h>
65 #include <openssl/err.h>
66 #include <openssl/x509v3.h>
67
68 static STACK_OF(CONF_VALUE) *i2v_BASIC_CONSTRAINTS(X509V3_EXT_METHOD *method,
69     BASIC_CONSTRAINTS *bcons, STACK_OF(CONF_VALUE) *extlist);
70 static BASIC_CONSTRAINTS *v2i_BASIC_CONSTRAINTS(X509V3_EXT_METHOD *method,
71     X509V3_CTX *ctx, STACK_OF(CONF_VALUE) *values);
72
73 const X509V3_EXT_METHOD v3_bcons = {
74         .ext_nid = NID_basic_constraints,
75         .ext_flags = 0,
76         .it = &BASIC_CONSTRAINTS_it,
77         .ext_new = NULL,
78         .ext_free = NULL,
79         .d2i = NULL,
80         .i2d = NULL,
81         .i2s = NULL,
82         .s2i = NULL,
83         .i2v = (X509V3_EXT_I2V)i2v_BASIC_CONSTRAINTS,
84         .v2i = (X509V3_EXT_V2I)v2i_BASIC_CONSTRAINTS,
85         .i2r = NULL,
86         .r2i = NULL,
87         .usr_data = NULL,
88 };
89
90 static const ASN1_TEMPLATE BASIC_CONSTRAINTS_seq_tt[] = {
91         {
92                 .flags = ASN1_TFLG_OPTIONAL,
93                 .tag = 0,
94                 .offset = offsetof(BASIC_CONSTRAINTS, ca),
95                 .field_name = "ca",
96                 .item = &ASN1_FBOOLEAN_it,
97         },
98         {
99                 .flags = ASN1_TFLG_OPTIONAL,
100                 .tag = 0,
101                 .offset = offsetof(BASIC_CONSTRAINTS, pathlen),
102                 .field_name = "pathlen",
103                 .item = &ASN1_INTEGER_it,
104         },
105 };
106
107 const ASN1_ITEM BASIC_CONSTRAINTS_it = {
108         .itype = ASN1_ITYPE_SEQUENCE,
109         .utype = V_ASN1_SEQUENCE,
110         .templates = BASIC_CONSTRAINTS_seq_tt,
111         .tcount = sizeof(BASIC_CONSTRAINTS_seq_tt) / sizeof(ASN1_TEMPLATE),
112         .funcs = NULL,
113         .size = sizeof(BASIC_CONSTRAINTS),
114         .sname = "BASIC_CONSTRAINTS",
115 };
116
117
118 BASIC_CONSTRAINTS *
119 d2i_BASIC_CONSTRAINTS(BASIC_CONSTRAINTS **a, const unsigned char **in, long len)
120 {
121         return (BASIC_CONSTRAINTS *)ASN1_item_d2i((ASN1_VALUE **)a, in, len,
122             &BASIC_CONSTRAINTS_it);
123 }
124
125 int
126 i2d_BASIC_CONSTRAINTS(BASIC_CONSTRAINTS *a, unsigned char **out)
127 {
128         return ASN1_item_i2d((ASN1_VALUE *)a, out, &BASIC_CONSTRAINTS_it);
129 }
130
131 BASIC_CONSTRAINTS *
132 BASIC_CONSTRAINTS_new(void)
133 {
134         return (BASIC_CONSTRAINTS *)ASN1_item_new(&BASIC_CONSTRAINTS_it);
135 }
136
137 void
138 BASIC_CONSTRAINTS_free(BASIC_CONSTRAINTS *a)
139 {
140         ASN1_item_free((ASN1_VALUE *)a, &BASIC_CONSTRAINTS_it);
141 }
142
143
144 static STACK_OF(CONF_VALUE) *
145 i2v_BASIC_CONSTRAINTS(X509V3_EXT_METHOD *method, BASIC_CONSTRAINTS *bcons,
146     STACK_OF(CONF_VALUE) *extlist)
147 {
148         STACK_OF(CONF_VALUE) *free_extlist = NULL;
149
150         if (extlist == NULL) {
151                 if ((free_extlist = extlist = sk_CONF_VALUE_new_null()) == NULL)
152                         return NULL;
153         }
154
155         if (!X509V3_add_value_bool("CA", bcons->ca, &extlist))
156                 goto err;
157         if (!X509V3_add_value_int("pathlen", bcons->pathlen, &extlist))
158                 goto err;
159
160         return extlist;
161
162  err:
163         sk_CONF_VALUE_pop_free(free_extlist, X509V3_conf_free);
164
165         return NULL;
166 }
167
168 static BASIC_CONSTRAINTS *
169 v2i_BASIC_CONSTRAINTS(X509V3_EXT_METHOD *method, X509V3_CTX *ctx,
170     STACK_OF(CONF_VALUE) *values)
171 {
172         BASIC_CONSTRAINTS *bcons = NULL;
173         CONF_VALUE *val;
174         int i;
175
176         if (!(bcons = BASIC_CONSTRAINTS_new())) {
177                 X509V3error(ERR_R_MALLOC_FAILURE);
178                 return NULL;
179         }
180         for (i = 0; i < sk_CONF_VALUE_num(values); i++) {
181                 val = sk_CONF_VALUE_value(values, i);
182                 if (!strcmp(val->name, "CA")) {
183                         if (!X509V3_get_value_bool(val, &bcons->ca))
184                                 goto err;
185                 } else if (!strcmp(val->name, "pathlen")) {
186                         if (!X509V3_get_value_int(val, &bcons->pathlen))
187                                 goto err;
188                 } else {
189                         X509V3error(X509V3_R_INVALID_NAME);
190                         X509V3_conf_err(val);
191                         goto err;
192                 }
193         }
194         return bcons;
195
196 err:
197         BASIC_CONSTRAINTS_free(bcons);
198         return NULL;
199 }