1 /* crypto/asn1/x_crl.c */
2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
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.
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).
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.
23 * Redistribution and use in source and binary forms, with or without
24 * modification, are permitted provided that the following conditions
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)"
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
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.]
61 #include <openssl/asn1_mac.h>
62 #include <openssl/x509.h>
64 static int X509_REVOKED_cmp(X509_REVOKED **a,X509_REVOKED **b);
65 static int X509_REVOKED_seq_cmp(X509_REVOKED **a,X509_REVOKED **b);
66 int i2d_X509_REVOKED(X509_REVOKED *a, unsigned char **pp)
70 M_ASN1_I2D_len(a->serialNumber,i2d_ASN1_INTEGER);
71 M_ASN1_I2D_len(a->revocationDate,i2d_ASN1_TIME);
72 M_ASN1_I2D_len_SEQUENCE_opt_type(X509_EXTENSION,a->extensions,
75 M_ASN1_I2D_seq_total();
77 M_ASN1_I2D_put(a->serialNumber,i2d_ASN1_INTEGER);
78 M_ASN1_I2D_put(a->revocationDate,i2d_ASN1_TIME);
79 M_ASN1_I2D_put_SEQUENCE_opt_type(X509_EXTENSION,a->extensions,
85 X509_REVOKED *d2i_X509_REVOKED(X509_REVOKED **a, unsigned char **pp,
88 M_ASN1_D2I_vars(a,X509_REVOKED *,X509_REVOKED_new);
91 M_ASN1_D2I_start_sequence();
92 M_ASN1_D2I_get(ret->serialNumber,d2i_ASN1_INTEGER);
93 M_ASN1_D2I_get(ret->revocationDate,d2i_ASN1_TIME);
94 M_ASN1_D2I_get_seq_opt_type(X509_EXTENSION,ret->extensions,
95 d2i_X509_EXTENSION,X509_EXTENSION_free);
96 M_ASN1_D2I_Finish(a,X509_REVOKED_free,ASN1_F_D2I_X509_REVOKED);
99 int i2d_X509_CRL_INFO(X509_CRL_INFO *a, unsigned char **pp)
103 int (*old_cmp)(X509_REVOKED **,X509_REVOKED **);
106 old_cmp=sk_X509_REVOKED_set_cmp_func(a->revoked,X509_REVOKED_seq_cmp);
107 sk_X509_REVOKED_sort(a->revoked);
108 sk_X509_REVOKED_set_cmp_func(a->revoked,old_cmp);
110 if ((a->version != NULL) && ((l=ASN1_INTEGER_get(a->version)) != 0))
112 M_ASN1_I2D_len(a->version,i2d_ASN1_INTEGER);
114 M_ASN1_I2D_len(a->sig_alg,i2d_X509_ALGOR);
115 M_ASN1_I2D_len(a->issuer,i2d_X509_NAME);
116 M_ASN1_I2D_len(a->lastUpdate,i2d_ASN1_TIME);
117 if (a->nextUpdate != NULL)
118 { M_ASN1_I2D_len(a->nextUpdate,i2d_ASN1_TIME); }
119 M_ASN1_I2D_len_SEQUENCE_opt_type(X509_REVOKED,a->revoked,
121 M_ASN1_I2D_len_EXP_SEQUENCE_opt_type(X509_EXTENSION,a->extensions,
122 i2d_X509_EXTENSION,0,
125 M_ASN1_I2D_seq_total();
127 if ((a->version != NULL) && (l != 0))
129 M_ASN1_I2D_put(a->version,i2d_ASN1_INTEGER);
131 M_ASN1_I2D_put(a->sig_alg,i2d_X509_ALGOR);
132 M_ASN1_I2D_put(a->issuer,i2d_X509_NAME);
133 M_ASN1_I2D_put(a->lastUpdate,i2d_ASN1_UTCTIME);
134 if (a->nextUpdate != NULL)
135 { M_ASN1_I2D_put(a->nextUpdate,i2d_ASN1_UTCTIME); }
136 M_ASN1_I2D_put_SEQUENCE_opt_type(X509_REVOKED,a->revoked,
138 M_ASN1_I2D_put_EXP_SEQUENCE_opt_type(X509_EXTENSION,a->extensions,
139 i2d_X509_EXTENSION,0,
145 X509_CRL_INFO *d2i_X509_CRL_INFO(X509_CRL_INFO **a, unsigned char **pp,
149 M_ASN1_D2I_vars(a,X509_CRL_INFO *,X509_CRL_INFO_new);
153 M_ASN1_D2I_start_sequence();
154 M_ASN1_D2I_get_opt(ret->version,d2i_ASN1_INTEGER,V_ASN1_INTEGER);
155 if (ret->version != NULL)
156 ver=ret->version->data[0];
158 if ((ver == 0) && (ret->version != NULL))
160 ASN1_INTEGER_free(ret->version);
163 M_ASN1_D2I_get(ret->sig_alg,d2i_X509_ALGOR);
164 M_ASN1_D2I_get(ret->issuer,d2i_X509_NAME);
165 M_ASN1_D2I_get(ret->lastUpdate,d2i_ASN1_TIME);
166 /* Manually handle the OPTIONAL ASN1_TIME stuff */
168 && ( (M_ASN1_next & ~V_ASN1_CONSTRUCTED) ==
169 (V_ASN1_UNIVERSAL|V_ASN1_UTCTIME)
170 || (M_ASN1_next & ~V_ASN1_CONSTRUCTED) ==
171 (V_ASN1_UNIVERSAL|V_ASN1_GENERALIZEDTIME) ) ) {
172 M_ASN1_D2I_get(ret->nextUpdate,d2i_ASN1_TIME);
175 M_ASN1_D2I_get_opt(ret->nextUpdate,d2i_ASN1_GENERALIZEDTIME,
176 V_ASN1_GENERALIZEDTIME);
177 if (ret->revoked != NULL)
179 while (sk_X509_REVOKED_num(ret->revoked))
180 X509_REVOKED_free(sk_X509_REVOKED_pop(ret->revoked));
182 M_ASN1_D2I_get_seq_opt_type(X509_REVOKED,ret->revoked,d2i_X509_REVOKED,
185 if (ret->revoked != NULL)
187 for (i=0; i<sk_X509_REVOKED_num(ret->revoked); i++)
189 sk_X509_REVOKED_value(ret->revoked,i)->sequence=i;
195 if (ret->extensions != NULL)
197 while (sk_X509_EXTENSION_num(ret->extensions))
199 sk_X509_EXTENSION_pop(ret->extensions));
202 M_ASN1_D2I_get_EXP_set_opt_type(X509_EXTENSION,ret->extensions,
204 X509_EXTENSION_free,0,
208 M_ASN1_D2I_Finish(a,X509_CRL_INFO_free,ASN1_F_D2I_X509_CRL_INFO);
211 int i2d_X509_CRL(X509_CRL *a, unsigned char **pp)
215 M_ASN1_I2D_len(a->crl,i2d_X509_CRL_INFO);
216 M_ASN1_I2D_len(a->sig_alg,i2d_X509_ALGOR);
217 M_ASN1_I2D_len(a->signature,i2d_ASN1_BIT_STRING);
219 M_ASN1_I2D_seq_total();
221 M_ASN1_I2D_put(a->crl,i2d_X509_CRL_INFO);
222 M_ASN1_I2D_put(a->sig_alg,i2d_X509_ALGOR);
223 M_ASN1_I2D_put(a->signature,i2d_ASN1_BIT_STRING);
228 X509_CRL *d2i_X509_CRL(X509_CRL **a, unsigned char **pp, long length)
230 M_ASN1_D2I_vars(a,X509_CRL *,X509_CRL_new);
233 M_ASN1_D2I_start_sequence();
234 M_ASN1_D2I_get(ret->crl,d2i_X509_CRL_INFO);
235 M_ASN1_D2I_get(ret->sig_alg,d2i_X509_ALGOR);
236 M_ASN1_D2I_get(ret->signature,d2i_ASN1_BIT_STRING);
238 M_ASN1_D2I_Finish(a,X509_CRL_free,ASN1_F_D2I_X509_CRL);
242 X509_REVOKED *X509_REVOKED_new(void)
244 X509_REVOKED *ret=NULL;
247 M_ASN1_New_Malloc(ret,X509_REVOKED);
248 M_ASN1_New(ret->serialNumber,ASN1_INTEGER_new);
249 M_ASN1_New(ret->revocationDate,ASN1_UTCTIME_new);
250 ret->extensions=NULL;
252 M_ASN1_New_Error(ASN1_F_X509_REVOKED_NEW);
255 X509_CRL_INFO *X509_CRL_INFO_new(void)
257 X509_CRL_INFO *ret=NULL;
260 M_ASN1_New_Malloc(ret,X509_CRL_INFO);
262 M_ASN1_New(ret->sig_alg,X509_ALGOR_new);
263 M_ASN1_New(ret->issuer,X509_NAME_new);
264 M_ASN1_New(ret->lastUpdate,ASN1_UTCTIME_new);
265 ret->nextUpdate=NULL;
266 M_ASN1_New(ret->revoked,sk_X509_REVOKED_new_null);
267 M_ASN1_New(ret->extensions,sk_X509_EXTENSION_new_null);
268 sk_X509_REVOKED_set_cmp_func(ret->revoked,X509_REVOKED_cmp);
270 M_ASN1_New_Error(ASN1_F_X509_CRL_INFO_NEW);
273 X509_CRL *X509_CRL_new(void)
278 M_ASN1_New_Malloc(ret,X509_CRL);
280 M_ASN1_New(ret->crl,X509_CRL_INFO_new);
281 M_ASN1_New(ret->sig_alg,X509_ALGOR_new);
282 M_ASN1_New(ret->signature,ASN1_BIT_STRING_new);
284 M_ASN1_New_Error(ASN1_F_X509_CRL_NEW);
287 void X509_REVOKED_free(X509_REVOKED *a)
289 if (a == NULL) return;
290 ASN1_INTEGER_free(a->serialNumber);
291 ASN1_UTCTIME_free(a->revocationDate);
292 sk_X509_EXTENSION_pop_free(a->extensions,X509_EXTENSION_free);
296 void X509_CRL_INFO_free(X509_CRL_INFO *a)
298 if (a == NULL) return;
299 ASN1_INTEGER_free(a->version);
300 X509_ALGOR_free(a->sig_alg);
301 X509_NAME_free(a->issuer);
302 ASN1_UTCTIME_free(a->lastUpdate);
304 ASN1_UTCTIME_free(a->nextUpdate);
305 sk_X509_REVOKED_pop_free(a->revoked,X509_REVOKED_free);
306 sk_X509_EXTENSION_pop_free(a->extensions,X509_EXTENSION_free);
310 void X509_CRL_free(X509_CRL *a)
314 if (a == NULL) return;
316 i=CRYPTO_add(&a->references,-1,CRYPTO_LOCK_X509_CRL);
318 REF_PRINT("X509_CRL",a);
324 fprintf(stderr,"X509_CRL_free, bad reference count\n");
329 X509_CRL_INFO_free(a->crl);
330 X509_ALGOR_free(a->sig_alg);
331 ASN1_BIT_STRING_free(a->signature);
335 static int X509_REVOKED_cmp(X509_REVOKED **a, X509_REVOKED **b)
337 return(ASN1_STRING_cmp(
338 (ASN1_STRING *)(*a)->serialNumber,
339 (ASN1_STRING *)(*b)->serialNumber));
342 static int X509_REVOKED_seq_cmp(X509_REVOKED **a, X509_REVOKED **b)
344 return((*a)->sequence-(*b)->sequence);
347 IMPLEMENT_STACK_OF(X509_REVOKED)
348 IMPLEMENT_ASN1_SET_OF(X509_REVOKED)
349 IMPLEMENT_STACK_OF(X509_CRL)
350 IMPLEMENT_ASN1_SET_OF(X509_CRL)