2 * Copyright 2016-2020 The OpenSSL Project Authors. All Rights Reserved.
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
11 # error "CT is disabled"
17 #include <openssl/err.h>
18 #include <openssl/obj_mac.h>
19 #include <openssl/x509.h>
23 SCT_CTX
*SCT_CTX_new(OPENSSL_CTX
*libctx
, const char *propq
)
25 SCT_CTX
*sctx
= OPENSSL_zalloc(sizeof(*sctx
));
28 CTerr(CT_F_SCT_CTX_NEW
, ERR_R_MALLOC_FAILURE
);
30 sctx
->libctx
= libctx
;
32 sctx
->propq
= OPENSSL_strdup(propq
);
33 if (sctx
->propq
== NULL
) {
34 CTerr(CT_F_SCT_CTX_NEW
, ERR_R_MALLOC_FAILURE
);
43 void SCT_CTX_free(SCT_CTX
*sctx
)
47 EVP_PKEY_free(sctx
->pkey
);
48 OPENSSL_free(sctx
->pkeyhash
);
49 OPENSSL_free(sctx
->ihash
);
50 OPENSSL_free(sctx
->certder
);
51 OPENSSL_free(sctx
->preder
);
52 OPENSSL_free(sctx
->propq
);
57 * Finds the index of the first extension with the given NID in cert.
58 * If there is more than one extension with that NID, *is_duplicated is set to
59 * 1, otherwise 0 (unless it is NULL).
61 static int ct_x509_get_ext(X509
*cert
, int nid
, int *is_duplicated
)
63 int ret
= X509_get_ext_by_NID(cert
, nid
, -1);
65 if (is_duplicated
!= NULL
)
66 *is_duplicated
= ret
>= 0 && X509_get_ext_by_NID(cert
, nid
, ret
) >= 0;
72 * Modifies a certificate by deleting extensions and copying the issuer and
73 * AKID from the presigner certificate, if necessary.
74 * Returns 1 on success, 0 otherwise.
76 __owur
static int ct_x509_cert_fixup(X509
*cert
, X509
*presigner
)
79 int pre_akid_ext_is_dup
, cert_akid_ext_is_dup
;
81 if (presigner
== NULL
)
84 preidx
= ct_x509_get_ext(presigner
, NID_authority_key_identifier
,
85 &pre_akid_ext_is_dup
);
86 certidx
= ct_x509_get_ext(cert
, NID_authority_key_identifier
,
87 &cert_akid_ext_is_dup
);
89 /* An error occurred whilst searching for the extension */
90 if (preidx
< -1 || certidx
< -1)
92 /* Invalid certificate if they contain duplicate extensions */
93 if (pre_akid_ext_is_dup
|| cert_akid_ext_is_dup
)
95 /* AKID must be present in both certificate or absent in both */
96 if (preidx
>= 0 && certidx
== -1)
98 if (preidx
== -1 && certidx
>= 0)
100 /* Copy issuer name */
101 if (!X509_set_issuer_name(cert
, X509_get_issuer_name(presigner
)))
104 /* Retrieve and copy AKID encoding */
105 X509_EXTENSION
*preext
= X509_get_ext(presigner
, preidx
);
106 X509_EXTENSION
*certext
= X509_get_ext(cert
, certidx
);
107 ASN1_OCTET_STRING
*preextdata
;
109 /* Should never happen */
110 if (preext
== NULL
|| certext
== NULL
)
112 preextdata
= X509_EXTENSION_get_data(preext
);
113 if (preextdata
== NULL
||
114 !X509_EXTENSION_set_data(certext
, preextdata
))
120 int SCT_CTX_set1_cert(SCT_CTX
*sctx
, X509
*cert
, X509
*presigner
)
122 unsigned char *certder
= NULL
, *preder
= NULL
;
124 int certderlen
= 0, prederlen
= 0;
126 int poison_ext_is_dup
, sct_ext_is_dup
;
127 int poison_idx
= ct_x509_get_ext(cert
, NID_ct_precert_poison
, &poison_ext_is_dup
);
129 /* Duplicate poison extensions are present - error */
130 if (poison_ext_is_dup
)
133 /* If *cert doesn't have a poison extension, it isn't a precert */
134 if (poison_idx
== -1) {
135 /* cert isn't a precert, so we shouldn't have a presigner */
136 if (presigner
!= NULL
)
139 certderlen
= i2d_X509(cert
, &certder
);
144 /* See if cert has a precert SCTs extension */
145 idx
= ct_x509_get_ext(cert
, NID_ct_precert_scts
, &sct_ext_is_dup
);
146 /* Duplicate SCT extensions are present - error */
150 if (idx
>= 0 && poison_idx
>= 0) {
152 * cert can't both contain SCTs (i.e. have an SCT extension) and be a
153 * precert (i.e. have a poison extension).
163 * If either a poison or SCT extension is present, remove it before encoding
164 * cert. This, along with ct_x509_cert_fixup(), gets a TBSCertificate (see
165 * RFC5280) from cert, which is what the CT log signed when it produced the
171 /* Take a copy of certificate so we don't modify passed version */
172 pretmp
= X509_dup(cert
);
176 ext
= X509_delete_ext(pretmp
, idx
);
177 X509_EXTENSION_free(ext
);
179 if (!ct_x509_cert_fixup(pretmp
, presigner
))
182 prederlen
= i2d_re_X509_tbs(pretmp
, &preder
);
189 OPENSSL_free(sctx
->certder
);
190 sctx
->certder
= certder
;
191 sctx
->certderlen
= certderlen
;
193 OPENSSL_free(sctx
->preder
);
194 sctx
->preder
= preder
;
195 sctx
->prederlen
= prederlen
;
199 OPENSSL_free(certder
);
200 OPENSSL_free(preder
);
205 __owur
static int ct_public_key_hash(SCT_CTX
*sctx
, X509_PUBKEY
*pkey
,
206 unsigned char **hash
, size_t *hash_len
)
209 unsigned char *md
= NULL
, *der
= NULL
;
212 EVP_MD
*sha256
= EVP_MD_fetch(sctx
->libctx
, "SHA2-256", sctx
->propq
);
217 /* Reuse buffer if possible */
218 if (*hash
!= NULL
&& *hash_len
>= SHA256_DIGEST_LENGTH
) {
221 md
= OPENSSL_malloc(SHA256_DIGEST_LENGTH
);
226 /* Calculate key hash */
227 der_len
= i2d_X509_PUBKEY(pkey
, &der
);
231 if (!EVP_Digest(der
, der_len
, md
, &md_len
, sha256
, NULL
))
237 *hash_len
= SHA256_DIGEST_LENGTH
;
249 int SCT_CTX_set1_issuer(SCT_CTX
*sctx
, const X509
*issuer
)
251 return SCT_CTX_set1_issuer_pubkey(sctx
, X509_get_X509_PUBKEY(issuer
));
254 int SCT_CTX_set1_issuer_pubkey(SCT_CTX
*sctx
, X509_PUBKEY
*pubkey
)
256 return ct_public_key_hash(sctx
, pubkey
, &sctx
->ihash
, &sctx
->ihashlen
);
259 int SCT_CTX_set1_pubkey(SCT_CTX
*sctx
, X509_PUBKEY
*pubkey
)
261 EVP_PKEY
*pkey
= X509_PUBKEY_get(pubkey
);
266 if (!ct_public_key_hash(sctx
, pubkey
, &sctx
->pkeyhash
, &sctx
->pkeyhashlen
)) {
271 EVP_PKEY_free(sctx
->pkey
);
276 void SCT_CTX_set_time(SCT_CTX
*sctx
, uint64_t time_in_ms
)
278 sctx
->epoch_time_in_ms
= time_in_ms
;