workbench/libs/mesa/src/mesa/main/compiler.h

   1 /*
   2  * Mesa 3-D graphics library
   3  * Version:  7.5
   4  *
   5  * Copyright (C) 1999-2008  Brian Paul   All Rights Reserved.
   6  * Copyright (C) 2009  VMware, Inc.  All Rights Reserved.
   7  *
   8  * Permission is hereby granted, free of charge, to any person obtaining a
   9  * copy of this software and associated documentation files (the "Software"),
  10  * to deal in the Software without restriction, including without limitation
  11  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
  12  * and/or sell copies of the Software, and to permit persons to whom the
  13  * Software is furnished to do so, subject to the following conditions:
  14  *
  15  * The above copyright notice and this permission notice shall be included
  16  * in all copies or substantial portions of the Software.
  17  *
  18  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
  19  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  20  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
  21  * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
  22  * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
  23  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  24  */
  25
  26
  27 /**
  28  * \file compiler.h
  29  * Compiler-related stuff.
  30  */
  31
  32
  33 #ifndef COMPILER_H
  34 #define COMPILER_H
  35
  36
  37 #include <assert.h>
  38 #include <ctype.h>
  39 #if defined(__alpha__) && defined(CCPML)
  40 #include <cpml.h> /* use Compaq's Fast Math Library on Alpha */
  41 #else
  42 #include <math.h>
  43 #endif
  44 #include <limits.h>
  45 #include <stdlib.h>
  46 #include <stdio.h>
  47 #include <string.h>
  48 #if defined(__linux__) && defined(__i386__)
  49 #include <fpu_control.h>
  50 #endif
  51 #include <float.h>
  52 #include <stdarg.h>
  53
  54
  55 #ifdef __cplusplus
  56 extern "C" {
  57 #endif
  58
  59
  60 /**
  61  * Get standard integer types
  62  */
  63 #if defined(_MSC_VER)
  64    typedef __int8             int8_t;
  65    typedef unsigned __int8    uint8_t;
  66    typedef __int16            int16_t;
  67    typedef unsigned __int16   uint16_t;
  68    typedef __int32            int32_t;
  69    typedef unsigned __int32   uint32_t;
  70    typedef __int64            int64_t;
  71    typedef unsigned __int64   uint64_t;
  72
  73 #  if defined(_WIN64)
  74      typedef __int64            intptr_t;
  75      typedef unsigned __int64   uintptr_t;
  76 #  else
  77      typedef __int32            intptr_t;
  78      typedef unsigned __int32   uintptr_t;
  79 #  endif
  80
  81 #  define INT64_C(__val) __val##i64
  82 #  define UINT64_C(__val) __val##ui64
  83 #else
  84 #  include <stdint.h>
  85 #endif
  86
  87
  88 /**
  89   * Sun compilers define __i386 instead of the gcc-style __i386__
  90  */
  91 #ifdef __SUNPRO_C
  92 # if !defined(__i386__) && defined(__i386)
  93 #  define __i386__
  94 # elif !defined(__amd64__) && defined(__amd64)
  95 #  define __amd64__
  96 # elif !defined(__sparc__) && defined(__sparc)
  97 #  define __sparc__
  98 # endif
  99 # if !defined(__volatile)
 100 #  define __volatile volatile
 101 # endif
 102 #endif
 103
 104
 105 /**
 106  * finite macro.
 107  */
 108 #if defined(_MSC_VER)
 109 #  define finite _finite
 110 #elif defined(__WATCOMC__)
 111 #  define finite _finite
 112 #endif
 113
 114
 115 /**
 116  * Disable assorted warnings
 117  */
 118 #if !defined(OPENSTEP) && (defined(__WIN32__) && !defined(__CYGWIN__)) && !defined(BUILD_FOR_SNAP)
 119 #  if !defined(__GNUC__) /* mingw environment */
 120 #    pragma warning( disable : 4068 ) /* unknown pragma */
 121 #    pragma warning( disable : 4710 ) /* function 'foo' not inlined */
 122 #    pragma warning( disable : 4711 ) /* function 'foo' selected for automatic inline expansion */
 123 #    pragma warning( disable : 4127 ) /* conditional expression is constant */
 124 #    if defined(MESA_MINWARN)
 125 #      pragma warning( disable : 4244 ) /* '=' : conversion from 'const double ' to 'float ', possible loss of data */
 126 #      pragma warning( disable : 4018 ) /* '<' : signed/unsigned mismatch */
 127 #      pragma warning( disable : 4305 ) /* '=' : truncation from 'const double ' to 'float ' */
 128 #      pragma warning( disable : 4550 ) /* 'function' undefined; assuming extern returning int */
 129 #      pragma warning( disable : 4761 ) /* integral size mismatch in argument; conversion supplied */
 130 #    endif
 131 #  endif
 132 #endif
 133 #if defined(__WATCOMC__)
 134 #  pragma disable_message(201) /* Disable unreachable code warnings */
 135 #endif
 136
 137
 138
 139 /**
 140  * Function inlining
 141  */
 142 #if defined(__GNUC__)
 143 #  define INLINE __inline__
 144 #elif defined(__MSC__)
 145 #  define INLINE __inline
 146 #elif defined(_MSC_VER)
 147 #  define INLINE __inline
 148 #elif defined(__ICL)
 149 #  define INLINE __inline
 150 #elif defined(__INTEL_COMPILER)
 151 #  define INLINE inline
 152 #elif defined(__WATCOMC__) && (__WATCOMC__ >= 1100)
 153 #  define INLINE __inline
 154 #elif defined(__SUNPRO_C) && defined(__C99FEATURES__)
 155 #  define INLINE inline
 156 #  define __inline inline
 157 #  define __inline__ inline
 158 #elif (__STDC_VERSION__ >= 199901L) /* C99 */
 159 #  define INLINE inline
 160 #else
 161 #  define INLINE
 162 #endif
 163
 164
 165 /**
 166  * PUBLIC/USED macros
 167  *
 168  * If we build the library with gcc's -fvisibility=hidden flag, we'll
 169  * use the PUBLIC macro to mark functions that are to be exported.
 170  *
 171  * We also need to define a USED attribute, so the optimizer doesn't
 172  * inline a static function that we later use in an alias. - ajax
 173  */
 174 #ifndef PUBLIC
 175 #  if defined(__GNUC__) || (defined(__SUNPRO_C) && (__SUNPRO_C >= 0x590))
 176 #    define PUBLIC __attribute__((visibility("default")))
 177 #    define USED __attribute__((used))
 178 #  else
 179 #    define PUBLIC
 180 #    define USED
 181 #  endif
 182 #endif
 183
 184
 185 /**
 186  * Some compilers don't like some of Mesa's const usage.  In those places use
 187  * CONST instead of const.  Pass -DNO_CONST to compilers where this matters.
 188  */
 189 #ifdef NO_CONST
 190 #  define CONST
 191 #else
 192 #  define CONST const
 193 #endif
 194
 195
 196 /**
 197  * __builtin_expect macros
 198  */
 199 #if !defined(__GNUC__)
 200 #  define __builtin_expect(x, y) (x)
 201 #endif
 202
 203 #ifndef likely
 204 #  ifdef __GNUC__
 205 #    define likely(x)   __builtin_expect(!!(x), 1)
 206 #    define unlikely(x) __builtin_expect(!!(x), 0)
 207 #  else
 208 #    define likely(x)   (x)
 209 #    define unlikely(x) (x)
 210 #  endif
 211 #endif
 212
 213 /**
 214  * The __FUNCTION__ gcc variable is generally only used for debugging.
 215  * If we're not using gcc, define __FUNCTION__ as a cpp symbol here.
 216  * Don't define it if using a newer Windows compiler.
 217  */
 218 #ifndef __FUNCTION__
 219 # if defined(__VMS)
 220 #  define __FUNCTION__ "VMS$NL:"
 221 # elif !defined(__GNUC__) && !defined(__xlC__) &&       \
 222       (!defined(_MSC_VER) || _MSC_VER < 1300)
 223 #  if (__STDC_VERSION__ >= 199901L) /* C99 */ || \
 224     (defined(__SUNPRO_C) && defined(__C99FEATURES__))
 225 #   define __FUNCTION__ __func__
 226 #  else
 227 #   define __FUNCTION__ "<unknown>"
 228 #  endif
 229 # endif
 230 #endif
 231 #ifndef __func__
 232 #  if (__STDC_VERSION__ >= 199901L) || \
 233       (defined(__SUNPRO_C) && defined(__C99FEATURES__))
 234        /* __func__ is part of C99 */
 235 #  elif defined(_MSC_VER)
 236 #    if _MSC_VER >= 1300
 237 #      define __func__ __FUNCTION__
 238 #    else
 239 #      define __func__ "<unknown>"
 240 #    endif
 241 #  endif
 242 #endif
 243
 244
 245 /**
 246  * Either define MESA_BIG_ENDIAN or MESA_LITTLE_ENDIAN, and CPU_TO_LE32.
 247  * Do not use these unless absolutely necessary!
 248  * Try to use a runtime test instead.
 249  * For now, only used by some DRI hardware drivers for color/texel packing.
 250  */
 251 #if defined(BYTE_ORDER) && defined(BIG_ENDIAN) && BYTE_ORDER == BIG_ENDIAN
 252 #if defined(__linux__)
 253 #include <byteswap.h>
 254 #define CPU_TO_LE32( x )        bswap_32( x )
 255 #elif defined(__APPLE__)
 256 #include <CoreFoundation/CFByteOrder.h>
 257 #define CPU_TO_LE32( x )        CFSwapInt32HostToLittle( x )
 258 #elif defined(__AROS__)
 259 #define CPU_TO_LE32( x )    AROS_BE2LONG( x )
 260 #elif (defined(_AIX) || defined(__blrts))
 261 static INLINE GLuint CPU_TO_LE32(GLuint x)
 262 {
 263    return (((x & 0x000000ff) << 24) |
 264            ((x & 0x0000ff00) <<  8) |
 265            ((x & 0x00ff0000) >>  8) |
 266            ((x & 0xff000000) >> 24));
 267 }
 268 #else /*__linux__ */
 269 #include <sys/endian.h>
 270 #define CPU_TO_LE32( x )        bswap32( x )
 271 #endif /*__linux__*/
 272 #define MESA_BIG_ENDIAN 1
 273 #else
 274 #define CPU_TO_LE32( x )        ( x )
 275 #define MESA_LITTLE_ENDIAN 1
 276 #endif
 277 #define LE32_TO_CPU( x )        CPU_TO_LE32( x )
 278
 279
 280
 281 #if !defined(CAPI) && defined(WIN32) && !defined(BUILD_FOR_SNAP)
 282 #define CAPI _cdecl
 283 #endif
 284
 285
 286 /**
 287  * Create a macro so that asm functions can be linked into compilers other
 288  * than GNU C
 289  */
 290 #ifndef _ASMAPI
 291 #if defined(WIN32) && !defined(BUILD_FOR_SNAP)/* was: !defined( __GNUC__ ) && !defined( VMS ) && !defined( __INTEL_COMPILER )*/
 292 #define _ASMAPI __cdecl
 293 #else
 294 #define _ASMAPI
 295 #endif
 296 #ifdef  PTR_DECL_IN_FRONT
 297 #define _ASMAPIP * _ASMAPI
 298 #else
 299 #define _ASMAPIP _ASMAPI *
 300 #endif
 301 #endif
 302
 303 #ifdef USE_X86_ASM
 304 #define _NORMAPI _ASMAPI
 305 #define _NORMAPIP _ASMAPIP
 306 #else
 307 #define _NORMAPI
 308 #define _NORMAPIP *
 309 #endif
 310
 311
 312 /* This is a macro on IRIX */
 313 #ifdef _P
 314 #undef _P
 315 #endif
 316
 317
 318 /* Turn off macro checking systems used by other libraries */
 319 #ifdef CHECK
 320 #undef CHECK
 321 #endif
 322
 323
 324 /**
 325  * ASSERT macro
 326  */
 327 #if defined(__AROS__)
 328 #undef ASSERT
 329 #endif
 330 #if !defined(_WIN32_WCE)
 331 #if defined(BUILD_FOR_SNAP) && defined(CHECKED)
 332 #  define ASSERT(X)   _CHECK(X)
 333 #elif defined(DEBUG)
 334 #  define ASSERT(X)   assert(X)
 335 #else
 336 #  define ASSERT(X)
 337 #endif
 338 #endif
 339
 340 #if (__GNUC__ >= 3)
 341 #define PRINTFLIKE(f, a) __attribute__ ((format(__printf__, f, a)))
 342 #else
 343 #define PRINTFLIKE(f, a)
 344 #endif
 345
 346 #ifndef NULL
 347 #define NULL 0
 348 #endif
 349
 350
 351 /**
 352  * LONGSTRING macro
 353  * gcc -pedantic warns about long string literals, LONGSTRING silences that.
 354  */
 355 #if !defined(__GNUC__)
 356 # define LONGSTRING
 357 #else
 358 # define LONGSTRING __extension__
 359 #endif
 360
 361
 362 #ifndef M_PI
 363 #define M_PI (3.14159265358979323846)
 364 #endif
 365
 366 #ifndef M_E
 367 #define M_E (2.7182818284590452354)
 368 #endif
 369
 370 #ifndef M_LOG2E
 371 #define M_LOG2E     (1.4426950408889634074)
 372 #endif
 373
 374 #ifndef ONE_DIV_SQRT_LN2
 375 #define ONE_DIV_SQRT_LN2 (1.201122408786449815)
 376 #endif
 377
 378 #ifndef FLT_MAX_EXP
 379 #define FLT_MAX_EXP 128
 380 #endif
 381
 382
 383 /**
 384  * USE_IEEE: Determine if we're using IEEE floating point
 385  */
 386 #if defined(__i386__) || defined(__386__) || defined(__sparc__) || \
 387     defined(__s390x__) || defined(__powerpc__) || \
 388     defined(__x86_64__) || \
 389     defined(ia64) || defined(__ia64__) || \
 390     defined(__hppa__) || defined(hpux) || \
 391     defined(__mips) || defined(_MIPS_ARCH) || \
 392     defined(__arm__) || \
 393     defined(__sh__) || defined(__m32r__) || \
 394     (defined(__sun) && defined(_IEEE_754)) || \
 395     (defined(__alpha__) && (defined(__IEEE_FLOAT) || !defined(VMS)))
 396 #define USE_IEEE
 397 #define IEEE_ONE 0x3f800000
 398 #endif
 399
 400
 401 /**
 402  * START/END_FAST_MATH macros:
 403  *
 404  * START_FAST_MATH: Set x86 FPU to faster, 32-bit precision mode (and save
 405  *                  original mode to a temporary).
 406  * END_FAST_MATH: Restore x86 FPU to original mode.
 407  */
 408 #if defined(__GNUC__) && defined(__i386__)
 409 /*
 410  * Set the x86 FPU control word to guarentee only 32 bits of precision
 411  * are stored in registers.  Allowing the FPU to store more introduces
 412  * differences between situations where numbers are pulled out of memory
 413  * vs. situations where the compiler is able to optimize register usage.
 414  *
 415  * In the worst case, we force the compiler to use a memory access to
 416  * truncate the float, by specifying the 'volatile' keyword.
 417  */
 418 /* Hardware default: All exceptions masked, extended double precision,
 419  * round to nearest (IEEE compliant):
 420  */
 421 #define DEFAULT_X86_FPU         0x037f
 422 /* All exceptions masked, single precision, round to nearest:
 423  */
 424 #define FAST_X86_FPU            0x003f
 425 /* The fldcw instruction will cause any pending FP exceptions to be
 426  * raised prior to entering the block, and we clear any pending
 427  * exceptions before exiting the block.  Hence, asm code has free
 428  * reign over the FPU while in the fast math block.
 429  */
 430 #if defined(NO_FAST_MATH)
 431 #define START_FAST_MATH(x)                                              \
 432 do {                                                                    \
 433    static GLuint mask = DEFAULT_X86_FPU;                                \
 434    __asm__ ( "fnstcw %0" : "=m" (*&(x)) );                              \
 435    __asm__ ( "fldcw %0" : : "m" (mask) );                               \
 436 } while (0)
 437 #else
 438 #define START_FAST_MATH(x)                                              \
 439 do {                                                                    \
 440    static GLuint mask = FAST_X86_FPU;                                   \
 441    __asm__ ( "fnstcw %0" : "=m" (*&(x)) );                              \
 442    __asm__ ( "fldcw %0" : : "m" (mask) );                               \
 443 } while (0)
 444 #endif
 445 /* Restore original FPU mode, and clear any exceptions that may have
 446  * occurred in the FAST_MATH block.
 447  */
 448 #define END_FAST_MATH(x)                                                \
 449 do {                                                                    \
 450    __asm__ ( "fnclex ; fldcw %0" : : "m" (*&(x)) );                     \
 451 } while (0)
 452
 453 #elif defined(__WATCOMC__) && defined(__386__)
 454 #define DEFAULT_X86_FPU         0x037f /* See GCC comments above */
 455 #define FAST_X86_FPU            0x003f /* See GCC comments above */
 456 void _watcom_start_fast_math(unsigned short *x,unsigned short *mask);
 457 #pragma aux _watcom_start_fast_math =                                   \
 458    "fnstcw  word ptr [eax]"                                             \
 459    "fldcw   word ptr [ecx]"                                             \
 460    parm [eax] [ecx]                                                     \
 461    modify exact [];
 462 void _watcom_end_fast_math(unsigned short *x);
 463 #pragma aux _watcom_end_fast_math =                                     \
 464    "fnclex"                                                             \
 465    "fldcw   word ptr [eax]"                                             \
 466    parm [eax]                                                           \
 467    modify exact [];
 468 #if defined(NO_FAST_MATH)
 469 #define START_FAST_MATH(x)                                              \
 470 do {                                                                    \
 471    static GLushort mask = DEFAULT_X86_FPU;                              \
 472    _watcom_start_fast_math(&x,&mask);                                   \
 473 } while (0)
 474 #else
 475 #define START_FAST_MATH(x)                                              \
 476 do {                                                                    \
 477    static GLushort mask = FAST_X86_FPU;                                 \
 478    _watcom_start_fast_math(&x,&mask);                                   \
 479 } while (0)
 480 #endif
 481 #define END_FAST_MATH(x)  _watcom_end_fast_math(&x)
 482
 483 #elif defined(_MSC_VER) && defined(_M_IX86)
 484 #define DEFAULT_X86_FPU         0x037f /* See GCC comments above */
 485 #define FAST_X86_FPU            0x003f /* See GCC comments above */
 486 #if defined(NO_FAST_MATH)
 487 #define START_FAST_MATH(x) do {\
 488         static GLuint mask = DEFAULT_X86_FPU;\
 489         __asm fnstcw word ptr [x]\
 490         __asm fldcw word ptr [mask]\
 491 } while(0)
 492 #else
 493 #define START_FAST_MATH(x) do {\
 494         static GLuint mask = FAST_X86_FPU;\
 495         __asm fnstcw word ptr [x]\
 496         __asm fldcw word ptr [mask]\
 497 } while(0)
 498 #endif
 499 #define END_FAST_MATH(x) do {\
 500         __asm fnclex\
 501         __asm fldcw word ptr [x]\
 502 } while(0)
 503
 504 #else
 505 #define START_FAST_MATH(x)  x = 0
 506 #define END_FAST_MATH(x)  (void)(x)
 507 #endif
 508
 509
 510 #ifndef Elements
 511 #define Elements(x) (sizeof(x)/sizeof(*(x)))
 512 #endif
 513
 514
 515
 516 #ifdef __cplusplus
 517 }
 518 #endif
 519
 520
 521 #endif /* COMPILER_H */