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 | } | ||