diff options
Diffstat (limited to 'src/lib/libcrypto/x509/x509_trs.c')
-rw-r--r-- | src/lib/libcrypto/x509/x509_trs.c | 286 |
1 files changed, 286 insertions, 0 deletions
diff --git a/src/lib/libcrypto/x509/x509_trs.c b/src/lib/libcrypto/x509/x509_trs.c new file mode 100644 index 0000000000..17d69ac005 --- /dev/null +++ b/src/lib/libcrypto/x509/x509_trs.c | |||
@@ -0,0 +1,286 @@ | |||
1 | /* x509_trs.c */ | ||
2 | /* Written by Dr Stephen N Henson (shenson@bigfoot.com) for the OpenSSL | ||
3 | * project 1999. | ||
4 | */ | ||
5 | /* ==================================================================== | ||
6 | * Copyright (c) 1999 The OpenSSL Project. All rights reserved. | ||
7 | * | ||
8 | * Redistribution and use in source and binary forms, with or without | ||
9 | * modification, are permitted provided that the following conditions | ||
10 | * are met: | ||
11 | * | ||
12 | * 1. Redistributions of source code must retain the above copyright | ||
13 | * notice, this list of conditions and the following disclaimer. | ||
14 | * | ||
15 | * 2. Redistributions in binary form must reproduce the above copyright | ||
16 | * notice, this list of conditions and the following disclaimer in | ||
17 | * the documentation and/or other materials provided with the | ||
18 | * distribution. | ||
19 | * | ||
20 | * 3. All advertising materials mentioning features or use of this | ||
21 | * software must display the following acknowledgment: | ||
22 | * "This product includes software developed by the OpenSSL Project | ||
23 | * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)" | ||
24 | * | ||
25 | * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to | ||
26 | * endorse or promote products derived from this software without | ||
27 | * prior written permission. For written permission, please contact | ||
28 | * licensing@OpenSSL.org. | ||
29 | * | ||
30 | * 5. Products derived from this software may not be called "OpenSSL" | ||
31 | * nor may "OpenSSL" appear in their names without prior written | ||
32 | * permission of the OpenSSL Project. | ||
33 | * | ||
34 | * 6. Redistributions of any form whatsoever must retain the following | ||
35 | * acknowledgment: | ||
36 | * "This product includes software developed by the OpenSSL Project | ||
37 | * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" | ||
38 | * | ||
39 | * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY | ||
40 | * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||
41 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR | ||
42 | * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR | ||
43 | * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, | ||
44 | * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | ||
45 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; | ||
46 | * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | ||
47 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, | ||
48 | * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | ||
49 | * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED | ||
50 | * OF THE POSSIBILITY OF SUCH DAMAGE. | ||
51 | * ==================================================================== | ||
52 | * | ||
53 | * This product includes cryptographic software written by Eric Young | ||
54 | * (eay@cryptsoft.com). This product includes software written by Tim | ||
55 | * Hudson (tjh@cryptsoft.com). | ||
56 | * | ||
57 | */ | ||
58 | |||
59 | #include <stdio.h> | ||
60 | #include "cryptlib.h" | ||
61 | #include <openssl/x509v3.h> | ||
62 | |||
63 | |||
64 | static int tr_cmp(const X509_TRUST * const *a, | ||
65 | const X509_TRUST * const *b); | ||
66 | static void trtable_free(X509_TRUST *p); | ||
67 | |||
68 | static int trust_1oidany(X509_TRUST *trust, X509 *x, int flags); | ||
69 | static int trust_1oid(X509_TRUST *trust, X509 *x, int flags); | ||
70 | static int trust_compat(X509_TRUST *trust, X509 *x, int flags); | ||
71 | |||
72 | static int obj_trust(int id, X509 *x, int flags); | ||
73 | static int (*default_trust)(int id, X509 *x, int flags) = obj_trust; | ||
74 | |||
75 | /* WARNING: the following table should be kept in order of trust | ||
76 | * and without any gaps so we can just subtract the minimum trust | ||
77 | * value to get an index into the table | ||
78 | */ | ||
79 | |||
80 | static X509_TRUST trstandard[] = { | ||
81 | {X509_TRUST_COMPAT, 0, trust_compat, "compatible", 0, NULL}, | ||
82 | {X509_TRUST_SSL_CLIENT, 0, trust_1oidany, "SSL Client", NID_client_auth, NULL}, | ||
83 | {X509_TRUST_SSL_SERVER, 0, trust_1oidany, "SSL Server", NID_server_auth, NULL}, | ||
84 | {X509_TRUST_EMAIL, 0, trust_1oidany, "S/MIME email", NID_email_protect, NULL}, | ||
85 | {X509_TRUST_OCSP_SIGN, 0, trust_1oid, "OCSP responder", NID_OCSP_sign, NULL}, | ||
86 | {X509_TRUST_OCSP_REQUEST, 0, trust_1oid, "OCSP request", NID_ad_OCSP, NULL} | ||
87 | }; | ||
88 | |||
89 | #define X509_TRUST_COUNT (sizeof(trstandard)/sizeof(X509_TRUST)) | ||
90 | |||
91 | IMPLEMENT_STACK_OF(X509_TRUST) | ||
92 | |||
93 | static STACK_OF(X509_TRUST) *trtable = NULL; | ||
94 | |||
95 | static int tr_cmp(const X509_TRUST * const *a, | ||
96 | const X509_TRUST * const *b) | ||
97 | { | ||
98 | return (*a)->trust - (*b)->trust; | ||
99 | } | ||
100 | |||
101 | int (*X509_TRUST_set_default(int (*trust)(int , X509 *, int)))(int, X509 *, int) | ||
102 | { | ||
103 | int (*oldtrust)(int , X509 *, int); | ||
104 | oldtrust = default_trust; | ||
105 | default_trust = trust; | ||
106 | return oldtrust; | ||
107 | } | ||
108 | |||
109 | |||
110 | int X509_check_trust(X509 *x, int id, int flags) | ||
111 | { | ||
112 | X509_TRUST *pt; | ||
113 | int idx; | ||
114 | if(id == -1) return 1; | ||
115 | idx = X509_TRUST_get_by_id(id); | ||
116 | if(idx == -1) return default_trust(id, x, flags); | ||
117 | pt = X509_TRUST_get0(idx); | ||
118 | return pt->check_trust(pt, x, flags); | ||
119 | } | ||
120 | |||
121 | int X509_TRUST_get_count(void) | ||
122 | { | ||
123 | if(!trtable) return X509_TRUST_COUNT; | ||
124 | return sk_X509_TRUST_num(trtable) + X509_TRUST_COUNT; | ||
125 | } | ||
126 | |||
127 | X509_TRUST * X509_TRUST_get0(int idx) | ||
128 | { | ||
129 | if(idx < 0) return NULL; | ||
130 | if(idx < X509_TRUST_COUNT) return trstandard + idx; | ||
131 | return sk_X509_TRUST_value(trtable, idx - X509_TRUST_COUNT); | ||
132 | } | ||
133 | |||
134 | int X509_TRUST_get_by_id(int id) | ||
135 | { | ||
136 | X509_TRUST tmp; | ||
137 | int idx; | ||
138 | if((id >= X509_TRUST_MIN) && (id <= X509_TRUST_MAX)) | ||
139 | return id - X509_TRUST_MIN; | ||
140 | tmp.trust = id; | ||
141 | if(!trtable) return -1; | ||
142 | idx = sk_X509_TRUST_find(trtable, &tmp); | ||
143 | if(idx == -1) return -1; | ||
144 | return idx + X509_TRUST_COUNT; | ||
145 | } | ||
146 | |||
147 | int X509_TRUST_set(int *t, int trust) | ||
148 | { | ||
149 | if(X509_TRUST_get_by_id(trust) == -1) { | ||
150 | X509err(X509_F_X509_TRUST_SET, X509_R_INVALID_TRUST); | ||
151 | return 0; | ||
152 | } | ||
153 | *t = trust; | ||
154 | return 1; | ||
155 | } | ||
156 | |||
157 | int X509_TRUST_add(int id, int flags, int (*ck)(X509_TRUST *, X509 *, int), | ||
158 | char *name, int arg1, void *arg2) | ||
159 | { | ||
160 | int idx; | ||
161 | X509_TRUST *trtmp; | ||
162 | /* This is set according to what we change: application can't set it */ | ||
163 | flags &= ~X509_TRUST_DYNAMIC; | ||
164 | /* This will always be set for application modified trust entries */ | ||
165 | flags |= X509_TRUST_DYNAMIC_NAME; | ||
166 | /* Get existing entry if any */ | ||
167 | idx = X509_TRUST_get_by_id(id); | ||
168 | /* Need a new entry */ | ||
169 | if(idx == -1) { | ||
170 | if(!(trtmp = OPENSSL_malloc(sizeof(X509_TRUST)))) { | ||
171 | X509err(X509_F_X509_TRUST_ADD,ERR_R_MALLOC_FAILURE); | ||
172 | return 0; | ||
173 | } | ||
174 | trtmp->flags = X509_TRUST_DYNAMIC; | ||
175 | } else trtmp = X509_TRUST_get0(idx); | ||
176 | |||
177 | /* OPENSSL_free existing name if dynamic */ | ||
178 | if(trtmp->flags & X509_TRUST_DYNAMIC_NAME) OPENSSL_free(trtmp->name); | ||
179 | /* dup supplied name */ | ||
180 | if(!(trtmp->name = BUF_strdup(name))) { | ||
181 | X509err(X509_F_X509_TRUST_ADD,ERR_R_MALLOC_FAILURE); | ||
182 | return 0; | ||
183 | } | ||
184 | /* Keep the dynamic flag of existing entry */ | ||
185 | trtmp->flags &= X509_TRUST_DYNAMIC; | ||
186 | /* Set all other flags */ | ||
187 | trtmp->flags |= flags; | ||
188 | |||
189 | trtmp->trust = id; | ||
190 | trtmp->check_trust = ck; | ||
191 | trtmp->arg1 = arg1; | ||
192 | trtmp->arg2 = arg2; | ||
193 | |||
194 | /* If its a new entry manage the dynamic table */ | ||
195 | if(idx == -1) { | ||
196 | if(!trtable && !(trtable = sk_X509_TRUST_new(tr_cmp))) { | ||
197 | X509err(X509_F_X509_TRUST_ADD,ERR_R_MALLOC_FAILURE); | ||
198 | return 0; | ||
199 | } | ||
200 | if (!sk_X509_TRUST_push(trtable, trtmp)) { | ||
201 | X509err(X509_F_X509_TRUST_ADD,ERR_R_MALLOC_FAILURE); | ||
202 | return 0; | ||
203 | } | ||
204 | } | ||
205 | return 1; | ||
206 | } | ||
207 | |||
208 | static void trtable_free(X509_TRUST *p) | ||
209 | { | ||
210 | if(!p) return; | ||
211 | if (p->flags & X509_TRUST_DYNAMIC) | ||
212 | { | ||
213 | if (p->flags & X509_TRUST_DYNAMIC_NAME) | ||
214 | OPENSSL_free(p->name); | ||
215 | OPENSSL_free(p); | ||
216 | } | ||
217 | } | ||
218 | |||
219 | void X509_TRUST_cleanup(void) | ||
220 | { | ||
221 | int i; | ||
222 | for(i = 0; i < X509_TRUST_COUNT; i++) trtable_free(trstandard + i); | ||
223 | sk_X509_TRUST_pop_free(trtable, trtable_free); | ||
224 | trtable = NULL; | ||
225 | } | ||
226 | |||
227 | int X509_TRUST_get_flags(X509_TRUST *xp) | ||
228 | { | ||
229 | return xp->flags; | ||
230 | } | ||
231 | |||
232 | char *X509_TRUST_get0_name(X509_TRUST *xp) | ||
233 | { | ||
234 | return xp->name; | ||
235 | } | ||
236 | |||
237 | int X509_TRUST_get_trust(X509_TRUST *xp) | ||
238 | { | ||
239 | return xp->trust; | ||
240 | } | ||
241 | |||
242 | static int trust_1oidany(X509_TRUST *trust, X509 *x, int flags) | ||
243 | { | ||
244 | if(x->aux && (x->aux->trust || x->aux->reject)) | ||
245 | return obj_trust(trust->arg1, x, flags); | ||
246 | /* we don't have any trust settings: for compatibility | ||
247 | * we return trusted if it is self signed | ||
248 | */ | ||
249 | return trust_compat(trust, x, flags); | ||
250 | } | ||
251 | |||
252 | static int trust_1oid(X509_TRUST *trust, X509 *x, int flags) | ||
253 | { | ||
254 | if(x->aux) return obj_trust(trust->arg1, x, flags); | ||
255 | return X509_TRUST_UNTRUSTED; | ||
256 | } | ||
257 | |||
258 | static int trust_compat(X509_TRUST *trust, X509 *x, int flags) | ||
259 | { | ||
260 | X509_check_purpose(x, -1, 0); | ||
261 | if(x->ex_flags & EXFLAG_SS) return X509_TRUST_TRUSTED; | ||
262 | else return X509_TRUST_UNTRUSTED; | ||
263 | } | ||
264 | |||
265 | static int obj_trust(int id, X509 *x, int flags) | ||
266 | { | ||
267 | ASN1_OBJECT *obj; | ||
268 | int i; | ||
269 | X509_CERT_AUX *ax; | ||
270 | ax = x->aux; | ||
271 | if(!ax) return X509_TRUST_UNTRUSTED; | ||
272 | if(ax->reject) { | ||
273 | for(i = 0; i < sk_ASN1_OBJECT_num(ax->reject); i++) { | ||
274 | obj = sk_ASN1_OBJECT_value(ax->reject, i); | ||
275 | if(OBJ_obj2nid(obj) == id) return X509_TRUST_REJECTED; | ||
276 | } | ||
277 | } | ||
278 | if(ax->trust) { | ||
279 | for(i = 0; i < sk_ASN1_OBJECT_num(ax->trust); i++) { | ||
280 | obj = sk_ASN1_OBJECT_value(ax->trust, i); | ||
281 | if(OBJ_obj2nid(obj) == id) return X509_TRUST_TRUSTED; | ||
282 | } | ||
283 | } | ||
284 | return X509_TRUST_UNTRUSTED; | ||
285 | } | ||
286 | |||