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)
98 * set this to a comma-separated list of 'random' device files to try out. My
99 * default, we will try to read at least one of these files
101 # define DEVRANDOM "/dev/urandom","/dev/random","/dev/srandom"
103 # if !defined(OPENSSL_NO_EGD) && !defined(DEVRANDOM_EGD)
105 * set this to a comma-separated list of 'egd' sockets to try out. These
106 * sockets will be tried in the order listed in case accessing the device
107 * files listed in DEVRANDOM did not return enough entropy.
109 # define DEVRANDOM_EGD "/var/run/egd-pool","/dev/egd-pool","/etc/egd-pool","/etc/entropy"
112 # if defined(OPENSSL_SYS_VXWORKS)
113 # define NO_SYS_PARAM_H
118 /********************************************************************
119 The Microsoft section
120 ********************************************************************/
121 # if defined(OPENSSL_SYS_WIN32) && !defined(WIN32)
124 # if defined(OPENSSL_SYS_WINDOWS) && !defined(WINDOWS)
127 # if defined(OPENSSL_SYS_MSDOS) && !defined(MSDOS)
131 # if (defined(MSDOS) || defined(OPENSSL_SYS_UEFI)) && !defined(GETPID_IS_MEANINGLESS)
132 # define GETPID_IS_MEANINGLESS
137 # define get_last_sys_error() GetLastError()
138 # define clear_sys_error() SetLastError(0)
140 # define WIN_CONSOLE_BUG
143 # define get_last_sys_error() errno
144 # define clear_sys_error() errno=0
147 # if defined(WINDOWS)
148 # define get_last_socket_error() WSAGetLastError()
149 # define clear_socket_error() WSASetLastError(0)
150 # define readsocket(s,b,n) recv((s),(b),(n),0)
151 # define writesocket(s,b,n) send((s),(b),(n),0)
152 # elif defined(__DJGPP__)
154 # define get_last_socket_error() errno
155 # define clear_socket_error() errno=0
156 # define closesocket(s) close_s(s)
157 # define readsocket(s,b,n) read_s(s,b,n)
158 # define writesocket(s,b,n) send(s,b,n,0)
159 # elif defined(OPENSSL_SYS_VMS)
160 # define get_last_socket_error() errno
161 # define clear_socket_error() errno=0
162 # define ioctlsocket(a,b,c) ioctl(a,b,c)
163 # define closesocket(s) close(s)
164 # define readsocket(s,b,n) recv((s),(b),(n),0)
165 # define writesocket(s,b,n) send((s),(b),(n),0)
166 # elif defined(OPENSSL_SYS_VXWORKS)
167 # define get_last_socket_error() errno
168 # define clear_socket_error() errno=0
169 # define ioctlsocket(a,b,c) ioctl((a),(b),(int)(c))
170 # define closesocket(s) close(s)
171 # define readsocket(s,b,n) read((s),(b),(n))
172 # define writesocket(s,b,n) write((s),(char *)(b),(n))
173 # elif defined(OPENSSL_SYS_NETWARE)
174 # if defined(NETWARE_BSDSOCK)
175 # define get_last_socket_error() errno
176 # define clear_socket_error() errno=0
177 # define closesocket(s) close(s)
178 # define ioctlsocket(a,b,c) ioctl(a,b,c)
179 # if defined(NETWARE_LIBC)
180 # define readsocket(s,b,n) recv((s),(b),(n),0)
181 # define writesocket(s,b,n) send((s),(b),(n),0)
183 # define readsocket(s,b,n) recv((s),(char*)(b),(n),0)
184 # define writesocket(s,b,n) send((s),(char*)(b),(n),0)
187 # define get_last_socket_error() WSAGetLastError()
188 # define clear_socket_error() WSASetLastError(0)
189 # define readsocket(s,b,n) recv((s),(b),(n),0)
190 # define writesocket(s,b,n) send((s),(b),(n),0)
193 # define get_last_socket_error() errno
194 # define clear_socket_error() errno=0
195 # define ioctlsocket(a,b,c) ioctl(a,b,c)
196 # define closesocket(s) close(s)
197 # define readsocket(s,b,n) read((s),(b),(n))
198 # define writesocket(s,b,n) write((s),(b),(n))
201 # if (defined(WINDOWS) || defined(MSDOS))
205 # include <sys/stat.h>
206 # include <sys/socket.h>
209 # define _setmode setmode
210 # define _O_TEXT O_TEXT
211 # define _O_BINARY O_BINARY
213 # define DEVRANDOM "/dev/urandom\x24"
214 # endif /* __DJGPP__ */
217 # define S_IFDIR _S_IFDIR
221 # define S_IFMT _S_IFMT
224 # if !defined(WINNT) && !defined(__DJGPP__)
230 # if !defined(_WIN32_WCE) && !defined(_WIN32_WINNT)
232 * Defining _WIN32_WINNT here in e_os.h implies certain "discipline."
233 * Most notably we ought to check for availability of each specific
234 * routine that was introduced after denoted _WIN32_WINNT with
235 * GetProcAddress(). Normally newer functions are masked with higher
236 * _WIN32_WINNT in SDK headers. So that if you wish to use them in
237 * some module, you'd need to override _WIN32_WINNT definition in
238 * the target module in order to "reach for" prototypes, but replace
239 * calls to new functions with indirect calls. Alternatively it
240 * might be possible to achieve the goal by /DELAYLOAD-ing .DLLs
241 * and check for current OS version instead.
243 # define _WIN32_WINNT 0x0501
245 # if !defined(OPENSSL_NO_SOCK) && (defined(_WIN32_WINNT) || defined(_WIN32_WCE))
247 * Just like defining _WIN32_WINNT including winsock2.h implies
248 * certain "discipline" for maintaining [broad] binary compatibility.
249 * As long as structures are invariant among Winsock versions,
250 * it's sufficient to check for specific Winsock2 API availability
251 * at run-time [DSO_global_lookup is recommended]...
253 # include <winsock2.h>
254 # include <ws2tcpip.h>
255 /* yes, they have to be #included prior to <windows.h> */
257 # include <windows.h>
261 # if defined(_WIN32_WCE) && !defined(EACCES)
266 # define strlen(s) _strlen31(s)
267 /* cut strings to 2GB */
268 static __inline unsigned int _strlen31(const char *str)
270 unsigned int len = 0;
271 while (*str && len < 0x80000000U)
273 return len & 0x7FFFFFFF;
277 # if defined(_MSC_VER) && _MSC_VER<=1200 && defined(_MT) && defined(isspace)
278 /* compensate for bug in VC6 ctype.h */
285 # if defined(_MSC_VER) && !defined(_WIN32_WCE) && !defined(_DLL) && defined(stdin)
286 # if _MSC_VER>=1300 && _MSC_VER<1600
291 # define stdin (&__iob_func()[0])
292 # define stdout (&__iob_func()[1])
293 # define stderr (&__iob_func()[2])
294 # elif _MSC_VER<1300 && defined(I_CAN_LIVE_WITH_LNK4049)
299 * pre-1300 has __p__iob(), but it's available only in msvcrt.lib,
300 * or in other words with /MD. Declaring implicit import, i.e. with
301 * _imp_ prefix, works correctly with all compiler options, but
302 * without /MD results in LINK warning LNK4049: 'locally defined
303 * symbol "__iob" imported'.
305 extern FILE *_imp___iob;
306 # define stdin (&_imp___iob[0])
307 # define stdout (&_imp___iob[1])
308 # define stderr (&_imp___iob[2])
315 # ifdef OPENSSL_SYS_WINCE
316 # define OPENSSL_NO_POSIX_IO
319 # if defined (__BORLANDC__)
320 # define _setmode setmode
321 # define _O_TEXT O_TEXT
322 # define _O_BINARY O_BINARY
323 # define _int64 __int64
324 # define _kbhit kbhit
327 # define EXIT(n) exit(n)
328 # define LIST_SEPARATOR_CHAR ';'
338 # define OPENSSL_CONF "openssl.cnf"
339 # define NUL_DEV "nul"
340 # define RFILE ".rnd"
341 # ifdef OPENSSL_SYS_WINCE
342 # define DEFAULT_HOME ""
344 # define DEFAULT_HOME "C:"
347 /* Avoid Visual Studio 13 GetVersion deprecated problems */
348 # if defined(_MSC_VER) && _MSC_VER>=1800
349 # define check_winnt() (1)
350 # define check_win_minplat(x) (1)
352 # define check_winnt() (GetVersion() < 0x80000000)
353 # define check_win_minplat(x) (LOBYTE(LOWORD(GetVersion())) >= (x))
356 # else /* The non-microsoft world */
358 # ifdef OPENSSL_SYS_VMS
361 * some programs don't include stdlib, so exit() and others give implicit
368 # include <unixlib.h>
370 # define OPENSSL_CONF "openssl.cnf"
371 # define RFILE ".rnd"
372 # define LIST_SEPARATOR_CHAR ','
373 # define NUL_DEV "NLA0:"
374 /* We don't have any well-defined random devices on VMS, yet... */
377 We need to do this since VMS has the following coding on status codes:
379 Bits 0-2: status type: 0 = warning, 1 = success, 2 = error, 3 = info ...
380 The important thing to know is that odd numbers are considered
381 good, while even ones are considered errors.
382 Bits 3-15: actual status number
383 Bits 16-27: facility number. 0 is considered "unknown"
384 Bits 28-31: control bits. If bit 28 is set, the shell won't try to
385 output the message (which, for random codes, just looks ugly)
387 So, what we do here is to change 0 to 1 to get the default success status,
388 and everything else is shifted up to fit into the status number field, and
389 the status is tagged as an error, which is what is wanted here.
391 Finally, we add the VMS C facility code 0x35a000, because there are some
392 programs, such as Perl, that will reinterpret the code back to something
393 POSIXly. 'man perlvms' explains it further.
395 NOTE: the perlvms manual wants to turn all codes 2 to 255 into success
396 codes (status type = 1). I couldn't disagree more. Fortunately, the
397 status type doesn't seem to bother Perl.
400 # define EXIT(n) exit((n) ? (((n) << 3) | 2 | 0x10000000 | 0x35a000) : 1)
402 # define NO_SYS_PARAM_H
405 # elif defined(OPENSSL_SYS_NETWARE)
408 # define NO_SYS_TYPES_H
411 # define getpid GetThreadID
412 extern int GetThreadID(void);
413 /* # include <conio.h> */
414 extern int kbhit(void);
419 # define _setmode setmode
420 # define _kbhit kbhit
421 # define _O_TEXT O_TEXT
422 # define _O_BINARY O_BINARY
423 # define OPENSSL_CONF "openssl.cnf"
424 # define RFILE ".rnd"
425 # define LIST_SEPARATOR_CHAR ';'
426 # define EXIT(n) { if (n) printf("ERROR: %d\n", (int)n); exit(n); }
430 # ifdef OPENSSL_UNISTD
431 # include OPENSSL_UNISTD
435 # ifndef NO_SYS_TYPES_H
436 # include <sys/types.h>
438 # ifdef OPENSSL_SYS_WIN32_CYGWIN
443 # define OPENSSL_CONF "openssl.cnf"
444 # define RFILE ".rnd"
445 # define LIST_SEPARATOR_CHAR ':'
446 # define NUL_DEV "/dev/null"
447 # define EXIT(n) exit(n)
450 # define OpenSSL_getpid() getpid()
456 # if defined(OPENSSL_NO_SOCK) && !defined(OPENSSL_NO_DGRAM)
457 # define OPENSSL_NO_DGRAM
461 # if defined(WINDOWS) || defined(MSDOS)
464 # ifdef OPENSSL_NO_SOCK
465 # define OpenSSL_Write(a,b,c) (-1)
466 # define OpenSSL_Read(a,b,c) (-1)
467 # define SHUTDOWN(fd) close(fd)
468 # define SHUTDOWN2(fd) close(fd)
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)
496 # define SHUTDOWN(fd) { shutdown((fd),0); closesocket(fd); }
497 # define SHUTDOWN2(fd) { shutdown((fd),2); closesocket(fd); }
499 # define OpenSSL_Write(a,b,c) write_s(a,b,c,0)
500 # define OpenSSL_Read(a,b,c) read_s(a,b,c)
501 # define SHUTDOWN(fd) close_s(fd)
502 # define SHUTDOWN2(fd) close_s(fd)
505 # elif defined(OPENSSL_SYS_NETWARE)
507 * NetWare uses the WinSock2 interfaces by default, but can be
510 # if defined(NETWARE_BSDSOCK)
512 # include <sys/socket.h>
513 # include <netinet/in.h>
514 # include <sys/time.h>
515 # if defined(NETWARE_CLIB)
516 # include <sys/bsdskt.h>
518 # include <sys/select.h>
520 # define INVALID_SOCKET (int)(~0)
522 # include <novsock2.h>
524 # define OpenSSL_Write(a,b,c) send((a),(b),(c),0)
525 # define OpenSSL_Read(a,b,c) recv((a),(b),(c),0)
526 # define SHUTDOWN(fd) { shutdown((fd),0); closesocket(fd); }
527 # define SHUTDOWN2(fd) { shutdown((fd),2); closesocket(fd); }
531 # ifndef NO_SYS_PARAM_H
532 # include <sys/param.h>
534 # ifdef OPENSSL_SYS_VXWORKS
539 # if defined(OPENSSL_SYS_VMS_NODECC)
544 # include <sys/socket.h>
546 # ifdef OPENSSL_SYS_VXWORKS
547 # include <streams/un.h>
551 # ifndef UNIX_PATH_MAX
552 # define UNIX_PATH_MAX sizeof(((struct sockaddr_un *)NULL)->sun_path)
556 # include <sys/filio.h> /* FIONBIO in some SVR4, e.g. unixware, solaris */
558 # include <netinet/in.h>
559 # include <arpa/inet.h>
560 # include <netinet/tcp.h>
563 # ifdef OPENSSL_SYS_AIX
564 # include <sys/select.h>
568 # include <sys/select.h>
572 # include <sys/ioctl.h>
574 /* ioctl is only in VMS > 7.0 and when socketshr is not used */
575 # if !defined(TCPIP_TYPE_SOCKETSHR) && defined(__VMS_VER) && (__VMS_VER > 70000000)
576 # include <sys/ioctl.h>
582 # if defined(TCPIP_TYPE_SOCKETSHR)
583 # include <socketshr.h>
587 # define OpenSSL_Read(a,b,c) read((a),(b),(c))
588 # define OpenSSL_Write(a,b,c) write((a),(b),(c))
589 # define SHUTDOWN(fd) { shutdown((fd),0); closesocket((fd)); }
590 # define SHUTDOWN2(fd) { shutdown((fd),2); closesocket((fd)); }
591 # ifndef INVALID_SOCKET
592 # define INVALID_SOCKET (-1)
593 # endif /* INVALID_SOCKET */
597 * Some IPv6 implementations are broken, disable them in known bad versions.
599 # if !defined(OPENSSL_USE_IPV6)
600 # if defined(AF_INET6) && !defined(NETWARE_CLIB)
601 # define OPENSSL_USE_IPV6 1
603 # define OPENSSL_USE_IPV6 0
609 # ifndef OPENSSL_EXIT
610 # if defined(MONOLITH) && !defined(OPENSSL_C)
611 # define OPENSSL_EXIT(n) return(n)
613 # define OPENSSL_EXIT(n) do { EXIT(n); return(n); } while(0)
617 /***********************************************/
619 # if defined(OPENSSL_SYS_WINDOWS)
620 # define strcasecmp _stricmp
621 # define strncasecmp _strnicmp
622 # elif defined(OPENSSL_SYS_VMS)
623 /* VMS below version 7.0 doesn't have strcasecmp() */
624 # include "internal/o_str.h"
625 # define strcasecmp OPENSSL_strcasecmp
626 # define strncasecmp OPENSSL_strncasecmp
627 # define OPENSSL_IMPLEMENTS_strncasecmp
628 # elif defined(OPENSSL_SYS_OS2) && defined(__EMX__)
629 # define strcasecmp stricmp
630 # define strncasecmp strnicmp
631 # elif defined(OPENSSL_SYS_NETWARE)
633 # if defined(NETWARE_CLIB)
634 # define strcasecmp stricmp
635 # define strncasecmp strnicmp
636 # endif /* NETWARE_CLIB */
639 # if defined(OPENSSL_SYS_OS2) && defined(__EMX__)
646 # if defined(OPENSSL_SYS_VXWORKS)
648 # include <tickLib.h>
651 # define TTY_STRUCT int
653 # define sleep(a) taskDelay((a) * sysClkRateGet())
655 # include <vxWorks.h>
656 # include <sockLib.h>
657 # include <taskLib.h>
659 # define getpid taskIdSelf
662 * NOTE: these are implemented by helpers in database app! if the database is
663 * not linked, we need to implement them elswhere
665 struct hostent *gethostbyname(const char *name);
666 struct hostent *gethostbyaddr(const char *addr, int length, int type);
667 struct servent *getservbyname(const char *name, const char *proto);
672 #define OSSL_NELEM(x) (sizeof(x)/sizeof(x[0]))