tolua++.h

   1 /* tolua
   2 ** Support code for Lua bindings.
   3 ** Written by Waldemar Celes
   4 ** TeCGraf/PUC-Rio
   5 ** Apr 2003
   6 ** $Id: $
   7 */
   8
   9 /* This code is free software; you can redistribute it and/or modify it.
  10 ** The software provided hereunder is on an "as is" basis, and
  11 ** the author has no obligation to provide maintenance, support, updates,
  12 ** enhancements, or modifications.
  13 */
  14
  15
  16 #ifndef TOLUA_H
  17 #define TOLUA_H
  18
  19 #ifndef TOLUA_API
  20 #define TOLUA_API extern
  21 #endif
  22
  23 #define TOLUA_VERSION "tolua++-1.0.92"
  24
  25 #ifdef __cplusplus
  26 extern "C" {
  27 #endif
  28
  29 #define tolua_pushcppstring(x,y)        tolua_pushstring(x,y.c_str())
  30 #define tolua_iscppstring       tolua_isstring
  31
  32 #define tolua_iscppstringarray tolua_isstringarray
  33 #define tolua_pushfieldcppstring(L,lo,idx,s) tolua_pushfieldstring(L, lo, idx, s.c_str())
  34
  35 #ifndef TEMPLATE_BIND
  36  #define TEMPLATE_BIND(p)
  37 #endif
  38
  39 #define TOLUA_TEMPLATE_BIND(p)
  40
  41 #define TOLUA_PROTECTED_DESTRUCTOR
  42 #define TOLUA_PROPERTY_TYPE(p)
  43
  44 typedef int lua_Object;
  45
  46 #include "lua.h"
  47 #include "lauxlib.h"
  48
  49 struct tolua_Error
  50 {
  51         int index;
  52         int array;
  53         const char* type;
  54 };
  55 typedef struct tolua_Error tolua_Error;
  56
  57 #define TOLUA_NOPEER    LUA_REGISTRYINDEX /* for lua 5.1 */
  58
  59 TOLUA_API const char* tolua_typename (lua_State* L, int lo);
  60 TOLUA_API void tolua_error (lua_State* L, const char* msg, tolua_Error* err);
  61 TOLUA_API int tolua_isnoobj (lua_State* L, int lo, tolua_Error* err);
  62 TOLUA_API int tolua_isvalue (lua_State* L, int lo, int def, tolua_Error* err);
  63 TOLUA_API int tolua_isvaluenil (lua_State* L, int lo, tolua_Error* err);
  64 TOLUA_API int tolua_isboolean (lua_State* L, int lo, int def, tolua_Error* err);
  65 TOLUA_API int tolua_isnumber (lua_State* L, int lo, int def, tolua_Error* err);
  66 TOLUA_API int tolua_isstring (lua_State* L, int lo, int def, tolua_Error* err);
  67 TOLUA_API int tolua_istable (lua_State* L, int lo, int def, tolua_Error* err);
  68 TOLUA_API int tolua_isusertable (lua_State* L, int lo, const char* type, int def, tolua_Error* err);
  69 TOLUA_API int tolua_isuserdata (lua_State* L, int lo, int def, tolua_Error* err);
  70 TOLUA_API int tolua_isusertype (lua_State* L, int lo, const char* type, int def, tolua_Error* err);
  71 TOLUA_API int tolua_isvaluearray
  72  (lua_State* L, int lo, int dim, int def, tolua_Error* err);
  73 TOLUA_API int tolua_isbooleanarray
  74  (lua_State* L, int lo, int dim, int def, tolua_Error* err);
  75 TOLUA_API int tolua_isnumberarray
  76  (lua_State* L, int lo, int dim, int def, tolua_Error* err);
  77 TOLUA_API int tolua_isstringarray
  78  (lua_State* L, int lo, int dim, int def, tolua_Error* err);
  79 TOLUA_API int tolua_istablearray
  80  (lua_State* L, int lo, int dim, int def, tolua_Error* err);
  81 TOLUA_API int tolua_isuserdataarray
  82  (lua_State* L, int lo, int dim, int def, tolua_Error* err);
  83 TOLUA_API int tolua_isusertypearray
  84  (lua_State* L, int lo, const char* type, int dim, int def, tolua_Error* err);
  85
  86 TOLUA_API void tolua_open (lua_State* L);
  87
  88 TOLUA_API void* tolua_copy (lua_State* L, void* value, unsigned int size);
  89 TOLUA_API int tolua_register_gc (lua_State* L, int lo);
  90 TOLUA_API int tolua_default_collect (lua_State* tolua_S);
  91
  92 TOLUA_API void tolua_usertype (lua_State* L, const char* type);
  93 TOLUA_API void tolua_beginmodule (lua_State* L, const char* name);
  94 TOLUA_API void tolua_endmodule (lua_State* L);
  95 TOLUA_API void tolua_module (lua_State* L, const char* name, int hasvar);
  96 TOLUA_API void tolua_class (lua_State* L, const char* name, const char* base);
  97 TOLUA_API void tolua_cclass (lua_State* L, const char* lname, const char* name, const char* base, lua_CFunction col);
  98 TOLUA_API void tolua_function (lua_State* L, const char* name, lua_CFunction func);
  99 TOLUA_API void tolua_constant (lua_State* L, const char* name, lua_Number value);
 100 TOLUA_API void tolua_variable (lua_State* L, const char* name, lua_CFunction get, lua_CFunction set);
 101 TOLUA_API void tolua_array (lua_State* L,const char* name, lua_CFunction get, lua_CFunction set);
 102
 103 /* TOLUA_API void tolua_set_call_event(lua_State* L, lua_CFunction func, char* type); */
 104 /* TOLUA_API void tolua_addbase(lua_State* L, char* name, char* base); */
 105
 106 TOLUA_API void tolua_pushvalue (lua_State* L, int lo);
 107 TOLUA_API void tolua_pushboolean (lua_State* L, int value);
 108 TOLUA_API void tolua_pushnumber (lua_State* L, lua_Number value);
 109 TOLUA_API void tolua_pushstring (lua_State* L, const char* value);
 110 TOLUA_API void tolua_pushuserdata (lua_State* L, void* value);
 111 TOLUA_API void tolua_pushusertype (lua_State* L, void* value, const char* type);
 112 TOLUA_API void tolua_pushusertype_and_takeownership(lua_State* L, void* value, const char* type);
 113 TOLUA_API void tolua_pushfieldvalue (lua_State* L, int lo, int index, int v);
 114 TOLUA_API void tolua_pushfieldboolean (lua_State* L, int lo, int index, int v);
 115 TOLUA_API void tolua_pushfieldnumber (lua_State* L, int lo, int index, lua_Number v);
 116 TOLUA_API void tolua_pushfieldstring (lua_State* L, int lo, int index, const char* v);
 117 TOLUA_API void tolua_pushfielduserdata (lua_State* L, int lo, int index, void* v);
 118 TOLUA_API void tolua_pushfieldusertype (lua_State* L, int lo, int index, void* v, const char* type);
 119 TOLUA_API void tolua_pushfieldusertype_and_takeownership (lua_State* L, int lo, int index, void* v, const char* type);
 120
 121 TOLUA_API lua_Number tolua_tonumber (lua_State* L, int narg, lua_Number def);
 122 TOLUA_API const char* tolua_tostring (lua_State* L, int narg, const char* def);
 123 TOLUA_API void* tolua_touserdata (lua_State* L, int narg, void* def);
 124 TOLUA_API void* tolua_tousertype (lua_State* L, int narg, void* def);
 125 TOLUA_API int tolua_tovalue (lua_State* L, int narg, int def);
 126 TOLUA_API int tolua_toboolean (lua_State* L, int narg, int def);
 127 TOLUA_API lua_Number tolua_tofieldnumber (lua_State* L, int lo, int index, lua_Number def);
 128 TOLUA_API const char* tolua_tofieldstring (lua_State* L, int lo, int index, const char* def);
 129 TOLUA_API void* tolua_tofielduserdata (lua_State* L, int lo, int index, void* def);
 130 TOLUA_API void* tolua_tofieldusertype (lua_State* L, int lo, int index, void* def);
 131 TOLUA_API int tolua_tofieldvalue (lua_State* L, int lo, int index, int def);
 132 TOLUA_API int tolua_getfieldboolean (lua_State* L, int lo, int index, int def);
 133
 134 TOLUA_API void tolua_dobuffer(lua_State* L, char* B, unsigned int size, const char* name);
 135
 136 TOLUA_API int class_gc_event (lua_State* L);
 137
 138 #ifdef __cplusplus
 139 static inline const char* tolua_tocppstring (lua_State* L, int narg, const char* def) {
 140
 141         const char* s = tolua_tostring(L, narg, def);
 142         return s?s:"";
 143 };
 144
 145 static inline const char* tolua_tofieldcppstring (lua_State* L, int lo, int index, const char* def) {
 146
 147         const char* s = tolua_tofieldstring(L, lo, index, def);
 148         return s?s:"";
 149 };
 150
 151 #else
 152 #define tolua_tocppstring tolua_tostring
 153 #define tolua_tofieldcppstring tolua_tofieldstring
 154 #endif
 155
 156 TOLUA_API int tolua_fast_isa(lua_State *L, int mt_indexa, int mt_indexb, int super_index);
 157
 158 #ifndef Mtolua_new
 159 #define Mtolua_new(EXP) new EXP
 160 #endif
 161
 162 #ifndef Mtolua_delete
 163 #define Mtolua_delete(EXP) delete EXP
 164 #endif
 165
 166 #ifndef Mtolua_new_dim
 167 #define Mtolua_new_dim(EXP, len) new EXP[len]
 168 #endif
 169
 170 #ifndef Mtolua_delete_dim
 171 #define Mtolua_delete_dim(EXP) delete [] EXP
 172 #endif
 173
 174 #ifndef tolua_outside
 175 #define tolua_outside
 176 #endif
 177
 178 #ifndef tolua_owned
 179 #define tolua_owned
 180 #endif
 181
 182 #ifdef __cplusplus
 183 }
 184 #endif
 185
 186 #endif