1999-08-08 15:27:18 +02:00
|
|
|
/* -----------------------------------------------------------------------
|
|
|
|
types.c - Copyright (c) 1996, 1998 Cygnus Solutions
|
|
|
|
|
|
|
|
Predefined ffi_types needed by libffi.
|
|
|
|
|
|
|
|
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 CYGNUS SOLUTIONS 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.
|
|
|
|
----------------------------------------------------------------------- */
|
|
|
|
|
|
|
|
#include <ffi.h>
|
|
|
|
#include <ffi_common.h>
|
|
|
|
|
|
|
|
/* Type definitions */
|
|
|
|
|
|
|
|
#define FFI_INTEGRAL_TYPEDEF(n, s, a, t) ffi_type ffi_type_##n = { s, a, t, NULL }
|
|
|
|
#define FFI_AGGREGATE_TYPEDEF(n, e) ffi_type ffi_type_##n = { 0, 0, FFI_TYPE_STRUCT, e }
|
|
|
|
|
|
|
|
/* Size and alignment are fake here. They must not be 0. */
|
|
|
|
FFI_INTEGRAL_TYPEDEF(void, 1, 1, FFI_TYPE_VOID);
|
|
|
|
|
|
|
|
FFI_INTEGRAL_TYPEDEF(uint8, 1, 1, FFI_TYPE_UINT8);
|
|
|
|
FFI_INTEGRAL_TYPEDEF(sint8, 1, 1, FFI_TYPE_SINT8);
|
|
|
|
FFI_INTEGRAL_TYPEDEF(uint16, 2, 2, FFI_TYPE_UINT16);
|
|
|
|
FFI_INTEGRAL_TYPEDEF(sint16, 2, 2, FFI_TYPE_SINT16);
|
|
|
|
FFI_INTEGRAL_TYPEDEF(uint32, 4, 4, FFI_TYPE_UINT32);
|
|
|
|
FFI_INTEGRAL_TYPEDEF(sint32, 4, 4, FFI_TYPE_SINT32);
|
|
|
|
FFI_INTEGRAL_TYPEDEF(float, 4, 4, FFI_TYPE_FLOAT);
|
|
|
|
|
2002-11-26 23:24:05 +01:00
|
|
|
#if defined ALPHA || defined SPARC64 || defined X86_64 || defined S390X \
|
|
|
|
|| defined IA64
|
2000-04-17 04:15:32 +02:00
|
|
|
|
|
|
|
FFI_INTEGRAL_TYPEDEF(pointer, 8, 8, FFI_TYPE_POINTER);
|
|
|
|
|
|
|
|
#else
|
|
|
|
|
|
|
|
FFI_INTEGRAL_TYPEDEF(pointer, 4, 4, FFI_TYPE_POINTER);
|
|
|
|
|
|
|
|
#endif
|
1999-08-08 15:27:18 +02:00
|
|
|
|
2002-07-19 01:08:31 +02:00
|
|
|
#if defined X86 || defined X86_WIN32 || defined ARM || defined M68K
|
1999-08-08 15:27:18 +02:00
|
|
|
|
|
|
|
FFI_INTEGRAL_TYPEDEF(uint64, 8, 4, FFI_TYPE_UINT64);
|
|
|
|
FFI_INTEGRAL_TYPEDEF(sint64, 8, 4, FFI_TYPE_SINT64);
|
|
|
|
|
2002-07-19 03:08:43 +02:00
|
|
|
#elif defined SH
|
|
|
|
|
|
|
|
FFI_INTEGRAL_TYPEDEF(uint64, 8, 4, FFI_TYPE_UINT64);
|
|
|
|
FFI_INTEGRAL_TYPEDEF(sint64, 8, 4, FFI_TYPE_SINT64);
|
|
|
|
|
1999-08-08 15:27:18 +02:00
|
|
|
#else
|
|
|
|
|
|
|
|
FFI_INTEGRAL_TYPEDEF(uint64, 8, 8, FFI_TYPE_UINT64);
|
|
|
|
FFI_INTEGRAL_TYPEDEF(sint64, 8, 8, FFI_TYPE_SINT64);
|
|
|
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
2002-07-19 01:08:31 +02:00
|
|
|
#if defined X86 || defined X86_WIN32 || defined M68K
|
2001-03-27 04:39:16 +02:00
|
|
|
|
|
|
|
FFI_INTEGRAL_TYPEDEF(double, 8, 4, FFI_TYPE_DOUBLE);
|
|
|
|
FFI_INTEGRAL_TYPEDEF(longdouble, 12, 4, FFI_TYPE_LONGDOUBLE);
|
|
|
|
|
2003-10-13 18:37:44 +02:00
|
|
|
#elif defined ARM || defined SH || defined POWERPC_AIX || defined POWERPC_DARWIN
|
2002-07-19 03:08:43 +02:00
|
|
|
|
|
|
|
FFI_INTEGRAL_TYPEDEF(double, 8, 4, FFI_TYPE_DOUBLE);
|
|
|
|
FFI_INTEGRAL_TYPEDEF(longdouble, 8, 4, FFI_TYPE_LONGDOUBLE);
|
|
|
|
|
1999-08-08 15:27:18 +02:00
|
|
|
#elif defined SPARC
|
|
|
|
|
|
|
|
FFI_INTEGRAL_TYPEDEF(double, 8, 8, FFI_TYPE_DOUBLE);
|
2000-04-17 04:15:32 +02:00
|
|
|
#ifdef SPARC64
|
|
|
|
FFI_INTEGRAL_TYPEDEF(longdouble, 16, 16, FFI_TYPE_LONGDOUBLE);
|
|
|
|
#else
|
1999-08-08 15:27:18 +02:00
|
|
|
FFI_INTEGRAL_TYPEDEF(longdouble, 16, 8, FFI_TYPE_LONGDOUBLE);
|
2000-04-17 04:15:32 +02:00
|
|
|
#endif
|
|
|
|
|
2002-07-19 01:08:31 +02:00
|
|
|
#elif defined X86_64
|
|
|
|
|
|
|
|
FFI_INTEGRAL_TYPEDEF(double, 8, 8, FFI_TYPE_DOUBLE);
|
|
|
|
FFI_INTEGRAL_TYPEDEF(longdouble, 16, 16, FFI_TYPE_LONGDOUBLE);
|
|
|
|
|
1999-08-08 15:27:18 +02:00
|
|
|
#else
|
|
|
|
|
|
|
|
FFI_INTEGRAL_TYPEDEF(double, 8, 8, FFI_TYPE_DOUBLE);
|
|
|
|
FFI_INTEGRAL_TYPEDEF(longdouble, 8, 8, FFI_TYPE_LONGDOUBLE);
|
|
|
|
|
|
|
|
#endif
|
|
|
|
|