236 lines
9.7 KiB
C
236 lines
9.7 KiB
C
#define _CFFI_
|
|
#include <Python.h>
|
|
#ifdef __cplusplus
|
|
extern "C" {
|
|
#endif
|
|
#include <stddef.h>
|
|
#include "parse_c_type.h"
|
|
|
|
/* this block of #ifs should be kept exactly identical between
|
|
c/_cffi_backend.c, cffi/vengine_cpy.py, cffi/vengine_gen.py
|
|
and cffi/_cffi_include.h */
|
|
#if defined(_MSC_VER)
|
|
# include <malloc.h> /* for alloca() */
|
|
# if _MSC_VER < 1600 /* MSVC < 2010 */
|
|
typedef __int8 int8_t;
|
|
typedef __int16 int16_t;
|
|
typedef __int32 int32_t;
|
|
typedef __int64 int64_t;
|
|
typedef unsigned __int8 uint8_t;
|
|
typedef unsigned __int16 uint16_t;
|
|
typedef unsigned __int32 uint32_t;
|
|
typedef unsigned __int64 uint64_t;
|
|
typedef __int8 int_least8_t;
|
|
typedef __int16 int_least16_t;
|
|
typedef __int32 int_least32_t;
|
|
typedef __int64 int_least64_t;
|
|
typedef unsigned __int8 uint_least8_t;
|
|
typedef unsigned __int16 uint_least16_t;
|
|
typedef unsigned __int32 uint_least32_t;
|
|
typedef unsigned __int64 uint_least64_t;
|
|
typedef __int8 int_fast8_t;
|
|
typedef __int16 int_fast16_t;
|
|
typedef __int32 int_fast32_t;
|
|
typedef __int64 int_fast64_t;
|
|
typedef unsigned __int8 uint_fast8_t;
|
|
typedef unsigned __int16 uint_fast16_t;
|
|
typedef unsigned __int32 uint_fast32_t;
|
|
typedef unsigned __int64 uint_fast64_t;
|
|
typedef __int64 intmax_t;
|
|
typedef unsigned __int64 uintmax_t;
|
|
# else
|
|
# include <stdint.h>
|
|
# endif
|
|
# if _MSC_VER < 1800 /* MSVC < 2013 */
|
|
typedef unsigned char _Bool;
|
|
# endif
|
|
#else
|
|
# include <stdint.h>
|
|
# if (defined (__SVR4) && defined (__sun)) || defined(_AIX) || defined(__hpux)
|
|
# include <alloca.h>
|
|
# endif
|
|
#endif
|
|
|
|
#ifdef __GNUC__
|
|
# define _CFFI_UNUSED_FN __attribute__((unused))
|
|
#else
|
|
# define _CFFI_UNUSED_FN /* nothing */
|
|
#endif
|
|
|
|
/********** CPython-specific section **********/
|
|
#ifndef PYPY_VERSION
|
|
|
|
|
|
#if PY_MAJOR_VERSION >= 3
|
|
# define PyInt_FromLong PyLong_FromLong
|
|
#endif
|
|
|
|
#define _cffi_from_c_double PyFloat_FromDouble
|
|
#define _cffi_from_c_float PyFloat_FromDouble
|
|
#define _cffi_from_c_long PyInt_FromLong
|
|
#define _cffi_from_c_ulong PyLong_FromUnsignedLong
|
|
#define _cffi_from_c_longlong PyLong_FromLongLong
|
|
#define _cffi_from_c_ulonglong PyLong_FromUnsignedLongLong
|
|
|
|
#define _cffi_to_c_double PyFloat_AsDouble
|
|
#define _cffi_to_c_float PyFloat_AsDouble
|
|
|
|
#define _cffi_from_c_int(x, type) \
|
|
(((type)-1) > 0 ? /* unsigned */ \
|
|
(sizeof(type) < sizeof(long) ? \
|
|
PyInt_FromLong((long)x) : \
|
|
sizeof(type) == sizeof(long) ? \
|
|
PyLong_FromUnsignedLong((unsigned long)x) : \
|
|
PyLong_FromUnsignedLongLong((unsigned long long)x)) : \
|
|
(sizeof(type) <= sizeof(long) ? \
|
|
PyInt_FromLong((long)x) : \
|
|
PyLong_FromLongLong((long long)x)))
|
|
|
|
#define _cffi_to_c_int(o, type) \
|
|
((type)( \
|
|
sizeof(type) == 1 ? (((type)-1) > 0 ? (type)_cffi_to_c_u8(o) \
|
|
: (type)_cffi_to_c_i8(o)) : \
|
|
sizeof(type) == 2 ? (((type)-1) > 0 ? (type)_cffi_to_c_u16(o) \
|
|
: (type)_cffi_to_c_i16(o)) : \
|
|
sizeof(type) == 4 ? (((type)-1) > 0 ? (type)_cffi_to_c_u32(o) \
|
|
: (type)_cffi_to_c_i32(o)) : \
|
|
sizeof(type) == 8 ? (((type)-1) > 0 ? (type)_cffi_to_c_u64(o) \
|
|
: (type)_cffi_to_c_i64(o)) : \
|
|
(Py_FatalError("unsupported size for type " #type), (type)0)))
|
|
|
|
#define _cffi_to_c_i8 \
|
|
((int(*)(PyObject *))_cffi_exports[1])
|
|
#define _cffi_to_c_u8 \
|
|
((int(*)(PyObject *))_cffi_exports[2])
|
|
#define _cffi_to_c_i16 \
|
|
((int(*)(PyObject *))_cffi_exports[3])
|
|
#define _cffi_to_c_u16 \
|
|
((int(*)(PyObject *))_cffi_exports[4])
|
|
#define _cffi_to_c_i32 \
|
|
((int(*)(PyObject *))_cffi_exports[5])
|
|
#define _cffi_to_c_u32 \
|
|
((unsigned int(*)(PyObject *))_cffi_exports[6])
|
|
#define _cffi_to_c_i64 \
|
|
((long long(*)(PyObject *))_cffi_exports[7])
|
|
#define _cffi_to_c_u64 \
|
|
((unsigned long long(*)(PyObject *))_cffi_exports[8])
|
|
#define _cffi_to_c_char \
|
|
((int(*)(PyObject *))_cffi_exports[9])
|
|
#define _cffi_from_c_pointer \
|
|
((PyObject *(*)(char *, CTypeDescrObject *))_cffi_exports[10])
|
|
#define _cffi_to_c_pointer \
|
|
((char *(*)(PyObject *, CTypeDescrObject *))_cffi_exports[11])
|
|
#define _cffi_get_struct_layout \
|
|
not used any more
|
|
#define _cffi_restore_errno \
|
|
((void(*)(void))_cffi_exports[13])
|
|
#define _cffi_save_errno \
|
|
((void(*)(void))_cffi_exports[14])
|
|
#define _cffi_from_c_char \
|
|
((PyObject *(*)(char))_cffi_exports[15])
|
|
#define _cffi_from_c_deref \
|
|
((PyObject *(*)(char *, CTypeDescrObject *))_cffi_exports[16])
|
|
#define _cffi_to_c \
|
|
((int(*)(char *, CTypeDescrObject *, PyObject *))_cffi_exports[17])
|
|
#define _cffi_from_c_struct \
|
|
((PyObject *(*)(char *, CTypeDescrObject *))_cffi_exports[18])
|
|
#define _cffi_to_c_wchar_t \
|
|
((wchar_t(*)(PyObject *))_cffi_exports[19])
|
|
#define _cffi_from_c_wchar_t \
|
|
((PyObject *(*)(wchar_t))_cffi_exports[20])
|
|
#define _cffi_to_c_long_double \
|
|
((long double(*)(PyObject *))_cffi_exports[21])
|
|
#define _cffi_to_c__Bool \
|
|
((_Bool(*)(PyObject *))_cffi_exports[22])
|
|
#define _cffi_prepare_pointer_call_argument \
|
|
((Py_ssize_t(*)(CTypeDescrObject *, PyObject *, char **))_cffi_exports[23])
|
|
#define _cffi_convert_array_from_object \
|
|
((int(*)(char *, CTypeDescrObject *, PyObject *))_cffi_exports[24])
|
|
#define _CFFI_CPIDX 25
|
|
#define _cffi_call_python \
|
|
((void(*)(struct _cffi_externpy_s *, char *))_cffi_exports[_CFFI_CPIDX])
|
|
#define _CFFI_NUM_EXPORTS 26
|
|
|
|
typedef struct _ctypedescr CTypeDescrObject;
|
|
|
|
static void *_cffi_exports[_CFFI_NUM_EXPORTS];
|
|
|
|
#define _cffi_type(index) ( \
|
|
assert((((uintptr_t)_cffi_types[index]) & 1) == 0), \
|
|
(CTypeDescrObject *)_cffi_types[index])
|
|
|
|
static PyObject *_cffi_init(const char *module_name, Py_ssize_t version,
|
|
const struct _cffi_type_context_s *ctx)
|
|
{
|
|
PyObject *module, *o_arg, *new_module;
|
|
void *raw[] = {
|
|
(void *)module_name,
|
|
(void *)version,
|
|
(void *)_cffi_exports,
|
|
(void *)ctx,
|
|
};
|
|
|
|
module = PyImport_ImportModule("_cffi_backend");
|
|
if (module == NULL)
|
|
goto failure;
|
|
|
|
o_arg = PyLong_FromVoidPtr((void *)raw);
|
|
if (o_arg == NULL)
|
|
goto failure;
|
|
|
|
new_module = PyObject_CallMethod(
|
|
module, (char *)"_init_cffi_1_0_external_module", (char *)"O", o_arg);
|
|
|
|
Py_DECREF(o_arg);
|
|
Py_DECREF(module);
|
|
return new_module;
|
|
|
|
failure:
|
|
Py_XDECREF(module);
|
|
return NULL;
|
|
}
|
|
|
|
_CFFI_UNUSED_FN
|
|
static PyObject **_cffi_unpack_args(PyObject *args_tuple, Py_ssize_t expected,
|
|
const char *fnname)
|
|
{
|
|
if (PyTuple_GET_SIZE(args_tuple) != expected) {
|
|
PyErr_Format(PyExc_TypeError,
|
|
"%.150s() takes exactly %zd arguments (%zd given)",
|
|
fnname, expected, PyTuple_GET_SIZE(args_tuple));
|
|
return NULL;
|
|
}
|
|
return &PyTuple_GET_ITEM(args_tuple, 0); /* pointer to the first item,
|
|
the others follow */
|
|
}
|
|
|
|
/********** end CPython-specific section **********/
|
|
#else
|
|
_CFFI_UNUSED_FN
|
|
static void (*_cffi_call_python_org)(struct _cffi_externpy_s *, char *);
|
|
# define _cffi_call_python _cffi_call_python_org
|
|
#endif
|
|
|
|
|
|
#define _cffi_array_len(array) (sizeof(array) / sizeof((array)[0]))
|
|
|
|
#define _cffi_prim_int(size, sign) \
|
|
((size) == 1 ? ((sign) ? _CFFI_PRIM_INT8 : _CFFI_PRIM_UINT8) : \
|
|
(size) == 2 ? ((sign) ? _CFFI_PRIM_INT16 : _CFFI_PRIM_UINT16) : \
|
|
(size) == 4 ? ((sign) ? _CFFI_PRIM_INT32 : _CFFI_PRIM_UINT32) : \
|
|
(size) == 8 ? ((sign) ? _CFFI_PRIM_INT64 : _CFFI_PRIM_UINT64) : \
|
|
_CFFI__UNKNOWN_PRIM)
|
|
|
|
#define _cffi_prim_float(size) \
|
|
((size) == sizeof(float) ? _CFFI_PRIM_FLOAT : \
|
|
(size) == sizeof(double) ? _CFFI_PRIM_DOUBLE : \
|
|
(size) == sizeof(long double) ? _CFFI__UNKNOWN_LONG_DOUBLE : \
|
|
_CFFI__UNKNOWN_FLOAT_PRIM)
|
|
|
|
#define _cffi_check_int(got, got_nonpos, expected) \
|
|
((got_nonpos) == (expected <= 0) && \
|
|
(got) == (unsigned long long)expected)
|
|
|
|
#ifdef __cplusplus
|
|
}
|
|
#endif
|