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
|
/* 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$
*
*/
#include <engine.h>
#include "sciunpack.h"
int
vocab_dump() {
char **names;
opcode *opcodes;
int i = 0, count;
int *classes;
printf("Selectors:\n");
names = vocabulary_get_snames(resmgr, NULL, 0);
while (names[i]) {
printf("0x%02X: %s\n", i, names[i]);
i++;
}
vocabulary_free_snames(names);
i = 0;
printf("\nOpcodes:\n");
opcodes = vocabulary_get_opcodes(resmgr);
while ((i < 256) && (opcodes[i].name)) {
printf("%s: Type %i, Number %i\n", opcodes[i].name,
opcodes[i].type, opcodes[i].number);
i++;
}
names = vocabulary_get_knames(resmgr, &count);
printf("\nKernel names:\n");
if (names == 0) printf("Error loading kernel names\n");
else {
for (i = 0; i < count; i++) printf("0x%02X: %s\n", i, names[i]);
vocabulary_free_knames(names);
}
classes = vocabulary_get_classes(resmgr, &count);
printf("\nClasses:\n");
if (classes == 0) printf("Error loading classes\n");
else {
for (i = 0; i < count; i++) printf("0x%02X: script %i\n", i, classes [i]);
free(classes);
}
return 0;
}
|