xref: /openbsd-src/lib/libcrypto/asn1/x_algor.c (revision a96e9671a8c9e3cc5cf1fdef2a5b69b537ce5440)
1 /* $OpenBSD: x_algor.c,v 1.35 2023/11/01 20:25:27 tb Exp $ */
2 /* Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL
3  * project 2000.
4  */
5 /* ====================================================================
6  * Copyright (c) 2000 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 <stddef.h>
60 
61 #include <openssl/asn1.h>
62 #include <openssl/asn1t.h>
63 #include <openssl/x509.h>
64 
65 #include "x509_local.h"
66 
67 static const ASN1_TEMPLATE X509_ALGOR_seq_tt[] = {
68 	{
69 		.offset = offsetof(X509_ALGOR, algorithm),
70 		.field_name = "algorithm",
71 		.item = &ASN1_OBJECT_it,
72 	},
73 	{
74 		.flags = ASN1_TFLG_OPTIONAL,
75 		.offset = offsetof(X509_ALGOR, parameter),
76 		.field_name = "parameter",
77 		.item = &ASN1_ANY_it,
78 	},
79 };
80 
81 const ASN1_ITEM X509_ALGOR_it = {
82 	.itype = ASN1_ITYPE_SEQUENCE,
83 	.utype = V_ASN1_SEQUENCE,
84 	.templates = X509_ALGOR_seq_tt,
85 	.tcount = sizeof(X509_ALGOR_seq_tt) / sizeof(ASN1_TEMPLATE),
86 	.size = sizeof(X509_ALGOR),
87 	.sname = "X509_ALGOR",
88 };
89 
90 static const ASN1_TEMPLATE X509_ALGORS_item_tt = {
91 	.flags = ASN1_TFLG_SEQUENCE_OF,
92 	.tag = 0,
93 	.offset = 0,
94 	.field_name = "algorithms",
95 	.item = &X509_ALGOR_it,
96 };
97 
98 const ASN1_ITEM X509_ALGORS_it = {
99 	.itype = ASN1_ITYPE_PRIMITIVE,
100 	.utype = -1,
101 	.templates = &X509_ALGORS_item_tt,
102 	.tcount = 0,
103 	.funcs = NULL,
104 	.size = 0,
105 	.sname = "X509_ALGORS",
106 };
107 
108 X509_ALGOR *
109 d2i_X509_ALGOR(X509_ALGOR **a, const unsigned char **in, long len)
110 {
111 	return (X509_ALGOR *)ASN1_item_d2i((ASN1_VALUE **)a, in, len,
112 	    &X509_ALGOR_it);
113 }
114 
115 int
116 i2d_X509_ALGOR(X509_ALGOR *a, unsigned char **out)
117 {
118 	return ASN1_item_i2d((ASN1_VALUE *)a, out, &X509_ALGOR_it);
119 }
120 
121 X509_ALGOR *
122 X509_ALGOR_new(void)
123 {
124 	return (X509_ALGOR *)ASN1_item_new(&X509_ALGOR_it);
125 }
126 
127 void
128 X509_ALGOR_free(X509_ALGOR *a)
129 {
130 	ASN1_item_free((ASN1_VALUE *)a, &X509_ALGOR_it);
131 }
132 
133 X509_ALGORS *
134 d2i_X509_ALGORS(X509_ALGORS **a, const unsigned char **in, long len)
135 {
136 	return (X509_ALGORS *)ASN1_item_d2i((ASN1_VALUE **)a, in, len,
137 	    &X509_ALGORS_it);
138 }
139 
140 int
141 i2d_X509_ALGORS(X509_ALGORS *a, unsigned char **out)
142 {
143 	return ASN1_item_i2d((ASN1_VALUE *)a, out, &X509_ALGORS_it);
144 }
145 
146 X509_ALGOR *
147 X509_ALGOR_dup(X509_ALGOR *x)
148 {
149 	return ASN1_item_dup(&X509_ALGOR_it, x);
150 }
151 
152 static int
153 X509_ALGOR_set0_obj(X509_ALGOR *alg, ASN1_OBJECT *aobj)
154 {
155 	ASN1_OBJECT_free(alg->algorithm);
156 	alg->algorithm = aobj;
157 
158 	return 1;
159 }
160 
161 static int
162 X509_ALGOR_set0_parameter(X509_ALGOR *alg, int parameter_type,
163     void *parameter_value)
164 {
165 	if (parameter_type == V_ASN1_UNDEF) {
166 		ASN1_TYPE_free(alg->parameter);
167 		alg->parameter = NULL;
168 
169 		return 1;
170 	}
171 
172 	if (alg->parameter == NULL)
173 		alg->parameter = ASN1_TYPE_new();
174 	if (alg->parameter == NULL)
175 		return 0;
176 
177 	if (parameter_type != 0)
178 		ASN1_TYPE_set(alg->parameter, parameter_type, parameter_value);
179 
180 	return 1;
181 }
182 
183 int
184 X509_ALGOR_set0(X509_ALGOR *alg, ASN1_OBJECT *aobj, int parameter_type,
185     void *parameter_value)
186 {
187 	if (alg == NULL)
188 		return 0;
189 
190 	if (!X509_ALGOR_set0_parameter(alg, parameter_type, parameter_value))
191 		return 0;
192 
193 	if (!X509_ALGOR_set0_obj(alg, aobj))
194 		return 0;
195 
196 	return 1;
197 }
198 
199 void
200 X509_ALGOR_get0(const ASN1_OBJECT **out_aobj, int *out_type,
201     const void **out_value, const X509_ALGOR *alg)
202 {
203 	int type = V_ASN1_UNDEF;
204 	const void *value = NULL;
205 
206 	if (out_aobj != NULL)
207 		*out_aobj = alg->algorithm;
208 
209 	/* Ensure out_value is not left uninitialized if out_type is NULL. */
210 	if (out_value != NULL)
211 		*out_value = NULL;
212 
213 	if (out_type == NULL)
214 		return;
215 
216 	if (alg->parameter != NULL) {
217 		type = alg->parameter->type;
218 		value = alg->parameter->value.ptr;
219 	}
220 
221 	*out_type = type;
222 	if (out_value != NULL)
223 		*out_value = value;
224 }
225 
226 int
227 X509_ALGOR_set_evp_md(X509_ALGOR *alg, const EVP_MD *md)
228 {
229 	ASN1_OBJECT *aobj;
230 	int param_type = V_ASN1_NULL;
231 
232 	if ((EVP_MD_flags(md) & EVP_MD_FLAG_DIGALGID_ABSENT) != 0)
233 		param_type = V_ASN1_UNDEF;
234 
235 	if ((aobj = OBJ_nid2obj(EVP_MD_type(md))) == NULL)
236 		return 0;
237 
238 	return X509_ALGOR_set0(alg, aobj, param_type, NULL);
239 }
240 
241 void
242 X509_ALGOR_set_md(X509_ALGOR *alg, const EVP_MD *md)
243 {
244 	(void)X509_ALGOR_set_evp_md(alg, md);
245 }
246 
247 int
248 X509_ALGOR_cmp(const X509_ALGOR *a, const X509_ALGOR *b)
249 {
250 	int cmp;
251 
252 	if ((cmp = OBJ_cmp(a->algorithm, b->algorithm)) != 0)
253 		return cmp;
254 
255 	if (a->parameter == NULL && b->parameter == NULL)
256 		return 0;
257 
258 	return ASN1_TYPE_cmp(a->parameter, b->parameter);
259 }
260