crypto/asn1/a_dup.c

   1 /*
   2  * Copyright 1995-2020 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/asn1t.h>
  13
  14 #ifndef NO_OLD_ASN1
  15
  16 void *ASN1_dup(i2d_of_void *i2d, d2i_of_void *d2i, const void *x)
  17 {
  18     unsigned char *b, *p;
  19     const unsigned char *p2;
  20     int i;
  21     char *ret;
  22
  23     if (x == NULL)
  24         return NULL;
  25
  26     i = i2d(x, NULL);
  27     if (i <= 0)
  28         return NULL;
  29
  30     b = OPENSSL_malloc(i + 10);
  31     if (b == NULL) {
  32         ERR_raise(ERR_LIB_ASN1, ERR_R_MALLOC_FAILURE);
  33         return NULL;
  34     }
  35     p = b;
  36     i = i2d(x, &p);
  37     p2 = b;
  38     ret = d2i(NULL, &p2, i);
  39     OPENSSL_free(b);
  40     return ret;
  41 }
  42
  43 #endif
  44
  45 /*
  46  * ASN1_ITEM version of dup: this follows the model above except we don't
  47  * need to allocate the buffer. At some point this could be rewritten to
  48  * directly dup the underlying structure instead of doing and encode and
  49  * decode.
  50  */
  51
  52 void *ASN1_item_dup(const ASN1_ITEM *it, const void *x)
  53 {
  54     ASN1_aux_cb *asn1_cb = NULL;
  55     unsigned char *b = NULL;
  56     const unsigned char *p;
  57     long i;
  58     ASN1_VALUE *ret;
  59
  60     if (x == NULL)
  61         return NULL;
  62
  63     if (it->itype == ASN1_ITYPE_SEQUENCE || it->itype == ASN1_ITYPE_CHOICE
  64         || it->itype == ASN1_ITYPE_NDEF_SEQUENCE) {
  65         const ASN1_AUX *aux = it->funcs;
  66
  67         asn1_cb = aux != NULL ? aux->asn1_cb : NULL;
  68     }
  69
  70     if (asn1_cb != NULL
  71         && !asn1_cb(ASN1_OP_DUP_PRE, (ASN1_VALUE **)&x, it, NULL))
  72         goto auxerr;
  73
  74     i = ASN1_item_i2d(x, &b, it);
  75     if (b == NULL) {
  76         ERR_raise(ERR_LIB_ASN1, ERR_R_MALLOC_FAILURE);
  77         return NULL;
  78     }
  79     p = b;
  80     ret = ASN1_item_d2i(NULL, &p, i, it);
  81     OPENSSL_free(b);
  82
  83     if (asn1_cb != NULL
  84         && !asn1_cb(ASN1_OP_DUP_POST, &ret, it, (void *)x))
  85         goto auxerr;
  86
  87     return ret;
  88
  89  auxerr:
  90     ERR_raise_data(ERR_LIB_ASN1, ASN1_R_AUX_ERROR, "Type=%s", it->sname);
  91     return NULL;
  92 }