summaryrefslogtreecommitdiff
path: root/Source/3rdParty/Luax/luax_state.inl
blob: 151512346d5b08c7aba132dc7bdf84b63b560cd8 (plain)
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

// ͨ͵вͬע̣ͨLuaxStateRegister_ʵ

// עṤΪעinterface tableclass tabletype nameΪƿռϡע׶βԪȵNewõʱŻᡣ

template<typename T>
void LuaxState::RegisterFactory()
{
	lua_State* L = mState;

	int top = lua_gettop(L); // namespace table

	const char* type = T::GetLuaxFactoryName();

	// interface table.
	lua_newtable(L);

	int idx = AbsIndex(-1);

	LuaxClass::RegisterLuaxInterface<T>(*this);
	T::RegisterLuaxInterface(*this);

	// TǷûעķ
#define assertMethods(I, NAME)\
	GetField(I, NAME);\
	assert(IsType(-1, LUA_TFUNCTION));\
	Pop();

	assertMethods(idx, "New");

#undef assertMethods

	lua_settop(L, top);

	// class table.
	lua_newtable(L);

	assert(lua_istable(L, -1));

	lua_pushvalue(L, -1);

	LuaxClass::RegisterLuaxClass<T>(*this);
	LuaxClass::RegisterLuaxFactoryClass<T>(*this);
	T::RegisterLuaxClass(*this);

	SetField(top, type);

	// reset top
	lua_settop(L, top);

}

// עᵥ
template<typename T>
void LuaxState::RegisterSingleton()
{
	lua_State* L = mState;

	int top = lua_gettop(L); // namespace table

	const char* type = T::GetLuaxSingletonName();

	// class table.
	lua_newtable(L);

	assert(lua_istable(L, -1));

	lua_pushvalue(L, -1);

	LuaxClass::RegisterLuaxClass<T>(*this);
	LuaxClass::RegisterLuaxFactoryClass<T>(*this);
	T::RegisterLuaxClass(*this);

	SetField(top, type);

	// reset top
	lua_settop(L, top);

}

template<typename T>
void LuaxState::SetField(int idx, cc8* key, T value)
{
	if (IsTableOrUserdata(idx))
	{
		idx = AbsIndex(idx);
		this->Push(value);
		lua_setfield(mState, idx, key);
	}
}

template<typename T>
T LuaxState::GetField(int idx, cc8* key, T value)
{
	GetField(idx, key);
	T result = GetValue < T >(-1, value);
	this->Pop();

	return result;
}
	
template<typename T>
T LuaxState::GetField(int idx, int key, T value)
{
	GetField(idx, key);
	T result = GetValue < T >(-1, value);
	Pop();

	return result;
}