Add 'on demand self test' and status test to providers
[openssl.git] / apps / lib / app_provider.c
1 /*
2  * Copyright 2020 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 "apps.h"
11 #include <string.h>
12 #include <openssl/err.h>
13 #include <openssl/provider.h>
14 #include <openssl/safestack.h>
15
16 DEFINE_STACK_OF(OSSL_PROVIDER)
17
18 /*
19  * See comments in opt_verify for explanation of this.
20  */
21 enum prov_range { OPT_PROV_ENUM };
22
23 static STACK_OF(OSSL_PROVIDER) *app_providers = NULL;
24
25 static void provider_free(OSSL_PROVIDER *prov)
26 {
27     OSSL_PROVIDER_unload(prov);
28 }
29
30 int app_provider_load(OPENSSL_CTX *libctx, const char *provider_name)
31 {
32     OSSL_PROVIDER *prov;
33
34     prov = OSSL_PROVIDER_load(libctx, provider_name);
35     if (prov == NULL) {
36         opt_printf_stderr("%s: unable to load provider %s\n",
37                           opt_getprog(), provider_name);
38         return 0;
39     }
40     if (app_providers == NULL)
41         app_providers = sk_OSSL_PROVIDER_new_null();
42     if (app_providers == NULL
43         || !sk_OSSL_PROVIDER_push(app_providers, prov)) {
44         app_providers_cleanup();
45         return 0;
46     }
47     return 1;
48 }
49
50 void app_providers_cleanup(void)
51 {
52     sk_OSSL_PROVIDER_pop_free(app_providers, provider_free);
53     app_providers = NULL;
54 }
55
56 static int opt_provider_path(const char *path)
57 {
58     if (path != NULL && *path == '\0')
59         path = NULL;
60     return OSSL_PROVIDER_set_default_search_path(app_get0_libctx(), path);
61 }
62
63 int opt_provider(int opt)
64 {
65     switch ((enum prov_range)opt) {
66     case OPT_PROV__FIRST:
67     case OPT_PROV__LAST:
68         return 1;
69     case OPT_PROV_PROVIDER:
70         return app_provider_load(app_get0_libctx(), opt_arg());
71     case OPT_PROV_PROVIDER_PATH:
72         return opt_provider_path(opt_arg());
73     }
74     return 0;
75 }