]>
Commit | Line | Data |
---|---|---|
d02b48c6 | 1 | /* crypto/pkcs7/pk7_lib.c */ |
58964a49 | 2 | /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) |
d02b48c6 RE |
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. | |
0f113f3e | 8 | * |
d02b48c6 RE |
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). | |
0f113f3e | 15 | * |
d02b48c6 RE |
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. | |
0f113f3e | 22 | * |
d02b48c6 RE |
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 :-). | |
0f113f3e | 37 | * 4. If you include any Windows specific code (or a derivative thereof) from |
d02b48c6 RE |
38 | * the apps directory (application code) you must include an acknowledgement: |
39 | * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)" | |
0f113f3e | 40 | * |
d02b48c6 RE |
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. | |
0f113f3e | 52 | * |
d02b48c6 RE |
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 | #include "cryptlib.h" | |
ec577822 BM |
61 | #include <openssl/objects.h> |
62 | #include <openssl/x509.h> | |
492a9e24 | 63 | #include "asn1_locl.h" |
d02b48c6 | 64 | |
6b691a5c | 65 | long PKCS7_ctrl(PKCS7 *p7, int cmd, long larg, char *parg) |
0f113f3e MC |
66 | { |
67 | int nid; | |
68 | long ret; | |
69 | ||
70 | nid = OBJ_obj2nid(p7->type); | |
71 | ||
72 | switch (cmd) { | |
73 | case PKCS7_OP_SET_DETACHED_SIGNATURE: | |
74 | if (nid == NID_pkcs7_signed) { | |
75 | ret = p7->detached = (int)larg; | |
76 | if (ret && PKCS7_type_is_data(p7->d.sign->contents)) { | |
77 | ASN1_OCTET_STRING *os; | |
78 | os = p7->d.sign->contents->d.data; | |
79 | ASN1_OCTET_STRING_free(os); | |
80 | p7->d.sign->contents->d.data = NULL; | |
81 | } | |
82 | } else { | |
83 | PKCS7err(PKCS7_F_PKCS7_CTRL, | |
84 | PKCS7_R_OPERATION_NOT_SUPPORTED_ON_THIS_TYPE); | |
85 | ret = 0; | |
86 | } | |
87 | break; | |
88 | case PKCS7_OP_GET_DETACHED_SIGNATURE: | |
89 | if (nid == NID_pkcs7_signed) { | |
90 | if (!p7->d.sign || !p7->d.sign->contents->d.ptr) | |
91 | ret = 1; | |
92 | else | |
93 | ret = 0; | |
94 | ||
95 | p7->detached = ret; | |
96 | } else { | |
97 | PKCS7err(PKCS7_F_PKCS7_CTRL, | |
98 | PKCS7_R_OPERATION_NOT_SUPPORTED_ON_THIS_TYPE); | |
99 | ret = 0; | |
100 | } | |
101 | ||
102 | break; | |
103 | default: | |
104 | PKCS7err(PKCS7_F_PKCS7_CTRL, PKCS7_R_UNKNOWN_OPERATION); | |
105 | ret = 0; | |
106 | } | |
107 | return (ret); | |
108 | } | |
d02b48c6 | 109 | |
6b691a5c | 110 | int PKCS7_content_new(PKCS7 *p7, int type) |
0f113f3e MC |
111 | { |
112 | PKCS7 *ret = NULL; | |
113 | ||
114 | if ((ret = PKCS7_new()) == NULL) | |
115 | goto err; | |
116 | if (!PKCS7_set_type(ret, type)) | |
117 | goto err; | |
118 | if (!PKCS7_set_content(p7, ret)) | |
119 | goto err; | |
120 | ||
121 | return (1); | |
122 | err: | |
123 | if (ret != NULL) | |
124 | PKCS7_free(ret); | |
125 | return (0); | |
126 | } | |
d02b48c6 | 127 | |
6b691a5c | 128 | int PKCS7_set_content(PKCS7 *p7, PKCS7 *p7_data) |
0f113f3e MC |
129 | { |
130 | int i; | |
131 | ||
132 | i = OBJ_obj2nid(p7->type); | |
133 | switch (i) { | |
134 | case NID_pkcs7_signed: | |
135 | if (p7->d.sign->contents != NULL) | |
136 | PKCS7_free(p7->d.sign->contents); | |
137 | p7->d.sign->contents = p7_data; | |
138 | break; | |
139 | case NID_pkcs7_digest: | |
140 | if (p7->d.digest->contents != NULL) | |
141 | PKCS7_free(p7->d.digest->contents); | |
142 | p7->d.digest->contents = p7_data; | |
143 | break; | |
144 | case NID_pkcs7_data: | |
145 | case NID_pkcs7_enveloped: | |
146 | case NID_pkcs7_signedAndEnveloped: | |
147 | case NID_pkcs7_encrypted: | |
148 | default: | |
149 | PKCS7err(PKCS7_F_PKCS7_SET_CONTENT, PKCS7_R_UNSUPPORTED_CONTENT_TYPE); | |
150 | goto err; | |
151 | } | |
152 | return (1); | |
153 | err: | |
154 | return (0); | |
155 | } | |
d02b48c6 | 156 | |
6b691a5c | 157 | int PKCS7_set_type(PKCS7 *p7, int type) |
0f113f3e MC |
158 | { |
159 | ASN1_OBJECT *obj; | |
160 | ||
161 | /* | |
162 | * PKCS7_content_free(p7); | |
163 | */ | |
164 | obj = OBJ_nid2obj(type); /* will not fail */ | |
165 | ||
166 | switch (type) { | |
167 | case NID_pkcs7_signed: | |
168 | p7->type = obj; | |
169 | if ((p7->d.sign = PKCS7_SIGNED_new()) == NULL) | |
170 | goto err; | |
171 | if (!ASN1_INTEGER_set(p7->d.sign->version, 1)) { | |
172 | PKCS7_SIGNED_free(p7->d.sign); | |
173 | p7->d.sign = NULL; | |
174 | goto err; | |
175 | } | |
176 | break; | |
177 | case NID_pkcs7_data: | |
178 | p7->type = obj; | |
179 | if ((p7->d.data = M_ASN1_OCTET_STRING_new()) == NULL) | |
180 | goto err; | |
181 | break; | |
182 | case NID_pkcs7_signedAndEnveloped: | |
183 | p7->type = obj; | |
184 | if ((p7->d.signed_and_enveloped = PKCS7_SIGN_ENVELOPE_new()) | |
185 | == NULL) | |
186 | goto err; | |
187 | ASN1_INTEGER_set(p7->d.signed_and_enveloped->version, 1); | |
188 | if (!ASN1_INTEGER_set(p7->d.signed_and_enveloped->version, 1)) | |
189 | goto err; | |
190 | p7->d.signed_and_enveloped->enc_data->content_type | |
191 | = OBJ_nid2obj(NID_pkcs7_data); | |
192 | break; | |
193 | case NID_pkcs7_enveloped: | |
194 | p7->type = obj; | |
195 | if ((p7->d.enveloped = PKCS7_ENVELOPE_new()) | |
196 | == NULL) | |
197 | goto err; | |
198 | if (!ASN1_INTEGER_set(p7->d.enveloped->version, 0)) | |
199 | goto err; | |
200 | p7->d.enveloped->enc_data->content_type = OBJ_nid2obj(NID_pkcs7_data); | |
201 | break; | |
202 | case NID_pkcs7_encrypted: | |
203 | p7->type = obj; | |
204 | if ((p7->d.encrypted = PKCS7_ENCRYPT_new()) | |
205 | == NULL) | |
206 | goto err; | |
207 | if (!ASN1_INTEGER_set(p7->d.encrypted->version, 0)) | |
208 | goto err; | |
209 | p7->d.encrypted->enc_data->content_type = OBJ_nid2obj(NID_pkcs7_data); | |
210 | break; | |
211 | ||
212 | case NID_pkcs7_digest: | |
213 | p7->type = obj; | |
214 | if ((p7->d.digest = PKCS7_DIGEST_new()) | |
215 | == NULL) | |
216 | goto err; | |
217 | if (!ASN1_INTEGER_set(p7->d.digest->version, 0)) | |
218 | goto err; | |
219 | break; | |
220 | default: | |
221 | PKCS7err(PKCS7_F_PKCS7_SET_TYPE, PKCS7_R_UNSUPPORTED_CONTENT_TYPE); | |
222 | goto err; | |
223 | } | |
224 | return (1); | |
225 | err: | |
226 | return (0); | |
227 | } | |
d02b48c6 | 228 | |
8d9086df | 229 | int PKCS7_set0_type_other(PKCS7 *p7, int type, ASN1_TYPE *other) |
0f113f3e MC |
230 | { |
231 | p7->type = OBJ_nid2obj(type); | |
232 | p7->d.other = other; | |
233 | return 1; | |
234 | } | |
8d9086df | 235 | |
6b691a5c | 236 | int PKCS7_add_signer(PKCS7 *p7, PKCS7_SIGNER_INFO *psi) |
0f113f3e MC |
237 | { |
238 | int i, j, nid; | |
239 | X509_ALGOR *alg; | |
240 | STACK_OF(PKCS7_SIGNER_INFO) *signer_sk; | |
241 | STACK_OF(X509_ALGOR) *md_sk; | |
242 | ||
243 | i = OBJ_obj2nid(p7->type); | |
244 | switch (i) { | |
245 | case NID_pkcs7_signed: | |
246 | signer_sk = p7->d.sign->signer_info; | |
247 | md_sk = p7->d.sign->md_algs; | |
248 | break; | |
249 | case NID_pkcs7_signedAndEnveloped: | |
250 | signer_sk = p7->d.signed_and_enveloped->signer_info; | |
251 | md_sk = p7->d.signed_and_enveloped->md_algs; | |
252 | break; | |
253 | default: | |
254 | PKCS7err(PKCS7_F_PKCS7_ADD_SIGNER, PKCS7_R_WRONG_CONTENT_TYPE); | |
255 | return (0); | |
256 | } | |
257 | ||
258 | nid = OBJ_obj2nid(psi->digest_alg->algorithm); | |
259 | ||
260 | /* If the digest is not currently listed, add it */ | |
261 | j = 0; | |
262 | for (i = 0; i < sk_X509_ALGOR_num(md_sk); i++) { | |
263 | alg = sk_X509_ALGOR_value(md_sk, i); | |
264 | if (OBJ_obj2nid(alg->algorithm) == nid) { | |
265 | j = 1; | |
266 | break; | |
267 | } | |
268 | } | |
269 | if (!j) { /* we need to add another algorithm */ | |
270 | if (!(alg = X509_ALGOR_new()) | |
271 | || !(alg->parameter = ASN1_TYPE_new())) { | |
272 | X509_ALGOR_free(alg); | |
273 | PKCS7err(PKCS7_F_PKCS7_ADD_SIGNER, ERR_R_MALLOC_FAILURE); | |
274 | return (0); | |
275 | } | |
276 | alg->algorithm = OBJ_nid2obj(nid); | |
277 | alg->parameter->type = V_ASN1_NULL; | |
278 | if (!sk_X509_ALGOR_push(md_sk, alg)) { | |
279 | X509_ALGOR_free(alg); | |
280 | return 0; | |
281 | } | |
282 | } | |
283 | ||
284 | if (!sk_PKCS7_SIGNER_INFO_push(signer_sk, psi)) | |
285 | return 0; | |
286 | return (1); | |
287 | } | |
d02b48c6 | 288 | |
6b691a5c | 289 | int PKCS7_add_certificate(PKCS7 *p7, X509 *x509) |
0f113f3e MC |
290 | { |
291 | int i; | |
292 | STACK_OF(X509) **sk; | |
293 | ||
294 | i = OBJ_obj2nid(p7->type); | |
295 | switch (i) { | |
296 | case NID_pkcs7_signed: | |
297 | sk = &(p7->d.sign->cert); | |
298 | break; | |
299 | case NID_pkcs7_signedAndEnveloped: | |
300 | sk = &(p7->d.signed_and_enveloped->cert); | |
301 | break; | |
302 | default: | |
303 | PKCS7err(PKCS7_F_PKCS7_ADD_CERTIFICATE, PKCS7_R_WRONG_CONTENT_TYPE); | |
304 | return (0); | |
305 | } | |
306 | ||
307 | if (*sk == NULL) | |
308 | *sk = sk_X509_new_null(); | |
309 | if (*sk == NULL) { | |
310 | PKCS7err(PKCS7_F_PKCS7_ADD_CERTIFICATE, ERR_R_MALLOC_FAILURE); | |
311 | return 0; | |
312 | } | |
313 | CRYPTO_add(&x509->references, 1, CRYPTO_LOCK_X509); | |
314 | if (!sk_X509_push(*sk, x509)) { | |
315 | X509_free(x509); | |
316 | return 0; | |
317 | } | |
318 | return (1); | |
319 | } | |
d02b48c6 | 320 | |
6b691a5c | 321 | int PKCS7_add_crl(PKCS7 *p7, X509_CRL *crl) |
0f113f3e MC |
322 | { |
323 | int i; | |
324 | STACK_OF(X509_CRL) **sk; | |
325 | ||
326 | i = OBJ_obj2nid(p7->type); | |
327 | switch (i) { | |
328 | case NID_pkcs7_signed: | |
329 | sk = &(p7->d.sign->crl); | |
330 | break; | |
331 | case NID_pkcs7_signedAndEnveloped: | |
332 | sk = &(p7->d.signed_and_enveloped->crl); | |
333 | break; | |
334 | default: | |
335 | PKCS7err(PKCS7_F_PKCS7_ADD_CRL, PKCS7_R_WRONG_CONTENT_TYPE); | |
336 | return (0); | |
337 | } | |
338 | ||
339 | if (*sk == NULL) | |
340 | *sk = sk_X509_CRL_new_null(); | |
341 | if (*sk == NULL) { | |
342 | PKCS7err(PKCS7_F_PKCS7_ADD_CRL, ERR_R_MALLOC_FAILURE); | |
343 | return 0; | |
344 | } | |
345 | ||
346 | CRYPTO_add(&crl->references, 1, CRYPTO_LOCK_X509_CRL); | |
347 | if (!sk_X509_CRL_push(*sk, crl)) { | |
348 | X509_CRL_free(crl); | |
349 | return 0; | |
350 | } | |
351 | return (1); | |
352 | } | |
d02b48c6 | 353 | |
6b691a5c | 354 | int PKCS7_SIGNER_INFO_set(PKCS7_SIGNER_INFO *p7i, X509 *x509, EVP_PKEY *pkey, |
0f113f3e MC |
355 | const EVP_MD *dgst) |
356 | { | |
357 | int ret; | |
358 | ||
359 | /* We now need to add another PKCS7_SIGNER_INFO entry */ | |
360 | if (!ASN1_INTEGER_set(p7i->version, 1)) | |
361 | goto err; | |
362 | if (!X509_NAME_set(&p7i->issuer_and_serial->issuer, | |
363 | X509_get_issuer_name(x509))) | |
364 | goto err; | |
365 | ||
366 | /* | |
367 | * because ASN1_INTEGER_set is used to set a 'long' we will do things the | |
368 | * ugly way. | |
369 | */ | |
370 | M_ASN1_INTEGER_free(p7i->issuer_and_serial->serial); | |
371 | if (!(p7i->issuer_and_serial->serial = | |
372 | M_ASN1_INTEGER_dup(X509_get_serialNumber(x509)))) | |
373 | goto err; | |
374 | ||
375 | /* lets keep the pkey around for a while */ | |
376 | CRYPTO_add(&pkey->references, 1, CRYPTO_LOCK_EVP_PKEY); | |
377 | p7i->pkey = pkey; | |
378 | ||
379 | /* Set the algorithms */ | |
380 | ||
381 | X509_ALGOR_set0(p7i->digest_alg, OBJ_nid2obj(EVP_MD_type(dgst)), | |
382 | V_ASN1_NULL, NULL); | |
383 | ||
384 | if (pkey->ameth && pkey->ameth->pkey_ctrl) { | |
385 | ret = pkey->ameth->pkey_ctrl(pkey, ASN1_PKEY_CTRL_PKCS7_SIGN, 0, p7i); | |
386 | if (ret > 0) | |
387 | return 1; | |
388 | if (ret != -2) { | |
389 | PKCS7err(PKCS7_F_PKCS7_SIGNER_INFO_SET, | |
390 | PKCS7_R_SIGNING_CTRL_FAILURE); | |
391 | return 0; | |
392 | } | |
393 | } | |
394 | PKCS7err(PKCS7_F_PKCS7_SIGNER_INFO_SET, | |
395 | PKCS7_R_SIGNING_NOT_SUPPORTED_FOR_THIS_KEY_TYPE); | |
396 | err: | |
397 | return 0; | |
398 | } | |
d02b48c6 | 399 | |
6b691a5c | 400 | PKCS7_SIGNER_INFO *PKCS7_add_signature(PKCS7 *p7, X509 *x509, EVP_PKEY *pkey, |
0f113f3e MC |
401 | const EVP_MD *dgst) |
402 | { | |
403 | PKCS7_SIGNER_INFO *si = NULL; | |
404 | ||
405 | if (dgst == NULL) { | |
406 | int def_nid; | |
407 | if (EVP_PKEY_get_default_digest_nid(pkey, &def_nid) <= 0) | |
408 | goto err; | |
409 | dgst = EVP_get_digestbynid(def_nid); | |
410 | if (dgst == NULL) { | |
411 | PKCS7err(PKCS7_F_PKCS7_ADD_SIGNATURE, PKCS7_R_NO_DEFAULT_DIGEST); | |
412 | goto err; | |
413 | } | |
414 | } | |
415 | ||
416 | if ((si = PKCS7_SIGNER_INFO_new()) == NULL) | |
417 | goto err; | |
418 | if (!PKCS7_SIGNER_INFO_set(si, x509, pkey, dgst)) | |
419 | goto err; | |
420 | if (!PKCS7_add_signer(p7, si)) | |
421 | goto err; | |
422 | return (si); | |
423 | err: | |
424 | if (si) | |
425 | PKCS7_SIGNER_INFO_free(si); | |
426 | return (NULL); | |
427 | } | |
d02b48c6 | 428 | |
c5a55463 | 429 | int PKCS7_set_digest(PKCS7 *p7, const EVP_MD *md) |
0f113f3e MC |
430 | { |
431 | if (PKCS7_type_is_digest(p7)) { | |
432 | if (!(p7->d.digest->md->parameter = ASN1_TYPE_new())) { | |
433 | PKCS7err(PKCS7_F_PKCS7_SET_DIGEST, ERR_R_MALLOC_FAILURE); | |
434 | return 0; | |
435 | } | |
436 | p7->d.digest->md->parameter->type = V_ASN1_NULL; | |
437 | p7->d.digest->md->algorithm = OBJ_nid2obj(EVP_MD_nid(md)); | |
438 | return 1; | |
439 | } | |
440 | ||
441 | PKCS7err(PKCS7_F_PKCS7_SET_DIGEST, PKCS7_R_WRONG_CONTENT_TYPE); | |
442 | return 1; | |
443 | } | |
c5a55463 | 444 | |
b05b50e6 | 445 | STACK_OF(PKCS7_SIGNER_INFO) *PKCS7_get_signer_info(PKCS7 *p7) |
0f113f3e MC |
446 | { |
447 | if (PKCS7_type_is_signed(p7)) { | |
448 | return (p7->d.sign->signer_info); | |
449 | } else if (PKCS7_type_is_signedAndEnveloped(p7)) { | |
450 | return (p7->d.signed_and_enveloped->signer_info); | |
451 | } else | |
452 | return (NULL); | |
453 | } | |
d02b48c6 | 454 | |
492a9e24 | 455 | void PKCS7_SIGNER_INFO_get0_algs(PKCS7_SIGNER_INFO *si, EVP_PKEY **pk, |
0f113f3e MC |
456 | X509_ALGOR **pdig, X509_ALGOR **psig) |
457 | { | |
458 | if (pk) | |
459 | *pk = si->pkey; | |
460 | if (pdig) | |
461 | *pdig = si->digest_alg; | |
462 | if (psig) | |
463 | *psig = si->digest_enc_alg; | |
464 | } | |
492a9e24 | 465 | |
e4b21c74 | 466 | void PKCS7_RECIP_INFO_get0_alg(PKCS7_RECIP_INFO *ri, X509_ALGOR **penc) |
0f113f3e MC |
467 | { |
468 | if (penc) | |
469 | *penc = ri->key_enc_algor; | |
470 | } | |
e4b21c74 | 471 | |
6b691a5c | 472 | PKCS7_RECIP_INFO *PKCS7_add_recipient(PKCS7 *p7, X509 *x509) |
0f113f3e MC |
473 | { |
474 | PKCS7_RECIP_INFO *ri; | |
475 | ||
476 | if ((ri = PKCS7_RECIP_INFO_new()) == NULL) | |
477 | goto err; | |
478 | if (!PKCS7_RECIP_INFO_set(ri, x509)) | |
479 | goto err; | |
480 | if (!PKCS7_add_recipient_info(p7, ri)) | |
481 | goto err; | |
482 | return ri; | |
483 | err: | |
484 | if (ri) | |
485 | PKCS7_RECIP_INFO_free(ri); | |
486 | return NULL; | |
487 | } | |
58964a49 | 488 | |
6b691a5c | 489 | int PKCS7_add_recipient_info(PKCS7 *p7, PKCS7_RECIP_INFO *ri) |
0f113f3e MC |
490 | { |
491 | int i; | |
492 | STACK_OF(PKCS7_RECIP_INFO) *sk; | |
493 | ||
494 | i = OBJ_obj2nid(p7->type); | |
495 | switch (i) { | |
496 | case NID_pkcs7_signedAndEnveloped: | |
497 | sk = p7->d.signed_and_enveloped->recipientinfo; | |
498 | break; | |
499 | case NID_pkcs7_enveloped: | |
500 | sk = p7->d.enveloped->recipientinfo; | |
501 | break; | |
502 | default: | |
503 | PKCS7err(PKCS7_F_PKCS7_ADD_RECIPIENT_INFO, | |
504 | PKCS7_R_WRONG_CONTENT_TYPE); | |
505 | return (0); | |
506 | } | |
507 | ||
508 | if (!sk_PKCS7_RECIP_INFO_push(sk, ri)) | |
509 | return 0; | |
510 | return (1); | |
511 | } | |
58964a49 | 512 | |
6b691a5c | 513 | int PKCS7_RECIP_INFO_set(PKCS7_RECIP_INFO *p7i, X509 *x509) |
0f113f3e MC |
514 | { |
515 | int ret; | |
516 | EVP_PKEY *pkey = NULL; | |
517 | if (!ASN1_INTEGER_set(p7i->version, 0)) | |
518 | return 0; | |
519 | if (!X509_NAME_set(&p7i->issuer_and_serial->issuer, | |
520 | X509_get_issuer_name(x509))) | |
521 | return 0; | |
522 | ||
523 | M_ASN1_INTEGER_free(p7i->issuer_and_serial->serial); | |
524 | if (!(p7i->issuer_and_serial->serial = | |
525 | M_ASN1_INTEGER_dup(X509_get_serialNumber(x509)))) | |
526 | return 0; | |
527 | ||
528 | pkey = X509_get_pubkey(x509); | |
529 | ||
530 | if (!pkey || !pkey->ameth || !pkey->ameth->pkey_ctrl) { | |
531 | PKCS7err(PKCS7_F_PKCS7_RECIP_INFO_SET, | |
532 | PKCS7_R_ENCRYPTION_NOT_SUPPORTED_FOR_THIS_KEY_TYPE); | |
533 | goto err; | |
534 | } | |
535 | ||
536 | ret = pkey->ameth->pkey_ctrl(pkey, ASN1_PKEY_CTRL_PKCS7_ENCRYPT, 0, p7i); | |
537 | if (ret == -2) { | |
538 | PKCS7err(PKCS7_F_PKCS7_RECIP_INFO_SET, | |
539 | PKCS7_R_ENCRYPTION_NOT_SUPPORTED_FOR_THIS_KEY_TYPE); | |
540 | goto err; | |
541 | } | |
542 | if (ret <= 0) { | |
543 | PKCS7err(PKCS7_F_PKCS7_RECIP_INFO_SET, | |
544 | PKCS7_R_ENCRYPTION_CTRL_FAILURE); | |
545 | goto err; | |
546 | } | |
547 | ||
548 | EVP_PKEY_free(pkey); | |
549 | ||
550 | CRYPTO_add(&x509->references, 1, CRYPTO_LOCK_X509); | |
551 | p7i->cert = x509; | |
552 | ||
553 | return 1; | |
554 | ||
555 | err: | |
556 | if (pkey) | |
557 | EVP_PKEY_free(pkey); | |
558 | return 0; | |
559 | } | |
58964a49 | 560 | |
6b691a5c | 561 | X509 *PKCS7_cert_from_signer_info(PKCS7 *p7, PKCS7_SIGNER_INFO *si) |
0f113f3e MC |
562 | { |
563 | if (PKCS7_type_is_signed(p7)) | |
564 | return (X509_find_by_issuer_and_serial(p7->d.sign->cert, | |
565 | si->issuer_and_serial->issuer, | |
566 | si-> | |
567 | issuer_and_serial->serial)); | |
568 | else | |
569 | return (NULL); | |
570 | } | |
d02b48c6 | 571 | |
84fa704c | 572 | int PKCS7_set_cipher(PKCS7 *p7, const EVP_CIPHER *cipher) |
0f113f3e MC |
573 | { |
574 | int i; | |
575 | PKCS7_ENC_CONTENT *ec; | |
576 | ||
577 | i = OBJ_obj2nid(p7->type); | |
578 | switch (i) { | |
579 | case NID_pkcs7_signedAndEnveloped: | |
580 | ec = p7->d.signed_and_enveloped->enc_data; | |
581 | break; | |
582 | case NID_pkcs7_enveloped: | |
583 | ec = p7->d.enveloped->enc_data; | |
584 | break; | |
585 | default: | |
586 | PKCS7err(PKCS7_F_PKCS7_SET_CIPHER, PKCS7_R_WRONG_CONTENT_TYPE); | |
587 | return (0); | |
588 | } | |
589 | ||
590 | /* Check cipher OID exists and has data in it */ | |
591 | i = EVP_CIPHER_type(cipher); | |
592 | if (i == NID_undef) { | |
593 | PKCS7err(PKCS7_F_PKCS7_SET_CIPHER, | |
594 | PKCS7_R_CIPHER_HAS_NO_OBJECT_IDENTIFIER); | |
595 | return (0); | |
596 | } | |
597 | ||
598 | ec->cipher = cipher; | |
599 | return 1; | |
600 | } | |
58964a49 | 601 | |
11d8cdc6 | 602 | int PKCS7_stream(unsigned char ***boundary, PKCS7 *p7) |
0f113f3e MC |
603 | { |
604 | ASN1_OCTET_STRING *os = NULL; | |
605 | ||
606 | switch (OBJ_obj2nid(p7->type)) { | |
607 | case NID_pkcs7_data: | |
608 | os = p7->d.data; | |
609 | break; | |
610 | ||
611 | case NID_pkcs7_signedAndEnveloped: | |
612 | os = p7->d.signed_and_enveloped->enc_data->enc_data; | |
613 | if (os == NULL) { | |
614 | os = M_ASN1_OCTET_STRING_new(); | |
615 | p7->d.signed_and_enveloped->enc_data->enc_data = os; | |
616 | } | |
617 | break; | |
618 | ||
619 | case NID_pkcs7_enveloped: | |
620 | os = p7->d.enveloped->enc_data->enc_data; | |
621 | if (os == NULL) { | |
622 | os = M_ASN1_OCTET_STRING_new(); | |
623 | p7->d.enveloped->enc_data->enc_data = os; | |
624 | } | |
625 | break; | |
626 | ||
627 | case NID_pkcs7_signed: | |
628 | os = p7->d.sign->contents->d.data; | |
629 | break; | |
630 | ||
631 | default: | |
632 | os = NULL; | |
633 | break; | |
634 | } | |
635 | ||
636 | if (os == NULL) | |
637 | return 0; | |
638 | ||
639 | os->flags |= ASN1_STRING_FLAG_NDEF; | |
640 | *boundary = &os->data; | |
641 | ||
642 | return 1; | |
643 | } |