include/ffi_common.h

   1 /* -----------------------------------------------------------------------
   2    ffi_common.h - Copyright (C) 2011, 2012, 2013  Anthony Green
   3                   Copyright (C) 2007  Free Software Foundation, Inc
   4                   Copyright (c) 1996  Red Hat, Inc.
   5
   6    Common internal definitions and macros. Only necessary for building
   7    libffi.
   8    ----------------------------------------------------------------------- */
   9
  10 #ifndef FFI_COMMON_H
  11 #define FFI_COMMON_H
  12
  13 #ifdef __cplusplus
  14 extern "C" {
  15 #endif
  16
  17 #include <fficonfig.h>
  18
  19 /* Do not move this. Some versions of AIX are very picky about where
  20    this is positioned. */
  21 #ifdef __GNUC__
  22 # if HAVE_ALLOCA_H
  23 #  include <alloca.h>
  24 # else
  25   /* mingw64 defines this already in malloc.h. */
  26 #  ifndef alloca
  27 #    define alloca __builtin_alloca
  28 #  endif
  29 # endif
  30 # define MAYBE_UNUSED __attribute__((__unused__))
  31 #else
  32 # define MAYBE_UNUSED
  33 # if HAVE_ALLOCA_H
  34 #  include <alloca.h>
  35 # else
  36 #  ifdef _AIX
  37 #   pragma alloca
  38 #  else
  39 #   ifndef alloca /* predefined by HP cc +Olibcalls */
  40 #    ifdef _MSC_VER
  41 #     define alloca _alloca
  42 #    else
  43 char *alloca ();
  44 #   endif
  45 #  endif
  46 # endif
  47 # endif
  48 #endif
  49
  50 /* Check for the existence of memcpy. */
  51 #if STDC_HEADERS
  52 # include <string.h>
  53 #else
  54 # ifndef HAVE_MEMCPY
  55 #  define memcpy(d, s, n) bcopy ((s), (d), (n))
  56 # endif
  57 #endif
  58
  59 #if defined(FFI_DEBUG)
  60 #include <stdio.h>
  61 #endif
  62
  63 #ifdef FFI_DEBUG
  64 void ffi_assert(char *expr, char *file, int line);
  65 void ffi_stop_here(void);
  66 void ffi_type_test(ffi_type *a, char *file, int line);
  67
  68 #define FFI_ASSERT(x) ((x) ? (void)0 : ffi_assert(#x, __FILE__,__LINE__))
  69 #define FFI_ASSERT_AT(x, f, l) ((x) ? 0 : ffi_assert(#x, (f), (l)))
  70 #define FFI_ASSERT_VALID_TYPE(x) ffi_type_test (x, __FILE__, __LINE__)
  71 #else
  72 #define FFI_ASSERT(x)
  73 #define FFI_ASSERT_AT(x, f, l)
  74 #define FFI_ASSERT_VALID_TYPE(x)
  75 #endif
  76
  77 /* v cast to size_t and aligned up to a multiple of a */
  78 #define FFI_ALIGN(v, a)  (((((size_t) (v))-1) | ((a)-1))+1)
  79 /* v cast to size_t and aligned down to a multiple of a */
  80 #define FFI_ALIGN_DOWN(v, a) (((size_t) (v)) & -a)
  81
  82 /* Perform machine dependent cif processing */
  83 ffi_status ffi_prep_cif_machdep(ffi_cif *cif);
  84 ffi_status ffi_prep_cif_machdep_var(ffi_cif *cif,
  85          unsigned int nfixedargs, unsigned int ntotalargs);
  86
  87
  88 #if HAVE_LONG_DOUBLE_VARIANT
  89 /* Used to adjust size/alignment of ffi types.  */
  90 void ffi_prep_types (ffi_abi abi);
  91 #endif
  92
  93 /* Used internally, but overridden by some architectures */
  94 ffi_status ffi_prep_cif_core(ffi_cif *cif,
  95                              ffi_abi abi,
  96                              unsigned int isvariadic,
  97                              unsigned int nfixedargs,
  98                              unsigned int ntotalargs,
  99                              ffi_type *rtype,
 100                              ffi_type **atypes);
 101
 102 /* Translate a data pointer to a code pointer.  Needed for closures on
 103    some targets.  */
 104 void *ffi_data_to_code_pointer (void *data) FFI_HIDDEN;
 105
 106 /* The arch code calls this to determine if a given closure has a
 107    static trampoline. */
 108 int ffi_tramp_is_present (void *closure);
 109
 110 /* Extended cif, used in callback from assembly routine */
 111 typedef struct
 112 {
 113   ffi_cif *cif;
 114   void *rvalue;
 115   void **avalue;
 116 } extended_cif;
 117
 118 /* Terse sized type definitions.  */
 119 #if defined(_MSC_VER) || defined(__sgi) || defined(__SUNPRO_C)
 120 typedef unsigned char UINT8;
 121 typedef signed char   SINT8;
 122 typedef unsigned short UINT16;
 123 typedef signed short   SINT16;
 124 typedef unsigned int UINT32;
 125 typedef signed int   SINT32;
 126 # ifdef _MSC_VER
 127 typedef unsigned __int64 UINT64;
 128 typedef signed __int64   SINT64;
 129 # else
 130 # include <inttypes.h>
 131 typedef uint64_t UINT64;
 132 typedef int64_t  SINT64;
 133 # endif
 134 #else
 135 typedef unsigned int UINT8  __attribute__((__mode__(__QI__)));
 136 typedef signed int   SINT8  __attribute__((__mode__(__QI__)));
 137 typedef unsigned int UINT16 __attribute__((__mode__(__HI__)));
 138 typedef signed int   SINT16 __attribute__((__mode__(__HI__)));
 139 typedef unsigned int UINT32 __attribute__((__mode__(__SI__)));
 140 typedef signed int   SINT32 __attribute__((__mode__(__SI__)));
 141 typedef unsigned int UINT64 __attribute__((__mode__(__DI__)));
 142 typedef signed int   SINT64 __attribute__((__mode__(__DI__)));
 143 #endif
 144
 145 typedef float FLOAT32;
 146
 147 #ifndef __GNUC__
 148 #define __builtin_expect(x, expected_value) (x)
 149 #endif
 150 #define LIKELY(x)    __builtin_expect(!!(x),1)
 151 #define UNLIKELY(x)  __builtin_expect((x)!=0,0)
 152
 153 #ifdef __cplusplus
 154 }
 155 #endif
 156
 157 #endif