| OLD | NEW |
| (Empty) |
| 1 /* t_crl.c */ | |
| 2 /* Written by Dr Stephen N Henson (steve@openssl.org) 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/buffer.h> | |
| 62 #include <openssl/bn.h> | |
| 63 #include <openssl/objects.h> | |
| 64 #include <openssl/x509.h> | |
| 65 #include <openssl/x509v3.h> | |
| 66 | |
| 67 #ifndef OPENSSL_NO_FP_API | |
| 68 int X509_CRL_print_fp(FILE *fp, X509_CRL *x) | |
| 69 { | |
| 70 BIO *b; | |
| 71 int ret; | |
| 72 | |
| 73 if ((b=BIO_new(BIO_s_file())) == NULL) | |
| 74 { | |
| 75 X509err(X509_F_X509_CRL_PRINT_FP,ERR_R_BUF_LIB); | |
| 76 return(0); | |
| 77 } | |
| 78 BIO_set_fp(b,fp,BIO_NOCLOSE); | |
| 79 ret=X509_CRL_print(b, x); | |
| 80 BIO_free(b); | |
| 81 return(ret); | |
| 82 } | |
| 83 #endif | |
| 84 | |
| 85 int X509_CRL_print(BIO *out, X509_CRL *x) | |
| 86 { | |
| 87 STACK_OF(X509_REVOKED) *rev; | |
| 88 X509_REVOKED *r; | |
| 89 long l; | |
| 90 int i; | |
| 91 char *p; | |
| 92 | |
| 93 BIO_printf(out, "Certificate Revocation List (CRL):\n"); | |
| 94 l = X509_CRL_get_version(x); | |
| 95 BIO_printf(out, "%8sVersion %lu (0x%lx)\n", "", l+1, l); | |
| 96 i = OBJ_obj2nid(x->sig_alg->algorithm); | |
| 97 X509_signature_print(out, x->sig_alg, NULL); | |
| 98 p=X509_NAME_oneline(X509_CRL_get_issuer(x),NULL,0); | |
| 99 BIO_printf(out,"%8sIssuer: %s\n","",p); | |
| 100 OPENSSL_free(p); | |
| 101 BIO_printf(out,"%8sLast Update: ",""); | |
| 102 ASN1_TIME_print(out,X509_CRL_get_lastUpdate(x)); | |
| 103 BIO_printf(out,"\n%8sNext Update: ",""); | |
| 104 if (X509_CRL_get_nextUpdate(x)) | |
| 105 ASN1_TIME_print(out,X509_CRL_get_nextUpdate(x)); | |
| 106 else BIO_printf(out,"NONE"); | |
| 107 BIO_printf(out,"\n"); | |
| 108 | |
| 109 X509V3_extensions_print(out, "CRL extensions", | |
| 110 x->crl->extensions, 0, 8); | |
| 111 | |
| 112 rev = X509_CRL_get_REVOKED(x); | |
| 113 | |
| 114 if(sk_X509_REVOKED_num(rev) > 0) | |
| 115 BIO_printf(out, "Revoked Certificates:\n"); | |
| 116 else BIO_printf(out, "No Revoked Certificates.\n"); | |
| 117 | |
| 118 for(i = 0; i < sk_X509_REVOKED_num(rev); i++) { | |
| 119 r = sk_X509_REVOKED_value(rev, i); | |
| 120 BIO_printf(out," Serial Number: "); | |
| 121 i2a_ASN1_INTEGER(out,r->serialNumber); | |
| 122 BIO_printf(out,"\n Revocation Date: "); | |
| 123 ASN1_TIME_print(out,r->revocationDate); | |
| 124 BIO_printf(out,"\n"); | |
| 125 X509V3_extensions_print(out, "CRL entry extensions", | |
| 126 r->extensions, 0, 8); | |
| 127 } | |
| 128 X509_signature_print(out, x->sig_alg, x->signature); | |
| 129 | |
| 130 return 1; | |
| 131 | |
| 132 } | |
| OLD | NEW |