1 files changed, 161 insertions, 0 deletions
diff --git a/iup/srclua5/il.h b/iup/srclua5/il.h
new file mode 100755
index 0000000..81a0140
--- /dev/null
+++ b/iup/srclua5/il.h
@@ -0,0 +1,161 @@
+/** \file
+ * \brief IUPLua5 internal Functions
+ *
+ * See Copyright Notice in "iup.h"
+ */
+ 
+#ifndef __IL_H 
+#define __IL_H
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+int iuplistlua_open (lua_State * L);
+int iuplabellua_open (lua_State * L);
+int iupitemlua_open (lua_State * L);
+int iupimagelua_open (lua_State * L);
+int iuphboxlua_open (lua_State * L);
+int iupframelua_open (lua_State * L);
+int iupfilllua_open (lua_State * L);
+int iupfiledlglua_open (lua_State * L);
+int iupdialoglua_open (lua_State * L);
+int iupcanvaslua_open (lua_State * L);
+int iupbuttonlua_open (lua_State * L);
+int iupzboxlua_open (lua_State * L);
+int iupvboxlua_open (lua_State * L);
+int iuptogglelua_open (lua_State * L);
+int iuptimerlua_open (lua_State * L);
+int iuptextlua_open (lua_State * L);
+int iupsubmenulua_open (lua_State * L);
+int iupseparatorlua_open (lua_State * L);
+int iupradiolua_open (lua_State * L);
+int iupmultilinelua_open (lua_State * L);
+int iupmenulua_open (lua_State * L);
+int iupcboxlua_open (lua_State * L);
+int iupspinboxlua_open (lua_State * L);
+int iupspinlua_open (lua_State * L);
+int iupsboxlua_open (lua_State * L);
+int iupgclua_open (lua_State * L);
+int iupvallua_open (lua_State * L);
+int iuptabslua_open (lua_State * L);
+int iupfontdlglua_open(lua_State * L);
+int iupmessagedlglua_open(lua_State * L);
+int iupcolordlglua_open(lua_State * L);
+int iupimagergbalua_open(lua_State * L);
+int iupimagergblua_open(lua_State * L);
+int iupprogressbarlua_open(lua_State * L);
+int iupnormalizerlua_open(lua_State * L);
+int iupuserlua_open(lua_State * L);
+int iuptreelua_open(lua_State * L);
+int iupclipboardlua_open(lua_State * L);
+
+void iupgetparamlua_open (lua_State * L);
+
+int iupluaScanf(lua_State *L);
+int iupluaapi_open(lua_State * L);
+
+
+            /*     Registration    */
+
+/** Sets the global index as the table "iup".
+ * Used to simplify the registration of functions and constants in the "iup" namespace.
+ */
+void iuplua_changeEnv(lua_State *L);
+
+/** Resets the global index. 
+ * Must match a iuplua_changeEnv call.
+ */
+void iuplua_returnEnv(lua_State *L);
+
+/** Returns true if IupOpen was called from inside the IupLua initialization function (iuplua_open).
+ * All the other C intialization functions are called from the respective IupLua initialization functions.
+ */
+int iuplua_opencall_internal(lua_State *L);
+
+/** Register a function.
+ */
+void iuplua_register(lua_State *L, lua_CFunction func, const char* name);
+
+/** Register a string.
+ */
+void iuplua_regstring(lua_State *L, const char* str, const char* name);
+
+
+          /*              Callbacks             */
+
+/** Stores the Lua State inside the IUP element,
+ * so it can be retreived from inside a callback.
+ * Used in the creation of the element.
+ */
+void iuplua_plugstate(lua_State *L, Ihandle *ih);
+
+/** Retrieve the Lua State. Used inside a callback.
+ */
+lua_State* iuplua_getstate(Ihandle *ih);
+
+/** First function called inside a callback. 
+ * It prepares the stack for the call and returns the Lua state.
+ */
+lua_State * iuplua_call_start(Ihandle *ih, const char* name);
+
+/** Called when a callback in Lua should be called. 
+ * nargs is the number of arguments after the first Ihandle*.
+ * Returns the callback return value. If nil returns IUP_DEFAULT.
+ * At the end clears the Lua stack. 
+ */
+int iuplua_call(lua_State *L, int nargs);
+
+/** Same as /ref iuplua_call, but returns a string.
+ */
+char* iuplua_call_rs(lua_State *L, int nargs);
+
+/** Same as lua_pcall, but if an error occour then
+ * _ERRORMESSAGE is called. 
+ */
+int iuplua_call_raw(lua_State* L, int nargs, int nresults);
+
+/** Register the callback in the iup.callbaks table.
+ * If type is not NULL, register in a sub table with the controls class name.
+ */
+void iuplua_register_cb(lua_State *L, const char* name, lua_CFunction func, const char* type);
+
+
+            /*     Functions                     */
+
+/** Pushes a raw Ihandle into the stack (an userdata).
+ * Used by the control creation functions.
+ */
+void iuplua_pushihandle_raw(lua_State *L, Ihandle *h);
+
+/** Returns an array of string stored in a Lua table.
+ */
+char** iuplua_checkstring_array(lua_State *L, int pos);
+
+/** Returns an array of int stored in a Lua table.
+ */
+int* iuplua_checkint_array(lua_State *L, int pos);
+
+/** Returns an array of unsigned char stored in a Lua table.
+ * Must have count elements.
+ */
+unsigned char* iuplua_checkuchar_array(lua_State *L, int pos, int count);
+
+/** Returns an array of ihandle stored in a Lua table.
+ */
+Ihandle** iuplua_checkihandle_array(lua_State *L, int pos);
+
+/** Same as iuplua_checkihandle but also accepts nil.
+ */
+Ihandle *iuplua_checkihandleornil(lua_State *L, int pos);
+
+/** Removes the references in the Lua registry.
+ */
+void iuplua_removeihandle(lua_State *L, Ihandle *ih);
+
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif