2 * Copyright 2015-2018 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
12 #include <openssl/crypto.h>
13 #include <openssl/bio.h>
14 #include <openssl/x509.h>
15 #include <openssl/pem.h>
16 #include <openssl/err.h>
19 static const char *roots_f;
20 static const char *untrusted_f;
21 static const char *bad_f;
22 static const char *req_f;
24 static STACK_OF(X509) *load_certs_from_file(const char *filename)
26 STACK_OF(X509) *certs;
30 bio = BIO_new_file(filename, "r");
36 certs = sk_X509_new_null();
44 x = PEM_read_bio_X509(bio, NULL, 0, NULL);
45 if (x != NULL && !sk_X509_push(certs, x)) {
46 sk_X509_pop_free(certs, X509_free);
49 } else if (x == NULL) {
51 * We probably just ran out of certs, so ignore any errors
64 * Test for CVE-2015-1793 (Alternate Chains Certificate Forgery)
66 * Chain is as follows:
68 * rootCA (self-signed)
72 * subinterCA subinterCA (self-signed)
74 * leaf ------------------
78 * rootCA, interCA, subinterCA, subinterCA (ss) all have CA=TRUE
79 * leaf and bad have CA=FALSE
81 * subinterCA and subinterCA (ss) have the same subject name and keys
83 * interCA (but not rootCA) and subinterCA (ss) are in the trusted store
85 * leaf and subinterCA are in the untrusted list (untrusted.pem)
86 * bad is the certificate being verified (bad.pem)
88 * Versions vulnerable to CVE-2015-1793 will fail to detect that leaf has
89 * CA=FALSE, and will therefore incorrectly verify bad
92 static int test_alt_chains_cert_forgery(void)
97 STACK_OF(X509) *untrusted = NULL;
99 X509_STORE_CTX *sctx = NULL;
100 X509_STORE *store = NULL;
101 X509_LOOKUP *lookup = NULL;
103 store = X509_STORE_new();
107 lookup = X509_STORE_add_lookup(store, X509_LOOKUP_file());
110 if (!X509_LOOKUP_load_file(lookup, roots_f, X509_FILETYPE_PEM))
113 untrusted = load_certs_from_file(untrusted_f);
115 if ((bio = BIO_new_file(bad_f, "r")) == NULL)
118 if ((x = PEM_read_bio_X509(bio, NULL, 0, NULL)) == NULL)
121 sctx = X509_STORE_CTX_new();
125 if (!X509_STORE_CTX_init(sctx, store, x, untrusted))
128 i = X509_verify_cert(sctx);
130 if (i == 0 && X509_STORE_CTX_get_error(sctx) == X509_V_ERR_INVALID_CA) {
131 /* This is the result we were expecting: Test passed */
135 X509_STORE_CTX_free(sctx);
138 sk_X509_pop_free(untrusted, X509_free);
139 X509_STORE_free(store);
143 static int test_store_ctx(void)
145 X509_STORE_CTX *sctx = NULL;
148 int testresult = 0, ret;
150 bio = BIO_new_file(bad_f, "r");
154 x = PEM_read_bio_X509(bio, NULL, 0, NULL);
158 sctx = X509_STORE_CTX_new();
162 if (!X509_STORE_CTX_init(sctx, NULL, x, NULL))
165 /* Verifying a cert where we have no trusted certs should fail */
166 ret = X509_verify_cert(sctx);
169 /* This is the result we were expecting: Test passed */
174 X509_STORE_CTX_free(sctx);
180 OPT_TEST_DECLARE_USAGE("roots.pem untrusted.pem bad.pem\n")
182 static int test_distinguishing_id(void)
187 ASN1_OCTET_STRING *v = NULL, *v2 = NULL;
188 char *distid = "this is an ID";
190 bio = BIO_new_file(bad_f, "r");
194 x = PEM_read_bio_X509(bio, NULL, 0, NULL);
198 v = ASN1_OCTET_STRING_new();
202 if (!ASN1_OCTET_STRING_set(v, (unsigned char *)distid,
203 (int)strlen(distid))) {
204 ASN1_OCTET_STRING_free(v);
208 X509_set0_distinguishing_id(x, v);
210 v2 = X509_get0_distinguishing_id(x);
212 || !TEST_int_eq(ASN1_OCTET_STRING_cmp(v, v2), 0))
222 static int test_req_distinguishing_id(void)
227 ASN1_OCTET_STRING *v = NULL, *v2 = NULL;
228 char *distid = "this is an ID";
230 bio = BIO_new_file(req_f, "r");
234 x = PEM_read_bio_X509_REQ(bio, NULL, 0, NULL);
238 v = ASN1_OCTET_STRING_new();
242 if (!ASN1_OCTET_STRING_set(v, (unsigned char *)distid,
243 (int)strlen(distid))) {
244 ASN1_OCTET_STRING_free(v);
248 X509_REQ_set0_distinguishing_id(x, v);
250 v2 = X509_REQ_get0_distinguishing_id(x);
252 || !TEST_int_eq(ASN1_OCTET_STRING_cmp(v, v2), 0))
262 int setup_tests(void)
264 if (!test_skip_common_options()) {
265 TEST_error("Error parsing test options\n");
269 if (!TEST_ptr(roots_f = test_get_argument(0))
270 || !TEST_ptr(untrusted_f = test_get_argument(1))
271 || !TEST_ptr(bad_f = test_get_argument(2))
272 || !TEST_ptr(req_f = test_get_argument(3)))
275 ADD_TEST(test_alt_chains_cert_forgery);
276 ADD_TEST(test_store_ctx);
277 ADD_TEST(test_distinguishing_id);
278 ADD_TEST(test_req_distinguishing_id);