aboutsummaryrefslogtreecommitdiff
path: root/simon/debug.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'simon/debug.cpp')
-rw-r--r--simon/debug.cpp462
1 files changed, 0 insertions, 462 deletions
diff --git a/simon/debug.cpp b/simon/debug.cpp
deleted file mode 100644
index 39e462782f..0000000000
--- a/simon/debug.cpp
+++ /dev/null
@@ -1,462 +0,0 @@
-/* ScummVM - Scumm Interpreter
- * Copyright (C) 2001-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$
- *
- */
-
-// Simon debug functions
-#include "common/stdafx.h"
-#include "simon/simon.h"
-#include "simon/intern.h"
-#include "simon/debug.h"
-#include "simon/vga.h"
-
-#include <sys/stat.h>
-
-namespace Simon {
-
-const byte *SimonEngine::dumpOpcode(const byte *p) {
- byte opcode;
- const char *s, *st;
-
- opcode = *p++;
- if (opcode == 255)
- return NULL;
- if (getGameType() == GType_FF) {
- st = s = feeblefiles_opcode_name_table[opcode];
- } else if (getGameType() == GType_SIMON2 && getFeatures() & GF_TALKIE) {
- st = s = simon2talkie_opcode_name_table[opcode];
- } else if (getFeatures() & GF_TALKIE) {
- st = s = simon1talkie_opcode_name_table[opcode];
- } else if (getGameType() == GType_SIMON2) {
- st = s = simon2dos_opcode_name_table[opcode];
- } else {
- st = s = simon1dos_opcode_name_table[opcode];
- }
- if (s == NULL) {
- //error("INVALID OPCODE %d", opcode);
- return NULL;
- }
- while (*st != '|')
- st++;
- fprintf(_dumpFile, "%s ", st + 1);
-
- for (;;) {
- switch (*s++) {
- case 'x':
- fprintf(_dumpFile, "\n");
- return NULL;
- case '|':
- fprintf(_dumpFile, "\n");
- return p;
- case 'B':{
- byte b = *p++;
- if (b == 255)
- fprintf(_dumpFile, "[%d] ", *p++);
- else
- fprintf(_dumpFile, "%d ", b);
- break;
- }
- case 'V':{
- byte b = *p++;
- if (b == 255)
- fprintf(_dumpFile, "[[%d]] ", *p++);
- else
- fprintf(_dumpFile, "[%d] ", b);
- break;
- }
-
- case 'W':{
- int n = (int16)((p[0] << 8) | p[1]);
- p += 2;
- if (n >= 30000 && n < 30512)
- fprintf(_dumpFile, "[%d] ", n - 30000);
- else
- fprintf(_dumpFile, "%d ", n);
- break;
- }
-
- case 'w':{
- int n = (int16)((p[0] << 8) | p[1]);
- p += 2;
- fprintf(_dumpFile, "%d ", n);
- break;
- }
-
- case 'I':{
- int n = (int16)((p[0] << 8) | p[1]);;
- p += 2;
- if (n == -1)
- fprintf(_dumpFile, "ITEM_M1 ");
- else if (n == -3)
- fprintf(_dumpFile, "ITEM_M3 ");
- else if (n == -5)
- fprintf(_dumpFile, "ITEM_1 ");
- else if (n == -7)
- fprintf(_dumpFile, "ITEM_0 ");
- else if (n == -9)
- fprintf(_dumpFile, "ITEM_A_PARENT ");
- else
- fprintf(_dumpFile, "<%d> ", n);
- break;
- }
-
- case 'J':{
- fprintf(_dumpFile, "-> ");
- }
- break;
-
- case 'T':{
- uint n = ((p[0] << 8) | p[1]);
- p += 2;
- if (n != 0xFFFF)
- fprintf(_dumpFile, "\"%s\"(%d) ", getStringPtrByID(n), n);
- else
- fprintf(_dumpFile, "NULL_STRING ");
- }
- break;
- }
- }
-}
-
-void SimonEngine::dumpSubroutineLine(SubroutineLine *sl, Subroutine *sub) {
- const byte *p;
-
- printf("; ****\n");
-
- p = (byte *)sl + SUBROUTINE_LINE_SMALL_SIZE;
- if (sub->id == 0) {
- fprintf(_dumpFile, "; verb=%d, noun1=%d, noun2=%d\n", sl->verb, sl->noun1, sl->noun2);
- p = (byte *)sl + SUBROUTINE_LINE_BIG_SIZE;
- }
-
- for (;;) {
- p = dumpOpcode(p);
- if (p == NULL)
- break;
- }
-}
-
-void SimonEngine::dumpSubroutine(Subroutine *sub) {
- SubroutineLine *sl;
-
- fprintf(_dumpFile, "\n******************************************\n;Subroutine, ID=%d:\nSUB_%d:\n", sub->id, sub->id);
- sl = (SubroutineLine *)((byte *)sub + sub->first);
- for (; (byte *)sl != (byte *)sub; sl = (SubroutineLine *)((byte *)sub + sl->next)) {
- dumpSubroutineLine(sl, sub);
- }
- fprintf(_dumpFile, "\nEND ******************************************\n");
- fflush(_dumpFile);
-}
-
-void SimonEngine::dumpSubroutines() {
- Subroutine *sub = _subroutineList;
- for (; sub; sub = sub->next) {
- dumpSubroutine(sub);
- }
-}
-
-void SimonEngine::dump_video_script(const byte *src, bool one_opcode_only) {
- uint opcode;
- const char *str, *strn;
-
- do {
- if (getGameType() == GType_SIMON1) {
- opcode = READ_BE_UINT16(src);
- src += 2;
- } else {
- opcode = *src++;
- }
-
- if (opcode >= NUM_VIDEO_OP_CODES) {
- error("Invalid opcode %x\n", opcode);
- return;
- }
-
- if (getGameType() == GType_FF) {
- strn = str = feeblefiles_video_opcode_name_table[opcode];
- } else if (getGameType() == GType_SIMON2) {
- strn = str = simon2_video_opcode_name_table[opcode];
- } else {
- strn = str = simon1_video_opcode_name_table[opcode];
- }
-
- while (*strn != '|')
- strn++;
- fprintf(_dumpFile, "%.2d: %s ", opcode, strn + 1);
-
- int end = (getGameType() == GType_FF) ? 9999 : 999;
- for (; *str != '|'; str++) {
- switch (*str) {
- case 'x':
- fprintf(_dumpFile, "\n");
- return;
- case 'b':
- fprintf(_dumpFile, "%d ", *src++);
- break;
- case 'd': {
- int16 tmp = (int16)readUint16Wrapper(src);
- if (tmp < 0) tmp = vcReadVar(-tmp);
- fprintf(_dumpFile, "%d ", tmp);
- src += 2;
- break;
- }
- case 'v':
- fprintf(_dumpFile, "[%d] ", readUint16Wrapper(src));
- src += 2;
- break;
- case 'i':
- fprintf(_dumpFile, "%d ", (int16)readUint16Wrapper(src));
- src += 2;
- break;
- case 'q':
- while (readUint16Wrapper(src) != end) {
- fprintf(_dumpFile, "(%d,%d) ", readUint16Wrapper(src),
- readUint16Wrapper(src + 2));
- src += 4;
- }
- src++;
- break;
- default:
- error("Invalid fmt string '%c' in decompile VGA", *str);
- }
- }
-
- fprintf(_dumpFile, "\n");
- } while (!one_opcode_only);
-}
-
-void SimonEngine::dump_vga_file(const byte *vga) {
- {
- const byte *pp;
- const byte *p;
- int count;
-
- pp = vga;
- p = pp + READ_BE_UINT16(&((const VgaFileHeader_Simon *) pp)->hdr2_start);
- count = READ_BE_UINT16(&((const VgaFileHeader2_Simon *) p)->animationCount);
- p = pp + READ_BE_UINT16(&((const VgaFileHeader2_Simon *) p)->animationTable);
- while (--count >= 0) {
- int id = READ_BE_UINT16(&((const AnimationHeader_Simon *) p)->id);
-
- dump_vga_script_always(vga + READ_BE_UINT16(&((const AnimationHeader_Simon *) p)->scriptOffs), id / 100, id);
- p += sizeof(AnimationHeader_Simon);
- }
- }
-
- {
- const byte *bb, *b;
- int c;
-
- bb = vga;
- b = bb + READ_BE_UINT16(&((const VgaFileHeader_Simon *) bb)->hdr2_start);
- c = READ_BE_UINT16(&((const VgaFileHeader2_Simon *) b)->imageCount);
- b = bb + READ_BE_UINT16(&((const VgaFileHeader2_Simon *) b)->imageTable);
-
- while (--c >= 0) {
- int id = READ_BE_UINT16(&((const ImageHeader_Simon *) b)->id);
-
- dump_vga_script_always(vga + READ_BE_UINT16(&((const ImageHeader_Simon *) b)->scriptOffs), id / 100, id);
- b += sizeof(ImageHeader_Simon);
- }
- }
-}
-
-static const byte bmp_hdr[] = {
- 0x42, 0x4D,
- 0x9E, 0x14, 0x00, 0x00, /* offset 2, file size */
- 0x00, 0x00, 0x00, 0x00,
- 0x36, 0x04, 0x00, 0x00,
- 0x28, 0x00, 0x00, 0x00,
-
- 0x3C, 0x00, 0x00, 0x00, /* image width */
- 0x46, 0x00, 0x00, 0x00, /* image height */
- 0x01, 0x00, 0x08, 0x00,
- 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00,
-
- 0x00, 0x01, 0x00, 0x00,
- 0x00, 0x01, 0x00, 0x00,
-};
-
-void dump_bmp(const char *filename, int w, int h, const byte *bytes, const uint32 *palette) {
- FILE *out = fopen(filename, "wb");
- byte my_hdr[sizeof(bmp_hdr)];
- int i;
-
- if (out == NULL) {
- printf("DUMP ERROR\n");
- return;
- }
-
- memcpy(my_hdr, bmp_hdr, sizeof(bmp_hdr));
-
- *(uint32 *)(my_hdr + 2) = w * h + 1024 + sizeof(bmp_hdr);
- *(uint32 *)(my_hdr + 18) = w;
- *(uint32 *)(my_hdr + 22) = h;
-
-
- fwrite(my_hdr, 1, sizeof(my_hdr), out);
-
- for (i = 0; i != 256; i++, palette++) {
- byte color[4];
- color[0] = (byte)(*palette >> 16);
- color[1] = (byte)(*palette >> 8);
- color[2] = (byte)(*palette);
- color[3] = 0;
- fwrite(color, 1, 4, out);
- }
-
- while (--h >= 0) {
- fwrite(bytes + h * ((w + 3) & ~3), ((w + 3) & ~3), 1, out);
- }
-
- fclose(out);
-}
-
-static void dump_bitmap(const char *filename, const byte *offs, int w, int h, int flags, const byte *palette,
- byte base)
-{
- /* allocate */
- byte *b = (byte *)malloc(w * h);
- int i, j;
-
- VC10_state state;
-
- state.depack_cont = -0x80;
- state.depack_src = offs;
- state.dh = h;
- state.y_skip = 0;
-
- for (i = 0; i != w; i += 2) {
- byte *c = vc10_depack_column(&state);
- for (j = 0; j != h; j++) {
- byte pix = c[j];
- b[j * w + i] = (pix >> 4) | base;
- b[j * w + i + 1] = (pix & 0xF) | base;
-
- }
- }
-
- dump_bmp(filename, w, h, b, (const uint32 *)palette);
- free(b);
-}
-
-void SimonEngine::dump_single_bitmap(int file, int image, const byte *offs, int w, int h, byte base) {
- char buf[40];
-#if !defined(PALMOS_MODE) && !defined(__DC__) && !defined(__PSP__) && !defined(__PLAYSTATION2__)
- struct stat statbuf;
-#endif
-
-#if defined(MACOS_CARBON)
- sprintf(buf, ":dumps:File%d_Image%d.bmp", file, image);
-#else
- sprintf(buf, "dumps/File%d_Image%d.bmp", file, image);
-#endif
-
-#if !defined(PALMOS_MODE) && !defined(__DC__) && !defined(__PSP__) && !defined(__PLAYSTATION2__)
- if (stat(buf, &statbuf) == 0)
- return;
-#endif
-
- dump_bitmap(buf, offs, w, h, 0, _palette, base);
-}
-
-void pal_load(byte *pal, const byte *vga1, int a, int b) {
- uint num = (a == 0) ? 0x20 : 0x10;
- byte *palptr;
- const byte *src;
-
- palptr = (byte *)&pal[a << 4];
- src = vga1 + 6 + b * 96;
-
- do {
- palptr[0] = src[0] << 2;
- palptr[1] = src[1] << 2;
- palptr[2] = src[2] << 2;
- palptr[3] = 0;
-
- palptr += 4;
- src += 3;
- } while (--num);
-}
-
-void SimonEngine::dump_vga_bitmaps(const byte *vga, byte *vga1, int res) {
-
- int i;
- uint32 offs;
- const byte *p2;
- byte pal[768];
-
- {
- memset(pal, 0, sizeof(pal));
- pal_load(pal, vga1, 2, 0);
- pal_load(pal, vga1, 3, 1);
- pal_load(pal, vga1, 4, 2);
- pal_load(pal, vga1, 5, 3);
- }
-
- int width, height, flags;
-
- i = 538;
-
- for (i = 1; ; i++) {
- p2 = vga + i * 8;
- offs = READ_BE_UINT32(p2);
-
- /* try to detect end of images.
- * assume the end when offset >= 200kb */
- if (offs >= 200*1024)
- return;
-
- width = READ_BE_UINT16(p2 + 6);
- height = p2[5];
- flags = p2[4];
-
- fprintf(_dumpFile, "Image %d. Width=%d, Height=%d, Flags=0x%X\n", i, width, height, flags);
- fflush(_dumpFile);
-
- /* dump bitmap */
- {
- char buf[40];
-#if defined(MACOS_CARBON)
- sprintf(buf, ":dumps:Res%d_Image%d.bmp", res, i);
-#else
- sprintf(buf, "dumps/Res%d_Image%d.bmp", res, i);
-#endif
-
- dump_bitmap(buf, vga + offs, width, height, flags, pal, 0);
- }
- }
-}
-
-void SimonEngine::dump_vga_script_always(const byte *ptr, uint res, uint sprite_id) {
- fprintf(_dumpFile, "; address=%x, vgafile=%d vgasprite=%d\n",
- ptr - _vgaBufferPointers[res].vgaFile1, res, sprite_id);
- dump_video_script(ptr, false);
- fprintf(_dumpFile, "; end\n");
-}
-
-void SimonEngine::dump_vga_script(const byte *ptr, uint res, uint sprite_id) {
- dump_vga_script_always(ptr, res, sprite_id);
-}
-
-} // End of namespace Simon
generated by cgit v1.2.3 (git 2.25.1) at 2026-01-12 01:43:25 +0000