1/* apps/verify.c */
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#include "apps.h"
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>
68
69#undef PROG
70#define PROG    verify_main
71
72static int MS_CALLBACK cb(int ok, X509_STORE_CTX *ctx);
73static int check(X509_STORE *ctx, char *file,
74                 STACK_OF(X509) *uchain, STACK_OF(X509) *tchain,
75                 STACK_OF(X509_CRL) *crls, ENGINE *e);
76static int v_verbose = 0, vflags = 0;
77
78int MAIN(int, char **);
79
80int MAIN(int argc, char **argv)
81{
82    ENGINE *e = NULL;
83    int i, ret = 1, badarg = 0;
84    char *CApath = NULL, *CAfile = NULL;
85    char *untfile = NULL, *trustfile = NULL, *crlfile = NULL;
86    STACK_OF(X509) *untrusted = NULL, *trusted = NULL;
87    STACK_OF(X509_CRL) *crls = NULL;
88    X509_STORE *cert_ctx = NULL;
89    X509_LOOKUP *lookup = NULL;
90    X509_VERIFY_PARAM *vpm = NULL;
91    int crl_download = 0;
92#ifndef OPENSSL_NO_ENGINE
93    char *engine = NULL;
94#endif
95
96    cert_ctx = X509_STORE_new();
97    if (cert_ctx == NULL)
98        goto end;
99    X509_STORE_set_verify_cb(cert_ctx, cb);
100
101    ERR_load_crypto_strings();
102
103    apps_startup();
104
105    if (bio_err == NULL)
106        if ((bio_err = BIO_new(BIO_s_file())) != NULL)
107            BIO_set_fp(bio_err, stderr, BIO_NOCLOSE | BIO_FP_TEXT);
108
109    if (!load_config(bio_err, NULL))
110        goto end;
111
112    argc--;
113    argv++;
114    for (;;) {
115        if (argc >= 1) {
116            if (strcmp(*argv, "-CApath") == 0) {
117                if (argc-- < 1)
118                    goto end;
119                CApath = *(++argv);
120            } else if (strcmp(*argv, "-CAfile") == 0) {
121                if (argc-- < 1)
122                    goto end;
123                CAfile = *(++argv);
124            } else if (args_verify(&argv, &argc, &badarg, bio_err, &vpm)) {
125                if (badarg)
126                    goto end;
127                continue;
128            } else if (strcmp(*argv, "-untrusted") == 0) {
129                if (argc-- < 1)
130                    goto end;
131                untfile = *(++argv);
132            } else if (strcmp(*argv, "-trusted") == 0) {
133                if (argc-- < 1)
134                    goto end;
135                trustfile = *(++argv);
136            } else if (strcmp(*argv, "-CRLfile") == 0) {
137                if (argc-- < 1)
138                    goto end;
139                crlfile = *(++argv);
140            } else if (strcmp(*argv, "-crl_download") == 0)
141                crl_download = 1;
142#ifndef OPENSSL_NO_ENGINE
143            else if (strcmp(*argv, "-engine") == 0) {
144                if (--argc < 1)
145                    goto end;
146                engine = *(++argv);
147            }
148#endif
149            else if (strcmp(*argv, "-help") == 0)
150                goto end;
151            else if (strcmp(*argv, "-verbose") == 0)
152                v_verbose = 1;
153            else if (argv[0][0] == '-')
154                goto end;
155            else
156                break;
157            argc--;
158            argv++;
159        } else
160            break;
161    }
162
163#ifndef OPENSSL_NO_ENGINE
164    e = setup_engine(bio_err, engine, 0);
165#endif
166
167    if (vpm)
168        X509_STORE_set1_param(cert_ctx, vpm);
169
170    lookup = X509_STORE_add_lookup(cert_ctx, X509_LOOKUP_file());
171    if (lookup == NULL)
172        abort();
173    if (CAfile) {
174        i = X509_LOOKUP_load_file(lookup, CAfile, X509_FILETYPE_PEM);
175        if (!i) {
176            BIO_printf(bio_err, "Error loading file %s\n", CAfile);
177            ERR_print_errors(bio_err);
178            goto end;
179        }
180    } else
181        X509_LOOKUP_load_file(lookup, NULL, X509_FILETYPE_DEFAULT);
182
183    lookup = X509_STORE_add_lookup(cert_ctx, X509_LOOKUP_hash_dir());
184    if (lookup == NULL)
185        abort();
186    if (CApath) {
187        i = X509_LOOKUP_add_dir(lookup, CApath, X509_FILETYPE_PEM);
188        if (!i) {
189            BIO_printf(bio_err, "Error loading directory %s\n", CApath);
190            ERR_print_errors(bio_err);
191            goto end;
192        }
193    } else
194        X509_LOOKUP_add_dir(lookup, NULL, X509_FILETYPE_DEFAULT);
195
196    ERR_clear_error();
197
198    if (untfile) {
199        untrusted = load_certs(bio_err, untfile, FORMAT_PEM,
200                               NULL, e, "untrusted certificates");
201        if (!untrusted)
202            goto end;
203    }
204
205    if (trustfile) {
206        trusted = load_certs(bio_err, trustfile, FORMAT_PEM,
207                             NULL, e, "trusted certificates");
208        if (!trusted)
209            goto end;
210    }
211
212    if (crlfile) {
213        crls = load_crls(bio_err, crlfile, FORMAT_PEM, NULL, e, "other CRLs");
214        if (!crls)
215            goto end;
216    }
217
218    ret = 0;
219
220    if (crl_download)
221        store_setup_crl_download(cert_ctx);
222    if (argc < 1) {
223        if (1 != check(cert_ctx, NULL, untrusted, trusted, crls, e))
224            ret = -1;
225    } else {
226        for (i = 0; i < argc; i++)
227            if (1 != check(cert_ctx, argv[i], untrusted, trusted, crls, e))
228                ret = -1;
229    }
230
231 end:
232    if (ret == 1) {
233        BIO_printf(bio_err,
234                   "usage: verify [-verbose] [-CApath path] [-CAfile file] [-purpose purpose] [-crl_check]");
235        BIO_printf(bio_err, " [-no_alt_chains] [-attime timestamp]");
236#ifndef OPENSSL_NO_ENGINE
237        BIO_printf(bio_err, " [-engine e]");
238#endif
239        BIO_printf(bio_err, " cert1 cert2 ...\n");
240
241        BIO_printf(bio_err, "recognized usages:\n");
242        for (i = 0; i < X509_PURPOSE_get_count(); i++) {
243            X509_PURPOSE *ptmp;
244            ptmp = X509_PURPOSE_get0(i);
245            BIO_printf(bio_err, "\t%-10s\t%s\n",
246                       X509_PURPOSE_get0_sname(ptmp),
247                       X509_PURPOSE_get0_name(ptmp));
248        }
249    }
250    if (vpm)
251        X509_VERIFY_PARAM_free(vpm);
252    if (cert_ctx != NULL)
253        X509_STORE_free(cert_ctx);
254    sk_X509_pop_free(untrusted, X509_free);
255    sk_X509_pop_free(trusted, X509_free);
256    sk_X509_CRL_pop_free(crls, X509_CRL_free);
257    apps_shutdown();
258    OPENSSL_EXIT(ret < 0 ? 2 : ret);
259}
260
261static int check(X509_STORE *ctx, char *file,
262                 STACK_OF(X509) *uchain, STACK_OF(X509) *tchain,
263                 STACK_OF(X509_CRL) *crls, ENGINE *e)
264{
265    X509 *x = NULL;
266    int i = 0, ret = 0;
267    X509_STORE_CTX *csc;
268
269    x = load_cert(bio_err, file, FORMAT_PEM, NULL, e, "certificate file");
270    if (x == NULL)
271        goto end;
272    fprintf(stdout, "%s: ", (file == NULL) ? "stdin" : file);
273
274    csc = X509_STORE_CTX_new();
275    if (csc == NULL) {
276        ERR_print_errors(bio_err);
277        goto end;
278    }
279    X509_STORE_set_flags(ctx, vflags);
280    if (!X509_STORE_CTX_init(csc, ctx, x, uchain)) {
281        ERR_print_errors(bio_err);
282        goto end;
283    }
284    if (tchain)
285        X509_STORE_CTX_trusted_stack(csc, tchain);
286    if (crls)
287        X509_STORE_CTX_set0_crls(csc, crls);
288    i = X509_verify_cert(csc);
289    X509_STORE_CTX_free(csc);
290
291    ret = 0;
292 end:
293    if (i > 0) {
294        fprintf(stdout, "OK\n");
295        ret = 1;
296    } else
297        ERR_print_errors(bio_err);
298    if (x != NULL)
299        X509_free(x);
300
301    return (ret);
302}
303
304static int MS_CALLBACK cb(int ok, X509_STORE_CTX *ctx)
305{
306    int cert_error = X509_STORE_CTX_get_error(ctx);
307    X509 *current_cert = X509_STORE_CTX_get_current_cert(ctx);
308
309    if (!ok) {
310        if (current_cert) {
311            X509_NAME_print_ex_fp(stdout,
312                                  X509_get_subject_name(current_cert),
313                                  0, XN_FLAG_ONELINE);
314            printf("\n");
315        }
316        printf("%serror %d at %d depth lookup:%s\n",
317               X509_STORE_CTX_get0_parent_ctx(ctx) ? "[CRL path]" : "",
318               cert_error,
319               X509_STORE_CTX_get_error_depth(ctx),
320               X509_verify_cert_error_string(cert_error));
321        switch (cert_error) {
322        case X509_V_ERR_NO_EXPLICIT_POLICY:
323            policies_print(NULL, ctx);
324        case X509_V_ERR_CERT_HAS_EXPIRED:
325
326            /*
327             * since we are just checking the certificates, it is ok if they
328             * are self signed. But we should still warn the user.
329             */
330
331        case X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT:
332            /* Continue after extension errors too */
333        case X509_V_ERR_INVALID_CA:
334        case X509_V_ERR_INVALID_NON_CA:
335        case X509_V_ERR_PATH_LENGTH_EXCEEDED:
336        case X509_V_ERR_INVALID_PURPOSE:
337        case X509_V_ERR_CRL_HAS_EXPIRED:
338        case X509_V_ERR_CRL_NOT_YET_VALID:
339        case X509_V_ERR_UNHANDLED_CRITICAL_EXTENSION:
340            ok = 1;
341
342        }
343
344        return ok;
345
346    }
347    if (cert_error == X509_V_OK && ok == 2)
348        policies_print(NULL, ctx);
349    if (!v_verbose)
350        ERR_clear_error();
351    return (ok);
352}
353