diff options
Diffstat (limited to 'engines/glk/magnetic/main.cpp')
| -rw-r--r-- | engines/glk/magnetic/main.cpp | 176 |
1 files changed, 176 insertions, 0 deletions
diff --git a/engines/glk/magnetic/main.cpp b/engines/glk/magnetic/main.cpp new file mode 100644 index 0000000000..1f0128f36c --- /dev/null +++ b/engines/glk/magnetic/main.cpp @@ -0,0 +1,176 @@ +/* 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. + * + */ + +#include "glk/magnetic/defs.h" +#include "common/file.h" +#include "common/savefile.h" +#include "common/system.h" + +namespace Glk { +namespace Magnetic { + +#define WIDTH 78 + +static type8 buffer[80], xpos = 0, bufpos = 0, log_on = 0, ms_gfx_enabled, filename[256]; +static Common::DumpFile *log1 = 0, *log2 = 0; + +type8 ms_load_file(const char *name, type8 *ptr, type16 size) { + assert(name); + Common::InSaveFile *file = g_system->getSavefileManager()->openForLoading(name); + if (!file) + return 1; + + if (file->read(ptr, size) != size) { + delete file; + return 1; + } + + delete file; + return 0; +} + +type8 ms_save_file(const char *name, type8 *ptr, type16 size) { + assert(name); + Common::OutSaveFile *file = g_system->getSavefileManager()->openForSaving(name); + if (!file) + return 1; + + if (file->write(ptr, size) != size) { + delete file; + return 1; + } + + file->finalize(); + delete file; + return 0; +} + +void script_write(type8 c) { + if (log_on == 2) + log1->writeByte(c); +} + +void transcript_write(type8 c) { + if (log2) + log2->writeByte(c); +} + +void ms_fatal(const char *txt) { + error("Fatal error: %s", txt); +} + +#if 0 +main(int argc, char **argv) { + type8 running, i, *gamename = 0, *gfxname = 0, *hintname = 0; + type32 dlimit, slimit; + + if (sizeof(type8) != 1 || sizeof(type16) != 2 || sizeof(type32) != 4) { + fprintf(stderr, + "You have incorrect typesizes, please edit the typedefs and recompile\n" + "or proceed on your own risk...\n"); + exit(1); + } + dlimit = slimit = 0xffffffff; + for (i = 1; i < argc; i++) { + if (argv[i][0] == '-') { + switch (tolower(argv[i][1])) { + case 'd': + if (strlen(argv[i]) > 2) + dlimit = atoi(&argv[i][2]); + else + dlimit = 0; + break; + case 's': + if (strlen(argv[i]) > 2) + slimit = atoi(&argv[i][2]); + else + slimit = 655360; + break; + case 't': + if (!(log2 = fopen(&argv[i][2], "w"))) + printf("Failed to open \"%s\" for writing.\n", &argv[i][2]); + break; + case 'r': + if (log1 = fopen(&argv[i][2], "r")) + log_on = 1; + else + printf("Failed to open \"%s\" for reading.\n", &argv[i][2]); + break; + case 'w': + if (log1 = fopen(&argv[i][2], "w")) + log_on = 2; + else + printf("Failed to open \"%s\" for writing.\n", &argv[i][2]); + break; + default: + printf("Unknown option -%c, ignoring.\n", argv[i][1]); + break; + } + } else if (!gamename) + gamename = argv[i]; + else if (!gfxname) + gfxname = argv[i]; + else if (!hintname) + hintname = argv[i]; + } + if (!gamename) { + printf("Magnetic 2.3 - a Magnetic Scrolls interpreter\n\n"); + printf("Usage: %s [options] game [gfxfile] [hintfile]\n\n" + "Where the options are:\n" + " -dn activate register dump (after n instructions)\n" + " -rname read script file\n" + " -sn safety mode, exits automatically (after n instructions)\n" + " -tname write transcript file\n" + " -wname write script file\n\n" + "The interpreter commands are:\n" + " #undo undo - don't use it near are_you_sure prompts\n" + " #logoff turn off script writing\n\n", argv[0]); + exit(1); + } + + if (!(ms_gfx_enabled = ms_init(gamename, gfxname, hintname, 0))) { + printf("Couldn't start up game \"%s\".\n", gamename); + exit(1); + } + ms_gfx_enabled--; + running = 1; + while ((ms_count() < slimit) && running) { + if (ms_count() >= dlimit) + ms_status(); + running = ms_rungame(); + } + if (ms_count() == slimit) { + printf("\n\nSafety limit (%d) reached.\n", slimit); + ms_status(); + } + ms_freemem(); + if (log_on) + fclose(log1); + if (log2) + fclose(log2); + printf("\nExiting.\n"); + return 0; +} +#endif + +} // End of namespace Magnetic +} // End of namespace Glk |