]> git.lizzy.rs Git - dragonfireclient.git/blob - src/script/lua_api/l_base.cpp
Omnicleanup: header cleanup, add ModApiUtil shared between game and mainmenu
[dragonfireclient.git] / src / script / lua_api / l_base.cpp
1 /*
2 Minetest
3 Copyright (C) 2013 celeron55, Perttu Ahola <celeron55@gmail.com>
4
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU Lesser General Public License as published by
7 the Free Software Foundation; either version 2.1 of the License, or
8 (at your option) any later version.
9
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13 GNU Lesser General Public License for more details.
14
15 You should have received a copy of the GNU Lesser General Public License along
16 with this program; if not, write to the Free Software Foundation, Inc.,
17 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
18 */
19
20 #include "lua_api/l_base.h"
21 #include "lua_api/l_internal.h"
22 #include "cpp_api/s_base.h"
23
24 ScriptApiBase* ModApiBase::getScriptApiBase(lua_State *L) {
25         // Get server from registry
26         lua_getfield(L, LUA_REGISTRYINDEX, "scriptapi");
27         ScriptApiBase *sapi_ptr = (ScriptApiBase*) lua_touserdata(L, -1);
28         lua_pop(L, 1);
29         return sapi_ptr;
30 }
31
32 Server* ModApiBase::getServer(lua_State *L) {
33         return getScriptApiBase(L)->getServer();
34 }
35
36 Environment* ModApiBase::getEnv(lua_State *L) {
37         return getScriptApiBase(L)->getEnv();
38 }
39
40 GUIEngine* ModApiBase::getGuiEngine(lua_State *L) {
41         return getScriptApiBase(L)->getGuiEngine();
42 }
43
44 bool ModApiBase::registerFunction(lua_State *L,
45                 const char *name,
46                 lua_CFunction fct,
47                 int top
48                 ) {
49         //TODO check presence first!
50
51         lua_pushstring(L,name);
52         lua_pushcfunction(L,fct);
53         lua_settable(L, top);
54
55         return true;
56 }