rainmeter-studio/Library/lua/glue/LuaGlobal.cpp
2013-05-31 17:28:39 +03:00

81 lines
2.0 KiB
C++

/*
Copyright (C) 2010 Matt King, Birunthan Mohanathas
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, write to the Free Software
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
*/
#include "../../StdAfx.h"
#include "../LuaManager.h"
#include "../../Logger.h"
#include "../../../Common/StringUtil.h"
static int Print(lua_State* L)
{
// Modified version of luaB_print()
std::string message;
int n = lua_gettop(L); // Number of arguments
lua_getglobal(L, "tostring");
for (int i = 1; i <= n; ++i)
{
lua_pushvalue(L, -1); // Function to be called
lua_pushvalue(L, i); // Value to print
lua_call(L, 1, 1);
// Get result
const char* s = lua_tostring(L, -1);
if (s == nullptr)
{
return luaL_error(L, LUA_QL("tostring") " must return a string to " LUA_QL("print"));
}
if (i > 1)
{
// About dialog List View doesn't like tabs, just use 4 spaces instead
message += " ";
}
message += s;
// Pop result
lua_pop(L, 1);
}
LogDebug(StringUtil::Widen(message).c_str());
return 0;
}
static int tolua_cast(lua_State* L)
{
// Simply push first argument onto stack.
lua_pushvalue(L, 1);
return 1;
}
void LuaManager::RegisterGlobal(lua_State* L)
{
lua_register(L, "print", Print);
// Register tolua.cast() for backwards compatibility.
const luaL_Reg toluaFuncs[] =
{
{ "cast", tolua_cast },
{ nullptr, nullptr }
};
luaL_register(L, "tolua", toluaFuncs);
}