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.]
63 #include <openssl/bio.h>
64 #include <openssl/err.h>
65 #include <openssl/x509.h>
66 #include <openssl/x509v3.h>
67 #include <openssl/pem.h>
70 #define PROG verify_main
72 static int MS_CALLBACK
cb(int ok
, X509_STORE_CTX
*ctx
);
73 static int check(X509_STORE
*ctx
, char *file
, STACK_OF(X509
) *uchain
,
74 STACK_OF(X509
) *tchain
, int purpose
, ENGINE
*e
);
75 static STACK_OF(X509
) *load_untrusted(char *file
);
76 static int v_verbose
= 0, vflags
= 0;
78 int MAIN(int, char **);
80 int MAIN(int argc
, char **argv
)
83 int i
, ret
= 1, badarg
= 0;
85 char *CApath
= NULL
, *CAfile
= NULL
;
86 char *untfile
= NULL
, *trustfile
= NULL
;
87 STACK_OF(X509
) *untrusted
= NULL
, *trusted
= NULL
;
88 X509_STORE
*cert_ctx
= NULL
;
89 X509_LOOKUP
*lookup
= NULL
;
90 X509_VERIFY_PARAM
*vpm
= NULL
;
91 #ifndef OPENSSL_NO_ENGINE
95 cert_ctx
= X509_STORE_new();
98 X509_STORE_set_verify_cb_func(cert_ctx
, cb
);
100 ERR_load_crypto_strings();
105 if ((bio_err
= BIO_new(BIO_s_file())) != NULL
)
106 BIO_set_fp(bio_err
, stderr
, BIO_NOCLOSE
| BIO_FP_TEXT
);
108 if (!load_config(bio_err
, NULL
))
115 if (strcmp(*argv
, "-CApath") == 0) {
119 } else if (strcmp(*argv
, "-CAfile") == 0) {
123 } else if (args_verify(&argv
, &argc
, &badarg
, bio_err
, &vpm
)) {
127 } else if (strcmp(*argv
, "-untrusted") == 0) {
131 } else if (strcmp(*argv
, "-trusted") == 0) {
134 trustfile
= *(++argv
);
136 #ifndef OPENSSL_NO_ENGINE
137 else if (strcmp(*argv
, "-engine") == 0) {
143 else if (strcmp(*argv
, "-help") == 0)
145 else if (strcmp(*argv
, "-verbose") == 0)
147 else if (argv
[0][0] == '-')
157 #ifndef OPENSSL_NO_ENGINE
158 e
= setup_engine(bio_err
, engine
, 0);
162 X509_STORE_set1_param(cert_ctx
, vpm
);
164 lookup
= X509_STORE_add_lookup(cert_ctx
, X509_LOOKUP_file());
168 i
= X509_LOOKUP_load_file(lookup
, CAfile
, X509_FILETYPE_PEM
);
170 BIO_printf(bio_err
, "Error loading file %s\n", CAfile
);
171 ERR_print_errors(bio_err
);
175 X509_LOOKUP_load_file(lookup
, NULL
, X509_FILETYPE_DEFAULT
);
177 lookup
= X509_STORE_add_lookup(cert_ctx
, X509_LOOKUP_hash_dir());
181 i
= X509_LOOKUP_add_dir(lookup
, CApath
, X509_FILETYPE_PEM
);
183 BIO_printf(bio_err
, "Error loading directory %s\n", CApath
);
184 ERR_print_errors(bio_err
);
188 X509_LOOKUP_add_dir(lookup
, NULL
, X509_FILETYPE_DEFAULT
);
193 if (!(untrusted
= load_untrusted(untfile
))) {
194 BIO_printf(bio_err
, "Error loading untrusted file %s\n", untfile
);
195 ERR_print_errors(bio_err
);
201 if (!(trusted
= load_untrusted(trustfile
))) {
202 BIO_printf(bio_err
, "Error loading untrusted file %s\n",
204 ERR_print_errors(bio_err
);
210 check(cert_ctx
, NULL
, untrusted
, trusted
, purpose
, e
);
212 for (i
= 0; i
< argc
; i
++)
213 check(cert_ctx
, argv
[i
], untrusted
, trusted
, purpose
, e
);
218 "usage: verify [-verbose] [-CApath path] [-CAfile file] [-purpose purpose] [-crl_check]");
219 #ifndef OPENSSL_NO_ENGINE
220 BIO_printf(bio_err
, " [-engine e]");
222 BIO_printf(bio_err
, " cert1 cert2 ...\n");
223 BIO_printf(bio_err
, "recognized usages:\n");
224 for (i
= 0; i
< X509_PURPOSE_get_count(); i
++) {
226 ptmp
= X509_PURPOSE_get0(i
);
227 BIO_printf(bio_err
, "\t%-10s\t%s\n",
228 X509_PURPOSE_get0_sname(ptmp
),
229 X509_PURPOSE_get0_name(ptmp
));
233 X509_VERIFY_PARAM_free(vpm
);
234 if (cert_ctx
!= NULL
)
235 X509_STORE_free(cert_ctx
);
236 sk_X509_pop_free(untrusted
, X509_free
);
237 sk_X509_pop_free(trusted
, X509_free
);
242 static int check(X509_STORE
*ctx
, char *file
, STACK_OF(X509
) *uchain
,
243 STACK_OF(X509
) *tchain
, int purpose
, ENGINE
*e
)
249 x
= load_cert(bio_err
, file
, FORMAT_PEM
, NULL
, e
, "certificate file");
252 fprintf(stdout
, "%s: ", (file
== NULL
) ? "stdin" : file
);
254 csc
= X509_STORE_CTX_new();
256 ERR_print_errors(bio_err
);
259 X509_STORE_set_flags(ctx
, vflags
);
260 if (!X509_STORE_CTX_init(csc
, ctx
, x
, uchain
)) {
261 ERR_print_errors(bio_err
);
265 X509_STORE_CTX_trusted_stack(csc
, tchain
);
267 X509_STORE_CTX_set_purpose(csc
, purpose
);
268 i
= X509_verify_cert(csc
);
269 X509_STORE_CTX_free(csc
);
274 fprintf(stdout
, "OK\n");
277 ERR_print_errors(bio_err
);
284 static STACK_OF(X509
) *load_untrusted(char *certfile
)
286 STACK_OF(X509_INFO
) *sk
= NULL
;
287 STACK_OF(X509
) *stack
= NULL
, *ret
= NULL
;
291 if (!(stack
= sk_X509_new_null())) {
292 BIO_printf(bio_err
, "memory allocation failure\n");
296 if (!(in
= BIO_new_file(certfile
, "r"))) {
297 BIO_printf(bio_err
, "error opening the file, %s\n", certfile
);
301 /* This loads from a file, a stack of x509/crl/pkey sets */
302 if (!(sk
= PEM_X509_INFO_read_bio(in
, NULL
, NULL
, NULL
))) {
303 BIO_printf(bio_err
, "error reading the file, %s\n", certfile
);
307 /* scan over it and pull out the certs */
308 while (sk_X509_INFO_num(sk
)) {
309 xi
= sk_X509_INFO_shift(sk
);
310 if (xi
->x509
!= NULL
) {
311 sk_X509_push(stack
, xi
->x509
);
316 if (!sk_X509_num(stack
)) {
317 BIO_printf(bio_err
, "no certificates in file, %s\n", certfile
);
324 sk_X509_INFO_free(sk
);
328 static int MS_CALLBACK
cb(int ok
, X509_STORE_CTX
*ctx
)
333 if (ctx
->current_cert
) {
334 X509_NAME_oneline(X509_get_subject_name(ctx
->current_cert
), buf
,
338 printf("error %d at %d depth lookup:%s\n", ctx
->error
,
339 ctx
->error_depth
, X509_verify_cert_error_string(ctx
->error
));
340 if (ctx
->error
== X509_V_ERR_CERT_HAS_EXPIRED
)
343 * since we are just checking the certificates, it is ok if they are
344 * self signed. But we should still warn the user.
346 if (ctx
->error
== X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT
)
348 /* Continue after extension errors too */
349 if (ctx
->error
== X509_V_ERR_INVALID_CA
)
351 if (ctx
->error
== X509_V_ERR_INVALID_NON_CA
)
353 if (ctx
->error
== X509_V_ERR_PATH_LENGTH_EXCEEDED
)
355 if (ctx
->error
== X509_V_ERR_INVALID_PURPOSE
)
357 if (ctx
->error
== X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT
)
359 if (ctx
->error
== X509_V_ERR_CRL_HAS_EXPIRED
)
361 if (ctx
->error
== X509_V_ERR_CRL_NOT_YET_VALID
)
363 if (ctx
->error
== X509_V_ERR_UNHANDLED_CRITICAL_EXTENSION
)
366 if (ctx
->error
== X509_V_ERR_NO_EXPLICIT_POLICY
)
367 policies_print(NULL
, ctx
);
371 if ((ctx
->error
== X509_V_OK
) && (ok
== 2))
372 policies_print(NULL
, ctx
);