1998-12-21 10:52:47 +00:00
|
|
|
/* e_os.h */
|
1998-12-21 10:56:39 +00:00
|
|
|
/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
|
1998-12-21 10:52:47 +00:00
|
|
|
* All rights reserved.
|
|
|
|
*
|
|
|
|
* This package is an SSL implementation written
|
|
|
|
* by Eric Young (eay@cryptsoft.com).
|
|
|
|
* The implementation was written so as to conform with Netscapes SSL.
|
2015-01-22 03:40:55 +00:00
|
|
|
*
|
1998-12-21 10:52:47 +00:00
|
|
|
* This library is free for commercial and non-commercial use as long as
|
|
|
|
* the following conditions are aheared to. The following conditions
|
|
|
|
* apply to all code found in this distribution, be it the RC4, RSA,
|
|
|
|
* lhash, DES, etc., code; not just the SSL code. The SSL documentation
|
|
|
|
* included with this distribution is covered by the same copyright terms
|
|
|
|
* except that the holder is Tim Hudson (tjh@cryptsoft.com).
|
2015-01-22 03:40:55 +00:00
|
|
|
*
|
1998-12-21 10:52:47 +00:00
|
|
|
* Copyright remains Eric Young's, and as such any Copyright notices in
|
|
|
|
* the code are not to be removed.
|
|
|
|
* If this package is used in a product, Eric Young should be given attribution
|
|
|
|
* as the author of the parts of the library used.
|
|
|
|
* This can be in the form of a textual message at program startup or
|
|
|
|
* in documentation (online or textual) provided with the package.
|
2015-01-22 03:40:55 +00:00
|
|
|
*
|
1998-12-21 10:52:47 +00:00
|
|
|
* Redistribution and use in source and binary forms, with or without
|
|
|
|
* modification, are permitted provided that the following conditions
|
|
|
|
* are met:
|
|
|
|
* 1. Redistributions of source code must retain the copyright
|
|
|
|
* notice, this list of conditions and the following disclaimer.
|
|
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
|
|
* documentation and/or other materials provided with the distribution.
|
|
|
|
* 3. All advertising materials mentioning features or use of this software
|
|
|
|
* must display the following acknowledgement:
|
|
|
|
* "This product includes cryptographic software written by
|
|
|
|
* Eric Young (eay@cryptsoft.com)"
|
|
|
|
* The word 'cryptographic' can be left out if the rouines from the library
|
|
|
|
* being used are not cryptographic related :-).
|
2015-01-22 03:40:55 +00:00
|
|
|
* 4. If you include any Windows specific code (or a derivative thereof) from
|
1998-12-21 10:52:47 +00:00
|
|
|
* the apps directory (application code) you must include an acknowledgement:
|
|
|
|
* "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
|
2015-01-22 03:40:55 +00:00
|
|
|
*
|
1998-12-21 10:52:47 +00:00
|
|
|
* THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
|
|
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
|
|
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
|
|
|
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
|
|
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
|
|
|
* SUCH DAMAGE.
|
2015-01-22 03:40:55 +00:00
|
|
|
*
|
1998-12-21 10:52:47 +00:00
|
|
|
* The licence and distribution terms for any publically available version or
|
|
|
|
* derivative of this code cannot be changed. i.e. this code cannot simply be
|
|
|
|
* copied and put under another distribution licence
|
|
|
|
* [including the GNU Public Licence.]
|
|
|
|
*/
|
|
|
|
|
|
|
|
#ifndef HEADER_E_OS_H
|
2015-01-22 03:40:55 +00:00
|
|
|
# define HEADER_E_OS_H
|
1998-12-21 10:52:47 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# include <openssl/opensslconf.h>
|
1999-06-10 08:12:20 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# include <openssl/e_os2.h>
|
|
|
|
/*
|
|
|
|
* <openssl/e_os2.h> contains what we can justify to make visible to the
|
|
|
|
* outside; this file e_os.h is not part of the exported interface.
|
|
|
|
*/
|
1999-05-15 13:26:11 +00:00
|
|
|
|
1998-12-21 10:52:47 +00:00
|
|
|
#ifdef __cplusplus
|
|
|
|
extern "C" {
|
|
|
|
#endif
|
|
|
|
|
1998-12-21 10:56:39 +00:00
|
|
|
/* Used to checking reference counts, most while doing perl5 stuff :-) */
|
2015-01-22 03:40:55 +00:00
|
|
|
# ifdef REF_PRINT
|
|
|
|
# undef REF_PRINT
|
|
|
|
# define REF_PRINT(a,b) fprintf(stderr,"%08X:%4d:%s\n",(int)b,b->references,a)
|
|
|
|
# endif
|
1998-12-21 10:56:39 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# ifndef DEVRANDOM
|
|
|
|
/*
|
|
|
|
* set this to a comma-separated list of 'random' device files to try out. My
|
|
|
|
* default, we will try to read at least one of these files
|
|
|
|
*/
|
|
|
|
# define DEVRANDOM "/dev/urandom","/dev/random","/dev/srandom"
|
|
|
|
# endif
|
|
|
|
# ifndef DEVRANDOM_EGD
|
|
|
|
/*
|
|
|
|
* set this to a comma-separated list of 'egd' sockets to try out. These
|
|
|
|
* sockets will be tried in the order listed in case accessing the device
|
|
|
|
* files listed in DEVRANDOM did not return enough entropy.
|
|
|
|
*/
|
|
|
|
# define DEVRANDOM_EGD "/var/run/egd-pool","/dev/egd-pool","/etc/egd-pool","/etc/entropy"
|
|
|
|
# endif
|
1998-12-21 10:52:47 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# if defined(OPENSSL_SYS_VXWORKS)
|
2002-02-14 15:37:38 +00:00
|
|
|
# define NO_SYS_PARAM_H
|
|
|
|
# define NO_CHMOD
|
|
|
|
# define NO_SYSLOG
|
2015-01-22 03:40:55 +00:00
|
|
|
# endif
|
|
|
|
|
1998-12-21 10:52:47 +00:00
|
|
|
/********************************************************************
|
|
|
|
The Microsoft section
|
|
|
|
********************************************************************/
|
2015-01-22 03:40:55 +00:00
|
|
|
# if defined(OPENSSL_SYS_WIN32) && !defined(WIN32)
|
2000-01-20 23:59:24 +00:00
|
|
|
# define WIN32
|
2015-01-22 03:40:55 +00:00
|
|
|
# endif
|
|
|
|
# if defined(OPENSSL_SYS_WINDOWS) && !defined(WINDOWS)
|
2001-02-19 16:06:34 +00:00
|
|
|
# define WINDOWS
|
2015-01-22 03:40:55 +00:00
|
|
|
# endif
|
|
|
|
# if defined(OPENSSL_SYS_MSDOS) && !defined(MSDOS)
|
2001-02-19 16:06:34 +00:00
|
|
|
# define MSDOS
|
2015-01-22 03:40:55 +00:00
|
|
|
# endif
|
1998-12-21 10:52:47 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# if defined(MSDOS) && !defined(GETPID_IS_MEANINGLESS)
|
1999-12-19 16:07:19 +00:00
|
|
|
# define GETPID_IS_MEANINGLESS
|
2015-01-22 03:40:55 +00:00
|
|
|
# endif
|
1999-12-19 16:07:19 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# ifdef WIN32
|
|
|
|
# define NO_SYS_UN_H
|
|
|
|
# define get_last_sys_error() GetLastError()
|
|
|
|
# define clear_sys_error() SetLastError(0)
|
|
|
|
# if !defined(WINNT)
|
|
|
|
# define WIN_CONSOLE_BUG
|
|
|
|
# endif
|
|
|
|
# else
|
|
|
|
# define get_last_sys_error() errno
|
|
|
|
# define clear_sys_error() errno=0
|
|
|
|
# endif
|
1998-12-21 10:56:39 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# if defined(WINDOWS)
|
|
|
|
# define get_last_socket_error() WSAGetLastError()
|
|
|
|
# define clear_socket_error() WSASetLastError(0)
|
|
|
|
# define readsocket(s,b,n) recv((s),(b),(n),0)
|
|
|
|
# define writesocket(s,b,n) send((s),(b),(n),0)
|
|
|
|
# elif defined(__DJGPP__)
|
|
|
|
# define WATT32
|
|
|
|
# define get_last_socket_error() errno
|
|
|
|
# define clear_socket_error() errno=0
|
|
|
|
# define closesocket(s) close_s(s)
|
|
|
|
# define readsocket(s,b,n) read_s(s,b,n)
|
|
|
|
# define writesocket(s,b,n) send(s,b,n,0)
|
|
|
|
# elif defined(OPENSSL_SYS_VMS)
|
|
|
|
# define get_last_socket_error() errno
|
|
|
|
# define clear_socket_error() errno=0
|
|
|
|
# define ioctlsocket(a,b,c) ioctl(a,b,c)
|
|
|
|
# define closesocket(s) close(s)
|
|
|
|
# define readsocket(s,b,n) recv((s),(b),(n),0)
|
|
|
|
# define writesocket(s,b,n) send((s),(b),(n),0)
|
|
|
|
# elif defined(OPENSSL_SYS_VXWORKS)
|
|
|
|
# define get_last_socket_error() errno
|
|
|
|
# define clear_socket_error() errno=0
|
|
|
|
# define ioctlsocket(a,b,c) ioctl((a),(b),(int)(c))
|
|
|
|
# define closesocket(s) close(s)
|
|
|
|
# define readsocket(s,b,n) read((s),(b),(n))
|
|
|
|
# define writesocket(s,b,n) write((s),(char *)(b),(n))
|
|
|
|
# elif defined(OPENSSL_SYS_NETWARE)
|
|
|
|
# if defined(NETWARE_BSDSOCK)
|
|
|
|
# define get_last_socket_error() errno
|
|
|
|
# define clear_socket_error() errno=0
|
|
|
|
# define closesocket(s) close(s)
|
|
|
|
# define ioctlsocket(a,b,c) ioctl(a,b,c)
|
|
|
|
# if defined(NETWARE_LIBC)
|
|
|
|
# define readsocket(s,b,n) recv((s),(b),(n),0)
|
|
|
|
# define writesocket(s,b,n) send((s),(b),(n),0)
|
|
|
|
# else
|
|
|
|
# define readsocket(s,b,n) recv((s),(char*)(b),(n),0)
|
|
|
|
# define writesocket(s,b,n) send((s),(char*)(b),(n),0)
|
|
|
|
# endif
|
|
|
|
# else
|
|
|
|
# define get_last_socket_error() WSAGetLastError()
|
|
|
|
# define clear_socket_error() WSASetLastError(0)
|
|
|
|
# define readsocket(s,b,n) recv((s),(b),(n),0)
|
|
|
|
# define writesocket(s,b,n) send((s),(b),(n),0)
|
|
|
|
# endif
|
|
|
|
# else
|
|
|
|
# define get_last_socket_error() errno
|
|
|
|
# define clear_socket_error() errno=0
|
|
|
|
# define ioctlsocket(a,b,c) ioctl(a,b,c)
|
|
|
|
# define closesocket(s) close(s)
|
|
|
|
# define readsocket(s,b,n) read((s),(b),(n))
|
|
|
|
# define writesocket(s,b,n) write((s),(b),(n))
|
|
|
|
# endif
|
1998-12-21 10:56:39 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# if (defined(WINDOWS) || defined(MSDOS))
|
1998-12-21 10:52:47 +00:00
|
|
|
|
2014-08-09 12:02:20 +00:00
|
|
|
# ifdef __DJGPP__
|
2015-01-22 03:40:55 +00:00
|
|
|
# include <unistd.h>
|
|
|
|
# include <sys/stat.h>
|
|
|
|
# include <sys/socket.h>
|
|
|
|
# include <tcp.h>
|
|
|
|
# include <netdb.h>
|
|
|
|
# define _setmode setmode
|
|
|
|
# define _O_TEXT O_TEXT
|
|
|
|
# define _O_BINARY O_BINARY
|
|
|
|
# undef DEVRANDOM
|
|
|
|
# define DEVRANDOM "/dev/urandom\x24"
|
|
|
|
# endif /* __DJGPP__ */
|
2014-08-09 12:02:20 +00:00
|
|
|
|
2000-03-02 07:42:48 +00:00
|
|
|
# ifndef S_IFDIR
|
2015-01-22 03:40:55 +00:00
|
|
|
# define S_IFDIR _S_IFDIR
|
2000-03-02 07:42:48 +00:00
|
|
|
# endif
|
1999-03-08 18:41:15 +00:00
|
|
|
|
2000-03-02 07:42:48 +00:00
|
|
|
# ifndef S_IFMT
|
2015-01-22 03:40:55 +00:00
|
|
|
# define S_IFMT _S_IFMT
|
2000-03-02 07:42:48 +00:00
|
|
|
# endif
|
1999-03-08 18:41:15 +00:00
|
|
|
|
2014-08-09 12:02:20 +00:00
|
|
|
# if !defined(WINNT) && !defined(__DJGPP__)
|
2015-01-22 03:40:55 +00:00
|
|
|
# define NO_SYSLOG
|
2000-03-02 07:42:48 +00:00
|
|
|
# endif
|
|
|
|
# define NO_DIRENT
|
1998-12-21 10:52:47 +00:00
|
|
|
|
|
|
|
# ifdef WINDOWS
|
2015-01-22 03:40:55 +00:00
|
|
|
# if !defined(_WIN32_WCE) && !defined(_WIN32_WINNT)
|
2005-05-21 13:19:27 +00:00
|
|
|
/*
|
2015-01-22 03:40:55 +00:00
|
|
|
* Defining _WIN32_WINNT here in e_os.h implies certain "discipline."
|
|
|
|
* Most notably we ought to check for availability of each specific
|
|
|
|
* routine with GetProcAddress() and/or guard NT-specific calls with
|
|
|
|
* GetVersion() < 0x80000000. One can argue that in latter "or" case
|
|
|
|
* we ought to /DELAYLOAD some .DLLs in order to protect ourselves
|
|
|
|
* against run-time link errors. This doesn't seem to be necessary,
|
|
|
|
* because it turned out that already Windows 95, first non-NT Win32
|
|
|
|
* implementation, is equipped with at least NT 3.51 stubs, dummy
|
|
|
|
* routines with same name, but which do nothing. Meaning that it's
|
|
|
|
* apparently sufficient to guard "vanilla" NT calls with GetVersion
|
|
|
|
* alone, while NT 4.0 and above interfaces ought to be linked with
|
|
|
|
* GetProcAddress at run-time.
|
|
|
|
*/
|
|
|
|
# define _WIN32_WINNT 0x0400
|
|
|
|
# endif
|
|
|
|
# if !defined(OPENSSL_NO_SOCK) && (defined(_WIN32_WINNT) || defined(_WIN32_WCE))
|
2006-01-02 13:44:06 +00:00
|
|
|
/*
|
|
|
|
* Just like defining _WIN32_WINNT including winsock2.h implies
|
2009-04-20 11:33:12 +00:00
|
|
|
* certain "discipline" for maintaining [broad] binary compatibility.
|
2006-01-02 13:44:06 +00:00
|
|
|
* As long as structures are invariant among Winsock versions,
|
|
|
|
* it's sufficient to check for specific Winsock2 API availability
|
|
|
|
* at run-time [DSO_global_lookup is recommended]...
|
|
|
|
*/
|
2015-01-22 03:40:55 +00:00
|
|
|
# include <winsock2.h>
|
|
|
|
# include <ws2tcpip.h>
|
2009-04-20 11:33:12 +00:00
|
|
|
/* yes, they have to be #included prior to <windows.h> */
|
2015-01-22 03:40:55 +00:00
|
|
|
# endif
|
|
|
|
# include <windows.h>
|
|
|
|
# include <stdio.h>
|
|
|
|
# include <stddef.h>
|
|
|
|
# include <errno.h>
|
|
|
|
# if defined(_WIN32_WCE) && !defined(EACCES)
|
|
|
|
# define EACCES 13
|
|
|
|
# endif
|
|
|
|
# include <string.h>
|
|
|
|
# ifdef _WIN64
|
|
|
|
# define strlen(s) _strlen31(s)
|
2005-07-05 11:44:45 +00:00
|
|
|
/* cut strings to 2GB */
|
2014-09-30 19:05:33 +00:00
|
|
|
static __inline unsigned int _strlen31(const char *str)
|
2015-01-22 03:40:55 +00:00
|
|
|
{
|
|
|
|
unsigned int len = 0;
|
|
|
|
while (*str && len < 0x80000000U)
|
|
|
|
str++, len++;
|
|
|
|
return len & 0x7FFFFFFF;
|
|
|
|
}
|
|
|
|
# endif
|
|
|
|
# include <malloc.h>
|
|
|
|
# if defined(_MSC_VER) && _MSC_VER<=1200 && defined(_MT) && defined(isspace)
|
2008-12-22 13:54:12 +00:00
|
|
|
/* compensate for bug in VC6 ctype.h */
|
2015-01-22 03:40:55 +00:00
|
|
|
# undef isspace
|
|
|
|
# undef isdigit
|
|
|
|
# undef isalnum
|
|
|
|
# undef isupper
|
|
|
|
# undef isxdigit
|
|
|
|
# endif
|
|
|
|
# if defined(_MSC_VER) && !defined(_WIN32_WCE) && !defined(_DLL) && defined(stdin)
|
|
|
|
# if _MSC_VER>=1300 && _MSC_VER<1600
|
|
|
|
# undef stdin
|
|
|
|
# undef stdout
|
|
|
|
# undef stderr
|
|
|
|
FILE *__iob_func();
|
|
|
|
# define stdin (&__iob_func()[0])
|
|
|
|
# define stdout (&__iob_func()[1])
|
|
|
|
# define stderr (&__iob_func()[2])
|
|
|
|
# elif _MSC_VER<1300 && defined(I_CAN_LIVE_WITH_LNK4049)
|
|
|
|
# undef stdin
|
|
|
|
# undef stdout
|
|
|
|
# undef stderr
|
|
|
|
/*
|
|
|
|
* pre-1300 has __p__iob(), but it's available only in msvcrt.lib,
|
|
|
|
* or in other words with /MD. Declaring implicit import, i.e. with
|
|
|
|
* _imp_ prefix, works correctly with all compiler options, but
|
|
|
|
* without /MD results in LINK warning LNK4049: 'locally defined
|
|
|
|
* symbol "__iob" imported'.
|
2008-12-22 13:54:12 +00:00
|
|
|
*/
|
2015-01-22 03:40:55 +00:00
|
|
|
extern FILE *_imp___iob;
|
|
|
|
# define stdin (&_imp___iob[0])
|
|
|
|
# define stdout (&_imp___iob[1])
|
|
|
|
# define stderr (&_imp___iob[2])
|
2008-12-22 13:54:12 +00:00
|
|
|
# endif
|
2015-01-22 03:40:55 +00:00
|
|
|
# endif
|
1998-12-21 10:52:47 +00:00
|
|
|
# endif
|
2015-01-22 03:40:55 +00:00
|
|
|
# include <io.h>
|
|
|
|
# include <fcntl.h>
|
1998-12-21 10:52:47 +00:00
|
|
|
|
2002-11-15 22:37:18 +00:00
|
|
|
# ifdef OPENSSL_SYS_WINCE
|
2015-01-22 03:40:55 +00:00
|
|
|
# define OPENSSL_NO_POSIX_IO
|
2002-11-15 22:37:18 +00:00
|
|
|
# endif
|
|
|
|
|
2000-03-02 07:42:48 +00:00
|
|
|
# if defined (__BORLANDC__)
|
2015-01-22 03:40:55 +00:00
|
|
|
# define _setmode setmode
|
|
|
|
# define _O_TEXT O_TEXT
|
|
|
|
# define _O_BINARY O_BINARY
|
|
|
|
# define _int64 __int64
|
|
|
|
# define _kbhit kbhit
|
2000-03-02 07:42:48 +00:00
|
|
|
# endif
|
1999-05-06 00:46:34 +00:00
|
|
|
|
2005-12-18 19:11:37 +00:00
|
|
|
# define EXIT(n) exit(n)
|
1998-12-21 10:52:47 +00:00
|
|
|
# define LIST_SEPARATOR_CHAR ';'
|
2000-03-02 07:42:48 +00:00
|
|
|
# ifndef X_OK
|
2015-01-22 03:40:55 +00:00
|
|
|
# define X_OK 0
|
2000-03-02 07:42:48 +00:00
|
|
|
# endif
|
|
|
|
# ifndef W_OK
|
2015-01-22 03:40:55 +00:00
|
|
|
# define W_OK 2
|
2000-03-02 07:42:48 +00:00
|
|
|
# endif
|
|
|
|
# ifndef R_OK
|
2015-01-22 03:40:55 +00:00
|
|
|
# define R_OK 4
|
2000-03-02 07:42:48 +00:00
|
|
|
# endif
|
2015-01-22 03:40:55 +00:00
|
|
|
# define OPENSSL_CONF "openssl.cnf"
|
|
|
|
# define SSLEAY_CONF OPENSSL_CONF
|
|
|
|
# define NUL_DEV "nul"
|
|
|
|
# define RFILE ".rnd"
|
2002-11-15 22:37:18 +00:00
|
|
|
# ifdef OPENSSL_SYS_WINCE
|
2015-01-22 03:40:55 +00:00
|
|
|
# define DEFAULT_HOME ""
|
2002-11-15 22:37:18 +00:00
|
|
|
# else
|
2015-01-22 03:40:55 +00:00
|
|
|
# define DEFAULT_HOME "C:"
|
2002-11-15 22:37:18 +00:00
|
|
|
# endif
|
1998-12-21 10:52:47 +00:00
|
|
|
|
2015-01-09 14:06:36 +00:00
|
|
|
/* Avoid Visual Studio 13 GetVersion deprecated problems */
|
2015-01-22 03:40:55 +00:00
|
|
|
# if defined(_MSC_VER) && _MSC_VER>=1800
|
|
|
|
# define check_winnt() (1)
|
|
|
|
# define check_win_minplat(x) (1)
|
|
|
|
# else
|
|
|
|
# define check_winnt() (GetVersion() < 0x80000000)
|
|
|
|
# define check_win_minplat(x) (LOBYTE(LOWORD(GetVersion())) >= (x))
|
|
|
|
# endif
|
2014-08-19 11:18:07 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# else /* The non-microsoft world */
|
1998-12-21 10:52:47 +00:00
|
|
|
|
2001-02-19 16:06:34 +00:00
|
|
|
# ifdef OPENSSL_SYS_VMS
|
2015-01-22 03:40:55 +00:00
|
|
|
# define VMS 1
|
|
|
|
/*
|
|
|
|
* some programs don't include stdlib, so exit() and others give implicit
|
|
|
|
* function warnings
|
|
|
|
*/
|
|
|
|
# include <stdlib.h>
|
|
|
|
# if defined(__DECC)
|
|
|
|
# include <unistd.h>
|
|
|
|
# else
|
|
|
|
# include <unixlib.h>
|
|
|
|
# endif
|
|
|
|
# define OPENSSL_CONF "openssl.cnf"
|
|
|
|
# define SSLEAY_CONF OPENSSL_CONF
|
|
|
|
# define RFILE ".rnd"
|
|
|
|
# define LIST_SEPARATOR_CHAR ','
|
|
|
|
# define NUL_DEV "NLA0:"
|
2001-01-08 10:59:26 +00:00
|
|
|
/* We don't have any well-defined random devices on VMS, yet... */
|
2015-01-22 03:40:55 +00:00
|
|
|
# undef DEVRANDOM
|
2014-12-28 02:48:40 +00:00
|
|
|
/*-
|
|
|
|
We need to do this since VMS has the following coding on status codes:
|
2000-03-17 09:25:36 +00:00
|
|
|
|
|
|
|
Bits 0-2: status type: 0 = warning, 1 = success, 2 = error, 3 = info ...
|
|
|
|
The important thing to know is that odd numbers are considered
|
2015-01-22 03:40:55 +00:00
|
|
|
good, while even ones are considered errors.
|
2000-03-17 09:25:36 +00:00
|
|
|
Bits 3-15: actual status number
|
|
|
|
Bits 16-27: facility number. 0 is considered "unknown"
|
|
|
|
Bits 28-31: control bits. If bit 28 is set, the shell won't try to
|
|
|
|
output the message (which, for random codes, just looks ugly)
|
|
|
|
|
|
|
|
So, what we do here is to change 0 to 1 to get the default success status,
|
|
|
|
and everything else is shifted up to fit into the status number field, and
|
|
|
|
the status is tagged as an error, which I believe is what is wanted here.
|
|
|
|
-- Richard Levitte
|
|
|
|
*/
|
2015-01-22 03:40:55 +00:00
|
|
|
# define EXIT(n) do { int __VMS_EXIT = n; \
|
2000-03-17 09:25:36 +00:00
|
|
|
if (__VMS_EXIT == 0) \
|
2015-01-22 03:40:55 +00:00
|
|
|
__VMS_EXIT = 1; \
|
|
|
|
else \
|
|
|
|
__VMS_EXIT = (n << 3) | 2; \
|
1999-05-13 11:37:32 +00:00
|
|
|
__VMS_EXIT |= 0x10000000; \
|
2015-01-22 03:40:55 +00:00
|
|
|
exit(__VMS_EXIT); } while(0)
|
|
|
|
# define NO_SYS_PARAM_H
|
2015-01-29 12:07:53 +00:00
|
|
|
# define NO_SYS_UN_H
|
2003-11-28 13:10:58 +00:00
|
|
|
|
|
|
|
# elif defined(OPENSSL_SYS_NETWARE)
|
2015-01-22 03:40:55 +00:00
|
|
|
# include <fcntl.h>
|
|
|
|
# include <unistd.h>
|
|
|
|
# define NO_SYS_TYPES_H
|
|
|
|
# undef DEVRANDOM
|
|
|
|
# ifdef NETWARE_CLIB
|
|
|
|
# define getpid GetThreadID
|
|
|
|
extern int GetThreadID(void);
|
2008-01-03 22:43:04 +00:00
|
|
|
/* # include <conio.h> */
|
2015-01-22 03:40:55 +00:00
|
|
|
extern int kbhit(void);
|
|
|
|
# else
|
|
|
|
# include <screen.h>
|
|
|
|
# endif
|
|
|
|
# define NO_SYSLOG
|
|
|
|
# define _setmode setmode
|
|
|
|
# define _kbhit kbhit
|
|
|
|
# define _O_TEXT O_TEXT
|
|
|
|
# define _O_BINARY O_BINARY
|
|
|
|
# define OPENSSL_CONF "openssl.cnf"
|
|
|
|
# define SSLEAY_CONF OPENSSL_CONF
|
|
|
|
# define RFILE ".rnd"
|
|
|
|
# define LIST_SEPARATOR_CHAR ';'
|
|
|
|
# define EXIT(n) { if (n) printf("ERROR: %d\n", (int)n); exit(n); }
|
2003-11-28 13:10:58 +00:00
|
|
|
|
1998-12-21 10:52:47 +00:00
|
|
|
# else
|
1999-06-10 08:12:20 +00:00
|
|
|
/* !defined VMS */
|
2015-01-22 03:40:55 +00:00
|
|
|
# ifdef OPENSSL_UNISTD
|
|
|
|
# include OPENSSL_UNISTD
|
|
|
|
# else
|
|
|
|
# include <unistd.h>
|
|
|
|
# endif
|
|
|
|
# ifndef NO_SYS_TYPES_H
|
|
|
|
# include <sys/types.h>
|
|
|
|
# endif
|
|
|
|
# ifdef OPENSSL_SYS_WIN32_CYGWIN
|
|
|
|
# include <io.h>
|
|
|
|
# include <fcntl.h>
|
|
|
|
# endif
|
|
|
|
|
|
|
|
# define OPENSSL_CONF "openssl.cnf"
|
|
|
|
# define SSLEAY_CONF OPENSSL_CONF
|
|
|
|
# define RFILE ".rnd"
|
|
|
|
# define LIST_SEPARATOR_CHAR ':'
|
|
|
|
# define NUL_DEV "/dev/null"
|
|
|
|
# define EXIT(n) exit(n)
|
1998-12-21 10:52:47 +00:00
|
|
|
# endif
|
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# define SSLeay_getpid() getpid()
|
1998-12-21 10:52:47 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# endif
|
1999-05-13 11:37:32 +00:00
|
|
|
|
1998-12-21 10:52:47 +00:00
|
|
|
/*************/
|
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# if defined(OPENSSL_NO_SOCK) && !defined(OPENSSL_NO_DGRAM)
|
2014-09-04 21:15:42 +00:00
|
|
|
# define OPENSSL_NO_DGRAM
|
2015-01-22 03:40:55 +00:00
|
|
|
# endif
|
2014-09-04 21:15:42 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# ifdef USE_SOCKETS
|
2002-11-14 11:22:01 +00:00
|
|
|
# if defined(WINDOWS) || defined(MSDOS)
|
1998-12-21 10:52:47 +00:00
|
|
|
/* windows world */
|
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# ifdef OPENSSL_NO_SOCK
|
|
|
|
# define SSLeay_Write(a,b,c) (-1)
|
|
|
|
# define SSLeay_Read(a,b,c) (-1)
|
|
|
|
# define SHUTDOWN(fd) close(fd)
|
|
|
|
# define SHUTDOWN2(fd) close(fd)
|
|
|
|
# elif !defined(__DJGPP__)
|
|
|
|
# if defined(_WIN32_WCE) && _WIN32_WCE<410
|
|
|
|
# define getservbyname _masked_declaration_getservbyname
|
|
|
|
# endif
|
|
|
|
# if !defined(IPPROTO_IP)
|
2006-10-23 07:41:05 +00:00
|
|
|
/* winsock[2].h was included already? */
|
2015-01-22 03:40:55 +00:00
|
|
|
# include <winsock.h>
|
|
|
|
# endif
|
|
|
|
# ifdef getservbyname
|
|
|
|
# undef getservbyname
|
2005-11-09 17:19:38 +00:00
|
|
|
/* this is used to be wcecompat/include/winsock_extras.h */
|
2015-01-22 03:40:55 +00:00
|
|
|
struct servent *PASCAL getservbyname(const char *, const char *);
|
|
|
|
# endif
|
2005-11-09 17:19:38 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# ifdef _WIN64
|
2005-07-05 11:44:45 +00:00
|
|
|
/*
|
|
|
|
* Even though sizeof(SOCKET) is 8, it's safe to cast it to int, because
|
|
|
|
* the value constitutes an index in per-process table of limited size
|
|
|
|
* and not a real pointer.
|
|
|
|
*/
|
2015-01-22 03:40:55 +00:00
|
|
|
# define socket(d,t,p) ((int)socket(d,t,p))
|
|
|
|
# define accept(s,f,l) ((int)accept(s,f,l))
|
1998-12-21 10:52:47 +00:00
|
|
|
# endif
|
2015-01-22 03:40:55 +00:00
|
|
|
# define SSLeay_Write(a,b,c) send((a),(b),(c),0)
|
|
|
|
# define SSLeay_Read(a,b,c) recv((a),(b),(c),0)
|
|
|
|
# define SHUTDOWN(fd) { shutdown((fd),0); closesocket(fd); }
|
|
|
|
# define SHUTDOWN2(fd) { shutdown((fd),2); closesocket(fd); }
|
|
|
|
# else
|
|
|
|
# define SSLeay_Write(a,b,c) write_s(a,b,c,0)
|
|
|
|
# define SSLeay_Read(a,b,c) read_s(a,b,c)
|
|
|
|
# define SHUTDOWN(fd) close_s(fd)
|
|
|
|
# define SHUTDOWN2(fd) close_s(fd)
|
|
|
|
# endif
|
1998-12-21 10:52:47 +00:00
|
|
|
|
2003-11-28 13:10:58 +00:00
|
|
|
# elif defined(OPENSSL_SYS_NETWARE)
|
2015-01-22 03:40:55 +00:00
|
|
|
/*
|
|
|
|
* NetWare uses the WinSock2 interfaces by default, but can be
|
|
|
|
* configured for BSD
|
|
|
|
*/
|
|
|
|
# if defined(NETWARE_BSDSOCK)
|
|
|
|
# include <sys/socket.h>
|
|
|
|
# include <netinet/in.h>
|
|
|
|
# include <sys/time.h>
|
|
|
|
# if defined(NETWARE_CLIB)
|
|
|
|
# include <sys/bsdskt.h>
|
1999-05-13 11:37:32 +00:00
|
|
|
# else
|
2015-01-22 03:40:55 +00:00
|
|
|
# include <sys/select.h>
|
1998-12-21 10:52:47 +00:00
|
|
|
# endif
|
2015-01-22 03:40:55 +00:00
|
|
|
# define INVALID_SOCKET (int)(~0)
|
|
|
|
# else
|
|
|
|
# include <novsock2.h>
|
|
|
|
# endif
|
|
|
|
# define SSLeay_Write(a,b,c) send((a),(b),(c),0)
|
|
|
|
# define SSLeay_Read(a,b,c) recv((a),(b),(c),0)
|
|
|
|
# define SHUTDOWN(fd) { shutdown((fd),0); closesocket(fd); }
|
|
|
|
# define SHUTDOWN2(fd) { shutdown((fd),2); closesocket(fd); }
|
1998-12-21 10:52:47 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# else
|
1998-12-21 10:52:47 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# ifndef NO_SYS_PARAM_H
|
|
|
|
# include <sys/param.h>
|
|
|
|
# endif
|
|
|
|
# ifdef OPENSSL_SYS_VXWORKS
|
|
|
|
# include <time.h>
|
|
|
|
# endif
|
|
|
|
|
|
|
|
# include <netdb.h>
|
|
|
|
# if defined(OPENSSL_SYS_VMS_NODECC)
|
|
|
|
# include <socket.h>
|
|
|
|
# include <in.h>
|
|
|
|
# include <inet.h>
|
|
|
|
# else
|
|
|
|
# include <sys/socket.h>
|
|
|
|
# ifndef NO_SYS_UN_H
|
|
|
|
# ifdef OPENSSL_SYS_VXWORKS
|
|
|
|
# include <streams/un.h>
|
|
|
|
# else
|
|
|
|
# include <sys/un.h>
|
|
|
|
# endif
|
|
|
|
# ifndef UNIX_PATH_MAX
|
|
|
|
# define UNIX_PATH_MAX sizeof(((struct sockaddr_un *)NULL)->sun_path)
|
|
|
|
# endif
|
2000-09-01 09:54:25 +00:00
|
|
|
# endif
|
2015-01-22 03:40:55 +00:00
|
|
|
# ifdef FILIO_H
|
|
|
|
# include <sys/filio.h> /* Added for FIONBIO under unixware */
|
|
|
|
# endif
|
|
|
|
# include <netinet/in.h>
|
|
|
|
# include <arpa/inet.h>
|
|
|
|
# endif
|
|
|
|
|
|
|
|
# ifdef OPENSSL_SYS_AIX
|
|
|
|
# include <sys/select.h>
|
|
|
|
# endif
|
|
|
|
|
|
|
|
# ifdef __QNX__
|
|
|
|
# include <sys/select.h>
|
|
|
|
# endif
|
|
|
|
|
|
|
|
# if defined(sun)
|
|
|
|
# include <sys/filio.h>
|
|
|
|
# else
|
|
|
|
# ifndef VMS
|
|
|
|
# include <sys/ioctl.h>
|
1998-12-21 10:52:47 +00:00
|
|
|
# else
|
2015-01-22 03:40:55 +00:00
|
|
|
/* ioctl is only in VMS > 7.0 and when socketshr is not used */
|
|
|
|
# if !defined(TCPIP_TYPE_SOCKETSHR) && defined(__VMS_VER) && (__VMS_VER > 70000000)
|
|
|
|
# include <sys/ioctl.h>
|
|
|
|
# endif
|
1998-12-21 10:52:47 +00:00
|
|
|
# endif
|
2015-01-22 03:40:55 +00:00
|
|
|
# endif
|
1998-12-21 10:52:47 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# ifdef VMS
|
|
|
|
# include <unixio.h>
|
|
|
|
# if defined(TCPIP_TYPE_SOCKETSHR)
|
|
|
|
# include <socketshr.h>
|
1998-12-21 10:52:47 +00:00
|
|
|
# endif
|
2015-01-22 03:40:55 +00:00
|
|
|
# endif
|
|
|
|
|
|
|
|
# define SSLeay_Read(a,b,c) read((a),(b),(c))
|
|
|
|
# define SSLeay_Write(a,b,c) write((a),(b),(c))
|
|
|
|
# define SHUTDOWN(fd) { shutdown((fd),0); closesocket((fd)); }
|
|
|
|
# define SHUTDOWN2(fd) { shutdown((fd),2); closesocket((fd)); }
|
|
|
|
# ifndef INVALID_SOCKET
|
|
|
|
# define INVALID_SOCKET (-1)
|
|
|
|
# endif /* INVALID_SOCKET */
|
1998-12-21 10:52:47 +00:00
|
|
|
# endif
|
2009-08-26 15:15:15 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
/*
|
|
|
|
* Some IPv6 implementations are broken, disable them in known bad versions.
|
2009-08-26 15:15:15 +00:00
|
|
|
*/
|
|
|
|
# if !defined(OPENSSL_USE_IPV6)
|
2015-01-22 03:40:55 +00:00
|
|
|
# if defined(AF_INET6) && !defined(NETWARE_CLIB)
|
|
|
|
# define OPENSSL_USE_IPV6 1
|
|
|
|
# else
|
|
|
|
# define OPENSSL_USE_IPV6 0
|
|
|
|
# endif
|
2009-08-26 15:15:15 +00:00
|
|
|
# endif
|
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# endif
|
1998-12-21 10:52:47 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# if defined(sun) && !defined(__svr4__) && !defined(__SVR4)
|
2001-08-25 11:33:34 +00:00
|
|
|
/* include headers first, so our defines don't break it */
|
2015-01-22 03:40:55 +00:00
|
|
|
# include <stdlib.h>
|
|
|
|
# include <string.h>
|
2000-06-09 16:43:49 +00:00
|
|
|
/* bcopy can handle overlapping moves according to SunOS 4.1.4 manpage */
|
2015-01-22 03:40:55 +00:00
|
|
|
# define memmove(s1,s2,n) bcopy((s2),(s1),(n))
|
|
|
|
# define strtoul(s,e,b) ((unsigned long int)strtol((s),(e),(b)))
|
|
|
|
extern char *sys_errlist[];
|
|
|
|
extern int sys_nerr;
|
|
|
|
# define strerror(errnum) \
|
|
|
|
(((errnum)<0 || (errnum)>=sys_nerr) ? NULL : sys_errlist[errnum])
|
2005-09-20 20:19:07 +00:00
|
|
|
/* Being signed SunOS 4.x memcpy breaks ASN1_OBJECT table lookup */
|
2015-01-22 03:40:55 +00:00
|
|
|
# include "crypto/o_str.h"
|
|
|
|
# define memcmp OPENSSL_memcmp
|
|
|
|
# endif
|
2000-05-19 08:53:06 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# ifndef OPENSSL_EXIT
|
|
|
|
# if defined(MONOLITH) && !defined(OPENSSL_C)
|
|
|
|
# define OPENSSL_EXIT(n) return(n)
|
|
|
|
# else
|
|
|
|
# define OPENSSL_EXIT(n) do { EXIT(n); return(n); } while(0)
|
|
|
|
# endif
|
2002-12-03 16:33:03 +00:00
|
|
|
# endif
|
|
|
|
|
1998-12-21 10:52:47 +00:00
|
|
|
/***********************************************/
|
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# if defined(OPENSSL_SYS_WINDOWS)
|
2003-09-09 14:48:36 +00:00
|
|
|
# define strcasecmp _stricmp
|
|
|
|
# define strncasecmp _strnicmp
|
2015-01-22 03:40:55 +00:00
|
|
|
# elif defined(OPENSSL_SYS_VMS)
|
2003-09-09 14:48:36 +00:00
|
|
|
/* VMS below version 7.0 doesn't have strcasecmp() */
|
2004-03-24 09:41:33 +00:00
|
|
|
# include "o_str.h"
|
2003-09-09 14:48:36 +00:00
|
|
|
# define strcasecmp OPENSSL_strcasecmp
|
|
|
|
# define strncasecmp OPENSSL_strncasecmp
|
2005-01-13 15:46:09 +00:00
|
|
|
# define OPENSSL_IMPLEMENTS_strncasecmp
|
2015-01-22 03:40:55 +00:00
|
|
|
# elif defined(OPENSSL_SYS_OS2) && defined(__EMX__)
|
2003-09-09 14:48:36 +00:00
|
|
|
# define strcasecmp stricmp
|
|
|
|
# define strncasecmp strnicmp
|
2015-01-22 03:40:55 +00:00
|
|
|
# elif defined(OPENSSL_SYS_NETWARE)
|
2008-01-03 22:43:04 +00:00
|
|
|
# include <string.h>
|
|
|
|
# if defined(NETWARE_CLIB)
|
2015-01-22 03:40:55 +00:00
|
|
|
# define strcasecmp stricmp
|
|
|
|
# define strncasecmp strnicmp
|
|
|
|
# endif /* NETWARE_CLIB */
|
|
|
|
# endif
|
2003-09-09 14:48:36 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# if defined(OPENSSL_SYS_OS2) && defined(__EMX__)
|
|
|
|
# include <io.h>
|
|
|
|
# include <fcntl.h>
|
|
|
|
# define NO_SYSLOG
|
|
|
|
# endif
|
2001-07-02 20:41:05 +00:00
|
|
|
|
2002-10-09 13:40:48 +00:00
|
|
|
/* vxworks */
|
2015-01-22 03:40:55 +00:00
|
|
|
# if defined(OPENSSL_SYS_VXWORKS)
|
|
|
|
# include <ioLib.h>
|
|
|
|
# include <tickLib.h>
|
|
|
|
# include <sysLib.h>
|
2002-10-09 13:40:48 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# define TTY_STRUCT int
|
2002-10-09 13:40:48 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# define sleep(a) taskDelay((a) * sysClkRateGet())
|
2002-10-09 13:40:48 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# include <vxWorks.h>
|
|
|
|
# include <sockLib.h>
|
|
|
|
# include <taskLib.h>
|
2002-10-09 13:40:48 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# define getpid taskIdSelf
|
2002-10-09 13:40:48 +00:00
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
/*
|
|
|
|
* NOTE: these are implemented by helpers in database app! if the database is
|
|
|
|
* not linked, we need to implement them elswhere
|
|
|
|
*/
|
2002-10-09 13:40:48 +00:00
|
|
|
struct hostent *gethostbyname(const char *name);
|
|
|
|
struct hostent *gethostbyaddr(const char *addr, int length, int type);
|
|
|
|
struct servent *getservbyname(const char *name, const char *proto);
|
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# endif
|
2002-10-09 13:40:48 +00:00
|
|
|
/* end vxworks */
|
|
|
|
|
2015-01-22 03:40:55 +00:00
|
|
|
# if !defined(inline) && !defined(__cplusplus)
|
|
|
|
# if defined(__STDC_VERSION__) && __STDC_VERSION__>=199901L
|
2014-09-24 22:32:56 +00:00
|
|
|
/* do nothing, inline works */
|
2015-01-22 03:40:55 +00:00
|
|
|
# elif defined(__GNUC__) && __GNUC__>=2
|
|
|
|
# define inline __inline__
|
|
|
|
# elif defined(_MSC_VER)
|
2014-09-24 22:32:56 +00:00
|
|
|
/*
|
|
|
|
* Visual Studio: inline is available in C++ only, however
|
|
|
|
* __inline is available for C, see
|
|
|
|
* http://msdn.microsoft.com/en-us/library/z8y1yy88.aspx
|
|
|
|
*/
|
2015-01-22 03:40:55 +00:00
|
|
|
# define inline __inline
|
|
|
|
# else
|
|
|
|
# define inline
|
|
|
|
# endif
|
2014-09-24 22:32:56 +00:00
|
|
|
# endif
|
2006-04-11 21:34:21 +00:00
|
|
|
|
1998-12-21 10:52:47 +00:00
|
|
|
#ifdef __cplusplus
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#endif
|