wxPython/wxSWIG/Modules/debug.cxx

   1 /*******************************************************************************
   2  * Simplified Wrapper and Interface Generator  (SWIG)
   3  *
   4  * Author : David Beazley
   5  *
   6  * Department of Computer Science
   7  * University of Chicago
   8  * 1100 E 58th Street
   9  * Chicago, IL  60637
  10  * beazley@cs.uchicago.edu
  11  *
  12  * Please read the file LICENSE for the copyright and terms by which SWIG
  13  * can be used and distributed.
  14  *******************************************************************************/
  15 /**************************************************************************
  16  * $Header$
  17  *
  18  * debug.cxx
  19  *
  20  * This is a dummy language module that is used only for testing the SWIG
  21  * parser.
  22  *
  23  * It creates a wrapper file, but only containing descriptions of what
  24  * was wrapped.
  25  *
  26  ***************************************************************************/
  27
  28 #include "swig.h"
  29 #include "debug.h"
  30
  31 void DEBUGLANG::parse_args(int, char **) {
  32   sprintf(LibDir,"%s",path);
  33   typemap_lang = "debug";
  34 }
  35
  36 void DEBUGLANG::parse() {
  37   headers();
  38   yyparse();
  39 }
  40
  41 void DEBUGLANG::set_module(char *mod_name, char **) {
  42   if (module) return;
  43   module = new char[strlen(mod_name)+1];
  44   strcpy(module,mod_name);
  45 }
  46
  47 void DEBUGLANG::set_init(char *init_name) {
  48   set_module(init_name,0);
  49 }
  50
  51 void DEBUGLANG::headers(void) {
  52   fprintf(f_header,"/* DEBUG : Language specific headers go here */\n\n");
  53   fprintf(f_header,"/* DEBUG : Pointer conversion function here */\n\n");
  54   fprintf(f_header,"/* DEBUG : Language specific code here */\n\n");
  55 }
  56
  57 void DEBUGLANG::initialize(void) {
  58
  59   fprintf(f_header,"#define   SWIG_init     %s_init\n\n", module);
  60   fprintf(f_header,"#define   SWIG_name    \"%s\"\n", module);
  61
  62   fprintf(f_init,"\n/* MODULE INITIALIZATION */\n\n");
  63   fprintf(f_init,"void %s_init() {\n", module);
  64
  65 }
  66
  67 void DEBUGLANG::close(void) {
  68   fprintf(f_init,"}  /* END INIT */\n");
  69
  70   fprintf(f_wrappers,"SWIG POINTER-MAPPING TABLE\n\n");
  71   emit_ptr_equivalence(f_init);
  72 }
  73
  74 void DEBUGLANG::create_function(char *name, char *iname, DataType *d, ParmList *l) {
  75
  76   fprintf(f_wrappers,"WRAPPER : ");
  77   emit_extern_func(name,d,l,0,f_wrappers);
  78   fprintf(f_wrappers,"\n");
  79
  80   fprintf(f_init,"     ADD COMMAND    : %s --> ", iname);
  81   emit_extern_func(name,d,l,0,f_init);
  82
  83 }
  84
  85 void DEBUGLANG::link_variable(char *name, char *iname, DataType *t)  {
  86   fprintf(f_wrappers,"WRAPPER : ");
  87   emit_extern_var(name,t,0,f_wrappers);
  88
  89   fprintf(f_init,"     ADD VARIABLE   : %s --> ", iname);
  90   emit_extern_var(name,t,0,f_init);
  91
  92 }
  93
  94 void DEBUGLANG::declare_const(char *name, char *, DataType *type, char *value) {
  95   if (!value) value = "[None]";
  96   fprintf(f_init,"     ADD CONSTANT   : %s %s = %s\n", type->print_cast(),name,value);
  97 }
  98
  99 void DEBUGLANG::add_native(char *name, char *funcname) {
 100   fprintf(f_init,"     ADD NATIVE     : %s --> %s\n", name, funcname);
 101 }
 102
 103 void DEBUGLANG::cpp_member_func(char *name, char *iname, DataType *t, ParmList *l) {
 104   fprintf(f_wrappers,"        MEMBER FUNC   : ");
 105   emit_extern_func(name,t,l,0,f_wrappers);
 106   fprintf(f_wrappers,"\n");
 107   if (!iname) iname = name;
 108   fprintf(f_init,"     ADD MEMBER FUN : %s --> ", iname);
 109   emit_extern_func(name,t,l,0,f_init);
 110 }
 111
 112 void DEBUGLANG::cpp_constructor(char *name, char *iname, ParmList *l) {
 113   DataType *t;
 114   fprintf(f_wrappers,"        CONSTRUCTOR   : ");
 115   t = new DataType(T_USER);
 116   sprintf(t->name,"%s",name);
 117   t->is_pointer=1;
 118   emit_extern_func(name,t,l,0,f_wrappers);
 119   if (!iname) iname = name;
 120   fprintf(f_init,"     ADD CONSTRUCT  : %s --> ", iname);
 121   emit_extern_func(name,t,l,0,f_init);
 122 }
 123
 124 void DEBUGLANG::cpp_destructor(char *name, char *iname) {
 125   fprintf(f_wrappers,"        DESTRUCTOR    : ~%s();\n", name);
 126   if (!iname) iname = name;
 127   fprintf(f_init,"     ADD DESTRUCT  : %s --> ~%s();\n",iname,name);
 128 }
 129
 130 void DEBUGLANG::cpp_open_class(char *name, char *iname, char *ctype, int strip) {
 131   this->Language::cpp_open_class(name, iname, ctype,strip);
 132   fprintf(f_wrappers,"C++ CLASS START : %s %s  ========================================\n\n",ctype,name);
 133   fprintf(f_init,"\n     // C++ CLASS START : %s %s\n",ctype,name);
 134 }
 135
 136 void DEBUGLANG::cpp_close_class() {
 137   fprintf(f_wrappers,"C++ CLASS END ===================================================\n\n");
 138   fprintf(f_init,"     // C++ CLASS END \n\n");
 139 }
 140
 141 void DEBUGLANG::cpp_inherit(char **baseclass, int) {
 142   int i = 0;
 143   if (baseclass) {
 144     fprintf(f_wrappers,"inheriting from baseclass :");
 145     while (baseclass[i]) {
 146       fprintf(f_wrappers," %s",baseclass[i]);
 147       i++;
 148     }
 149     fprintf(f_wrappers,"\n");
 150   }
 151   this->Language::cpp_inherit(baseclass);
 152 }
 153
 154 void DEBUGLANG::cpp_variable(char *name, char *iname, DataType *t) {
 155   fprintf(f_wrappers,"        ATTRIBUTE     : ");
 156   emit_extern_var(name,t,0,f_wrappers);
 157   if (!iname) iname = name;
 158   fprintf(f_init,"     ADD MEMBER     : %s --> ", iname);
 159   emit_extern_var(name,t,0,f_init);
 160 }
 161 void DEBUGLANG::cpp_static_func(char *name, char *iname, DataType *t, ParmList *l) {
 162
 163   fprintf(f_wrappers,"        STATIC FUNC   : ");
 164   emit_extern_func(name,t,l,0,f_wrappers);
 165   fprintf(f_init,"     ADD STATIC FUNC: %s --> ", iname);
 166   emit_extern_func(name,t,l,0,f_init);
 167
 168 }
 169
 170 void DEBUGLANG::cpp_declare_const(char *name, char *iname, DataType *t, char *value) {
 171   if (!value) value = "[None]";
 172   fprintf(f_wrappers,"        C++ CONST     : %s %s = %s\n", t->print_cast(), name, value);
 173   if (!iname) iname = name;
 174   fprintf(f_init,"     ADD C++ CONST  : %s --> %s = %s\n", iname, t->print_cast(), value);
 175 }
 176
 177 void DEBUGLANG::cpp_static_var(char *name, char *iname, DataType *t) {
 178   fprintf(f_wrappers,"        C++ STATIC VAR: ");
 179   emit_extern_var(name,t,0,f_wrappers);
 180   if (!iname) iname = name;
 181   fprintf(f_init,"     ADD STATIC VAR : %s --> ",iname);
 182   emit_extern_var(name,t,0,f_init);
 183 }
 184
 185 void DEBUGLANG::pragma(char *lname, char *name, char *value) {
 186   fprintf(f_wrappers,"PRAGMA : LANG = %s, NAME = %s ", lname, name);
 187   if (value) {
 188     fprintf(f_wrappers,", VALUE = %s\n", value);
 189   } else {
 190     fprintf(f_wrappers,"\n");
 191   }
 192 }
 193
 194 void DEBUGLANG::cpp_class_decl(char *name, char *, char *type) {
 195   fprintf(f_wrappers,"C++ CLASS DECLARATION : %s %s\n", type,name);
 196 }
 197
 198