1 /* ScummVM - Graphic Adventure Engine
2  *
3  * ScummVM is the legal property of its developers, whose names
4  * are too numerous to list here. Please refer to the COPYRIGHT
5  * file distributed with this source distribution.
6  *
7  * This program is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU General Public License
9  * as published by the Free Software Foundation; either version 2
10  * of the License, or (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
20  *
21  */
22 
23 #include "common/scummsys.h"
24 #include "common/util.h"
25 
26 #include "queen/debug.h"
27 
28 #include "queen/graphics.h"
29 #include "queen/logic.h"
30 #include "queen/queen.h"
31 #include "queen/resource.h"
32 #include "queen/sound.h"
33 
34 namespace Queen {
35 
Debugger(QueenEngine * vm)36 Debugger::Debugger(QueenEngine *vm)
37 	: _vm(vm), _flags(0) {
38 
39 	registerCmd("areas", WRAP_METHOD(Debugger, Cmd_Areas));
40 	registerCmd("asm",   WRAP_METHOD(Debugger, Cmd_Asm));
41 	registerCmd("bob",   WRAP_METHOD(Debugger, Cmd_Bob));
42 	registerCmd("bobs",  WRAP_METHOD(Debugger, Cmd_PrintBobs));
43 	registerCmd("gs",    WRAP_METHOD(Debugger, Cmd_GameState));
44 	registerCmd("info",  WRAP_METHOD(Debugger, Cmd_Info));
45 	registerCmd("items", WRAP_METHOD(Debugger, Cmd_Items));
46 	registerCmd("room",  WRAP_METHOD(Debugger, Cmd_Room));
47 	registerCmd("song",  WRAP_METHOD(Debugger, Cmd_Song));
48 }
49 
~Debugger()50 Debugger::~Debugger() {} // we need this here for __SYMBIAN32__
51 
preEnter()52 void Debugger::preEnter() {
53 	GUI::Debugger::preEnter();
54 }
55 
postEnter()56 void Debugger::postEnter() {
57 	GUI::Debugger::postEnter();
58 	_vm->graphics()->setupMouseCursor();
59 }
60 
isNumeric(const char * arg)61 static bool isNumeric(const char *arg) {
62 	const char *str = arg;
63 	bool retVal = true;
64 	while (retVal && (*str != '\0')) {
65 		retVal = Common::isDigit(*str++);
66 	}
67 	return retVal;
68 }
69 
Cmd_Asm(int argc,const char ** argv)70 bool Debugger::Cmd_Asm(int argc, const char **argv) {
71 	if (argc == 2 && isNumeric(argv[1])) {
72 		uint16 sm = atoi(argv[1]);
73 		_vm->logic()->executeSpecialMove(sm);
74 		return false;
75 	} else {
76 		debugPrintf("Usage: %s smnum\n", argv[0]);
77 	}
78 	return true;
79 }
80 
Cmd_Areas(int argc,const char ** argv)81 bool Debugger::Cmd_Areas(int argc, const char **argv) {
82 	_flags ^= DF_DRAW_AREAS;
83 	debugPrintf("Room areas display %s\n", (_flags & DF_DRAW_AREAS) != 0 ? "on" : "off");
84 	return true;
85 }
86 
Cmd_Bob(int argc,const char ** argv)87 bool Debugger::Cmd_Bob(int argc, const char **argv) {
88 	if (argc >= 3 && isNumeric(argv[1])) {
89 		int bobNum = atoi(argv[1]);
90 		if (bobNum >= Graphics::MAX_BOBS_NUMBER) {
91 			debugPrintf("Bob %d is out of range (range: 0 - %d)\n", bobNum, Graphics::MAX_BOBS_NUMBER);
92 		} else {
93 			int param = 0;
94 			if (argc > 3 && isNumeric(argv[3])) {
95 				param = atoi(argv[3]);
96 			} else {
97 				debugPrintf("Invalid parameter for bob command '%s'\n", argv[2]);
98 			}
99 			BobSlot *bob = _vm->graphics()->bob(bobNum);
100 			if (!strcmp(argv[2], "toggle")) {
101 				bob->active = !bob->active;
102 				debugPrintf("bob[%d].active = %d\n", bobNum, bob->active);
103 			} else if (!strcmp(argv[2], "x")) {
104 				bob->x = param;
105 				debugPrintf("bob[%d].x = %d\n", bobNum, bob->x);
106 			} else if (!strcmp(argv[2], "y")) {
107 				bob->y = param;
108 				debugPrintf("bob[%d].y = %d\n", bobNum, bob->y);
109 			} else if (!strcmp(argv[2], "frame")) {
110 				bob->frameNum = param;
111 				debugPrintf("bob[%d].frameNum = %d\n", bobNum, bob->frameNum);
112 			} else if (!strcmp(argv[2], "speed")) {
113 				bob->speed = param;
114 				debugPrintf("bob[%d].speed = %d\n", bobNum, bob->speed);
115 			} else {
116 				debugPrintf("Unknown bob command '%s'\n", argv[2]);
117 			}
118 		}
119 	} else {
120 		debugPrintf("Usage: %s bobnum command parameter\n", argv[0]);
121 	}
122 	return true;
123 }
124 
Cmd_GameState(int argc,const char ** argv)125 bool Debugger::Cmd_GameState(int argc, const char **argv) {
126 	uint16 slot;
127 	if ((argc == 2 || argc == 3) && isNumeric(argv[1])) {
128 		slot = atoi(argv[1]);
129 		debugPrintf("GAMESTATE[%d] ", slot);
130 		debugPrintf("%s %d\n", (argc == 2) ? "is" : "was", _vm->logic()->gameState(slot));
131 
132 		if (argc == 3) {
133 			if (isNumeric(argv[1])) {
134 				_vm->logic()->gameState(slot, atoi(argv[2]));
135 				debugPrintf("now %d\n", _vm->logic()->gameState(slot));
136 			} else {
137 				debugPrintf("Usage: %s slotnum <value>\n", argv[0]);
138 			}
139 		}
140 	} else {
141 		debugPrintf("Usage: %s slotnum <value>\n", argv[0]);
142 	}
143 	return true;
144 }
145 
Cmd_Info(int argc,const char ** argv)146 bool Debugger::Cmd_Info(int argc, const char **argv) {
147 	debugPrintf("Version: %s\n", _vm->resource()->getJASVersion());
148 	debugPrintf("Audio compression: %d\n", _vm->resource()->getCompression());
149 	return true;
150 }
151 
Cmd_Items(int argc,const char ** argv)152 bool Debugger::Cmd_Items(int argc, const char **argv) {
153 	int n = _vm->logic()->itemDataCount();
154 	ItemData *item = _vm->logic()->itemData(1);
155 	while (n--) {
156 		item->name = ABS(item->name);
157 		++item;
158 	}
159 	debugPrintf("Enabled all inventory items\n");
160 	return true;
161 }
162 
Cmd_PrintBobs(int argc,const char ** argv)163 bool Debugger::Cmd_PrintBobs(int argc, const char**argv) {
164 	int i;
165 	BobSlot *bob = _vm->graphics()->bob(0);
166 	debugPrintf("+------------------------------------+\n");
167 	debugPrintf("|# |  x|  y|f|scl|frm|a|m|spd| ex| ey|\n");
168 	debugPrintf("+--+---+---+-+---+---+-+-+---+---+---+\n");
169 	for (i = 0; i < Graphics::MAX_BOBS_NUMBER; ++i, ++bob) {
170 		if (bob->active) {
171 			debugPrintf("|%2d|%3d|%3d|%1d|%3d|%3d|%1d|%1d|%3d|%3d|%3d|\n",
172 				i, bob->x, bob->y, bob->xflip, bob->scale, bob->frameNum,
173 				bob->animating, bob->moving, bob->speed, bob->endx, bob->endy);
174 		}
175 	}
176 	debugPrintf("+--------------------------------+\n");
177 	return true;
178 }
179 
Cmd_Room(int argc,const char ** argv)180 bool Debugger::Cmd_Room(int argc, const char **argv) {
181 	if (argc == 2 && isNumeric(argv[1])) {
182 		uint16 roomNum = atoi(argv[1]);
183 		_vm->logic()->joePos(0, 0);
184 		_vm->logic()->newRoom(roomNum);
185 		_vm->logic()->entryObj(_vm->logic()->roomData(roomNum) + 1);
186 		return false;
187 	} else {
188 		debugPrintf("Current room: %d (%s), use '%s <roomnum>' to switch\n",
189 			_vm->logic()->currentRoom(),
190 			_vm->logic()->roomName(_vm->logic()->currentRoom()),
191 			argv[0]);
192 	}
193 	return true;
194 }
195 
Cmd_Song(int argc,const char ** argv)196 bool Debugger::Cmd_Song(int argc, const char **argv) {
197 	if (argc == 2 && isNumeric(argv[1])) {
198 		int16 songNum = atoi(argv[1]);
199 		_vm->sound()->playSong(songNum);
200 		debugPrintf("Playing song %d\n", songNum);
201 	} else {
202 		debugPrintf("Usage: %s songnum\n", argv[0]);
203 	}
204 	return true;
205 }
206 
207 } // End of namespace Queen
208