chibicitiberiu/rainmeter-studio
1
0
Fork 0
mirror of https://github.com/chibicitiberiu/rainmeter-studio.git synced 2024-02-24 04:33:31 +00:00
Code Issues Releases Wiki Activity

Fixed line endings and applied gitignore

Browse Source
This commit is contained in:
Tiberiu Chibici
2014-07-26 09:43:40 +03:00
parent 0c57cabe56
commit 7cba5cc109
542 changed files with 112014 additions and 119759 deletions
Download Patch File Download Diff File Expand all files Collapse all files

206
Library/lua/LuaManager.cpp
View File

@@ -1,103 +1,103 @@
/*
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 "../../Common/StringUtil.h"
#include "LuaManager.h"
#include "../Logger.h"
int LuaManager::c_RefCount = 0;
lua_State* LuaManager::c_State = 0;
std::vector<bool> LuaManager::c_UnicodeStateStack;
void LuaManager::Initialize()
{
if (c_State == nullptr)
{
// Initialize Lua
c_State = luaL_newstate();
luaL_openlibs(c_State);
// Register custom types and functions
RegisterGlobal(c_State);
RegisterMeasure(c_State);
RegisterMeter(c_State);
RegisterMeterWindow(c_State);
}
++c_RefCount;
}
void LuaManager::Finalize()
{
if (c_RefCount > 0)
{
--c_RefCount;
}
if (c_RefCount == 0 && c_State != nullptr)
{
lua_close(c_State);
c_State = nullptr;
}
}
void LuaManager::ReportErrors(const std::wstring& file)
{
lua_State* L = c_State;
const char* error = lua_tostring(L, -1);
lua_pop(L, 1);
// Skip "[string ...]".
const char* pos = strchr(error, ':');
if (pos)
{
error = pos;
}
std::wstring str(file, file.find_last_of(L'\\') + 1);
str += IsUnicodeState() ? StringUtil::WidenUTF8(error) : StringUtil::Widen(error);
LogErrorF(L"Script: %s", str.c_str());
}
void LuaManager::PushWide(const WCHAR* str)
{
lua_State* L = c_State;
const std::string narrowStr = IsUnicodeState() ?
StringUtil::NarrowUTF8(str) : StringUtil::Narrow(str);
lua_pushlstring(L, narrowStr.c_str(), narrowStr.length());
}
void LuaManager::PushWide(const std::wstring& str)
{
lua_State* L = c_State;
const std::string narrowStr = IsUnicodeState() ?
StringUtil::NarrowUTF8(str) : StringUtil::Narrow(str);
lua_pushlstring(L, narrowStr.c_str(), narrowStr.length());
}
std::wstring LuaManager::ToWide(int narg)
{
lua_State* L = c_State;
size_t strLen = 0;
const char* str = lua_tolstring(L, narg, &strLen);
return IsUnicodeState() ?
StringUtil::WidenUTF8(str, (int)strLen) : StringUtil::Widen(str, (int)strLen);
}
/*
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 "../../Common/StringUtil.h"
#include "LuaManager.h"
#include "../Logger.h"
int LuaManager::c_RefCount = 0;
lua_State* LuaManager::c_State = 0;
std::vector<bool> LuaManager::c_UnicodeStateStack;
void LuaManager::Initialize()
{
if (c_State == nullptr)
{
// Initialize Lua
c_State = luaL_newstate();
luaL_openlibs(c_State);
// Register custom types and functions
RegisterGlobal(c_State);
RegisterMeasure(c_State);
RegisterMeter(c_State);
RegisterMeterWindow(c_State);
}
++c_RefCount;
}
void LuaManager::Finalize()
{
if (c_RefCount > 0)
{
--c_RefCount;
}
if (c_RefCount == 0 && c_State != nullptr)
{
lua_close(c_State);
c_State = nullptr;
}
}
void LuaManager::ReportErrors(const std::wstring& file)
{
lua_State* L = c_State;
const char* error = lua_tostring(L, -1);
lua_pop(L, 1);
// Skip "[string ...]".
const char* pos = strchr(error, ':');
if (pos)
{
error = pos;
}
std::wstring str(file, file.find_last_of(L'\\') + 1);
str += IsUnicodeState() ? StringUtil::WidenUTF8(error) : StringUtil::Widen(error);
LogErrorF(L"Script: %s", str.c_str());
}
void LuaManager::PushWide(const WCHAR* str)
{
lua_State* L = c_State;
const std::string narrowStr = IsUnicodeState() ?
StringUtil::NarrowUTF8(str) : StringUtil::Narrow(str);
lua_pushlstring(L, narrowStr.c_str(), narrowStr.length());
}
void LuaManager::PushWide(const std::wstring& str)
{
lua_State* L = c_State;
const std::string narrowStr = IsUnicodeState() ?
StringUtil::NarrowUTF8(str) : StringUtil::Narrow(str);
lua_pushlstring(L, narrowStr.c_str(), narrowStr.length());
}
std::wstring LuaManager::ToWide(int narg)
{
lua_State* L = c_State;
size_t strLen = 0;
const char* str = lua_tolstring(L, narg, &strLen);
return IsUnicodeState() ?
StringUtil::WidenUTF8(str, (int)strLen) : StringUtil::Widen(str, (int)strLen);
}

144
Library/lua/LuaManager.h
View File

@@ -1,72 +1,72 @@
/*
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.
*/
#ifndef __LUAMANAGER_H__
#define __LUAMANAGER_H__
extern "C"
{
#include "lua.h"
#include "lualib.h"
#include "lauxlib.h"
}
#include <vector>
class LuaManager
{
public:
class ScopedLuaState
{
public:
ScopedLuaState(bool unicode) { LuaManager::c_UnicodeStateStack.push_back(unicode); }
~ScopedLuaState() { LuaManager::c_UnicodeStateStack.pop_back(); }
operator lua_State*() { return LuaManager::c_State; }
};
static void Initialize();
static void Finalize();
static ScopedLuaState GetState(bool unicode) { return ScopedLuaState(unicode); }
static bool IsUnicodeState() { return c_UnicodeStateStack.back(); }
static void ReportErrors(const std::wstring& file);
static void PushWide(const WCHAR* str);
static void PushWide(const std::wstring& str);
static std::wstring ToWide(int narg);
protected:
static int c_RefCount;
static lua_State* c_State;
private:
static void RegisterGlobal(lua_State* L);
static void RegisterMeasure(lua_State* L);
static void RegisterMeter(lua_State* L);
static void RegisterMeterWindow(lua_State* L);
static void RegisterMeterString(lua_State* L);
// If the back of the vector is |true|, Lua strings converted to/from as if they were encoded
// in UTF-8. Otherwise Lua strings are treated as if they are encoded in the default system
// encoding.
static std::vector<bool> c_UnicodeStateStack;
};
#endif
/*
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.
*/
#ifndef __LUAMANAGER_H__
#define __LUAMANAGER_H__
extern "C"
{
#include "lua.h"
#include "lualib.h"
#include "lauxlib.h"
}
#include <vector>
class LuaManager
{
public:
class ScopedLuaState
{
public:
ScopedLuaState(bool unicode) { LuaManager::c_UnicodeStateStack.push_back(unicode); }
~ScopedLuaState() { LuaManager::c_UnicodeStateStack.pop_back(); }
operator lua_State*() { return LuaManager::c_State; }
};
static void Initialize();
static void Finalize();
static ScopedLuaState GetState(bool unicode) { return ScopedLuaState(unicode); }
static bool IsUnicodeState() { return c_UnicodeStateStack.back(); }
static void ReportErrors(const std::wstring& file);
static void PushWide(const WCHAR* str);
static void PushWide(const std::wstring& str);
static std::wstring ToWide(int narg);
protected:
static int c_RefCount;
static lua_State* c_State;
private:
static void RegisterGlobal(lua_State* L);
static void RegisterMeasure(lua_State* L);
static void RegisterMeter(lua_State* L);
static void RegisterMeterWindow(lua_State* L);
static void RegisterMeterString(lua_State* L);
// If the back of the vector is |true|, Lua strings converted to/from as if they were encoded
// in UTF-8. Otherwise Lua strings are treated as if they are encoded in the default system
// encoding.
static std::vector<bool> c_UnicodeStateStack;
};
#endif

28
Library/lua/LuaModifications.txt
View File

@@ -1,15 +1,15 @@
lbaselib.c
- Commented out collectgarbage, getfenv, print, and setfenv functions in base_funcs array
- Commented out luaL_register for coroutine library
liolib.c
- Commented out popen in iolib array
- Commented out createstdfile calls for stdin/stdout/stderr in luaopen_io
- Commented out popen related calls in luaopen_io
linit.c
- Commented out debug and package libraries
loslib.c
- Commented out exit function in syslib array
lbaselib.c
- Commented out collectgarbage, getfenv, print, and setfenv functions in base_funcs array
- Commented out luaL_register for coroutine library
liolib.c
- Commented out popen in iolib array
- Commented out createstdfile calls for stdin/stdout/stderr in luaopen_io
- Commented out popen related calls in luaopen_io
linit.c
- Commented out debug and package libraries
loslib.c
- Commented out exit function in syslib array
- Changed os_setlocale() to noop and to always return nil

522
Library/lua/LuaScript.cpp
View File

@@ -1,261 +1,261 @@
/*
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 "../../Common/StringUtil.h"
#include "LuaScript.h"
#include "LuaManager.h"
/*
** The constructor
**
*/
LuaScript::LuaScript() :
m_Ref(LUA_NOREF),
m_Unicode(false)
{
}
/*
** The destructor
**
*/
LuaScript::~LuaScript()
{
Uninitialize();
}
bool LuaScript::Initialize(const std::wstring& scriptFile)
{
assert(!IsInitialized());
FILE* file = _wfopen(scriptFile.c_str(), L"rb");
if (!file) return false;
fseek(file, 0, SEEK_END);
const long fileSize = ftell(file);
BYTE* fileData = new BYTE[fileSize];
fseek(file, 0, SEEK_SET);
fread(fileData, fileSize, 1, file);
fclose(file);
file = nullptr;
auto L = GetState();
bool scriptLoaded = false;
// Treat the script as Unicode if it has the UTF-16 LE BOM.
m_Unicode = fileSize > 2 && fileData[0] == 0xFF && fileData[1] == 0xFE;
if (m_Unicode)
{
const std::string utf8Data =
StringUtil::NarrowUTF8((WCHAR*)(fileData + 2), (fileSize - 2) / sizeof(WCHAR));
scriptLoaded = luaL_loadbuffer(L, utf8Data.c_str(), utf8Data.length(), "") == 0;
}
else
{
scriptLoaded = luaL_loadbuffer(L, (char*)fileData, fileSize, "") == 0;
}
delete [] fileData;
if (scriptLoaded)
{
// Create the table this script will reside in
lua_newtable(L);
// Create the metatable that will store the global table
lua_createtable(L, 0, 1);
// Push the global teble
lua_pushvalue(L, LUA_GLOBALSINDEX);
// Set the __index of the table to be the global table
lua_setfield(L, -2, "__index");
// Set the metatable for the script's table
lua_setmetatable(L, -2);
// Put the table into the global table
m_Ref = luaL_ref(L, LUA_GLOBALSINDEX);
lua_rawgeti(L, LUA_GLOBALSINDEX, m_Ref);
// Set the environment for the function to be run in to be the table that
// has been created for the script/
lua_setfenv(L, -2);
// Execute the Lua script
int result = lua_pcall(L, 0, 0, 0);
if (result == 0)
{
m_File = scriptFile;
return true;
}
else
{
LuaManager::ReportErrors(scriptFile);
Uninitialize();
}
}
else
{
LuaManager::ReportErrors(scriptFile);
}
return false;
}
void LuaScript::Uninitialize()
{
auto L = GetState();
if (m_Ref != LUA_NOREF)
{
luaL_unref(L, LUA_GLOBALSINDEX, m_Ref);
m_Ref = LUA_NOREF;
m_File.clear();
}
}
/*
** Checks if given function is defined in the script file.
**
*/
bool LuaScript::IsFunction(const char* funcName)
{
auto L = GetState();
bool bExists = false;
if (IsInitialized())
{
// Push our table onto the stack
lua_rawgeti(L, LUA_GLOBALSINDEX, m_Ref);
// Push the function onto the stack
lua_getfield(L, -1, funcName);
bExists = lua_isfunction(L, -1);
// Pop both the table and the function off the stack.
lua_pop(L, 2);
}
return bExists;
}
/*
** Runs given function in script file.
**
*/
void LuaScript::RunFunction(const char* funcName)
{
auto L = GetState();
if (IsInitialized())
{
// Push our table onto the stack
lua_rawgeti(L, LUA_GLOBALSINDEX, m_Ref);
// Push the function onto the stack
lua_getfield(L, -1, funcName);
if (lua_pcall(L, 0, 0, 0))
{
LuaManager::ReportErrors(m_File);
}
lua_pop(L, 1);
}
}
/*
** Runs given function in script file and stores the retruned number or string.
**
*/
int LuaScript::RunFunctionWithReturn(const char* funcName, double& numValue, std::wstring& strValue)
{
auto L = GetState();
int type = LUA_TNIL;
if (IsInitialized())
{
// Push our table onto the stack
lua_rawgeti(L, LUA_GLOBALSINDEX, m_Ref);
// Push the function onto the stack
lua_getfield(L, -1, funcName);
if (lua_pcall(L, 0, 1, 0))
{
LuaManager::ReportErrors(m_File);
lua_pop(L, 1);
}
else
{
type = lua_type(L, -1);
if (type == LUA_TNUMBER)
{
numValue = lua_tonumber(L, -1);
}
else if (type == LUA_TSTRING)
{
size_t strLen = 0;
const char* str = lua_tolstring(L, -1, &strLen);
strValue = m_Unicode ?
StringUtil::WidenUTF8(str, (int)strLen) : StringUtil::Widen(str, (int)strLen);
numValue = strtod(str, nullptr);
}
lua_pop(L, 2);
}
}
return type;
}
/*
** Runs given string in the context of the script file.
**
*/
void LuaScript::RunString(const std::wstring& str)
{
auto L = GetState();
if (IsInitialized())
{
const std::string narrowStr = m_Unicode ?
StringUtil::NarrowUTF8(str) : StringUtil::Narrow(str);
// Load the string as a Lua chunk
if (luaL_loadstring(L, narrowStr.c_str()))
{
LuaManager::ReportErrors(m_File);
}
// Push our table onto the stack
lua_rawgeti(L, LUA_GLOBALSINDEX, m_Ref);
// Pop table and set the environment of the loaded chunk to it
lua_setfenv(L, -2);
if (lua_pcall(L, 0, 0, 0))
{
LuaManager::ReportErrors(m_File);
}
}
}
/*
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 "../../Common/StringUtil.h"
#include "LuaScript.h"
#include "LuaManager.h"
/*
** The constructor
**
*/
LuaScript::LuaScript() :
m_Ref(LUA_NOREF),
m_Unicode(false)
{
}
/*
** The destructor
**
*/
LuaScript::~LuaScript()
{
Uninitialize();
}
bool LuaScript::Initialize(const std::wstring& scriptFile)
{
assert(!IsInitialized());
FILE* file = _wfopen(scriptFile.c_str(), L"rb");
if (!file) return false;
fseek(file, 0, SEEK_END);
const long fileSize = ftell(file);
BYTE* fileData = new BYTE[fileSize];
fseek(file, 0, SEEK_SET);
fread(fileData, fileSize, 1, file);
fclose(file);
file = nullptr;
auto L = GetState();
bool scriptLoaded = false;
// Treat the script as Unicode if it has the UTF-16 LE BOM.
m_Unicode = fileSize > 2 && fileData[0] == 0xFF && fileData[1] == 0xFE;
if (m_Unicode)
{
const std::string utf8Data =
StringUtil::NarrowUTF8((WCHAR*)(fileData + 2), (fileSize - 2) / sizeof(WCHAR));
scriptLoaded = luaL_loadbuffer(L, utf8Data.c_str(), utf8Data.length(), "") == 0;
}
else
{
scriptLoaded = luaL_loadbuffer(L, (char*)fileData, fileSize, "") == 0;
}
delete [] fileData;
if (scriptLoaded)
{
// Create the table this script will reside in
lua_newtable(L);
// Create the metatable that will store the global table
lua_createtable(L, 0, 1);
// Push the global teble
lua_pushvalue(L, LUA_GLOBALSINDEX);
// Set the __index of the table to be the global table
lua_setfield(L, -2, "__index");
// Set the metatable for the script's table
lua_setmetatable(L, -2);
// Put the table into the global table
m_Ref = luaL_ref(L, LUA_GLOBALSINDEX);
lua_rawgeti(L, LUA_GLOBALSINDEX, m_Ref);
// Set the environment for the function to be run in to be the table that
// has been created for the script/
lua_setfenv(L, -2);
// Execute the Lua script
int result = lua_pcall(L, 0, 0, 0);
if (result == 0)
{
m_File = scriptFile;
return true;
}
else
{
LuaManager::ReportErrors(scriptFile);
Uninitialize();
}
}
else
{
LuaManager::ReportErrors(scriptFile);
}
return false;
}
void LuaScript::Uninitialize()
{
auto L = GetState();
if (m_Ref != LUA_NOREF)
{
luaL_unref(L, LUA_GLOBALSINDEX, m_Ref);
m_Ref = LUA_NOREF;
m_File.clear();
}
}
/*
** Checks if given function is defined in the script file.
**
*/
bool LuaScript::IsFunction(const char* funcName)
{
auto L = GetState();
bool bExists = false;
if (IsInitialized())
{
// Push our table onto the stack
lua_rawgeti(L, LUA_GLOBALSINDEX, m_Ref);
// Push the function onto the stack
lua_getfield(L, -1, funcName);
bExists = lua_isfunction(L, -1);
// Pop both the table and the function off the stack.
lua_pop(L, 2);
}
return bExists;
}
/*
** Runs given function in script file.
**
*/
void LuaScript::RunFunction(const char* funcName)
{
auto L = GetState();
if (IsInitialized())
{
// Push our table onto the stack
lua_rawgeti(L, LUA_GLOBALSINDEX, m_Ref);
// Push the function onto the stack
lua_getfield(L, -1, funcName);
if (lua_pcall(L, 0, 0, 0))
{
LuaManager::ReportErrors(m_File);
}
lua_pop(L, 1);
}
}
/*
** Runs given function in script file and stores the retruned number or string.
**
*/
int LuaScript::RunFunctionWithReturn(const char* funcName, double& numValue, std::wstring& strValue)
{
auto L = GetState();
int type = LUA_TNIL;
if (IsInitialized())
{
// Push our table onto the stack
lua_rawgeti(L, LUA_GLOBALSINDEX, m_Ref);
// Push the function onto the stack
lua_getfield(L, -1, funcName);
if (lua_pcall(L, 0, 1, 0))
{
LuaManager::ReportErrors(m_File);
lua_pop(L, 1);
}
else
{
type = lua_type(L, -1);
if (type == LUA_TNUMBER)
{
numValue = lua_tonumber(L, -1);
}
else if (type == LUA_TSTRING)
{
size_t strLen = 0;
const char* str = lua_tolstring(L, -1, &strLen);
strValue = m_Unicode ?
StringUtil::WidenUTF8(str, (int)strLen) : StringUtil::Widen(str, (int)strLen);
numValue = strtod(str, nullptr);
}
lua_pop(L, 2);
}
}
return type;
}
/*
** Runs given string in the context of the script file.
**
*/
void LuaScript::RunString(const std::wstring& str)
{
auto L = GetState();
if (IsInitialized())
{
const std::string narrowStr = m_Unicode ?
StringUtil::NarrowUTF8(str) : StringUtil::Narrow(str);
// Load the string as a Lua chunk
if (luaL_loadstring(L, narrowStr.c_str()))
{
LuaManager::ReportErrors(m_File);
}
// Push our table onto the stack
lua_rawgeti(L, LUA_GLOBALSINDEX, m_Ref);
// Pop table and set the environment of the loaded chunk to it
lua_setfenv(L, -2);
if (lua_pcall(L, 0, 0, 0))
{
LuaManager::ReportErrors(m_File);
}
}
}

104
Library/lua/LuaScript.h
View File

@@ -1,52 +1,52 @@
/*
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.
*/
#ifndef __LUASCRIPT_H__
#define __LUASCRIPT_H__
#include "LuaManager.h"
class LuaScript
{
public:
LuaScript();
~LuaScript();
bool Initialize(const std::wstring& scriptFile);
void Uninitialize();
bool IsInitialized() { return m_Ref != LUA_NOREF; }
const std::wstring& GetFile() { return m_File; }
int GetRef() { return m_Ref; }
bool IsUnicode() const { return m_Unicode; }
LuaManager::ScopedLuaState GetState() { return LuaManager::GetState(m_Unicode); }
bool IsFunction(const char* funcName);
void RunFunction(const char* funcName);
int RunFunctionWithReturn(const char* funcName, double& numValue, std::wstring& strValue);
void RunString(const std::wstring& str);
protected:
std::wstring m_File;
int m_Ref;
bool m_Unicode;
};
#endif
/*
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.
*/
#ifndef __LUASCRIPT_H__
#define __LUASCRIPT_H__
#include "LuaManager.h"
class LuaScript
{
public:
LuaScript();
~LuaScript();
bool Initialize(const std::wstring& scriptFile);
void Uninitialize();
bool IsInitialized() { return m_Ref != LUA_NOREF; }
const std::wstring& GetFile() { return m_File; }
int GetRef() { return m_Ref; }
bool IsUnicode() const { return m_Unicode; }
LuaManager::ScopedLuaState GetState() { return LuaManager::GetState(m_Unicode); }
bool IsFunction(const char* funcName);
void RunFunction(const char* funcName);
int RunFunctionWithReturn(const char* funcName, double& numValue, std::wstring& strValue);
void RunString(const std::wstring& str);
protected:
std::wstring m_File;
int m_Ref;
bool m_Unicode;
};
#endif

162
Library/lua/glue/LuaGlobal.cpp
View File

@@ -1,81 +1,81 @@
/*
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(LuaManager::IsUnicodeState() ?
StringUtil::WidenUTF8(message).c_str() : 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);
}
/*
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(LuaManager::IsUnicodeState() ?
StringUtil::WidenUTF8(message).c_str() : 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);
}

316
Library/lua/glue/LuaMeasure.cpp
View File

@@ -1,158 +1,158 @@
/*
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 "../../Measure.h"
#include "../../MeterWindow.h"
#define DECLARE_SELF(L) \
void* selfData = lua_touserdata(L, 1); \
if (!selfData) return 0; \
Measure* self = *(Measure**)selfData;
static int GetName(lua_State* L)
{
DECLARE_SELF(L)
LuaManager::PushWide(self->GetName());
return 1;
}
static int GetOption(lua_State* L)
{
DECLARE_SELF(L)
MeterWindow* meterWindow = self->GetMeterWindow();
ConfigParser& parser = meterWindow->GetParser();
const std::wstring section = LuaManager::ToWide(2);
const std::wstring defValue = LuaManager::ToWide(3);
const std::wstring& value =
parser.ReadString(self->GetName(), section.c_str(), defValue.c_str());
LuaManager::PushWide(value);
return 1;
}
static int GetNumberOption(lua_State* L)
{
DECLARE_SELF(L)
MeterWindow* meterWindow = self->GetMeterWindow();
ConfigParser& parser = meterWindow->GetParser();
std::wstring strTmp = LuaManager::ToWide(2);
double value = parser.ReadFloat(self->GetName(), strTmp.c_str(), lua_tonumber(L, 3));
lua_pushnumber(L, value);
return 1;
}
static int Disable(lua_State* L)
{
DECLARE_SELF(L)
self->Disable();
return 0;
}
static int Enable(lua_State* L)
{
DECLARE_SELF(L)
self->Enable();
return 0;
}
static int GetValue(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetValue());
return 1;
}
static int GetRelativeValue(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetRelativeValue());
return 1;
}
static int GetValueRange(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetValueRange());
return 1;
}
static int GetMinValue(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetMinValue());
return 1;
}
static int GetMaxValue(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetMaxValue());
return 1;
}
static int GetStringValue(lua_State* L)
{
DECLARE_SELF(L)
int top = lua_gettop(L);
AUTOSCALE autoScale = (top > 1) ? (AUTOSCALE)(int)lua_tonumber(L, 2) : AUTOSCALE_OFF;
double scale = (top > 2) ? lua_tonumber(L, 3) : 1.0;
int decimals = (int)lua_tonumber(L, 4);
bool percentual = lua_toboolean(L, 5) != 0;
const WCHAR* val = self->GetStringOrFormattedValue(autoScale, scale, decimals, percentual);
LuaManager::PushWide(val);
return 1;
}
void LuaManager::RegisterMeasure(lua_State* L)
{
const luaL_Reg functions[] =
{
{ "GetName", GetName },
{ "GetOption", GetOption },
{ "GetNumberOption", GetNumberOption },
{ "Disable", Disable },
{ "Enable", Enable },
{ "GetValue", GetValue },
{ "GetRelativeValue", GetRelativeValue },
{ "GetValueRange", GetValueRange },
{ "GetMinValue", GetMinValue },
{ "GetMaxValue", GetMaxValue },
{ "GetStringValue", GetStringValue },
{ nullptr, nullptr }
};
luaL_register(L, "Measure", functions);
lua_pushvalue(L, -1);
lua_setfield(L, -2, "__index");
lua_pop(L, 1);
}
/*
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 "../../Measure.h"
#include "../../MeterWindow.h"
#define DECLARE_SELF(L) \
void* selfData = lua_touserdata(L, 1); \
if (!selfData) return 0; \
Measure* self = *(Measure**)selfData;
static int GetName(lua_State* L)
{
DECLARE_SELF(L)
LuaManager::PushWide(self->GetName());
return 1;
}
static int GetOption(lua_State* L)
{
DECLARE_SELF(L)
MeterWindow* meterWindow = self->GetMeterWindow();
ConfigParser& parser = meterWindow->GetParser();
const std::wstring section = LuaManager::ToWide(2);
const std::wstring defValue = LuaManager::ToWide(3);
const std::wstring& value =
parser.ReadString(self->GetName(), section.c_str(), defValue.c_str());
LuaManager::PushWide(value);
return 1;
}
static int GetNumberOption(lua_State* L)
{
DECLARE_SELF(L)
MeterWindow* meterWindow = self->GetMeterWindow();
ConfigParser& parser = meterWindow->GetParser();
std::wstring strTmp = LuaManager::ToWide(2);
double value = parser.ReadFloat(self->GetName(), strTmp.c_str(), lua_tonumber(L, 3));
lua_pushnumber(L, value);
return 1;
}
static int Disable(lua_State* L)
{
DECLARE_SELF(L)
self->Disable();
return 0;
}
static int Enable(lua_State* L)
{
DECLARE_SELF(L)
self->Enable();
return 0;
}
static int GetValue(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetValue());
return 1;
}
static int GetRelativeValue(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetRelativeValue());
return 1;
}
static int GetValueRange(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetValueRange());
return 1;
}
static int GetMinValue(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetMinValue());
return 1;
}
static int GetMaxValue(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetMaxValue());
return 1;
}
static int GetStringValue(lua_State* L)
{
DECLARE_SELF(L)
int top = lua_gettop(L);
AUTOSCALE autoScale = (top > 1) ? (AUTOSCALE)(int)lua_tonumber(L, 2) : AUTOSCALE_OFF;
double scale = (top > 2) ? lua_tonumber(L, 3) : 1.0;
int decimals = (int)lua_tonumber(L, 4);
bool percentual = lua_toboolean(L, 5) != 0;
const WCHAR* val = self->GetStringOrFormattedValue(autoScale, scale, decimals, percentual);
LuaManager::PushWide(val);
return 1;
}
void LuaManager::RegisterMeasure(lua_State* L)
{
const luaL_Reg functions[] =
{
{ "GetName", GetName },
{ "GetOption", GetOption },
{ "GetNumberOption", GetNumberOption },
{ "Disable", Disable },
{ "Enable", Enable },
{ "GetValue", GetValue },
{ "GetRelativeValue", GetRelativeValue },
{ "GetValueRange", GetValueRange },
{ "GetMinValue", GetMinValue },
{ "GetMaxValue", GetMaxValue },
{ "GetStringValue", GetStringValue },
{ nullptr, nullptr }
};
luaL_register(L, "Measure", functions);
lua_pushvalue(L, -1);
lua_setfield(L, -2, "__index");
lua_pop(L, 1);
}

350
Library/lua/glue/LuaMeter.cpp
View File

@@ -1,175 +1,175 @@
/*
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 "../../Meter.h"
#include "../../MeterString.h"
#define DECLARE_SELF(L) \
void* selfData = lua_touserdata(L, 1); \
if (!selfData) return 0; \
Meter* self = *(Meter**)selfData;
static int GetName(lua_State* L)
{
DECLARE_SELF(L)
LuaManager::PushWide(self->GetName());
return 1;
}
static int GetOption(lua_State* L)
{
DECLARE_SELF(L)
MeterWindow* meterWindow = self->GetMeterWindow();
ConfigParser& parser = meterWindow->GetParser();
const std::wstring section = LuaManager::ToWide(2);
const std::wstring defValue = LuaManager::ToWide(3);
const std::wstring& value =
parser.ReadString(self->GetName(), section.c_str(), defValue.c_str());
LuaManager::PushWide(value);
return 1;
}
static int GetW(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetW());
return 1;
}
static int GetH(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetH());
return 1;
}
static int GetX(lua_State* L)
{
DECLARE_SELF(L)
const bool abs = lua_toboolean(L, 2) != 0;
lua_pushnumber(L, self->GetX(abs));
return 1;
}
static int GetY(lua_State* L)
{
DECLARE_SELF(L)
const bool abs = lua_toboolean(L, 2) != 0;
lua_pushnumber(L, self->GetY(abs));
return 1;
}
static int SetW(lua_State* L)
{
DECLARE_SELF(L)
int w = (int)lua_tonumber(L, 2);
self->SetW(w);
return 0;
}
static int SetH(lua_State* L)
{
DECLARE_SELF(L)
int h = (int)lua_tonumber(L, 2);
self->SetH(h);
return 0;
}
static int SetX(lua_State* L)
{
DECLARE_SELF(L)
int x = (int)lua_tonumber(L, 2);
self->SetX(x);
return 0;
}
static int SetY(lua_State* L)
{
DECLARE_SELF(L)
int y = (int)lua_tonumber(L, 2);
self->SetY(y);
return 0;
}
static int Hide(lua_State* L)
{
DECLARE_SELF(L)
self->Hide();
return 0;
}
static int Show(lua_State* L)
{
DECLARE_SELF(L)
self->Show();
return 0;
}
static int SetText(lua_State* L)
{
DECLARE_SELF(L)
if (self->GetTypeID() == TypeID<MeterString>())
{
MeterString* string = (MeterString*)self;
std::wstring str = LuaManager::ToWide(2);
string->SetText(str.c_str());
}
return 0;
}
void LuaManager::RegisterMeter(lua_State* L)
{
const luaL_Reg functions[] =
{
{ "GetName", GetName },
{ "GetOption", GetOption },
{ "GetW", GetW },
{ "GetH", GetH },
{ "GetX", GetX },
{ "GetY", GetY },
{ "SetW", SetW },
{ "SetH", SetH },
{ "SetX", SetX },
{ "SetY", SetY },
{ "Hide", Hide },
{ "Show", Show },
{ "SetText", SetText },
{ nullptr, nullptr }
};
luaL_register(L, "Meter", functions);
lua_pushvalue(L, -1);
lua_setfield(L, -2, "__index");
lua_pop(L, 1);
}
/*
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 "../../Meter.h"
#include "../../MeterString.h"
#define DECLARE_SELF(L) \
void* selfData = lua_touserdata(L, 1); \
if (!selfData) return 0; \
Meter* self = *(Meter**)selfData;
static int GetName(lua_State* L)
{
DECLARE_SELF(L)
LuaManager::PushWide(self->GetName());
return 1;
}
static int GetOption(lua_State* L)
{
DECLARE_SELF(L)
MeterWindow* meterWindow = self->GetMeterWindow();
ConfigParser& parser = meterWindow->GetParser();
const std::wstring section = LuaManager::ToWide(2);
const std::wstring defValue = LuaManager::ToWide(3);
const std::wstring& value =
parser.ReadString(self->GetName(), section.c_str(), defValue.c_str());
LuaManager::PushWide(value);
return 1;
}
static int GetW(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetW());
return 1;
}
static int GetH(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetH());
return 1;
}
static int GetX(lua_State* L)
{
DECLARE_SELF(L)
const bool abs = lua_toboolean(L, 2) != 0;
lua_pushnumber(L, self->GetX(abs));
return 1;
}
static int GetY(lua_State* L)
{
DECLARE_SELF(L)
const bool abs = lua_toboolean(L, 2) != 0;
lua_pushnumber(L, self->GetY(abs));
return 1;
}
static int SetW(lua_State* L)
{
DECLARE_SELF(L)
int w = (int)lua_tonumber(L, 2);
self->SetW(w);
return 0;
}
static int SetH(lua_State* L)
{
DECLARE_SELF(L)
int h = (int)lua_tonumber(L, 2);
self->SetH(h);
return 0;
}
static int SetX(lua_State* L)
{
DECLARE_SELF(L)
int x = (int)lua_tonumber(L, 2);
self->SetX(x);
return 0;
}
static int SetY(lua_State* L)
{
DECLARE_SELF(L)
int y = (int)lua_tonumber(L, 2);
self->SetY(y);
return 0;
}
static int Hide(lua_State* L)
{
DECLARE_SELF(L)
self->Hide();
return 0;
}
static int Show(lua_State* L)
{
DECLARE_SELF(L)
self->Show();
return 0;
}
static int SetText(lua_State* L)
{
DECLARE_SELF(L)
if (self->GetTypeID() == TypeID<MeterString>())
{
MeterString* string = (MeterString*)self;
std::wstring str = LuaManager::ToWide(2);
string->SetText(str.c_str());
}
return 0;
}
void LuaManager::RegisterMeter(lua_State* L)
{
const luaL_Reg functions[] =
{
{ "GetName", GetName },
{ "GetOption", GetOption },
{ "GetW", GetW },
{ "GetH", GetH },
{ "GetX", GetX },
{ "GetY", GetY },
{ "SetW", SetW },
{ "SetH", SetH },
{ "SetX", SetX },
{ "SetY", SetY },
{ "Hide", Hide },
{ "Show", Show },
{ "SetText", SetText },
{ nullptr, nullptr }
};
luaL_register(L, "Meter", functions);
lua_pushvalue(L, -1);
lua_setfield(L, -2, "__index");
lua_pop(L, 1);
}

480
Library/lua/glue/LuaMeterWindow.cpp
View File

@@ -1,240 +1,240 @@
/*
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 "../../Rainmeter.h"
#include "../../MeterWindow.h"
#include "../../MeterString.h"
#define DECLARE_SELF(L) \
void* selfData = lua_touserdata(L, 1); \
if (!selfData) return 0; \
MeterWindow* self = *(MeterWindow**)selfData;
static int Bang(lua_State* L)
{
DECLARE_SELF(L)
ConfigParser& parser = self->GetParser();
std::wstring bang = LuaManager::ToWide(2);
int top = lua_gettop(L);
if (top == 2) // 1 argument
{
parser.ReplaceVariables(bang);
Rainmeter::GetInstance().ExecuteCommand(bang.c_str(), self);
}
else
{
const WCHAR* bangSz = bang.c_str();
if (*bangSz == L'!')
{
++bangSz; // Skip "!"
std::vector<std::wstring> args;
for (int i = 3; i <= top; ++i)
{
std::wstring tmpSz = LuaManager::ToWide(i);
parser.ReplaceVariables(tmpSz);
args.push_back(tmpSz);
}
Rainmeter::GetInstance().ExecuteBang(bangSz, args, self);
}
}
return 0;
}
static int GetMeter(lua_State* L)
{
DECLARE_SELF(L)
const std::wstring meterName = LuaManager::ToWide(2);
Meter* meter = self->GetMeter(meterName);
if (meter)
{
*(Meter**)lua_newuserdata(L, sizeof(Meter*)) = meter;
lua_getglobal(L, "Meter");
lua_setmetatable(L, -2);
}
else
{
lua_pushnil(L);
}
return 1;
}
static int GetMeasure(lua_State* L)
{
DECLARE_SELF(L)
const std::wstring measureName = LuaManager::ToWide(2);
Measure* measure = self->GetMeasure(measureName);
if (measure)
{
*(Measure**)lua_newuserdata(L, sizeof(Measure*)) = measure;
lua_getglobal(L, "Measure");
lua_setmetatable(L, -2);
}
else
{
lua_pushnil(L);
}
return 1;
}
static int GetVariable(lua_State* L)
{
DECLARE_SELF(L)
const std::wstring name = LuaManager::ToWide(2);
const std::wstring* value = self->GetParser().GetVariable(name);
if (value)
{
LuaManager::PushWide(*value);
}
else if (lua_gettop(L) >= 3)
{
lua_pushvalue(L, 3);
}
else
{
lua_pushnil(L);
}
return 1;
}
static int ReplaceVariables(lua_State* L)
{
DECLARE_SELF(L)
std::wstring strTmp = LuaManager::ToWide(2);
self->GetParser().ReplaceVariables(strTmp);
self->GetParser().ReplaceMeasures(strTmp);
LuaManager::PushWide(strTmp);
return 1;
}
static int ParseFormula(lua_State* L)
{
DECLARE_SELF(L)
std::wstring strTmp = LuaManager::ToWide(2);
double result;
if (!self->GetParser().ParseFormula(strTmp, &result))
{
result = lua_tonumber(L, 2);
}
lua_pushnumber(L, result);
return 1;
}
static int MoveWindow(lua_State* L)
{
DECLARE_SELF(L)
int x = (int)lua_tonumber(L, 2);
int y = (int)lua_tonumber(L, 3);
self->MoveWindow(x, y);
return 0;
}
static int FadeWindow(lua_State* L)
{
DECLARE_SELF(L)
int from = (int)lua_tonumber(L, 2);
int to = (int)lua_tonumber(L, 3);
self->FadeWindow(from, to);
return 0;
}
static int GetW(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetW());
return 1;
}
static int GetH(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetH());
return 1;
}
static int GetX(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetX());
return 1;
}
static int GetY(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetY());
return 1;
}
static int MakePathAbsolute(lua_State* L)
{
DECLARE_SELF(L)
std::wstring path = LuaManager::ToWide(2);
self->MakePathAbsolute(path);
LuaManager::PushWide(path);
return 1;
}
void LuaManager::RegisterMeterWindow(lua_State* L)
{
const luaL_Reg functions[] =
{
{ "Bang", Bang },
{ "GetMeter", GetMeter },
{ "GetMeasure", GetMeasure },
{ "GetVariable", GetVariable },
{ "ReplaceVariables", ReplaceVariables },
{ "ParseFormula", ParseFormula },
{ "MoveWindow", MoveWindow },
{ "FadeWindow", FadeWindow },
{ "GetW", GetW },
{ "GetH", GetH },
{ "GetX", GetX },
{ "GetY", GetY },
{ "MakePathAbsolute", MakePathAbsolute },
{ nullptr, nullptr }
};
luaL_register(L, "MeterWindow", functions);
lua_pushvalue(L, -1);
lua_setfield(L, -2, "__index");
lua_pop(L, 1);
}
/*
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 "../../Rainmeter.h"
#include "../../MeterWindow.h"
#include "../../MeterString.h"
#define DECLARE_SELF(L) \
void* selfData = lua_touserdata(L, 1); \
if (!selfData) return 0; \
MeterWindow* self = *(MeterWindow**)selfData;
static int Bang(lua_State* L)
{
DECLARE_SELF(L)
ConfigParser& parser = self->GetParser();
std::wstring bang = LuaManager::ToWide(2);
int top = lua_gettop(L);
if (top == 2) // 1 argument
{
parser.ReplaceVariables(bang);
Rainmeter::GetInstance().ExecuteCommand(bang.c_str(), self);
}
else
{
const WCHAR* bangSz = bang.c_str();
if (*bangSz == L'!')
{
++bangSz; // Skip "!"
std::vector<std::wstring> args;
for (int i = 3; i <= top; ++i)
{
std::wstring tmpSz = LuaManager::ToWide(i);
parser.ReplaceVariables(tmpSz);
args.push_back(tmpSz);
}
Rainmeter::GetInstance().ExecuteBang(bangSz, args, self);
}
}
return 0;
}
static int GetMeter(lua_State* L)
{
DECLARE_SELF(L)
const std::wstring meterName = LuaManager::ToWide(2);
Meter* meter = self->GetMeter(meterName);
if (meter)
{
*(Meter**)lua_newuserdata(L, sizeof(Meter*)) = meter;
lua_getglobal(L, "Meter");
lua_setmetatable(L, -2);
}
else
{
lua_pushnil(L);
}
return 1;
}
static int GetMeasure(lua_State* L)
{
DECLARE_SELF(L)
const std::wstring measureName = LuaManager::ToWide(2);
Measure* measure = self->GetMeasure(measureName);
if (measure)
{
*(Measure**)lua_newuserdata(L, sizeof(Measure*)) = measure;
lua_getglobal(L, "Measure");
lua_setmetatable(L, -2);
}
else
{
lua_pushnil(L);
}
return 1;
}
static int GetVariable(lua_State* L)
{
DECLARE_SELF(L)
const std::wstring name = LuaManager::ToWide(2);
const std::wstring* value = self->GetParser().GetVariable(name);
if (value)
{
LuaManager::PushWide(*value);
}
else if (lua_gettop(L) >= 3)
{
lua_pushvalue(L, 3);
}
else
{
lua_pushnil(L);
}
return 1;
}
static int ReplaceVariables(lua_State* L)
{
DECLARE_SELF(L)
std::wstring strTmp = LuaManager::ToWide(2);
self->GetParser().ReplaceVariables(strTmp);
self->GetParser().ReplaceMeasures(strTmp);
LuaManager::PushWide(strTmp);
return 1;
}
static int ParseFormula(lua_State* L)
{
DECLARE_SELF(L)
std::wstring strTmp = LuaManager::ToWide(2);
double result;
if (!self->GetParser().ParseFormula(strTmp, &result))
{
result = lua_tonumber(L, 2);
}
lua_pushnumber(L, result);
return 1;
}
static int MoveWindow(lua_State* L)
{
DECLARE_SELF(L)
int x = (int)lua_tonumber(L, 2);
int y = (int)lua_tonumber(L, 3);
self->MoveWindow(x, y);
return 0;
}
static int FadeWindow(lua_State* L)
{
DECLARE_SELF(L)
int from = (int)lua_tonumber(L, 2);
int to = (int)lua_tonumber(L, 3);
self->FadeWindow(from, to);
return 0;
}
static int GetW(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetW());
return 1;
}
static int GetH(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetH());
return 1;
}
static int GetX(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetX());
return 1;
}
static int GetY(lua_State* L)
{
DECLARE_SELF(L)
lua_pushnumber(L, self->GetY());
return 1;
}
static int MakePathAbsolute(lua_State* L)
{
DECLARE_SELF(L)
std::wstring path = LuaManager::ToWide(2);
self->MakePathAbsolute(path);
LuaManager::PushWide(path);
return 1;
}
void LuaManager::RegisterMeterWindow(lua_State* L)
{
const luaL_Reg functions[] =
{
{ "Bang", Bang },
{ "GetMeter", GetMeter },
{ "GetMeasure", GetMeasure },
{ "GetVariable", GetVariable },
{ "ReplaceVariables", ReplaceVariables },
{ "ParseFormula", ParseFormula },
{ "MoveWindow", MoveWindow },
{ "FadeWindow", FadeWindow },
{ "GetW", GetW },
{ "GetH", GetH },
{ "GetX", GetX },
{ "GetY", GetY },
{ "MakePathAbsolute", MakePathAbsolute },
{ nullptr, nullptr }
};
luaL_register(L, "MeterWindow", functions);
lua_pushvalue(L, -1);
lua_setfield(L, -2, "__index");
lua_pop(L, 1);
}