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
|
/* 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.
*
*/
/*
* This file is based on WME Lite.
* http://dead-code.org/redir.php?target=wmelite
* Copyright (c) 2011 Jan Nedoma
*/
#ifndef WINTERMUTE_SCSCRIPT_H
#define WINTERMUTE_SCSCRIPT_H
#include "engines/wintermute/base/base.h"
#include "engines/wintermute/base/scriptables/dcscript.h" // Added by ClassView
#include "engines/wintermute/coll_templ.h"
#include "engines/wintermute/persistent.h"
namespace Wintermute {
class BaseScriptHolder;
class BaseObject;
class ScEngine;
class ScStack;
class ScValue;
class ScScript : public BaseClass {
public:
BaseArray<int> _breakpoints;
bool _tracingMode;
ScScript *_parentScript;
bool _unbreakable;
bool finishThreads();
bool copyParameters(ScStack *stack);
void afterLoad();
protected:
ScValue *_operand;
ScValue *_reg1;
public:
bool _freezable;
bool resume();
bool pause();
bool canHandleEvent(const Common::String &eventName) const;
bool canHandleMethod(const Common::String &methodName) const;
bool createThread(ScScript *original, uint32 initIP, const Common::String &eventName);
bool createMethodThread(ScScript *original, const Common::String &methodName);
ScScript *invokeEventHandler(const Common::String &eventName, bool unbreakable = false);
uint32 _timeSlice;
DECLARE_PERSISTENT(ScScript, BaseClass)
void runtimeError(const char *fmt, ...);
bool run();
bool finish(bool includingThreads = false);
bool sleep(uint32 duration);
bool waitForExclusive(BaseObject *object);
bool waitFor(BaseObject *object);
uint32 _waitTime;
bool _waitFrozen;
BaseObject *_waitObject;
ScScript *_waitScript;
TScriptState _state;
TScriptState _origState;
ScValue *getVar(char *name);
uint32 getFuncPos(const Common::String &name);
uint32 getEventPos(const Common::String &name) const;
uint32 getMethodPos(const Common::String &name) const;
typedef struct {
uint32 magic;
uint32 version;
uint32 codeStart;
uint32 funcTable;
uint32 symbolTable;
uint32 eventTable;
uint32 externalsTable;
uint32 methodTable;
} TScriptHeader;
TScriptHeader _header;
typedef struct {
char *name;
uint32 pos;
} TFunctionPos;
typedef struct {
char *name;
uint32 pos;
} TMethodPos;
typedef struct {
char *name;
uint32 pos;
} TEventPos;
typedef struct {
char *name;
char *dll_name;
TCallType call_type;
TExternalType returns;
int32 nu_params;
TExternalType *params;
} TExternalFunction;
ScStack *_callStack;
ScStack *_thisStack;
ScStack *_scopeStack;
ScStack *_stack;
ScValue *_globals;
ScEngine *_engine;
int32 _currentLine;
virtual bool executeInstruction();
char *getString();
uint32 getDWORD();
double getFloat();
void cleanup();
bool create(const char *filename, byte *buffer, uint32 size, BaseScriptHolder *owner);
uint32 _iP;
private:
void readHeader();
uint32 _bufferSize;
byte *_buffer;
public:
Common::SeekableReadStream *_scriptStream;
ScScript(BaseGame *inGame, ScEngine *engine);
virtual ~ScScript();
char *_filename;
bool _thread;
bool _methodThread;
char *_threadEvent;
BaseScriptHolder *_owner;
ScScript::TExternalFunction *getExternal(char *name);
bool externalCall(ScStack *stack, ScStack *thisStack, ScScript::TExternalFunction *function);
private:
char **_symbols;
uint32 _numSymbols;
TFunctionPos *_functions;
TMethodPos *_methods;
TEventPos *_events;
uint32 _numExternals;
TExternalFunction *_externals;
uint32 _numFunctions;
uint32 _numMethods;
uint32 _numEvents;
bool initScript();
bool initTables();
virtual void preInstHook(uint32 inst);
virtual void postInstHook(uint32 inst);
};
} // End of namespace Wintermute
#endif
|
