| /*************************************************************************** |
| * _ _ ____ _ |
| * Project ___| | | | _ \| | |
| * / __| | | | |_) | | |
| * | (__| |_| | _ <| |___ |
| * \___|\___/|_| \_\_____| |
| * |
| * Copyright (C) 1998 - 2021, Daniel Stenberg, <[email protected]>, et al. |
| * |
| * This software is licensed as described in the file COPYING, which |
| * you should have received as part of this distribution. The terms |
| * are also available at https://curl.se/docs/copyright.html. |
| * |
| * You may opt to use, copy, modify, merge, publish, distribute and/or sell |
| * copies of the Software, and permit persons to whom the Software is |
| * furnished to do so, under the terms of the COPYING file. |
| * |
| * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY |
| * KIND, either express or implied. |
| * |
| ***************************************************************************/ |
| |
| #include "curl_setup.h" |
| |
| #if defined(__INTEL_COMPILER) && defined(__unix__) |
| |
| #ifdef HAVE_NETINET_IN_H |
| # include <netinet/in.h> |
| #endif |
| #ifdef HAVE_ARPA_INET_H |
| # include <arpa/inet.h> |
| #endif |
| |
| #endif /* __INTEL_COMPILER && __unix__ */ |
| |
| #define BUILDING_WARNLESS_C 1 |
| |
| #include "warnless.h" |
| |
| #define CURL_MASK_UCHAR ((unsigned char)~0) |
| #define CURL_MASK_SCHAR (CURL_MASK_UCHAR >> 1) |
| |
| #define CURL_MASK_USHORT ((unsigned short)~0) |
| #define CURL_MASK_SSHORT (CURL_MASK_USHORT >> 1) |
| |
| #define CURL_MASK_UINT ((unsigned int)~0) |
| #define CURL_MASK_SINT (CURL_MASK_UINT >> 1) |
| |
| #define CURL_MASK_ULONG ((unsigned long)~0) |
| #define CURL_MASK_SLONG (CURL_MASK_ULONG >> 1) |
| |
| #define CURL_MASK_UCOFFT ((unsigned CURL_TYPEOF_CURL_OFF_T)~0) |
| #define CURL_MASK_SCOFFT (CURL_MASK_UCOFFT >> 1) |
| |
| #define CURL_MASK_USIZE_T ((size_t)~0) |
| #define CURL_MASK_SSIZE_T (CURL_MASK_USIZE_T >> 1) |
| |
| /* |
| ** unsigned long to unsigned short |
| */ |
| |
| unsigned short curlx_ultous(unsigned long ulnum) |
| { |
| #ifdef __INTEL_COMPILER |
| # pragma warning(push) |
| # pragma warning(disable:810) /* conversion may lose significant bits */ |
| #endif |
| |
| DEBUGASSERT(ulnum <= (unsigned long) CURL_MASK_USHORT); |
| return (unsigned short)(ulnum & (unsigned long) CURL_MASK_USHORT); |
| |
| #ifdef __INTEL_COMPILER |
| # pragma warning(pop) |
| #endif |
| } |
| |
| /* |
| ** unsigned long to unsigned char |
| */ |
| |
| unsigned char curlx_ultouc(unsigned long ulnum) |
| { |
| #ifdef __INTEL_COMPILER |
| # pragma warning(push) |
| # pragma warning(disable:810) /* conversion may lose significant bits */ |
| #endif |
| |
| DEBUGASSERT(ulnum <= (unsigned long) CURL_MASK_UCHAR); |
| return (unsigned char)(ulnum & (unsigned long) CURL_MASK_UCHAR); |
| |
| #ifdef __INTEL_COMPILER |
| # pragma warning(pop) |
| #endif |
| } |
| |
| /* |
| ** unsigned size_t to signed curl_off_t |
| */ |
| |
| curl_off_t curlx_uztoso(size_t uznum) |
| { |
| #ifdef __INTEL_COMPILER |
| # pragma warning(push) |
| # pragma warning(disable:810) /* conversion may lose significant bits */ |
| #elif defined(_MSC_VER) |
| # pragma warning(push) |
| # pragma warning(disable:4310) /* cast truncates constant value */ |
| #endif |
| |
| DEBUGASSERT(uznum <= (size_t) CURL_MASK_SCOFFT); |
| return (curl_off_t)(uznum & (size_t) CURL_MASK_SCOFFT); |
| |
| #if defined(__INTEL_COMPILER) || defined(_MSC_VER) |
| # pragma warning(pop) |
| #endif |
| } |
| |
| /* |
| ** unsigned size_t to signed int |
| */ |
| |
| int curlx_uztosi(size_t uznum) |
| { |
| #ifdef __INTEL_COMPILER |
| # pragma warning(push) |
| # pragma warning(disable:810) /* conversion may lose significant bits */ |
| #endif |
| |
| DEBUGASSERT(uznum <= (size_t) CURL_MASK_SINT); |
| return (int)(uznum & (size_t) CURL_MASK_SINT); |
| |
| #ifdef __INTEL_COMPILER |
| # pragma warning(pop) |
| #endif |
| } |
| |
| /* |
| ** unsigned size_t to unsigned long |
| */ |
| |
| unsigned long curlx_uztoul(size_t uznum) |
| { |
| #ifdef __INTEL_COMPILER |
| # pragma warning(push) |
| # pragma warning(disable:810) /* conversion may lose significant bits */ |
| #endif |
| |
| #if ULONG_MAX < SIZE_T_MAX |
| DEBUGASSERT(uznum <= (size_t) CURL_MASK_ULONG); |
| #endif |
| return (unsigned long)(uznum & (size_t) CURL_MASK_ULONG); |
| |
| #ifdef __INTEL_COMPILER |
| # pragma warning(pop) |
| #endif |
| } |
| |
| /* |
| ** unsigned size_t to unsigned int |
| */ |
| |
| unsigned int curlx_uztoui(size_t uznum) |
| { |
| #ifdef __INTEL_COMPILER |
| # pragma warning(push) |
| # pragma warning(disable:810) /* conversion may lose significant bits */ |
| #endif |
| |
| #if UINT_MAX < SIZE_T_MAX |
| DEBUGASSERT(uznum <= (size_t) CURL_MASK_UINT); |
| #endif |
| return (unsigned int)(uznum & (size_t) CURL_MASK_UINT); |
| |
| #ifdef __INTEL_COMPILER |
| # pragma warning(pop) |
| #endif |
| } |
| |
| /* |
| ** signed long to signed int |
| */ |
| |
| int curlx_sltosi(long slnum) |
| { |
| #ifdef __INTEL_COMPILER |
| # pragma warning(push) |
| # pragma warning(disable:810) /* conversion may lose significant bits */ |
| #endif |
| |
| DEBUGASSERT(slnum >= 0); |
| #if INT_MAX < LONG_MAX |
| DEBUGASSERT((unsigned long) slnum <= (unsigned long) CURL_MASK_SINT); |
| #endif |
| return (int)(slnum & (long) CURL_MASK_SINT); |
| |
| #ifdef __INTEL_COMPILER |
| # pragma warning(pop) |
| #endif |
| } |
| |
| /* |
| ** signed long to unsigned int |
| */ |
| |
| unsigned int curlx_sltoui(long slnum) |
| { |
| #ifdef __INTEL_COMPILER |
| # pragma warning(push) |
| # pragma warning(disable:810) /* conversion may lose significant bits */ |
| #endif |
| |
| DEBUGASSERT(slnum >= 0); |
| #if UINT_MAX < LONG_MAX |
| DEBUGASSERT((unsigned long) slnum <= (unsigned long) CURL_MASK_UINT); |
| #endif |
| return (unsigned int)(slnum & (long) CURL_MASK_UINT); |
| |
| #ifdef __INTEL_COMPILER |
| # pragma warning(pop) |
| #endif |
| } |
| |
| /* |
| ** signed long to unsigned short |
| */ |
| |
| unsigned short curlx_sltous(long slnum) |
| { |
| #ifdef __INTEL_COMPILER |
| # pragma warning(push) |
| # pragma warning(disable:810) /* conversion may lose significant bits */ |
| #endif |
| |
| DEBUGASSERT(slnum >= 0); |
| DEBUGASSERT((unsigned long) slnum <= (unsigned long) CURL_MASK_USHORT); |
| return (unsigned short)(slnum & (long) CURL_MASK_USHORT); |
| |
| #ifdef __INTEL_COMPILER |
| # pragma warning(pop) |
| #endif |
| } |
| |
| /* |
| ** unsigned size_t to signed ssize_t |
| */ |
| |
| ssize_t curlx_uztosz(size_t uznum) |
| { |
| #ifdef __INTEL_COMPILER |
| # pragma warning(push) |
| # pragma warning(disable:810) /* conversion may lose significant bits */ |
| #endif |
| |
| DEBUGASSERT(uznum <= (size_t) CURL_MASK_SSIZE_T); |
| return (ssize_t)(uznum & (size_t) CURL_MASK_SSIZE_T); |
| |
| #ifdef __INTEL_COMPILER |
| # pragma warning(pop) |
| #endif |
| } |
| |
| /* |
| ** signed curl_off_t to unsigned size_t |
| */ |
| |
| size_t curlx_sotouz(curl_off_t sonum) |
| { |
| #ifdef __INTEL_COMPILER |
| # pragma warning(push) |
| # pragma warning(disable:810) /* conversion may lose significant bits */ |
| #endif |
| |
| DEBUGASSERT(sonum >= 0); |
| return (size_t)(sonum & (curl_off_t) CURL_MASK_USIZE_T); |
| |
| #ifdef __INTEL_COMPILER |
| # pragma warning(pop) |
| #endif |
| } |
| |
| /* |
| ** signed ssize_t to signed int |
| */ |
| |
| int curlx_sztosi(ssize_t sznum) |
| { |
| #ifdef __INTEL_COMPILER |
| # pragma warning(push) |
| # pragma warning(disable:810) /* conversion may lose significant bits */ |
| #endif |
| |
| DEBUGASSERT(sznum >= 0); |
| #if INT_MAX < SSIZE_T_MAX |
| DEBUGASSERT((size_t) sznum <= (size_t) CURL_MASK_SINT); |
| #endif |
| return (int)(sznum & (ssize_t) CURL_MASK_SINT); |
| |
| #ifdef __INTEL_COMPILER |
| # pragma warning(pop) |
| #endif |
| } |
| |
| /* |
| ** unsigned int to unsigned short |
| */ |
| |
| unsigned short curlx_uitous(unsigned int uinum) |
| { |
| #ifdef __INTEL_COMPILER |
| # pragma warning(push) |
| # pragma warning(disable:810) /* conversion may lose significant bits */ |
| #endif |
| |
| DEBUGASSERT(uinum <= (unsigned int) CURL_MASK_USHORT); |
| return (unsigned short) (uinum & (unsigned int) CURL_MASK_USHORT); |
| |
| #ifdef __INTEL_COMPILER |
| # pragma warning(pop) |
| #endif |
| } |
| |
| /* |
| ** signed int to unsigned size_t |
| */ |
| |
| size_t curlx_sitouz(int sinum) |
| { |
| #ifdef __INTEL_COMPILER |
| # pragma warning(push) |
| # pragma warning(disable:810) /* conversion may lose significant bits */ |
| #endif |
| |
| DEBUGASSERT(sinum >= 0); |
| return (size_t) sinum; |
| |
| #ifdef __INTEL_COMPILER |
| # pragma warning(pop) |
| #endif |
| } |
| |
| #ifdef USE_WINSOCK |
| |
| /* |
| ** curl_socket_t to signed int |
| */ |
| |
| int curlx_sktosi(curl_socket_t s) |
| { |
| return (int)((ssize_t) s); |
| } |
| |
| /* |
| ** signed int to curl_socket_t |
| */ |
| |
| curl_socket_t curlx_sitosk(int i) |
| { |
| return (curl_socket_t)((ssize_t) i); |
| } |
| |
| #endif /* USE_WINSOCK */ |
| |
| #if defined(WIN32) || defined(_WIN32) |
| |
| ssize_t curlx_read(int fd, void *buf, size_t count) |
| { |
| return (ssize_t)read(fd, buf, curlx_uztoui(count)); |
| } |
| |
| ssize_t curlx_write(int fd, const void *buf, size_t count) |
| { |
| return (ssize_t)write(fd, buf, curlx_uztoui(count)); |
| } |
| |
| #endif /* WIN32 || _WIN32 */ |
| |
| #if defined(__INTEL_COMPILER) && defined(__unix__) |
| |
| int curlx_FD_ISSET(int fd, fd_set *fdset) |
| { |
| #pragma warning(push) |
| #pragma warning(disable:1469) /* clobber ignored */ |
| return FD_ISSET(fd, fdset); |
| #pragma warning(pop) |
| } |
| |
| void curlx_FD_SET(int fd, fd_set *fdset) |
| { |
| #pragma warning(push) |
| #pragma warning(disable:1469) /* clobber ignored */ |
| FD_SET(fd, fdset); |
| #pragma warning(pop) |
| } |
| |
| void curlx_FD_ZERO(fd_set *fdset) |
| { |
| #pragma warning(push) |
| #pragma warning(disable:593) /* variable was set but never used */ |
| FD_ZERO(fdset); |
| #pragma warning(pop) |
| } |
| |
| unsigned short curlx_htons(unsigned short usnum) |
| { |
| #if (__INTEL_COMPILER == 910) && defined(__i386__) |
| return (unsigned short)(((usnum << 8) & 0xFF00) | ((usnum >> 8) & 0x00FF)); |
| #else |
| #pragma warning(push) |
| #pragma warning(disable:810) /* conversion may lose significant bits */ |
| return htons(usnum); |
| #pragma warning(pop) |
| #endif |
| } |
| |
| unsigned short curlx_ntohs(unsigned short usnum) |
| { |
| #if (__INTEL_COMPILER == 910) && defined(__i386__) |
| return (unsigned short)(((usnum << 8) & 0xFF00) | ((usnum >> 8) & 0x00FF)); |
| #else |
| #pragma warning(push) |
| #pragma warning(disable:810) /* conversion may lose significant bits */ |
| return ntohs(usnum); |
| #pragma warning(pop) |
| #endif |
| } |
| |
| #endif /* __INTEL_COMPILER && __unix__ */ |