crypto/pkcs7/pk7_lib.c

   1 /* crypto/pkcs7/pk7_lib.c */
   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 #include "cryptlib.h"
  61 #include <openssl/objects.h>
  62 #include <openssl/x509.h>
  63 #include "asn1_locl.h"
  64
  65 long PKCS7_ctrl(PKCS7 *p7, int cmd, long larg, char *parg)
  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 }
 109
 110 int PKCS7_content_new(PKCS7 *p7, int type)
 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 }
 127
 128 int PKCS7_set_content(PKCS7 *p7, PKCS7 *p7_data)
 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 }
 156
 157 int PKCS7_set_type(PKCS7 *p7, int type)
 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 }
 228
 229 int PKCS7_set0_type_other(PKCS7 *p7, int type, ASN1_TYPE *other)
 230 {
 231     p7->type = OBJ_nid2obj(type);
 232     p7->d.other = other;
 233     return 1;
 234 }
 235
 236 int PKCS7_add_signer(PKCS7 *p7, PKCS7_SIGNER_INFO *psi)
 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 }
 288
 289 int PKCS7_add_certificate(PKCS7 *p7, X509 *x509)
 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 }
 320
 321 int PKCS7_add_crl(PKCS7 *p7, X509_CRL *crl)
 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 }
 353
 354 int PKCS7_SIGNER_INFO_set(PKCS7_SIGNER_INFO *p7i, X509 *x509, EVP_PKEY *pkey,
 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 }
 399
 400 PKCS7_SIGNER_INFO *PKCS7_add_signature(PKCS7 *p7, X509 *x509, EVP_PKEY *pkey,
 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 }
 428
 429 int PKCS7_set_digest(PKCS7 *p7, const EVP_MD *md)
 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 }
 444
 445 STACK_OF(PKCS7_SIGNER_INFO) *PKCS7_get_signer_info(PKCS7 *p7)
 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 }
 454
 455 void PKCS7_SIGNER_INFO_get0_algs(PKCS7_SIGNER_INFO *si, EVP_PKEY **pk,
 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 }
 465
 466 void PKCS7_RECIP_INFO_get0_alg(PKCS7_RECIP_INFO *ri, X509_ALGOR **penc)
 467 {
 468     if (penc)
 469         *penc = ri->key_enc_algor;
 470 }
 471
 472 PKCS7_RECIP_INFO *PKCS7_add_recipient(PKCS7 *p7, X509 *x509)
 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 }
 488
 489 int PKCS7_add_recipient_info(PKCS7 *p7, PKCS7_RECIP_INFO *ri)
 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 }
 512
 513 int PKCS7_RECIP_INFO_set(PKCS7_RECIP_INFO *p7i, X509 *x509)
 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 }
 560
 561 X509 *PKCS7_cert_from_signer_info(PKCS7 *p7, PKCS7_SIGNER_INFO *si)
 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 }
 571
 572 int PKCS7_set_cipher(PKCS7 *p7, const EVP_CIPHER *cipher)
 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 }
 601
 602 int PKCS7_stream(unsigned char ***boundary, PKCS7 *p7)
 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 }