]> git.ipfire.org Git - thirdparty/openssl.git/blame - crypto/x509/x509_trs.c
Add missing EVP_CIPHER_CTX_{init,cleanup}
[thirdparty/openssl.git] / crypto / x509 / x509_trs.c
CommitLineData
21f77552
DSH
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
ccd86b68
GT
64static int tr_cmp(const X509_TRUST * const *a,
65 const X509_TRUST * const *b);
21f77552
DSH
66static void trtable_free(X509_TRUST *p);
67
6447cce3 68static int trust_1oidany(X509_TRUST *trust, X509 *x, int flags);
81f169e9 69static int trust_1oid(X509_TRUST *trust, X509 *x, int flags);
068fdce8 70static int trust_compat(X509_TRUST *trust, X509 *x, int flags);
21f77552 71
6447cce3
DSH
72static int obj_trust(int id, X509 *x, int flags);
73static int (*default_trust)(int id, X509 *x, int flags) = obj_trust;
74
dd413410
DSH
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
21f77552 80static X509_TRUST trstandard[] = {
068fdce8 81{X509_TRUST_COMPAT, 0, trust_compat, "compatible", 0, NULL},
6447cce3
DSH
82{X509_TRUST_SSL_CLIENT, 0, trust_1oidany, "SSL Client", NID_client_auth, NULL},
83{X509_TRUST_SSL_SERVER, 0, trust_1oidany, "SSL Client", NID_server_auth, NULL},
84{X509_TRUST_EMAIL, 0, trust_1oidany, "S/MIME email", NID_email_protect, NULL},
fafc7f98
DSH
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}
21f77552
DSH
87};
88
dd413410
DSH
89#define X509_TRUST_COUNT (sizeof(trstandard)/sizeof(X509_TRUST))
90
21f77552
DSH
91IMPLEMENT_STACK_OF(X509_TRUST)
92
93static STACK_OF(X509_TRUST) *trtable = NULL;
94
ccd86b68
GT
95static int tr_cmp(const X509_TRUST * const *a,
96 const X509_TRUST * const *b)
21f77552 97{
dd413410 98 return (*a)->trust - (*b)->trust;
21f77552
DSH
99}
100
6447cce3
DSH
101int (*X509_TRUST_set_default(int (*trust)(int , X509 *, int)))(int, X509 *, int)
102{
78f3a2aa
BM
103 int (*oldtrust)(int , X509 *, int);
104 oldtrust = default_trust;
105 default_trust = trust;
106 return oldtrust;
6447cce3
DSH
107}
108
109
21f77552
DSH
110int X509_check_trust(X509 *x, int id, int flags)
111{
21f77552 112 X509_TRUST *pt;
dd413410 113 int idx;
21f77552 114 if(id == -1) return 1;
068fdce8
DSH
115 idx = X509_TRUST_get_by_id(id);
116 if(idx == -1) return default_trust(id, x, flags);
6d0d5431 117 pt = X509_TRUST_get0(idx);
21f77552
DSH
118 return pt->check_trust(pt, x, flags);
119}
120
121int X509_TRUST_get_count(void)
122{
dd413410
DSH
123 if(!trtable) return X509_TRUST_COUNT;
124 return sk_X509_TRUST_num(trtable) + X509_TRUST_COUNT;
21f77552
DSH
125}
126
6d0d5431 127X509_TRUST * X509_TRUST_get0(int idx)
21f77552 128{
dd413410
DSH
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);
21f77552
DSH
132}
133
134int X509_TRUST_get_by_id(int id)
135{
136 X509_TRUST tmp;
dd413410
DSH
137 int idx;
138 if((id >= X509_TRUST_MIN) && (id <= X509_TRUST_MAX))
139 return id - X509_TRUST_MIN;
140 tmp.trust = id;
21f77552 141 if(!trtable) return -1;
dd413410
DSH
142 idx = sk_X509_TRUST_find(trtable, &tmp);
143 if(idx == -1) return -1;
144 return idx + X509_TRUST_COUNT;
21f77552
DSH
145}
146
926a56bf
DSH
147int 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
dd413410
DSH
157int X509_TRUST_add(int id, int flags, int (*ck)(X509_TRUST *, X509 *, int),
158 char *name, int arg1, void *arg2)
21f77552
DSH
159{
160 int idx;
dd413410
DSH
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) {
26a3a48d 170 if(!(trtmp = OPENSSL_malloc(sizeof(X509_TRUST)))) {
21f77552
DSH
171 X509err(X509_F_X509_TRUST_ADD,ERR_R_MALLOC_FAILURE);
172 return 0;
21f77552 173 }
dd413410 174 trtmp->flags = X509_TRUST_DYNAMIC;
6d0d5431 175 } else trtmp = X509_TRUST_get0(idx);
dd413410 176
26a3a48d
RL
177 /* OPENSSL_free existing name if dynamic */
178 if(trtmp->flags & X509_TRUST_DYNAMIC_NAME) OPENSSL_free(trtmp->name);
dd413410
DSH
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)) {
21f77552
DSH
201 X509err(X509_F_X509_TRUST_ADD,ERR_R_MALLOC_FAILURE);
202 return 0;
203 }
204 }
205 return 1;
206}
207
208static void trtable_free(X509_TRUST *p)
209 {
210 if(!p) return;
dd413410 211 if (p->flags & X509_TRUST_DYNAMIC)
21f77552 212 {
dd413410 213 if (p->flags & X509_TRUST_DYNAMIC_NAME)
26a3a48d
RL
214 OPENSSL_free(p->name);
215 OPENSSL_free(p);
21f77552
DSH
216 }
217 }
218
219void X509_TRUST_cleanup(void)
220{
dd413410
DSH
221 int i;
222 for(i = 0; i < X509_TRUST_COUNT; i++) trtable_free(trstandard + i);
21f77552
DSH
223 sk_X509_TRUST_pop_free(trtable, trtable_free);
224 trtable = NULL;
225}
226
dd413410 227int X509_TRUST_get_flags(X509_TRUST *xp)
21f77552 228{
dd413410 229 return xp->flags;
21f77552
DSH
230}
231
c7cb16a8 232char *X509_TRUST_get0_name(X509_TRUST *xp)
21f77552 233{
dd413410 234 return xp->name;
21f77552
DSH
235}
236
237int X509_TRUST_get_trust(X509_TRUST *xp)
238{
dd413410 239 return xp->trust;
21f77552
DSH
240}
241
6447cce3 242static int trust_1oidany(X509_TRUST *trust, X509 *x, int flags)
21f77552 243{
76c919c1
DSH
244 if(x->aux && (x->aux->trust || x->aux->reject))
245 return obj_trust(trust->arg1, x, flags);
657e60fa 246 /* we don't have any trust settings: for compatibility
21f77552
DSH
247 * we return trusted if it is self signed
248 */
068fdce8
DSH
249 return trust_compat(trust, x, flags);
250}
251
81f169e9
DSH
252static 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
068fdce8
DSH
258static int trust_compat(X509_TRUST *trust, X509 *x, int flags)
259{
21f77552
DSH
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
6447cce3
DSH
265static 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