crypto/cms/cms_io.c

   1 /*
   2  * Copyright 2008-2022 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 <openssl/asn1t.h>
  11 #include <openssl/x509.h>
  12 #include <openssl/err.h>
  13 #include <openssl/pem.h>
  14 #include <openssl/cms.h>
  15 #include "cms_local.h"
  16
  17 /* unfortunately cannot constify BIO_new_NDEF() due to this and PKCS7_stream() */
  18 int CMS_stream(unsigned char ***boundary, CMS_ContentInfo *cms)
  19 {
  20     ASN1_OCTET_STRING **pos;
  21
  22     pos = CMS_get0_content(cms);
  23     if (pos == NULL)
  24         return 0;
  25     if (*pos == NULL)
  26         *pos = ASN1_OCTET_STRING_new();
  27     if (*pos != NULL) {
  28         (*pos)->flags |= ASN1_STRING_FLAG_NDEF;
  29         (*pos)->flags &= ~ASN1_STRING_FLAG_CONT;
  30         *boundary = &(*pos)->data;
  31         return 1;
  32     }
  33     ERR_raise(ERR_LIB_CMS, ERR_R_CMS_LIB);
  34     return 0;
  35 }
  36
  37 CMS_ContentInfo *d2i_CMS_bio(BIO *bp, CMS_ContentInfo **cms)
  38 {
  39     CMS_ContentInfo *ci;
  40     const CMS_CTX *ctx = ossl_cms_get0_cmsctx(cms == NULL ? NULL : *cms);
  41
  42     ci = ASN1_item_d2i_bio_ex(ASN1_ITEM_rptr(CMS_ContentInfo), bp, cms,
  43                               ossl_cms_ctx_get0_libctx(ctx),
  44                               ossl_cms_ctx_get0_propq(ctx));
  45     if (ci != NULL) {
  46         ERR_set_mark();
  47         ossl_cms_resolve_libctx(ci);
  48         ERR_pop_to_mark();
  49     }
  50     return ci;
  51 }
  52
  53 int i2d_CMS_bio(BIO *bp, CMS_ContentInfo *cms)
  54 {
  55     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(CMS_ContentInfo), bp, cms);
  56 }
  57
  58 IMPLEMENT_PEM_rw(CMS, CMS_ContentInfo, PEM_STRING_CMS, CMS_ContentInfo)
  59
  60 BIO *BIO_new_CMS(BIO *out, CMS_ContentInfo *cms)
  61 {
  62     return BIO_new_NDEF(out, (ASN1_VALUE *)cms,
  63                         ASN1_ITEM_rptr(CMS_ContentInfo));
  64 }
  65
  66 /* CMS wrappers round generalised stream and MIME routines */
  67
  68 int i2d_CMS_bio_stream(BIO *out, CMS_ContentInfo *cms, BIO *in, int flags)
  69 {
  70     return i2d_ASN1_bio_stream(out, (ASN1_VALUE *)cms, in, flags,
  71                                ASN1_ITEM_rptr(CMS_ContentInfo));
  72 }
  73
  74 int PEM_write_bio_CMS_stream(BIO *out, CMS_ContentInfo *cms, BIO *in,
  75                              int flags)
  76 {
  77     return PEM_write_bio_ASN1_stream(out, (ASN1_VALUE *)cms, in, flags,
  78                                      "CMS", ASN1_ITEM_rptr(CMS_ContentInfo));
  79 }
  80
  81 int SMIME_write_CMS(BIO *bio, CMS_ContentInfo *cms, BIO *data, int flags)
  82 {
  83     STACK_OF(X509_ALGOR) *mdalgs;
  84     int ctype_nid = OBJ_obj2nid(cms->contentType);
  85     int econt_nid = OBJ_obj2nid(CMS_get0_eContentType(cms));
  86     const CMS_CTX *ctx = ossl_cms_get0_cmsctx(cms);
  87
  88     if (ctype_nid == NID_pkcs7_signed)
  89         mdalgs = cms->d.signedData->digestAlgorithms;
  90     else
  91         mdalgs = NULL;
  92
  93     return SMIME_write_ASN1_ex(bio, (ASN1_VALUE *)cms, data, flags, ctype_nid,
  94                                econt_nid, mdalgs,
  95                                ASN1_ITEM_rptr(CMS_ContentInfo),
  96                                ossl_cms_ctx_get0_libctx(ctx),
  97                                ossl_cms_ctx_get0_propq(ctx));
  98 }
  99
 100 CMS_ContentInfo *SMIME_read_CMS_ex(BIO *bio, int flags, BIO **bcont,
 101                                    CMS_ContentInfo **cms)
 102 {
 103     CMS_ContentInfo *ci;
 104     const CMS_CTX *ctx = ossl_cms_get0_cmsctx(cms == NULL ? NULL : *cms);
 105
 106     ci = (CMS_ContentInfo *)SMIME_read_ASN1_ex(bio, flags, bcont,
 107                                                ASN1_ITEM_rptr(CMS_ContentInfo),
 108                                                (ASN1_VALUE **)cms,
 109                                                ossl_cms_ctx_get0_libctx(ctx),
 110                                                ossl_cms_ctx_get0_propq(ctx));
 111     if (ci != NULL) {
 112         ERR_set_mark();
 113         ossl_cms_resolve_libctx(ci);
 114         ERR_pop_to_mark();
 115     }
 116     return ci;
 117 }
 118
 119 CMS_ContentInfo *SMIME_read_CMS(BIO *bio, BIO **bcont)
 120 {
 121     return SMIME_read_CMS_ex(bio, 0, bcont, NULL);
 122 }