Files
neutrino/src/gui/lua/lua_cc_signalbox.cpp
M. Liebmann 9e331ee4e3 CLuaInstance: Fix and unified script function calls
- No api changes, code only
2015-12-23 08:29:15 +01:00

131 lines
3.6 KiB
C++

/*
* lua components signalbox
*
* (C) 2014-2015 M. Liebmann (micha-bbg)
* (C) 2014 Sven Hoefer (svenhoefer)
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License
* as published by the Free Software Foundation; either version 2
* of the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*/
#include <config.h>
#include <cstdio>
#include <cstdlib>
#include <cstring>
#include <unistd.h>
#include <global.h>
#include <system/debug.h>
#include <gui/components/cc.h>
#include <neutrino.h>
#include "luainstance.h"
#include "lua_cc_window.h"
#include "lua_cc_signalbox.h"
CLuaInstCCSignalbox* CLuaInstCCSignalbox::getInstance()
{
static CLuaInstCCSignalbox* LuaInstCCSignalbox = NULL;
if(!LuaInstCCSignalbox)
LuaInstCCSignalbox = new CLuaInstCCSignalbox();
return LuaInstCCSignalbox;
}
CLuaCCSignalBox *CLuaInstCCSignalbox::CCSignalBoxCheck(lua_State *L, int n)
{
return *(CLuaCCSignalBox **) luaL_checkudata(L, n, "signalbox");
}
void CLuaInstCCSignalbox::CCSignalBoxRegister(lua_State *L)
{
luaL_Reg meth[] = {
{ "new", CLuaInstCCSignalbox::CCSignalBoxNew },
{ "paint", CLuaInstCCSignalbox::CCSignalBoxPaint },
{ "setCenterPos", CLuaInstCCSignalbox::CCSignalBoxSetCenterPos },
{ "__gc", CLuaInstCCSignalbox::CCSignalBoxDelete },
{ NULL, NULL }
};
luaL_newmetatable(L, "signalbox");
luaL_setfuncs(L, meth, 0);
lua_pushvalue(L, -1);
lua_setfield(L, -1, "__index");
lua_setglobal(L, "signalbox");
}
int CLuaInstCCSignalbox::CCSignalBoxNew(lua_State *L)
{
lua_assert(lua_istable(L,1));
lua_Integer x = 110, y = 150, dx = 430, dy = 150;
lua_Integer vertical = true;
CLuaCCWindow* parent = NULL;
tableLookup(L, "x", x);
tableLookup(L, "y", y);
tableLookup(L, "dx", dx);
tableLookup(L, "dy", dy);
tableLookup(L, "vertical", vertical);
tableLookup(L, "parent", (void**)&parent);
CComponentsForm* pw = (parent && parent->w) ? parent->w->getBodyObject() : NULL;
CLuaCCSignalBox **udata = (CLuaCCSignalBox **) lua_newuserdata(L, sizeof(CLuaCCSignalBox *));
*udata = new CLuaCCSignalBox();
(*udata)->s = new CSignalBox(x, y, dx, dy, NULL, (vertical!=0)?true:false, pw);
(*udata)->parent = pw;
luaL_getmetatable(L, "signalbox");
lua_setmetatable(L, -2);
return 1;
}
int CLuaInstCCSignalbox::CCSignalBoxPaint(lua_State *L)
{
lua_assert(lua_istable(L,1));
CLuaCCSignalBox *D = CCSignalBoxCheck(L, 1);
if (!D) return 0;
bool do_save_bg = true;
if (!tableLookup(L, "do_save_bg", do_save_bg)) {
std::string tmp = "true";
if (tableLookup(L, "do_save_bg", tmp))
paramBoolDeprecated(L, tmp.c_str());
do_save_bg = (tmp == "true" || tmp == "1" || tmp == "yes");
}
D->s->paint(do_save_bg);
return 0;
}
int CLuaInstCCSignalbox::CCSignalBoxSetCenterPos(lua_State *L)
{
lua_assert(lua_istable(L,1));
CLuaCCSignalBox *D = CCSignalBoxCheck(L, 1);
if (!D) return 0;
lua_Integer tmp_along_mode, along_mode = CC_ALONG_X | CC_ALONG_Y;
tableLookup(L, "along_mode", tmp_along_mode);
if (tmp_along_mode & CC_ALONG_X || tmp_along_mode & CC_ALONG_Y)
along_mode=tmp_along_mode;
D->s->setCenterPos(along_mode);
return 0;
}
int CLuaInstCCSignalbox::CCSignalBoxDelete(lua_State *L)
{
CLuaCCSignalBox *D = CCSignalBoxCheck(L, 1);
if (!D) return 0;
delete D;
return 0;
}