cpython/Objects/cobject.c

161 lines
3.9 KiB
C
Raw Normal View History

1996-01-11 20:44:03 -04:00
/* Wrap void* pointers to be passed between C modules */
#include "Python.h"
/* Declarations for objects of type PyCObject */
typedef void (*destructor1)(void *);
typedef void (*destructor2)(void *, void*);
1996-01-11 20:44:03 -04:00
typedef struct {
PyObject_HEAD
void *cobject;
void *desc;
void (*destructor)(void *);
1996-01-11 20:44:03 -04:00
} PyCObject;
PyObject *
PyCObject_FromVoidPtr(void *cobj, void (*destr)(void *))
1996-01-11 20:44:03 -04:00
{
PyCObject *self;
self = PyObject_NEW(PyCObject, &PyCObject_Type);
if (self == NULL)
return NULL;
self->cobject=cobj;
self->destructor=destr;
self->desc=NULL;
return (PyObject *)self;
}
PyObject *
PyCObject_FromVoidPtrAndDesc(void *cobj, void *desc,
void (*destr)(void *, void *))
{
PyCObject *self;
if (!desc) {
PyErr_SetString(PyExc_TypeError,
"PyCObject_FromVoidPtrAndDesc called with null"
" description");
return NULL;
}
self = PyObject_NEW(PyCObject, &PyCObject_Type);
if (self == NULL)
return NULL;
2003-07-11 14:02:39 -03:00
self->cobject = cobj;
self->destructor = (destructor1)destr;
self->desc = desc;
return (PyObject *)self;
1996-01-11 20:44:03 -04:00
}
1997-01-22 16:48:48 -04:00
void *
PyCObject_AsVoidPtr(PyObject *self)
1997-01-22 16:48:48 -04:00
{
if (self) {
if (self->ob_type == &PyCObject_Type)
return ((PyCObject *)self)->cobject;
PyErr_SetString(PyExc_TypeError,
"PyCObject_AsVoidPtr with non-C-object");
}
if (!PyErr_Occurred())
PyErr_SetString(PyExc_TypeError,
"PyCObject_AsVoidPtr called with null pointer");
return NULL;
1997-01-22 16:48:48 -04:00
}
void *
PyCObject_GetDesc(PyObject *self)
{
if (self) {
if (self->ob_type == &PyCObject_Type)
return ((PyCObject *)self)->desc;
PyErr_SetString(PyExc_TypeError,
"PyCObject_GetDesc with non-C-object");
}
if (!PyErr_Occurred())
PyErr_SetString(PyExc_TypeError,
"PyCObject_GetDesc called with null pointer");
return NULL;
}
1997-01-22 16:48:48 -04:00
void *
PyCObject_Import(char *module_name, char *name)
1997-01-22 16:48:48 -04:00
{
PyObject *m, *c;
void *r = NULL;
if ((m = PyImport_ImportModule(module_name))) {
if ((c = PyObject_GetAttrString(m,name))) {
r = PyCObject_AsVoidPtr(c);
Py_DECREF(c);
1997-01-22 16:48:48 -04:00
}
Py_DECREF(m);
1997-01-22 16:48:48 -04:00
}
return r;
1997-01-22 16:48:48 -04:00
}
2003-10-19 15:30:01 -03:00
int
PyCObject_SetVoidPtr(PyObject *self, void *cobj)
2003-10-19 15:30:01 -03:00
{
PyCObject* cself = (PyCObject*)self;
if (cself == NULL || !PyCObject_Check(cself) ||
cself->destructor != NULL) {
2003-10-19 15:30:01 -03:00
PyErr_SetString(PyExc_TypeError,
"Invalid call to PyCObject_SetVoidPtr");
return 0;
}
cself->cobject = cobj;
2003-10-19 15:30:01 -03:00
return 1;
}
1996-01-11 20:44:03 -04:00
static void
PyCObject_dealloc(PyCObject *self)
1996-01-11 20:44:03 -04:00
{
if (self->destructor) {
if(self->desc)
((destructor2)(self->destructor))(self->cobject, self->desc);
else
(self->destructor)(self->cobject);
}
PyObject_DEL(self);
1996-01-11 20:44:03 -04:00
}
1997-01-22 16:48:48 -04:00
2002-06-13 17:33:02 -03:00
PyDoc_STRVAR(PyCObject_Type__doc__,
1996-07-31 21:02:33 -03:00
"C objects to be exported from one extension module to another\n\
\n\
C objects are used for communication between extension modules. They\n\
provide a way for an extension module to export a C interface to other\n\
extension modules, so that extension modules can use the Python import\n\
2002-06-13 17:33:02 -03:00
mechanism to link to one another.");
1996-01-11 20:44:03 -04:00
PyTypeObject PyCObject_Type = {
PyVarObject_HEAD_INIT(&PyType_Type, 0)
"PyCObject", /*tp_name*/
sizeof(PyCObject), /*tp_basicsize*/
0, /*tp_itemsize*/
/* methods */
(destructor)PyCObject_dealloc, /*tp_dealloc*/
0, /*tp_print*/
0, /*tp_getattr*/
0, /*tp_setattr*/
0, /*tp_compare*/
0, /*tp_repr*/
0, /*tp_as_number*/
0, /*tp_as_sequence*/
0, /*tp_as_mapping*/
0, /*tp_hash*/
0, /*tp_call*/
0, /*tp_str*/
0, /*tp_getattro*/
0, /*tp_setattro*/
0, /*tp_as_buffer*/
0, /*tp_flags*/
PyCObject_Type__doc__ /*tp_doc*/
1996-01-11 20:44:03 -04:00
};