forked from sniperHW/luawrapper
-
Notifications
You must be signed in to change notification settings - Fork 3
/
luaWrapper.cpp
123 lines (104 loc) · 2.48 KB
/
luaWrapper.cpp
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
#include "luaWrapper.h"
#include <stdlib.h>
namespace luacpp{
bool luaWrapper::dofile(const char *filename)
{
if (luaL_dofile(lState, filename)) {
const char * error = lua_tostring(lState, -1);
lua_pop(lState,1);
printf("%s\n",error);
return false;
}
return true;
}
static void kennyluainit(lua_State *L)
{
luaL_newmetatable(L, "kenny.lualib");
lua_pop(L,1);
}
void luaWrapper::init()
{
lState = luaL_newstate();
luaL_openlibs(lState);
kennyluainit(lState);
Integer64::Register2Lua(lState);
}
int NewObj(lua_State *L,const void *ptr,const char *classname)
{
size_t nbytes = sizeof(objUserData<void>);
objUserData<void> *obj = (objUserData<void> *)lua_newuserdata(L, nbytes);
obj->ptr = const_cast<void*>(ptr);
obj->m_flag = 0x1234AFEC;
obj->construct_by_lua = false;
luaL_getmetatable(L, "kenny.lualib");
lua_pushstring(L,classname);
lua_gettable(L,-2);
lua_setmetatable(L, -3);
lua_pop(L,1);//pop mt kenny.lualib
return 1;
}
int newI64(lua_State *L)
{
Integer64 *tmp = (Integer64*)lua_touserdata(L,2);
if(tmp)
lua_pushlightuserdata(L,tmp);
else
{
long initval = (long)lua_tonumber(L,2);
size_t nbytes = sizeof(Integer64);
void *buf = lua_newuserdata(L, nbytes);
new(buf)Integer64(initval);
}
Integer64::setmetatable(L);
return 1;
}
static const struct luaL_Reg i64Lib[] = {
{"new",newI64},
{NULL,NULL},
};
void Integer64::Register2Lua(lua_State *L)
{
luaL_getmetatable(L, "kenny.lualib");
lua_pushstring(L,"int64");
lua_newtable(L);
lua_pushstring(L, "__add");
lua_pushcfunction(L, i64Add);
lua_rawset(L, -3);
lua_pushstring(L, "__sub");
lua_pushcfunction(L, i64Sub);
lua_rawset(L, -3);
lua_pushstring(L, "__div");
lua_pushcfunction(L, i64Div);
lua_rawset(L, -3);
lua_pushstring(L, "__mul");
lua_pushcfunction(L, i64Mul);
lua_rawset(L, -3);
lua_pushstring(L, "__mod");
lua_pushcfunction(L, i64Mod);
lua_rawset(L, -3);
lua_pushstring(L, "__eq");
lua_pushcfunction(L, i64Eq);
lua_rawset(L, -3);
lua_pushstring(L, "__lt");
lua_pushcfunction(L, i64Lt);
lua_rawset(L, -3);
lua_pushstring(L, "__le");
lua_pushcfunction(L, i64Le);
lua_rawset(L, -3);
lua_pushstring(L, "__tostring");
lua_pushcfunction(L, i64toString);
lua_rawset(L, -3);
//just for test
lua_pushstring(L,"__gc");
lua_pushcfunction(L, i64Destroy);
lua_rawset(L, -3);
lua_rawset(L,1);
lua_pop(L,1);
luaL_register(L,"i64",i64Lib);
lua_pop(L,1);
}
void get_luatable(luatable <,lua_State *L)
{
lt = popvalue<luatable>(L);
}
}