]>
Commit | Line | Data |
---|---|---|
d02b48c6 | 1 | /* crypto/asn1/x_x509.c */ |
58964a49 | 2 | /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) |
d02b48c6 RE |
3 | * All rights reserved. |
4 | * | |
5 | * This package is an SSL implementation written | |
6 | * by Eric Young (eay@cryptsoft.com). | |
7 | * The implementation was written so as to conform with Netscapes SSL. | |
8 | * | |
9 | * This library is free for commercial and non-commercial use as long as | |
10 | * the following conditions are aheared to. The following conditions | |
11 | * apply to all code found in this distribution, be it the RC4, RSA, | |
12 | * lhash, DES, etc., code; not just the SSL code. The SSL documentation | |
13 | * included with this distribution is covered by the same copyright terms | |
14 | * except that the holder is Tim Hudson (tjh@cryptsoft.com). | |
15 | * | |
16 | * Copyright remains Eric Young's, and as such any Copyright notices in | |
17 | * the code are not to be removed. | |
18 | * If this package is used in a product, Eric Young should be given attribution | |
19 | * as the author of the parts of the library used. | |
20 | * This can be in the form of a textual message at program startup or | |
21 | * in documentation (online or textual) provided with the package. | |
22 | * | |
23 | * Redistribution and use in source and binary forms, with or without | |
24 | * modification, are permitted provided that the following conditions | |
25 | * are met: | |
26 | * 1. Redistributions of source code must retain the copyright | |
27 | * notice, this list of conditions and the following disclaimer. | |
28 | * 2. Redistributions in binary form must reproduce the above copyright | |
29 | * notice, this list of conditions and the following disclaimer in the | |
30 | * documentation and/or other materials provided with the distribution. | |
31 | * 3. All advertising materials mentioning features or use of this software | |
32 | * must display the following acknowledgement: | |
33 | * "This product includes cryptographic software written by | |
34 | * Eric Young (eay@cryptsoft.com)" | |
35 | * The word 'cryptographic' can be left out if the rouines from the library | |
36 | * being used are not cryptographic related :-). | |
37 | * 4. If you include any Windows specific code (or a derivative thereof) from | |
38 | * the apps directory (application code) you must include an acknowledgement: | |
39 | * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)" | |
40 | * | |
41 | * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND | |
42 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | |
43 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | |
44 | * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE | |
45 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | |
46 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | |
47 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | |
48 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | |
49 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | |
50 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | |
51 | * SUCH DAMAGE. | |
52 | * | |
53 | * The licence and distribution terms for any publically available version or | |
54 | * derivative of this code cannot be changed. i.e. this code cannot simply be | |
55 | * copied and put under another distribution licence | |
56 | * [including the GNU Public Licence.] | |
57 | */ | |
58 | ||
59 | #include <stdio.h> | |
60 | #include "cryptlib.h" | |
ec577822 BM |
61 | #include <openssl/evp.h> |
62 | #include <openssl/asn1_mac.h> | |
f0e8ae72 | 63 | #include <openssl/x509.h> |
d02b48c6 | 64 | |
56a3fec1 | 65 | static int x509_meth_num = 0; |
dd9d233e | 66 | static STACK_OF(CRYPTO_EX_DATA_FUNCS) *x509_meth = NULL; |
56a3fec1 | 67 | |
d02b48c6 RE |
68 | static ASN1_METHOD meth={ |
69 | (int (*)()) i2d_X509, | |
70 | (char *(*)())d2i_X509, | |
71 | (char *(*)())X509_new, | |
72 | (void (*)()) X509_free}; | |
73 | ||
6b691a5c | 74 | ASN1_METHOD *X509_asn1_meth(void) |
d02b48c6 RE |
75 | { |
76 | return(&meth); | |
77 | } | |
78 | ||
6b691a5c | 79 | int i2d_X509(X509 *a, unsigned char **pp) |
d02b48c6 RE |
80 | { |
81 | M_ASN1_I2D_vars(a); | |
82 | ||
83 | M_ASN1_I2D_len(a->cert_info, i2d_X509_CINF); | |
84 | M_ASN1_I2D_len(a->sig_alg, i2d_X509_ALGOR); | |
85 | M_ASN1_I2D_len(a->signature, i2d_ASN1_BIT_STRING); | |
86 | ||
87 | M_ASN1_I2D_seq_total(); | |
88 | ||
89 | M_ASN1_I2D_put(a->cert_info, i2d_X509_CINF); | |
90 | M_ASN1_I2D_put(a->sig_alg, i2d_X509_ALGOR); | |
91 | M_ASN1_I2D_put(a->signature, i2d_ASN1_BIT_STRING); | |
92 | ||
93 | M_ASN1_I2D_finish(); | |
94 | } | |
95 | ||
6b691a5c | 96 | X509 *d2i_X509(X509 **a, unsigned char **pp, long length) |
d02b48c6 RE |
97 | { |
98 | M_ASN1_D2I_vars(a,X509 *,X509_new); | |
99 | ||
100 | M_ASN1_D2I_Init(); | |
101 | M_ASN1_D2I_start_sequence(); | |
102 | M_ASN1_D2I_get(ret->cert_info,d2i_X509_CINF); | |
103 | M_ASN1_D2I_get(ret->sig_alg,d2i_X509_ALGOR); | |
104 | M_ASN1_D2I_get(ret->signature,d2i_ASN1_BIT_STRING); | |
e778802f BL |
105 | if (ret->name != NULL) Free(ret->name); |
106 | ret->name=X509_NAME_oneline(ret->cert_info->subject,NULL,0); | |
d02b48c6 RE |
107 | |
108 | M_ASN1_D2I_Finish(a,X509_free,ASN1_F_D2I_X509); | |
109 | } | |
110 | ||
6b691a5c | 111 | X509 *X509_new(void) |
d02b48c6 RE |
112 | { |
113 | X509 *ret=NULL; | |
dfeab068 | 114 | ASN1_CTX c; |
d02b48c6 RE |
115 | |
116 | M_ASN1_New_Malloc(ret,X509); | |
117 | ret->references=1; | |
118 | ret->valid=0; | |
673b102c | 119 | ret->ex_flags = 0; |
d02b48c6 | 120 | ret->name=NULL; |
ce1b4fe1 | 121 | ret->aux=NULL; |
d02b48c6 RE |
122 | M_ASN1_New(ret->cert_info,X509_CINF_new); |
123 | M_ASN1_New(ret->sig_alg,X509_ALGOR_new); | |
08e9c1af | 124 | M_ASN1_New(ret->signature,M_ASN1_BIT_STRING_new); |
dd9d233e | 125 | CRYPTO_new_ex_data(x509_meth, ret, &ret->ex_data); |
d02b48c6 RE |
126 | return(ret); |
127 | M_ASN1_New_Error(ASN1_F_X509_NEW); | |
128 | } | |
129 | ||
6b691a5c | 130 | void X509_free(X509 *a) |
d02b48c6 RE |
131 | { |
132 | int i; | |
133 | ||
134 | if (a == NULL) return; | |
135 | ||
136 | i=CRYPTO_add(&a->references,-1,CRYPTO_LOCK_X509); | |
58964a49 RE |
137 | #ifdef REF_PRINT |
138 | REF_PRINT("X509",a); | |
139 | #endif | |
d02b48c6 RE |
140 | if (i > 0) return; |
141 | #ifdef REF_CHECK | |
142 | if (i < 0) | |
143 | { | |
144 | fprintf(stderr,"X509_free, bad reference count\n"); | |
145 | abort(); | |
146 | } | |
147 | #endif | |
148 | ||
dd9d233e | 149 | CRYPTO_free_ex_data(x509_meth,a,&a->ex_data); |
d02b48c6 RE |
150 | X509_CINF_free(a->cert_info); |
151 | X509_ALGOR_free(a->sig_alg); | |
08e9c1af | 152 | M_ASN1_BIT_STRING_free(a->signature); |
ce1b4fe1 | 153 | X509_CERT_AUX_free(a->aux); |
dfeab068 | 154 | |
d02b48c6 | 155 | if (a->name != NULL) Free(a->name); |
51ca375e | 156 | Free(a); |
d02b48c6 RE |
157 | } |
158 | ||
dd9d233e DSH |
159 | int X509_get_ex_new_index(long argl, void *argp, CRYPTO_EX_new *new_func, |
160 | CRYPTO_EX_dup *dup_func, CRYPTO_EX_free *free_func) | |
56a3fec1 DSH |
161 | { |
162 | x509_meth_num++; | |
163 | return(CRYPTO_get_ex_new_index(x509_meth_num-1, | |
164 | &x509_meth,argl,argp,new_func,dup_func,free_func)); | |
165 | } | |
166 | ||
dd9d233e | 167 | int X509_set_ex_data(X509 *r, int idx, void *arg) |
56a3fec1 DSH |
168 | { |
169 | return(CRYPTO_set_ex_data(&r->ex_data,idx,arg)); | |
170 | } | |
171 | ||
dd9d233e | 172 | void *X509_get_ex_data(X509 *r, int idx) |
56a3fec1 DSH |
173 | { |
174 | return(CRYPTO_get_ex_data(&r->ex_data,idx)); | |
175 | } | |
176 | ||
ce1b4fe1 DSH |
177 | /* X509_AUX ASN1 routines. X509_AUX is the name given to |
178 | * a certificate with extra info tagged on the end. Since these | |
179 | * functions set how a certificate is trusted they should only | |
180 | * be used when the certificate comes from a reliable source | |
181 | * such as local storage. | |
182 | * | |
183 | */ | |
184 | ||
185 | X509 *d2i_X509_AUX(X509 **a, unsigned char **pp, long length) | |
186 | { | |
187 | unsigned char *q; | |
188 | X509 *ret; | |
189 | /* Save start position */ | |
190 | q = *pp; | |
191 | ret = d2i_X509(a, pp, length); | |
192 | /* If certificate unreadable then forget it */ | |
193 | if(!ret) return NULL; | |
194 | /* update length */ | |
195 | length -= *pp - q; | |
196 | if(!length) return ret; | |
197 | if(!d2i_X509_CERT_AUX(&ret->aux, pp, length)) goto err; | |
198 | return ret; | |
199 | err: | |
200 | X509_free(ret); | |
201 | return NULL; | |
202 | } | |
203 | ||
204 | int i2d_X509_AUX(X509 *a, unsigned char **pp) | |
205 | { | |
206 | int length; | |
207 | length = i2d_X509(a, pp); | |
208 | if(a) length += i2d_X509_CERT_AUX(a->aux, pp); | |
209 | return length; | |
210 | } |