1 /* 2 * Copyright 1998-2020 The OpenSSL Project Authors. All Rights Reserved. 3 * 4 * Licensed under the OpenSSL license (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 <stddef.h> 11 #include <openssl/x509.h> 12 #include <openssl/asn1.h> 13 #include <openssl/asn1t.h> 14 #include "crypto/evp.h" 15 16 ASN1_SEQUENCE(X509_ALGOR) = { 17 ASN1_SIMPLE(X509_ALGOR, algorithm, ASN1_OBJECT), 18 ASN1_OPT(X509_ALGOR, parameter, ASN1_ANY) 19 } ASN1_SEQUENCE_END(X509_ALGOR) 20 21 ASN1_ITEM_TEMPLATE(X509_ALGORS) = 22 ASN1_EX_TEMPLATE_TYPE(ASN1_TFLG_SEQUENCE_OF, 0, algorithms, X509_ALGOR) 23 ASN1_ITEM_TEMPLATE_END(X509_ALGORS) 24 25 IMPLEMENT_ASN1_FUNCTIONS(X509_ALGOR) 26 IMPLEMENT_ASN1_ENCODE_FUNCTIONS_fname(X509_ALGORS, X509_ALGORS, X509_ALGORS) 27 IMPLEMENT_ASN1_DUP_FUNCTION(X509_ALGOR) 28 29 int X509_ALGOR_set0(X509_ALGOR *alg, ASN1_OBJECT *aobj, int ptype, void *pval) 30 { 31 if (alg == NULL) 32 return 0; 33 34 if (ptype != V_ASN1_UNDEF) { 35 if (alg->parameter == NULL) 36 alg->parameter = ASN1_TYPE_new(); 37 if (alg->parameter == NULL) 38 return 0; 39 } 40 41 ASN1_OBJECT_free(alg->algorithm); 42 alg->algorithm = aobj; 43 44 if (ptype == 0) 45 return 1; 46 if (ptype == V_ASN1_UNDEF) { 47 ASN1_TYPE_free(alg->parameter); 48 alg->parameter = NULL; 49 } else 50 ASN1_TYPE_set(alg->parameter, ptype, pval); 51 return 1; 52 } 53 54 void X509_ALGOR_get0(const ASN1_OBJECT **paobj, int *pptype, 55 const void **ppval, const X509_ALGOR *algor) 56 { 57 if (paobj) 58 *paobj = algor->algorithm; 59 if (pptype) { 60 if (algor->parameter == NULL) { 61 *pptype = V_ASN1_UNDEF; 62 return; 63 } else 64 *pptype = algor->parameter->type; 65 if (ppval) 66 *ppval = algor->parameter->value.ptr; 67 } 68 } 69 70 /* Set up an X509_ALGOR DigestAlgorithmIdentifier from an EVP_MD */ 71 72 void X509_ALGOR_set_md(X509_ALGOR *alg, const EVP_MD *md) 73 { 74 int param_type; 75 76 if (md->flags & EVP_MD_FLAG_DIGALGID_ABSENT) 77 param_type = V_ASN1_UNDEF; 78 else 79 param_type = V_ASN1_NULL; 80 81 X509_ALGOR_set0(alg, OBJ_nid2obj(EVP_MD_type(md)), param_type, NULL); 82 83 } 84 85 int X509_ALGOR_cmp(const X509_ALGOR *a, const X509_ALGOR *b) 86 { 87 int rv; 88 rv = OBJ_cmp(a->algorithm, b->algorithm); 89 if (rv) 90 return rv; 91 if (!a->parameter && !b->parameter) 92 return 0; 93 return ASN1_TYPE_cmp(a->parameter, b->parameter); 94 } 95 96 int X509_ALGOR_copy(X509_ALGOR *dest, const X509_ALGOR *src) 97 { 98 if (src == NULL || dest == NULL) 99 return 0; 100 101 if (dest->algorithm) 102 ASN1_OBJECT_free(dest->algorithm); 103 dest->algorithm = NULL; 104 105 if (dest->parameter) 106 ASN1_TYPE_free(dest->parameter); 107 dest->parameter = NULL; 108 109 if (src->algorithm) 110 if ((dest->algorithm = OBJ_dup(src->algorithm)) == NULL) 111 return 0; 112 113 if (src->parameter) { 114 dest->parameter = ASN1_TYPE_new(); 115 if (dest->parameter == NULL) 116 return 0; 117 118 /* Assuming this is also correct for a BOOL. 119 * set does copy as a side effect. 120 */ 121 if (ASN1_TYPE_set1(dest->parameter, 122 src->parameter->type, src->parameter->value.ptr) == 0) 123 return 0; 124 } 125 return 1; 126 } 127