#define SWIGPYTHON
#include <string.h>
#include <stdlib.h>
-/***********************************************************************
- * $Header$
- * swig_lib/python/python.cfg
- *
- * This file contains coded needed to add variable linking to the
- * Python interpreter. C variables are added as a new kind of Python
- * datatype.
- *
- * Also contains supporting code for building python under Windows
- * and things like that.
- *
- * $Log$
- * Revision 1.8 1999/07/31 07:56:02 RD
- * wxPython 2.1b1:
- *
- * Added the missing wxWindow.GetUpdateRegion() method.
- *
- * Made a new change in SWIG (update your patches everybody) that
- * provides a fix for global shadow objects that get an exception in
- * their __del__ when their extension module has already been deleted.
- * It was only a 1 line change in .../SWIG/Modules/pycpp.cxx at about
- * line 496 if you want to do it by hand.
- *
- * It is now possible to run through MainLoop more than once in any one
- * process. The cleanup that used to happen as MainLoop completed (and
- * prevented it from running again) has been delayed until the wxc module
- * is being unloaded by Python.
- *
- * wxWindow.PopupMenu() now takes a wxPoint instead of x,y. Added
- * wxWindow.PopupMenuXY to be consistent with some other methods.
- *
- * Added wxGrid.SetEditInPlace and wxGrid.GetEditInPlace.
- *
- * You can now provide your own app.MainLoop method. See
- * wxPython/demo/demoMainLoop.py for an example and some explaination.
- *
- * Got the in-place-edit for the wxTreeCtrl fixed and added some demo
- * code to show how to use it.
- *
- * Put the wxIcon constructor back in for GTK as it now has one that
- * matches MSW's.
- *
- * Added wxGrid.GetCells
- *
- * Added wxSystemSettings static methods as functions with names like
- * wxSystemSettings_GetSystemColour.
- *
- * Removed wxPyMenu since using menu callbacks have been depreciated in
- * wxWindows. Use wxMenu and events instead.
- *
- * Added alternate wxBitmap constructor (for MSW only) as
- * wxBitmapFromData(data, type, width, height, depth = 1)
- *
- * Added a helper function named wxPyTypeCast that can convert shadow
- * objects of one type into shadow objects of another type. (Like doing
- * a down-cast.) See the implementation in wx.py for some docs.
- *
- ************************************************************************/
-
-#ifdef __cplusplus
-extern "C" {
-#endif
-#include "Python.h"
-#ifdef __cplusplus
-}
-#endif
-
/* Definitions for Windows/Unix exporting */
#if defined(__WIN32__)
# if defined(_MSC_VER)
# define SWIGEXPORT(a,b) a b
#endif
-#ifdef SWIG_GLOBAL
#ifdef __cplusplus
-#define SWIGSTATIC extern "C"
-#else
-#define SWIGSTATIC
-#endif
-#endif
-
-#ifndef SWIGSTATIC
-#define SWIGSTATIC static
+extern "C" {
#endif
-
-typedef struct {
- char *name;
- PyObject *(*get_attr)(void);
- int (*set_attr)(PyObject *);
-} swig_globalvar;
-
-typedef struct swig_varlinkobject {
- PyObject_HEAD
- swig_globalvar **vars;
- int nvars;
- int maxvars;
-} swig_varlinkobject;
-
-/* ----------------------------------------------------------------------
- swig_varlink_repr()
-
- Function for python repr method
- ---------------------------------------------------------------------- */
-
-static PyObject *
-swig_varlink_repr(swig_varlinkobject *v)
-{
- v = v;
- return PyString_FromString("<Global variables>");
-}
-
-/* ---------------------------------------------------------------------
- swig_varlink_print()
-
- Print out all of the global variable names
- --------------------------------------------------------------------- */
-
-static int
-swig_varlink_print(swig_varlinkobject *v, FILE *fp, int flags)
-{
-
- int i = 0;
- flags = flags;
- fprintf(fp,"Global variables { ");
- while (v->vars[i]) {
- fprintf(fp,"%s", v->vars[i]->name);
- i++;
- if (v->vars[i]) fprintf(fp,", ");
- }
- fprintf(fp," }\n");
- return 0;
-}
-
-/* --------------------------------------------------------------------
- swig_varlink_getattr
-
- This function gets the value of a variable and returns it as a
- PyObject. In our case, we'll be looking at the datatype and
- converting into a number or string
- -------------------------------------------------------------------- */
-
-static PyObject *
-swig_varlink_getattr(swig_varlinkobject *v, char *n)
-{
- int i = 0;
- char temp[128];
-
- while (v->vars[i]) {
- if (strcmp(v->vars[i]->name,n) == 0) {
- return (*v->vars[i]->get_attr)();
- }
- i++;
- }
- sprintf(temp,"C global variable %s not found.", n);
- PyErr_SetString(PyExc_NameError,temp);
- return NULL;
-}
-
-/* -------------------------------------------------------------------
- swig_varlink_setattr()
-
- This function sets the value of a variable.
- ------------------------------------------------------------------- */
-
-static int
-swig_varlink_setattr(swig_varlinkobject *v, char *n, PyObject *p)
-{
- char temp[128];
- int i = 0;
- while (v->vars[i]) {
- if (strcmp(v->vars[i]->name,n) == 0) {
- return (*v->vars[i]->set_attr)(p);
- }
- i++;
- }
- sprintf(temp,"C global variable %s not found.", n);
- PyErr_SetString(PyExc_NameError,temp);
- return 1;
-}
-
-statichere PyTypeObject varlinktype = {
-/* PyObject_HEAD_INIT(&PyType_Type) Note : This doesn't work on some machines */
- PyObject_HEAD_INIT(0)
- 0,
- "varlink", /* Type name */
- sizeof(swig_varlinkobject), /* Basic size */
- 0, /* Itemsize */
- 0, /* Deallocator */
- (printfunc) swig_varlink_print, /* Print */
- (getattrfunc) swig_varlink_getattr, /* get attr */
- (setattrfunc) swig_varlink_setattr, /* Set attr */
- 0, /* tp_compare */
- (reprfunc) swig_varlink_repr, /* tp_repr */
- 0, /* tp_as_number */
- 0, /* tp_as_mapping*/
- 0, /* tp_hash */
-};
-
-/* Create a variable linking object for use later */
-
-SWIGSTATIC PyObject *
-SWIG_newvarlink(void)
-{
- swig_varlinkobject *result = 0;
- result = PyMem_NEW(swig_varlinkobject,1);
- varlinktype.ob_type = &PyType_Type; /* Patch varlinktype into a PyType */
- result->ob_type = &varlinktype;
- /* _Py_NewReference(result); Does not seem to be necessary */
- result->nvars = 0;
- result->maxvars = 64;
- result->vars = (swig_globalvar **) malloc(64*sizeof(swig_globalvar *));
- result->vars[0] = 0;
- result->ob_refcnt = 0;
- Py_XINCREF((PyObject *) result);
- return ((PyObject*) result);
-}
-
-SWIGSTATIC void
-SWIG_addvarlink(PyObject *p, char *name,
- PyObject *(*get_attr)(void), int (*set_attr)(PyObject *p))
-{
- swig_varlinkobject *v;
- v= (swig_varlinkobject *) p;
-
- if (v->nvars >= v->maxvars -1) {
- v->maxvars = 2*v->maxvars;
- v->vars = (swig_globalvar **) realloc(v->vars,v->maxvars*sizeof(swig_globalvar *));
- if (v->vars == NULL) {
- fprintf(stderr,"SWIG : Fatal error in initializing Python module.\n");
- exit(1);
- }
- }
- v->vars[v->nvars] = (swig_globalvar *) malloc(sizeof(swig_globalvar));
- v->vars[v->nvars]->name = (char *) malloc(strlen(name)+1);
- strcpy(v->vars[v->nvars]->name,name);
- v->vars[v->nvars]->get_attr = get_attr;
- v->vars[v->nvars]->set_attr = set_attr;
- v->nvars++;
- v->vars[v->nvars] = 0;
-}
-
-
-
-/*****************************************************************************
- * $Header$
- *
- * swigptr.swg
- *
- * This file contains supporting code for the SWIG run-time type checking
- * mechanism. The following functions are available :
- *
- * SWIG_RegisterMapping(char *origtype, char *newtype, void *(*cast)(void *));
- *
- * Registers a new type-mapping with the type-checker. origtype is the
- * original datatype and newtype is an equivalent type. cast is optional
- * pointer to a function to cast pointer values between types (this
- * is typically used to cast pointers from derived classes to base classes in C++)
- *
- * SWIG_MakePtr(char *buffer, void *ptr, char *typestring);
- *
- * Makes a pointer string from a pointer and typestring. The result is returned
- * in buffer which is assumed to hold enough space for the result.
- *
- * char * SWIG_GetPtr(char *buffer, void **ptr, char *type)
- *
- * Gets a pointer value from a string. If there is a type-mismatch, returns
- * a character string to the received type. On success, returns NULL.
- *
- *
- * You can remap these functions by making a file called "swigptr.swg" in
- * your the same directory as the interface file you are wrapping.
- *
- * These functions are normally declared static, but this file can be
- * can be used in a multi-module environment by redefining the symbol
- * SWIGSTATIC.
- *****************************************************************************/
-
-#include <stdlib.h>
-
-#ifdef SWIG_GLOBAL
+#include "Python.h"
+extern void SWIG_MakePtr(char *, void *, char *);
+extern void SWIG_RegisterMapping(char *, char *, void *(*)(void *));
+extern char *SWIG_GetPtr(char *, void **, char *);
+extern void SWIG_addvarlink(PyObject *, char *, PyObject *(*)(void), int (*)(PyObject *));
+extern PyObject *SWIG_newvarlink(void);
#ifdef __cplusplus
-#define SWIGSTATIC extern "C"
-#else
-#define SWIGSTATIC
-#endif
-#endif
-
-#ifndef SWIGSTATIC
-#define SWIGSTATIC static
-#endif
-
-
-/* SWIG pointer structure */
-
-typedef struct SwigPtrType {
- char *name; /* Datatype name */
- int len; /* Length (used for optimization) */
- void *(*cast)(void *); /* Pointer casting function */
- struct SwigPtrType *next; /* Linked list pointer */
-} SwigPtrType;
-
-/* Pointer cache structure */
-
-typedef struct {
- int stat; /* Status (valid) bit */
- SwigPtrType *tp; /* Pointer to type structure */
- char name[256]; /* Given datatype name */
- char mapped[256]; /* Equivalent name */
-} SwigCacheType;
-
-/* Some variables */
-
-static int SwigPtrMax = 64; /* Max entries that can be currently held */
- /* This value may be adjusted dynamically */
-static int SwigPtrN = 0; /* Current number of entries */
-static int SwigPtrSort = 0; /* Status flag indicating sort */
-static int SwigStart[256]; /* Starting positions of types */
-
-/* Pointer table */
-static SwigPtrType *SwigPtrTable = 0; /* Table containing pointer equivalences */
-
-/* Cached values */
-
-#define SWIG_CACHESIZE 8
-#define SWIG_CACHEMASK 0x7
-static SwigCacheType SwigCache[SWIG_CACHESIZE];
-static int SwigCacheIndex = 0;
-static int SwigLastCache = 0;
-
-/* Sort comparison function */
-static int swigsort(const void *data1, const void *data2) {
- SwigPtrType *d1 = (SwigPtrType *) data1;
- SwigPtrType *d2 = (SwigPtrType *) data2;
- return strcmp(d1->name,d2->name);
-}
-
-/* Binary Search function */
-static int swigcmp(const void *key, const void *data) {
- char *k = (char *) key;
- SwigPtrType *d = (SwigPtrType *) data;
- return strncmp(k,d->name,d->len);
}
-
-/* Register a new datatype with the type-checker */
-
-SWIGSTATIC
-void SWIG_RegisterMapping(char *origtype, char *newtype, void *(*cast)(void *)) {
-
- int i;
- SwigPtrType *t = 0,*t1;
-
- /* Allocate the pointer table if necessary */
-
- if (!SwigPtrTable) {
- SwigPtrTable = (SwigPtrType *) malloc(SwigPtrMax*sizeof(SwigPtrType));
- SwigPtrN = 0;
- }
- /* Grow the table */
- if (SwigPtrN >= SwigPtrMax) {
- SwigPtrMax = 2*SwigPtrMax;
- SwigPtrTable = (SwigPtrType *) realloc((char *) SwigPtrTable,SwigPtrMax*sizeof(SwigPtrType));
- }
- for (i = 0; i < SwigPtrN; i++)
- if (strcmp(SwigPtrTable[i].name,origtype) == 0) {
- t = &SwigPtrTable[i];
- break;
- }
- if (!t) {
- t = &SwigPtrTable[SwigPtrN];
- t->name = origtype;
- t->len = strlen(t->name);
- t->cast = 0;
- t->next = 0;
- SwigPtrN++;
- }
-
- /* Check for existing entry */
-
- while (t->next) {
- if ((strcmp(t->name,newtype) == 0)) {
- if (cast) t->cast = cast;
- return;
- }
- t = t->next;
- }
-
- /* Now place entry (in sorted order) */
-
- t1 = (SwigPtrType *) malloc(sizeof(SwigPtrType));
- t1->name = newtype;
- t1->len = strlen(t1->name);
- t1->cast = cast;
- t1->next = 0;
- t->next = t1;
- SwigPtrSort = 0;
-}
-
-/* Make a pointer value string */
-
-SWIGSTATIC
-void SWIG_MakePtr(char *_c, const void *_ptr, char *type) {
- static char _hex[16] =
- {'0', '1', '2', '3', '4', '5', '6', '7', '8', '9',
- 'a', 'b', 'c', 'd', 'e', 'f'};
- unsigned long _p, _s;
- char _result[20], *_r; /* Note : a 64-bit hex number = 16 digits */
- _r = _result;
- _p = (unsigned long) _ptr;
- if (_p > 0) {
- while (_p > 0) {
- _s = _p & 0xf;
- *(_r++) = _hex[_s];
- _p = _p >> 4;
- }
- *_r = '_';
- while (_r >= _result)
- *(_c++) = *(_r--);
- } else {
- strcpy (_c, "NULL");
- }
- if (_ptr)
- strcpy (_c, type);
-}
-
-/* Define for backwards compatibility */
-
-#define _swig_make_hex SWIG_MakePtr
-
-/* Function for getting a pointer value */
-
-SWIGSTATIC
-char *SWIG_GetPtr(char *_c, void **ptr, char *_t)
-{
- unsigned long _p;
- char temp_type[256];
- char *name;
- int i, len;
- SwigPtrType *sp,*tp;
- SwigCacheType *cache;
- int start, end;
- _p = 0;
-
- /* Pointer values must start with leading underscore */
- if (*_c == '_') {
- _c++;
- /* Extract hex value from pointer */
- while (*_c) {
- if ((*_c >= '0') && (*_c <= '9'))
- _p = (_p << 4) + (*_c - '0');
- else if ((*_c >= 'a') && (*_c <= 'f'))
- _p = (_p << 4) + ((*_c - 'a') + 10);
- else
- break;
- _c++;
- }
-
- if (_t) {
- if (strcmp(_t,_c)) {
- if (!SwigPtrSort) {
- qsort((void *) SwigPtrTable, SwigPtrN, sizeof(SwigPtrType), swigsort);
- for (i = 0; i < 256; i++) {
- SwigStart[i] = SwigPtrN;
- }
- for (i = SwigPtrN-1; i >= 0; i--) {
- SwigStart[(int) (SwigPtrTable[i].name[1])] = i;
- }
- for (i = 255; i >= 1; i--) {
- if (SwigStart[i-1] > SwigStart[i])
- SwigStart[i-1] = SwigStart[i];
- }
- SwigPtrSort = 1;
- for (i = 0; i < SWIG_CACHESIZE; i++)
- SwigCache[i].stat = 0;
- }
-
- /* First check cache for matches. Uses last cache value as starting point */
- cache = &SwigCache[SwigLastCache];
- for (i = 0; i < SWIG_CACHESIZE; i++) {
- if (cache->stat) {
- if (strcmp(_t,cache->name) == 0) {
- if (strcmp(_c,cache->mapped) == 0) {
- cache->stat++;
- *ptr = (void *) _p;
- if (cache->tp->cast) *ptr = (*(cache->tp->cast))(*ptr);
- return (char *) 0;
- }
- }
- }
- SwigLastCache = (SwigLastCache+1) & SWIG_CACHEMASK;
- if (!SwigLastCache) cache = SwigCache;
- else cache++;
- }
- /* We have a type mismatch. Will have to look through our type
- mapping table to figure out whether or not we can accept this datatype */
-
- start = SwigStart[(int) _t[1]];
- end = SwigStart[(int) _t[1]+1];
- sp = &SwigPtrTable[start];
- while (start < end) {
- if (swigcmp(_t,sp) == 0) break;
- sp++;
- start++;
- }
- if (start >= end) sp = 0;
- /* Try to find a match for this */
- if (sp) {
- while (swigcmp(_t,sp) == 0) {
- name = sp->name;
- len = sp->len;
- tp = sp->next;
- /* Try to find entry for our given datatype */
- while(tp) {
- if (tp->len >= 255) {
- return _c;
- }
- strcpy(temp_type,tp->name);
- strncat(temp_type,_t+len,255-tp->len);
- if (strcmp(_c,temp_type) == 0) {
-
- strcpy(SwigCache[SwigCacheIndex].mapped,_c);
- strcpy(SwigCache[SwigCacheIndex].name,_t);
- SwigCache[SwigCacheIndex].stat = 1;
- SwigCache[SwigCacheIndex].tp = tp;
- SwigCacheIndex = SwigCacheIndex & SWIG_CACHEMASK;
-
- /* Get pointer value */
- *ptr = (void *) _p;
- if (tp->cast) *ptr = (*(tp->cast))(*ptr);
- return (char *) 0;
- }
- tp = tp->next;
- }
- sp++;
- /* Hmmm. Didn't find it this time */
- }
- }
- /* Didn't find any sort of match for this data.
- Get the pointer value and return the received type */
- *ptr = (void *) _p;
- return _c;
- } else {
- /* Found a match on the first try. Return pointer value */
- *ptr = (void *) _p;
- return (char *) 0;
- }
- } else {
- /* No type specified. Good luck */
- *ptr = (void *) _p;
- return (char *) 0;
- }
- } else {
- if (strcmp (_c, "NULL") == 0) {
- *ptr = (void *) 0;
- return (char *) 0;
- }
- *ptr = (void *) 0;
- return _c;
- }
-}
-
-/* Compatibility mode */
-
-#define _swig_get_hex SWIG_GetPtr
+#endif
#define SWIG_init initutilsc
#define SWIGPYTHON
#include <string.h>
#include <stdlib.h>
-/***********************************************************************
- * $Header$
- * swig_lib/python/python.cfg
- *
- * This file contains coded needed to add variable linking to the
- * Python interpreter. C variables are added as a new kind of Python
- * datatype.
- *
- * Also contains supporting code for building python under Windows
- * and things like that.
- *
- * $Log$
- * Revision 1.14 1999/08/05 05:06:38 RD
- * Some minor tweaks
- *
- ************************************************************************/
-
-#ifdef __cplusplus
-extern "C" {
-#endif
-#include "Python.h"
-#ifdef __cplusplus
-}
-#endif
-
/* Definitions for Windows/Unix exporting */
#if defined(__WIN32__)
# if defined(_MSC_VER)
# define SWIGEXPORT(a,b) a b
#endif
-#ifdef SWIG_GLOBAL
#ifdef __cplusplus
-#define SWIGSTATIC extern "C"
-#else
-#define SWIGSTATIC
-#endif
-#endif
-
-#ifndef SWIGSTATIC
-#define SWIGSTATIC static
+extern "C" {
#endif
-
-typedef struct {
- char *name;
- PyObject *(*get_attr)(void);
- int (*set_attr)(PyObject *);
-} swig_globalvar;
-
-typedef struct swig_varlinkobject {
- PyObject_HEAD
- swig_globalvar **vars;
- int nvars;
- int maxvars;
-} swig_varlinkobject;
-
-/* ----------------------------------------------------------------------
- swig_varlink_repr()
-
- Function for python repr method
- ---------------------------------------------------------------------- */
-
-static PyObject *
-swig_varlink_repr(swig_varlinkobject *v)
-{
- v = v;
- return PyString_FromString("<Global variables>");
-}
-
-/* ---------------------------------------------------------------------
- swig_varlink_print()
-
- Print out all of the global variable names
- --------------------------------------------------------------------- */
-
-static int
-swig_varlink_print(swig_varlinkobject *v, FILE *fp, int flags)
-{
-
- int i = 0;
- flags = flags;
- fprintf(fp,"Global variables { ");
- while (v->vars[i]) {
- fprintf(fp,"%s", v->vars[i]->name);
- i++;
- if (v->vars[i]) fprintf(fp,", ");
- }
- fprintf(fp," }\n");
- return 0;
-}
-
-/* --------------------------------------------------------------------
- swig_varlink_getattr
-
- This function gets the value of a variable and returns it as a
- PyObject. In our case, we'll be looking at the datatype and
- converting into a number or string
- -------------------------------------------------------------------- */
-
-static PyObject *
-swig_varlink_getattr(swig_varlinkobject *v, char *n)
-{
- int i = 0;
- char temp[128];
-
- while (v->vars[i]) {
- if (strcmp(v->vars[i]->name,n) == 0) {
- return (*v->vars[i]->get_attr)();
- }
- i++;
- }
- sprintf(temp,"C global variable %s not found.", n);
- PyErr_SetString(PyExc_NameError,temp);
- return NULL;
-}
-
-/* -------------------------------------------------------------------
- swig_varlink_setattr()
-
- This function sets the value of a variable.
- ------------------------------------------------------------------- */
-
-static int
-swig_varlink_setattr(swig_varlinkobject *v, char *n, PyObject *p)
-{
- char temp[128];
- int i = 0;
- while (v->vars[i]) {
- if (strcmp(v->vars[i]->name,n) == 0) {
- return (*v->vars[i]->set_attr)(p);
- }
- i++;
- }
- sprintf(temp,"C global variable %s not found.", n);
- PyErr_SetString(PyExc_NameError,temp);
- return 1;
-}
-
-statichere PyTypeObject varlinktype = {
-/* PyObject_HEAD_INIT(&PyType_Type) Note : This doesn't work on some machines */
- PyObject_HEAD_INIT(0)
- 0,
- "varlink", /* Type name */
- sizeof(swig_varlinkobject), /* Basic size */
- 0, /* Itemsize */
- 0, /* Deallocator */
- (printfunc) swig_varlink_print, /* Print */
- (getattrfunc) swig_varlink_getattr, /* get attr */
- (setattrfunc) swig_varlink_setattr, /* Set attr */
- 0, /* tp_compare */
- (reprfunc) swig_varlink_repr, /* tp_repr */
- 0, /* tp_as_number */
- 0, /* tp_as_mapping*/
- 0, /* tp_hash */
-};
-
-/* Create a variable linking object for use later */
-
-SWIGSTATIC PyObject *
-SWIG_newvarlink(void)
-{
- swig_varlinkobject *result = 0;
- result = PyMem_NEW(swig_varlinkobject,1);
- varlinktype.ob_type = &PyType_Type; /* Patch varlinktype into a PyType */
- result->ob_type = &varlinktype;
- /* _Py_NewReference(result); Does not seem to be necessary */
- result->nvars = 0;
- result->maxvars = 64;
- result->vars = (swig_globalvar **) malloc(64*sizeof(swig_globalvar *));
- result->vars[0] = 0;
- result->ob_refcnt = 0;
- Py_XINCREF((PyObject *) result);
- return ((PyObject*) result);
-}
-
-SWIGSTATIC void
-SWIG_addvarlink(PyObject *p, char *name,
- PyObject *(*get_attr)(void), int (*set_attr)(PyObject *p))
-{
- swig_varlinkobject *v;
- v= (swig_varlinkobject *) p;
-
- if (v->nvars >= v->maxvars -1) {
- v->maxvars = 2*v->maxvars;
- v->vars = (swig_globalvar **) realloc(v->vars,v->maxvars*sizeof(swig_globalvar *));
- if (v->vars == NULL) {
- fprintf(stderr,"SWIG : Fatal error in initializing Python module.\n");
- exit(1);
- }
- }
- v->vars[v->nvars] = (swig_globalvar *) malloc(sizeof(swig_globalvar));
- v->vars[v->nvars]->name = (char *) malloc(strlen(name)+1);
- strcpy(v->vars[v->nvars]->name,name);
- v->vars[v->nvars]->get_attr = get_attr;
- v->vars[v->nvars]->set_attr = set_attr;
- v->nvars++;
- v->vars[v->nvars] = 0;
-}
-
-
-
-/*****************************************************************************
- * $Header$
- *
- * swigptr.swg
- *
- * This file contains supporting code for the SWIG run-time type checking
- * mechanism. The following functions are available :
- *
- * SWIG_RegisterMapping(char *origtype, char *newtype, void *(*cast)(void *));
- *
- * Registers a new type-mapping with the type-checker. origtype is the
- * original datatype and newtype is an equivalent type. cast is optional
- * pointer to a function to cast pointer values between types (this
- * is typically used to cast pointers from derived classes to base classes in C++)
- *
- * SWIG_MakePtr(char *buffer, void *ptr, char *typestring);
- *
- * Makes a pointer string from a pointer and typestring. The result is returned
- * in buffer which is assumed to hold enough space for the result.
- *
- * char * SWIG_GetPtr(char *buffer, void **ptr, char *type)
- *
- * Gets a pointer value from a string. If there is a type-mismatch, returns
- * a character string to the received type. On success, returns NULL.
- *
- *
- * You can remap these functions by making a file called "swigptr.swg" in
- * your the same directory as the interface file you are wrapping.
- *
- * These functions are normally declared static, but this file can be
- * can be used in a multi-module environment by redefining the symbol
- * SWIGSTATIC.
- *****************************************************************************/
-
-#include <stdlib.h>
-
-#ifdef SWIG_GLOBAL
+#include "Python.h"
+extern void SWIG_MakePtr(char *, void *, char *);
+extern void SWIG_RegisterMapping(char *, char *, void *(*)(void *));
+extern char *SWIG_GetPtr(char *, void **, char *);
+extern void SWIG_addvarlink(PyObject *, char *, PyObject *(*)(void), int (*)(PyObject *));
+extern PyObject *SWIG_newvarlink(void);
#ifdef __cplusplus
-#define SWIGSTATIC extern "C"
-#else
-#define SWIGSTATIC
-#endif
-#endif
-
-#ifndef SWIGSTATIC
-#define SWIGSTATIC static
-#endif
-
-
-/* SWIG pointer structure */
-
-typedef struct SwigPtrType {
- char *name; /* Datatype name */
- int len; /* Length (used for optimization) */
- void *(*cast)(void *); /* Pointer casting function */
- struct SwigPtrType *next; /* Linked list pointer */
-} SwigPtrType;
-
-/* Pointer cache structure */
-
-typedef struct {
- int stat; /* Status (valid) bit */
- SwigPtrType *tp; /* Pointer to type structure */
- char name[256]; /* Given datatype name */
- char mapped[256]; /* Equivalent name */
-} SwigCacheType;
-
-/* Some variables */
-
-static int SwigPtrMax = 64; /* Max entries that can be currently held */
- /* This value may be adjusted dynamically */
-static int SwigPtrN = 0; /* Current number of entries */
-static int SwigPtrSort = 0; /* Status flag indicating sort */
-static int SwigStart[256]; /* Starting positions of types */
-
-/* Pointer table */
-static SwigPtrType *SwigPtrTable = 0; /* Table containing pointer equivalences */
-
-/* Cached values */
-
-#define SWIG_CACHESIZE 8
-#define SWIG_CACHEMASK 0x7
-static SwigCacheType SwigCache[SWIG_CACHESIZE];
-static int SwigCacheIndex = 0;
-static int SwigLastCache = 0;
-
-/* Sort comparison function */
-static int swigsort(const void *data1, const void *data2) {
- SwigPtrType *d1 = (SwigPtrType *) data1;
- SwigPtrType *d2 = (SwigPtrType *) data2;
- return strcmp(d1->name,d2->name);
}
-
-/* Binary Search function */
-static int swigcmp(const void *key, const void *data) {
- char *k = (char *) key;
- SwigPtrType *d = (SwigPtrType *) data;
- return strncmp(k,d->name,d->len);
-}
-
-/* Register a new datatype with the type-checker */
-
-SWIGSTATIC
-void SWIG_RegisterMapping(char *origtype, char *newtype, void *(*cast)(void *)) {
-
- int i;
- SwigPtrType *t = 0,*t1;
-
- /* Allocate the pointer table if necessary */
-
- if (!SwigPtrTable) {
- SwigPtrTable = (SwigPtrType *) malloc(SwigPtrMax*sizeof(SwigPtrType));
- SwigPtrN = 0;
- }
- /* Grow the table */
- if (SwigPtrN >= SwigPtrMax) {
- SwigPtrMax = 2*SwigPtrMax;
- SwigPtrTable = (SwigPtrType *) realloc((char *) SwigPtrTable,SwigPtrMax*sizeof(SwigPtrType));
- }
- for (i = 0; i < SwigPtrN; i++)
- if (strcmp(SwigPtrTable[i].name,origtype) == 0) {
- t = &SwigPtrTable[i];
- break;
- }
- if (!t) {
- t = &SwigPtrTable[SwigPtrN];
- t->name = origtype;
- t->len = strlen(t->name);
- t->cast = 0;
- t->next = 0;
- SwigPtrN++;
- }
-
- /* Check for existing entry */
-
- while (t->next) {
- if ((strcmp(t->name,newtype) == 0)) {
- if (cast) t->cast = cast;
- return;
- }
- t = t->next;
- }
-
- /* Now place entry (in sorted order) */
-
- t1 = (SwigPtrType *) malloc(sizeof(SwigPtrType));
- t1->name = newtype;
- t1->len = strlen(t1->name);
- t1->cast = cast;
- t1->next = 0;
- t->next = t1;
- SwigPtrSort = 0;
-}
-
-/* Make a pointer value string */
-
-SWIGSTATIC
-void SWIG_MakePtr(char *_c, const void *_ptr, char *type) {
- static char _hex[16] =
- {'0', '1', '2', '3', '4', '5', '6', '7', '8', '9',
- 'a', 'b', 'c', 'd', 'e', 'f'};
- unsigned long _p, _s;
- char _result[20], *_r; /* Note : a 64-bit hex number = 16 digits */
- _r = _result;
- _p = (unsigned long) _ptr;
- if (_p > 0) {
- while (_p > 0) {
- _s = _p & 0xf;
- *(_r++) = _hex[_s];
- _p = _p >> 4;
- }
- *_r = '_';
- while (_r >= _result)
- *(_c++) = *(_r--);
- } else {
- strcpy (_c, "NULL");
- }
- if (_ptr)
- strcpy (_c, type);
-}
-
-/* Define for backwards compatibility */
-
-#define _swig_make_hex SWIG_MakePtr
-
-/* Function for getting a pointer value */
-
-SWIGSTATIC
-char *SWIG_GetPtr(char *_c, void **ptr, char *_t)
-{
- unsigned long _p;
- char temp_type[256];
- char *name;
- int i, len;
- SwigPtrType *sp,*tp;
- SwigCacheType *cache;
- int start, end;
- _p = 0;
-
- /* Pointer values must start with leading underscore */
- if (*_c == '_') {
- _c++;
- /* Extract hex value from pointer */
- while (*_c) {
- if ((*_c >= '0') && (*_c <= '9'))
- _p = (_p << 4) + (*_c - '0');
- else if ((*_c >= 'a') && (*_c <= 'f'))
- _p = (_p << 4) + ((*_c - 'a') + 10);
- else
- break;
- _c++;
- }
-
- if (_t) {
- if (strcmp(_t,_c)) {
- if (!SwigPtrSort) {
- qsort((void *) SwigPtrTable, SwigPtrN, sizeof(SwigPtrType), swigsort);
- for (i = 0; i < 256; i++) {
- SwigStart[i] = SwigPtrN;
- }
- for (i = SwigPtrN-1; i >= 0; i--) {
- SwigStart[(int) (SwigPtrTable[i].name[1])] = i;
- }
- for (i = 255; i >= 1; i--) {
- if (SwigStart[i-1] > SwigStart[i])
- SwigStart[i-1] = SwigStart[i];
- }
- SwigPtrSort = 1;
- for (i = 0; i < SWIG_CACHESIZE; i++)
- SwigCache[i].stat = 0;
- }
-
- /* First check cache for matches. Uses last cache value as starting point */
- cache = &SwigCache[SwigLastCache];
- for (i = 0; i < SWIG_CACHESIZE; i++) {
- if (cache->stat) {
- if (strcmp(_t,cache->name) == 0) {
- if (strcmp(_c,cache->mapped) == 0) {
- cache->stat++;
- *ptr = (void *) _p;
- if (cache->tp->cast) *ptr = (*(cache->tp->cast))(*ptr);
- return (char *) 0;
- }
- }
- }
- SwigLastCache = (SwigLastCache+1) & SWIG_CACHEMASK;
- if (!SwigLastCache) cache = SwigCache;
- else cache++;
- }
- /* We have a type mismatch. Will have to look through our type
- mapping table to figure out whether or not we can accept this datatype */
-
- start = SwigStart[(int) _t[1]];
- end = SwigStart[(int) _t[1]+1];
- sp = &SwigPtrTable[start];
- while (start < end) {
- if (swigcmp(_t,sp) == 0) break;
- sp++;
- start++;
- }
- if (start >= end) sp = 0;
- /* Try to find a match for this */
- if (sp) {
- while (swigcmp(_t,sp) == 0) {
- name = sp->name;
- len = sp->len;
- tp = sp->next;
- /* Try to find entry for our given datatype */
- while(tp) {
- if (tp->len >= 255) {
- return _c;
- }
- strcpy(temp_type,tp->name);
- strncat(temp_type,_t+len,255-tp->len);
- if (strcmp(_c,temp_type) == 0) {
-
- strcpy(SwigCache[SwigCacheIndex].mapped,_c);
- strcpy(SwigCache[SwigCacheIndex].name,_t);
- SwigCache[SwigCacheIndex].stat = 1;
- SwigCache[SwigCacheIndex].tp = tp;
- SwigCacheIndex = SwigCacheIndex & SWIG_CACHEMASK;
-
- /* Get pointer value */
- *ptr = (void *) _p;
- if (tp->cast) *ptr = (*(tp->cast))(*ptr);
- return (char *) 0;
- }
- tp = tp->next;
- }
- sp++;
- /* Hmmm. Didn't find it this time */
- }
- }
- /* Didn't find any sort of match for this data.
- Get the pointer value and return the received type */
- *ptr = (void *) _p;
- return _c;
- } else {
- /* Found a match on the first try. Return pointer value */
- *ptr = (void *) _p;
- return (char *) 0;
- }
- } else {
- /* No type specified. Good luck */
- *ptr = (void *) _p;
- return (char *) 0;
- }
- } else {
- if (strcmp (_c, "NULL") == 0) {
- *ptr = (void *) 0;
- return (char *) 0;
- }
- *ptr = (void *) 0;
- return _c;
- }
-}
-
-/* Compatibility mode */
-
-#define _swig_get_hex SWIG_GetPtr
+#endif
#define SWIG_init initwxc
projects / wxWidgets.git / commitdiff
