/src/openssl/crypto/pkcs7/pk7_lib.c
Line  | Count  | Source  | 
1  |  | /*  | 
2  |  |  * Copyright 1995-2025 The OpenSSL Project Authors. All Rights Reserved.  | 
3  |  |  *  | 
4  |  |  * Licensed under the Apache License 2.0 (the "License").  You may not use  | 
5  |  |  * this file except in compliance with the License.  You can obtain a copy  | 
6  |  |  * in the file LICENSE in the source distribution or at  | 
7  |  |  * https://www.openssl.org/source/license.html  | 
8  |  |  */  | 
9  |  |  | 
10  |  | #include <stdio.h>  | 
11  |  | #include "internal/cryptlib.h"  | 
12  |  | #include <openssl/objects.h>  | 
13  |  | #include <openssl/x509.h>  | 
14  |  | #include <openssl/pkcs7.h>  | 
15  |  | #include "crypto/asn1.h"  | 
16  |  | #include "crypto/evp.h"  | 
17  |  | #include "crypto/x509.h" /* for sk_X509_add1_cert() */  | 
18  |  | #include "pk7_local.h"  | 
19  |  |  | 
20  |  | long PKCS7_ctrl(PKCS7 *p7, int cmd, long larg, char *parg)  | 
21  | 0  | { | 
22  | 0  |     int nid;  | 
23  | 0  |     long ret;  | 
24  |  | 
  | 
25  | 0  |     nid = OBJ_obj2nid(p7->type);  | 
26  |  | 
  | 
27  | 0  |     switch (cmd) { | 
28  |  |     /* NOTE(emilia): does not support detached digested data. */  | 
29  | 0  |     case PKCS7_OP_SET_DETACHED_SIGNATURE:  | 
30  | 0  |         if (nid == NID_pkcs7_signed) { | 
31  | 0  |             if (p7->d.sign == NULL) { | 
32  | 0  |                 ERR_raise(ERR_LIB_PKCS7, PKCS7_R_NO_CONTENT);  | 
33  | 0  |                 ret = 0;  | 
34  | 0  |                 break;  | 
35  | 0  |             }  | 
36  | 0  |             ret = p7->detached = (int)larg;  | 
37  | 0  |             if (ret && PKCS7_type_is_data(p7->d.sign->contents)) { | 
38  | 0  |                 ASN1_OCTET_STRING *os;  | 
39  | 0  |                 os = p7->d.sign->contents->d.data;  | 
40  | 0  |                 ASN1_OCTET_STRING_free(os);  | 
41  | 0  |                 p7->d.sign->contents->d.data = NULL;  | 
42  | 0  |             }  | 
43  | 0  |         } else { | 
44  | 0  |             ERR_raise(ERR_LIB_PKCS7,  | 
45  | 0  |                       PKCS7_R_OPERATION_NOT_SUPPORTED_ON_THIS_TYPE);  | 
46  | 0  |             ret = 0;  | 
47  | 0  |         }  | 
48  | 0  |         break;  | 
49  | 0  |     case PKCS7_OP_GET_DETACHED_SIGNATURE:  | 
50  | 0  |         if (nid == NID_pkcs7_signed) { | 
51  | 0  |             if (p7->d.sign == NULL || p7->d.sign->contents->d.ptr == NULL)  | 
52  | 0  |                 ret = 1;  | 
53  | 0  |             else  | 
54  | 0  |                 ret = 0;  | 
55  |  | 
  | 
56  | 0  |             p7->detached = ret;  | 
57  | 0  |         } else { | 
58  | 0  |             ERR_raise(ERR_LIB_PKCS7,  | 
59  | 0  |                       PKCS7_R_OPERATION_NOT_SUPPORTED_ON_THIS_TYPE);  | 
60  | 0  |             ret = 0;  | 
61  | 0  |         }  | 
62  |  | 
  | 
63  | 0  |         break;  | 
64  | 0  |     default:  | 
65  | 0  |         ERR_raise(ERR_LIB_PKCS7, PKCS7_R_UNKNOWN_OPERATION);  | 
66  | 0  |         ret = 0;  | 
67  | 0  |     }  | 
68  | 0  |     return ret;  | 
69  | 0  | }  | 
70  |  |  | 
71  |  | int PKCS7_content_new(PKCS7 *p7, int type)  | 
72  | 0  | { | 
73  | 0  |     PKCS7 *ret = NULL;  | 
74  |  | 
  | 
75  | 0  |     if ((ret = PKCS7_new()) == NULL)  | 
76  | 0  |         goto err;  | 
77  | 0  |     if (!PKCS7_set_type(ret, type))  | 
78  | 0  |         goto err;  | 
79  | 0  |     if (!PKCS7_set_content(p7, ret))  | 
80  | 0  |         goto err;  | 
81  |  |  | 
82  | 0  |     return 1;  | 
83  | 0  |  err:  | 
84  | 0  |     PKCS7_free(ret);  | 
85  | 0  |     return 0;  | 
86  | 0  | }  | 
87  |  |  | 
88  |  | int PKCS7_set_content(PKCS7 *p7, PKCS7 *p7_data)  | 
89  | 0  | { | 
90  | 0  |     int i;  | 
91  |  | 
  | 
92  | 0  |     i = OBJ_obj2nid(p7->type);  | 
93  | 0  |     switch (i) { | 
94  | 0  |     case NID_pkcs7_signed:  | 
95  | 0  |         PKCS7_free(p7->d.sign->contents);  | 
96  | 0  |         p7->d.sign->contents = p7_data;  | 
97  | 0  |         break;  | 
98  | 0  |     case NID_pkcs7_digest:  | 
99  | 0  |         PKCS7_free(p7->d.digest->contents);  | 
100  | 0  |         p7->d.digest->contents = p7_data;  | 
101  | 0  |         break;  | 
102  | 0  |     case NID_pkcs7_data:  | 
103  | 0  |     case NID_pkcs7_enveloped:  | 
104  | 0  |     case NID_pkcs7_signedAndEnveloped:  | 
105  | 0  |     case NID_pkcs7_encrypted:  | 
106  | 0  |     default:  | 
107  | 0  |         ERR_raise(ERR_LIB_PKCS7, PKCS7_R_UNSUPPORTED_CONTENT_TYPE);  | 
108  | 0  |         goto err;  | 
109  | 0  |     }  | 
110  | 0  |     return 1;  | 
111  | 0  |  err:  | 
112  | 0  |     return 0;  | 
113  | 0  | }  | 
114  |  |  | 
115  |  | int PKCS7_set_type(PKCS7 *p7, int type)  | 
116  | 0  | { | 
117  | 0  |     ASN1_OBJECT *obj;  | 
118  |  |  | 
119  |  |     /*  | 
120  |  |      * PKCS7_content_free(p7);  | 
121  |  |      */  | 
122  | 0  |     obj = OBJ_nid2obj(type);    /* will not fail */  | 
123  |  | 
  | 
124  | 0  |     switch (type) { | 
125  | 0  |     case NID_pkcs7_signed:  | 
126  | 0  |         p7->type = obj;  | 
127  | 0  |         if ((p7->d.sign = PKCS7_SIGNED_new()) == NULL)  | 
128  | 0  |             goto err;  | 
129  | 0  |         if (!ASN1_INTEGER_set(p7->d.sign->version, 1)) { | 
130  | 0  |             PKCS7_SIGNED_free(p7->d.sign);  | 
131  | 0  |             p7->d.sign = NULL;  | 
132  | 0  |             goto err;  | 
133  | 0  |         }  | 
134  | 0  |         break;  | 
135  | 0  |     case NID_pkcs7_data:  | 
136  | 0  |         p7->type = obj;  | 
137  | 0  |         if ((p7->d.data = ASN1_OCTET_STRING_new()) == NULL)  | 
138  | 0  |             goto err;  | 
139  | 0  |         break;  | 
140  | 0  |     case NID_pkcs7_signedAndEnveloped:  | 
141  | 0  |         p7->type = obj;  | 
142  | 0  |         if ((p7->d.signed_and_enveloped = PKCS7_SIGN_ENVELOPE_new())  | 
143  | 0  |             == NULL)  | 
144  | 0  |             goto err;  | 
145  | 0  |         if (!ASN1_INTEGER_set(p7->d.signed_and_enveloped->version, 1))  | 
146  | 0  |             goto err;  | 
147  | 0  |         p7->d.signed_and_enveloped->enc_data->content_type  | 
148  | 0  |             = OBJ_nid2obj(NID_pkcs7_data);  | 
149  | 0  |         break;  | 
150  | 0  |     case NID_pkcs7_enveloped:  | 
151  | 0  |         p7->type = obj;  | 
152  | 0  |         if ((p7->d.enveloped = PKCS7_ENVELOPE_new())  | 
153  | 0  |             == NULL)  | 
154  | 0  |             goto err;  | 
155  | 0  |         if (!ASN1_INTEGER_set(p7->d.enveloped->version, 0))  | 
156  | 0  |             goto err;  | 
157  | 0  |         p7->d.enveloped->enc_data->content_type = OBJ_nid2obj(NID_pkcs7_data);  | 
158  | 0  |         break;  | 
159  | 0  |     case NID_pkcs7_encrypted:  | 
160  | 0  |         p7->type = obj;  | 
161  | 0  |         if ((p7->d.encrypted = PKCS7_ENCRYPT_new())  | 
162  | 0  |             == NULL)  | 
163  | 0  |             goto err;  | 
164  | 0  |         if (!ASN1_INTEGER_set(p7->d.encrypted->version, 0))  | 
165  | 0  |             goto err;  | 
166  | 0  |         p7->d.encrypted->enc_data->content_type = OBJ_nid2obj(NID_pkcs7_data);  | 
167  | 0  |         break;  | 
168  |  |  | 
169  | 0  |     case NID_pkcs7_digest:  | 
170  | 0  |         p7->type = obj;  | 
171  | 0  |         if ((p7->d.digest = PKCS7_DIGEST_new())  | 
172  | 0  |             == NULL)  | 
173  | 0  |             goto err;  | 
174  | 0  |         if (!ASN1_INTEGER_set(p7->d.digest->version, 0))  | 
175  | 0  |             goto err;  | 
176  | 0  |         break;  | 
177  | 0  |     default:  | 
178  | 0  |         ERR_raise(ERR_LIB_PKCS7, PKCS7_R_UNSUPPORTED_CONTENT_TYPE);  | 
179  | 0  |         goto err;  | 
180  | 0  |     }  | 
181  | 0  |     return 1;  | 
182  | 0  |  err:  | 
183  | 0  |     return 0;  | 
184  | 0  | }  | 
185  |  |  | 
186  |  | int PKCS7_set0_type_other(PKCS7 *p7, int type, ASN1_TYPE *other)  | 
187  | 0  | { | 
188  | 0  |     p7->type = OBJ_nid2obj(type);  | 
189  | 0  |     p7->d.other = other;  | 
190  | 0  |     return 1;  | 
191  | 0  | }  | 
192  |  |  | 
193  |  | int PKCS7_add_signer(PKCS7 *p7, PKCS7_SIGNER_INFO *psi)  | 
194  | 0  | { | 
195  | 0  |     int i, j;  | 
196  | 0  |     ASN1_OBJECT *obj;  | 
197  | 0  |     X509_ALGOR *alg;  | 
198  | 0  |     STACK_OF(PKCS7_SIGNER_INFO) *signer_sk;  | 
199  | 0  |     STACK_OF(X509_ALGOR) *md_sk;  | 
200  |  | 
  | 
201  | 0  |     i = OBJ_obj2nid(p7->type);  | 
202  | 0  |     switch (i) { | 
203  | 0  |     case NID_pkcs7_signed:  | 
204  | 0  |         signer_sk = p7->d.sign->signer_info;  | 
205  | 0  |         md_sk = p7->d.sign->md_algs;  | 
206  | 0  |         break;  | 
207  | 0  |     case NID_pkcs7_signedAndEnveloped:  | 
208  | 0  |         signer_sk = p7->d.signed_and_enveloped->signer_info;  | 
209  | 0  |         md_sk = p7->d.signed_and_enveloped->md_algs;  | 
210  | 0  |         break;  | 
211  | 0  |     default:  | 
212  | 0  |         ERR_raise(ERR_LIB_PKCS7, PKCS7_R_WRONG_CONTENT_TYPE);  | 
213  | 0  |         return 0;  | 
214  | 0  |     }  | 
215  |  |  | 
216  | 0  |     obj = psi->digest_alg->algorithm;  | 
217  |  |     /* If the digest is not currently listed, add it */  | 
218  | 0  |     j = 0;  | 
219  | 0  |     for (i = 0; i < sk_X509_ALGOR_num(md_sk); i++) { | 
220  | 0  |         alg = sk_X509_ALGOR_value(md_sk, i);  | 
221  | 0  |         if (OBJ_cmp(obj, alg->algorithm) == 0) { | 
222  | 0  |             j = 1;  | 
223  | 0  |             break;  | 
224  | 0  |         }  | 
225  | 0  |     }  | 
226  | 0  |     if (!j) {                   /* we need to add another algorithm */ | 
227  | 0  |         int nid;  | 
228  |  | 
  | 
229  | 0  |         if ((alg = X509_ALGOR_new()) == NULL  | 
230  | 0  |             || (alg->parameter = ASN1_TYPE_new()) == NULL) { | 
231  | 0  |             X509_ALGOR_free(alg);  | 
232  | 0  |             ERR_raise(ERR_LIB_PKCS7, ERR_R_ASN1_LIB);  | 
233  | 0  |             return 0;  | 
234  | 0  |         }  | 
235  |  |         /*  | 
236  |  |          * If there is a constant copy of the ASN1 OBJECT in libcrypto, then  | 
237  |  |          * use that.  Otherwise, use a dynamically duplicated copy  | 
238  |  |          */  | 
239  | 0  |         if ((nid = OBJ_obj2nid(obj)) != NID_undef)  | 
240  | 0  |             alg->algorithm = OBJ_nid2obj(nid);  | 
241  | 0  |         else  | 
242  | 0  |             alg->algorithm = OBJ_dup(obj);  | 
243  | 0  |         alg->parameter->type = V_ASN1_NULL;  | 
244  | 0  |         if (alg->algorithm == NULL || !sk_X509_ALGOR_push(md_sk, alg)) { | 
245  | 0  |             X509_ALGOR_free(alg);  | 
246  | 0  |             return 0;  | 
247  | 0  |         }  | 
248  | 0  |     }  | 
249  |  |  | 
250  | 0  |     psi->ctx = ossl_pkcs7_get0_ctx(p7);  | 
251  | 0  |     if (!sk_PKCS7_SIGNER_INFO_push(signer_sk, psi))  | 
252  | 0  |         return 0;  | 
253  | 0  |     return 1;  | 
254  | 0  | }  | 
255  |  |  | 
256  |  | int PKCS7_add_certificate(PKCS7 *p7, X509 *x509)  | 
257  | 0  | { | 
258  | 0  |     int i;  | 
259  | 0  |     STACK_OF(X509) **sk;  | 
260  |  | 
  | 
261  | 0  |     i = OBJ_obj2nid(p7->type);  | 
262  | 0  |     switch (i) { | 
263  | 0  |     case NID_pkcs7_signed:  | 
264  | 0  |         sk = &(p7->d.sign->cert);  | 
265  | 0  |         break;  | 
266  | 0  |     case NID_pkcs7_signedAndEnveloped:  | 
267  | 0  |         sk = &(p7->d.signed_and_enveloped->cert);  | 
268  | 0  |         break;  | 
269  | 0  |     default:  | 
270  | 0  |         ERR_raise(ERR_LIB_PKCS7, PKCS7_R_WRONG_CONTENT_TYPE);  | 
271  | 0  |         return 0;  | 
272  | 0  |     }  | 
273  |  |  | 
274  | 0  |     return ossl_x509_add_cert_new(sk, x509, X509_ADD_FLAG_UP_REF);  | 
275  | 0  | }  | 
276  |  |  | 
277  |  | int PKCS7_add_crl(PKCS7 *p7, X509_CRL *crl)  | 
278  | 0  | { | 
279  | 0  |     int i;  | 
280  | 0  |     STACK_OF(X509_CRL) **sk;  | 
281  |  | 
  | 
282  | 0  |     i = OBJ_obj2nid(p7->type);  | 
283  | 0  |     switch (i) { | 
284  | 0  |     case NID_pkcs7_signed:  | 
285  | 0  |         sk = &(p7->d.sign->crl);  | 
286  | 0  |         break;  | 
287  | 0  |     case NID_pkcs7_signedAndEnveloped:  | 
288  | 0  |         sk = &(p7->d.signed_and_enveloped->crl);  | 
289  | 0  |         break;  | 
290  | 0  |     default:  | 
291  | 0  |         ERR_raise(ERR_LIB_PKCS7, PKCS7_R_WRONG_CONTENT_TYPE);  | 
292  | 0  |         return 0;  | 
293  | 0  |     }  | 
294  |  |  | 
295  | 0  |     if (*sk == NULL)  | 
296  | 0  |         *sk = sk_X509_CRL_new_null();  | 
297  | 0  |     if (*sk == NULL) { | 
298  | 0  |         ERR_raise(ERR_LIB_PKCS7, ERR_R_CRYPTO_LIB);  | 
299  | 0  |         return 0;  | 
300  | 0  |     }  | 
301  |  |  | 
302  | 0  |     if (!X509_CRL_up_ref(crl))  | 
303  | 0  |         return 0;  | 
304  | 0  |     if (!sk_X509_CRL_push(*sk, crl)) { | 
305  | 0  |         X509_CRL_free(crl);  | 
306  | 0  |         return 0;  | 
307  | 0  |     }  | 
308  | 0  |     return 1;  | 
309  | 0  | }  | 
310  |  |  | 
311  |  | static int pkcs7_ecdsa_or_dsa_sign_verify_setup(PKCS7_SIGNER_INFO *si,  | 
312  |  |                                                 int verify)  | 
313  | 0  | { | 
314  | 0  |     if (!verify) { | 
315  | 0  |         int snid, hnid;  | 
316  | 0  |         X509_ALGOR *alg1, *alg2;  | 
317  | 0  |         EVP_PKEY *pkey = si->pkey;  | 
318  |  | 
  | 
319  | 0  |         PKCS7_SIGNER_INFO_get0_algs(si, NULL, &alg1, &alg2);  | 
320  | 0  |         if (alg1 == NULL || alg1->algorithm == NULL)  | 
321  | 0  |             return -1;  | 
322  | 0  |         hnid = OBJ_obj2nid(alg1->algorithm);  | 
323  | 0  |         if (hnid == NID_undef)  | 
324  | 0  |             return -1;  | 
325  | 0  |         if (!OBJ_find_sigid_by_algs(&snid, hnid, EVP_PKEY_get_id(pkey)))  | 
326  | 0  |             return -1;  | 
327  | 0  |         return X509_ALGOR_set0(alg2, OBJ_nid2obj(snid), V_ASN1_UNDEF, NULL);  | 
328  | 0  |     }  | 
329  | 0  |     return 1;  | 
330  | 0  | }  | 
331  |  |  | 
332  |  | static int pkcs7_rsa_sign_verify_setup(PKCS7_SIGNER_INFO *si, int verify)  | 
333  | 0  | { | 
334  | 0  |     if (!verify) { | 
335  | 0  |         X509_ALGOR *alg = NULL;  | 
336  |  | 
  | 
337  | 0  |         PKCS7_SIGNER_INFO_get0_algs(si, NULL, NULL, &alg);  | 
338  | 0  |         if (alg != NULL)  | 
339  | 0  |             return X509_ALGOR_set0(alg, OBJ_nid2obj(NID_rsaEncryption),  | 
340  | 0  |                                    V_ASN1_NULL, NULL);  | 
341  | 0  |     }  | 
342  | 0  |     return 1;  | 
343  | 0  | }  | 
344  |  |  | 
345  |  | int PKCS7_SIGNER_INFO_set(PKCS7_SIGNER_INFO *p7i, X509 *x509, EVP_PKEY *pkey,  | 
346  |  |                           const EVP_MD *dgst)  | 
347  | 0  | { | 
348  | 0  |     int ret;  | 
349  |  |  | 
350  |  |     /* We now need to add another PKCS7_SIGNER_INFO entry */  | 
351  | 0  |     if (!ASN1_INTEGER_set(p7i->version, 1))  | 
352  | 0  |         return 0;  | 
353  | 0  |     if (!X509_NAME_set(&p7i->issuer_and_serial->issuer,  | 
354  | 0  |                        X509_get_issuer_name(x509)))  | 
355  | 0  |         return 0;  | 
356  |  |  | 
357  |  |     /*  | 
358  |  |      * because ASN1_INTEGER_set is used to set a 'long' we will do things the  | 
359  |  |      * ugly way.  | 
360  |  |      */  | 
361  | 0  |     ASN1_INTEGER_free(p7i->issuer_and_serial->serial);  | 
362  | 0  |     if (!(p7i->issuer_and_serial->serial =  | 
363  | 0  |           ASN1_INTEGER_dup(X509_get0_serialNumber(x509))))  | 
364  | 0  |         return 0;  | 
365  |  |  | 
366  |  |     /* lets keep the pkey around for a while */  | 
367  | 0  |     if (!EVP_PKEY_up_ref(pkey))  | 
368  | 0  |         return 0;  | 
369  |  |  | 
370  | 0  |     p7i->pkey = pkey;  | 
371  |  |  | 
372  |  |     /* Set the algorithms */  | 
373  |  | 
  | 
374  | 0  |     if (!X509_ALGOR_set0(p7i->digest_alg, OBJ_nid2obj(EVP_MD_get_type(dgst)),  | 
375  | 0  |                          V_ASN1_NULL, NULL))  | 
376  | 0  |         return 0;  | 
377  |  |  | 
378  | 0  |     if (EVP_PKEY_is_a(pkey, "EC") || EVP_PKEY_is_a(pkey, "DSA"))  | 
379  | 0  |         return pkcs7_ecdsa_or_dsa_sign_verify_setup(p7i, 0);  | 
380  | 0  |     if (EVP_PKEY_is_a(pkey, "RSA"))  | 
381  | 0  |         return pkcs7_rsa_sign_verify_setup(p7i, 0);  | 
382  |  |  | 
383  | 0  |     if (pkey->ameth != NULL && pkey->ameth->pkey_ctrl != NULL) { | 
384  | 0  |         ret = pkey->ameth->pkey_ctrl(pkey, ASN1_PKEY_CTRL_PKCS7_SIGN, 0, p7i);  | 
385  | 0  |         if (ret > 0)  | 
386  | 0  |             return 1;  | 
387  | 0  |         if (ret != -2) { | 
388  | 0  |             ERR_raise(ERR_LIB_PKCS7, PKCS7_R_SIGNING_CTRL_FAILURE);  | 
389  | 0  |             return 0;  | 
390  | 0  |         }  | 
391  | 0  |     }  | 
392  | 0  |     ERR_raise(ERR_LIB_PKCS7, PKCS7_R_SIGNING_NOT_SUPPORTED_FOR_THIS_KEY_TYPE);  | 
393  | 0  |     return 0;  | 
394  | 0  | }  | 
395  |  |  | 
396  |  | PKCS7_SIGNER_INFO *PKCS7_add_signature(PKCS7 *p7, X509 *x509, EVP_PKEY *pkey,  | 
397  |  |                                        const EVP_MD *dgst)  | 
398  | 0  | { | 
399  | 0  |     PKCS7_SIGNER_INFO *si = NULL;  | 
400  |  | 
  | 
401  | 0  |     if (dgst == NULL) { | 
402  | 0  |         int def_nid;  | 
403  | 0  |         if (EVP_PKEY_get_default_digest_nid(pkey, &def_nid) <= 0)  | 
404  | 0  |             goto err;  | 
405  | 0  |         dgst = EVP_get_digestbynid(def_nid);  | 
406  | 0  |         if (dgst == NULL) { | 
407  | 0  |             ERR_raise(ERR_LIB_PKCS7, PKCS7_R_NO_DEFAULT_DIGEST);  | 
408  | 0  |             goto err;  | 
409  | 0  |         }  | 
410  | 0  |     }  | 
411  |  |  | 
412  | 0  |     if ((si = PKCS7_SIGNER_INFO_new()) == NULL)  | 
413  | 0  |         goto err;  | 
414  | 0  |     if (PKCS7_SIGNER_INFO_set(si, x509, pkey, dgst) <= 0)  | 
415  | 0  |         goto err;  | 
416  | 0  |     if (!PKCS7_add_signer(p7, si))  | 
417  | 0  |         goto err;  | 
418  | 0  |     return si;  | 
419  | 0  |  err:  | 
420  | 0  |     PKCS7_SIGNER_INFO_free(si);  | 
421  | 0  |     return NULL;  | 
422  | 0  | }  | 
423  |  |  | 
424  |  | STACK_OF(X509) *pkcs7_get0_certificates(const PKCS7 *p7)  | 
425  | 0  | { | 
426  | 0  |     if (p7->d.ptr == NULL)  | 
427  | 0  |         return NULL;  | 
428  | 0  |     if (PKCS7_type_is_signed(p7))  | 
429  | 0  |         return p7->d.sign->cert;  | 
430  | 0  |     if (PKCS7_type_is_signedAndEnveloped(p7))  | 
431  | 0  |         return p7->d.signed_and_enveloped->cert;  | 
432  | 0  |     return NULL;  | 
433  | 0  | }  | 
434  |  |  | 
435  |  | static STACK_OF(PKCS7_RECIP_INFO) *pkcs7_get_recipient_info(const PKCS7 *p7)  | 
436  | 0  | { | 
437  | 0  |     if (p7->d.ptr == NULL)  | 
438  | 0  |         return NULL;  | 
439  | 0  |     if (PKCS7_type_is_signedAndEnveloped(p7))  | 
440  | 0  |         return p7->d.signed_and_enveloped->recipientinfo;  | 
441  | 0  |     if (PKCS7_type_is_enveloped(p7))  | 
442  | 0  |         return p7->d.enveloped->recipientinfo;  | 
443  | 0  |     return NULL;  | 
444  | 0  | }  | 
445  |  |  | 
446  |  | /*  | 
447  |  |  * Set up the library context into any loaded structure that needs it.  | 
448  |  |  * i.e loaded X509 objects.  | 
449  |  |  */  | 
450  |  | void ossl_pkcs7_resolve_libctx(PKCS7 *p7)  | 
451  | 0  | { | 
452  | 0  |     int i;  | 
453  | 0  |     const PKCS7_CTX *ctx = ossl_pkcs7_get0_ctx(p7);  | 
454  | 0  |     OSSL_LIB_CTX *libctx = ossl_pkcs7_ctx_get0_libctx(ctx);  | 
455  | 0  |     const char *propq = ossl_pkcs7_ctx_get0_propq(ctx);  | 
456  | 0  |     STACK_OF(PKCS7_RECIP_INFO) *rinfos;  | 
457  | 0  |     STACK_OF(PKCS7_SIGNER_INFO) *sinfos;  | 
458  | 0  |     STACK_OF(X509) *certs;  | 
459  |  | 
  | 
460  | 0  |     if (ctx == NULL || p7->d.ptr == NULL)  | 
461  | 0  |         return;  | 
462  |  |  | 
463  | 0  |     rinfos = pkcs7_get_recipient_info(p7);  | 
464  | 0  |     sinfos = PKCS7_get_signer_info(p7);  | 
465  | 0  |     certs = pkcs7_get0_certificates(p7);  | 
466  |  | 
  | 
467  | 0  |     for (i = 0; i < sk_X509_num(certs); i++)  | 
468  | 0  |         ossl_x509_set0_libctx(sk_X509_value(certs, i), libctx, propq);  | 
469  |  | 
  | 
470  | 0  |     for (i = 0; i < sk_PKCS7_RECIP_INFO_num(rinfos); i++) { | 
471  | 0  |         PKCS7_RECIP_INFO *ri = sk_PKCS7_RECIP_INFO_value(rinfos, i);  | 
472  |  | 
  | 
473  | 0  |         ossl_x509_set0_libctx(ri->cert, libctx, propq);  | 
474  | 0  |     }  | 
475  |  | 
  | 
476  | 0  |     for (i = 0; i < sk_PKCS7_SIGNER_INFO_num(sinfos); i++) { | 
477  | 0  |         PKCS7_SIGNER_INFO *si = sk_PKCS7_SIGNER_INFO_value(sinfos, i);  | 
478  |  | 
  | 
479  | 0  |         if (si != NULL)  | 
480  | 0  |             si->ctx = ctx;  | 
481  | 0  |     }  | 
482  | 0  | }  | 
483  |  |  | 
484  |  | const PKCS7_CTX *ossl_pkcs7_get0_ctx(const PKCS7 *p7)  | 
485  | 0  | { | 
486  | 0  |     return p7 != NULL ? &p7->ctx : NULL;  | 
487  | 0  | }  | 
488  |  |  | 
489  |  | void ossl_pkcs7_set0_libctx(PKCS7 *p7, OSSL_LIB_CTX *ctx)  | 
490  | 0  | { | 
491  | 0  |     p7->ctx.libctx = ctx;  | 
492  | 0  | }  | 
493  |  |  | 
494  |  | int ossl_pkcs7_set1_propq(PKCS7 *p7, const char *propq)  | 
495  | 0  | { | 
496  | 0  |     if (p7->ctx.propq != NULL) { | 
497  | 0  |         OPENSSL_free(p7->ctx.propq);  | 
498  | 0  |         p7->ctx.propq = NULL;  | 
499  | 0  |     }  | 
500  | 0  |     if (propq != NULL) { | 
501  | 0  |         p7->ctx.propq = OPENSSL_strdup(propq);  | 
502  | 0  |         if (p7->ctx.propq == NULL)  | 
503  | 0  |             return 0;  | 
504  | 0  |     }  | 
505  | 0  |     return 1;  | 
506  | 0  | }  | 
507  |  |  | 
508  |  | int ossl_pkcs7_ctx_propagate(const PKCS7 *from, PKCS7 *to)  | 
509  | 0  | { | 
510  | 0  |     ossl_pkcs7_set0_libctx(to, from->ctx.libctx);  | 
511  | 0  |     if (!ossl_pkcs7_set1_propq(to, from->ctx.propq))  | 
512  | 0  |         return 0;  | 
513  |  |  | 
514  | 0  |     ossl_pkcs7_resolve_libctx(to);  | 
515  | 0  |     return 1;  | 
516  | 0  | }  | 
517  |  |  | 
518  |  | OSSL_LIB_CTX *ossl_pkcs7_ctx_get0_libctx(const PKCS7_CTX *ctx)  | 
519  | 0  | { | 
520  | 0  |     return ctx != NULL ? ctx->libctx : NULL;  | 
521  | 0  | }  | 
522  |  | const char *ossl_pkcs7_ctx_get0_propq(const PKCS7_CTX *ctx)  | 
523  | 0  | { | 
524  | 0  |     return ctx != NULL ? ctx->propq : NULL;  | 
525  | 0  | }  | 
526  |  |  | 
527  |  | int PKCS7_set_digest(PKCS7 *p7, const EVP_MD *md)  | 
528  | 0  | { | 
529  | 0  |     if (PKCS7_type_is_digest(p7)) { | 
530  | 0  |         if ((p7->d.digest->md->parameter = ASN1_TYPE_new()) == NULL) { | 
531  | 0  |             ERR_raise(ERR_LIB_PKCS7, ERR_R_ASN1_LIB);  | 
532  | 0  |             return 0;  | 
533  | 0  |         }  | 
534  | 0  |         p7->d.digest->md->parameter->type = V_ASN1_NULL;  | 
535  | 0  |         p7->d.digest->md->algorithm = OBJ_nid2obj(EVP_MD_nid(md));  | 
536  | 0  |         return 1;  | 
537  | 0  |     }  | 
538  |  |  | 
539  | 0  |     ERR_raise(ERR_LIB_PKCS7, PKCS7_R_WRONG_CONTENT_TYPE);  | 
540  | 0  |     return 1;  | 
541  | 0  | }  | 
542  |  |  | 
543  |  | STACK_OF(PKCS7_SIGNER_INFO) *PKCS7_get_signer_info(PKCS7 *p7)  | 
544  | 0  | { | 
545  | 0  |     if (p7 == NULL || p7->d.ptr == NULL)  | 
546  | 0  |         return NULL;  | 
547  | 0  |     if (PKCS7_type_is_signed(p7)) { | 
548  | 0  |         return p7->d.sign->signer_info;  | 
549  | 0  |     } else if (PKCS7_type_is_signedAndEnveloped(p7)) { | 
550  | 0  |         return p7->d.signed_and_enveloped->signer_info;  | 
551  | 0  |     } else  | 
552  | 0  |         return NULL;  | 
553  | 0  | }  | 
554  |  |  | 
555  |  | void PKCS7_SIGNER_INFO_get0_algs(PKCS7_SIGNER_INFO *si, EVP_PKEY **pk,  | 
556  |  |                                  X509_ALGOR **pdig, X509_ALGOR **psig)  | 
557  | 0  | { | 
558  | 0  |     if (pk)  | 
559  | 0  |         *pk = si->pkey;  | 
560  | 0  |     if (pdig)  | 
561  | 0  |         *pdig = si->digest_alg;  | 
562  | 0  |     if (psig)  | 
563  | 0  |         *psig = si->digest_enc_alg;  | 
564  | 0  | }  | 
565  |  |  | 
566  |  | void PKCS7_RECIP_INFO_get0_alg(PKCS7_RECIP_INFO *ri, X509_ALGOR **penc)  | 
567  | 0  | { | 
568  | 0  |     if (penc)  | 
569  | 0  |         *penc = ri->key_enc_algor;  | 
570  | 0  | }  | 
571  |  |  | 
572  |  | PKCS7_RECIP_INFO *PKCS7_add_recipient(PKCS7 *p7, X509 *x509)  | 
573  | 0  | { | 
574  | 0  |     PKCS7_RECIP_INFO *ri;  | 
575  |  | 
  | 
576  | 0  |     if ((ri = PKCS7_RECIP_INFO_new()) == NULL)  | 
577  | 0  |         goto err;  | 
578  | 0  |     if (PKCS7_RECIP_INFO_set(ri, x509) <= 0)  | 
579  | 0  |         goto err;  | 
580  | 0  |     if (!PKCS7_add_recipient_info(p7, ri))  | 
581  | 0  |         goto err;  | 
582  | 0  |     ri->ctx = ossl_pkcs7_get0_ctx(p7);  | 
583  | 0  |     return ri;  | 
584  | 0  |  err:  | 
585  | 0  |     PKCS7_RECIP_INFO_free(ri);  | 
586  | 0  |     return NULL;  | 
587  | 0  | }  | 
588  |  |  | 
589  |  | int PKCS7_add_recipient_info(PKCS7 *p7, PKCS7_RECIP_INFO *ri)  | 
590  | 0  | { | 
591  | 0  |     int i;  | 
592  | 0  |     STACK_OF(PKCS7_RECIP_INFO) *sk;  | 
593  |  | 
  | 
594  | 0  |     i = OBJ_obj2nid(p7->type);  | 
595  | 0  |     switch (i) { | 
596  | 0  |     case NID_pkcs7_signedAndEnveloped:  | 
597  | 0  |         sk = p7->d.signed_and_enveloped->recipientinfo;  | 
598  | 0  |         break;  | 
599  | 0  |     case NID_pkcs7_enveloped:  | 
600  | 0  |         sk = p7->d.enveloped->recipientinfo;  | 
601  | 0  |         break;  | 
602  | 0  |     default:  | 
603  | 0  |         ERR_raise(ERR_LIB_PKCS7, PKCS7_R_WRONG_CONTENT_TYPE);  | 
604  | 0  |         return 0;  | 
605  | 0  |     }  | 
606  |  |  | 
607  | 0  |     if (!sk_PKCS7_RECIP_INFO_push(sk, ri))  | 
608  | 0  |         return 0;  | 
609  | 0  |     return 1;  | 
610  | 0  | }  | 
611  |  |  | 
612  |  | static int pkcs7_rsa_encrypt_decrypt_setup(PKCS7_RECIP_INFO *ri, int decrypt)  | 
613  | 0  | { | 
614  | 0  |     X509_ALGOR *alg = NULL;  | 
615  |  | 
  | 
616  | 0  |     if (!decrypt) { | 
617  | 0  |         PKCS7_RECIP_INFO_get0_alg(ri, &alg);  | 
618  | 0  |         if (alg != NULL)  | 
619  | 0  |             return X509_ALGOR_set0(alg, OBJ_nid2obj(NID_rsaEncryption),  | 
620  | 0  |                                    V_ASN1_NULL, NULL);  | 
621  | 0  |     }  | 
622  | 0  |     return 1;  | 
623  | 0  | }  | 
624  |  |  | 
625  |  | int PKCS7_RECIP_INFO_set(PKCS7_RECIP_INFO *p7i, X509 *x509)  | 
626  | 0  | { | 
627  | 0  |     int ret;  | 
628  | 0  |     EVP_PKEY *pkey = NULL;  | 
629  | 0  |     if (!ASN1_INTEGER_set(p7i->version, 0))  | 
630  | 0  |         return 0;  | 
631  | 0  |     if (!X509_NAME_set(&p7i->issuer_and_serial->issuer,  | 
632  | 0  |                        X509_get_issuer_name(x509)))  | 
633  | 0  |         return 0;  | 
634  |  |  | 
635  | 0  |     ASN1_INTEGER_free(p7i->issuer_and_serial->serial);  | 
636  | 0  |     if (!(p7i->issuer_and_serial->serial =  | 
637  | 0  |           ASN1_INTEGER_dup(X509_get0_serialNumber(x509))))  | 
638  | 0  |         return 0;  | 
639  |  |  | 
640  | 0  |     pkey = X509_get0_pubkey(x509);  | 
641  | 0  |     if (pkey == NULL)  | 
642  | 0  |         return 0;  | 
643  |  |  | 
644  | 0  |     if (EVP_PKEY_is_a(pkey, "RSA-PSS"))  | 
645  | 0  |         return -2;  | 
646  | 0  |     if (EVP_PKEY_is_a(pkey, "RSA")) { | 
647  | 0  |         if (pkcs7_rsa_encrypt_decrypt_setup(p7i, 0) <= 0)  | 
648  | 0  |             goto err;  | 
649  | 0  |         goto finished;  | 
650  | 0  |     }  | 
651  |  |  | 
652  | 0  |     if (pkey->ameth == NULL || pkey->ameth->pkey_ctrl == NULL) { | 
653  | 0  |         ERR_raise(ERR_LIB_PKCS7,  | 
654  | 0  |                   PKCS7_R_ENCRYPTION_NOT_SUPPORTED_FOR_THIS_KEY_TYPE);  | 
655  | 0  |         goto err;  | 
656  | 0  |     }  | 
657  |  |  | 
658  | 0  |     ret = pkey->ameth->pkey_ctrl(pkey, ASN1_PKEY_CTRL_PKCS7_ENCRYPT, 0, p7i);  | 
659  | 0  |     if (ret == -2) { | 
660  | 0  |         ERR_raise(ERR_LIB_PKCS7,  | 
661  | 0  |                   PKCS7_R_ENCRYPTION_NOT_SUPPORTED_FOR_THIS_KEY_TYPE);  | 
662  | 0  |         goto err;  | 
663  | 0  |     }  | 
664  | 0  |     if (ret <= 0) { | 
665  | 0  |         ERR_raise(ERR_LIB_PKCS7, PKCS7_R_ENCRYPTION_CTRL_FAILURE);  | 
666  | 0  |         goto err;  | 
667  | 0  |     }  | 
668  | 0  | finished:  | 
669  | 0  |     if (!X509_up_ref(x509))  | 
670  | 0  |         goto err;  | 
671  |  |  | 
672  | 0  |     p7i->cert = x509;  | 
673  |  | 
  | 
674  | 0  |     return 1;  | 
675  |  |  | 
676  | 0  |  err:  | 
677  | 0  |     return 0;  | 
678  | 0  | }  | 
679  |  |  | 
680  |  | X509 *PKCS7_cert_from_signer_info(PKCS7 *p7, PKCS7_SIGNER_INFO *si)  | 
681  | 0  | { | 
682  | 0  |     if (PKCS7_type_is_signed(p7))  | 
683  | 0  |         return (X509_find_by_issuer_and_serial(p7->d.sign->cert,  | 
684  | 0  |                                                si->issuer_and_serial->issuer,  | 
685  | 0  |                                                si->  | 
686  | 0  |                                                issuer_and_serial->serial));  | 
687  | 0  |     else  | 
688  | 0  |         return NULL;  | 
689  | 0  | }  | 
690  |  |  | 
691  |  | int PKCS7_set_cipher(PKCS7 *p7, const EVP_CIPHER *cipher)  | 
692  | 0  | { | 
693  | 0  |     int i;  | 
694  | 0  |     PKCS7_ENC_CONTENT *ec;  | 
695  |  | 
  | 
696  | 0  |     i = OBJ_obj2nid(p7->type);  | 
697  | 0  |     switch (i) { | 
698  | 0  |     case NID_pkcs7_signedAndEnveloped:  | 
699  | 0  |         ec = p7->d.signed_and_enveloped->enc_data;  | 
700  | 0  |         break;  | 
701  | 0  |     case NID_pkcs7_enveloped:  | 
702  | 0  |         ec = p7->d.enveloped->enc_data;  | 
703  | 0  |         break;  | 
704  | 0  |     default:  | 
705  | 0  |         ERR_raise(ERR_LIB_PKCS7, PKCS7_R_WRONG_CONTENT_TYPE);  | 
706  | 0  |         return 0;  | 
707  | 0  |     }  | 
708  |  |  | 
709  |  |     /* Check cipher OID exists and has data in it */  | 
710  | 0  |     i = EVP_CIPHER_get_type(cipher);  | 
711  | 0  |     if (i == NID_undef) { | 
712  | 0  |         ERR_raise(ERR_LIB_PKCS7, PKCS7_R_CIPHER_HAS_NO_OBJECT_IDENTIFIER);  | 
713  | 0  |         return 0;  | 
714  | 0  |     }  | 
715  |  |  | 
716  | 0  |     ec->cipher = cipher;  | 
717  | 0  |     ec->ctx = ossl_pkcs7_get0_ctx(p7);  | 
718  | 0  |     return 1;  | 
719  | 0  | }  | 
720  |  |  | 
721  |  | /* unfortunately cannot constify BIO_new_NDEF() due to this and CMS_stream() */  | 
722  |  | int PKCS7_stream(unsigned char ***boundary, PKCS7 *p7)  | 
723  | 0  | { | 
724  | 0  |     ASN1_OCTET_STRING *os = NULL;  | 
725  |  | 
  | 
726  | 0  |     switch (OBJ_obj2nid(p7->type)) { | 
727  | 0  |     case NID_pkcs7_data:  | 
728  | 0  |         os = p7->d.data;  | 
729  | 0  |         break;  | 
730  |  |  | 
731  | 0  |     case NID_pkcs7_signedAndEnveloped:  | 
732  | 0  |         os = p7->d.signed_and_enveloped->enc_data->enc_data;  | 
733  | 0  |         if (os == NULL) { | 
734  | 0  |             os = ASN1_OCTET_STRING_new();  | 
735  | 0  |             p7->d.signed_and_enveloped->enc_data->enc_data = os;  | 
736  | 0  |         }  | 
737  | 0  |         break;  | 
738  |  |  | 
739  | 0  |     case NID_pkcs7_enveloped:  | 
740  | 0  |         os = p7->d.enveloped->enc_data->enc_data;  | 
741  | 0  |         if (os == NULL) { | 
742  | 0  |             os = ASN1_OCTET_STRING_new();  | 
743  | 0  |             p7->d.enveloped->enc_data->enc_data = os;  | 
744  | 0  |         }  | 
745  | 0  |         break;  | 
746  |  |  | 
747  | 0  |     case NID_pkcs7_signed:  | 
748  | 0  |         os = p7->d.sign->contents->d.data;  | 
749  | 0  |         break;  | 
750  |  |  | 
751  | 0  |     default:  | 
752  | 0  |         os = NULL;  | 
753  | 0  |         break;  | 
754  | 0  |     }  | 
755  |  |  | 
756  | 0  |     if (os == NULL)  | 
757  | 0  |         return 0;  | 
758  |  |  | 
759  | 0  |     os->flags |= ASN1_STRING_FLAG_NDEF;  | 
760  | 0  |     *boundary = &os->data;  | 
761  |  | 
  | 
762  | 0  |     return 1;  | 
763  | 0  | }  |