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
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
|
#include <stdio.h>
#include <stdlib.h>
#include <vector>
extern "C" {
#include <lua.h>
#include <lauxlib.h>
#include <lualib.h>
}
#include <irrlicht.h>
#include <map>
#include <shared/lua_api/common.hpp>
#include "callbackhandeler.hpp"
using namespace irr;
using namespace gui;
using namespace std;
extern lua_State* L;
/***
@module GAME
*/
std::map<IGUIElement*, int> guielements;
//For basic events
//{guielement}
void registerguielement(lua_State* L, gui::EGUI_EVENT_TYPE et, const char* funcname){
int ref = luaL_ref(L,LUA_REGISTRYINDEX);//
lua_rawgeti(L,LUA_REGISTRYINDEX,ref);//{guielement}
lua_getfield(L,-1,"guielement");//{guielement},ud_guielement
IGUIElement* el = (IGUIElement*)lua_touserdata(L,-1);//{guielement},ud_guielement
guielements[el] = ref;
lua_pop(L,1);//{guielement}
}
GlobalEventReceiver::GlobalEventReceiver(IrrlichtDevice* d){
//device = d;
}
int callMouse(lua_State* L, const char* funcname, double x, double y, double event){
int consume = 0;
lua_getglobal(L,"GAME");//GAME
pusherrorfunc(L);//{GAME},errfun
lua_getfield(L,-2,funcname);//{GAME},errfunc,funcname?
if(!lua_isnil(L,-1)){
lua_pushnumber(L,x);//{GAME},errfunc,func,x
lua_pushnumber(L,y);//{GAME},errfunc,func,x,y
lua_pushnumber(L,event);//{GAME},errfunc,func,x,y,event
int err = lua_pcall(L,3,1,-5);//{GAME},errfunc,consume|err
if(err){
printf("Failed to call GAME.%s\n",funcname);
}else{
if(!lua_isnil(L,-1)){
consume = lua_toboolean(L,-1);
lua_pop(L,-1);
}
}
lua_pop(L,2);
}else{
//{GAME},errfunc,nil
lua_pop(L,3);//
}
return consume;
}
bool GlobalEventReceiver::OnEvent(const SEvent& e){
//lua_State* L = this->L;
EEVENT_TYPE type = e.EventType;
SEvent::SMouseInput se = e.MouseInput;
printf("Onevent called:%d\n",(int)type);
switch (type){
case EET_GUI_EVENT:{
//printf("Gui event\n");
IGUIElement* caller = e.GUIEvent.Caller;
EGUI_EVENT_TYPE get = e.GUIEvent.EventType;
printf("detected gui event: %d\n",get);
if(guielements.find(caller) == guielements.end())
return false;
int ref = guielements[caller];
printf("About to get gui element\n");
lua_rawgeti(L,LUA_REGISTRYINDEX,ref);//{guielement}
printf("done getting gui element\n");
const char* fieldname;
switch(get){
case EGET_ELEMENT_FOCUSED: fieldname = "onFocus"; break;
case EGET_ELEMENT_FOCUS_LOST: fieldname = "onUnfocus"; break;
case EGET_ELEMENT_HOVERED: fieldname = "onHover"; break;
case EGET_ELEMENT_LEFT: fieldname = "onLeave"; break;
case EGET_ELEMENT_CLOSED: fieldname = "onClose"; break;
case EGET_BUTTON_CLICKED: fieldname = "onClick"; break;
case EGET_SCROLL_BAR_CHANGED: fieldname = "onScroll"; break;
case EGET_CHECKBOX_CHANGED: fieldname = "onCheck"; break;
case EGET_LISTBOX_CHANGED: fieldname = "onChange"; break;
case EGET_LISTBOX_SELECTED_AGAIN: fieldname = "onSame"; break;
case EGET_FILE_SELECTED: fieldname = "onFileSelect"; break;
case EGET_DIRECTORY_SELECTED: fieldname = "onDirectorySelect"; break;
case EGET_FILE_CHOOSE_DIALOG_CANCELLED: fieldname = "onFileChooserCancel"; break;
case EGET_MESSAGEBOX_YES: fieldname = "onYes"; break;
case EGET_MESSAGEBOX_NO: fieldname = "onNo"; break;
case EGET_MESSAGEBOX_OK: fieldname = "onOk"; break;
case EGET_MESSAGEBOX_CANCEL: fieldname = "onCancel"; break;
case EGET_EDITBOX_ENTER: fieldname = "onEnter"; break;
case EGET_EDITBOX_CHANGED: fieldname = "onChange"; break;
case EGET_EDITBOX_MARKING_CHANGED: fieldname = "onMarkChange"; break;
case EGET_TAB_CHANGED: fieldname = "onTabChange"; break;
case EGET_MENU_ITEM_SELECTED: fieldname = "onSelect"; break;
case EGET_COMBO_BOX_CHANGED: fieldname = "onChange"; break;
case EGET_SPINBOX_CHANGED: fieldname = "onChange"; break;
case EGET_TABLE_CHANGED: fieldname = "onChange"; break;
case EGET_TABLE_HEADER_CHANGED: fieldname = "onHeadersChange"; break;
case EGET_TABLE_SELECTED_AGAIN: fieldname = "onReselect"; break;
case EGET_TREEVIEW_NODE_DESELECT: fieldname = "onNodeDeselect"; break;
case EGET_TREEVIEW_NODE_SELECT: fieldname = "onNodeSelect"; break;
case EGET_TREEVIEW_NODE_EXPAND: fieldname = "onNodeExpand"; break;
case EGET_TREEVIEW_NODE_COLLAPSE: fieldname = "onNodeCollapse"; break;
case EGET_COUNT: break;
}
printf("About to push error func");
pusherrorfunc(L);//{guielement},errfunc()
lua_getfield(L,-2,fieldname);//{guielement},errfunc(),(func() | nil)
if(lua_isnil(L,-1)){
printf("Element did not have a function %s, returning\n",fieldname);
lua_pop(L,3);//
return false;
}
lua_rawgeti(L,LUA_REGISTRYINDEX,ref);//{guielement},errfunc(),func(),{guielement}
printf("About to pcall in callback.cpp!\n");
lua_pcall(L,1,1,-3);//{guielement},errfunc(),(nil|true)
if(!lua_isnil(L,-1)){
printf("Got an argument back!\n");
int ans = lua_toboolean(L,-1);
return ans;
}
lua_pop(L,3);//
return false;
}
break;
case EET_MOUSE_INPUT_EVENT:{
//printf("Mouse event - X: %d Y: %d\n",se.X, se.Y);
/***
(Callback)Detects mouse movement.
Detects when the mouse moves across the game.
@function GAME.onMouseMove(x,y,event)
@tparam number x The key that the user pressed down
@tparam boolean down Was the key pressed down?
@tparam boolean pressed_ctrl Was control pressed?
@tparam boolean pressed_shift Was shift pressed?
*/
switch(se.Event){
case EMIE_MOUSE_MOVED:{
return callMouse(L,"onMouseMove",se.X,se.Y,se.Event);
}
break;
case EMIE_LMOUSE_PRESSED_DOWN:
case EMIE_RMOUSE_PRESSED_DOWN:
case EMIE_MMOUSE_PRESSED_DOWN:{
printf("Mouse down\n");
return callMouse(L,"onMouseDown",se.X,se.Y,se.Event);
}
break;
case EMIE_LMOUSE_LEFT_UP:
case EMIE_RMOUSE_LEFT_UP:
case EMIE_MMOUSE_LEFT_UP:{
printf("Mouse up\n");
return callMouse(L,"onMouseUp",se.X,se.Y,se.Event);
}
break;
case EMIE_MOUSE_WHEEL:{
return callMouse(L,"onMouseWheel",se.X,se.Y,se.Wheel);
}
break;
case EMIE_RMOUSE_DOUBLE_CLICK:
case EMIE_MMOUSE_DOUBLE_CLICK:
case EMIE_LMOUSE_DOUBLE_CLICK:{
return callMouse(L,"onDoubleClick",se.X,se.Y,se.Event);
}
break;
case EMIE_RMOUSE_TRIPLE_CLICK:
case EMIE_MMOUSE_TRIPLE_CLICK:
case EMIE_LMOUSE_TRIPLE_CLICK:{
return callMouse(L,"onTripleClick",se.X,se.Y,se.Event);
}
break;
case EMIE_COUNT:break;
}
return false;
}
break;
/***
(Callback)Detects key presses.
Detects any key presses from the game.
@function GAME.onKeyDown(key,down,pressed_ctrl,pressed_shift)
@tparam number key The key that the user pressed down
@tparam boolean down Was the key pressed down?
@tparam boolean pressed_ctrl Was control pressed?
@tparam boolean pressed_shift Was shift pressed?
*/
case EET_KEY_INPUT_EVENT:{
//printf("Got input event\n");
SEvent::SKeyInput se = e.KeyInput;
lua_getglobal(L,"GAME");//{}
lua_getfield(L,-1,"onKeyDown");//{},()|nil
if(!lua_isnil(L,-1)){
//printf("onKeyDown not nil, calling...\n");
pusherrorfunc(L);//GAME,GAME.onKeyDown(),errfunc
lua_pushvalue(L,-2);//GAME,GAME.onKeyDown(),errfunc,onKeyDown()
lua_pushnumber(L,se.Key);//{GAME},GAME.onKeyDown(),errfunc,onKeyDown(),key_number
lua_pushboolean(L,se.PressedDown);//{GAME},GAME.onKeyDown(),errfunc,onKeyDown(),key_number,is_down
lua_pushboolean(L,se.Control);//{GAME},GAME.onKeyDown(),errfunc,onKeyDown(),key_number,is_down,is_ctrl
lua_pushboolean(L,se.Shift);//{GAME},GAME.onKeyDown(),errfunc,onKeyDown(),key_number,is_down,is_ctrl,is_shift
lua_pcall(L,4,0,-6);//GAME,GAME.onKeyDown()
lua_pop(L,2);
}else{
lua_pop(L,2);
}
return false;
break;
}
default:{
//printf("Called an unknown event\n");
return false;
}
}
return true;
}
|
