/****************************************************************************
|
**
|
** Copyright (C) 2015 Intel Corporation
|
**
|
** Permission is hereby granted, free of charge, to any person obtaining a copy
|
** of this software and associated documentation files (the "Software"), to deal
|
** in the Software without restriction, including without limitation the rights
|
** to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
** copies of the Software, and to permit persons to whom the Software is
|
** furnished to do so, subject to the following conditions:
|
**
|
** The above copyright notice and this permission notice shall be included in
|
** all copies or substantial portions of the Software.
|
**
|
** THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
** IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
** FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
** AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
** LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
** OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
** THE SOFTWARE.
|
**
|
****************************************************************************/
|
|
#ifndef COMPILERSUPPORT_H
|
#define COMPILERSUPPORT_H
|
|
#include "cbor.h"
|
|
#ifdef __cplusplus
|
extern "C" {
|
#endif
|
|
#ifndef _BSD_SOURCE
|
# define _BSD_SOURCE
|
#endif
|
#ifndef _DEFAULT_SOURCE
|
# define _DEFAULT_SOURCE
|
#endif
|
#include <assert.h>
|
#include <float.h>
|
#include <stddef.h>
|
#include <stdint.h>
|
#include <string.h>
|
|
#ifndef __cplusplus
|
# include <stdbool.h>
|
#endif
|
|
#ifdef __F16C__
|
# include <immintrin.h>
|
#endif
|
|
#ifndef _Static_assert
|
#define _Static_assert(...)
|
#endif
|
|
#if __STDC_VERSION__ >= 201112L || __cplusplus >= 201103L || __cpp_static_assert >= 200410
|
# define cbor_static_assert(x) _Static_assert(x, #x)
|
#elif !defined(__cplusplus) && defined(__GNUC__) && (__GNUC__ * 100 + __GNUC_MINOR__ >= 406)
|
# define cbor_static_assert(x) _Static_assert(x, #x)
|
#else
|
# define cbor_static_assert(x) ((void)sizeof(char[2*!!(x) - 1]))
|
#endif
|
#if __STDC_VERSION__ >= 199901L || defined(__cplusplus)
|
/* inline is a keyword */
|
#else
|
/* use the definition from cbor.h */
|
# define inline CBOR_INLINE
|
#endif
|
|
#define STRINGIFY(x) STRINGIFY2(x)
|
#define STRINGIFY2(x) #x
|
|
#if !defined(UINT32_MAX) || !defined(INT64_MAX)
|
/* C89? We can define UINT32_MAX portably, but not INT64_MAX */
|
# error "Your system has stdint.h but that doesn't define UINT32_MAX or INT64_MAX"
|
#endif
|
|
#ifndef DBL_DECIMAL_DIG
|
/* DBL_DECIMAL_DIG is C11 */
|
# define DBL_DECIMAL_DIG 17
|
#endif
|
#define DBL_DECIMAL_DIG_STR STRINGIFY(DBL_DECIMAL_DIG)
|
|
#ifndef __has_builtin
|
# define __has_builtin(x) 0
|
#endif
|
|
#if (defined(__GNUC__) && (__GNUC__ * 100 + __GNUC_MINOR__ >= 403)) || \
|
(__has_builtin(__builtin_bswap64) && __has_builtin(__builtin_bswap32))
|
# if __BYTE_ORDER__ == __ORDER_LITTLE_ENDIAN__
|
# define cbor_ntohll __builtin_bswap64
|
# define cbor_htonll __builtin_bswap64
|
# define cbor_ntohl __builtin_bswap32
|
# define cbor_htonl __builtin_bswap32
|
# ifdef __INTEL_COMPILER
|
# define cbor_ntohs _bswap16
|
# define cbor_htons _bswap16
|
# elif (__GNUC__ * 100 + __GNUC_MINOR__ >= 608) || __has_builtin(__builtin_bswap16)
|
# define cbor_ntohs __builtin_bswap16
|
# define cbor_htons __builtin_bswap16
|
# else
|
# define cbor_ntohs(x) (((uint16_t)x >> 8) | ((uint16_t)x << 8))
|
# define cbor_htons cbor_ntohs
|
# endif
|
# else
|
# define cbor_ntohll
|
# define cbor_htonll
|
# define cbor_ntohl
|
# define cbor_htonl
|
# define cbor_ntohs
|
# define cbor_htons
|
# endif
|
#elif defined(__sun)
|
# include <sys/byteorder.h>
|
#elif defined(_MSC_VER)
|
/* MSVC, which implies Windows, which implies little-endian and sizeof(long) == 4 */
|
# define cbor_ntohll _byteswap_uint64
|
# define cbor_htonll _byteswap_uint64
|
# define cbor_ntohl _byteswap_ulong
|
# define cbor_htonl _byteswap_ulong
|
# define cbor_ntohs _byteswap_ushort
|
# define cbor_htons _byteswap_ushort
|
#endif
|
#ifndef cbor_ntohs
|
# include <arpa/inet.h>
|
# define cbor_ntohs ntohs
|
# define cbor_htons htons
|
#endif
|
#ifndef cbor_ntohl
|
# include <arpa/inet.h>
|
# define cbor_ntohl ntohl
|
# define cbor_htonl htonl
|
#endif
|
#ifndef cbor_ntohll
|
# define cbor_ntohll ntohll
|
# define cbor_htonll htonll
|
/* ntohll isn't usually defined */
|
# ifndef ntohll
|
# if defined(__BYTE_ORDER__) && defined(__ORDER_BIG_ENDIAN__) && __BYTE_ORDER__ == __ORDER_BIG_ENDIAN__
|
# define ntohll
|
# define htonll
|
# elif defined(__BYTE_ORDER__) && defined(__ORDER_LITTLE_ENDIAN__) && __BYTE_ORDER__ == __ORDER_LITTLE_ENDIAN__
|
# define ntohll(x) ((ntohl((uint32_t)(x)) * UINT64_C(0x100000000)) + (ntohl((x) >> 32)))
|
# define htonll ntohll
|
# else
|
# error "Unable to determine byte order!"
|
# endif
|
# endif
|
#endif
|
|
|
#ifdef __cplusplus
|
# define CONST_CAST(t, v) const_cast<t>(v)
|
#else
|
/* C-style const_cast without triggering a warning with -Wcast-qual */
|
# define CONST_CAST(t, v) (t)(uintptr_t)(v)
|
#endif
|
|
#ifdef __GNUC__
|
# define likely(x) __builtin_expect(!!(x), 1)
|
# define unlikely(x) __builtin_expect(!!(x), 0)
|
# define unreachable() __builtin_unreachable()
|
#elif defined(_MSC_VER)
|
# define likely(x) (x)
|
# define unlikely(x) (x)
|
# define unreachable() __assume(0)
|
#else
|
# define likely(x) (x)
|
# define unlikely(x) (x)
|
# define unreachable() do {} while (0)
|
#endif
|
|
static inline bool add_check_overflow(size_t v1, size_t v2, size_t *r)
|
{
|
#if ((defined(__GNUC__) && (__GNUC__ >= 5)) && !defined(__INTEL_COMPILER)) || __has_builtin(__builtin_add_overflow)
|
return __builtin_add_overflow(v1, v2, r);
|
#else
|
/* unsigned additions are well-defined */
|
*r = v1 + v2;
|
return v1 > v1 + v2;
|
#endif
|
}
|
|
static inline unsigned short encode_half(double val)
|
{
|
#ifdef __F16C__
|
return _cvtss_sh(val, 3);
|
#else
|
uint64_t v;
|
memcpy(&v, &val, sizeof(v));
|
int sign = v >> 63 << 15;
|
int exp = (v >> 52) & 0x7ff;
|
int mant = v << 12 >> 12 >> (53-11); /* keep only the 11 most significant bits of the mantissa */
|
exp -= 1023;
|
if (exp == 1024) {
|
/* infinity or NaN */
|
exp = 16;
|
mant >>= 1;
|
} else if (exp >= 16) {
|
/* overflow, as largest number */
|
exp = 15;
|
mant = 1023;
|
} else if (exp >= -14) {
|
/* regular normal */
|
} else if (exp >= -24) {
|
/* subnormal */
|
mant |= 1024;
|
mant >>= -(exp + 14);
|
exp = -15;
|
} else {
|
/* underflow, make zero */
|
return 0;
|
}
|
return sign | ((exp + 15) << 10) | mant;
|
#endif
|
}
|
|
#ifdef __cplusplus
|
}
|
#endif
|
|
#endif /* COMPILERSUPPORT_H */
|
