src/script.cpp

   1 /******************************
   2 ** Tsunagari Tile Engine     **
   3 ** script.cpp                **
   4 ** Copyright 2011 OmegaSDG   **
   5 ******************************/
   6
   7 #include "log.h"
   8 #include "script.h"
   9
  10 Script::Script()
  11 {
  12         L = lua_open();
  13         luaL_openlibs(L);
  14 }
  15
  16 void Script::addFn(const char* name, lua_CFunction fn)
  17 {
  18         lua_register(L, name, fn);
  19 }
  20
  21 void Script::addInt(const char* name, lua_Integer i)
  22 {
  23         lua_pushinteger(L, i);
  24         lua_setglobal(L, name);
  25 }
  26
  27 void Script::addData(const char* name, void* data)
  28 {
  29         lua_pushlightuserdata(L, data);
  30         lua_setglobal(L, name);
  31 }
  32
  33 void Script::run(const char* fn)
  34 {
  35         if (luaL_loadfile(L, fn)) {
  36                 Log::err("Script::run", std::string("Couldn't load file: ") +
  37                                lua_tostring(L, -1));
  38                 return;
  39         }
  40         lua_call(L, 0, 0);
  41 }
  42
  43 Script::~Script()
  44 {
  45         lua_close(L);
  46 }
  47