If an engine comes up explicitely, it must also come down explicitely
[openssl.git] / apps / verify.c
1 /*
2  * Copyright 1995-2016 The OpenSSL Project Authors. All Rights Reserved.
3  *
4  * Licensed under the OpenSSL license (the "License").  You may not use
5  * this file except in compliance with the License.  You can obtain a copy
6  * in the file LICENSE in the source distribution or at
7  * https://www.openssl.org/source/license.html
8  */
9
10 #include <stdio.h>
11 #include <stdlib.h>
12 #include <string.h>
13 #include "apps.h"
14 #include <openssl/bio.h>
15 #include <openssl/err.h>
16 #include <openssl/x509.h>
17 #include <openssl/x509v3.h>
18 #include <openssl/pem.h>
19
20 static int cb(int ok, X509_STORE_CTX *ctx);
21 static int check(X509_STORE *ctx, const char *file,
22                  STACK_OF(X509) *uchain, STACK_OF(X509) *tchain,
23                  STACK_OF(X509_CRL) *crls, int show_chain);
24 static int v_verbose = 0, vflags = 0;
25
26 typedef enum OPTION_choice {
27     OPT_ERR = -1, OPT_EOF = 0, OPT_HELP,
28     OPT_ENGINE, OPT_CAPATH, OPT_CAFILE, OPT_NOCAPATH, OPT_NOCAFILE,
29     OPT_UNTRUSTED, OPT_TRUSTED, OPT_CRLFILE, OPT_CRL_DOWNLOAD, OPT_SHOW_CHAIN,
30     OPT_V_ENUM,
31     OPT_VERBOSE
32 } OPTION_CHOICE;
33
34 const OPTIONS verify_options[] = {
35     {OPT_HELP_STR, 1, '-', "Usage: %s [options] cert.pem...\n"},
36     {OPT_HELP_STR, 1, '-', "Valid options are:\n"},
37     {"help", OPT_HELP, '-', "Display this summary"},
38     {"verbose", OPT_VERBOSE, '-',
39         "Print extra information about the operations being performed."},
40     {"CApath", OPT_CAPATH, '/', "A directory of trusted certificates"},
41     {"CAfile", OPT_CAFILE, '<', "A file of trusted certificates"},
42     {"no-CAfile", OPT_NOCAFILE, '-',
43      "Do not load the default certificates file"},
44     {"no-CApath", OPT_NOCAPATH, '-',
45      "Do not load certificates from the default certificates directory"},
46     {"untrusted", OPT_UNTRUSTED, '<', "A file of untrusted certificates"},
47     {"trusted", OPT_TRUSTED, '<', "A file of trusted certificates"},
48     {"CRLfile", OPT_CRLFILE, '<',
49         "File containing one or more CRL's (in PEM format) to load"},
50     {"crl_download", OPT_CRL_DOWNLOAD, '-',
51         "Attempt to download CRL information for this certificate"},
52     {"show_chain", OPT_SHOW_CHAIN, '-',
53         "Display information about the certificate chain"},
54     OPT_V_OPTIONS,
55 #ifndef OPENSSL_NO_ENGINE
56     {"engine", OPT_ENGINE, 's', "Use engine, possibly a hardware device"},
57 #endif
58     {NULL}
59 };
60
61 int verify_main(int argc, char **argv)
62 {
63     ENGINE *e = NULL;
64     STACK_OF(X509) *untrusted = NULL, *trusted = NULL;
65     STACK_OF(X509_CRL) *crls = NULL;
66     X509_STORE *store = NULL;
67     X509_VERIFY_PARAM *vpm = NULL;
68     const char *prog, *CApath = NULL, *CAfile = NULL;
69     int noCApath = 0, noCAfile = 0;
70     int vpmtouched = 0, crl_download = 0, show_chain = 0, i = 0, ret = 1;
71     OPTION_CHOICE o;
72
73     if ((vpm = X509_VERIFY_PARAM_new()) == NULL)
74         goto end;
75
76     prog = opt_init(argc, argv, verify_options);
77     while ((o = opt_next()) != OPT_EOF) {
78         switch (o) {
79         case OPT_EOF:
80         case OPT_ERR:
81             BIO_printf(bio_err, "%s: Use -help for summary.\n", prog);
82             goto end;
83         case OPT_HELP:
84             opt_help(verify_options);
85             BIO_printf(bio_err, "Recognized usages:\n");
86             for (i = 0; i < X509_PURPOSE_get_count(); i++) {
87                 X509_PURPOSE *ptmp;
88                 ptmp = X509_PURPOSE_get0(i);
89                 BIO_printf(bio_err, "\t%-10s\t%s\n",
90                         X509_PURPOSE_get0_sname(ptmp),
91                         X509_PURPOSE_get0_name(ptmp));
92             }
93
94             BIO_printf(bio_err, "Recognized verify names:\n");
95             for (i = 0; i < X509_VERIFY_PARAM_get_count(); i++) {
96                 const X509_VERIFY_PARAM *vptmp;
97                 vptmp = X509_VERIFY_PARAM_get0(i);
98                 BIO_printf(bio_err, "\t%-10s\n",
99                         X509_VERIFY_PARAM_get0_name(vptmp));
100             }
101             ret = 0;
102             goto end;
103         case OPT_V_CASES:
104             if (!opt_verify(o, vpm))
105                 goto end;
106             vpmtouched++;
107             break;
108         case OPT_CAPATH:
109             CApath = opt_arg();
110             break;
111         case OPT_CAFILE:
112             CAfile = opt_arg();
113             break;
114         case OPT_NOCAPATH:
115             noCApath = 1;
116             break;
117         case OPT_NOCAFILE:
118             noCAfile = 1;
119             break;
120         case OPT_UNTRUSTED:
121             /* Zero or more times */
122             if (!load_certs(opt_arg(), &untrusted, FORMAT_PEM, NULL,
123                             "untrusted certificates"))
124                 goto end;
125             break;
126         case OPT_TRUSTED:
127             /* Zero or more times */
128             noCAfile = 1;
129             noCApath = 1;
130             if (!load_certs(opt_arg(), &trusted, FORMAT_PEM, NULL,
131                             "trusted certificates"))
132                 goto end;
133             break;
134         case OPT_CRLFILE:
135             /* Zero or more times */
136             if (!load_crls(opt_arg(), &crls, FORMAT_PEM, NULL,
137                            "other CRLs"))
138                 goto end;
139             break;
140         case OPT_CRL_DOWNLOAD:
141             crl_download = 1;
142             break;
143         case OPT_ENGINE:
144             if ((e = setup_engine(opt_arg(), 0)) == NULL) {
145                 /* Failure message already displayed */
146                 goto end;
147             }
148             break;
149         case OPT_SHOW_CHAIN:
150             show_chain = 1;
151             break;
152         case OPT_VERBOSE:
153             v_verbose = 1;
154             break;
155         }
156     }
157     argc = opt_num_rest();
158     argv = opt_rest();
159     if (trusted != NULL && (CAfile || CApath)) {
160         BIO_printf(bio_err,
161                    "%s: Cannot use -trusted with -CAfile or -CApath\n",
162                    prog);
163         goto end;
164     }
165
166     if ((store = setup_verify(CAfile, CApath, noCAfile, noCApath)) == NULL)
167         goto end;
168     X509_STORE_set_verify_cb(store, cb);
169
170     if (vpmtouched)
171         X509_STORE_set1_param(store, vpm);
172
173     ERR_clear_error();
174
175     if (crl_download)
176         store_setup_crl_download(store);
177
178     ret = 0;
179     if (argc < 1) {
180         if (check(store, NULL, untrusted, trusted, crls, show_chain) != 1)
181             ret = -1;
182     } else {
183         for (i = 0; i < argc; i++)
184             if (check(store, argv[i], untrusted, trusted, crls,
185                       show_chain) != 1)
186                 ret = -1;
187     }
188
189  end:
190     X509_VERIFY_PARAM_free(vpm);
191     X509_STORE_free(store);
192     sk_X509_pop_free(untrusted, X509_free);
193     sk_X509_pop_free(trusted, X509_free);
194     sk_X509_CRL_pop_free(crls, X509_CRL_free);
195     release_engine(e);
196     return (ret < 0 ? 2 : ret);
197 }
198
199 static int check(X509_STORE *ctx, const char *file,
200                  STACK_OF(X509) *uchain, STACK_OF(X509) *tchain,
201                  STACK_OF(X509_CRL) *crls, int show_chain)
202 {
203     X509 *x = NULL;
204     int i = 0, ret = 0;
205     X509_STORE_CTX *csc;
206     STACK_OF(X509) *chain = NULL;
207     int num_untrusted;
208
209     x = load_cert(file, FORMAT_PEM, "certificate file");
210     if (x == NULL)
211         goto end;
212
213     csc = X509_STORE_CTX_new();
214     if (csc == NULL) {
215         printf("error %s: X.509 store context allocation failed\n",
216                (file == NULL) ? "stdin" : file);
217         goto end;
218     }
219
220     X509_STORE_set_flags(ctx, vflags);
221     if (!X509_STORE_CTX_init(csc, ctx, x, uchain)) {
222         printf("error %s: X.509 store context initialization failed\n",
223                (file == NULL) ? "stdin" : file);
224         goto end;
225     }
226     if (tchain)
227         X509_STORE_CTX_set0_trusted_stack(csc, tchain);
228     if (crls)
229         X509_STORE_CTX_set0_crls(csc, crls);
230     i = X509_verify_cert(csc);
231     if (i > 0 && X509_STORE_CTX_get_error(csc) == X509_V_OK) {
232         printf("%s: OK\n", (file == NULL) ? "stdin" : file);
233         ret = 1;
234         if (show_chain) {
235             int j;
236
237             chain = X509_STORE_CTX_get1_chain(csc);
238             num_untrusted = X509_STORE_CTX_get_num_untrusted(csc);
239             printf("Chain:\n");
240             for (j = 0; j < sk_X509_num(chain); j++) {
241                 X509 *cert = sk_X509_value(chain, j);
242                 printf("depth=%d: ", j);
243                 X509_NAME_print_ex_fp(stdout,
244                                       X509_get_subject_name(cert),
245                                       0, XN_FLAG_ONELINE);
246                 if (j < num_untrusted)
247                     printf(" (untrusted)");
248                 printf("\n");
249             }
250             sk_X509_pop_free(chain, X509_free);
251         }
252     } else {
253         printf("error %s: verification failed\n", (file == NULL) ? "stdin" : file);
254     }
255     X509_STORE_CTX_free(csc);
256
257  end:
258     if (i <= 0)
259         ERR_print_errors(bio_err);
260     X509_free(x);
261
262     return ret;
263 }
264
265 static int cb(int ok, X509_STORE_CTX *ctx)
266 {
267     int cert_error = X509_STORE_CTX_get_error(ctx);
268     X509 *current_cert = X509_STORE_CTX_get_current_cert(ctx);
269
270     if (!ok) {
271         if (current_cert) {
272             X509_NAME_print_ex(bio_err,
273                             X509_get_subject_name(current_cert),
274                             0, XN_FLAG_ONELINE);
275             BIO_printf(bio_err, "\n");
276         }
277         BIO_printf(bio_err, "%serror %d at %d depth lookup: %s\n",
278                X509_STORE_CTX_get0_parent_ctx(ctx) ? "[CRL path] " : "",
279                cert_error,
280                X509_STORE_CTX_get_error_depth(ctx),
281                X509_verify_cert_error_string(cert_error));
282         switch (cert_error) {
283         case X509_V_ERR_NO_EXPLICIT_POLICY:
284             policies_print(ctx);
285         case X509_V_ERR_CERT_HAS_EXPIRED:
286
287             /*
288              * since we are just checking the certificates, it is ok if they
289              * are self signed. But we should still warn the user.
290              */
291         case X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT:
292             /* Continue after extension errors too */
293         case X509_V_ERR_INVALID_CA:
294         case X509_V_ERR_INVALID_NON_CA:
295         case X509_V_ERR_PATH_LENGTH_EXCEEDED:
296         case X509_V_ERR_INVALID_PURPOSE:
297         case X509_V_ERR_CRL_HAS_EXPIRED:
298         case X509_V_ERR_CRL_NOT_YET_VALID:
299         case X509_V_ERR_UNHANDLED_CRITICAL_EXTENSION:
300             ok = 1;
301         }
302
303         return ok;
304
305     }
306     if (cert_error == X509_V_OK && ok == 2)
307         policies_print(ctx);
308     if (!v_verbose)
309         ERR_clear_error();
310     return (ok);
311 }