70 lines
1.2 KiB
C++
70 lines
1.2 KiB
C++
|
#include "luamain.h"
|
||
|
|
#include <vector>
|
||
|
|
|
||
|
|
|
||
|
|
lua::glua* lua::glua::ptr=0;
|
||
|
|
lua::glua::glua()
|
||
|
|
{
|
||
|
|
RegBasics(mystate);
|
||
|
|
}
|
||
|
|
lua::state &lua::glua::Get()
|
||
|
|
{
|
||
|
|
if(!glua::ptr)
|
||
|
|
glua::ptr=new glua();
|
||
|
|
return glua::ptr->mystate;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
int lua_Ver_Lua(lua_State *L)
|
||
|
|
{
|
||
|
|
lua::state st(L);
|
||
|
|
st.push(LUA_RELEASE);
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
static const struct luaL_reg lua_basic_lib [] =
|
||
|
|
{
|
||
|
|
{"getluaver", lua_Ver_Lua},
|
||
|
|
{NULL, NULL} /* sentinel */
|
||
|
|
};
|
||
|
|
void lua::RegBasics(lua::state &L)
|
||
|
|
{
|
||
|
|
luaL_openlibs(L);
|
||
|
|
RegFunctions(L,lua_basic_lib);
|
||
|
|
}
|
||
|
|
|
||
|
|
void lua::RegFunctions(lua::state &L,luaL_reg const*arr)
|
||
|
|
{
|
||
|
|
luaL_reg const *cur=arr;
|
||
|
|
while(cur->name!=NULL)
|
||
|
|
{
|
||
|
|
lua_pushcfunction(L, cur->func);
|
||
|
|
lua_setglobal(L, cur->name);
|
||
|
|
|
||
|
|
cur++;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
void lua::RegFunctionsLocal(lua::state &L,luaL_reg const*arr)
|
||
|
|
{
|
||
|
|
luaL_reg const *cur=arr;
|
||
|
|
while(cur->name!=NULL)
|
||
|
|
{
|
||
|
|
lua_pushcfunction(L, cur->func);
|
||
|
|
//lua_setglobal(L, cur->name);
|
||
|
|
L.setfield(cur->name);
|
||
|
|
|
||
|
|
cur++;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
string lua::DebugDump(lua::state &L)
|
||
|
|
{
|
||
|
|
L.getglobal("debug");
|
||
|
|
L.getfield("traceback");
|
||
|
|
L.call(0,1);
|
||
|
|
string ret=L.as<string>();
|
||
|
|
//cout<<"StackTrace:"<<ret<<endl;
|
||
|
|
L.settop(0);
|
||
|
|
return ret;
|
||
|
|
}
|