/***************************************************************************

 *                                  _   _ ____  _

 *  Project                     ___| | | |  _ \| |

 *                             / __| | | | |_) | |

 *                            | (__| |_| |  _ <| |___

 *                             \___|\___/|_| \_\_____|

 *

 * Copyright (C) Daniel Stenberg, <daniel@haxx.se>, 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.

 *

 * SPDX-License-Identifier: curl

 *

 ***************************************************************************/

#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"

#include <limits.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)

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 */

#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__ */