134 lines
3.5 KiB
C++
134 lines
3.5 KiB
C++
#include "global.h"
|
|
#include "ActorCommands.h"
|
|
#include "Command.h"
|
|
#include "Foreach.h"
|
|
#include "RageUtil.h"
|
|
#include "RageLog.h"
|
|
#include <sstream>
|
|
#include "LuaBinding.h"
|
|
|
|
ActorCommands::ActorCommands( const CString &sCommands )
|
|
{
|
|
if( sCommands.size() > 0 && sCommands[0] == '\033' )
|
|
{
|
|
/* This is a compiled Lua chunk. Just pass it on directly. */
|
|
m_sLuaFunction = sCommands;
|
|
}
|
|
else if( sCommands.size() > 0 && sCommands[0] == '%' )
|
|
{
|
|
m_sLuaFunction = "return ";
|
|
m_sLuaFunction.append( sCommands.begin()+1, sCommands.end() );
|
|
}
|
|
else
|
|
{
|
|
Commands cmds;
|
|
ParseCommands( sCommands, cmds );
|
|
|
|
//
|
|
// Convert cmds to a Lua function
|
|
//
|
|
ostringstream s;
|
|
|
|
s << "return function(self,parent)\n";
|
|
|
|
FOREACH_CONST( Command, cmds.v, c )
|
|
{
|
|
const Command& cmd = (*c);
|
|
CString sName = cmd.GetName();
|
|
TrimLeft( sName );
|
|
TrimRight( sName );
|
|
s << "\tself:" << sName << "(";
|
|
|
|
bool bFirstParamIsString =
|
|
sName == "horizalign" ||
|
|
sName == "vertalign" ||
|
|
sName == "effectclock" ||
|
|
sName == "blend" ||
|
|
sName == "ztestmode" ||
|
|
sName == "cullmode" ||
|
|
sName == "playcommand" ||
|
|
sName == "queuecommand" ||
|
|
sName == "queuemessage";
|
|
|
|
for( unsigned i=1; i<cmd.m_vsArgs.size(); i++ )
|
|
{
|
|
CString sArg = cmd.m_vsArgs[i];
|
|
|
|
// "+200" -> "200"
|
|
if( sArg[0] == '+' )
|
|
sArg.erase( sArg.begin() );
|
|
|
|
if( i==1 && bFirstParamIsString ) // string literal
|
|
{
|
|
sArg.Replace( "'", "\\'" ); // escape quote
|
|
s << "'" << sArg << "'";
|
|
}
|
|
else if( sArg[0] == '#' ) // HTML color
|
|
{
|
|
RageColor c; // in case FromString fails
|
|
c.FromString( sArg );
|
|
// c is still valid if FromString fails
|
|
s << c.r << "," << c.g << "," << c.b << "," << c.a;
|
|
}
|
|
else
|
|
{
|
|
s << sArg;
|
|
}
|
|
|
|
if( i != cmd.m_vsArgs.size()-1 )
|
|
s << ",";
|
|
}
|
|
s << ")\n";
|
|
}
|
|
|
|
s << "end\n";
|
|
|
|
m_sLuaFunction = s.str();
|
|
}
|
|
|
|
Register();
|
|
|
|
ASSERT_M( !this->IsNil(), m_sLuaFunction.c_str() );
|
|
}
|
|
|
|
void ActorCommands::Register()
|
|
{
|
|
Lua *L = LUA->Get();
|
|
|
|
CString sError;
|
|
if( !LuaHelpers::RunScript( L, m_sLuaFunction, "in", sError, 1 ) )
|
|
{
|
|
FAIL_M( ssprintf("Compiling \"%s\": %s", m_sLuaFunction.c_str(), sError.c_str()) );
|
|
}
|
|
|
|
/* The function is now on the stack. */
|
|
this->SetFromStack( L );
|
|
LUA->Release( L );
|
|
}
|
|
|
|
|
|
/*
|
|
* (c) 2004 Chris Danford
|
|
* All rights reserved.
|
|
*
|
|
* Permission is hereby granted, free of charge, to any person obtaining a
|
|
* copy of this software and associated documentation files (the
|
|
* "Software"), to deal in the Software without restriction, including
|
|
* without limitation the rights to use, copy, modify, merge, publish,
|
|
* distribute, and/or sell copies of the Software, and to permit persons to
|
|
* whom the Software is furnished to do so, provided that the above
|
|
* copyright notice(s) and this permission notice appear in all copies of
|
|
* the Software and that both the above copyright notice(s) and this
|
|
* permission notice appear in supporting documentation.
|
|
*
|
|
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
|
|
* OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
|
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT OF
|
|
* THIRD PARTY RIGHTS. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR HOLDERS
|
|
* INCLUDED IN THIS NOTICE BE LIABLE FOR ANY CLAIM, OR ANY SPECIAL INDIRECT
|
|
* OR CONSEQUENTIAL DAMAGES, OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS
|
|
* OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
|
|
* OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
|
|
* PERFORMANCE OF THIS SOFTWARE.
|
|
*/
|