2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
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.
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).
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.
23 * Redistribution and use in source and binary forms, with or without
24 * modification, are permitted provided that the following conditions
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)"
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
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.]
60 # define HEADER_E_OS_H
62 # include <openssl/opensslconf.h>
64 # include <openssl/e_os2.h>
66 * <openssl/e_os2.h> contains what we can justify to make visible to the
67 * outside; this file e_os.h is not part of the exported interface.
74 /* Used to checking reference counts, most while doing perl5 stuff :-) */
77 # define REF_PRINT(a,b) fprintf(stderr,"%08X:%4d:%s\n",(int)b,b->references,a)
79 # if defined(OPENSSL_NO_STDIO) && defined(REF_CHECK)
80 # error "Cannot have REF_CHECK with no-stdio"
82 # if defined(OPENSSL_NO_STDIO) && defined(REF_PRINT)
83 # error "Cannot have REF_PRINT with no-stdio"
88 * set this to a comma-separated list of 'random' device files to try out. My
89 * default, we will try to read at least one of these files
91 # define DEVRANDOM "/dev/urandom","/dev/random","/dev/srandom"
93 # if !defined(OPENSSL_NO_EGD) && !defined(DEVRANDOM_EGD)
95 * set this to a comma-separated list of 'egd' sockets to try out. These
96 * sockets will be tried in the order listed in case accessing the device
97 * files listed in DEVRANDOM did not return enough entropy.
99 # define DEVRANDOM_EGD "/var/run/egd-pool","/dev/egd-pool","/etc/egd-pool","/etc/entropy"
102 # if defined(OPENSSL_SYS_VXWORKS)
103 # define NO_SYS_PARAM_H
108 /********************************************************************
109 The Microsoft section
110 ********************************************************************/
111 # if defined(OPENSSL_SYS_WIN32) && !defined(WIN32)
114 # if defined(OPENSSL_SYS_WINDOWS) && !defined(WINDOWS)
117 # if defined(OPENSSL_SYS_MSDOS) && !defined(MSDOS)
121 # if (defined(MSDOS) || defined(OPENSSL_SYS_UEFI)) && !defined(GETPID_IS_MEANINGLESS)
122 # define GETPID_IS_MEANINGLESS
127 # define get_last_sys_error() GetLastError()
128 # define clear_sys_error() SetLastError(0)
130 # define WIN_CONSOLE_BUG
133 # define get_last_sys_error() errno
134 # define clear_sys_error() errno=0
137 # if defined(WINDOWS)
138 # define get_last_socket_error() WSAGetLastError()
139 # define clear_socket_error() WSASetLastError(0)
140 # define readsocket(s,b,n) recv((s),(b),(n),0)
141 # define writesocket(s,b,n) send((s),(b),(n),0)
142 # elif defined(__DJGPP__)
144 # define get_last_socket_error() errno
145 # define clear_socket_error() errno=0
146 # define closesocket(s) close_s(s)
147 # define readsocket(s,b,n) read_s(s,b,n)
148 # define writesocket(s,b,n) send(s,b,n,0)
149 # elif defined(OPENSSL_SYS_VMS)
150 # define get_last_socket_error() errno
151 # define clear_socket_error() errno=0
152 # define ioctlsocket(a,b,c) ioctl(a,b,c)
153 # define closesocket(s) close(s)
154 # define readsocket(s,b,n) recv((s),(b),(n),0)
155 # define writesocket(s,b,n) send((s),(b),(n),0)
156 # elif defined(OPENSSL_SYS_VXWORKS)
157 # define get_last_socket_error() errno
158 # define clear_socket_error() errno=0
159 # define ioctlsocket(a,b,c) ioctl((a),(b),(int)(c))
160 # define closesocket(s) close(s)
161 # define readsocket(s,b,n) read((s),(b),(n))
162 # define writesocket(s,b,n) write((s),(char *)(b),(n))
163 # elif defined(OPENSSL_SYS_NETWARE)
164 # if defined(NETWARE_BSDSOCK)
165 # define get_last_socket_error() errno
166 # define clear_socket_error() errno=0
167 # define closesocket(s) close(s)
168 # define ioctlsocket(a,b,c) ioctl(a,b,c)
169 # if defined(NETWARE_LIBC)
170 # define readsocket(s,b,n) recv((s),(b),(n),0)
171 # define writesocket(s,b,n) send((s),(b),(n),0)
173 # define readsocket(s,b,n) recv((s),(char*)(b),(n),0)
174 # define writesocket(s,b,n) send((s),(char*)(b),(n),0)
177 # define get_last_socket_error() WSAGetLastError()
178 # define clear_socket_error() WSASetLastError(0)
179 # define readsocket(s,b,n) recv((s),(b),(n),0)
180 # define writesocket(s,b,n) send((s),(b),(n),0)
183 # define get_last_socket_error() errno
184 # define clear_socket_error() errno=0
185 # define ioctlsocket(a,b,c) ioctl(a,b,c)
186 # define closesocket(s) close(s)
187 # define readsocket(s,b,n) read((s),(b),(n))
188 # define writesocket(s,b,n) write((s),(b),(n))
191 # if (defined(WINDOWS) || defined(MSDOS))
195 # include <sys/stat.h>
196 # include <sys/socket.h>
199 # define _setmode setmode
200 # define _O_TEXT O_TEXT
201 # define _O_BINARY O_BINARY
203 # define DEVRANDOM "/dev/urandom\x24"
204 # endif /* __DJGPP__ */
207 # define S_IFDIR _S_IFDIR
211 # define S_IFMT _S_IFMT
214 # if !defined(WINNT) && !defined(__DJGPP__)
220 # if !defined(_WIN32_WCE) && !defined(_WIN32_WINNT)
222 * Defining _WIN32_WINNT here in e_os.h implies certain "discipline."
223 * Most notably we ought to check for availability of each specific
224 * routine that was introduced after denoted _WIN32_WINNT with
225 * GetProcAddress(). Normally newer functions are masked with higher
226 * _WIN32_WINNT in SDK headers. So that if you wish to use them in
227 * some module, you'd need to override _WIN32_WINNT definition in
228 * the target module in order to "reach for" prototypes, but replace
229 * calls to new functions with indirect calls. Alternatively it
230 * might be possible to achieve the goal by /DELAYLOAD-ing .DLLs
231 * and check for current OS version instead.
233 # define _WIN32_WINNT 0x0501
235 # if !defined(OPENSSL_NO_SOCK) && (defined(_WIN32_WINNT) || defined(_WIN32_WCE))
237 * Just like defining _WIN32_WINNT including winsock2.h implies
238 * certain "discipline" for maintaining [broad] binary compatibility.
239 * As long as structures are invariant among Winsock versions,
240 * it's sufficient to check for specific Winsock2 API availability
241 * at run-time [DSO_global_lookup is recommended]...
243 # include <winsock2.h>
244 # include <ws2tcpip.h>
245 /* yes, they have to be #included prior to <windows.h> */
247 # include <windows.h>
251 # if defined(_WIN32_WCE) && !defined(EACCES)
256 # define strlen(s) _strlen31(s)
257 /* cut strings to 2GB */
258 static __inline unsigned int _strlen31(const char *str)
260 unsigned int len = 0;
261 while (*str && len < 0x80000000U)
263 return len & 0x7FFFFFFF;
267 # if defined(_MSC_VER) && _MSC_VER<=1200 && defined(_MT) && defined(isspace)
268 /* compensate for bug in VC6 ctype.h */
275 # if defined(_MSC_VER) && !defined(_WIN32_WCE) && !defined(_DLL) && defined(stdin)
276 # if _MSC_VER>=1300 && _MSC_VER<1600
281 # define stdin (&__iob_func()[0])
282 # define stdout (&__iob_func()[1])
283 # define stderr (&__iob_func()[2])
284 # elif _MSC_VER<1300 && defined(I_CAN_LIVE_WITH_LNK4049)
289 * pre-1300 has __p__iob(), but it's available only in msvcrt.lib,
290 * or in other words with /MD. Declaring implicit import, i.e. with
291 * _imp_ prefix, works correctly with all compiler options, but
292 * without /MD results in LINK warning LNK4049: 'locally defined
293 * symbol "__iob" imported'.
295 extern FILE *_imp___iob;
296 # define stdin (&_imp___iob[0])
297 # define stdout (&_imp___iob[1])
298 # define stderr (&_imp___iob[2])
305 # ifdef OPENSSL_SYS_WINCE
306 # define OPENSSL_NO_POSIX_IO
309 # if defined (__BORLANDC__)
310 # define _setmode setmode
311 # define _O_TEXT O_TEXT
312 # define _O_BINARY O_BINARY
313 # define _int64 __int64
314 # define _kbhit kbhit
317 # define EXIT(n) exit(n)
318 # define LIST_SEPARATOR_CHAR ';'
328 # define OPENSSL_CONF "openssl.cnf"
329 # define NUL_DEV "nul"
330 # define RFILE ".rnd"
331 # ifdef OPENSSL_SYS_WINCE
332 # define DEFAULT_HOME ""
334 # define DEFAULT_HOME "C:"
337 /* Avoid Visual Studio 13 GetVersion deprecated problems */
338 # if defined(_MSC_VER) && _MSC_VER>=1800
339 # define check_winnt() (1)
340 # define check_win_minplat(x) (1)
342 # define check_winnt() (GetVersion() < 0x80000000)
343 # define check_win_minplat(x) (LOBYTE(LOWORD(GetVersion())) >= (x))
346 # else /* The non-microsoft world */
348 # ifdef OPENSSL_SYS_VMS
351 * some programs don't include stdlib, so exit() and others give implicit
358 # include <unixlib.h>
360 # define OPENSSL_CONF "openssl.cnf"
361 # define RFILE ".rnd"
362 # define LIST_SEPARATOR_CHAR ','
363 # define NUL_DEV "NLA0:"
364 /* We don't have any well-defined random devices on VMS, yet... */
367 We need to do this since VMS has the following coding on status codes:
369 Bits 0-2: status type: 0 = warning, 1 = success, 2 = error, 3 = info ...
370 The important thing to know is that odd numbers are considered
371 good, while even ones are considered errors.
372 Bits 3-15: actual status number
373 Bits 16-27: facility number. 0 is considered "unknown"
374 Bits 28-31: control bits. If bit 28 is set, the shell won't try to
375 output the message (which, for random codes, just looks ugly)
377 So, what we do here is to change 0 to 1 to get the default success status,
378 and everything else is shifted up to fit into the status number field, and
379 the status is tagged as an error, which is what is wanted here.
381 Finally, we add the VMS C facility code 0x35a000, because there are some
382 programs, such as Perl, that will reinterpret the code back to something
383 POSIXly. 'man perlvms' explains it further.
385 NOTE: the perlvms manual wants to turn all codes 2 to 255 into success
386 codes (status type = 1). I couldn't disagree more. Fortunately, the
387 status type doesn't seem to bother Perl.
390 # define EXIT(n) exit((n) ? (((n) << 3) | 2 | 0x10000000 | 0x35a000) : 1)
392 # define NO_SYS_PARAM_H
395 # elif defined(OPENSSL_SYS_NETWARE)
398 # define NO_SYS_TYPES_H
401 # define getpid GetThreadID
402 extern int GetThreadID(void);
403 /* # include <conio.h> */
404 extern int kbhit(void);
409 # define _setmode setmode
410 # define _kbhit kbhit
411 # define _O_TEXT O_TEXT
412 # define _O_BINARY O_BINARY
413 # define OPENSSL_CONF "openssl.cnf"
414 # define RFILE ".rnd"
415 # define LIST_SEPARATOR_CHAR ';'
416 # define EXIT(n) { if (n) printf("ERROR: %d\n", (int)n); exit(n); }
420 # ifdef OPENSSL_UNISTD
421 # include OPENSSL_UNISTD
425 # ifndef NO_SYS_TYPES_H
426 # include <sys/types.h>
428 # ifdef OPENSSL_SYS_WIN32_CYGWIN
433 # define OPENSSL_CONF "openssl.cnf"
434 # define RFILE ".rnd"
435 # define LIST_SEPARATOR_CHAR ':'
436 # define NUL_DEV "/dev/null"
437 # define EXIT(n) exit(n)
440 # define OpenSSL_getpid() getpid()
446 # if defined(OPENSSL_NO_SOCK) && !defined(OPENSSL_NO_DGRAM)
447 # define OPENSSL_NO_DGRAM
451 # if defined(WINDOWS) || defined(MSDOS)
454 # ifdef OPENSSL_NO_SOCK
455 # define OpenSSL_Write(a,b,c) (-1)
456 # define OpenSSL_Read(a,b,c) (-1)
457 # define SHUTDOWN(fd) close(fd)
458 # define SHUTDOWN2(fd) close(fd)
459 # elif !defined(__DJGPP__)
460 # if defined(_WIN32_WCE) && _WIN32_WCE<410
461 # define getservbyname _masked_declaration_getservbyname
463 # if !defined(IPPROTO_IP)
464 /* winsock[2].h was included already? */
465 # include <winsock.h>
467 # ifdef getservbyname
468 # undef getservbyname
469 /* this is used to be wcecompat/include/winsock_extras.h */
470 struct servent *PASCAL getservbyname(const char *, const char *);
475 * Even though sizeof(SOCKET) is 8, it's safe to cast it to int, because
476 * the value constitutes an index in per-process table of limited size
477 * and not a real pointer. And we also depend on fact that all processors
478 * Windows run on happen to be two's-complement, which allows to
479 * interchange INVALID_SOCKET and -1.
481 # define socket(d,t,p) ((int)socket(d,t,p))
482 # define accept(s,f,l) ((int)accept(s,f,l))
484 # define OpenSSL_Write(a,b,c) send((a),(b),(c),0)
485 # define OpenSSL_Read(a,b,c) recv((a),(b),(c),0)
486 # define SHUTDOWN(fd) { shutdown((fd),0); closesocket(fd); }
487 # define SHUTDOWN2(fd) { shutdown((fd),2); closesocket(fd); }
489 # define OpenSSL_Write(a,b,c) write_s(a,b,c,0)
490 # define OpenSSL_Read(a,b,c) read_s(a,b,c)
491 # define SHUTDOWN(fd) close_s(fd)
492 # define SHUTDOWN2(fd) close_s(fd)
495 # elif defined(OPENSSL_SYS_NETWARE)
497 * NetWare uses the WinSock2 interfaces by default, but can be
500 # if defined(NETWARE_BSDSOCK)
501 # include <sys/socket.h>
502 # include <netinet/in.h>
503 # include <sys/time.h>
504 # if defined(NETWARE_CLIB)
505 # include <sys/bsdskt.h>
507 # include <sys/select.h>
509 # define INVALID_SOCKET (int)(~0)
511 # include <novsock2.h>
513 # define OpenSSL_Write(a,b,c) send((a),(b),(c),0)
514 # define OpenSSL_Read(a,b,c) recv((a),(b),(c),0)
515 # define SHUTDOWN(fd) { shutdown((fd),0); closesocket(fd); }
516 # define SHUTDOWN2(fd) { shutdown((fd),2); closesocket(fd); }
520 # ifndef NO_SYS_PARAM_H
521 # include <sys/param.h>
523 # ifdef OPENSSL_SYS_VXWORKS
528 # if defined(OPENSSL_SYS_VMS_NODECC)
533 # include <sys/socket.h>
535 # ifdef OPENSSL_SYS_VXWORKS
536 # include <streams/un.h>
540 # ifndef UNIX_PATH_MAX
541 # define UNIX_PATH_MAX sizeof(((struct sockaddr_un *)NULL)->sun_path)
545 # include <sys/filio.h> /* FIONBIO in some SVR4, e.g. unixware, solaris */
547 # include <netinet/in.h>
548 # include <arpa/inet.h>
551 # ifdef OPENSSL_SYS_AIX
552 # include <sys/select.h>
556 # include <sys/select.h>
560 # include <sys/ioctl.h>
562 /* ioctl is only in VMS > 7.0 and when socketshr is not used */
563 # if !defined(TCPIP_TYPE_SOCKETSHR) && defined(__VMS_VER) && (__VMS_VER > 70000000)
564 # include <sys/ioctl.h>
570 # if defined(TCPIP_TYPE_SOCKETSHR)
571 # include <socketshr.h>
575 # define OpenSSL_Read(a,b,c) read((a),(b),(c))
576 # define OpenSSL_Write(a,b,c) write((a),(b),(c))
577 # define SHUTDOWN(fd) { shutdown((fd),0); closesocket((fd)); }
578 # define SHUTDOWN2(fd) { shutdown((fd),2); closesocket((fd)); }
579 # ifndef INVALID_SOCKET
580 # define INVALID_SOCKET (-1)
581 # endif /* INVALID_SOCKET */
585 * Some IPv6 implementations are broken, disable them in known bad versions.
587 # if !defined(OPENSSL_USE_IPV6)
588 # if defined(AF_INET6) && !defined(NETWARE_CLIB)
589 # define OPENSSL_USE_IPV6 1
591 # define OPENSSL_USE_IPV6 0
597 # ifndef OPENSSL_EXIT
598 # if defined(MONOLITH) && !defined(OPENSSL_C)
599 # define OPENSSL_EXIT(n) return(n)
601 # define OPENSSL_EXIT(n) do { EXIT(n); return(n); } while(0)
605 /***********************************************/
607 # if defined(OPENSSL_SYS_WINDOWS)
608 # define strcasecmp _stricmp
609 # define strncasecmp _strnicmp
610 # elif defined(OPENSSL_SYS_VMS)
611 /* VMS below version 7.0 doesn't have strcasecmp() */
612 # include "internal/o_str.h"
613 # define strcasecmp OPENSSL_strcasecmp
614 # define strncasecmp OPENSSL_strncasecmp
615 # define OPENSSL_IMPLEMENTS_strncasecmp
616 # elif defined(OPENSSL_SYS_OS2) && defined(__EMX__)
617 # define strcasecmp stricmp
618 # define strncasecmp strnicmp
619 # elif defined(OPENSSL_SYS_NETWARE)
621 # if defined(NETWARE_CLIB)
622 # define strcasecmp stricmp
623 # define strncasecmp strnicmp
624 # endif /* NETWARE_CLIB */
627 # if defined(OPENSSL_SYS_OS2) && defined(__EMX__)
634 # if defined(OPENSSL_SYS_VXWORKS)
636 # include <tickLib.h>
639 # define TTY_STRUCT int
641 # define sleep(a) taskDelay((a) * sysClkRateGet())
643 # include <vxWorks.h>
644 # include <sockLib.h>
645 # include <taskLib.h>
647 # define getpid taskIdSelf
650 * NOTE: these are implemented by helpers in database app! if the database is
651 * not linked, we need to implement them elswhere
653 struct hostent *gethostbyname(const char *name);
654 struct hostent *gethostbyaddr(const char *addr, int length, int type);
655 struct servent *getservbyname(const char *name, const char *proto);
660 #define OSSL_NELEM(x) (sizeof(x)/sizeof(x[0]))