/*************************************************************************
 *
 * $Id: triodef.h,v 1.36 2010/09/12 11:08:08 breese Exp $
 *
 * Copyright (C) 2001 Bjorn Reese <breese@users.sourceforge.net>
 *
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
 * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
 * MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE AUTHORS AND
 * CONTRIBUTORS ACCEPT NO RESPONSIBILITY IN ANY CONCEIVABLE MANNER.
 *
 ************************************************************************/

#ifndef TRIO_TRIODEF_H
#define TRIO_TRIODEF_H

/*************************************************************************
 * Compiler support detection
 */

#if defined(__GNUC__)
#define TRIO_COMPILER_GCC
#endif

#if defined(__SUNPRO_CC)
#define TRIO_COMPILER_SUNPRO __SUNPRO_CC
#else
#if defined(__SUNPRO_C)
#define TRIO_COMPILER_SUNPRO __SUNPRO_C
#endif
#endif

#if defined(__xlC__) || defined(__IBMC__) || defined(__IBMCPP__)
#define TRIO_COMPILER_XLC
#else
#if defined(_AIX) && !defined(__GNUC__)
#define TRIO_COMPILER_XLC /* Workaround for old xlc */
#endif
#endif

#if defined(__DECC) || defined(__DECCXX)
#define TRIO_COMPILER_DECC
#else
#if defined(__osf__) && defined(__LANGUAGE_C__) && !defined(__GNUC__)
#define TRIO_COMPILER_DECC /* Workaround for old DEC C compilers */
#endif
#endif

#if defined(__HP_aCC) || defined(__HP_cc)
#define TRIO_COMPILER_HP
#endif

#if defined(sgi) || defined(__sgi)
#define TRIO_COMPILER_MIPSPRO
#endif

#if defined(_MSC_VER)
#define TRIO_COMPILER_MSVC
#endif

#if defined(__BORLANDC__)
#define TRIO_COMPILER_BCB
#endif

/*************************************************************************
 * Platform support detection
 */

#if defined(VMS) || defined(__VMS)
#define TRIO_PLATFORM_VMS
#endif

#if defined(unix) || defined(__unix) || defined(__unix__)
#define TRIO_PLATFORM_UNIX
#endif

#if defined(TRIO_COMPILER_XLC) || defined(_AIX)
#define TRIO_PLATFORM_UNIX
#endif

#if defined(TRIO_COMPILER_DECC) || defined(__osf___)
#if !defined(TRIO_PLATFORM_VMS)
#define TRIO_PLATFORM_UNIX
#endif
#endif

#if defined(__NetBSD__) || defined(__FreeBSD__) || defined(__DragonFly__)
#define TRIO_PLATFORM_UNIX
#endif

#if defined(__Lynx__)
#define TRIO_PLATFORM_UNIX
#define TRIO_PLATFORM_LYNX
#endif

#if defined(__APPLE__) && defined(__MACH__)
#define TRIO_PLATFORM_UNIX
#endif

#if defined(__QNX__)
#define TRIO_PLATFORM_UNIX
#define TRIO_PLATFORM_QNX
#endif

#if defined(__CYGWIN__)
#define TRIO_PLATFORM_UNIX
#endif

#if defined(AMIGA) && defined(TRIO_COMPILER_GCC)
#define TRIO_PLATFORM_UNIX
#endif

#if defined(TRIO_COMPILER_MSVC) || defined(WIN32) || defined(_WIN32)
#define TRIO_PLATFORM_WIN32
#endif

#if defined(_WIN32_WCE)
#define TRIO_PLATFORM_WINCE
#endif

#if defined(mpeix) || defined(__mpexl)
#define TRIO_PLATFORM_MPEIX
#endif

#if defined(_AIX)
#define TRIO_PLATFORM_AIX
#endif

#if defined(__hpux)
#define TRIO_PLATFORM_HPUX
#endif

#if defined(sun) || defined(__sun__)
#if defined(__SVR4) || defined(__svr4__)
#define TRIO_PLATFORM_SOLARIS
#else
#define TRIO_PLATFORM_SUNOS
#endif
#endif

/*************************************************************************
 * Standards support detection
 */

#if defined(__STDC__) || defined(_MSC_EXTENSIONS) || defined(TRIO_COMPILER_BCB)
#define PREDEF_STANDARD_C89
#endif
#if defined(__STDC_VERSION__)
#define PREDEF_STANDARD_C90
#endif
#if (__STDC_VERSION__ - 0 >= 199409L)
#define PREDEF_STANDARD_C94
#endif
#if (__STDC_VERSION__ - 0 >= 199901L)
#define PREDEF_STANDARD_C99
#endif
#if defined(TRIO_COMPILER_SUNPRO) && (TRIO_COMPILER_SUNPRO >= 0x420)
#if !defined(PREDEF_STANDARD_C94)
#define PREDEF_STANDARD_C94
#endif
#endif

#if defined(__cplusplus)
#define PREDEF_STANDARD_CXX
#if __cplusplus - 0 >= 199711L
#define PREDEF_STANDARD_CXX89
#endif
#endif

#if defined(TRIO_PLATFORM_UNIX)
#include <unistd.h>
#endif

#if defined(_POSIX_VERSION)
#define PREDEF_STANDARD_POSIX _POSIX_VERSION
#if (_POSIX_VERSION >= 199506L)
#define PREDEF_STANDARD_POSIX_1996
#endif
#endif

#if (_XOPEN_VERSION - 0 >= 3) || defined(_XOPEN_XPG3)
#define PREDEF_STANDARD_XPG3
#endif
#if (_XOPEN_VERSION - 0 >= 4) || defined(_XOPEN_XPG4)
#define PREDEF_STANDARD_XPG4
#endif
#if (_XOPEN_VERSION - 0 > 4) || (defined(_XOPEN_UNIX) && (_XOPEN_VERSION - 0 == 4))
#define PREDEF_STANDARD_UNIX95
#endif
#if (_XOPEN_VERSION - 0 >= 500)
#define PREDEF_STANDARD_UNIX98
#endif
#if (_XOPEN_VERSION - 0 >= 600)
#define PREDEF_STANDARD_UNIX03
#endif

/*************************************************************************
 * Generic defines
 */

#if !defined(TRIO_PUBLIC)
#define TRIO_PUBLIC
#endif
#if !defined(TRIO_PRIVATE)
#define TRIO_PRIVATE static
#endif

#if !(defined(PREDEF_STANDARD_C89) || defined(PREDEF_STANDARD_CXX))
#define TRIO_COMPILER_ANCIENT
#endif

#if defined(TRIO_COMPILER_ANCIENT)
#define TRIO_CONST
#define TRIO_VOLATILE
#define TRIO_SIGNED
typedef double trio_long_double_t;
typedef char* trio_pointer_t;
#define TRIO_SUFFIX_LONG(x) x
#define TRIO_PROTO(x) ()
#define TRIO_NOARGS
#define TRIO_ARGS1(list, a1) list a1;
#define TRIO_ARGS2(list, a1, a2) \
	list a1;                     \
	a2;
#define TRIO_ARGS3(list, a1, a2, a3) \
	list a1;                         \
	a2;                              \
	a3;
#define TRIO_ARGS4(list, a1, a2, a3, a4) \
	list a1;                             \
	a2;                                  \
	a3;                                  \
	a4;
#define TRIO_ARGS5(list, a1, a2, a3, a4, a5) \
	list a1;                                 \
	a2;                                      \
	a3;                                      \
	a4;                                      \
	a5;
#define TRIO_ARGS6(list, a1, a2, a3, a4, a5, a6) \
	list a1;                                     \
	a2;                                          \
	a3;                                          \
	a4;                                          \
	a5;                                          \
	a6;
#define TRIO_ARGS7(list, a1, a2, a3, a4, a5, a6, a7) \
	list a1;                                         \
	a2;                                              \
	a3;                                              \
	a4;                                              \
	a5;                                              \
	a6;                                              \
	a7;
#define TRIO_ARGS8(list, a1, a2, a3, a4, a5, a6, a7, a8) \
	list a1;                                             \
	a2;                                                  \
	a3;                                                  \
	a4;                                                  \
	a5;                                                  \
	a6;                                                  \
	a7;                                                  \
	a8;
#define TRIO_VARGS2(list, a1, a2) \
	list a1;                      \
	a2
#define TRIO_VARGS3(list, a1, a2, a3) \
	list a1;                          \
	a2;                               \
	a3
#define TRIO_VARGS4(list, a1, a2, a3, a4) \
	list a1;                              \
	a2;                                   \
	a3;                                   \
	a4
#define TRIO_VARGS5(list, a1, a2, a3, a4, a5) \
	list a1;                                  \
	a2;                                       \
	a3;                                       \
	a4;                                       \
	a5
#define TRIO_VA_DECL va_dcl
#define TRIO_VA_START(x, y) va_start(x)
#define TRIO_VA_END(x) va_end(x)
#else /* ANSI C */
#define TRIO_CONST const
#define TRIO_VOLATILE volatile
#define TRIO_SIGNED signed
typedef long double trio_long_double_t;
typedef void* trio_pointer_t;
#define TRIO_SUFFIX_LONG(x) x##L
#define TRIO_PROTO(x) x
#define TRIO_NOARGS void
#define TRIO_ARGS1(list, a1) (a1)
#define TRIO_ARGS2(list, a1, a2) (a1, a2)
#define TRIO_ARGS3(list, a1, a2, a3) (a1, a2, a3)
#define TRIO_ARGS4(list, a1, a2, a3, a4) (a1, a2, a3, a4)
#define TRIO_ARGS5(list, a1, a2, a3, a4, a5) (a1, a2, a3, a4, a5)
#define TRIO_ARGS6(list, a1, a2, a3, a4, a5, a6) (a1, a2, a3, a4, a5, a6)
#define TRIO_ARGS7(list, a1, a2, a3, a4, a5, a6, a7) (a1, a2, a3, a4, a5, a6, a7)
#define TRIO_ARGS8(list, a1, a2, a3, a4, a5, a6, a7, a8) (a1, a2, a3, a4, a5, a6, a7, a8)
#define TRIO_VARGS2 TRIO_ARGS2
#define TRIO_VARGS3 TRIO_ARGS3
#define TRIO_VARGS4 TRIO_ARGS4
#define TRIO_VARGS5 TRIO_ARGS5
#define TRIO_VA_DECL ...
#define TRIO_VA_START(x, y) va_start(x, y)
#define TRIO_VA_END(x) va_end(x)
#endif

#if defined(PREDEF_STANDARD_C99) || defined(PREDEF_STANDARD_CXX)
#define TRIO_INLINE inline
#else
#if defined(TRIO_COMPILER_GCC)
#define TRIO_INLINE __inline__
#endif
#if defined(TRIO_COMPILER_MSVC)
#define TRIO_INLINE _inline
#endif
#if defined(TRIO_COMPILER_BCB)
#define TRIO_INLINE __inline
#endif
#endif
#if !defined(TRIO_INLINE)
#define TRIO_INLINE
#endif

/*************************************************************************
 * Workarounds
 */

#if defined(TRIO_PLATFORM_VMS)
/*
 * Computations done with constants at compile time can trigger these
 * even when compiling with IEEE enabled.
 */
#pragma message disable(UNDERFLOW, FLOATOVERFL)

#if (__CRTL_VER < 80210001)
/*
 * Although the compiler supports C99 language constructs, the C
 * run-time library does not contain all C99 functions.
 */
#if defined(PREDEF_STANDARD_C99)
#undef PREDEF_STANDARD_C99
#endif
#endif
#endif

/*
 * Not all preprocessors supports the LL token.
 */
#if defined(TRIO_COMPILER_MSVC) || defined(TRIO_COMPILER_BCB)
#else
#define TRIO_COMPILER_SUPPORTS_LL
#endif

#if defined(TRIO_PLATFORM_UNIX) && !defined(HAVE_MATH_C99_LONG_DOUBLE)
#define TRIO_NO_FLOORL 1
#define TRIO_NO_CEILL 1
#define TRIO_NO_POWL 1
#define TRIO_NO_FMODL 1
#define TRIO_NO_LOG10L 1
#endif

#endif /* TRIO_TRIODEF_H */
