Add -CAstore and similar to all openssl commands that have -CApath
[openssl.git] / apps / verify.c
1 /*
2  * Copyright 1995-2018 The OpenSSL Project Authors. All Rights Reserved.
3  *
4  * Licensed under the Apache License 2.0 (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 "progs.h"
15 #include <openssl/bio.h>
16 #include <openssl/err.h>
17 #include <openssl/x509.h>
18 #include <openssl/x509v3.h>
19 #include <openssl/pem.h>
20
21 static int cb(int ok, X509_STORE_CTX *ctx);
22 static int check(X509_STORE *ctx, const char *file,
23                  STACK_OF(X509) *uchain, STACK_OF(X509) *tchain,
24                  STACK_OF(X509_CRL) *crls, int show_chain,
25                  unsigned char *sm2id, size_t sm2idlen);
26 static int v_verbose = 0, vflags = 0;
27
28 typedef enum OPTION_choice {
29     OPT_ERR = -1, OPT_EOF = 0, OPT_HELP,
30     OPT_ENGINE, OPT_CAPATH, OPT_CAFILE, OPT_CASTORE,
31     OPT_NOCAPATH, OPT_NOCAFILE, OPT_NOCASTORE,
32     OPT_UNTRUSTED, OPT_TRUSTED, OPT_CRLFILE, OPT_CRL_DOWNLOAD, OPT_SHOW_CHAIN,
33     OPT_V_ENUM, OPT_NAMEOPT,
34     OPT_VERBOSE, OPT_SM2ID, OPT_SM2HEXID
35 } OPTION_CHOICE;
36
37 const OPTIONS verify_options[] = {
38     {OPT_HELP_STR, 1, '-', "Usage: %s [options] cert.pem...\n"},
39     {OPT_HELP_STR, 1, '-', "Valid options are:\n"},
40     {"help", OPT_HELP, '-', "Display this summary"},
41     {"verbose", OPT_VERBOSE, '-',
42         "Print extra information about the operations being performed."},
43     {"CApath", OPT_CAPATH, '/', "A directory of trusted certificates"},
44     {"CAfile", OPT_CAFILE, '<', "A file of trusted certificates"},
45     {"CAstore", OPT_CASTORE, ':', "URI to a store of trusted certificates"},
46     {"no-CAfile", OPT_NOCAFILE, '-',
47      "Do not load the default certificates file"},
48     {"no-CApath", OPT_NOCAPATH, '-',
49      "Do not load certificates from the default certificates directory"},
50     {"no-CAstore", OPT_NOCAPATH, '-',
51      "Do not load certificates from the default certificates store"},
52     {"untrusted", OPT_UNTRUSTED, '<', "A file of untrusted certificates"},
53     {"trusted", OPT_TRUSTED, '<', "A file of trusted certificates"},
54     {"CRLfile", OPT_CRLFILE, '<',
55         "File containing one or more CRL's (in PEM format) to load"},
56     {"crl_download", OPT_CRL_DOWNLOAD, '-',
57         "Attempt to download CRL information for this certificate"},
58     {"show_chain", OPT_SHOW_CHAIN, '-',
59         "Display information about the certificate chain"},
60     {"nameopt", OPT_NAMEOPT, 's', "Various certificate name options"},
61     OPT_V_OPTIONS,
62 #ifndef OPENSSL_NO_ENGINE
63     {"engine", OPT_ENGINE, 's', "Use engine, possibly a hardware device"},
64 #endif
65 #ifndef OPENSSL_NO_SM2
66     {"sm2-id", OPT_SM2ID, 's',
67      "Specify an ID string to verify an SM2 certificate"},
68     {"sm2-hex-id", OPT_SM2HEXID, 's',
69      "Specify a hex ID string to verify an SM2 certificate"},
70 #endif
71     {NULL}
72 };
73
74 int verify_main(int argc, char **argv)
75 {
76     ENGINE *e = NULL;
77     STACK_OF(X509) *untrusted = NULL, *trusted = NULL;
78     STACK_OF(X509_CRL) *crls = NULL;
79     X509_STORE *store = NULL;
80     X509_VERIFY_PARAM *vpm = NULL;
81     const char *prog, *CApath = NULL, *CAfile = NULL, *CAstore = NULL;
82     int noCApath = 0, noCAfile = 0, noCAstore = 0;
83     int vpmtouched = 0, crl_download = 0, show_chain = 0, i = 0, ret = 1;
84     OPTION_CHOICE o;
85     unsigned char *sm2_id = NULL;
86     size_t sm2_idlen = 0;
87     int sm2_free = 0;
88
89     if ((vpm = X509_VERIFY_PARAM_new()) == NULL)
90         goto end;
91
92     prog = opt_init(argc, argv, verify_options);
93     while ((o = opt_next()) != OPT_EOF) {
94         switch (o) {
95         case OPT_EOF:
96         case OPT_ERR:
97             BIO_printf(bio_err, "%s: Use -help for summary.\n", prog);
98             goto end;
99         case OPT_HELP:
100             opt_help(verify_options);
101             BIO_printf(bio_err, "Recognized usages:\n");
102             for (i = 0; i < X509_PURPOSE_get_count(); i++) {
103                 X509_PURPOSE *ptmp;
104                 ptmp = X509_PURPOSE_get0(i);
105                 BIO_printf(bio_err, "\t%-10s\t%s\n",
106                         X509_PURPOSE_get0_sname(ptmp),
107                         X509_PURPOSE_get0_name(ptmp));
108             }
109
110             BIO_printf(bio_err, "Recognized verify names:\n");
111             for (i = 0; i < X509_VERIFY_PARAM_get_count(); i++) {
112                 const X509_VERIFY_PARAM *vptmp;
113                 vptmp = X509_VERIFY_PARAM_get0(i);
114                 BIO_printf(bio_err, "\t%-10s\n",
115                         X509_VERIFY_PARAM_get0_name(vptmp));
116             }
117             ret = 0;
118             goto end;
119         case OPT_V_CASES:
120             if (!opt_verify(o, vpm))
121                 goto end;
122             vpmtouched++;
123             break;
124         case OPT_CAPATH:
125             CApath = opt_arg();
126             break;
127         case OPT_CAFILE:
128             CAfile = opt_arg();
129             break;
130         case OPT_CASTORE:
131             CAstore = opt_arg();
132             break;
133         case OPT_NOCAPATH:
134             noCApath = 1;
135             break;
136         case OPT_NOCAFILE:
137             noCAfile = 1;
138             break;
139         case OPT_NOCASTORE:
140             noCAstore = 1;
141             break;
142         case OPT_UNTRUSTED:
143             /* Zero or more times */
144             if (!load_certs(opt_arg(), &untrusted, FORMAT_PEM, NULL,
145                             "untrusted certificates"))
146                 goto end;
147             break;
148         case OPT_TRUSTED:
149             /* Zero or more times */
150             noCAfile = 1;
151             noCApath = 1;
152             noCAstore = 1;
153             if (!load_certs(opt_arg(), &trusted, FORMAT_PEM, NULL,
154                             "trusted certificates"))
155                 goto end;
156             break;
157         case OPT_CRLFILE:
158             /* Zero or more times */
159             if (!load_crls(opt_arg(), &crls, FORMAT_PEM, NULL,
160                            "other CRLs"))
161                 goto end;
162             break;
163         case OPT_CRL_DOWNLOAD:
164             crl_download = 1;
165             break;
166         case OPT_ENGINE:
167             if ((e = setup_engine(opt_arg(), 0)) == NULL) {
168                 /* Failure message already displayed */
169                 goto end;
170             }
171             break;
172         case OPT_SHOW_CHAIN:
173             show_chain = 1;
174             break;
175         case OPT_NAMEOPT:
176             if (!set_nameopt(opt_arg()))
177                 goto end;
178             break;
179         case OPT_VERBOSE:
180             v_verbose = 1;
181             break;
182         case OPT_SM2ID:
183             if (sm2_id != NULL) {
184                 BIO_printf(bio_err,
185                            "Use one of the options 'sm2-hex-id' or 'sm2-id' \n");
186                 goto end;
187             }
188             sm2_id = (unsigned char *)opt_arg();
189             sm2_idlen = strlen((const char *)sm2_id);
190             break;
191         case OPT_SM2HEXID:
192             if (sm2_id != NULL) {
193                 BIO_printf(bio_err,
194                            "Use one of the options 'sm2-hex-id' or 'sm2-id' \n");
195                 goto end;
196             }
197             /* try to parse the input as hex string first */
198             sm2_free = 1;
199             sm2_id = OPENSSL_hexstr2buf(opt_arg(), (long *)&sm2_idlen);
200             if (sm2_id == NULL) {
201                 BIO_printf(bio_err, "Invalid hex string input\n");
202                 goto end;
203             }
204             break;
205         }
206     }
207     argc = opt_num_rest();
208     argv = opt_rest();
209     if (trusted != NULL
210         && (CAfile != NULL || CApath != NULL || CAstore != NULL)) {
211         BIO_printf(bio_err,
212                    "%s: Cannot use -trusted with -CAfile, -CApath or -CAstore\n",
213                    prog);
214         goto end;
215     }
216
217     if ((store = setup_verify(CAfile, noCAfile, CApath, noCApath,
218                               CAstore, noCAstore)) == NULL)
219         goto end;
220     X509_STORE_set_verify_cb(store, cb);
221
222     if (vpmtouched)
223         X509_STORE_set1_param(store, vpm);
224
225     ERR_clear_error();
226
227     if (crl_download)
228         store_setup_crl_download(store);
229
230     ret = 0;
231     if (argc < 1) {
232         if (check(store, NULL, untrusted, trusted, crls, show_chain,
233                   sm2_id, sm2_idlen) != 1)
234             ret = -1;
235     } else {
236         for (i = 0; i < argc; i++)
237             if (check(store, argv[i], untrusted, trusted, crls,
238                       show_chain, sm2_id, sm2_idlen) != 1)
239                 ret = -1;
240     }
241
242  end:
243     if (sm2_free)
244         OPENSSL_free(sm2_id);
245     X509_VERIFY_PARAM_free(vpm);
246     X509_STORE_free(store);
247     sk_X509_pop_free(untrusted, X509_free);
248     sk_X509_pop_free(trusted, X509_free);
249     sk_X509_CRL_pop_free(crls, X509_CRL_free);
250     release_engine(e);
251     return (ret < 0 ? 2 : ret);
252 }
253
254 static int check(X509_STORE *ctx, const char *file,
255                  STACK_OF(X509) *uchain, STACK_OF(X509) *tchain,
256                  STACK_OF(X509_CRL) *crls, int show_chain,
257                  unsigned char *sm2id, size_t sm2idlen)
258 {
259     X509 *x = NULL;
260     int i = 0, ret = 0;
261     X509_STORE_CTX *csc;
262     STACK_OF(X509) *chain = NULL;
263     int num_untrusted;
264
265     x = load_cert(file, FORMAT_PEM, "certificate file");
266     if (x == NULL)
267         goto end;
268
269     if (sm2id != NULL) {
270 #ifndef OPENSSL_NO_SM2
271         ASN1_OCTET_STRING *v;
272
273         v = ASN1_OCTET_STRING_new();
274         if (v == NULL) {
275             BIO_printf(bio_err, "error: SM2 ID allocation failed\n");
276             goto end;
277         }
278
279         if (!ASN1_OCTET_STRING_set(v, sm2id, sm2idlen)) {
280             BIO_printf(bio_err, "error: setting SM2 ID failed\n");
281             ASN1_OCTET_STRING_free(v);
282             goto end;
283         }
284
285         X509_set0_sm2_id(x, v);
286 #endif
287     }
288
289     csc = X509_STORE_CTX_new();
290     if (csc == NULL) {
291         BIO_printf(bio_err, "error %s: X.509 store context allocation failed\n",
292                    (file == NULL) ? "stdin" : file);
293         goto end;
294     }
295
296     X509_STORE_set_flags(ctx, vflags);
297     if (!X509_STORE_CTX_init(csc, ctx, x, uchain)) {
298         X509_STORE_CTX_free(csc);
299         BIO_printf(bio_err,
300                    "error %s: X.509 store context initialization failed\n",
301                    (file == NULL) ? "stdin" : file);
302         goto end;
303     }
304     if (tchain != NULL)
305         X509_STORE_CTX_set0_trusted_stack(csc, tchain);
306     if (crls != NULL)
307         X509_STORE_CTX_set0_crls(csc, crls);
308     i = X509_verify_cert(csc);
309     if (i > 0 && X509_STORE_CTX_get_error(csc) == X509_V_OK) {
310         BIO_printf(bio_out, "%s: OK\n", (file == NULL) ? "stdin" : file);
311         ret = 1;
312         if (show_chain) {
313             int j;
314
315             chain = X509_STORE_CTX_get1_chain(csc);
316             num_untrusted = X509_STORE_CTX_get_num_untrusted(csc);
317             BIO_printf(bio_out, "Chain:\n");
318             for (j = 0; j < sk_X509_num(chain); j++) {
319                 X509 *cert = sk_X509_value(chain, j);
320                 BIO_printf(bio_out, "depth=%d: ", j);
321                 X509_NAME_print_ex_fp(stdout,
322                                       X509_get_subject_name(cert),
323                                       0, get_nameopt());
324                 if (j < num_untrusted)
325                     BIO_printf(bio_out, " (untrusted)");
326                 BIO_printf(bio_out, "\n");
327             }
328             sk_X509_pop_free(chain, X509_free);
329         }
330     } else {
331         BIO_printf(bio_err,
332                    "error %s: verification failed\n",
333                    (file == NULL) ? "stdin" : file);
334     }
335     X509_STORE_CTX_free(csc);
336
337  end:
338     if (i <= 0)
339         ERR_print_errors(bio_err);
340     X509_free(x);
341
342     return ret;
343 }
344
345 static int cb(int ok, X509_STORE_CTX *ctx)
346 {
347     int cert_error = X509_STORE_CTX_get_error(ctx);
348     X509 *current_cert = X509_STORE_CTX_get_current_cert(ctx);
349
350     if (!ok) {
351         if (current_cert != NULL) {
352             X509_NAME_print_ex(bio_err,
353                             X509_get_subject_name(current_cert),
354                             0, get_nameopt());
355             BIO_printf(bio_err, "\n");
356         }
357         BIO_printf(bio_err, "%serror %d at %d depth lookup: %s\n",
358                X509_STORE_CTX_get0_parent_ctx(ctx) ? "[CRL path] " : "",
359                cert_error,
360                X509_STORE_CTX_get_error_depth(ctx),
361                X509_verify_cert_error_string(cert_error));
362
363         /*
364          * Pretend that some errors are ok, so they don't stop further
365          * processing of the certificate chain.  Setting ok = 1 does this.
366          * After X509_verify_cert() is done, we verify that there were
367          * no actual errors, even if the returned value was positive.
368          */
369         switch (cert_error) {
370         case X509_V_ERR_NO_EXPLICIT_POLICY:
371             policies_print(ctx);
372             /* fall thru */
373         case X509_V_ERR_CERT_HAS_EXPIRED:
374             /* Continue even if the leaf is a self signed cert */
375         case X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT:
376             /* Continue after extension errors too */
377         case X509_V_ERR_INVALID_CA:
378         case X509_V_ERR_INVALID_NON_CA:
379         case X509_V_ERR_PATH_LENGTH_EXCEEDED:
380         case X509_V_ERR_INVALID_PURPOSE:
381         case X509_V_ERR_CRL_HAS_EXPIRED:
382         case X509_V_ERR_CRL_NOT_YET_VALID:
383         case X509_V_ERR_UNHANDLED_CRITICAL_EXTENSION:
384             ok = 1;
385         }
386
387         return ok;
388
389     }
390     if (cert_error == X509_V_OK && ok == 2)
391         policies_print(ctx);
392     if (!v_verbose)
393         ERR_clear_error();
394     return ok;
395 }