aboutsummaryrefslogtreecommitdiff
path: root/engines/sword25/script/luabindhelper.h
blob: 94f52743f343d633c9696dad2e8ac0244be73bb7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
/* ScummVM - Graphic Adventure Engine
 *
 * ScummVM is the legal property of its developers, whose names
 * are too numerous to list here. Please refer to the COPYRIGHT
 * file distributed with this source distribution.
 *
 * 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.
 *
 * $URL$
 * $Id$
 *
 */

/*
 * This code is based on Broken Sword 2.5 engine
 *
 * Copyright (c) Malte Thiesen, Daniel Queteschiner and Michael Elsdoerfer
 *
 * Licensed under GNU GPL v2
 *
 */

#ifndef SWORD25_LUABINDHELPER_H
#define SWORD25_LUABINDHELPER_H

#include "sword25/kernel/common.h"

#include "sword25/util/lua/lua.h"
#include "sword25/util/lua/lauxlib.h"

namespace Sword25 {

#define lua_pushbooleancpp(L, b) (lua_pushboolean(L, b ? 1 : 0))
#define lua_tobooleancpp(L, i) (lua_toboolean(L, i) == 0 ? false : true)

struct lua_constant_reg {
	const char     *Name;
	lua_Number      Value;
};

class LuaBindhelper {
public:
	/**
	 * Registers a set of functions into a Lua library.
	 * @param L             A pointer to the Lua VM
	 * @param LibName       The name of the library.
	 * If this is an empty string, the functions will be added to the global namespace.
	 * @param Functions     An array of function pointers along with their names.
	 * The array must be terminated with the enry (0, 0)
	 * @return              Returns true if successful, otherwise false.
	 */
	static bool addFunctionsToLib(lua_State *L, const Common::String &libName, const luaL_reg *functions);

	/**
	 * Adds a set of constants to the Lua library
	 * @param L             A pointer to the Lua VM
	 * @param LibName       The name of the library.
	 * If this is an empty string, the functions will be added to the global namespace.
	 * @param Constants     An array of the constant values along with their names.
	 * The array must be terminated with the enry (0, 0)
	 * @return              Returns true if successful, otherwise false.
	 */
	static bool addConstantsToLib(lua_State *L, const Common::String &libName, const lua_constant_reg *constants);

	/**
	 * Adds a set of methods to a Lua class
	 * @param L             A pointer to the Lua VM
	 * @param ClassName     The name of the class
	 * When the class name specified does not exist, it is created.
	 * @param Methods       An array of function pointers along with their method names.
	 * The array must be terminated with the enry (0, 0)
	 * @return              Returns true if successful, otherwise false.
	 */
	static bool addMethodsToClass(lua_State *L, const Common::String &className, const luaL_reg *methods);

	/**
	 * Sets the garbage collector callback method when items of a particular class are deleted
	 * @param L             A pointer to the Lua VM
	 * @param ClassName     The name of the class
	 * When the class name specified does not exist, it is created.
	 * @param GCHandler     A function pointer
	 * @return              Returns true if successful, otherwise false.
	 */
	static bool setClassGCHandler(lua_State *L, const Common::String &className, lua_CFunction GCHandler);

	/**
	 * Returns a string containing a stack dump of the Lua stack
	 * @param L             A pointer to the Lua VM
	 */
	static Common::String stackDump(lua_State *L);

	/**
	 * Returns a string that describes the contents of a table
	 * @param L             A pointer to the Lua VM
	 * @remark              The table must be on the Lua stack to be read out.
	 */
	static Common::String tableDump(lua_State *L);

	static bool getMetatable(lua_State *L, const Common::String &tableName);

	static void *my_checkudata(lua_State *L, int ud, const char *tname);

private:
	static bool createTable(lua_State *L, const Common::String &tableName);
};

} // End of namespace Sword25

#endif