Aegisub/devel/OverLua/overlua.h
Amar Takhar aa506bfe40 SVN Transition Step 6/7
1. svn mv OverLua SSATool athenasub avisynth_prs kanamemo \
     motiontracker prs traydict unit_test vsfilter devel/

* See r2749 for full description.

Originally committed to SVN as r2755.
2009-03-08 08:31:54 +00:00

96 lines
2.5 KiB
C++

/*
* C++ interface for OverLua
*
Copyright 2007 Niels Martin Hansen
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.
Contact:
E-mail: <jiifurusu@gmail.com>
IRC: jfs in #aegisub on irc.rizon.net
*/
#ifndef OVERLUA_H
#define OVERLUA_H
// assume we're in aegisub's svn tree and
// are building with the aegisub patched lua
#include "../lua51/src/lua.h"
#include "../lua51/src/lualib.h"
#include "../lua51/src/lauxlib.h"
#include <stddef.h>
#include "image.h"
#include "cairo_wrap.h"
#include "raster_ops.h"
class OverLuaScript {
private:
lua_State *L;
// No default constructor
OverLuaScript() { }
template <class ScriptReaderClass>
void Create(ScriptReaderClass &reader, const char *chunkname, const char *datastring)
{
int err;
L = luaL_newstate();
// Base Lua libs
luaL_openlibs(L);
// Cairo lib
lua_pushcfunction(L, luaopen_cairo); lua_call(L, 0, 0);
// Raster library
lua_pushcfunction(L, luaopen_raster); lua_call(L, 0, 0);
// Debug print
lua_pushcclosure(L, lua_debug_print, 0);
lua_setglobal(L, "dprint");
// Datastring
if (datastring)
lua_pushstring(L, datastring);
else
lua_pushnil(L);
lua_setglobal(L, "overlua_datastring");
err = lua_load(L, reader.reader, &reader, chunkname);
// todo: better error handling
if (err == LUA_ERRSYNTAX) throw lua_tostring(L, -1);
if (err == LUA_ERRMEM) throw "Memory error";
err = lua_pcall(L, 0, 0, 0);
if (err == LUA_ERRRUN) throw lua_tostring(L, -1);
if (err == LUA_ERRMEM) throw "Memory error";
if (err == LUA_ERRERR) throw "Error-handler error";
}
static int lua_debug_print(lua_State *L);
public:
OverLuaScript(const char *filename, const char *_datastring = 0);
OverLuaScript(const void *data, size_t length, const char *_datastring = 0);
virtual ~OverLuaScript();
void RenderFrameRGB(BaseImageAggregate &frame, double time);
};
#endif