12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182 |
- /*
- * Copyright 2004-2020 The OpenSSL Project Authors. All Rights Reserved.
- *
- * Licensed under the OpenSSL license (the "License"). You may not use
- * this file except in compliance with the License. You can obtain a copy
- * in the file LICENSE in the source distribution or at
- * https://www.openssl.org/source/license.html
- */
- #include "internal/cryptlib.h"
- #include <openssl/x509.h>
- #include <openssl/x509v3.h>
- #include "pcy_local.h"
- /* Policy Node routines */
- void policy_data_free(X509_POLICY_DATA *data)
- {
- if (data == NULL)
- return;
- ASN1_OBJECT_free(data->valid_policy);
- /* Don't free qualifiers if shared */
- if (!(data->flags & POLICY_DATA_FLAG_SHARED_QUALIFIERS))
- sk_POLICYQUALINFO_pop_free(data->qualifier_set, POLICYQUALINFO_free);
- sk_ASN1_OBJECT_pop_free(data->expected_policy_set, ASN1_OBJECT_free);
- OPENSSL_free(data);
- }
- /*
- * Create a data based on an existing policy. If 'id' is NULL use the OID in
- * the policy, otherwise use 'id'. This behaviour covers the two types of
- * data in RFC3280: data with from a CertificatePolicies extension and
- * additional data with just the qualifiers of anyPolicy and ID from another
- * source.
- */
- X509_POLICY_DATA *policy_data_new(POLICYINFO *policy,
- const ASN1_OBJECT *cid, int crit)
- {
- X509_POLICY_DATA *ret;
- ASN1_OBJECT *id;
- if (policy == NULL && cid == NULL)
- return NULL;
- if (cid) {
- id = OBJ_dup(cid);
- if (id == NULL)
- return NULL;
- } else
- id = NULL;
- ret = OPENSSL_zalloc(sizeof(*ret));
- if (ret == NULL) {
- X509V3err(X509V3_F_POLICY_DATA_NEW, ERR_R_MALLOC_FAILURE);
- ASN1_OBJECT_free(id);
- return NULL;
- }
- ret->expected_policy_set = sk_ASN1_OBJECT_new_null();
- if (ret->expected_policy_set == NULL) {
- OPENSSL_free(ret);
- ASN1_OBJECT_free(id);
- X509V3err(X509V3_F_POLICY_DATA_NEW, ERR_R_MALLOC_FAILURE);
- return NULL;
- }
- if (crit)
- ret->flags = POLICY_DATA_FLAG_CRITICAL;
- if (id)
- ret->valid_policy = id;
- else {
- ret->valid_policy = policy->policyid;
- policy->policyid = NULL;
- }
- if (policy) {
- ret->qualifier_set = policy->qualifiers;
- policy->qualifiers = NULL;
- }
- return ret;
- }
|