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
|
/* ScummVM - Scumm Interpreter
* Copyright (C) 2006 The ScummVM project
*
* 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$
*
*/
#ifndef GUI_EVAL_H
#define GUI_EVAL_H
#include "common/stdafx.h"
#include "common/str.h"
#include "common/hashmap.h"
#include "common/hash-str.h"
namespace GUI {
using Common::String;
using Common::HashMap;
enum {
EVAL_UNDEF_VAR = -13375,
EVAL_STRING_VAR = -13376
};
class Eval {
public:
Eval();
~Eval();
int eval(const String &input, const String §ion, const String &name, int startpos);
void setVar(const String §ion, const String &name, const String &value);
void setParent(const String &name);
void setVar(const String &name, int val) { _vars[name.c_str()] = val; }
void setStringVar(const String &name, const String &val) { _strings[name.c_str()] = val; }
void setAlias(const char *name, const String &val) { _aliases[name] = val; }
int getVar(const char *s) { return getVar_(s); }
int getVar(const char *s, int def) {
int val = getVar_(s);
return (val == EVAL_UNDEF_VAR) ? def : val;
}
int getVar(const String &s) { return getVar(s.c_str()); }
int getVar(const String &s, int def) { return getVar(s.c_str(), def); }
const String &getStringVar(const char *name) { return _strings[name]; }
uint getNumVars() { return _vars.size(); }
void reset();
char *lastToken() { return _token; }
template <class Val>
struct CharStar_BaseNode {
char *_key;
Val _value;
CharStar_BaseNode() {assert(0);}
CharStar_BaseNode(const char *key) { _key = (char *)malloc(strlen(key)+1); strcpy(_key, key); }
~CharStar_BaseNode() { free(_key); }
};
struct CharStar_EqualTo {
bool operator()(const char *x, const char *y) const { return strcmp(x, y) == 0; }
};
struct CharStar_Hash {
uint operator()(const char *x) const { return Common::hashit(x); }
};
//typedef HashMap<String, int> VariablesMap;
typedef HashMap<const char *, int, CharStar_Hash, CharStar_EqualTo, CharStar_BaseNode<int> > VariablesMap;
typedef HashMap<const char *, String, CharStar_Hash, CharStar_EqualTo, CharStar_BaseNode<String> > AliasesMap;
typedef HashMap<const char *, String, CharStar_Hash, CharStar_EqualTo, CharStar_BaseNode<String> > StringsMap;
private:
enum TokenTypes {
tNone,
tDelimiter,
tVariable,
tNumber,
tString
};
enum EvalErrors {
eSyntaxError,
eExtraBracket,
eUnclosedBracket,
eBadExpr,
eUndefVar,
eMissingQuote
};
void getToken();
void level2(int *);
void level3(int *);
void level4(int *);
void level5(int *);
void primitive(int *);
void arith(char op, int *r, int *h);
void unary(char op, int *r);
void exprError(EvalErrors error);
int getVar_(const char *s, bool includeAliases = true);
int getBuiltinVar(const char *s);
void loadConstants();
char _input[256];
String _section;
String _name;
int _startpos;
TokenTypes _tokenType;
int _pos;
char _token[256];
AliasesMap _aliases;
VariablesMap _vars;
StringsMap _strings;
};
} // end of namespace GUI
#endif
|
