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
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
|
#ifndef LUA_PARSER_H
#define LUA_PARSER_H
// LuaParser.h: interface for the LuaParser class.
//
//////////////////////////////////////////////////////////////////////
#include <string>
#include <vector>
#include <map>
#include <set>
using std::string;
using std::vector;
using std::map;
using std::set;
#include "FileSystem/VFSModes.h"
class float3;
class LuaTable;
class LuaParser;
struct lua_State;
/******************************************************************************/
class LuaTable {
friend class LuaParser;
public:
LuaTable();
LuaTable(const LuaTable& tbl);
LuaTable& operator=(const LuaTable& tbl);
~LuaTable();
LuaTable SubTable(int key) const;
LuaTable SubTable(const string& key) const;
LuaTable SubTableExpr(const string& expr) const;
bool IsValid() const { return (parser != NULL); }
const string& GetPath() const { return path; }
int GetLength() const; // lua '#' operator
int GetLength(int key) const; // lua '#' operator
int GetLength(const string& key) const; // lua '#' operator
bool GetKeys(vector<int>& data) const;
bool GetKeys(vector<string>& data) const;
bool GetMap(map<int, float>& data) const;
bool GetMap(map<int, string>& data) const;
bool GetMap(map<string, float>& data) const;
bool GetMap(map<string, string>& data) const;
bool KeyExists(int key) const;
bool KeyExists(const string& key) const;
int GetType(int key) const;
int GetType(const string& key) const;
// numeric keys
int GetInt(int key, int def) const;
bool GetBool(int key, bool def) const;
float GetFloat(int key, float def) const;
float3 GetFloat3(int key, const float3& def) const;
string GetString(int key, const string& def) const;
// string keys (always lowercase)
int GetInt(const string& key, int def) const;
bool GetBool(const string& key, bool def) const;
float GetFloat(const string& key, float def) const;
float3 GetFloat3(const string& key, const float3& def) const;
string GetString(const string& key, const string& def) const;
/* not having these makes for better code, imo
LuaTable operator[](int key) const { return SubTable(key); }
LuaTable operator[](const string& key) const { return SubTable(key); }
int operator()(int key, int def) const { return GetInt(key, def); }
bool operator()(int key, bool def) const { return GetBool(key, def); }
float operator()(int key, float def) const { return GetFloat(key, def); }
float3 operator()(int key, const float3& def) const { return GetFloat3(key, def); }
string operator()(int key, const string& def) const { return GetString(key, def); }
int operator()(const string& key, int def) const { return GetInt(key, def); }
bool operator()(const string& key, bool def) const { return GetBool(key, def); }
float operator()(const string& key, float def) const { return GetFloat(key, def); }
float3 operator()(const string& key, const float3& def) const { return GetFloat3(key, def); }
string operator()(const string& key, const string& def) const { return GetString(key, def); }
*/
private:
LuaTable(LuaParser* parser); // for LuaParser::GetRoot()
bool PushTable() const;
bool PushValue(int key) const;
bool PushValue(const string& key) const;
private:
string path;
mutable bool isValid;
LuaParser* parser;
lua_State* L;
int refnum;
};
/******************************************************************************/
class LuaParser {
friend class LuaTable;
public:
LuaParser(const string& fileName,
const string& fileModes,
const string& accessModes);
LuaParser(const string& textChunk,
const string& accessModes);
~LuaParser();
bool Execute();
bool IsValid() const { return (L != NULL); }
LuaTable GetRoot();
LuaTable SubTableExpr(const string& expr) {
return GetRoot().SubTableExpr(expr);
}
const string& GetErrorLog() const { return errorLog; }
const set<string>& GetAccessedFiles() const { return accessedFiles; }
// for setting up the initial params table
void GetTable(int index, bool overwrite = false);
void GetTable(const string& name, bool overwrite = false);
void EndTable();
void AddFunc(int key, int (*func)(lua_State*));
void AddInt(int key, int value);
void AddBool(int key, bool value);
void AddFloat(int key, float value);
void AddString(int key, const string& value);
void AddFunc(const string& key, int (*func)(lua_State*));
void AddInt(const string& key, int value);
void AddBool(const string& key, bool value);
void AddFloat(const string& key, float value);
void AddString(const string& key, const string& value);
void SetLowerKeys(bool state) { lowerKeys = state; }
void SetLowerCppKeys(bool state) { lowerCppKeys = state; }
public:
const string fileName;
const string fileModes;
const string textChunk;
const string accessModes;
private:
void SetupEnv();
void PushParam();
void AddTable(LuaTable* tbl);
void RemoveTable(LuaTable* tbl);
private:
bool valid;
int initDepth;
lua_State* L;
set<LuaTable*> tables;
int rootRef;
int currentRef;
bool lowerKeys; // convert all returned keys to lower case
bool lowerCppKeys; // convert strings in arguments keys to lower case
string errorLog;
set<string> accessedFiles;
private:
// Weird call-outs
static int DontMessWithMyCase(lua_State* L);
// Spring call-outs
static int Echo(lua_State* L);
static int TimeCheck(lua_State* L);
// VFS call-outs
static int DirList(lua_State* L);
static int SubDirs(lua_State* L);
static int Include(lua_State* L);
static int LoadFile(lua_State* L);
static int FileExists(lua_State* L);
private:
static LuaParser* currentParser;
};
/******************************************************************************/
#endif /* LUA_PARSER_H */
|
