1 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
4 * This package is an SSL implementation written
5 * by Eric Young (eay@cryptsoft.com).
6 * The implementation was written so as to conform with Netscapes SSL.
8 * This library is free for commercial and non-commercial use as long as
9 * the following conditions are aheared to. The following conditions
10 * apply to all code found in this distribution, be it the RC4, RSA,
11 * lhash, DES, etc., code; not just the SSL code. The SSL documentation
12 * included with this distribution is covered by the same copyright terms
13 * except that the holder is Tim Hudson (tjh@cryptsoft.com).
15 * Copyright remains Eric Young's, and as such any Copyright notices in
16 * the code are not to be removed.
17 * If this package is used in a product, Eric Young should be given attribution
18 * as the author of the parts of the library used.
19 * This can be in the form of a textual message at program startup or
20 * in documentation (online or textual) provided with the package.
22 * Redistribution and use in source and binary forms, with or without
23 * modification, are permitted provided that the following conditions
25 * 1. Redistributions of source code must retain the copyright
26 * notice, this list of conditions and the following disclaimer.
27 * 2. Redistributions in binary form must reproduce the above copyright
28 * notice, this list of conditions and the following disclaimer in the
29 * documentation and/or other materials provided with the distribution.
30 * 3. All advertising materials mentioning features or use of this software
31 * must display the following acknowledgement:
32 * "This product includes cryptographic software written by
33 * Eric Young (eay@cryptsoft.com)"
34 * The word 'cryptographic' can be left out if the rouines from the library
35 * being used are not cryptographic related :-).
36 * 4. If you include any Windows specific code (or a derivative thereof) from
37 * the apps directory (application code) you must include an acknowledgement:
38 * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
40 * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
41 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
42 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
43 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
44 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
45 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
46 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
48 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
49 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
52 * The licence and distribution terms for any publically available version or
53 * derivative of this code cannot be changed. i.e. this code cannot simply be
54 * copied and put under another distribution licence
55 * [including the GNU Public Licence.]
59 # define HEADER_E_OS_H
61 # include <openssl/opensslconf.h>
63 # include <openssl/e_os2.h>
65 * <openssl/e_os2.h> contains what we can justify to make visible to the
66 * outside; this file e_os.h is not part of the exported interface.
73 /* Used to checking reference counts, most while doing perl5 stuff :-) */
74 # if defined(OPENSSL_NO_STDIO)
75 # if defined(REF_DEBUG)
76 # error "REF_DEBUG requires stdio"
78 # if defined(REF_PRINT)
79 # error "REF_PRINT requires stdio"
83 # if defined(REF_DEBUG)
84 # define REF_ASSERT_ISNT(test) \
85 (void)((test) ? (OpenSSLDie(__FILE__, __LINE__, "refcount error"), 1) : 0)
87 # define REF_ASSERT_ISNT(i)
90 # define REF_PRINT_COUNT(a, b) \
91 fprintf(stderr, "%p:%4d:%s\n", b, b->references, a)
93 # define REF_PRINT_COUNT(a, b)
96 # define osslargused(x) (void)x
100 * set this to a comma-separated list of 'random' device files to try out. My
101 * default, we will try to read at least one of these files
103 # define DEVRANDOM "/dev/urandom","/dev/random","/dev/srandom"
105 # if !defined(OPENSSL_NO_EGD) && !defined(DEVRANDOM_EGD)
107 * set this to a comma-separated list of 'egd' sockets to try out. These
108 * sockets will be tried in the order listed in case accessing the device
109 * files listed in DEVRANDOM did not return enough entropy.
111 # define DEVRANDOM_EGD "/var/run/egd-pool","/dev/egd-pool","/etc/egd-pool","/etc/entropy"
114 # if defined(OPENSSL_SYS_VXWORKS)
115 # define NO_SYS_PARAM_H
120 /********************************************************************
121 The Microsoft section
122 ********************************************************************/
123 # if defined(OPENSSL_SYS_WIN32) && !defined(WIN32)
126 # if defined(OPENSSL_SYS_WINDOWS) && !defined(WINDOWS)
129 # if defined(OPENSSL_SYS_MSDOS) && !defined(MSDOS)
133 # if (defined(MSDOS) || defined(OPENSSL_SYS_UEFI)) && !defined(GETPID_IS_MEANINGLESS)
134 # define GETPID_IS_MEANINGLESS
139 # define get_last_sys_error() GetLastError()
140 # define clear_sys_error() SetLastError(0)
142 # define WIN_CONSOLE_BUG
145 # define get_last_sys_error() errno
146 # define clear_sys_error() errno=0
149 # if defined(WINDOWS)
150 # define get_last_socket_error() WSAGetLastError()
151 # define clear_socket_error() WSASetLastError(0)
152 # define readsocket(s,b,n) recv((s),(b),(n),0)
153 # define writesocket(s,b,n) send((s),(b),(n),0)
154 # elif defined(__DJGPP__)
156 # define get_last_socket_error() errno
157 # define clear_socket_error() errno=0
158 # define closesocket(s) close_s(s)
159 # define readsocket(s,b,n) read_s(s,b,n)
160 # define writesocket(s,b,n) send(s,b,n,0)
161 # elif defined(OPENSSL_SYS_VMS)
162 # define get_last_socket_error() errno
163 # define clear_socket_error() errno=0
164 # define ioctlsocket(a,b,c) ioctl(a,b,c)
165 # define closesocket(s) close(s)
166 # define readsocket(s,b,n) recv((s),(b),(n),0)
167 # define writesocket(s,b,n) send((s),(b),(n),0)
168 # elif defined(OPENSSL_SYS_VXWORKS)
169 # define get_last_socket_error() errno
170 # define clear_socket_error() errno=0
171 # define ioctlsocket(a,b,c) ioctl((a),(b),(int)(c))
172 # define closesocket(s) close(s)
173 # define readsocket(s,b,n) read((s),(b),(n))
174 # define writesocket(s,b,n) write((s),(char *)(b),(n))
175 # elif defined(OPENSSL_SYS_NETWARE)
176 # if defined(NETWARE_BSDSOCK)
177 # define get_last_socket_error() errno
178 # define clear_socket_error() errno=0
179 # define closesocket(s) close(s)
180 # define ioctlsocket(a,b,c) ioctl(a,b,c)
181 # if defined(NETWARE_LIBC)
182 # define readsocket(s,b,n) recv((s),(b),(n),0)
183 # define writesocket(s,b,n) send((s),(b),(n),0)
185 # define readsocket(s,b,n) recv((s),(char*)(b),(n),0)
186 # define writesocket(s,b,n) send((s),(char*)(b),(n),0)
189 # define get_last_socket_error() WSAGetLastError()
190 # define clear_socket_error() WSASetLastError(0)
191 # define readsocket(s,b,n) recv((s),(b),(n),0)
192 # define writesocket(s,b,n) send((s),(b),(n),0)
195 # define get_last_socket_error() errno
196 # define clear_socket_error() errno=0
197 # define ioctlsocket(a,b,c) ioctl(a,b,c)
198 # define closesocket(s) close(s)
199 # define readsocket(s,b,n) read((s),(b),(n))
200 # define writesocket(s,b,n) write((s),(b),(n))
203 # if (defined(WINDOWS) || defined(MSDOS))
207 # include <sys/stat.h>
208 # include <sys/socket.h>
211 # define _setmode setmode
212 # define _O_TEXT O_TEXT
213 # define _O_BINARY O_BINARY
215 # define DEVRANDOM "/dev/urandom\x24"
216 # endif /* __DJGPP__ */
219 # define S_IFDIR _S_IFDIR
223 # define S_IFMT _S_IFMT
226 # if !defined(WINNT) && !defined(__DJGPP__)
232 # if !defined(_WIN32_WCE) && !defined(_WIN32_WINNT)
234 * Defining _WIN32_WINNT here in e_os.h implies certain "discipline."
235 * Most notably we ought to check for availability of each specific
236 * routine that was introduced after denoted _WIN32_WINNT with
237 * GetProcAddress(). Normally newer functions are masked with higher
238 * _WIN32_WINNT in SDK headers. So that if you wish to use them in
239 * some module, you'd need to override _WIN32_WINNT definition in
240 * the target module in order to "reach for" prototypes, but replace
241 * calls to new functions with indirect calls. Alternatively it
242 * might be possible to achieve the goal by /DELAYLOAD-ing .DLLs
243 * and check for current OS version instead.
245 # define _WIN32_WINNT 0x0501
247 # if !defined(OPENSSL_NO_SOCK) && (defined(_WIN32_WINNT) || defined(_WIN32_WCE))
249 * Just like defining _WIN32_WINNT including winsock2.h implies
250 * certain "discipline" for maintaining [broad] binary compatibility.
251 * As long as structures are invariant among Winsock versions,
252 * it's sufficient to check for specific Winsock2 API availability
253 * at run-time [DSO_global_lookup is recommended]...
255 # include <winsock2.h>
256 # include <ws2tcpip.h>
257 /* yes, they have to be #included prior to <windows.h> */
259 # include <windows.h>
263 # if defined(_WIN32_WCE) && !defined(EACCES)
268 # define strlen(s) _strlen31(s)
269 /* cut strings to 2GB */
270 static __inline unsigned int _strlen31(const char *str)
272 unsigned int len = 0;
273 while (*str && len < 0x80000000U)
275 return len & 0x7FFFFFFF;
279 # if defined(_MSC_VER) && _MSC_VER<=1200 && defined(_MT) && defined(isspace)
280 /* compensate for bug in VC6 ctype.h */
287 # if defined(_MSC_VER) && !defined(_WIN32_WCE) && !defined(_DLL) && defined(stdin)
288 # if _MSC_VER>=1300 && _MSC_VER<1600
293 # define stdin (&__iob_func()[0])
294 # define stdout (&__iob_func()[1])
295 # define stderr (&__iob_func()[2])
296 # elif _MSC_VER<1300 && defined(I_CAN_LIVE_WITH_LNK4049)
301 * pre-1300 has __p__iob(), but it's available only in msvcrt.lib,
302 * or in other words with /MD. Declaring implicit import, i.e. with
303 * _imp_ prefix, works correctly with all compiler options, but
304 * without /MD results in LINK warning LNK4049: 'locally defined
305 * symbol "__iob" imported'.
307 extern FILE *_imp___iob;
308 # define stdin (&_imp___iob[0])
309 # define stdout (&_imp___iob[1])
310 # define stderr (&_imp___iob[2])
317 # ifdef OPENSSL_SYS_WINCE
318 # define OPENSSL_NO_POSIX_IO
321 # if defined (__BORLANDC__)
322 # define _setmode setmode
323 # define _O_TEXT O_TEXT
324 # define _O_BINARY O_BINARY
325 # define _int64 __int64
326 # define _kbhit kbhit
329 # define EXIT(n) exit(n)
330 # define LIST_SEPARATOR_CHAR ';'
340 # define OPENSSL_CONF "openssl.cnf"
341 # define NUL_DEV "nul"
342 # define RFILE ".rnd"
343 # ifdef OPENSSL_SYS_WINCE
344 # define DEFAULT_HOME ""
346 # define DEFAULT_HOME "C:"
349 /* Avoid Visual Studio 13 GetVersion deprecated problems */
350 # if defined(_MSC_VER) && _MSC_VER>=1800
351 # define check_winnt() (1)
352 # define check_win_minplat(x) (1)
354 # define check_winnt() (GetVersion() < 0x80000000)
355 # define check_win_minplat(x) (LOBYTE(LOWORD(GetVersion())) >= (x))
358 # else /* The non-microsoft world */
360 # ifdef OPENSSL_SYS_VMS
363 * some programs don't include stdlib, so exit() and others give implicit
370 # include <unixlib.h>
372 # define OPENSSL_CONF "openssl.cnf"
373 # define RFILE ".rnd"
374 # define LIST_SEPARATOR_CHAR ','
375 # define NUL_DEV "NLA0:"
376 /* We don't have any well-defined random devices on VMS, yet... */
379 We need to do this since VMS has the following coding on status codes:
381 Bits 0-2: status type: 0 = warning, 1 = success, 2 = error, 3 = info ...
382 The important thing to know is that odd numbers are considered
383 good, while even ones are considered errors.
384 Bits 3-15: actual status number
385 Bits 16-27: facility number. 0 is considered "unknown"
386 Bits 28-31: control bits. If bit 28 is set, the shell won't try to
387 output the message (which, for random codes, just looks ugly)
389 So, what we do here is to change 0 to 1 to get the default success status,
390 and everything else is shifted up to fit into the status number field, and
391 the status is tagged as an error, which is what is wanted here.
393 Finally, we add the VMS C facility code 0x35a000, because there are some
394 programs, such as Perl, that will reinterpret the code back to something
395 POSIXly. 'man perlvms' explains it further.
397 NOTE: the perlvms manual wants to turn all codes 2 to 255 into success
398 codes (status type = 1). I couldn't disagree more. Fortunately, the
399 status type doesn't seem to bother Perl.
402 # define EXIT(n) exit((n) ? (((n) << 3) | 2 | 0x10000000 | 0x35a000) : 1)
404 # define NO_SYS_PARAM_H
407 # elif defined(OPENSSL_SYS_NETWARE)
410 # define NO_SYS_TYPES_H
413 # define getpid GetThreadID
414 extern int GetThreadID(void);
415 /* # include <conio.h> */
416 extern int kbhit(void);
421 # define _setmode setmode
422 # define _kbhit kbhit
423 # define _O_TEXT O_TEXT
424 # define _O_BINARY O_BINARY
425 # define OPENSSL_CONF "openssl.cnf"
426 # define RFILE ".rnd"
427 # define LIST_SEPARATOR_CHAR ';'
428 # define EXIT(n) { if (n) printf("ERROR: %d\n", (int)n); exit(n); }
432 # ifdef OPENSSL_UNISTD
433 # include OPENSSL_UNISTD
437 # ifndef NO_SYS_TYPES_H
438 # include <sys/types.h>
440 # ifdef OPENSSL_SYS_WIN32_CYGWIN
445 # define OPENSSL_CONF "openssl.cnf"
446 # define RFILE ".rnd"
447 # define LIST_SEPARATOR_CHAR ':'
448 # define NUL_DEV "/dev/null"
449 # define EXIT(n) exit(n)
452 # define OpenSSL_getpid() getpid()
458 # if defined(OPENSSL_NO_SOCK) && !defined(OPENSSL_NO_DGRAM)
459 # define OPENSSL_NO_DGRAM
463 # if defined(WINDOWS) || defined(MSDOS)
466 # ifdef OPENSSL_NO_SOCK
467 # define OpenSSL_Write(a,b,c) (-1)
468 # define OpenSSL_Read(a,b,c) (-1)
469 # elif !defined(__DJGPP__)
470 # if defined(_WIN32_WCE) && _WIN32_WCE<410
471 # define getservbyname _masked_declaration_getservbyname
473 # if !defined(IPPROTO_IP)
474 /* winsock[2].h was included already? */
475 # include <winsock.h>
477 # ifdef getservbyname
478 # undef getservbyname
479 /* this is used to be wcecompat/include/winsock_extras.h */
480 struct servent *PASCAL getservbyname(const char *, const char *);
485 * Even though sizeof(SOCKET) is 8, it's safe to cast it to int, because
486 * the value constitutes an index in per-process table of limited size
487 * and not a real pointer. And we also depend on fact that all processors
488 * Windows run on happen to be two's-complement, which allows to
489 * interchange INVALID_SOCKET and -1.
491 # define socket(d,t,p) ((int)socket(d,t,p))
492 # define accept(s,f,l) ((int)accept(s,f,l))
494 # define OpenSSL_Write(a,b,c) send((a),(b),(c),0)
495 # define OpenSSL_Read(a,b,c) recv((a),(b),(c),0)
497 # define OpenSSL_Write(a,b,c) write_s(a,b,c,0)
498 # define OpenSSL_Read(a,b,c) read_s(a,b,c)
501 # elif defined(OPENSSL_SYS_NETWARE)
503 * NetWare uses the WinSock2 interfaces by default, but can be
506 # if defined(NETWARE_BSDSOCK)
508 # include <sys/socket.h>
509 # include <netinet/in.h>
510 # include <sys/time.h>
511 # if defined(NETWARE_CLIB)
512 # include <sys/bsdskt.h>
514 # include <sys/select.h>
516 # define INVALID_SOCKET (int)(~0)
518 # include <novsock2.h>
520 # define OpenSSL_Write(a,b,c) send((a),(b),(c),0)
521 # define OpenSSL_Read(a,b,c) recv((a),(b),(c),0)
525 # ifndef NO_SYS_PARAM_H
526 # include <sys/param.h>
528 # ifdef OPENSSL_SYS_VXWORKS
533 # if defined(OPENSSL_SYS_VMS_NODECC)
538 # include <sys/socket.h>
540 # ifdef OPENSSL_SYS_VXWORKS
541 # include <streams/un.h>
545 # ifndef UNIX_PATH_MAX
546 # define UNIX_PATH_MAX sizeof(((struct sockaddr_un *)NULL)->sun_path)
550 # include <sys/filio.h> /* FIONBIO in some SVR4, e.g. unixware, solaris */
552 # include <netinet/in.h>
553 # include <arpa/inet.h>
554 # include <netinet/tcp.h>
557 # ifdef OPENSSL_SYS_AIX
558 # include <sys/select.h>
562 # include <sys/select.h>
566 # include <sys/ioctl.h>
568 /* ioctl is only in VMS > 7.0 and when socketshr is not used */
569 # if !defined(TCPIP_TYPE_SOCKETSHR) && defined(__VMS_VER) && (__VMS_VER > 70000000)
570 # include <sys/ioctl.h>
576 # if defined(TCPIP_TYPE_SOCKETSHR)
577 # include <socketshr.h>
581 # define OpenSSL_Read(a,b,c) read((a),(b),(c))
582 # define OpenSSL_Write(a,b,c) write((a),(b),(c))
583 # ifndef INVALID_SOCKET
584 # define INVALID_SOCKET (-1)
585 # endif /* INVALID_SOCKET */
589 * Some IPv6 implementations are broken, disable them in known bad versions.
591 # if !defined(OPENSSL_USE_IPV6)
592 # if defined(AF_INET6) && !defined(NETWARE_CLIB)
593 # define OPENSSL_USE_IPV6 1
595 # define OPENSSL_USE_IPV6 0
601 # ifndef OPENSSL_EXIT
602 # if defined(MONOLITH) && !defined(OPENSSL_C)
603 # define OPENSSL_EXIT(n) return(n)
605 # define OPENSSL_EXIT(n) do { EXIT(n); return(n); } while(0)
609 /***********************************************/
611 # if defined(OPENSSL_SYS_WINDOWS)
612 # define strcasecmp _stricmp
613 # define strncasecmp _strnicmp
614 # elif defined(OPENSSL_SYS_VMS)
615 /* VMS below version 7.0 doesn't have strcasecmp() */
616 # include "internal/o_str.h"
617 # define strcasecmp OPENSSL_strcasecmp
618 # define strncasecmp OPENSSL_strncasecmp
619 # define OPENSSL_IMPLEMENTS_strncasecmp
620 # elif defined(OPENSSL_SYS_OS2) && defined(__EMX__)
621 # define strcasecmp stricmp
622 # define strncasecmp strnicmp
623 # elif defined(OPENSSL_SYS_NETWARE)
625 # if defined(NETWARE_CLIB)
626 # define strcasecmp stricmp
627 # define strncasecmp strnicmp
628 # endif /* NETWARE_CLIB */
631 # if defined(OPENSSL_SYS_OS2) && defined(__EMX__)
638 # if defined(OPENSSL_SYS_VXWORKS)
640 # include <tickLib.h>
643 # define TTY_STRUCT int
645 # define sleep(a) taskDelay((a) * sysClkRateGet())
647 # include <vxWorks.h>
648 # include <sockLib.h>
649 # include <taskLib.h>
651 # define getpid taskIdSelf
654 * NOTE: these are implemented by helpers in database app! if the database is
655 * not linked, we need to implement them elswhere
657 struct hostent *gethostbyname(const char *name);
658 struct hostent *gethostbyaddr(const char *addr, int length, int type);
659 struct servent *getservbyname(const char *name, const char *proto);
664 #define OSSL_NELEM(x) (sizeof(x)/sizeof(x[0]))