1 /* $OpenBSD: x509_v3.c,v 1.18 2021/11/01 20:53:08 tb Exp $ */
2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
3 * All rights reserved.
4 *
5 * This package is an SSL implementation written
6 * by Eric Young (eay@cryptsoft.com).
7 * The implementation was written so as to conform with Netscapes SSL.
8 *
9 * This library is free for commercial and non-commercial use as long as
10 * the following conditions are aheared to. The following conditions
11 * apply to all code found in this distribution, be it the RC4, RSA,
12 * lhash, DES, etc., code; not just the SSL code. The SSL documentation
13 * included with this distribution is covered by the same copyright terms
14 * except that the holder is Tim Hudson (tjh@cryptsoft.com).
15 *
16 * Copyright remains Eric Young's, and as such any Copyright notices in
17 * the code are not to be removed.
18 * If this package is used in a product, Eric Young should be given attribution
19 * as the author of the parts of the library used.
20 * This can be in the form of a textual message at program startup or
21 * in documentation (online or textual) provided with the package.
22 *
23 * Redistribution and use in source and binary forms, with or without
24 * modification, are permitted provided that the following conditions
25 * are met:
26 * 1. Redistributions of source code must retain the copyright
27 * notice, this list of conditions and the following disclaimer.
28 * 2. Redistributions in binary form must reproduce the above copyright
29 * notice, this list of conditions and the following disclaimer in the
30 * documentation and/or other materials provided with the distribution.
31 * 3. All advertising materials mentioning features or use of this software
32 * must display the following acknowledgement:
33 * "This product includes cryptographic software written by
34 * Eric Young (eay@cryptsoft.com)"
35 * The word 'cryptographic' can be left out if the rouines from the library
36 * being used are not cryptographic related :-).
37 * 4. If you include any Windows specific code (or a derivative thereof) from
38 * the apps directory (application code) you must include an acknowledgement:
39 * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
40 *
41 * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
42 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
43 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
44 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
45 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
46 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
47 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
49 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
50 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
51 * SUCH DAMAGE.
52 *
53 * The licence and distribution terms for any publically available version or
54 * derivative of this code cannot be changed. i.e. this code cannot simply be
55 * copied and put under another distribution licence
56 * [including the GNU Public Licence.]
57 */
58
59 #include <stdio.h>
60
61 #include <openssl/asn1.h>
62 #include <openssl/err.h>
63 #include <openssl/evp.h>
64 #include <openssl/objects.h>
65 #include <openssl/stack.h>
66 #include <openssl/x509.h>
67 #include <openssl/x509v3.h>
68
69 #include "x509_lcl.h"
70
71 int
X509v3_get_ext_count(const STACK_OF (X509_EXTENSION)* x)72 X509v3_get_ext_count(const STACK_OF(X509_EXTENSION) *x)
73 {
74 if (x == NULL)
75 return (0);
76 return (sk_X509_EXTENSION_num(x));
77 }
78
79 int
X509v3_get_ext_by_NID(const STACK_OF (X509_EXTENSION)* x,int nid,int lastpos)80 X509v3_get_ext_by_NID(const STACK_OF(X509_EXTENSION) *x, int nid, int lastpos)
81 {
82 ASN1_OBJECT *obj;
83
84 obj = OBJ_nid2obj(nid);
85 if (obj == NULL)
86 return (-2);
87 return (X509v3_get_ext_by_OBJ(x, obj, lastpos));
88 }
89
90 int
X509v3_get_ext_by_OBJ(const STACK_OF (X509_EXTENSION)* sk,const ASN1_OBJECT * obj,int lastpos)91 X509v3_get_ext_by_OBJ(const STACK_OF(X509_EXTENSION) *sk,
92 const ASN1_OBJECT *obj, int lastpos)
93 {
94 int n;
95 X509_EXTENSION *ex;
96
97 if (sk == NULL)
98 return (-1);
99 lastpos++;
100 if (lastpos < 0)
101 lastpos = 0;
102 n = sk_X509_EXTENSION_num(sk);
103 for (; lastpos < n; lastpos++) {
104 ex = sk_X509_EXTENSION_value(sk, lastpos);
105 if (OBJ_cmp(ex->object, obj) == 0)
106 return (lastpos);
107 }
108 return (-1);
109 }
110
111 int
X509v3_get_ext_by_critical(const STACK_OF (X509_EXTENSION)* sk,int crit,int lastpos)112 X509v3_get_ext_by_critical(const STACK_OF(X509_EXTENSION) *sk, int crit,
113 int lastpos)
114 {
115 int n;
116 X509_EXTENSION *ex;
117
118 if (sk == NULL)
119 return (-1);
120 lastpos++;
121 if (lastpos < 0)
122 lastpos = 0;
123 n = sk_X509_EXTENSION_num(sk);
124 for (; lastpos < n; lastpos++) {
125 ex = sk_X509_EXTENSION_value(sk, lastpos);
126 if (((ex->critical > 0) && crit) ||
127 ((ex->critical <= 0) && !crit))
128 return (lastpos);
129 }
130 return (-1);
131 }
132
133 X509_EXTENSION *
X509v3_get_ext(const STACK_OF (X509_EXTENSION)* x,int loc)134 X509v3_get_ext(const STACK_OF(X509_EXTENSION) *x, int loc)
135 {
136 if (x == NULL || sk_X509_EXTENSION_num(x) <= loc || loc < 0)
137 return NULL;
138 else
139 return sk_X509_EXTENSION_value(x, loc);
140 }
141
142 X509_EXTENSION *
X509v3_delete_ext(STACK_OF (X509_EXTENSION)* x,int loc)143 X509v3_delete_ext(STACK_OF(X509_EXTENSION) *x, int loc)
144 {
145 X509_EXTENSION *ret;
146
147 if (x == NULL || sk_X509_EXTENSION_num(x) <= loc || loc < 0)
148 return (NULL);
149 ret = sk_X509_EXTENSION_delete(x, loc);
150 return (ret);
151 }
152
STACK_OF(X509_EXTENSION)153 STACK_OF(X509_EXTENSION) *
154 X509v3_add_ext(STACK_OF(X509_EXTENSION) **x, X509_EXTENSION *ex, int loc)
155 {
156 X509_EXTENSION *new_ex = NULL;
157 int n;
158 STACK_OF(X509_EXTENSION) *sk = NULL;
159
160 if (x == NULL) {
161 X509error(ERR_R_PASSED_NULL_PARAMETER);
162 goto err2;
163 }
164
165 if (*x == NULL) {
166 if ((sk = sk_X509_EXTENSION_new_null()) == NULL)
167 goto err;
168 } else
169 sk= *x;
170
171 n = sk_X509_EXTENSION_num(sk);
172 if (loc > n)
173 loc = n;
174 else if (loc < 0)
175 loc = n;
176
177 if ((new_ex = X509_EXTENSION_dup(ex)) == NULL)
178 goto err2;
179 if (!sk_X509_EXTENSION_insert(sk, new_ex, loc))
180 goto err;
181 if (*x == NULL)
182 *x = sk;
183 return (sk);
184
185 err:
186 X509error(ERR_R_MALLOC_FAILURE);
187 err2:
188 if (new_ex != NULL)
189 X509_EXTENSION_free(new_ex);
190 if (sk != NULL && (x != NULL && sk != *x))
191 sk_X509_EXTENSION_free(sk);
192 return (NULL);
193 }
194
195 X509_EXTENSION *
X509_EXTENSION_create_by_NID(X509_EXTENSION ** ex,int nid,int crit,ASN1_OCTET_STRING * data)196 X509_EXTENSION_create_by_NID(X509_EXTENSION **ex, int nid, int crit,
197 ASN1_OCTET_STRING *data)
198 {
199 ASN1_OBJECT *obj;
200 X509_EXTENSION *ret;
201
202 obj = OBJ_nid2obj(nid);
203 if (obj == NULL) {
204 X509error(X509_R_UNKNOWN_NID);
205 return (NULL);
206 }
207 ret = X509_EXTENSION_create_by_OBJ(ex, obj, crit, data);
208 if (ret == NULL)
209 ASN1_OBJECT_free(obj);
210 return (ret);
211 }
212
213 X509_EXTENSION *
X509_EXTENSION_create_by_OBJ(X509_EXTENSION ** ex,const ASN1_OBJECT * obj,int crit,ASN1_OCTET_STRING * data)214 X509_EXTENSION_create_by_OBJ(X509_EXTENSION **ex, const ASN1_OBJECT *obj,
215 int crit, ASN1_OCTET_STRING *data)
216 {
217 X509_EXTENSION *ret;
218
219 if ((ex == NULL) || (*ex == NULL)) {
220 if ((ret = X509_EXTENSION_new()) == NULL) {
221 X509error(ERR_R_MALLOC_FAILURE);
222 return (NULL);
223 }
224 } else
225 ret= *ex;
226
227 if (!X509_EXTENSION_set_object(ret, obj))
228 goto err;
229 if (!X509_EXTENSION_set_critical(ret, crit))
230 goto err;
231 if (!X509_EXTENSION_set_data(ret, data))
232 goto err;
233
234 if ((ex != NULL) && (*ex == NULL))
235 *ex = ret;
236 return (ret);
237
238 err:
239 if ((ex == NULL) || (ret != *ex))
240 X509_EXTENSION_free(ret);
241 return (NULL);
242 }
243
244 int
X509_EXTENSION_set_object(X509_EXTENSION * ex,const ASN1_OBJECT * obj)245 X509_EXTENSION_set_object(X509_EXTENSION *ex, const ASN1_OBJECT *obj)
246 {
247 if ((ex == NULL) || (obj == NULL))
248 return (0);
249 ASN1_OBJECT_free(ex->object);
250 ex->object = OBJ_dup(obj);
251 return ex->object != NULL;
252 }
253
254 int
X509_EXTENSION_set_critical(X509_EXTENSION * ex,int crit)255 X509_EXTENSION_set_critical(X509_EXTENSION *ex, int crit)
256 {
257 if (ex == NULL)
258 return (0);
259 ex->critical = (crit) ? 0xFF : -1;
260 return (1);
261 }
262
263 int
X509_EXTENSION_set_data(X509_EXTENSION * ex,ASN1_OCTET_STRING * data)264 X509_EXTENSION_set_data(X509_EXTENSION *ex, ASN1_OCTET_STRING *data)
265 {
266 int i;
267
268 if (ex == NULL)
269 return (0);
270 i = ASN1_STRING_set(ex->value, data->data, data->length);
271 if (!i)
272 return (0);
273 return (1);
274 }
275
276 ASN1_OBJECT *
X509_EXTENSION_get_object(X509_EXTENSION * ex)277 X509_EXTENSION_get_object(X509_EXTENSION *ex)
278 {
279 if (ex == NULL)
280 return (NULL);
281 return (ex->object);
282 }
283
284 ASN1_OCTET_STRING *
X509_EXTENSION_get_data(X509_EXTENSION * ex)285 X509_EXTENSION_get_data(X509_EXTENSION *ex)
286 {
287 if (ex == NULL)
288 return (NULL);
289 return (ex->value);
290 }
291
292 int
X509_EXTENSION_get_critical(const X509_EXTENSION * ex)293 X509_EXTENSION_get_critical(const X509_EXTENSION *ex)
294 {
295 if (ex == NULL)
296 return (0);
297 if (ex->critical > 0)
298 return 1;
299 return 0;
300 }
301