diff options
| author | jsing <> | 2014-08-26 17:47:25 +0000 |
|---|---|---|
| committer | jsing <> | 2014-08-26 17:47:25 +0000 |
| commit | f3755acd5513f85ff734de6a822b6f804d3776ce (patch) | |
| tree | 1f859a78eae941040f58599de8c0e1e56d61fdad /src/usr.bin/openssl/crl.c | |
| parent | 0779b9f30aa9875c290af18a4362799668829707 (diff) | |
| download | openbsd-f3755acd5513f85ff734de6a822b6f804d3776ce.tar.gz openbsd-f3755acd5513f85ff734de6a822b6f804d3776ce.tar.bz2 openbsd-f3755acd5513f85ff734de6a822b6f804d3776ce.zip | |
Move openssl(1) from /usr/sbin/openssl to /usr/bin/openssl, since it is not
a system/superuser binary. At the same time, move the source code from its
current lib/libssl/src/apps location to a more appropriate home under
usr.bin/openssl.
ok deraadt@ miod@
Diffstat (limited to 'src/usr.bin/openssl/crl.c')
| -rw-r--r-- | src/usr.bin/openssl/crl.c | 415 |
1 files changed, 415 insertions, 0 deletions
diff --git a/src/usr.bin/openssl/crl.c b/src/usr.bin/openssl/crl.c new file mode 100644 index 0000000000..04de5a2f12 --- /dev/null +++ b/src/usr.bin/openssl/crl.c | |||
| @@ -0,0 +1,415 @@ | |||
| 1 | /* $OpenBSD: crl.c,v 1.1 2014/08/26 17:47:24 jsing Exp $ */ | ||
| 2 | /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) | ||
| 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 <stdlib.h> | ||
| 61 | #include <string.h> | ||
| 62 | |||
| 63 | #include "apps.h" | ||
| 64 | |||
| 65 | #include <openssl/bio.h> | ||
| 66 | #include <openssl/err.h> | ||
| 67 | #include <openssl/pem.h> | ||
| 68 | #include <openssl/x509.h> | ||
| 69 | #include <openssl/x509v3.h> | ||
| 70 | |||
| 71 | #define POSTFIX ".rvk" | ||
| 72 | |||
| 73 | static const char *crl_usage[] = { | ||
| 74 | "usage: crl args\n", | ||
| 75 | "\n", | ||
| 76 | " -inform arg - input format - default PEM (DER or PEM)\n", | ||
| 77 | " -outform arg - output format - default PEM\n", | ||
| 78 | " -text - print out a text format version\n", | ||
| 79 | " -in arg - input file - default stdin\n", | ||
| 80 | " -out arg - output file - default stdout\n", | ||
| 81 | " -hash - print hash value\n", | ||
| 82 | #ifndef OPENSSL_NO_MD5 | ||
| 83 | " -hash_old - print old-style (MD5) hash value\n", | ||
| 84 | #endif | ||
| 85 | " -fingerprint - print the crl fingerprint\n", | ||
| 86 | " -issuer - print issuer DN\n", | ||
| 87 | " -lastupdate - lastUpdate field\n", | ||
| 88 | " -nextupdate - nextUpdate field\n", | ||
| 89 | " -crlnumber - print CRL number\n", | ||
| 90 | " -noout - no CRL output\n", | ||
| 91 | " -CAfile name - verify CRL using certificates in file \"name\"\n", | ||
| 92 | " -CApath dir - verify CRL using certificates in \"dir\"\n", | ||
| 93 | " -nameopt arg - various certificate name options\n", | ||
| 94 | NULL | ||
| 95 | }; | ||
| 96 | |||
| 97 | static X509_CRL *load_crl(char *file, int format); | ||
| 98 | static BIO *bio_out = NULL; | ||
| 99 | |||
| 100 | int crl_main(int, char **); | ||
| 101 | |||
| 102 | int | ||
| 103 | crl_main(int argc, char **argv) | ||
| 104 | { | ||
| 105 | unsigned long nmflag = 0; | ||
| 106 | X509_CRL *x = NULL; | ||
| 107 | char *CAfile = NULL, *CApath = NULL; | ||
| 108 | int ret = 1, i, num, badops = 0; | ||
| 109 | BIO *out = NULL; | ||
| 110 | int informat, outformat; | ||
| 111 | char *infile = NULL, *outfile = NULL; | ||
| 112 | int hash = 0, issuer = 0, lastupdate = 0, nextupdate = 0, noout = 0, | ||
| 113 | text = 0; | ||
| 114 | #ifndef OPENSSL_NO_MD5 | ||
| 115 | int hash_old = 0; | ||
| 116 | #endif | ||
| 117 | int fingerprint = 0, crlnumber = 0; | ||
| 118 | const char **pp; | ||
| 119 | X509_STORE *store = NULL; | ||
| 120 | X509_STORE_CTX ctx; | ||
| 121 | X509_LOOKUP *lookup = NULL; | ||
| 122 | X509_OBJECT xobj; | ||
| 123 | EVP_PKEY *pkey; | ||
| 124 | int do_ver = 0; | ||
| 125 | const EVP_MD *md_alg, *digest = EVP_sha1(); | ||
| 126 | |||
| 127 | if (bio_out == NULL) | ||
| 128 | if ((bio_out = BIO_new(BIO_s_file())) != NULL) { | ||
| 129 | BIO_set_fp(bio_out, stdout, BIO_NOCLOSE); | ||
| 130 | } | ||
| 131 | informat = FORMAT_PEM; | ||
| 132 | outformat = FORMAT_PEM; | ||
| 133 | |||
| 134 | argc--; | ||
| 135 | argv++; | ||
| 136 | num = 0; | ||
| 137 | while (argc >= 1) { | ||
| 138 | #ifdef undef | ||
| 139 | if (strcmp(*argv, "-p") == 0) { | ||
| 140 | if (--argc < 1) | ||
| 141 | goto bad; | ||
| 142 | if (!args_from_file(++argv, Nargc, Nargv)) { | ||
| 143 | goto end; | ||
| 144 | } | ||
| 145 | } | ||
| 146 | #endif | ||
| 147 | if (strcmp(*argv, "-inform") == 0) { | ||
| 148 | if (--argc < 1) | ||
| 149 | goto bad; | ||
| 150 | informat = str2fmt(*(++argv)); | ||
| 151 | } else if (strcmp(*argv, "-outform") == 0) { | ||
| 152 | if (--argc < 1) | ||
| 153 | goto bad; | ||
| 154 | outformat = str2fmt(*(++argv)); | ||
| 155 | } else if (strcmp(*argv, "-in") == 0) { | ||
| 156 | if (--argc < 1) | ||
| 157 | goto bad; | ||
| 158 | infile = *(++argv); | ||
| 159 | } else if (strcmp(*argv, "-out") == 0) { | ||
| 160 | if (--argc < 1) | ||
| 161 | goto bad; | ||
| 162 | outfile = *(++argv); | ||
| 163 | } else if (strcmp(*argv, "-CApath") == 0) { | ||
| 164 | if (--argc < 1) | ||
| 165 | goto bad; | ||
| 166 | CApath = *(++argv); | ||
| 167 | do_ver = 1; | ||
| 168 | } else if (strcmp(*argv, "-CAfile") == 0) { | ||
| 169 | if (--argc < 1) | ||
| 170 | goto bad; | ||
| 171 | CAfile = *(++argv); | ||
| 172 | do_ver = 1; | ||
| 173 | } else if (strcmp(*argv, "-verify") == 0) | ||
| 174 | do_ver = 1; | ||
| 175 | else if (strcmp(*argv, "-text") == 0) | ||
| 176 | text = 1; | ||
| 177 | else if (strcmp(*argv, "-hash") == 0) | ||
| 178 | hash = ++num; | ||
| 179 | #ifndef OPENSSL_NO_MD5 | ||
| 180 | else if (strcmp(*argv, "-hash_old") == 0) | ||
| 181 | hash_old = ++num; | ||
| 182 | #endif | ||
| 183 | else if (strcmp(*argv, "-nameopt") == 0) { | ||
| 184 | if (--argc < 1) | ||
| 185 | goto bad; | ||
| 186 | if (!set_name_ex(&nmflag, *(++argv))) | ||
| 187 | goto bad; | ||
| 188 | } else if (strcmp(*argv, "-issuer") == 0) | ||
| 189 | issuer = ++num; | ||
| 190 | else if (strcmp(*argv, "-lastupdate") == 0) | ||
| 191 | lastupdate = ++num; | ||
| 192 | else if (strcmp(*argv, "-nextupdate") == 0) | ||
| 193 | nextupdate = ++num; | ||
| 194 | else if (strcmp(*argv, "-noout") == 0) | ||
| 195 | noout = ++num; | ||
| 196 | else if (strcmp(*argv, "-fingerprint") == 0) | ||
| 197 | fingerprint = ++num; | ||
| 198 | else if (strcmp(*argv, "-crlnumber") == 0) | ||
| 199 | crlnumber = ++num; | ||
| 200 | else if ((md_alg = EVP_get_digestbyname(*argv + 1))) { | ||
| 201 | /* ok */ | ||
| 202 | digest = md_alg; | ||
| 203 | } else { | ||
| 204 | BIO_printf(bio_err, "unknown option %s\n", *argv); | ||
| 205 | badops = 1; | ||
| 206 | break; | ||
| 207 | } | ||
| 208 | argc--; | ||
| 209 | argv++; | ||
| 210 | } | ||
| 211 | |||
| 212 | if (badops) { | ||
| 213 | bad: | ||
| 214 | for (pp = crl_usage; (*pp != NULL); pp++) | ||
| 215 | BIO_printf(bio_err, "%s", *pp); | ||
| 216 | goto end; | ||
| 217 | } | ||
| 218 | ERR_load_crypto_strings(); | ||
| 219 | x = load_crl(infile, informat); | ||
| 220 | if (x == NULL) { | ||
| 221 | goto end; | ||
| 222 | } | ||
| 223 | if (do_ver) { | ||
| 224 | store = X509_STORE_new(); | ||
| 225 | lookup = X509_STORE_add_lookup(store, X509_LOOKUP_file()); | ||
| 226 | if (lookup == NULL) | ||
| 227 | goto end; | ||
| 228 | if (!X509_LOOKUP_load_file(lookup, CAfile, X509_FILETYPE_PEM)) | ||
| 229 | X509_LOOKUP_load_file(lookup, NULL, | ||
| 230 | X509_FILETYPE_DEFAULT); | ||
| 231 | |||
| 232 | lookup = X509_STORE_add_lookup(store, X509_LOOKUP_hash_dir()); | ||
| 233 | if (lookup == NULL) | ||
| 234 | goto end; | ||
| 235 | if (!X509_LOOKUP_add_dir(lookup, CApath, X509_FILETYPE_PEM)) | ||
| 236 | X509_LOOKUP_add_dir(lookup, NULL, | ||
| 237 | X509_FILETYPE_DEFAULT); | ||
| 238 | ERR_clear_error(); | ||
| 239 | |||
| 240 | if (!X509_STORE_CTX_init(&ctx, store, NULL, NULL)) { | ||
| 241 | BIO_printf(bio_err, | ||
| 242 | "Error initialising X509 store\n"); | ||
| 243 | goto end; | ||
| 244 | } | ||
| 245 | i = X509_STORE_get_by_subject(&ctx, X509_LU_X509, | ||
| 246 | X509_CRL_get_issuer(x), &xobj); | ||
| 247 | if (i <= 0) { | ||
| 248 | BIO_printf(bio_err, | ||
| 249 | "Error getting CRL issuer certificate\n"); | ||
| 250 | goto end; | ||
| 251 | } | ||
| 252 | pkey = X509_get_pubkey(xobj.data.x509); | ||
| 253 | X509_OBJECT_free_contents(&xobj); | ||
| 254 | if (!pkey) { | ||
| 255 | BIO_printf(bio_err, | ||
| 256 | "Error getting CRL issuer public key\n"); | ||
| 257 | goto end; | ||
| 258 | } | ||
| 259 | i = X509_CRL_verify(x, pkey); | ||
| 260 | EVP_PKEY_free(pkey); | ||
| 261 | if (i < 0) | ||
| 262 | goto end; | ||
| 263 | if (i == 0) | ||
| 264 | BIO_printf(bio_err, "verify failure\n"); | ||
| 265 | else | ||
| 266 | BIO_printf(bio_err, "verify OK\n"); | ||
| 267 | } | ||
| 268 | if (num) { | ||
| 269 | for (i = 1; i <= num; i++) { | ||
| 270 | if (issuer == i) { | ||
| 271 | print_name(bio_out, "issuer=", | ||
| 272 | X509_CRL_get_issuer(x), nmflag); | ||
| 273 | } | ||
| 274 | if (crlnumber == i) { | ||
| 275 | ASN1_INTEGER *crlnum; | ||
| 276 | crlnum = X509_CRL_get_ext_d2i(x, | ||
| 277 | NID_crl_number, NULL, NULL); | ||
| 278 | BIO_printf(bio_out, "crlNumber="); | ||
| 279 | if (crlnum) { | ||
| 280 | i2a_ASN1_INTEGER(bio_out, crlnum); | ||
| 281 | ASN1_INTEGER_free(crlnum); | ||
| 282 | } else | ||
| 283 | BIO_puts(bio_out, "<NONE>"); | ||
| 284 | BIO_printf(bio_out, "\n"); | ||
| 285 | } | ||
| 286 | if (hash == i) { | ||
| 287 | BIO_printf(bio_out, "%08lx\n", | ||
| 288 | X509_NAME_hash(X509_CRL_get_issuer(x))); | ||
| 289 | } | ||
| 290 | #ifndef OPENSSL_NO_MD5 | ||
| 291 | if (hash_old == i) { | ||
| 292 | BIO_printf(bio_out, "%08lx\n", | ||
| 293 | X509_NAME_hash_old(X509_CRL_get_issuer(x))); | ||
| 294 | } | ||
| 295 | #endif | ||
| 296 | if (lastupdate == i) { | ||
| 297 | BIO_printf(bio_out, "lastUpdate="); | ||
| 298 | ASN1_TIME_print(bio_out, | ||
| 299 | X509_CRL_get_lastUpdate(x)); | ||
| 300 | BIO_printf(bio_out, "\n"); | ||
| 301 | } | ||
| 302 | if (nextupdate == i) { | ||
| 303 | BIO_printf(bio_out, "nextUpdate="); | ||
| 304 | if (X509_CRL_get_nextUpdate(x)) | ||
| 305 | ASN1_TIME_print(bio_out, | ||
| 306 | X509_CRL_get_nextUpdate(x)); | ||
| 307 | else | ||
| 308 | BIO_printf(bio_out, "NONE"); | ||
| 309 | BIO_printf(bio_out, "\n"); | ||
| 310 | } | ||
| 311 | if (fingerprint == i) { | ||
| 312 | int j; | ||
| 313 | unsigned int n; | ||
| 314 | unsigned char md[EVP_MAX_MD_SIZE]; | ||
| 315 | |||
| 316 | if (!X509_CRL_digest(x, digest, md, &n)) { | ||
| 317 | BIO_printf(bio_err, "out of memory\n"); | ||
| 318 | goto end; | ||
| 319 | } | ||
| 320 | BIO_printf(bio_out, "%s Fingerprint=", | ||
| 321 | OBJ_nid2sn(EVP_MD_type(digest))); | ||
| 322 | for (j = 0; j < (int) n; j++) { | ||
| 323 | BIO_printf(bio_out, "%02X%c", md[j], | ||
| 324 | (j + 1 == (int)n) ? '\n' : ':'); | ||
| 325 | } | ||
| 326 | } | ||
| 327 | } | ||
| 328 | } | ||
| 329 | out = BIO_new(BIO_s_file()); | ||
| 330 | if (out == NULL) { | ||
| 331 | ERR_print_errors(bio_err); | ||
| 332 | goto end; | ||
| 333 | } | ||
| 334 | if (outfile == NULL) { | ||
| 335 | BIO_set_fp(out, stdout, BIO_NOCLOSE); | ||
| 336 | } else { | ||
| 337 | if (BIO_write_filename(out, outfile) <= 0) { | ||
| 338 | perror(outfile); | ||
| 339 | goto end; | ||
| 340 | } | ||
| 341 | } | ||
| 342 | |||
| 343 | if (text) | ||
| 344 | X509_CRL_print(out, x); | ||
| 345 | |||
| 346 | if (noout) { | ||
| 347 | ret = 0; | ||
| 348 | goto end; | ||
| 349 | } | ||
| 350 | if (outformat == FORMAT_ASN1) | ||
| 351 | i = (int) i2d_X509_CRL_bio(out, x); | ||
| 352 | else if (outformat == FORMAT_PEM) | ||
| 353 | i = PEM_write_bio_X509_CRL(out, x); | ||
| 354 | else { | ||
| 355 | BIO_printf(bio_err, | ||
| 356 | "bad output format specified for outfile\n"); | ||
| 357 | goto end; | ||
| 358 | } | ||
| 359 | if (!i) { | ||
| 360 | BIO_printf(bio_err, "unable to write CRL\n"); | ||
| 361 | goto end; | ||
| 362 | } | ||
| 363 | ret = 0; | ||
| 364 | |||
| 365 | end: | ||
| 366 | BIO_free_all(out); | ||
| 367 | BIO_free_all(bio_out); | ||
| 368 | bio_out = NULL; | ||
| 369 | X509_CRL_free(x); | ||
| 370 | if (store) { | ||
| 371 | X509_STORE_CTX_cleanup(&ctx); | ||
| 372 | X509_STORE_free(store); | ||
| 373 | } | ||
| 374 | |||
| 375 | return (ret); | ||
| 376 | } | ||
| 377 | |||
| 378 | static X509_CRL * | ||
| 379 | load_crl(char *infile, int format) | ||
| 380 | { | ||
| 381 | X509_CRL *x = NULL; | ||
| 382 | BIO *in = NULL; | ||
| 383 | |||
| 384 | in = BIO_new(BIO_s_file()); | ||
| 385 | if (in == NULL) { | ||
| 386 | ERR_print_errors(bio_err); | ||
| 387 | goto end; | ||
| 388 | } | ||
| 389 | if (infile == NULL) | ||
| 390 | BIO_set_fp(in, stdin, BIO_NOCLOSE); | ||
| 391 | else { | ||
| 392 | if (BIO_read_filename(in, infile) <= 0) { | ||
| 393 | perror(infile); | ||
| 394 | goto end; | ||
| 395 | } | ||
| 396 | } | ||
| 397 | if (format == FORMAT_ASN1) | ||
| 398 | x = d2i_X509_CRL_bio(in, NULL); | ||
| 399 | else if (format == FORMAT_PEM) | ||
| 400 | x = PEM_read_bio_X509_CRL(in, NULL, NULL, NULL); | ||
| 401 | else { | ||
| 402 | BIO_printf(bio_err, | ||
| 403 | "bad input format specified for input crl\n"); | ||
| 404 | goto end; | ||
| 405 | } | ||
| 406 | if (x == NULL) { | ||
| 407 | BIO_printf(bio_err, "unable to load CRL\n"); | ||
| 408 | ERR_print_errors(bio_err); | ||
| 409 | goto end; | ||
| 410 | } | ||
| 411 | |||
| 412 | end: | ||
| 413 | BIO_free(in); | ||
| 414 | return (x); | ||
| 415 | } | ||
