]> git.ipfire.org Git - thirdparty/openssl.git/blob - crypto/info.c
Update copyright year
[thirdparty/openssl.git] / crypto / info.c
1 /*
2 * Copyright 2019-2022 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 <openssl/crypto.h>
11 #include "crypto/rand.h"
12 #include "crypto/dso_conf.h"
13 #include "internal/thread_once.h"
14 #include "internal/cryptlib.h"
15 #include "internal/e_os.h"
16 #include "buildinf.h"
17
18 #if defined(__arm__) || defined(__arm) || defined(__aarch64__)
19 # include "arm_arch.h"
20 # define CPU_INFO_STR_LEN 128
21 #elif defined(__s390__) || defined(__s390x__)
22 # include "s390x_arch.h"
23 # define CPU_INFO_STR_LEN 2048
24 #else
25 # define CPU_INFO_STR_LEN 128
26 #endif
27
28 /* extern declaration to avoid warning */
29 extern char ossl_cpu_info_str[];
30
31 static char *seed_sources = NULL;
32
33 char ossl_cpu_info_str[CPU_INFO_STR_LEN] = "";
34 #define CPUINFO_PREFIX "CPUINFO: "
35
36 static CRYPTO_ONCE init_info = CRYPTO_ONCE_STATIC_INIT;
37
38 DEFINE_RUN_ONCE_STATIC(init_info_strings)
39 {
40 #if defined(OPENSSL_CPUID_OBJ)
41 # if defined(__i386) || defined(__i386__) || defined(_M_IX86) || \
42 defined(__x86_64) || defined(__x86_64__) || \
43 defined(_M_AMD64) || defined(_M_X64)
44 const char *env;
45
46 BIO_snprintf(ossl_cpu_info_str, sizeof(ossl_cpu_info_str),
47 CPUINFO_PREFIX "OPENSSL_ia32cap=0x%llx:0x%llx",
48 (long long)OPENSSL_ia32cap_P[0] |
49 (long long)OPENSSL_ia32cap_P[1] << 32,
50 (long long)OPENSSL_ia32cap_P[2] |
51 (long long)OPENSSL_ia32cap_P[3] << 32);
52 if ((env = getenv("OPENSSL_ia32cap")) != NULL)
53 BIO_snprintf(ossl_cpu_info_str + strlen(ossl_cpu_info_str),
54 sizeof(ossl_cpu_info_str) - strlen(ossl_cpu_info_str),
55 " env:%s", env);
56 # elif defined(__arm__) || defined(__arm) || defined(__aarch64__)
57 const char *env;
58
59 BIO_snprintf(ossl_cpu_info_str, sizeof(ossl_cpu_info_str),
60 CPUINFO_PREFIX "OPENSSL_armcap=0x%x", OPENSSL_armcap_P);
61 if ((env = getenv("OPENSSL_armcap")) != NULL)
62 BIO_snprintf(ossl_cpu_info_str + strlen(ossl_cpu_info_str),
63 sizeof(ossl_cpu_info_str) - strlen(ossl_cpu_info_str),
64 " env:%s", env);
65 # elif defined(__s390__) || defined(__s390x__)
66 const char *env;
67
68 BIO_snprintf(ossl_cpu_info_str, sizeof(ossl_cpu_info_str),
69 CPUINFO_PREFIX "OPENSSL_s390xcap="
70 "stfle:0x%llx:0x%llx:0x%llx:0x%llx:"
71 "kimd:0x%llx:0x%llx:"
72 "klmd:0x%llx:0x%llx:"
73 "km:0x%llx:0x%llx:"
74 "kmc:0x%llx:0x%llx:"
75 "kmac:0x%llx:0x%llx:"
76 "kmctr:0x%llx:0x%llx:"
77 "kmo:0x%llx:0x%llx:"
78 "kmf:0x%llx:0x%llx:"
79 "prno:0x%llx:0x%llx:"
80 "kma:0x%llx:0x%llx:"
81 "pcc:0x%llx:0x%llx:"
82 "kdsa:0x%llx:0x%llx",
83 OPENSSL_s390xcap_P.stfle[0], OPENSSL_s390xcap_P.stfle[1],
84 OPENSSL_s390xcap_P.stfle[2], OPENSSL_s390xcap_P.stfle[3],
85 OPENSSL_s390xcap_P.kimd[0], OPENSSL_s390xcap_P.kimd[1],
86 OPENSSL_s390xcap_P.klmd[0], OPENSSL_s390xcap_P.klmd[1],
87 OPENSSL_s390xcap_P.km[0], OPENSSL_s390xcap_P.km[1],
88 OPENSSL_s390xcap_P.kmc[0], OPENSSL_s390xcap_P.kmc[1],
89 OPENSSL_s390xcap_P.kmac[0], OPENSSL_s390xcap_P.kmac[1],
90 OPENSSL_s390xcap_P.kmctr[0], OPENSSL_s390xcap_P.kmctr[1],
91 OPENSSL_s390xcap_P.kmo[0], OPENSSL_s390xcap_P.kmo[1],
92 OPENSSL_s390xcap_P.kmf[0], OPENSSL_s390xcap_P.kmf[1],
93 OPENSSL_s390xcap_P.prno[0], OPENSSL_s390xcap_P.prno[1],
94 OPENSSL_s390xcap_P.kma[0], OPENSSL_s390xcap_P.kma[1],
95 OPENSSL_s390xcap_P.pcc[0], OPENSSL_s390xcap_P.pcc[1],
96 OPENSSL_s390xcap_P.kdsa[0], OPENSSL_s390xcap_P.kdsa[1]);
97 if ((env = getenv("OPENSSL_s390xcap")) != NULL)
98 BIO_snprintf(ossl_cpu_info_str + strlen(ossl_cpu_info_str),
99 sizeof(ossl_cpu_info_str) - strlen(ossl_cpu_info_str),
100 " env:%s", env);
101 # endif
102 #endif
103
104 {
105 static char seeds[512] = "";
106
107 #define add_seeds_string(str) \
108 do { \
109 if (seeds[0] != '\0') \
110 OPENSSL_strlcat(seeds, " ", sizeof(seeds)); \
111 OPENSSL_strlcat(seeds, str, sizeof(seeds)); \
112 } while (0)
113 #define add_seeds_stringlist(label, strlist) \
114 do { \
115 add_seeds_string(label "("); \
116 { \
117 const char *dev[] = { strlist, NULL }; \
118 const char **p; \
119 int first = 1; \
120 \
121 for (p = dev; *p != NULL; p++) { \
122 if (!first) \
123 OPENSSL_strlcat(seeds, " ", sizeof(seeds)); \
124 first = 0; \
125 OPENSSL_strlcat(seeds, *p, sizeof(seeds)); \
126 } \
127 } \
128 OPENSSL_strlcat(seeds, ")", sizeof(seeds)); \
129 } while (0)
130
131 #ifdef OPENSSL_RAND_SEED_NONE
132 add_seeds_string("none");
133 #endif
134 #ifdef OPENSSL_RAND_SEED_RTDSC
135 add_seeds_string("stdsc");
136 #endif
137 #ifdef OPENSSL_RAND_SEED_RDCPU
138 # ifdef __aarch64__
139 add_seeds_string("rndr ( rndrrs rndr )");
140 # else
141 add_seeds_string("rdrand ( rdseed rdrand )");
142 # endif
143 #endif
144 #ifdef OPENSSL_RAND_SEED_LIBRANDOM
145 add_seeds_string("C-library-random");
146 #endif
147 #ifdef OPENSSL_RAND_SEED_GETRANDOM
148 add_seeds_string("getrandom-syscall");
149 #endif
150 #ifdef OPENSSL_RAND_SEED_DEVRANDOM
151 add_seeds_stringlist("random-device", DEVRANDOM);
152 #endif
153 #ifdef OPENSSL_RAND_SEED_EGD
154 add_seeds_stringlist("EGD", DEVRANDOM_EGD);
155 #endif
156 #ifdef OPENSSL_RAND_SEED_OS
157 add_seeds_string("os-specific");
158 #endif
159 seed_sources = seeds;
160 }
161 return 1;
162 }
163
164 const char *OPENSSL_info(int t)
165 {
166 /*
167 * We don't care about the result. Worst case scenario, the strings
168 * won't be initialised, i.e. remain NULL, which means that the info
169 * isn't available anyway...
170 */
171 (void)RUN_ONCE(&init_info, init_info_strings);
172
173 switch (t) {
174 case OPENSSL_INFO_CONFIG_DIR:
175 return OPENSSLDIR;
176 case OPENSSL_INFO_ENGINES_DIR:
177 return ENGINESDIR;
178 case OPENSSL_INFO_MODULES_DIR:
179 return MODULESDIR;
180 case OPENSSL_INFO_DSO_EXTENSION:
181 return DSO_EXTENSION;
182 case OPENSSL_INFO_DIR_FILENAME_SEPARATOR:
183 #if defined(_WIN32)
184 return "\\";
185 #elif defined(__VMS)
186 return "";
187 #else /* Assume POSIX */
188 return "/";
189 #endif
190 case OPENSSL_INFO_LIST_SEPARATOR:
191 {
192 static const char list_sep[] = { LIST_SEPARATOR_CHAR, '\0' };
193 return list_sep;
194 }
195 case OPENSSL_INFO_SEED_SOURCE:
196 return seed_sources;
197 case OPENSSL_INFO_CPU_SETTINGS:
198 /*
199 * If successfully initialized, ossl_cpu_info_str will start
200 * with CPUINFO_PREFIX, if failed it will be an empty string.
201 * Strip away the CPUINFO_PREFIX which we don't need here.
202 */
203 if (ossl_cpu_info_str[0] != '\0')
204 return ossl_cpu_info_str + strlen(CPUINFO_PREFIX);
205 break;
206 default:
207 break;
208 }
209 /* Not an error */
210 return NULL;
211 }