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 /* Extended cif, used in callback from assembly routine */
107 typedef struct
108 {
109   ffi_cif *cif;
110   void *rvalue;
111   void **avalue;
112 } extended_cif;
113 
114 /* Terse sized type definitions.  */
115 #if defined(_MSC_VER) || defined(__sgi) || defined(__SUNPRO_C)
116 typedef unsigned char UINT8;
117 typedef signed char   SINT8;
118 typedef unsigned short UINT16;
119 typedef signed short   SINT16;
120 typedef unsigned int UINT32;
121 typedef signed int   SINT32;
122 # ifdef _MSC_VER
123 typedef unsigned __int64 UINT64;
124 typedef signed __int64   SINT64;
125 # else
126 # include <inttypes.h>
127 typedef uint64_t UINT64;
128 typedef int64_t  SINT64;
129 # endif
130 #else
131 typedef unsigned int UINT8  __attribute__((__mode__(__QI__)));
132 typedef signed int   SINT8  __attribute__((__mode__(__QI__)));
133 typedef unsigned int UINT16 __attribute__((__mode__(__HI__)));
134 typedef signed int   SINT16 __attribute__((__mode__(__HI__)));
135 typedef unsigned int UINT32 __attribute__((__mode__(__SI__)));
136 typedef signed int   SINT32 __attribute__((__mode__(__SI__)));
137 typedef unsigned int UINT64 __attribute__((__mode__(__DI__)));
138 typedef signed int   SINT64 __attribute__((__mode__(__DI__)));
139 #endif
140 
141 typedef float FLOAT32;
142 
143 #ifndef __GNUC__
144 #define __builtin_expect(x, expected_value) (x)
145 #endif
146 #define LIKELY(x)    __builtin_expect(!!(x),1)
147 #define UNLIKELY(x)  __builtin_expect((x)!=0,0)
148 
149 #ifdef __cplusplus
150 }
151 #endif
152 
153 #endif
154