rainmeter-studio/Library/MeasureScript.cpp

279 lines
6.5 KiB
C++
Raw Normal View History

/*
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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*/
#include "StdAfx.h"
#include "MeasureScript.h"
#include "lua/LuaManager.h"
#include "Litestep.h"
#include "Rainmeter.h"
const char* g_InitializeFunctionName = "Initialize";
const char* g_UpdateFunctionName = "Update";
const char* g_GetStringFunctionName = "GetStringValue";
/*
** CMeasureScript
**
** The constructor
**
*/
2011-02-15 16:26:54 +00:00
CMeasureScript::CMeasureScript(CMeterWindow* meterWindow, const WCHAR* name) : CMeasure(meterWindow, name),
m_LuaScript(),
m_HasInitializeFunction(false),
m_HasUpdateFunction(false),
m_HasGetStringFunction(false)
{
LuaManager::Init();
}
/*
** ~CMeasureScript
**
** The destructor
**
*/
CMeasureScript::~CMeasureScript()
{
DeleteLuaScript();
LuaManager::CleanUp();
}
void CMeasureScript::DeleteLuaScript()
{
if (m_LuaScript)
{
delete m_LuaScript;
m_LuaScript = NULL;
}
m_HasInitializeFunction = false;
m_HasUpdateFunction = false;
m_HasGetStringFunction = false;
}
/*
** Initialize
**
** Initializes the measure.
**
*/
void CMeasureScript::Initialize()
{
CMeasure::Initialize();
if (m_HasInitializeFunction)
{
m_LuaScript->RunFunction(g_InitializeFunctionName);
}
}
/*
** Update
**
** Updates the current disk free space value.
**
*/
bool CMeasureScript::Update()
{
if (!CMeasure::PreUpdate())
{
return false;
}
if (m_HasUpdateFunction)
{
bool ret = m_LuaScript->RunFunctionWithReturn(g_UpdateFunctionName, m_Value, m_StringValue);
if (!ret)
{
// Update() didn't return anything. For backwards compatibility, check for GetStringValue() first
if (m_HasGetStringFunction)
{
m_LuaScript->RunFunctionWithReturn(g_GetStringFunctionName, m_Value, m_StringValue);
}
else
{
std::wstring error = L"Script: Update() in measure [";
error += m_Name;
error += L"] is not returning a valid number or string.";
Log(LOG_WARNING, error.c_str());
}
}
}
return PostUpdate();
}
/*
** GetStringValue
**
** Returns the time as string.
2011-03-29 19:21:57 +00:00
**
*/
const WCHAR* CMeasureScript::GetStringValue(AUTOSCALE autoScale, double scale, int decimals, bool percentual)
{
return CheckSubstitute(m_StringValue.c_str());
}
/*
** ReadConfig
**
** Reads the measure specific configs.
**
*/
void CMeasureScript::ReadConfig(CConfigParser& parser, const WCHAR* section)
{
// Store the current values
std::string oldScriptFile = m_ScriptFile;
// Read common configs
CMeasure::ReadConfig(parser, section);
std::wstring file = parser.ReadString(section, L"ScriptFile", L"");
if (!file.empty())
{
file = m_MeterWindow->MakePathAbsolute(file);
m_ScriptFile = ConvertToAscii(file.c_str());
2011-02-10 08:48:04 +00:00
if (!m_Initialized ||
oldScriptFile != m_ScriptFile)
{
2011-02-10 08:48:04 +00:00
lua_State* L = LuaManager::GetState();
2011-02-10 08:48:04 +00:00
DeleteLuaScript();
m_LuaScript = new LuaScript(LuaManager::GetState(), m_ScriptFile.c_str());
if (m_LuaScript->IsInitialized())
2011-02-10 08:48:04 +00:00
{
m_HasInitializeFunction = m_LuaScript->IsFunction(g_InitializeFunctionName);
m_HasUpdateFunction = m_LuaScript->IsFunction(g_UpdateFunctionName);
m_HasGetStringFunction = m_LuaScript->IsFunction(g_GetStringFunctionName); // For backwards compatbility
2011-02-10 08:48:04 +00:00
if (m_HasGetStringFunction)
{
std::wstring error = L"Script: GetStringValue() used in measure [";
error += m_Name;
error += L"] has been deprecated. Check manual to ensure future compatibility.";
Log(LOG_WARNING, error.c_str());
}
m_LuaScript->PushTable();
2011-02-10 08:48:04 +00:00
// Push the variable name we want to put a value in.
lua_pushstring(L, "SELF");
// Push the value
tolua_pushusertype(L, this, "CMeasure");
// Bind the variable
lua_settable(L, -3);
lua_pushstring(L, "SKIN");
tolua_pushusertype(L, m_MeterWindow, "CMeterWindow");
lua_settable(L, -3);
lua_pushstring(L, "RAINMETER");
tolua_pushusertype(L, m_MeterWindow->GetMainObject(), "CRainmeter");
lua_settable(L, -3);
// Look in the properties table for values to read from the section.
2011-02-10 08:48:04 +00:00
lua_getfield(L, -1, "PROPERTIES");
if (lua_isnil(L, -1) == 0)
{
2011-02-10 08:48:04 +00:00
lua_pushnil(L);
2011-03-29 19:21:57 +00:00
while (lua_next(L, -2))
2011-02-10 08:48:04 +00:00
{
lua_pop(L, 1);
2011-02-10 08:48:04 +00:00
const char* strKey = lua_tostring(L, -1);
2011-02-10 08:48:04 +00:00
std::wstring wstrKey = ConvertToWide(strKey);
std::wstring wstrValue = parser.ReadString(section, wstrKey.c_str(), L"");
2011-02-10 08:48:04 +00:00
if (!wstrValue.empty())
{
std::string strStrVal = ConvertToAscii(wstrValue.c_str());
const char* strValue = strStrVal.c_str();
2011-02-10 08:48:04 +00:00
lua_pushstring(L, strValue);
lua_setfield(L, -3, strKey);
}
}
}
2011-02-10 08:48:04 +00:00
// Pop PROPERTIES table
lua_pop(L, 1);
// Pop the table
lua_pop(L, 1);
}
else
{
DeleteLuaScript();
}
}
}
else
{
std::wstring error = L"Script: ScriptFile= is not valid in measure [";
error += m_Name;
error += L"].";
Log(LOG_WARNING, error.c_str());
DeleteLuaScript();
}
}
/*
** ExecuteBang
**
** Sends a bang to the measure.
**
*/
void CMeasureScript::ExecuteBang(const WCHAR* args)
{
std::string str = ConvertToAscii(args);
m_LuaScript->RunString(str.c_str());
}
static void stackDump(lua_State *L)
{
LuaManager::LuaLog(LOG_DEBUG, " ---------------- Stack Dump ----------------" );
for (int i = lua_gettop(L); i > 0; --i)
{
int t = lua_type(L, i);
switch (t)
{
case LUA_TSTRING:
LuaManager::LuaLog(LOG_DEBUG, "%d:'%s'", i, lua_tostring(L, i));
break;
case LUA_TBOOLEAN:
LuaManager::LuaLog(LOG_DEBUG, "%d: %s", i, lua_toboolean(L, i) ? "true" : "false");
break;
case LUA_TNUMBER:
LuaManager::LuaLog(LOG_DEBUG, "%d: %g", i, lua_tonumber(L, i));
break;
default:
LuaManager::LuaLog(LOG_DEBUG, "%d: %s", i, lua_typename(L, t));
break;
}
}
LuaManager::LuaLog(LOG_DEBUG, "--------------- Stack Dump Finished ---------------" );
}