Move functions.
[openssl.git] / crypto / asn1 / x_x509a.c
1 /* a_x509a.c */
2 /*
3  * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL project
4  * 1999.
5  */
6 /* ====================================================================
7  * Copyright (c) 1999 The OpenSSL Project.  All rights reserved.
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted provided that the following conditions
11  * are met:
12  *
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  *
16  * 2. Redistributions in binary form must reproduce the above copyright
17  *    notice, this list of conditions and the following disclaimer in
18  *    the documentation and/or other materials provided with the
19  *    distribution.
20  *
21  * 3. All advertising materials mentioning features or use of this
22  *    software must display the following acknowledgment:
23  *    "This product includes software developed by the OpenSSL Project
24  *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
25  *
26  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
27  *    endorse or promote products derived from this software without
28  *    prior written permission. For written permission, please contact
29  *    licensing@OpenSSL.org.
30  *
31  * 5. Products derived from this software may not be called "OpenSSL"
32  *    nor may "OpenSSL" appear in their names without prior written
33  *    permission of the OpenSSL Project.
34  *
35  * 6. Redistributions of any form whatsoever must retain the following
36  *    acknowledgment:
37  *    "This product includes software developed by the OpenSSL Project
38  *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
39  *
40  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
41  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
42  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
43  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
44  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
45  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
46  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
47  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
49  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
50  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
51  * OF THE POSSIBILITY OF SUCH DAMAGE.
52  * ====================================================================
53  *
54  * This product includes cryptographic software written by Eric Young
55  * (eay@cryptsoft.com).  This product includes software written by Tim
56  * Hudson (tjh@cryptsoft.com).
57  *
58  */
59
60 #include <stdio.h>
61 #include "internal/cryptlib.h"
62 #include <openssl/evp.h>
63 #include <openssl/asn1t.h>
64 #include <openssl/x509.h>
65 #include "internal/x509_int.h"
66
67 /*
68  * X509_CERT_AUX routines. These are used to encode additional user
69  * modifiable data about a certificate. This data is appended to the X509
70  * encoding when the *_X509_AUX routines are used. This means that the
71  * "traditional" X509 routines will simply ignore the extra data.
72  */
73
74 static X509_CERT_AUX *aux_get(X509 *x);
75
76 ASN1_SEQUENCE(X509_CERT_AUX) = {
77         ASN1_SEQUENCE_OF_OPT(X509_CERT_AUX, trust, ASN1_OBJECT),
78         ASN1_IMP_SEQUENCE_OF_OPT(X509_CERT_AUX, reject, ASN1_OBJECT, 0),
79         ASN1_OPT(X509_CERT_AUX, alias, ASN1_UTF8STRING),
80         ASN1_OPT(X509_CERT_AUX, keyid, ASN1_OCTET_STRING),
81         ASN1_IMP_SEQUENCE_OF_OPT(X509_CERT_AUX, other, X509_ALGOR, 1)
82 } ASN1_SEQUENCE_END(X509_CERT_AUX)
83
84 IMPLEMENT_ASN1_FUNCTIONS(X509_CERT_AUX)
85
86 static X509_CERT_AUX *aux_get(X509 *x)
87 {
88     if (x == NULL)
89         return NULL;
90     if (x->aux == NULL && (x->aux = X509_CERT_AUX_new()) == NULL)
91         return NULL;
92     return x->aux;
93 }
94
95 int X509_alias_set1(X509 *x, unsigned char *name, int len)
96 {
97     X509_CERT_AUX *aux;
98     if (!name) {
99         if (!x || !x->aux || !x->aux->alias)
100             return 1;
101         ASN1_UTF8STRING_free(x->aux->alias);
102         x->aux->alias = NULL;
103         return 1;
104     }
105     if ((aux = aux_get(x)) == NULL)
106         return 0;
107     if (aux->alias == NULL && (aux->alias = ASN1_UTF8STRING_new()) == NULL)
108         return 0;
109     return ASN1_STRING_set(aux->alias, name, len);
110 }
111
112 int X509_keyid_set1(X509 *x, unsigned char *id, int len)
113 {
114     X509_CERT_AUX *aux;
115     if (!id) {
116         if (!x || !x->aux || !x->aux->keyid)
117             return 1;
118         ASN1_OCTET_STRING_free(x->aux->keyid);
119         x->aux->keyid = NULL;
120         return 1;
121     }
122     if ((aux = aux_get(x)) == NULL)
123         return 0;
124     if (aux->keyid ==NULL
125         && (aux->keyid = ASN1_OCTET_STRING_new()) == NULL)
126         return 0;
127     return ASN1_STRING_set(aux->keyid, id, len);
128 }
129
130 unsigned char *X509_alias_get0(X509 *x, int *len)
131 {
132     if (!x->aux || !x->aux->alias)
133         return NULL;
134     if (len)
135         *len = x->aux->alias->length;
136     return x->aux->alias->data;
137 }
138
139 unsigned char *X509_keyid_get0(X509 *x, int *len)
140 {
141     if (!x->aux || !x->aux->keyid)
142         return NULL;
143     if (len)
144         *len = x->aux->keyid->length;
145     return x->aux->keyid->data;
146 }
147
148 int X509_add1_trust_object(X509 *x, ASN1_OBJECT *obj)
149 {
150     X509_CERT_AUX *aux;
151     ASN1_OBJECT *objtmp = NULL;
152     if (obj) {
153         objtmp = OBJ_dup(obj);
154         if (!objtmp)
155             return 0;
156     }
157     if ((aux = aux_get(x)) == NULL)
158         goto err;
159     if (aux->trust == NULL
160         && (aux->trust = sk_ASN1_OBJECT_new_null()) == NULL)
161         goto err;
162     if (!objtmp || sk_ASN1_OBJECT_push(aux->trust, objtmp))
163         return 1;
164  err:
165     ASN1_OBJECT_free(objtmp);
166     return 0;
167 }
168
169 int X509_add1_reject_object(X509 *x, ASN1_OBJECT *obj)
170 {
171     X509_CERT_AUX *aux;
172     ASN1_OBJECT *objtmp;
173     if ((objtmp = OBJ_dup(obj)) == NULL)
174         return 0;
175     if ((aux = aux_get(x)) == NULL)
176         goto err;
177     if (aux->reject == NULL
178         && (aux->reject = sk_ASN1_OBJECT_new_null()) == NULL)
179         goto err;
180     return sk_ASN1_OBJECT_push(aux->reject, objtmp);
181  err:
182     ASN1_OBJECT_free(objtmp);
183     return 0;
184 }
185
186 void X509_trust_clear(X509 *x)
187 {
188     if (x->aux) {
189         sk_ASN1_OBJECT_pop_free(x->aux->trust, ASN1_OBJECT_free);
190         x->aux->trust = NULL;
191     }
192 }
193
194 void X509_reject_clear(X509 *x)
195 {
196     if (x->aux) {
197         sk_ASN1_OBJECT_pop_free(x->aux->reject, ASN1_OBJECT_free);
198         x->aux->reject = NULL;
199     }
200 }