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)
82 * set this to a comma-separated list of 'random' device files to try out. My
83 * default, we will try to read at least one of these files
85 # define DEVRANDOM "/dev/urandom","/dev/random","/dev/srandom"
87 # ifndef DEVRANDOM_EGD
89 * set this to a comma-seperated list of 'egd' sockets to try out. These
90 * sockets will be tried in the order listed in case accessing the device
91 * files listed in DEVRANDOM did not return enough entropy.
93 # define DEVRANDOM_EGD "/var/run/egd-pool","/dev/egd-pool","/etc/egd-pool","/etc/entropy"
96 # if defined(OPENSSL_SYS_VXWORKS)
97 # define NO_SYS_PARAM_H
102 # if defined(OPENSSL_SYS_MACINTOSH_CLASSIC)
104 # ifndef MAC_OS_GUSI_SOURCE
105 # define MAC_OS_pre_X
106 # define NO_SYS_TYPES_H
107 typedef long ssize_t;
109 # define NO_SYS_PARAM_H
113 # define GETPID_IS_MEANINGLESS
117 /********************************************************************
118 The Microsoft section
119 ********************************************************************/
121 * The following is used becaue of the small stack in some Microsoft
124 # if defined(OPENSSL_SYS_MSDOS) && !defined(OPENSSL_SYSNAME_WIN32)
125 # define MS_STATIC static
130 # if defined(OPENSSL_SYS_WIN32) && !defined(WIN32)
133 # if defined(OPENSSL_SYS_WIN16) && !defined(WIN16)
136 # if defined(OPENSSL_SYS_WINDOWS) && !defined(WINDOWS)
139 # if defined(OPENSSL_SYS_MSDOS) && !defined(MSDOS)
143 # if defined(MSDOS) && !defined(GETPID_IS_MEANINGLESS)
144 # define GETPID_IS_MEANINGLESS
148 # define get_last_sys_error() GetLastError()
149 # define clear_sys_error() SetLastError(0)
151 # define WIN_CONSOLE_BUG
154 # define get_last_sys_error() errno
155 # define clear_sys_error() errno=0
158 # if defined(WINDOWS)
159 # define get_last_socket_error() WSAGetLastError()
160 # define clear_socket_error() WSASetLastError(0)
161 # define readsocket(s,b,n) recv((s),(b),(n),0)
162 # define writesocket(s,b,n) send((s),(b),(n),0)
163 # elif defined(__DJGPP__)
165 # define get_last_socket_error() errno
166 # define clear_socket_error() errno=0
167 # define closesocket(s) close_s(s)
168 # define readsocket(s,b,n) read_s(s,b,n)
169 # define writesocket(s,b,n) send(s,b,n,0)
170 # elif defined(MAC_OS_pre_X)
171 # define get_last_socket_error() errno
172 # define clear_socket_error() errno=0
173 # define closesocket(s) MacSocket_close(s)
174 # define readsocket(s,b,n) MacSocket_recv((s),(b),(n),true)
175 # define writesocket(s,b,n) MacSocket_send((s),(b),(n))
176 # elif defined(OPENSSL_SYS_VMS)
177 # define get_last_socket_error() errno
178 # define clear_socket_error() errno=0
179 # define ioctlsocket(a,b,c) ioctl(a,b,c)
180 # define closesocket(s) close(s)
181 # define readsocket(s,b,n) recv((s),(b),(n),0)
182 # define writesocket(s,b,n) send((s),(b),(n),0)
183 # elif defined(OPENSSL_SYS_VXWORKS)
184 # define get_last_socket_error() errno
185 # define clear_socket_error() errno=0
186 # define ioctlsocket(a,b,c) ioctl((a),(b),(int)(c))
187 # define closesocket(s) close(s)
188 # define readsocket(s,b,n) read((s),(b),(n))
189 # define writesocket(s,b,n) write((s),(char *)(b),(n))
190 # elif defined(OPENSSL_SYS_NETWARE)
191 # if defined(NETWARE_BSDSOCK)
192 # define get_last_socket_error() errno
193 # define clear_socket_error() errno=0
194 # define closesocket(s) close(s)
195 # define ioctlsocket(a,b,c) ioctl(a,b,c)
196 # if defined(NETWARE_LIBC)
197 # define readsocket(s,b,n) recv((s),(b),(n),0)
198 # define writesocket(s,b,n) send((s),(b),(n),0)
200 # define readsocket(s,b,n) recv((s),(char*)(b),(n),0)
201 # define writesocket(s,b,n) send((s),(char*)(b),(n),0)
204 # define get_last_socket_error() WSAGetLastError()
205 # define clear_socket_error() WSASetLastError(0)
206 # define readsocket(s,b,n) recv((s),(b),(n),0)
207 # define writesocket(s,b,n) send((s),(b),(n),0)
210 # define get_last_socket_error() errno
211 # define clear_socket_error() errno=0
212 # define ioctlsocket(a,b,c) ioctl(a,b,c)
213 # define closesocket(s) close(s)
214 # define readsocket(s,b,n) read((s),(b),(n))
215 # define writesocket(s,b,n) write((s),(b),(n))
219 # define MS_CALLBACK _far _loadds
226 # ifdef OPENSSL_NO_STDIO
227 # undef OPENSSL_NO_FP_API
228 # define OPENSSL_NO_FP_API
231 # if (defined(WINDOWS) || defined(MSDOS))
235 # include <sys/stat.h>
236 # include <sys/socket.h>
239 # define _setmode setmode
240 # define _O_TEXT O_TEXT
241 # define _O_BINARY O_BINARY
243 # define DEVRANDOM "/dev/urandom\x24"
244 # endif /* __DJGPP__ */
247 # define S_IFDIR _S_IFDIR
251 # define S_IFMT _S_IFMT
254 # if !defined(WINNT) && !defined(__DJGPP__)
260 # if !defined(_WIN32_WCE) && !defined(_WIN32_WINNT)
262 * Defining _WIN32_WINNT here in e_os.h implies certain "discipline."
263 * Most notably we ought to check for availability of each specific
264 * routine with GetProcAddress() and/or quard NT-specific calls with
265 * GetVersion() < 0x80000000. One can argue that in latter "or" case
266 * we ought to /DELAYLOAD some .DLLs in order to protect ourselves
267 * against run-time link errors. This doesn't seem to be necessary,
268 * because it turned out that already Windows 95, first non-NT Win32
269 * implementation, is equipped with at least NT 3.51 stubs, dummy
270 * routines with same name, but which do nothing. Meaning that it's
271 * apparently appropriate to guard generic NT calls with GetVersion
272 * alone, while NT 4.0 and above calls ought to be additionally
273 * checked upon with GetProcAddress.
275 # define _WIN32_WINNT 0x0400
277 # include <windows.h>
283 # define strlen(s) _strlen31(s)
284 /* cut strings to 2GB */
285 static __inline unsigned int _strlen31(const char *str)
287 unsigned int len = 0;
288 while (*str && len < 0x80000000U)
290 return len & 0x7FFFFFFF;
294 # if defined(_MSC_VER) && _MSC_VER<=1200 && defined(_MT) && defined(isspace)
295 /* compensate for bug in VC6 ctype.h */
302 # if defined(_MSC_VER) && !defined(_DLL) && defined(stdin)
308 # define stdin (&__iob_func()[0])
309 # define stdout (&__iob_func()[1])
310 # define stderr (&__iob_func()[2])
311 # elif defined(I_CAN_LIVE_WITH_LNK4049)
316 * pre-1300 has __p__iob(), but it's available only in msvcrt.lib,
317 * or in other words with /MD. Declaring implicit import, i.e. with
318 * _imp_ prefix, works correctly with all compiler options, but
319 * without /MD results in LINK warning LNK4049: 'locally defined
320 * symbol "__iob" imported'.
322 extern FILE *_imp___iob;
323 # define stdin (&_imp___iob[0])
324 # define stdout (&_imp___iob[1])
325 # define stderr (&_imp___iob[2])
332 # ifdef OPENSSL_SYS_WINCE
333 # include <winsock_extras.h>
336 # define ssize_t long
338 # if defined (__BORLANDC__)
339 # define _setmode setmode
340 # define _O_TEXT O_TEXT
341 # define _O_BINARY O_BINARY
342 # define _int64 __int64
343 # define _kbhit kbhit
346 # if defined(WIN16) && defined(SSLEAY) && defined(_WINEXITNOPERSIST)
347 # define EXIT(n) _wsetexit(_WINEXITNOPERSIST)
348 # define OPENSSL_EXIT(n) do { if (n == 0) EXIT(n); return(n); } while(0)
350 # define EXIT(n) exit(n)
352 # define LIST_SEPARATOR_CHAR ';'
362 # define OPENSSL_CONF "openssl.cnf"
363 # define SSLEAY_CONF OPENSSL_CONF
364 # define NUL_DEV "nul"
365 # define RFILE ".rnd"
366 # ifdef OPENSSL_SYS_WINCE
367 # define DEFAULT_HOME ""
369 # define DEFAULT_HOME "C:"
372 /* Avoid Visual Studio 13 GetVersion deprecated problems */
373 # if defined(_MSC_VER) && _MSC_VER>=1800
374 # define check_winnt() (1)
375 # define check_win_minplat(x) (1)
377 # define check_winnt() (GetVersion() < 0x80000000)
378 # define check_win_minplat(x) (LOBYTE(LOWORD(GetVersion())) >= (x))
381 # else /* The non-microsoft world */
383 # ifdef OPENSSL_SYS_VMS
386 * some programs don't include stdlib, so exit() and others give implicit
393 # include <unixlib.h>
395 # define OPENSSL_CONF "openssl.cnf"
396 # define SSLEAY_CONF OPENSSL_CONF
397 # define RFILE ".rnd"
398 # define LIST_SEPARATOR_CHAR ','
399 # define NUL_DEV "NLA0:"
400 /* We don't have any well-defined random devices on VMS, yet... */
403 We need to do this since VMS has the following coding on status codes:
405 Bits 0-2: status type: 0 = warning, 1 = success, 2 = error, 3 = info ...
406 The important thing to know is that odd numbers are considered
407 good, while even ones are considered errors.
408 Bits 3-15: actual status number
409 Bits 16-27: facility number. 0 is considered "unknown"
410 Bits 28-31: control bits. If bit 28 is set, the shell won't try to
411 output the message (which, for random codes, just looks ugly)
413 So, what we do here is to change 0 to 1 to get the default success status,
414 and everything else is shifted up to fit into the status number field, and
415 the status is tagged as an error, which I believe is what is wanted here.
418 # define EXIT(n) do { int __VMS_EXIT = n; \
419 if (__VMS_EXIT == 0) \
422 __VMS_EXIT = (n << 3) | 2; \
423 __VMS_EXIT |= 0x10000000; \
424 exit(__VMS_EXIT); } while(0)
425 # define NO_SYS_PARAM_H
427 # elif defined(OPENSSL_SYS_NETWARE)
430 # define NO_SYS_TYPES_H
433 # define getpid GetThreadID
434 extern int GetThreadID(void);
435 /* # include <conio.h> */
436 extern int kbhit(void);
437 extern void delay(unsigned milliseconds);
442 # define _setmode setmode
443 # define _kbhit kbhit
444 # define _O_TEXT O_TEXT
445 # define _O_BINARY O_BINARY
446 # define OPENSSL_CONF "openssl.cnf"
447 # define SSLEAY_CONF OPENSSL_CONF
448 # define RFILE ".rnd"
449 # define LIST_SEPARATOR_CHAR ';'
450 # define EXIT(n) { if (n) printf("ERROR: %d\n", (int)n); exit(n); }
454 # ifdef OPENSSL_SYS_MPE
455 # define NO_SYS_PARAM_H
457 # ifdef OPENSSL_UNISTD
458 # include OPENSSL_UNISTD
462 # ifndef NO_SYS_TYPES_H
463 # include <sys/types.h>
465 # if defined(NeXT) || defined(OPENSSL_SYS_NEWS4)
466 # define pid_t int /* pid_t is missing on NEXTSTEP/OPENSTEP
467 * (unless when compiling with
468 * -D_POSIX_SOURCE, which doesn't work for
471 # if defined(NeXT) || defined(OPENSSL_SYS_NEWS4) || defined(OPENSSL_SYS_SUNOS)
472 # define ssize_t int /* ditto */
474 # ifdef OPENSSL_SYS_NEWS4 /* setvbuf is missing on mips-sony-bsd */
475 # define setvbuf(a, b, c, d) setbuffer((a), (b), (d))
476 typedef unsigned long clock_t;
479 # define OPENSSL_CONF "openssl.cnf"
480 # define SSLEAY_CONF OPENSSL_CONF
481 # define RFILE ".rnd"
482 # define LIST_SEPARATOR_CHAR ':'
483 # define NUL_DEV "/dev/null"
484 # define EXIT(n) exit(n)
487 # define SSLeay_getpid() getpid()
494 # if defined(WINDOWS) || defined(MSDOS)
497 # ifdef OPENSSL_NO_SOCK
498 # define SSLeay_Write(a,b,c) (-1)
499 # define SSLeay_Read(a,b,c) (-1)
500 # define SHUTDOWN(fd) close(fd)
501 # define SHUTDOWN2(fd) close(fd)
502 # elif !defined(__DJGPP__)
503 # include <winsock.h>
504 extern HINSTANCE _hInstance;
507 * Even though sizeof(SOCKET) is 8, it's safe to cast it to int, because
508 * the value constitutes an index in per-process table of limited size
509 * and not a real pointer.
511 # define socket(d,t,p) ((int)socket(d,t,p))
512 # define accept(s,f,l) ((int)accept(s,f,l))
514 # define SSLeay_Write(a,b,c) send((a),(b),(c),0)
515 # define SSLeay_Read(a,b,c) recv((a),(b),(c),0)
516 # define SHUTDOWN(fd) { shutdown((fd),0); closesocket(fd); }
517 # define SHUTDOWN2(fd) { shutdown((fd),2); closesocket(fd); }
519 # define SSLeay_Write(a,b,c) write_s(a,b,c,0)
520 # define SSLeay_Read(a,b,c) read_s(a,b,c)
521 # define SHUTDOWN(fd) close_s(fd)
522 # define SHUTDOWN2(fd) close_s(fd)
525 # elif defined(MAC_OS_pre_X)
527 # include "MacSocket.h"
528 # define SSLeay_Write(a,b,c) MacSocket_send((a),(b),(c))
529 # define SSLeay_Read(a,b,c) MacSocket_recv((a),(b),(c),true)
530 # define SHUTDOWN(fd) MacSocket_close(fd)
531 # define SHUTDOWN2(fd) MacSocket_close(fd)
533 # elif defined(OPENSSL_SYS_NETWARE)
535 * NetWare uses the WinSock2 interfaces by default, but can be
538 # if defined(NETWARE_BSDSOCK)
539 # include <sys/socket.h>
540 # include <netinet/in.h>
541 # include <sys/time.h>
542 # if defined(NETWARE_CLIB)
543 # include <sys/bsdskt.h>
545 # include <sys/select.h>
547 # define INVALID_SOCKET (int)(~0)
549 # include <novsock2.h>
551 # define SSLeay_Write(a,b,c) send((a),(b),(c),0)
552 # define SSLeay_Read(a,b,c) recv((a),(b),(c),0)
553 # define SHUTDOWN(fd) { shutdown((fd),0); closesocket(fd); }
554 # define SHUTDOWN2(fd) { shutdown((fd),2); closesocket(fd); }
558 # ifndef NO_SYS_PARAM_H
559 # include <sys/param.h>
561 # ifdef OPENSSL_SYS_VXWORKS
563 # elif !defined(OPENSSL_SYS_MPE)
564 # include <sys/time.h> /* Needed under linux for FD_XXX */
568 # if defined(OPENSSL_SYS_VMS_NODECC)
573 # include <sys/socket.h>
575 # include <sys/filio.h> /* Added for FIONBIO under unixware */
577 # include <netinet/in.h>
578 # include <arpa/inet.h>
581 # if defined(NeXT) || defined(_NEXT_SOURCE)
582 # include <sys/fcntl.h>
583 # include <sys/types.h>
586 # ifdef OPENSSL_SYS_AIX
587 # include <sys/select.h>
591 # include <sys/select.h>
595 # include <sys/filio.h>
598 # include <sys/ioctl.h>
600 /* ioctl is only in VMS > 7.0 and when socketshr is not used */
601 # if !defined(TCPIP_TYPE_SOCKETSHR) && defined(__VMS_VER) && (__VMS_VER > 70000000)
602 # include <sys/ioctl.h>
609 # if defined(TCPIP_TYPE_SOCKETSHR)
610 # include <socketshr.h>
614 # define SSLeay_Read(a,b,c) read((a),(b),(c))
615 # define SSLeay_Write(a,b,c) write((a),(b),(c))
616 # define SHUTDOWN(fd) { shutdown((fd),0); closesocket((fd)); }
617 # define SHUTDOWN2(fd) { shutdown((fd),2); closesocket((fd)); }
618 # ifndef INVALID_SOCKET
619 # define INVALID_SOCKET (-1)
620 # endif /* INVALID_SOCKET */
624 # if defined(__ultrix)
630 # if defined(sun) && !defined(__svr4__) && !defined(__SVR4)
631 /* include headers first, so our defines don't break it */
634 /* bcopy can handle overlapping moves according to SunOS 4.1.4 manpage */
635 # define memmove(s1,s2,n) bcopy((s2),(s1),(n))
636 # define strtoul(s,e,b) ((unsigned long int)strtol((s),(e),(b)))
637 extern char *sys_errlist[];
639 # define strerror(errnum) \
640 (((errnum)<0 || (errnum)>=sys_nerr) ? NULL : sys_errlist[errnum])
641 /* Being signed SunOS 4.x memcpy breaks ASN1_OBJECT table lookup */
642 # include "crypto/o_str.h"
643 # define memcmp OPENSSL_memcmp
646 # ifndef OPENSSL_EXIT
647 # if defined(MONOLITH) && !defined(OPENSSL_C)
648 # define OPENSSL_EXIT(n) return(n)
650 # define OPENSSL_EXIT(n) do { EXIT(n); return(n); } while(0)
654 /***********************************************/
657 * do we need to do this for getenv. Just define getenv for use under windows
661 /* How to do this needs to be thought out a bit more.... */
663 * char *GETENV(char *); #define Getenv GETENV
665 # define Getenv getenv
667 # define Getenv getenv
670 # define DG_GCC_BUG /* gcc < 2.6.3 on DGUX */
673 # define IRIX_CC_BUG /* all version of IRIX I've tested (4.* 5.*) */
675 # ifdef OPENSSL_SYS_SNI
676 # define IRIX_CC_BUG /* CDS++ up to V2.0Bsomething suffered from
680 # if defined(OPENSSL_SYS_WINDOWS)
681 # define strcasecmp _stricmp
682 # define strncasecmp _strnicmp
683 # elif defined(OPENSSL_SYS_VMS)
684 /* VMS below version 7.0 doesn't have strcasecmp() */
686 # define strcasecmp OPENSSL_strcasecmp
687 # define strncasecmp OPENSSL_strncasecmp
688 # define OPENSSL_IMPLEMENTS_strncasecmp
689 # elif defined(OPENSSL_SYS_OS2) && defined(__EMX__)
690 # define strcasecmp stricmp
691 # define strncasecmp strnicmp
692 # elif defined(OPENSSL_SYS_NETWARE)
694 # if defined(NETWARE_CLIB)
695 # define strcasecmp stricmp
696 # define strncasecmp strnicmp
697 # endif /* NETWARE_CLIB */
700 # if defined(OPENSSL_SYS_OS2) && defined(__EMX__)
707 # if defined(OPENSSL_SYS_VXWORKS)
709 # include <tickLib.h>
712 # define TTY_STRUCT int
714 # define sleep(a) taskDelay((a) * sysClkRateGet())
716 # include <vxWorks.h>
717 # include <sockLib.h>
718 # include <taskLib.h>
720 # define getpid taskIdSelf
723 * NOTE: these are implemented by helpers in database app! if the database is
724 * not linked, we need to implement them elswhere
726 struct hostent *gethostbyname(const char *name);
727 struct hostent *gethostbyaddr(const char *addr, int length, int type);
728 struct servent *getservbyname(const char *name, const char *proto);
733 # if !defined(inline) && !defined(__cplusplus)
734 # if defined(__STDC_VERSION__) && __STDC_VERSION__>=199901L
735 /* do nothing, inline works */
736 # elif defined(__GNUC__) && __GNUC__>=2
737 # define inline __inline__
738 # elif defined(_MSC_VER)
740 * Visual Studio: inline is available in C++ only, however
741 * __inline is available for C, see
742 * http://msdn.microsoft.com/en-us/library/z8y1yy88.aspx
744 # define inline __inline