diff options
Diffstat (limited to 'src/lib/libcrypto/pkcs12/p12_kiss.c')
-rw-r--r-- | src/lib/libcrypto/pkcs12/p12_kiss.c | 299 |
1 files changed, 0 insertions, 299 deletions
diff --git a/src/lib/libcrypto/pkcs12/p12_kiss.c b/src/lib/libcrypto/pkcs12/p12_kiss.c deleted file mode 100644 index e4de2eb61c..0000000000 --- a/src/lib/libcrypto/pkcs12/p12_kiss.c +++ /dev/null | |||
@@ -1,299 +0,0 @@ | |||
1 | /* $OpenBSD: p12_kiss.c,v 1.28 2025/01/06 23:35:25 tb 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 | |||
61 | #include <openssl/err.h> | ||
62 | #include <openssl/pkcs12.h> | ||
63 | |||
64 | #include "pkcs12_local.h" | ||
65 | |||
66 | /* Simplified PKCS#12 routines */ | ||
67 | |||
68 | static int parse_pk12( PKCS12 *p12, const char *pass, int passlen, | ||
69 | EVP_PKEY **pkey, STACK_OF(X509) *ocerts); | ||
70 | |||
71 | static int parse_bags( STACK_OF(PKCS12_SAFEBAG) *bags, const char *pass, | ||
72 | int passlen, EVP_PKEY **pkey, STACK_OF(X509) *ocerts); | ||
73 | |||
74 | static int parse_bag( PKCS12_SAFEBAG *bag, const char *pass, int passlen, | ||
75 | EVP_PKEY **pkey, STACK_OF(X509) *ocerts); | ||
76 | |||
77 | /* Parse and decrypt a PKCS#12 structure returning user key, user cert | ||
78 | * and other (CA) certs. Note either ca should be NULL, *ca should be NULL, | ||
79 | * or it should point to a valid STACK structure. pkey and cert can be | ||
80 | * passed uninitialised. | ||
81 | */ | ||
82 | |||
83 | int | ||
84 | PKCS12_parse(PKCS12 *p12, const char *pass, EVP_PKEY **pkey, X509 **cert, | ||
85 | STACK_OF(X509) **ca) | ||
86 | { | ||
87 | STACK_OF(X509) *ocerts = NULL; | ||
88 | X509 *x = NULL; | ||
89 | |||
90 | if (pkey != NULL) | ||
91 | *pkey = NULL; | ||
92 | if (cert != NULL) | ||
93 | *cert = NULL; | ||
94 | |||
95 | if (p12 == NULL) { | ||
96 | PKCS12error(PKCS12_R_INVALID_NULL_PKCS12_POINTER); | ||
97 | goto err; | ||
98 | } | ||
99 | |||
100 | /* Check the mac */ | ||
101 | |||
102 | /* If password is zero length or NULL then try verifying both cases | ||
103 | * to determine which password is correct. The reason for this is that | ||
104 | * under PKCS#12 password based encryption no password and a zero length | ||
105 | * password are two different things... | ||
106 | */ | ||
107 | |||
108 | if (pass == NULL || *pass == '\0') { | ||
109 | if (PKCS12_verify_mac(p12, NULL, 0)) | ||
110 | pass = NULL; | ||
111 | else if (PKCS12_verify_mac(p12, "", 0)) | ||
112 | pass = ""; | ||
113 | else { | ||
114 | PKCS12error(PKCS12_R_MAC_VERIFY_FAILURE); | ||
115 | goto err; | ||
116 | } | ||
117 | } else if (!PKCS12_verify_mac(p12, pass, -1)) { | ||
118 | PKCS12error(PKCS12_R_MAC_VERIFY_FAILURE); | ||
119 | goto err; | ||
120 | } | ||
121 | |||
122 | /* Allocate stack for other certificates */ | ||
123 | if ((ocerts = sk_X509_new_null()) == NULL) { | ||
124 | PKCS12error(ERR_R_MALLOC_FAILURE); | ||
125 | goto err; | ||
126 | } | ||
127 | |||
128 | if (!parse_pk12(p12, pass, -1, pkey, ocerts)) { | ||
129 | PKCS12error(PKCS12_R_PARSE_ERROR); | ||
130 | goto err; | ||
131 | } | ||
132 | |||
133 | while ((x = sk_X509_pop(ocerts)) != NULL) { | ||
134 | if (pkey != NULL && *pkey != NULL && | ||
135 | cert != NULL && *cert == NULL) { | ||
136 | ERR_set_mark(); | ||
137 | if (X509_check_private_key(x, *pkey)) { | ||
138 | *cert = x; | ||
139 | x = NULL; | ||
140 | } | ||
141 | ERR_pop_to_mark(); | ||
142 | } | ||
143 | |||
144 | if (ca != NULL && x != NULL) { | ||
145 | if (*ca == NULL) | ||
146 | *ca = sk_X509_new_null(); | ||
147 | if (*ca == NULL) | ||
148 | goto err; | ||
149 | if (!sk_X509_push(*ca, x)) | ||
150 | goto err; | ||
151 | x = NULL; | ||
152 | } | ||
153 | X509_free(x); | ||
154 | x = NULL; | ||
155 | } | ||
156 | |||
157 | sk_X509_pop_free(ocerts, X509_free); | ||
158 | |||
159 | return 1; | ||
160 | |||
161 | err: | ||
162 | if (pkey != NULL) | ||
163 | EVP_PKEY_free(*pkey); | ||
164 | if (cert != NULL) | ||
165 | X509_free(*cert); | ||
166 | X509_free(x); | ||
167 | sk_X509_pop_free(ocerts, X509_free); | ||
168 | |||
169 | return 0; | ||
170 | } | ||
171 | LCRYPTO_ALIAS(PKCS12_parse); | ||
172 | |||
173 | /* Parse the outer PKCS#12 structure */ | ||
174 | |||
175 | static int | ||
176 | parse_pk12(PKCS12 *p12, const char *pass, int passlen, EVP_PKEY **pkey, | ||
177 | STACK_OF(X509) *ocerts) | ||
178 | { | ||
179 | STACK_OF(PKCS7) *asafes; | ||
180 | STACK_OF(PKCS12_SAFEBAG) *bags; | ||
181 | int i, bagnid; | ||
182 | PKCS7 *p7; | ||
183 | |||
184 | if (!(asafes = PKCS12_unpack_authsafes(p12))) | ||
185 | return 0; | ||
186 | for (i = 0; i < sk_PKCS7_num(asafes); i++) { | ||
187 | p7 = sk_PKCS7_value(asafes, i); | ||
188 | bagnid = OBJ_obj2nid(p7->type); | ||
189 | if (bagnid == NID_pkcs7_data) { | ||
190 | bags = PKCS12_unpack_p7data(p7); | ||
191 | } else if (bagnid == NID_pkcs7_encrypted) { | ||
192 | bags = PKCS12_unpack_p7encdata(p7, pass, passlen); | ||
193 | } else | ||
194 | continue; | ||
195 | if (!bags) { | ||
196 | sk_PKCS7_pop_free(asafes, PKCS7_free); | ||
197 | return 0; | ||
198 | } | ||
199 | if (!parse_bags(bags, pass, passlen, pkey, ocerts)) { | ||
200 | sk_PKCS12_SAFEBAG_pop_free(bags, PKCS12_SAFEBAG_free); | ||
201 | sk_PKCS7_pop_free(asafes, PKCS7_free); | ||
202 | return 0; | ||
203 | } | ||
204 | sk_PKCS12_SAFEBAG_pop_free(bags, PKCS12_SAFEBAG_free); | ||
205 | } | ||
206 | sk_PKCS7_pop_free(asafes, PKCS7_free); | ||
207 | return 1; | ||
208 | } | ||
209 | |||
210 | static int | ||
211 | parse_bags(STACK_OF(PKCS12_SAFEBAG) *bags, const char *pass, int passlen, | ||
212 | EVP_PKEY **pkey, STACK_OF(X509) *ocerts) | ||
213 | { | ||
214 | int i; | ||
215 | |||
216 | for (i = 0; i < sk_PKCS12_SAFEBAG_num(bags); i++) { | ||
217 | if (!parse_bag(sk_PKCS12_SAFEBAG_value(bags, i), pass, passlen, | ||
218 | pkey, ocerts)) | ||
219 | return 0; | ||
220 | } | ||
221 | return 1; | ||
222 | } | ||
223 | |||
224 | static int | ||
225 | parse_bag(PKCS12_SAFEBAG *bag, const char *pass, int passlen, EVP_PKEY **pkey, | ||
226 | STACK_OF(X509) *ocerts) | ||
227 | { | ||
228 | PKCS8_PRIV_KEY_INFO *p8; | ||
229 | X509 *x509; | ||
230 | const ASN1_TYPE *attrib; | ||
231 | ASN1_BMPSTRING *fname = NULL; | ||
232 | ASN1_OCTET_STRING *lkid = NULL; | ||
233 | |||
234 | if ((attrib = PKCS12_SAFEBAG_get0_attr(bag, NID_friendlyName))) | ||
235 | fname = attrib->value.bmpstring; | ||
236 | |||
237 | if ((attrib = PKCS12_SAFEBAG_get0_attr(bag, NID_localKeyID))) | ||
238 | lkid = attrib->value.octet_string; | ||
239 | |||
240 | switch (OBJ_obj2nid(bag->type)) { | ||
241 | case NID_keyBag: | ||
242 | if (!pkey || *pkey) | ||
243 | return 1; | ||
244 | if (!(*pkey = EVP_PKCS82PKEY(bag->value.keybag))) | ||
245 | return 0; | ||
246 | break; | ||
247 | |||
248 | case NID_pkcs8ShroudedKeyBag: | ||
249 | if (!pkey || *pkey) | ||
250 | return 1; | ||
251 | if (!(p8 = PKCS12_decrypt_skey(bag, pass, passlen))) | ||
252 | return 0; | ||
253 | *pkey = EVP_PKCS82PKEY(p8); | ||
254 | PKCS8_PRIV_KEY_INFO_free(p8); | ||
255 | if (!(*pkey)) | ||
256 | return 0; | ||
257 | break; | ||
258 | |||
259 | case NID_certBag: | ||
260 | if (OBJ_obj2nid(bag->value.bag->type) != NID_x509Certificate ) | ||
261 | return 1; | ||
262 | if (!(x509 = PKCS12_certbag2x509(bag))) | ||
263 | return 0; | ||
264 | if (lkid && !X509_keyid_set1(x509, lkid->data, lkid->length)) { | ||
265 | X509_free(x509); | ||
266 | return 0; | ||
267 | } | ||
268 | if (fname) { | ||
269 | int len, r; | ||
270 | unsigned char *data = NULL; | ||
271 | len = ASN1_STRING_to_UTF8(&data, fname); | ||
272 | if (len >= 0) { | ||
273 | r = X509_alias_set1(x509, data, len); | ||
274 | free(data); | ||
275 | if (!r) { | ||
276 | X509_free(x509); | ||
277 | return 0; | ||
278 | } | ||
279 | } | ||
280 | } | ||
281 | |||
282 | if (!sk_X509_push(ocerts, x509)) { | ||
283 | X509_free(x509); | ||
284 | return 0; | ||
285 | } | ||
286 | |||
287 | break; | ||
288 | |||
289 | case NID_safeContentsBag: | ||
290 | return parse_bags(bag->value.safes, pass, passlen, | ||
291 | pkey, ocerts); | ||
292 | break; | ||
293 | |||
294 | default: | ||
295 | return 1; | ||
296 | break; | ||
297 | } | ||
298 | return 1; | ||
299 | } | ||