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 :-) */
76 # define REF_PRINT(a,b) fprintf(stderr,"%08X:%4d:%s\n",(int)b,b->references,a)
78 # if defined(OPENSSL_NO_STDIO) && defined(REF_CHECK)
79 # error "Cannot have REF_CHECK with no-stdio"
81 # if defined(OPENSSL_NO_STDIO) && defined(REF_PRINT)
82 # error "Cannot have REF_PRINT with no-stdio"
87 * set this to a comma-separated list of 'random' device files to try out. My
88 * default, we will try to read at least one of these files
90 # define DEVRANDOM "/dev/urandom","/dev/random","/dev/srandom"
92 # if !defined(OPENSSL_NO_EGD) && !defined(DEVRANDOM_EGD)
94 * set this to a comma-separated list of 'egd' sockets to try out. These
95 * sockets will be tried in the order listed in case accessing the device
96 * files listed in DEVRANDOM did not return enough entropy.
98 # define DEVRANDOM_EGD "/var/run/egd-pool","/dev/egd-pool","/etc/egd-pool","/etc/entropy"
101 # if defined(OPENSSL_SYS_VXWORKS)
102 # define NO_SYS_PARAM_H
107 /********************************************************************
108 The Microsoft section
109 ********************************************************************/
110 # if defined(OPENSSL_SYS_WIN32) && !defined(WIN32)
113 # if defined(OPENSSL_SYS_WINDOWS) && !defined(WINDOWS)
116 # if defined(OPENSSL_SYS_MSDOS) && !defined(MSDOS)
120 # if (defined(MSDOS) || defined(OPENSSL_SYS_UEFI)) && !defined(GETPID_IS_MEANINGLESS)
121 # define GETPID_IS_MEANINGLESS
126 # define get_last_sys_error() GetLastError()
127 # define clear_sys_error() SetLastError(0)
129 # define WIN_CONSOLE_BUG
132 # define get_last_sys_error() errno
133 # define clear_sys_error() errno=0
136 # if defined(WINDOWS)
137 # define get_last_socket_error() WSAGetLastError()
138 # define clear_socket_error() WSASetLastError(0)
139 # define readsocket(s,b,n) recv((s),(b),(n),0)
140 # define writesocket(s,b,n) send((s),(b),(n),0)
141 # elif defined(__DJGPP__)
143 # define get_last_socket_error() errno
144 # define clear_socket_error() errno=0
145 # define closesocket(s) close_s(s)
146 # define readsocket(s,b,n) read_s(s,b,n)
147 # define writesocket(s,b,n) send(s,b,n,0)
148 # elif defined(OPENSSL_SYS_VMS)
149 # define get_last_socket_error() errno
150 # define clear_socket_error() errno=0
151 # define ioctlsocket(a,b,c) ioctl(a,b,c)
152 # define closesocket(s) close(s)
153 # define readsocket(s,b,n) recv((s),(b),(n),0)
154 # define writesocket(s,b,n) send((s),(b),(n),0)
155 # elif defined(OPENSSL_SYS_VXWORKS)
156 # define get_last_socket_error() errno
157 # define clear_socket_error() errno=0
158 # define ioctlsocket(a,b,c) ioctl((a),(b),(int)(c))
159 # define closesocket(s) close(s)
160 # define readsocket(s,b,n) read((s),(b),(n))
161 # define writesocket(s,b,n) write((s),(char *)(b),(n))
162 # elif defined(OPENSSL_SYS_NETWARE)
163 # if defined(NETWARE_BSDSOCK)
164 # define get_last_socket_error() errno
165 # define clear_socket_error() errno=0
166 # define closesocket(s) close(s)
167 # define ioctlsocket(a,b,c) ioctl(a,b,c)
168 # if defined(NETWARE_LIBC)
169 # define readsocket(s,b,n) recv((s),(b),(n),0)
170 # define writesocket(s,b,n) send((s),(b),(n),0)
172 # define readsocket(s,b,n) recv((s),(char*)(b),(n),0)
173 # define writesocket(s,b,n) send((s),(char*)(b),(n),0)
176 # define get_last_socket_error() WSAGetLastError()
177 # define clear_socket_error() WSASetLastError(0)
178 # define readsocket(s,b,n) recv((s),(b),(n),0)
179 # define writesocket(s,b,n) send((s),(b),(n),0)
182 # define get_last_socket_error() errno
183 # define clear_socket_error() errno=0
184 # define ioctlsocket(a,b,c) ioctl(a,b,c)
185 # define closesocket(s) close(s)
186 # define readsocket(s,b,n) read((s),(b),(n))
187 # define writesocket(s,b,n) write((s),(b),(n))
190 # if (defined(WINDOWS) || defined(MSDOS))
194 # include <sys/stat.h>
195 # include <sys/socket.h>
198 # define _setmode setmode
199 # define _O_TEXT O_TEXT
200 # define _O_BINARY O_BINARY
202 # define DEVRANDOM "/dev/urandom\x24"
203 # endif /* __DJGPP__ */
206 # define S_IFDIR _S_IFDIR
210 # define S_IFMT _S_IFMT
213 # if !defined(WINNT) && !defined(__DJGPP__)
219 # if !defined(_WIN32_WCE) && !defined(_WIN32_WINNT)
221 * Defining _WIN32_WINNT here in e_os.h implies certain "discipline."
222 * Most notably we ought to check for availability of each specific
223 * routine that was introduced after denoted _WIN32_WINNT with
224 * GetProcAddress(). Normally newer functions are masked with higher
225 * _WIN32_WINNT in SDK headers. So that if you wish to use them in
226 * some module, you'd need to override _WIN32_WINNT definition in
227 * the target module in order to "reach for" prototypes, but replace
228 * calls to new functions with indirect calls. Alternatively it
229 * might be possible to achieve the goal by /DELAYLOAD-ing .DLLs
230 * and check for current OS version instead.
232 # define _WIN32_WINNT 0x0501
234 # if !defined(OPENSSL_NO_SOCK) && (defined(_WIN32_WINNT) || defined(_WIN32_WCE))
236 * Just like defining _WIN32_WINNT including winsock2.h implies
237 * certain "discipline" for maintaining [broad] binary compatibility.
238 * As long as structures are invariant among Winsock versions,
239 * it's sufficient to check for specific Winsock2 API availability
240 * at run-time [DSO_global_lookup is recommended]...
242 # include <winsock2.h>
243 # include <ws2tcpip.h>
244 /* yes, they have to be #included prior to <windows.h> */
246 # include <windows.h>
250 # if defined(_WIN32_WCE) && !defined(EACCES)
255 # define strlen(s) _strlen31(s)
256 /* cut strings to 2GB */
257 static __inline unsigned int _strlen31(const char *str)
259 unsigned int len = 0;
260 while (*str && len < 0x80000000U)
262 return len & 0x7FFFFFFF;
266 # if defined(_MSC_VER) && _MSC_VER<=1200 && defined(_MT) && defined(isspace)
267 /* compensate for bug in VC6 ctype.h */
274 # if defined(_MSC_VER) && !defined(_WIN32_WCE) && !defined(_DLL) && defined(stdin)
275 # if _MSC_VER>=1300 && _MSC_VER<1600
280 # define stdin (&__iob_func()[0])
281 # define stdout (&__iob_func()[1])
282 # define stderr (&__iob_func()[2])
283 # elif _MSC_VER<1300 && defined(I_CAN_LIVE_WITH_LNK4049)
288 * pre-1300 has __p__iob(), but it's available only in msvcrt.lib,
289 * or in other words with /MD. Declaring implicit import, i.e. with
290 * _imp_ prefix, works correctly with all compiler options, but
291 * without /MD results in LINK warning LNK4049: 'locally defined
292 * symbol "__iob" imported'.
294 extern FILE *_imp___iob;
295 # define stdin (&_imp___iob[0])
296 # define stdout (&_imp___iob[1])
297 # define stderr (&_imp___iob[2])
304 # ifdef OPENSSL_SYS_WINCE
305 # define OPENSSL_NO_POSIX_IO
308 # if defined (__BORLANDC__)
309 # define _setmode setmode
310 # define _O_TEXT O_TEXT
311 # define _O_BINARY O_BINARY
312 # define _int64 __int64
313 # define _kbhit kbhit
316 # define EXIT(n) exit(n)
317 # define LIST_SEPARATOR_CHAR ';'
327 # define OPENSSL_CONF "openssl.cnf"
328 # define NUL_DEV "nul"
329 # define RFILE ".rnd"
330 # ifdef OPENSSL_SYS_WINCE
331 # define DEFAULT_HOME ""
333 # define DEFAULT_HOME "C:"
336 /* Avoid Visual Studio 13 GetVersion deprecated problems */
337 # if defined(_MSC_VER) && _MSC_VER>=1800
338 # define check_winnt() (1)
339 # define check_win_minplat(x) (1)
341 # define check_winnt() (GetVersion() < 0x80000000)
342 # define check_win_minplat(x) (LOBYTE(LOWORD(GetVersion())) >= (x))
345 # else /* The non-microsoft world */
347 # ifdef OPENSSL_SYS_VMS
350 * some programs don't include stdlib, so exit() and others give implicit
357 # include <unixlib.h>
359 # define OPENSSL_CONF "openssl.cnf"
360 # define RFILE ".rnd"
361 # define LIST_SEPARATOR_CHAR ','
362 # define NUL_DEV "NLA0:"
363 /* We don't have any well-defined random devices on VMS, yet... */
366 We need to do this since VMS has the following coding on status codes:
368 Bits 0-2: status type: 0 = warning, 1 = success, 2 = error, 3 = info ...
369 The important thing to know is that odd numbers are considered
370 good, while even ones are considered errors.
371 Bits 3-15: actual status number
372 Bits 16-27: facility number. 0 is considered "unknown"
373 Bits 28-31: control bits. If bit 28 is set, the shell won't try to
374 output the message (which, for random codes, just looks ugly)
376 So, what we do here is to change 0 to 1 to get the default success status,
377 and everything else is shifted up to fit into the status number field, and
378 the status is tagged as an error, which is what is wanted here.
380 Finally, we add the VMS C facility code 0x35a000, because there are some
381 programs, such as Perl, that will reinterpret the code back to something
382 POSIXly. 'man perlvms' explains it further.
384 NOTE: the perlvms manual wants to turn all codes 2 to 255 into success
385 codes (status type = 1). I couldn't disagree more. Fortunately, the
386 status type doesn't seem to bother Perl.
389 # define EXIT(n) exit((n) ? (((n) << 3) | 2 | 0x10000000 | 0x35a000) : 1)
391 # define NO_SYS_PARAM_H
394 # elif defined(OPENSSL_SYS_NETWARE)
397 # define NO_SYS_TYPES_H
400 # define getpid GetThreadID
401 extern int GetThreadID(void);
402 /* # include <conio.h> */
403 extern int kbhit(void);
408 # define _setmode setmode
409 # define _kbhit kbhit
410 # define _O_TEXT O_TEXT
411 # define _O_BINARY O_BINARY
412 # define OPENSSL_CONF "openssl.cnf"
413 # define RFILE ".rnd"
414 # define LIST_SEPARATOR_CHAR ';'
415 # define EXIT(n) { if (n) printf("ERROR: %d\n", (int)n); exit(n); }
419 # ifdef OPENSSL_UNISTD
420 # include OPENSSL_UNISTD
424 # ifndef NO_SYS_TYPES_H
425 # include <sys/types.h>
427 # ifdef OPENSSL_SYS_WIN32_CYGWIN
432 # define OPENSSL_CONF "openssl.cnf"
433 # define RFILE ".rnd"
434 # define LIST_SEPARATOR_CHAR ':'
435 # define NUL_DEV "/dev/null"
436 # define EXIT(n) exit(n)
439 # define OpenSSL_getpid() getpid()
445 # if defined(OPENSSL_NO_SOCK) && !defined(OPENSSL_NO_DGRAM)
446 # define OPENSSL_NO_DGRAM
450 # if defined(WINDOWS) || defined(MSDOS)
453 # ifdef OPENSSL_NO_SOCK
454 # define OpenSSL_Write(a,b,c) (-1)
455 # define OpenSSL_Read(a,b,c) (-1)
456 # define SHUTDOWN(fd) close(fd)
457 # define SHUTDOWN2(fd) close(fd)
458 # elif !defined(__DJGPP__)
459 # if defined(_WIN32_WCE) && _WIN32_WCE<410
460 # define getservbyname _masked_declaration_getservbyname
462 # if !defined(IPPROTO_IP)
463 /* winsock[2].h was included already? */
464 # include <winsock.h>
466 # ifdef getservbyname
467 # undef getservbyname
468 /* this is used to be wcecompat/include/winsock_extras.h */
469 struct servent *PASCAL getservbyname(const char *, const char *);
474 * Even though sizeof(SOCKET) is 8, it's safe to cast it to int, because
475 * the value constitutes an index in per-process table of limited size
476 * and not a real pointer. And we also depend on fact that all processors
477 * Windows run on happen to be two's-complement, which allows to
478 * interchange INVALID_SOCKET and -1.
480 # define socket(d,t,p) ((int)socket(d,t,p))
481 # define accept(s,f,l) ((int)accept(s,f,l))
483 # define OpenSSL_Write(a,b,c) send((a),(b),(c),0)
484 # define OpenSSL_Read(a,b,c) recv((a),(b),(c),0)
485 # define SHUTDOWN(fd) { shutdown((fd),0); closesocket(fd); }
486 # define SHUTDOWN2(fd) { shutdown((fd),2); closesocket(fd); }
488 # define OpenSSL_Write(a,b,c) write_s(a,b,c,0)
489 # define OpenSSL_Read(a,b,c) read_s(a,b,c)
490 # define SHUTDOWN(fd) close_s(fd)
491 # define SHUTDOWN2(fd) close_s(fd)
494 # elif defined(OPENSSL_SYS_NETWARE)
496 * NetWare uses the WinSock2 interfaces by default, but can be
499 # 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>
549 # include <netinet/tcp.h>
552 # ifdef OPENSSL_SYS_AIX
553 # include <sys/select.h>
557 # include <sys/select.h>
561 # include <sys/ioctl.h>
563 /* ioctl is only in VMS > 7.0 and when socketshr is not used */
564 # if !defined(TCPIP_TYPE_SOCKETSHR) && defined(__VMS_VER) && (__VMS_VER > 70000000)
565 # include <sys/ioctl.h>
571 # if defined(TCPIP_TYPE_SOCKETSHR)
572 # include <socketshr.h>
576 # define OpenSSL_Read(a,b,c) read((a),(b),(c))
577 # define OpenSSL_Write(a,b,c) write((a),(b),(c))
578 # define SHUTDOWN(fd) { shutdown((fd),0); closesocket((fd)); }
579 # define SHUTDOWN2(fd) { shutdown((fd),2); closesocket((fd)); }
580 # ifndef INVALID_SOCKET
581 # define INVALID_SOCKET (-1)
582 # endif /* INVALID_SOCKET */
586 * Some IPv6 implementations are broken, disable them in known bad versions.
588 # if !defined(OPENSSL_USE_IPV6)
589 # if defined(AF_INET6) && !defined(NETWARE_CLIB)
590 # define OPENSSL_USE_IPV6 1
592 # define OPENSSL_USE_IPV6 0
598 # ifndef OPENSSL_EXIT
599 # if defined(MONOLITH) && !defined(OPENSSL_C)
600 # define OPENSSL_EXIT(n) return(n)
602 # define OPENSSL_EXIT(n) do { EXIT(n); return(n); } while(0)
606 /***********************************************/
608 # if defined(OPENSSL_SYS_WINDOWS)
609 # define strcasecmp _stricmp
610 # define strncasecmp _strnicmp
611 # elif defined(OPENSSL_SYS_VMS)
612 /* VMS below version 7.0 doesn't have strcasecmp() */
613 # include "internal/o_str.h"
614 # define strcasecmp OPENSSL_strcasecmp
615 # define strncasecmp OPENSSL_strncasecmp
616 # define OPENSSL_IMPLEMENTS_strncasecmp
617 # elif defined(OPENSSL_SYS_OS2) && defined(__EMX__)
618 # define strcasecmp stricmp
619 # define strncasecmp strnicmp
620 # elif defined(OPENSSL_SYS_NETWARE)
622 # if defined(NETWARE_CLIB)
623 # define strcasecmp stricmp
624 # define strncasecmp strnicmp
625 # endif /* NETWARE_CLIB */
628 # if defined(OPENSSL_SYS_OS2) && defined(__EMX__)
635 # if defined(OPENSSL_SYS_VXWORKS)
637 # include <tickLib.h>
640 # define TTY_STRUCT int
642 # define sleep(a) taskDelay((a) * sysClkRateGet())
644 # include <vxWorks.h>
645 # include <sockLib.h>
646 # include <taskLib.h>
648 # define getpid taskIdSelf
651 * NOTE: these are implemented by helpers in database app! if the database is
652 * not linked, we need to implement them elswhere
654 struct hostent *gethostbyname(const char *name);
655 struct hostent *gethostbyaddr(const char *addr, int length, int type);
656 struct servent *getservbyname(const char *name, const char *proto);
661 #define OSSL_NELEM(x) (sizeof(x)/sizeof(x[0]))