]>
Commit | Line | Data |
---|---|---|
0f113f3e | 1 | /* |
d2e9e320 | 2 | * Copyright 1999-2016 The OpenSSL Project Authors. All Rights Reserved. |
673b102c | 3 | * |
d2e9e320 RS |
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 | |
673b102c DSH |
8 | */ |
9 | ||
10 | #include <stdio.h> | |
b39fc560 | 11 | #include "internal/cryptlib.h" |
1912c5d8 | 12 | #include "internal/numbers.h" |
673b102c | 13 | #include <openssl/x509v3.h> |
2f043896 | 14 | #include <openssl/x509_vfy.h> |
d19a50c9 | 15 | #include "internal/x509_int.h" |
673b102c | 16 | |
ce1b4fe1 | 17 | static void x509v3_cache_extensions(X509 *x); |
673b102c | 18 | |
ccd86b68 | 19 | static int check_ssl_ca(const X509 *x); |
0f113f3e MC |
20 | static int check_purpose_ssl_client(const X509_PURPOSE *xp, const X509 *x, |
21 | int ca); | |
22 | static int check_purpose_ssl_server(const X509_PURPOSE *xp, const X509 *x, | |
23 | int ca); | |
24 | static int check_purpose_ns_ssl_server(const X509_PURPOSE *xp, const X509 *x, | |
25 | int ca); | |
ccd86b68 | 26 | static int purpose_smime(const X509 *x, int ca); |
0f113f3e MC |
27 | static int check_purpose_smime_sign(const X509_PURPOSE *xp, const X509 *x, |
28 | int ca); | |
29 | static int check_purpose_smime_encrypt(const X509_PURPOSE *xp, const X509 *x, | |
30 | int ca); | |
31 | static int check_purpose_crl_sign(const X509_PURPOSE *xp, const X509 *x, | |
32 | int ca); | |
33 | static int check_purpose_timestamp_sign(const X509_PURPOSE *xp, const X509 *x, | |
34 | int ca); | |
ccd86b68 | 35 | static int no_check(const X509_PURPOSE *xp, const X509 *x, int ca); |
81f169e9 | 36 | static int ocsp_helper(const X509_PURPOSE *xp, const X509 *x, int ca); |
ccd86b68 | 37 | |
0f113f3e | 38 | static int xp_cmp(const X509_PURPOSE *const *a, const X509_PURPOSE *const *b); |
d4cec6a1 | 39 | static void xptable_free(X509_PURPOSE *p); |
673b102c DSH |
40 | |
41 | static X509_PURPOSE xstandard[] = { | |
0f113f3e MC |
42 | {X509_PURPOSE_SSL_CLIENT, X509_TRUST_SSL_CLIENT, 0, |
43 | check_purpose_ssl_client, "SSL client", "sslclient", NULL}, | |
44 | {X509_PURPOSE_SSL_SERVER, X509_TRUST_SSL_SERVER, 0, | |
45 | check_purpose_ssl_server, "SSL server", "sslserver", NULL}, | |
46 | {X509_PURPOSE_NS_SSL_SERVER, X509_TRUST_SSL_SERVER, 0, | |
47 | check_purpose_ns_ssl_server, "Netscape SSL server", "nssslserver", NULL}, | |
48 | {X509_PURPOSE_SMIME_SIGN, X509_TRUST_EMAIL, 0, check_purpose_smime_sign, | |
49 | "S/MIME signing", "smimesign", NULL}, | |
50 | {X509_PURPOSE_SMIME_ENCRYPT, X509_TRUST_EMAIL, 0, | |
51 | check_purpose_smime_encrypt, "S/MIME encryption", "smimeencrypt", NULL}, | |
52 | {X509_PURPOSE_CRL_SIGN, X509_TRUST_COMPAT, 0, check_purpose_crl_sign, | |
53 | "CRL signing", "crlsign", NULL}, | |
54 | {X509_PURPOSE_ANY, X509_TRUST_DEFAULT, 0, no_check, "Any Purpose", "any", | |
55 | NULL}, | |
56 | {X509_PURPOSE_OCSP_HELPER, X509_TRUST_COMPAT, 0, ocsp_helper, | |
57 | "OCSP helper", "ocsphelper", NULL}, | |
58 | {X509_PURPOSE_TIMESTAMP_SIGN, X509_TRUST_TSA, 0, | |
59 | check_purpose_timestamp_sign, "Time Stamp signing", "timestampsign", | |
60 | NULL}, | |
673b102c DSH |
61 | }; |
62 | ||
b6eb9827 | 63 | #define X509_PURPOSE_COUNT OSSL_NELEM(xstandard) |
dd413410 | 64 | |
79875776 | 65 | static STACK_OF(X509_PURPOSE) *xptable = NULL; |
673b102c | 66 | |
0f113f3e | 67 | static int xp_cmp(const X509_PURPOSE *const *a, const X509_PURPOSE *const *b) |
673b102c | 68 | { |
0f113f3e | 69 | return (*a)->purpose - (*b)->purpose; |
673b102c DSH |
70 | } |
71 | ||
0f113f3e MC |
72 | /* |
73 | * As much as I'd like to make X509_check_purpose use a "const" X509* I | |
74 | * really can't because it does recalculate hashes and do other non-const | |
75 | * things. | |
76 | */ | |
673b102c DSH |
77 | int X509_check_purpose(X509 *x, int id, int ca) |
78 | { | |
0f113f3e MC |
79 | int idx; |
80 | const X509_PURPOSE *pt; | |
81 | if (!(x->ex_flags & EXFLAG_SET)) { | |
c001ce33 | 82 | CRYPTO_THREAD_write_lock(x->lock); |
0f113f3e | 83 | x509v3_cache_extensions(x); |
c001ce33 | 84 | CRYPTO_THREAD_unlock(x->lock); |
0f113f3e | 85 | } |
109f8b5d | 86 | /* Return if side-effect only call */ |
0f113f3e MC |
87 | if (id == -1) |
88 | return 1; | |
89 | idx = X509_PURPOSE_get_by_id(id); | |
90 | if (idx == -1) | |
91 | return -1; | |
92 | pt = X509_PURPOSE_get0(idx); | |
93 | return pt->check_purpose(pt, x, ca); | |
673b102c | 94 | } |
e947f396 | 95 | |
926a56bf DSH |
96 | int X509_PURPOSE_set(int *p, int purpose) |
97 | { | |
0f113f3e MC |
98 | if (X509_PURPOSE_get_by_id(purpose) == -1) { |
99 | X509V3err(X509V3_F_X509_PURPOSE_SET, X509V3_R_INVALID_PURPOSE); | |
100 | return 0; | |
101 | } | |
102 | *p = purpose; | |
103 | return 1; | |
926a56bf DSH |
104 | } |
105 | ||
d4cec6a1 DSH |
106 | int X509_PURPOSE_get_count(void) |
107 | { | |
0f113f3e MC |
108 | if (!xptable) |
109 | return X509_PURPOSE_COUNT; | |
110 | return sk_X509_PURPOSE_num(xptable) + X509_PURPOSE_COUNT; | |
d4cec6a1 | 111 | } |
ce1b4fe1 | 112 | |
0f113f3e | 113 | X509_PURPOSE *X509_PURPOSE_get0(int idx) |
d4cec6a1 | 114 | { |
0f113f3e MC |
115 | if (idx < 0) |
116 | return NULL; | |
117 | if (idx < (int)X509_PURPOSE_COUNT) | |
118 | return xstandard + idx; | |
119 | return sk_X509_PURPOSE_value(xptable, idx - X509_PURPOSE_COUNT); | |
d4cec6a1 DSH |
120 | } |
121 | ||
c8f717fe | 122 | int X509_PURPOSE_get_by_sname(const char *sname) |
d4cec6a1 | 123 | { |
0f113f3e MC |
124 | int i; |
125 | X509_PURPOSE *xptmp; | |
126 | for (i = 0; i < X509_PURPOSE_get_count(); i++) { | |
127 | xptmp = X509_PURPOSE_get0(i); | |
86885c28 | 128 | if (strcmp(xptmp->sname, sname) == 0) |
0f113f3e MC |
129 | return i; |
130 | } | |
131 | return -1; | |
d4cec6a1 | 132 | } |
673b102c | 133 | |
13938ace | 134 | int X509_PURPOSE_get_by_id(int purpose) |
673b102c | 135 | { |
0f113f3e MC |
136 | X509_PURPOSE tmp; |
137 | int idx; | |
138 | if ((purpose >= X509_PURPOSE_MIN) && (purpose <= X509_PURPOSE_MAX)) | |
139 | return purpose - X509_PURPOSE_MIN; | |
140 | tmp.purpose = purpose; | |
141 | if (!xptable) | |
142 | return -1; | |
143 | idx = sk_X509_PURPOSE_find(xptable, &tmp); | |
144 | if (idx == -1) | |
145 | return -1; | |
146 | return idx + X509_PURPOSE_COUNT; | |
673b102c DSH |
147 | } |
148 | ||
dd413410 | 149 | int X509_PURPOSE_add(int id, int trust, int flags, |
0f113f3e | 150 | int (*ck) (const X509_PURPOSE *, const X509 *, int), |
c8f717fe | 151 | const char *name, const char *sname, void *arg) |
0f113f3e MC |
152 | { |
153 | int idx; | |
154 | X509_PURPOSE *ptmp; | |
155 | /* | |
156 | * This is set according to what we change: application can't set it | |
157 | */ | |
158 | flags &= ~X509_PURPOSE_DYNAMIC; | |
159 | /* This will always be set for application modified trust entries */ | |
160 | flags |= X509_PURPOSE_DYNAMIC_NAME; | |
161 | /* Get existing entry if any */ | |
162 | idx = X509_PURPOSE_get_by_id(id); | |
163 | /* Need a new entry */ | |
164 | if (idx == -1) { | |
75ebbd9a | 165 | if ((ptmp = OPENSSL_malloc(sizeof(*ptmp))) == NULL) { |
0f113f3e MC |
166 | X509V3err(X509V3_F_X509_PURPOSE_ADD, ERR_R_MALLOC_FAILURE); |
167 | return 0; | |
168 | } | |
169 | ptmp->flags = X509_PURPOSE_DYNAMIC; | |
170 | } else | |
171 | ptmp = X509_PURPOSE_get0(idx); | |
172 | ||
173 | /* OPENSSL_free existing name if dynamic */ | |
174 | if (ptmp->flags & X509_PURPOSE_DYNAMIC_NAME) { | |
175 | OPENSSL_free(ptmp->name); | |
176 | OPENSSL_free(ptmp->sname); | |
177 | } | |
178 | /* dup supplied name */ | |
7644a9ae RS |
179 | ptmp->name = OPENSSL_strdup(name); |
180 | ptmp->sname = OPENSSL_strdup(sname); | |
0f113f3e MC |
181 | if (!ptmp->name || !ptmp->sname) { |
182 | X509V3err(X509V3_F_X509_PURPOSE_ADD, ERR_R_MALLOC_FAILURE); | |
137e5555 | 183 | goto err; |
0f113f3e MC |
184 | } |
185 | /* Keep the dynamic flag of existing entry */ | |
186 | ptmp->flags &= X509_PURPOSE_DYNAMIC; | |
187 | /* Set all other flags */ | |
188 | ptmp->flags |= flags; | |
189 | ||
190 | ptmp->purpose = id; | |
191 | ptmp->trust = trust; | |
192 | ptmp->check_purpose = ck; | |
193 | ptmp->usr_data = arg; | |
194 | ||
195 | /* If its a new entry manage the dynamic table */ | |
196 | if (idx == -1) { | |
75ebbd9a RS |
197 | if (xptable == NULL |
198 | && (xptable = sk_X509_PURPOSE_new(xp_cmp)) == NULL) { | |
0f113f3e | 199 | X509V3err(X509V3_F_X509_PURPOSE_ADD, ERR_R_MALLOC_FAILURE); |
137e5555 | 200 | goto err; |
0f113f3e MC |
201 | } |
202 | if (!sk_X509_PURPOSE_push(xptable, ptmp)) { | |
203 | X509V3err(X509V3_F_X509_PURPOSE_ADD, ERR_R_MALLOC_FAILURE); | |
137e5555 | 204 | goto err; |
0f113f3e MC |
205 | } |
206 | } | |
207 | return 1; | |
137e5555 MC |
208 | err: |
209 | if (idx == -1) { | |
210 | OPENSSL_free(ptmp->name); | |
211 | OPENSSL_free(ptmp->sname); | |
212 | OPENSSL_free(ptmp); | |
213 | } | |
214 | return 0; | |
673b102c DSH |
215 | } |
216 | ||
79875776 | 217 | static void xptable_free(X509_PURPOSE *p) |
0f113f3e MC |
218 | { |
219 | if (!p) | |
220 | return; | |
221 | if (p->flags & X509_PURPOSE_DYNAMIC) { | |
222 | if (p->flags & X509_PURPOSE_DYNAMIC_NAME) { | |
223 | OPENSSL_free(p->name); | |
224 | OPENSSL_free(p->sname); | |
225 | } | |
226 | OPENSSL_free(p); | |
227 | } | |
228 | } | |
79875776 BM |
229 | |
230 | void X509_PURPOSE_cleanup(void) | |
231 | { | |
0f113f3e | 232 | sk_X509_PURPOSE_pop_free(xptable, xptable_free); |
0f113f3e | 233 | xptable = NULL; |
79875776 BM |
234 | } |
235 | ||
c8f717fe | 236 | int X509_PURPOSE_get_id(const X509_PURPOSE *xp) |
673b102c | 237 | { |
0f113f3e | 238 | return xp->purpose; |
673b102c DSH |
239 | } |
240 | ||
c8f717fe | 241 | char *X509_PURPOSE_get0_name(const X509_PURPOSE *xp) |
d4cec6a1 | 242 | { |
0f113f3e | 243 | return xp->name; |
d4cec6a1 | 244 | } |
673b102c | 245 | |
c8f717fe | 246 | char *X509_PURPOSE_get0_sname(const X509_PURPOSE *xp) |
673b102c | 247 | { |
0f113f3e | 248 | return xp->sname; |
673b102c DSH |
249 | } |
250 | ||
c8f717fe | 251 | int X509_PURPOSE_get_trust(const X509_PURPOSE *xp) |
673b102c | 252 | { |
0f113f3e | 253 | return xp->trust; |
673b102c DSH |
254 | } |
255 | ||
babb3798 | 256 | static int nid_cmp(const int *a, const int *b) |
0f113f3e MC |
257 | { |
258 | return *a - *b; | |
259 | } | |
f1558bb4 | 260 | |
e19106f5 DSH |
261 | DECLARE_OBJ_BSEARCH_CMP_FN(int, int, nid); |
262 | IMPLEMENT_OBJ_BSEARCH_CMP_FN(int, int, nid); | |
babb3798 | 263 | |
f1558bb4 | 264 | int X509_supported_extension(X509_EXTENSION *ex) |
0f113f3e MC |
265 | { |
266 | /* | |
267 | * This table is a list of the NIDs of supported extensions: that is | |
268 | * those which are used by the verify process. If an extension is | |
269 | * critical and doesn't appear in this list then the verify process will | |
270 | * normally reject the certificate. The list must be kept in numerical | |
271 | * order because it will be searched using bsearch. | |
272 | */ | |
273 | ||
274 | static const int supported_nids[] = { | |
275 | NID_netscape_cert_type, /* 71 */ | |
276 | NID_key_usage, /* 83 */ | |
277 | NID_subject_alt_name, /* 85 */ | |
278 | NID_basic_constraints, /* 87 */ | |
279 | NID_certificate_policies, /* 89 */ | |
e6f648fd | 280 | NID_crl_distribution_points, /* 103 */ |
0f113f3e | 281 | NID_ext_key_usage, /* 126 */ |
47bbaa5b | 282 | #ifndef OPENSSL_NO_RFC3779 |
0f113f3e MC |
283 | NID_sbgp_ipAddrBlock, /* 290 */ |
284 | NID_sbgp_autonomousSysNum, /* 291 */ | |
47bbaa5b | 285 | #endif |
0f113f3e MC |
286 | NID_policy_constraints, /* 401 */ |
287 | NID_proxyCertInfo, /* 663 */ | |
288 | NID_name_constraints, /* 666 */ | |
289 | NID_policy_mappings, /* 747 */ | |
290 | NID_inhibit_any_policy /* 748 */ | |
291 | }; | |
292 | ||
293 | int ex_nid = OBJ_obj2nid(X509_EXTENSION_get_object(ex)); | |
294 | ||
295 | if (ex_nid == NID_undef) | |
296 | return 0; | |
297 | ||
b6eb9827 | 298 | if (OBJ_bsearch_nid(&ex_nid, supported_nids, OSSL_NELEM(supported_nids))) |
0f113f3e MC |
299 | return 1; |
300 | return 0; | |
301 | } | |
3e727a3b DSH |
302 | |
303 | static void setup_dp(X509 *x, DIST_POINT *dp) | |
0f113f3e MC |
304 | { |
305 | X509_NAME *iname = NULL; | |
306 | int i; | |
307 | if (dp->reasons) { | |
308 | if (dp->reasons->length > 0) | |
309 | dp->dp_reasons = dp->reasons->data[0]; | |
310 | if (dp->reasons->length > 1) | |
311 | dp->dp_reasons |= (dp->reasons->data[1] << 8); | |
312 | dp->dp_reasons &= CRLDP_ALL_REASONS; | |
313 | } else | |
314 | dp->dp_reasons = CRLDP_ALL_REASONS; | |
315 | if (!dp->distpoint || (dp->distpoint->type != 1)) | |
316 | return; | |
317 | for (i = 0; i < sk_GENERAL_NAME_num(dp->CRLissuer); i++) { | |
318 | GENERAL_NAME *gen = sk_GENERAL_NAME_value(dp->CRLissuer, i); | |
319 | if (gen->type == GEN_DIRNAME) { | |
320 | iname = gen->d.directoryName; | |
321 | break; | |
322 | } | |
323 | } | |
324 | if (!iname) | |
325 | iname = X509_get_issuer_name(x); | |
326 | ||
327 | DIST_POINT_set_dpname(dp->distpoint, iname); | |
328 | ||
329 | } | |
3e727a3b DSH |
330 | |
331 | static void setup_crldp(X509 *x) | |
0f113f3e MC |
332 | { |
333 | int i; | |
334 | x->crldp = X509_get_ext_d2i(x, NID_crl_distribution_points, NULL, NULL); | |
335 | for (i = 0; i < sk_DIST_POINT_num(x->crldp); i++) | |
336 | setup_dp(x, sk_DIST_POINT_value(x->crldp, i)); | |
337 | } | |
f1558bb4 | 338 | |
f51e5ed6 DSH |
339 | #define V1_ROOT (EXFLAG_V1|EXFLAG_SS) |
340 | #define ku_reject(x, usage) \ | |
341 | (((x)->ex_flags & EXFLAG_KUSAGE) && !((x)->ex_kusage & (usage))) | |
342 | #define xku_reject(x, usage) \ | |
343 | (((x)->ex_flags & EXFLAG_XKUSAGE) && !((x)->ex_xkusage & (usage))) | |
344 | #define ns_reject(x, usage) \ | |
345 | (((x)->ex_flags & EXFLAG_NSCERT) && !((x)->ex_nscert & (usage))) | |
346 | ||
ce1b4fe1 | 347 | static void x509v3_cache_extensions(X509 *x) |
673b102c | 348 | { |
0f113f3e MC |
349 | BASIC_CONSTRAINTS *bs; |
350 | PROXY_CERT_INFO_EXTENSION *pci; | |
351 | ASN1_BIT_STRING *usage; | |
352 | ASN1_BIT_STRING *ns; | |
353 | EXTENDED_KEY_USAGE *extusage; | |
354 | X509_EXTENSION *ex; | |
355 | ||
356 | int i; | |
357 | if (x->ex_flags & EXFLAG_SET) | |
358 | return; | |
0f113f3e | 359 | X509_digest(x, EVP_sha1(), x->sha1_hash, NULL); |
0f113f3e MC |
360 | /* V1 should mean no extensions ... */ |
361 | if (!X509_get_version(x)) | |
362 | x->ex_flags |= EXFLAG_V1; | |
363 | /* Handle basic constraints */ | |
364 | if ((bs = X509_get_ext_d2i(x, NID_basic_constraints, NULL, NULL))) { | |
365 | if (bs->ca) | |
366 | x->ex_flags |= EXFLAG_CA; | |
367 | if (bs->pathlen) { | |
368 | if ((bs->pathlen->type == V_ASN1_NEG_INTEGER) | |
369 | || !bs->ca) { | |
370 | x->ex_flags |= EXFLAG_INVALID; | |
371 | x->ex_pathlen = 0; | |
372 | } else | |
373 | x->ex_pathlen = ASN1_INTEGER_get(bs->pathlen); | |
374 | } else | |
375 | x->ex_pathlen = -1; | |
376 | BASIC_CONSTRAINTS_free(bs); | |
377 | x->ex_flags |= EXFLAG_BCONS; | |
378 | } | |
379 | /* Handle proxy certificates */ | |
380 | if ((pci = X509_get_ext_d2i(x, NID_proxyCertInfo, NULL, NULL))) { | |
381 | if (x->ex_flags & EXFLAG_CA | |
382 | || X509_get_ext_by_NID(x, NID_subject_alt_name, -1) >= 0 | |
383 | || X509_get_ext_by_NID(x, NID_issuer_alt_name, -1) >= 0) { | |
384 | x->ex_flags |= EXFLAG_INVALID; | |
385 | } | |
386 | if (pci->pcPathLengthConstraint) { | |
387 | x->ex_pcpathlen = ASN1_INTEGER_get(pci->pcPathLengthConstraint); | |
388 | } else | |
389 | x->ex_pcpathlen = -1; | |
390 | PROXY_CERT_INFO_EXTENSION_free(pci); | |
391 | x->ex_flags |= EXFLAG_PROXY; | |
392 | } | |
393 | /* Handle key usage */ | |
394 | if ((usage = X509_get_ext_d2i(x, NID_key_usage, NULL, NULL))) { | |
395 | if (usage->length > 0) { | |
396 | x->ex_kusage = usage->data[0]; | |
397 | if (usage->length > 1) | |
398 | x->ex_kusage |= usage->data[1] << 8; | |
399 | } else | |
400 | x->ex_kusage = 0; | |
401 | x->ex_flags |= EXFLAG_KUSAGE; | |
402 | ASN1_BIT_STRING_free(usage); | |
403 | } | |
404 | x->ex_xkusage = 0; | |
405 | if ((extusage = X509_get_ext_d2i(x, NID_ext_key_usage, NULL, NULL))) { | |
406 | x->ex_flags |= EXFLAG_XKUSAGE; | |
407 | for (i = 0; i < sk_ASN1_OBJECT_num(extusage); i++) { | |
408 | switch (OBJ_obj2nid(sk_ASN1_OBJECT_value(extusage, i))) { | |
409 | case NID_server_auth: | |
410 | x->ex_xkusage |= XKU_SSL_SERVER; | |
411 | break; | |
412 | ||
413 | case NID_client_auth: | |
414 | x->ex_xkusage |= XKU_SSL_CLIENT; | |
415 | break; | |
416 | ||
417 | case NID_email_protect: | |
418 | x->ex_xkusage |= XKU_SMIME; | |
419 | break; | |
420 | ||
421 | case NID_code_sign: | |
422 | x->ex_xkusage |= XKU_CODE_SIGN; | |
423 | break; | |
424 | ||
425 | case NID_ms_sgc: | |
426 | case NID_ns_sgc: | |
427 | x->ex_xkusage |= XKU_SGC; | |
428 | break; | |
429 | ||
430 | case NID_OCSP_sign: | |
431 | x->ex_xkusage |= XKU_OCSP_SIGN; | |
432 | break; | |
433 | ||
434 | case NID_time_stamp: | |
435 | x->ex_xkusage |= XKU_TIMESTAMP; | |
436 | break; | |
437 | ||
438 | case NID_dvcs: | |
439 | x->ex_xkusage |= XKU_DVCS; | |
440 | break; | |
441 | ||
442 | case NID_anyExtendedKeyUsage: | |
443 | x->ex_xkusage |= XKU_ANYEKU; | |
444 | break; | |
445 | } | |
446 | } | |
447 | sk_ASN1_OBJECT_pop_free(extusage, ASN1_OBJECT_free); | |
448 | } | |
449 | ||
450 | if ((ns = X509_get_ext_d2i(x, NID_netscape_cert_type, NULL, NULL))) { | |
451 | if (ns->length > 0) | |
452 | x->ex_nscert = ns->data[0]; | |
453 | else | |
454 | x->ex_nscert = 0; | |
455 | x->ex_flags |= EXFLAG_NSCERT; | |
456 | ASN1_BIT_STRING_free(ns); | |
457 | } | |
458 | x->skid = X509_get_ext_d2i(x, NID_subject_key_identifier, NULL, NULL); | |
459 | x->akid = X509_get_ext_d2i(x, NID_authority_key_identifier, NULL, NULL); | |
460 | /* Does subject name match issuer ? */ | |
461 | if (!X509_NAME_cmp(X509_get_subject_name(x), X509_get_issuer_name(x))) { | |
462 | x->ex_flags |= EXFLAG_SI; | |
463 | /* If SKID matches AKID also indicate self signed */ | |
f51e5ed6 DSH |
464 | if (X509_check_akid(x, x->akid) == X509_V_OK && |
465 | !ku_reject(x, KU_KEY_CERT_SIGN)) | |
0f113f3e MC |
466 | x->ex_flags |= EXFLAG_SS; |
467 | } | |
468 | x->altname = X509_get_ext_d2i(x, NID_subject_alt_name, NULL, NULL); | |
469 | x->nc = X509_get_ext_d2i(x, NID_name_constraints, &i, NULL); | |
470 | if (!x->nc && (i != -1)) | |
471 | x->ex_flags |= EXFLAG_INVALID; | |
472 | setup_crldp(x); | |
d43c4497 | 473 | |
47bbaa5b | 474 | #ifndef OPENSSL_NO_RFC3779 |
0f113f3e MC |
475 | x->rfc3779_addr = X509_get_ext_d2i(x, NID_sbgp_ipAddrBlock, NULL, NULL); |
476 | x->rfc3779_asid = X509_get_ext_d2i(x, NID_sbgp_autonomousSysNum, | |
477 | NULL, NULL); | |
47bbaa5b | 478 | #endif |
0f113f3e MC |
479 | for (i = 0; i < X509_get_ext_count(x); i++) { |
480 | ex = X509_get_ext(x, i); | |
481 | if (OBJ_obj2nid(X509_EXTENSION_get_object(ex)) | |
482 | == NID_freshest_crl) | |
483 | x->ex_flags |= EXFLAG_FRESHEST; | |
484 | if (!X509_EXTENSION_get_critical(ex)) | |
485 | continue; | |
486 | if (!X509_supported_extension(ex)) { | |
487 | x->ex_flags |= EXFLAG_CRITICAL; | |
488 | break; | |
489 | } | |
490 | } | |
491 | x->ex_flags |= EXFLAG_SET; | |
673b102c DSH |
492 | } |
493 | ||
1d97c843 TH |
494 | /*- |
495 | * CA checks common to all purposes | |
673b102c DSH |
496 | * return codes: |
497 | * 0 not a CA | |
498 | * 1 is a CA | |
499 | * 2 basicConstraints absent so "maybe" a CA | |
500 | * 3 basicConstraints absent but self signed V1. | |
bc501570 | 501 | * 4 basicConstraints absent but keyUsage present and keyCertSign asserted. |
673b102c DSH |
502 | */ |
503 | ||
5073ff03 | 504 | static int check_ca(const X509 *x) |
673b102c | 505 | { |
0f113f3e MC |
506 | /* keyUsage if present should allow cert signing */ |
507 | if (ku_reject(x, KU_KEY_CERT_SIGN)) | |
508 | return 0; | |
509 | if (x->ex_flags & EXFLAG_BCONS) { | |
510 | if (x->ex_flags & EXFLAG_CA) | |
511 | return 1; | |
512 | /* If basicConstraints says not a CA then say so */ | |
513 | else | |
514 | return 0; | |
515 | } else { | |
516 | /* we support V1 roots for... uh, I don't really know why. */ | |
517 | if ((x->ex_flags & V1_ROOT) == V1_ROOT) | |
518 | return 3; | |
519 | /* | |
520 | * If key usage present it must have certSign so tolerate it | |
521 | */ | |
522 | else if (x->ex_flags & EXFLAG_KUSAGE) | |
523 | return 4; | |
524 | /* Older certificates could have Netscape-specific CA types */ | |
525 | else if (x->ex_flags & EXFLAG_NSCERT && x->ex_nscert & NS_ANY_CA) | |
526 | return 5; | |
527 | /* can this still be regarded a CA certificate? I doubt it */ | |
528 | return 0; | |
529 | } | |
673b102c DSH |
530 | } |
531 | ||
9961cb77 RL |
532 | void X509_set_proxy_flag(X509 *x) |
533 | { | |
534 | x->ex_flags |= EXFLAG_PROXY; | |
535 | } | |
536 | ||
fe0169b0 RL |
537 | void X509_set_proxy_pathlen(X509 *x, long l) |
538 | { | |
539 | x->ex_pcpathlen = l; | |
540 | } | |
541 | ||
5073ff03 RL |
542 | int X509_check_ca(X509 *x) |
543 | { | |
0f113f3e | 544 | if (!(x->ex_flags & EXFLAG_SET)) { |
c001ce33 | 545 | CRYPTO_THREAD_write_lock(x->lock); |
0f113f3e | 546 | x509v3_cache_extensions(x); |
c001ce33 | 547 | CRYPTO_THREAD_unlock(x->lock); |
0f113f3e | 548 | } |
5073ff03 | 549 | |
0f113f3e | 550 | return check_ca(x); |
5073ff03 RL |
551 | } |
552 | ||
0cb957a6 | 553 | /* Check SSL CA: common checks for SSL client and server */ |
ccd86b68 | 554 | static int check_ssl_ca(const X509 *x) |
0cb957a6 | 555 | { |
0f113f3e MC |
556 | int ca_ret; |
557 | ca_ret = check_ca(x); | |
558 | if (!ca_ret) | |
559 | return 0; | |
560 | /* check nsCertType if present */ | |
561 | if (ca_ret != 5 || x->ex_nscert & NS_SSL_CA) | |
562 | return ca_ret; | |
563 | else | |
564 | return 0; | |
0cb957a6 | 565 | } |
8cff6331 | 566 | |
0f113f3e MC |
567 | static int check_purpose_ssl_client(const X509_PURPOSE *xp, const X509 *x, |
568 | int ca) | |
673b102c | 569 | { |
0f113f3e MC |
570 | if (xku_reject(x, XKU_SSL_CLIENT)) |
571 | return 0; | |
572 | if (ca) | |
573 | return check_ssl_ca(x); | |
574 | /* We need to do digital signatures or key agreement */ | |
575 | if (ku_reject(x, KU_DIGITAL_SIGNATURE | KU_KEY_AGREEMENT)) | |
576 | return 0; | |
577 | /* nsCertType if present should allow SSL client use */ | |
578 | if (ns_reject(x, NS_SSL_CLIENT)) | |
579 | return 0; | |
580 | return 1; | |
673b102c | 581 | } |
0f113f3e MC |
582 | |
583 | /* | |
584 | * Key usage needed for TLS/SSL server: digital signature, encipherment or | |
7568d15a DSH |
585 | * key agreement. The ssl code can check this more thoroughly for individual |
586 | * key types. | |
587 | */ | |
588 | #define KU_TLS \ | |
0f113f3e | 589 | KU_DIGITAL_SIGNATURE|KU_KEY_ENCIPHERMENT|KU_KEY_AGREEMENT |
673b102c | 590 | |
0f113f3e MC |
591 | static int check_purpose_ssl_server(const X509_PURPOSE *xp, const X509 *x, |
592 | int ca) | |
673b102c | 593 | { |
0f113f3e MC |
594 | if (xku_reject(x, XKU_SSL_SERVER | XKU_SGC)) |
595 | return 0; | |
596 | if (ca) | |
597 | return check_ssl_ca(x); | |
598 | ||
599 | if (ns_reject(x, NS_SSL_SERVER)) | |
600 | return 0; | |
601 | if (ku_reject(x, KU_TLS)) | |
602 | return 0; | |
673b102c | 603 | |
0f113f3e | 604 | return 1; |
673b102c DSH |
605 | |
606 | } | |
607 | ||
0f113f3e MC |
608 | static int check_purpose_ns_ssl_server(const X509_PURPOSE *xp, const X509 *x, |
609 | int ca) | |
673b102c | 610 | { |
0f113f3e MC |
611 | int ret; |
612 | ret = check_purpose_ssl_server(xp, x, ca); | |
613 | if (!ret || ca) | |
614 | return ret; | |
615 | /* We need to encipher or Netscape complains */ | |
616 | if (ku_reject(x, KU_KEY_ENCIPHERMENT)) | |
617 | return 0; | |
618 | return ret; | |
673b102c DSH |
619 | } |
620 | ||
621 | /* common S/MIME checks */ | |
ccd86b68 | 622 | static int purpose_smime(const X509 *x, int ca) |
673b102c | 623 | { |
0f113f3e MC |
624 | if (xku_reject(x, XKU_SMIME)) |
625 | return 0; | |
626 | if (ca) { | |
627 | int ca_ret; | |
628 | ca_ret = check_ca(x); | |
629 | if (!ca_ret) | |
630 | return 0; | |
631 | /* check nsCertType if present */ | |
632 | if (ca_ret != 5 || x->ex_nscert & NS_SMIME_CA) | |
633 | return ca_ret; | |
634 | else | |
635 | return 0; | |
636 | } | |
637 | if (x->ex_flags & EXFLAG_NSCERT) { | |
638 | if (x->ex_nscert & NS_SMIME) | |
639 | return 1; | |
640 | /* Workaround for some buggy certificates */ | |
641 | if (x->ex_nscert & NS_SSL_CLIENT) | |
642 | return 2; | |
643 | return 0; | |
644 | } | |
645 | return 1; | |
673b102c DSH |
646 | } |
647 | ||
0f113f3e MC |
648 | static int check_purpose_smime_sign(const X509_PURPOSE *xp, const X509 *x, |
649 | int ca) | |
673b102c | 650 | { |
0f113f3e MC |
651 | int ret; |
652 | ret = purpose_smime(x, ca); | |
653 | if (!ret || ca) | |
654 | return ret; | |
655 | if (ku_reject(x, KU_DIGITAL_SIGNATURE | KU_NON_REPUDIATION)) | |
656 | return 0; | |
657 | return ret; | |
673b102c DSH |
658 | } |
659 | ||
0f113f3e MC |
660 | static int check_purpose_smime_encrypt(const X509_PURPOSE *xp, const X509 *x, |
661 | int ca) | |
673b102c | 662 | { |
0f113f3e MC |
663 | int ret; |
664 | ret = purpose_smime(x, ca); | |
665 | if (!ret || ca) | |
666 | return ret; | |
667 | if (ku_reject(x, KU_KEY_ENCIPHERMENT)) | |
668 | return 0; | |
669 | return ret; | |
673b102c DSH |
670 | } |
671 | ||
0f113f3e MC |
672 | static int check_purpose_crl_sign(const X509_PURPOSE *xp, const X509 *x, |
673 | int ca) | |
673b102c | 674 | { |
0f113f3e MC |
675 | if (ca) { |
676 | int ca_ret; | |
677 | if ((ca_ret = check_ca(x)) != 2) | |
678 | return ca_ret; | |
679 | else | |
680 | return 0; | |
681 | } | |
682 | if (ku_reject(x, KU_CRL_SIGN)) | |
683 | return 0; | |
684 | return 1; | |
673b102c | 685 | } |
068fdce8 | 686 | |
0f113f3e MC |
687 | /* |
688 | * OCSP helper: this is *not* a full OCSP check. It just checks that each CA | |
689 | * is valid. Additional checks must be made on the chain. | |
81f169e9 DSH |
690 | */ |
691 | ||
692 | static int ocsp_helper(const X509_PURPOSE *xp, const X509 *x, int ca) | |
693 | { | |
0f113f3e MC |
694 | /* |
695 | * Must be a valid CA. Should we really support the "I don't know" value | |
696 | * (2)? | |
697 | */ | |
698 | if (ca) | |
699 | return check_ca(x); | |
700 | /* leaf certificate is checked in OCSP_verify() */ | |
701 | return 1; | |
81f169e9 DSH |
702 | } |
703 | ||
c7235be6 | 704 | static int check_purpose_timestamp_sign(const X509_PURPOSE *xp, const X509 *x, |
0f113f3e | 705 | int ca) |
c7235be6 | 706 | { |
0f113f3e MC |
707 | int i_ext; |
708 | ||
709 | /* If ca is true we must return if this is a valid CA certificate. */ | |
710 | if (ca) | |
711 | return check_ca(x); | |
712 | ||
713 | /* | |
714 | * Check the optional key usage field: | |
715 | * if Key Usage is present, it must be one of digitalSignature | |
716 | * and/or nonRepudiation (other values are not consistent and shall | |
717 | * be rejected). | |
718 | */ | |
719 | if ((x->ex_flags & EXFLAG_KUSAGE) | |
720 | && ((x->ex_kusage & ~(KU_NON_REPUDIATION | KU_DIGITAL_SIGNATURE)) || | |
721 | !(x->ex_kusage & (KU_NON_REPUDIATION | KU_DIGITAL_SIGNATURE)))) | |
722 | return 0; | |
723 | ||
724 | /* Only time stamp key usage is permitted and it's required. */ | |
725 | if (!(x->ex_flags & EXFLAG_XKUSAGE) || x->ex_xkusage != XKU_TIMESTAMP) | |
726 | return 0; | |
727 | ||
728 | /* Extended Key Usage MUST be critical */ | |
7569362e | 729 | i_ext = X509_get_ext_by_NID(x, NID_ext_key_usage, -1); |
0f113f3e MC |
730 | if (i_ext >= 0) { |
731 | X509_EXTENSION *ext = X509_get_ext((X509 *)x, i_ext); | |
732 | if (!X509_EXTENSION_get_critical(ext)) | |
733 | return 0; | |
734 | } | |
735 | ||
736 | return 1; | |
c7235be6 UM |
737 | } |
738 | ||
ccd86b68 | 739 | static int no_check(const X509_PURPOSE *xp, const X509 *x, int ca) |
068fdce8 | 740 | { |
0f113f3e | 741 | return 1; |
068fdce8 | 742 | } |
2f043896 | 743 | |
1d97c843 TH |
744 | /*- |
745 | * Various checks to see if one certificate issued the second. | |
2f043896 DSH |
746 | * This can be used to prune a set of possible issuer certificates |
747 | * which have been looked up using some simple method such as by | |
748 | * subject name. | |
749 | * These are: | |
750 | * 1. Check issuer_name(subject) == subject_name(issuer) | |
751 | * 2. If akid(subject) exists check it matches issuer | |
752 | * 3. If key_usage(issuer) exists check it supports certificate signing | |
753 | * returns 0 for OK, positive for reason for mismatch, reasons match | |
754 | * codes for X509_verify_cert() | |
755 | */ | |
756 | ||
757 | int X509_check_issued(X509 *issuer, X509 *subject) | |
758 | { | |
0f113f3e MC |
759 | if (X509_NAME_cmp(X509_get_subject_name(issuer), |
760 | X509_get_issuer_name(subject))) | |
761 | return X509_V_ERR_SUBJECT_ISSUER_MISMATCH; | |
762 | x509v3_cache_extensions(issuer); | |
763 | x509v3_cache_extensions(subject); | |
764 | ||
765 | if (subject->akid) { | |
766 | int ret = X509_check_akid(issuer, subject->akid); | |
767 | if (ret != X509_V_OK) | |
768 | return ret; | |
769 | } | |
770 | ||
771 | if (subject->ex_flags & EXFLAG_PROXY) { | |
772 | if (ku_reject(issuer, KU_DIGITAL_SIGNATURE)) | |
773 | return X509_V_ERR_KEYUSAGE_NO_DIGITAL_SIGNATURE; | |
774 | } else if (ku_reject(issuer, KU_KEY_CERT_SIGN)) | |
775 | return X509_V_ERR_KEYUSAGE_NO_CERTSIGN; | |
776 | return X509_V_OK; | |
2f043896 DSH |
777 | } |
778 | ||
bc7535bc | 779 | int X509_check_akid(X509 *issuer, AUTHORITY_KEYID *akid) |
0f113f3e | 780 | { |
bc7535bc | 781 | |
0f113f3e MC |
782 | if (!akid) |
783 | return X509_V_OK; | |
784 | ||
785 | /* Check key ids (if present) */ | |
786 | if (akid->keyid && issuer->skid && | |
787 | ASN1_OCTET_STRING_cmp(akid->keyid, issuer->skid)) | |
788 | return X509_V_ERR_AKID_SKID_MISMATCH; | |
789 | /* Check serial number */ | |
790 | if (akid->serial && | |
791 | ASN1_INTEGER_cmp(X509_get_serialNumber(issuer), akid->serial)) | |
792 | return X509_V_ERR_AKID_ISSUER_SERIAL_MISMATCH; | |
793 | /* Check issuer name */ | |
794 | if (akid->issuer) { | |
795 | /* | |
796 | * Ugh, for some peculiar reason AKID includes SEQUENCE OF | |
797 | * GeneralName. So look for a DirName. There may be more than one but | |
798 | * we only take any notice of the first. | |
799 | */ | |
800 | GENERAL_NAMES *gens; | |
801 | GENERAL_NAME *gen; | |
802 | X509_NAME *nm = NULL; | |
803 | int i; | |
804 | gens = akid->issuer; | |
805 | for (i = 0; i < sk_GENERAL_NAME_num(gens); i++) { | |
806 | gen = sk_GENERAL_NAME_value(gens, i); | |
807 | if (gen->type == GEN_DIRNAME) { | |
808 | nm = gen->d.dirn; | |
809 | break; | |
810 | } | |
811 | } | |
812 | if (nm && X509_NAME_cmp(nm, X509_get_issuer_name(issuer))) | |
813 | return X509_V_ERR_AKID_ISSUER_SERIAL_MISMATCH; | |
814 | } | |
815 | return X509_V_OK; | |
816 | } | |
063f1f0c DSH |
817 | |
818 | uint32_t X509_get_extension_flags(X509 *x) | |
819 | { | |
109f8b5d | 820 | /* Call for side-effect of computing hash and caching extensions */ |
063f1f0c DSH |
821 | X509_check_purpose(x, -1, -1); |
822 | return x->ex_flags; | |
823 | } | |
824 | ||
825 | uint32_t X509_get_key_usage(X509 *x) | |
826 | { | |
109f8b5d | 827 | /* Call for side-effect of computing hash and caching extensions */ |
063f1f0c DSH |
828 | X509_check_purpose(x, -1, -1); |
829 | if (x->ex_flags & EXFLAG_KUSAGE) | |
830 | return x->ex_kusage; | |
831 | return UINT32_MAX; | |
832 | } | |
833 | ||
834 | uint32_t X509_get_extended_key_usage(X509 *x) | |
835 | { | |
109f8b5d | 836 | /* Call for side-effect of computing hash and caching extensions */ |
063f1f0c DSH |
837 | X509_check_purpose(x, -1, -1); |
838 | if (x->ex_flags & EXFLAG_XKUSAGE) | |
839 | return x->ex_xkusage; | |
840 | return UINT32_MAX; | |
841 | } | |
d19a50c9 DSH |
842 | |
843 | const ASN1_OCTET_STRING *X509_get0_subject_key_id(X509 *x) | |
844 | { | |
109f8b5d | 845 | /* Call for side-effect of computing hash and caching extensions */ |
d19a50c9 DSH |
846 | X509_check_purpose(x, -1, -1); |
847 | return x->skid; | |
848 | } | |
e417070c RS |
849 | |
850 | long X509_get_pathlen(X509 *x) | |
851 | { | |
852 | /* Called for side effect of caching extensions */ | |
853 | if (X509_check_purpose(x, -1, -1) != 1 | |
854 | || (x->ex_flags & EXFLAG_BCONS) == 0) | |
855 | return -1; | |
856 | return x->ex_pathlen; | |
857 | } | |
fe0169b0 RL |
858 | |
859 | long X509_get_proxy_pathlen(X509 *x) | |
860 | { | |
861 | /* Called for side effect of caching extensions */ | |
862 | if (X509_check_purpose(x, -1, -1) != 1 | |
863 | || (x->ex_flags & EXFLAG_PROXY) == 0) | |
864 | return -1; | |
865 | return x->ex_pcpathlen; | |
866 | } |