1 /*
2 * Copyright 1995-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 #ifndef OSSL_E_OS_H
11 # define OSSL_E_OS_H
12
13 # include <limits.h>
14 # include <openssl/opensslconf.h>
15
16 # include <openssl/e_os2.h>
17 # include <openssl/crypto.h>
18 # include "internal/nelem.h"
19
20 /*
21 * <openssl/e_os2.h> contains what we can justify to make visible to the
22 * outside; this file e_os.h is not part of the exported interface.
23 */
24
25 # if defined(OPENSSL_SYS_VXWORKS) || defined(OPENSSL_SYS_UEFI)
26 # define NO_CHMOD
27 # define NO_SYSLOG
28 # endif
29
30 # define get_last_sys_error() errno
31 # define clear_sys_error() errno=0
32 # define set_sys_error(e) errno=(e)
33
34 /********************************************************************
35 The Microsoft section
36 ********************************************************************/
37 # if defined(OPENSSL_SYS_WIN32) && !defined(WIN32)
38 # define WIN32
39 # endif
40 # if defined(OPENSSL_SYS_WINDOWS) && !defined(WINDOWS)
41 # define WINDOWS
42 # endif
43 # if defined(OPENSSL_SYS_MSDOS) && !defined(MSDOS)
44 # define MSDOS
45 # endif
46
47 # ifdef WIN32
48 # undef get_last_sys_error
49 # undef clear_sys_error
50 # undef set_sys_error
51 # define get_last_sys_error() GetLastError()
52 # define clear_sys_error() SetLastError(0)
53 # define set_sys_error(e) SetLastError(e)
54 # if !defined(WINNT)
55 # define WIN_CONSOLE_BUG
56 # endif
57 # else
58 # endif
59
60 # if (defined(WINDOWS) || defined(MSDOS))
61
62 # ifdef __DJGPP__
63 # include <unistd.h>
64 # include <sys/stat.h>
65 # define _setmode setmode
66 # define _O_TEXT O_TEXT
67 # define _O_BINARY O_BINARY
68 # undef DEVRANDOM_EGD /* Neither MS-DOS nor FreeDOS provide 'egd' sockets. */
69 # undef DEVRANDOM
70 # define DEVRANDOM "/dev/urandom\x24"
71 # endif /* __DJGPP__ */
72
73 # ifndef S_IFDIR
74 # define S_IFDIR _S_IFDIR
75 # endif
76
77 # ifndef S_IFMT
78 # define S_IFMT _S_IFMT
79 # endif
80
81 # if !defined(WINNT) && !defined(__DJGPP__)
82 # define NO_SYSLOG
83 # endif
84
85 # ifdef WINDOWS
86 # if !defined(_WIN32_WCE) && !defined(_WIN32_WINNT)
87 /*
88 * Defining _WIN32_WINNT here in e_os.h implies certain "discipline."
89 * Most notably we ought to check for availability of each specific
90 * routine that was introduced after denoted _WIN32_WINNT with
91 * GetProcAddress(). Normally newer functions are masked with higher
92 * _WIN32_WINNT in SDK headers. So that if you wish to use them in
93 * some module, you'd need to override _WIN32_WINNT definition in
94 * the target module in order to "reach for" prototypes, but replace
95 * calls to new functions with indirect calls. Alternatively it
96 * might be possible to achieve the goal by /DELAYLOAD-ing .DLLs
97 * and check for current OS version instead.
98 */
99 # define _WIN32_WINNT 0x0501
100 # endif
101 # if defined(_WIN32_WINNT) || defined(_WIN32_WCE)
102 /*
103 * Just like defining _WIN32_WINNT including winsock2.h implies
104 * certain "discipline" for maintaining [broad] binary compatibility.
105 * As long as structures are invariant among Winsock versions,
106 * it's sufficient to check for specific Winsock2 API availability
107 * at run-time [DSO_global_lookup is recommended]...
108 */
109 # include <winsock2.h>
110 # include <ws2tcpip.h>
111 /*
112 * Clang-based C++Builder 10.3.3 toolchains cannot find C inline
113 * definitions at link-time. This header defines WspiapiLoad() as an
114 * __inline function. https://quality.embarcadero.com/browse/RSP-33806
115 */
116 # if !defined(__BORLANDC__) || !defined(__clang__)
117 # include <wspiapi.h>
118 # endif
119 /* yes, they have to be #included prior to <windows.h> */
120 # endif
121 # include <windows.h>
122 # include <stdio.h>
123 # include <stddef.h>
124 # include <errno.h>
125 # if defined(_WIN32_WCE) && !defined(EACCES)
126 # define EACCES 13
127 # endif
128 # include <string.h>
129 # ifdef _WIN64
130 # define strlen(s) _strlen31(s)
131 /* cut strings to 2GB */
_strlen31(const char * str)132 static __inline unsigned int _strlen31(const char *str)
133 {
134 unsigned int len = 0;
135 while (*str && len < 0x80000000U)
136 str++, len++;
137 return len & 0x7FFFFFFF;
138 }
139 # endif
140 # include <malloc.h>
141 # if defined(_MSC_VER) && !defined(_WIN32_WCE) && !defined(_DLL) && defined(stdin)
142 # if _MSC_VER>=1300 && _MSC_VER<1600
143 # undef stdin
144 # undef stdout
145 # undef stderr
146 FILE *__iob_func();
147 # define stdin (&__iob_func()[0])
148 # define stdout (&__iob_func()[1])
149 # define stderr (&__iob_func()[2])
150 # endif
151 # endif
152 # endif
153 # include <io.h>
154 # include <fcntl.h>
155
156 # ifdef OPENSSL_SYS_WINCE
157 # define OPENSSL_NO_POSIX_IO
158 # endif
159
160 # define EXIT(n) exit(n)
161 # define LIST_SEPARATOR_CHAR ';'
162 # ifndef W_OK
163 # define W_OK 2
164 # endif
165 # ifndef R_OK
166 # define R_OK 4
167 # endif
168 # ifdef OPENSSL_SYS_WINCE
169 # define DEFAULT_HOME ""
170 # else
171 # define DEFAULT_HOME "C:"
172 # endif
173
174 /* Avoid Visual Studio 13 GetVersion deprecated problems */
175 # if defined(_MSC_VER) && _MSC_VER>=1800
176 # define check_winnt() (1)
177 # define check_win_minplat(x) (1)
178 # else
179 # define check_winnt() (GetVersion() < 0x80000000)
180 # define check_win_minplat(x) (LOBYTE(LOWORD(GetVersion())) >= (x))
181 # endif
182
183 # else /* The non-microsoft world */
184
185 # if defined(OPENSSL_SYS_VXWORKS)
186 # include <time.h>
187 # else
188 # include <sys/time.h>
189 # endif
190
191 # ifdef OPENSSL_SYS_VMS
192 # define VMS 1
193 /*
194 * some programs don't include stdlib, so exit() and others give implicit
195 * function warnings
196 */
197 # include <stdlib.h>
198 # if defined(__DECC)
199 # include <unistd.h>
200 # else
201 # include <unixlib.h>
202 # endif
203 # define LIST_SEPARATOR_CHAR ','
204 /* We don't have any well-defined random devices on VMS, yet... */
205 # undef DEVRANDOM
206 /*-
207 We need to do this since VMS has the following coding on status codes:
208
209 Bits 0-2: status type: 0 = warning, 1 = success, 2 = error, 3 = info ...
210 The important thing to know is that odd numbers are considered
211 good, while even ones are considered errors.
212 Bits 3-15: actual status number
213 Bits 16-27: facility number. 0 is considered "unknown"
214 Bits 28-31: control bits. If bit 28 is set, the shell won't try to
215 output the message (which, for random codes, just looks ugly)
216
217 So, what we do here is to change 0 to 1 to get the default success status,
218 and everything else is shifted up to fit into the status number field, and
219 the status is tagged as an error, which is what is wanted here.
220
221 Finally, we add the VMS C facility code 0x35a000, because there are some
222 programs, such as Perl, that will reinterpret the code back to something
223 POSIX. 'man perlvms' explains it further.
224
225 NOTE: the perlvms manual wants to turn all codes 2 to 255 into success
226 codes (status type = 1). I couldn't disagree more. Fortunately, the
227 status type doesn't seem to bother Perl.
228 -- Richard Levitte
229 */
230 # define EXIT(n) exit((n) ? (((n) << 3) | 2 | 0x10000000 | 0x35a000) : 1)
231
232 # define DEFAULT_HOME "SYS$LOGIN:"
233
234 # else
235 /* !defined VMS */
236 # include <unistd.h>
237 # include <sys/types.h>
238 # ifdef OPENSSL_SYS_WIN32_CYGWIN
239 # include <io.h>
240 # include <fcntl.h>
241 # endif
242
243 # define LIST_SEPARATOR_CHAR ':'
244 # define EXIT(n) exit(n)
245 # endif
246
247 # endif
248
249 /***********************************************/
250
251 # if defined(OPENSSL_SYS_WINDOWS)
252 # if (_MSC_VER >= 1310) && !defined(_WIN32_WCE)
253 # define open _open
254 # define fdopen _fdopen
255 # define close _close
256 # ifndef strdup
257 # define strdup _strdup
258 # endif
259 # define unlink _unlink
260 # define fileno _fileno
261 # endif
262 # else
263 # include <strings.h>
264 # endif
265
266 /* vxworks */
267 # if defined(OPENSSL_SYS_VXWORKS)
268 # include <ioLib.h>
269 # include <tickLib.h>
270 # include <sysLib.h>
271 # include <vxWorks.h>
272 # include <sockLib.h>
273 # include <taskLib.h>
274
275 # define TTY_STRUCT int
276 # define sleep(a) taskDelay((a) * sysClkRateGet())
277
278 /*
279 * NOTE: these are implemented by helpers in database app! if the database is
280 * not linked, we need to implement them elsewhere
281 */
282 struct hostent *gethostbyname(const char *name);
283 struct hostent *gethostbyaddr(const char *addr, int length, int type);
284 struct servent *getservbyname(const char *name, const char *proto);
285
286 # endif
287 /* end vxworks */
288
289 /* system-specific variants defining ossl_sleep() */
290 #if defined(OPENSSL_SYS_UNIX) || defined(__DJGPP__)
291 # include <unistd.h>
ossl_sleep(unsigned long millis)292 static ossl_inline void ossl_sleep(unsigned long millis)
293 {
294 # ifdef OPENSSL_SYS_VXWORKS
295 struct timespec ts;
296 ts.tv_sec = (long int) (millis / 1000);
297 ts.tv_nsec = (long int) (millis % 1000) * 1000000ul;
298 nanosleep(&ts, NULL);
299 # elif defined(__TANDEM)
300 # if !defined(_REENTRANT)
301 # include <cextdecs.h(PROCESS_DELAY_)>
302 /* HPNS does not support usleep for non threaded apps */
303 PROCESS_DELAY_(millis * 1000);
304 # elif defined(_SPT_MODEL_)
305 # include <spthread.h>
306 # include <spt_extensions.h>
307 usleep(millis * 1000);
308 # else
309 usleep(millis * 1000);
310 # endif
311 # else
312 usleep(millis * 1000);
313 # endif
314 }
315 #elif defined(_WIN32)
316 # include <windows.h>
ossl_sleep(unsigned long millis)317 static ossl_inline void ossl_sleep(unsigned long millis)
318 {
319 Sleep(millis);
320 }
321 #else
322 /* Fallback to a busy wait */
ossl_sleep(unsigned long millis)323 static ossl_inline void ossl_sleep(unsigned long millis)
324 {
325 struct timeval start, now;
326 unsigned long elapsedms;
327
328 gettimeofday(&start, NULL);
329 do {
330 gettimeofday(&now, NULL);
331 elapsedms = (((now.tv_sec - start.tv_sec) * 1000000)
332 + now.tv_usec - start.tv_usec) / 1000;
333 } while (elapsedms < millis);
334 }
335 #endif /* defined OPENSSL_SYS_UNIX */
336
337 /* ----------------------------- HP NonStop -------------------------------- */
338 /* Required to support platform variant without getpid() and pid_t. */
339 # if defined(__TANDEM) && defined(_GUARDIAN_TARGET)
340 # include <strings.h>
341 # include <netdb.h>
342 # define getservbyname(name,proto) getservbyname((char*)name,proto)
343 # define gethostbyname(name) gethostbyname((char*)name)
344 # define ioctlsocket(a,b,c) ioctl(a,b,c)
345 # ifdef NO_GETPID
346 inline int nssgetpid();
347 # ifndef NSSGETPID_MACRO
348 # define NSSGETPID_MACRO
349 # include <cextdecs.h(PROCESSHANDLE_GETMINE_)>
350 # include <cextdecs.h(PROCESSHANDLE_DECOMPOSE_)>
nssgetpid()351 inline int nssgetpid()
352 {
353 short phandle[10]={0};
354 union pseudo_pid {
355 struct {
356 short cpu;
357 short pin;
358 } cpu_pin ;
359 int ppid;
360 } ppid = { 0 };
361 PROCESSHANDLE_GETMINE_(phandle);
362 PROCESSHANDLE_DECOMPOSE_(phandle, &ppid.cpu_pin.cpu, &ppid.cpu_pin.pin);
363 return ppid.ppid;
364 }
365 # define getpid(a) nssgetpid(a)
366 # endif /* NSSGETPID_MACRO */
367 # endif /* NO_GETPID */
368 /*# define setsockopt(a,b,c,d,f) setsockopt(a,b,c,(char*)d,f)*/
369 /*# define getsockopt(a,b,c,d,f) getsockopt(a,b,c,(char*)d,f)*/
370 /*# define connect(a,b,c) connect(a,(struct sockaddr *)b,c)*/
371 /*# define bind(a,b,c) bind(a,(struct sockaddr *)b,c)*/
372 /*# define sendto(a,b,c,d,e,f) sendto(a,(char*)b,c,d,(struct sockaddr *)e,f)*/
373 # if defined(OPENSSL_THREADS) && !defined(_PUT_MODEL_)
374 /*
375 * HPNS SPT threads
376 */
377 # define SPT_THREAD_SIGNAL 1
378 # define SPT_THREAD_AWARE 1
379 # include <spthread.h>
380 # undef close
381 # define close spt_close
382 /*
383 # define get_last_socket_error() errno
384 # define clear_socket_error() errno=0
385 # define ioctlsocket(a,b,c) ioctl(a,b,c)
386 # define closesocket(s) close(s)
387 # define readsocket(s,b,n) read((s),(char*)(b),(n))
388 # define writesocket(s,b,n) write((s),(char*)(b),(n)
389 */
390 # define accept(a,b,c) accept(a,(struct sockaddr *)b,c)
391 # define recvfrom(a,b,c,d,e,f) recvfrom(a,b,(socklen_t)c,d,e,f)
392 # endif
393 # endif
394
395 # ifdef FUZZING_BUILD_MODE_UNSAFE_FOR_PRODUCTION
396 # define CRYPTO_memcmp memcmp
397 # endif
398
399 # ifndef OPENSSL_NO_SECURE_MEMORY
400 /* unistd.h defines _POSIX_VERSION */
401 # if (defined(OPENSSL_SYS_UNIX) \
402 && ( (defined(_POSIX_VERSION) && _POSIX_VERSION >= 200112L) \
403 || defined(__sun) || defined(__hpux) || defined(__sgi) \
404 || defined(__osf__) )) \
405 || defined(_WIN32)
406 /* secure memory is implemented */
407 # else
408 # define OPENSSL_NO_SECURE_MEMORY
409 # endif
410 # endif
411
412 /*
413 * str[n]casecmp_l is defined in POSIX 2008-01. Value is taken accordingly
414 * https://www.gnu.org/software/libc/manual/html_node/Feature-Test-Macros.html
415 * There are also equivalent functions on Windows.
416 * There is no locale_t on NONSTOP.
417 */
418 # if defined(OPENSSL_SYS_WINDOWS)
419 # define locale_t _locale_t
420 # define freelocale _free_locale
421 # define strcasecmp_l _stricmp_l
422 # define strncasecmp_l _strnicmp_l
423 # define strcasecmp _stricmp
424 # define strncasecmp _strnicmp
425 # elif !defined(_POSIX_C_SOURCE) || _POSIX_C_SOURCE < 200809L \
426 || defined(OPENSSL_SYS_TANDEM)
427 # ifndef OPENSSL_NO_LOCALE
428 # define OPENSSL_NO_LOCALE
429 # endif
430 # endif
431
432 #endif
433