1 /* 2 * Copyright 1995-2021 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/evp.h> 13 #include <openssl/asn1t.h> 14 #include <openssl/x509.h> 15 #include <openssl/x509v3.h> 16 #include "crypto/x509.h" 17 18 ASN1_SEQUENCE_enc(X509_CINF, enc, 0) = { 19 ASN1_EXP_OPT(X509_CINF, version, ASN1_INTEGER, 0), 20 ASN1_EMBED(X509_CINF, serialNumber, ASN1_INTEGER), 21 ASN1_EMBED(X509_CINF, signature, X509_ALGOR), 22 ASN1_SIMPLE(X509_CINF, issuer, X509_NAME), 23 ASN1_EMBED(X509_CINF, validity, X509_VAL), 24 ASN1_SIMPLE(X509_CINF, subject, X509_NAME), 25 ASN1_SIMPLE(X509_CINF, key, X509_PUBKEY), 26 ASN1_IMP_OPT(X509_CINF, issuerUID, ASN1_BIT_STRING, 1), 27 ASN1_IMP_OPT(X509_CINF, subjectUID, ASN1_BIT_STRING, 2), 28 ASN1_EXP_SEQUENCE_OF_OPT(X509_CINF, extensions, X509_EXTENSION, 3) 29 } ASN1_SEQUENCE_END_enc(X509_CINF, X509_CINF) 30 31 IMPLEMENT_ASN1_FUNCTIONS(X509_CINF) 32 /* X509 top level structure needs a bit of customisation */ 33 34 extern void ossl_policy_cache_free(X509_POLICY_CACHE *cache); 35 36 static int x509_cb(int operation, ASN1_VALUE **pval, const ASN1_ITEM *it, 37 void *exarg) 38 { 39 X509 *ret = (X509 *)*pval; 40 41 switch (operation) { 42 43 case ASN1_OP_D2I_PRE: 44 CRYPTO_free_ex_data(CRYPTO_EX_INDEX_X509, ret, &ret->ex_data); 45 X509_CERT_AUX_free(ret->aux); 46 ASN1_OCTET_STRING_free(ret->skid); 47 AUTHORITY_KEYID_free(ret->akid); 48 CRL_DIST_POINTS_free(ret->crldp); 49 ossl_policy_cache_free(ret->policy_cache); 50 GENERAL_NAMES_free(ret->altname); 51 NAME_CONSTRAINTS_free(ret->nc); 52 #ifndef OPENSSL_NO_RFC3779 53 sk_IPAddressFamily_pop_free(ret->rfc3779_addr, IPAddressFamily_free); 54 ASIdentifiers_free(ret->rfc3779_asid); 55 #endif 56 ASN1_OCTET_STRING_free(ret->distinguishing_id); 57 58 /* fall thru */ 59 60 case ASN1_OP_NEW_POST: 61 ret->ex_cached = 0; 62 ret->ex_kusage = 0; 63 ret->ex_xkusage = 0; 64 ret->ex_nscert = 0; 65 ret->ex_flags = 0; 66 ret->ex_pathlen = -1; 67 ret->ex_pcpathlen = -1; 68 ret->skid = NULL; 69 ret->akid = NULL; 70 ret->policy_cache = NULL; 71 ret->altname = NULL; 72 ret->nc = NULL; 73 #ifndef OPENSSL_NO_RFC3779 74 ret->rfc3779_addr = NULL; 75 ret->rfc3779_asid = NULL; 76 #endif 77 ret->distinguishing_id = NULL; 78 ret->aux = NULL; 79 ret->crldp = NULL; 80 if (!CRYPTO_new_ex_data(CRYPTO_EX_INDEX_X509, ret, &ret->ex_data)) 81 return 0; 82 break; 83 84 case ASN1_OP_FREE_POST: 85 CRYPTO_free_ex_data(CRYPTO_EX_INDEX_X509, ret, &ret->ex_data); 86 X509_CERT_AUX_free(ret->aux); 87 ASN1_OCTET_STRING_free(ret->skid); 88 AUTHORITY_KEYID_free(ret->akid); 89 CRL_DIST_POINTS_free(ret->crldp); 90 ossl_policy_cache_free(ret->policy_cache); 91 GENERAL_NAMES_free(ret->altname); 92 NAME_CONSTRAINTS_free(ret->nc); 93 #ifndef OPENSSL_NO_RFC3779 94 sk_IPAddressFamily_pop_free(ret->rfc3779_addr, IPAddressFamily_free); 95 ASIdentifiers_free(ret->rfc3779_asid); 96 #endif 97 ASN1_OCTET_STRING_free(ret->distinguishing_id); 98 OPENSSL_free(ret->propq); 99 break; 100 101 case ASN1_OP_DUP_POST: 102 { 103 X509 *old = exarg; 104 105 if (!ossl_x509_set0_libctx(ret, old->libctx, old->propq)) 106 return 0; 107 } 108 break; 109 case ASN1_OP_GET0_LIBCTX: 110 { 111 OSSL_LIB_CTX **libctx = exarg; 112 113 *libctx = ret->libctx; 114 } 115 break; 116 117 case ASN1_OP_GET0_PROPQ: 118 { 119 const char **propq = exarg; 120 121 *propq = ret->propq; 122 } 123 break; 124 125 default: 126 break; 127 } 128 129 return 1; 130 } 131 132 ASN1_SEQUENCE_ref(X509, x509_cb) = { 133 ASN1_EMBED(X509, cert_info, X509_CINF), 134 ASN1_EMBED(X509, sig_alg, X509_ALGOR), 135 ASN1_EMBED(X509, signature, ASN1_BIT_STRING) 136 } ASN1_SEQUENCE_END_ref(X509, X509) 137 138 IMPLEMENT_ASN1_FUNCTIONS(X509) 139 IMPLEMENT_ASN1_DUP_FUNCTION(X509) 140 141 /* 142 * This should only be used if the X509 object was embedded inside another 143 * asn1 object and it needs a libctx to operate. 144 * Use X509_new_ex() instead if possible. 145 */ 146 int ossl_x509_set0_libctx(X509 *x, OSSL_LIB_CTX *libctx, const char *propq) 147 { 148 if (x != NULL) { 149 x->libctx = libctx; 150 OPENSSL_free(x->propq); 151 x->propq = NULL; 152 if (propq != NULL) { 153 x->propq = OPENSSL_strdup(propq); 154 if (x->propq == NULL) 155 return 0; 156 } 157 } 158 return 1; 159 } 160 161 X509 *X509_new_ex(OSSL_LIB_CTX *libctx, const char *propq) 162 { 163 X509 *cert = NULL; 164 165 cert = (X509 *)ASN1_item_new_ex(X509_it(), libctx, propq); 166 if (!ossl_x509_set0_libctx(cert, libctx, propq)) { 167 X509_free(cert); 168 cert = NULL; 169 } 170 return cert; 171 } 172 173 int X509_set_ex_data(X509 *r, int idx, void *arg) 174 { 175 return CRYPTO_set_ex_data(&r->ex_data, idx, arg); 176 } 177 178 void *X509_get_ex_data(const X509 *r, int idx) 179 { 180 return CRYPTO_get_ex_data(&r->ex_data, idx); 181 } 182 183 /* 184 * X509_AUX ASN1 routines. X509_AUX is the name given to a certificate with 185 * extra info tagged on the end. Since these functions set how a certificate 186 * is trusted they should only be used when the certificate comes from a 187 * reliable source such as local storage. 188 */ 189 190 X509 *d2i_X509_AUX(X509 **a, const unsigned char **pp, long length) 191 { 192 const unsigned char *q; 193 X509 *ret; 194 int freeret = 0; 195 196 /* Save start position */ 197 q = *pp; 198 199 if (a == NULL || *a == NULL) 200 freeret = 1; 201 ret = d2i_X509(a, &q, length); 202 /* If certificate unreadable then forget it */ 203 if (ret == NULL) 204 return NULL; 205 /* update length */ 206 length -= q - *pp; 207 if (length > 0 && !d2i_X509_CERT_AUX(&ret->aux, &q, length)) 208 goto err; 209 *pp = q; 210 return ret; 211 err: 212 if (freeret) { 213 X509_free(ret); 214 if (a) 215 *a = NULL; 216 } 217 return NULL; 218 } 219 220 /* 221 * Serialize trusted certificate to *pp or just return the required buffer 222 * length if pp == NULL. We ultimately want to avoid modifying *pp in the 223 * error path, but that depends on similar hygiene in lower-level functions. 224 * Here we avoid compounding the problem. 225 */ 226 static int i2d_x509_aux_internal(const X509 *a, unsigned char **pp) 227 { 228 int length, tmplen; 229 unsigned char *start = pp != NULL ? *pp : NULL; 230 231 /* 232 * This might perturb *pp on error, but fixing that belongs in i2d_X509() 233 * not here. It should be that if a == NULL length is zero, but we check 234 * both just in case. 235 */ 236 length = i2d_X509(a, pp); 237 if (length <= 0 || a == NULL) 238 return length; 239 240 tmplen = i2d_X509_CERT_AUX(a->aux, pp); 241 if (tmplen < 0) { 242 if (start != NULL) 243 *pp = start; 244 return tmplen; 245 } 246 length += tmplen; 247 248 return length; 249 } 250 251 /* 252 * Serialize trusted certificate to *pp, or just return the required buffer 253 * length if pp == NULL. 254 * 255 * When pp is not NULL, but *pp == NULL, we allocate the buffer, but since 256 * we're writing two ASN.1 objects back to back, we can't have i2d_X509() do 257 * the allocation, nor can we allow i2d_X509_CERT_AUX() to increment the 258 * allocated buffer. 259 */ 260 int i2d_X509_AUX(const X509 *a, unsigned char **pp) 261 { 262 int length; 263 unsigned char *tmp; 264 265 /* Buffer provided by caller */ 266 if (pp == NULL || *pp != NULL) 267 return i2d_x509_aux_internal(a, pp); 268 269 /* Obtain the combined length */ 270 if ((length = i2d_x509_aux_internal(a, NULL)) <= 0) 271 return length; 272 273 /* Allocate requisite combined storage */ 274 *pp = tmp = OPENSSL_malloc(length); 275 if (tmp == NULL) { 276 ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE); 277 return -1; 278 } 279 280 /* Encode, but keep *pp at the originally malloced pointer */ 281 length = i2d_x509_aux_internal(a, &tmp); 282 if (length <= 0) { 283 OPENSSL_free(*pp); 284 *pp = NULL; 285 } 286 return length; 287 } 288 289 int i2d_re_X509_tbs(X509 *x, unsigned char **pp) 290 { 291 x->cert_info.enc.modified = 1; 292 return i2d_X509_CINF(&x->cert_info, pp); 293 } 294 295 void X509_get0_signature(const ASN1_BIT_STRING **psig, 296 const X509_ALGOR **palg, const X509 *x) 297 { 298 if (psig) 299 *psig = &x->signature; 300 if (palg) 301 *palg = &x->sig_alg; 302 } 303 304 int X509_get_signature_nid(const X509 *x) 305 { 306 return OBJ_obj2nid(x->sig_alg.algorithm); 307 } 308 309 void X509_set0_distinguishing_id(X509 *x, ASN1_OCTET_STRING *d_id) 310 { 311 ASN1_OCTET_STRING_free(x->distinguishing_id); 312 x->distinguishing_id = d_id; 313 } 314 315 ASN1_OCTET_STRING *X509_get0_distinguishing_id(X509 *x) 316 { 317 return x->distinguishing_id; 318 } 319