123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357 |
- /*
- lynx.c - Atari Lynx support for uCON64
- Copyright (c) 1999 - 2001 NoisyB <noisyb@gmx.net>
- Copyright (c) 2002 - 2003 dbjh
- 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., 675 Mass Ave, Cambridge, MA 02139, USA.
- */
- #ifdef HAVE_CONFIG_H
- #include "config.h"
- #endif
- #include <fcntl.h>
- #include <stdio.h>
- #include <stdlib.h>
- #include <string.h>
- #ifdef HAVE_UNISTD_H
- #include <unistd.h>
- #endif
- #include "misc/bswap.h"
- #include "misc/file.h"
- #include "misc/misc.h"
- #ifdef USE_ZLIB
- #include "misc/archive.h"
- #endif
- #include "misc/getopt2.h" // st_getopt2_t
- #include "ucon64.h"
- #include "ucon64_misc.h"
- #include "lynx.h"
- const st_getopt2_t lynx_usage[] =
- {
- {
- NULL, 0, 0, 0,
- NULL, "Handy (prototype)/Lynx/Lynx II"/*"1987 Epyx/1989 Atari/1991 Atari"*/,
- NULL
- },
- {
- "lynx", 0, 0, UCON64_LYNX,
- NULL, "force recognition",
- &ucon64_wf[WF_OBJ_LYNX_SWITCH]
- },
- {
- "lyx", 0, 0, UCON64_LYX,
- NULL, "convert to LYX/RAW (strip 64 Bytes LNX header)",
- &ucon64_wf[WF_OBJ_LYNX_DEFAULT]
- },
- {
- "lnx", 0, 0, UCON64_LNX,
- NULL, "convert to LNX (uses default values for the header);\n"
- "adjust the LNX header with the following options",
- &ucon64_wf[WF_OBJ_LYNX_DEFAULT]
- },
- {
- "n", 1, 0, UCON64_N,
- "NEW_NAME", "change internal ROM name to NEW_NAME (LNX only)",
- &ucon64_wf[WF_OBJ_ALL_DEFAULT]
- },
- {
- "nrot", 0, 0, UCON64_NROT,
- NULL, "set no rotation (LNX only)",
- &ucon64_wf[WF_OBJ_LYNX_DEFAULT]
- },
- {
- "rotl", 0, 0, UCON64_ROTL,
- NULL, "set rotation left (LNX only)",
- &ucon64_wf[WF_OBJ_LYNX_DEFAULT]
- },
- {
- "rotr", 0, 0, UCON64_ROTR,
- NULL, "set rotation right (LNX only)",
- &ucon64_wf[WF_OBJ_LYNX_DEFAULT]
- },
- {
- "b0", 1, 0, UCON64_B0,
- "N", "change Bank0 kBytes size to N={0,64,128,256,512} (LNX only)",
- &ucon64_wf[WF_OBJ_LYNX_DEFAULT]
- },
- {
- "b1", 1, 0, UCON64_B1,
- "N", "change Bank1 kBytes size to N={0,64,128,256,512} (LNX only)",
- &ucon64_wf[WF_OBJ_LYNX_DEFAULT]
- },
- {NULL, 0, 0, 0, NULL, NULL, NULL}
- };
- const char *lynx_lyx_desc = "convert to LYX/RAW (strip 64 Bytes LNX header)";
- //static const char *lnx_usage[] = "LNX header";
- #define LNX_HEADER_START 0
- #define LNX_HEADER_LEN (sizeof (st_lnx_header_t))
- st_lnx_header_t lnx_header;
- int
- lynx_lyx (st_rominfo_t *rominfo)
- {
- char dest_name[FILENAME_MAX];
- if (!rominfo->buheader_len)
- {
- fprintf (stderr, "ERROR: This is no LNX file\n\n");
- return -1;
- }
- strcpy (dest_name, ucon64.rom);
- set_suffix (dest_name, ".lyx");
- ucon64_file_handler (dest_name, NULL, 0);
- fcopy (ucon64.rom, rominfo->buheader_len, ucon64.file_size, dest_name, "wb");
- printf (ucon64_msg[WROTE], dest_name);
- return 0;
- }
- int
- lynx_lnx (st_rominfo_t *rominfo)
- {
- st_lnx_header_t header;
- char dest_name[FILENAME_MAX];
- int size = ucon64.file_size;
- if (rominfo->buheader_len != 0)
- {
- fprintf (stderr, "ERROR: This seems to already be an LNX file\n\n");
- return -1;
- }
- header.page_size_bank0 = size > 4 * MBIT ? 4 * MBIT / 256 : size / 256;
- header.page_size_bank1 = size > 4 * MBIT ? (size - (4 * MBIT)) / 256 : 0;
- #ifdef WORDS_BIGENDIAN
- header.page_size_bank0 = bswap_16 (header.page_size_bank0);
- header.page_size_bank1 = bswap_16 (header.page_size_bank1);
- #endif
- memset (header.cartname, 0, sizeof (header.cartname));
- memset (header.manufname, 0, sizeof (header.manufname));
- memset (header.spare, 0, sizeof (header.spare));
- #ifdef WORDS_BIGENDIAN
- header.version = bswap_16 (1);
- #else
- header.version = 1;
- #endif
- memcpy (header.magic, "LYNX", 4);
- header.rotation = 0;
- strncpy (header.cartname, ucon64.rom, sizeof (header.cartname));
- strcpy (header.manufname, "Atari");
- strcpy (dest_name, ucon64.rom);
- set_suffix (dest_name, ".lnx");
- ucon64_file_handler (dest_name, NULL, 0);
- ucon64_fwrite (&header, 0, sizeof (st_lnx_header_t), dest_name, "wb");
- fcopy (ucon64.rom, 0, ucon64.file_size, dest_name, "ab");
- printf (ucon64_msg[WROTE], dest_name);
- return 0;
- }
- static int
- lynx_rot (st_rominfo_t *rominfo, int rotation)
- {
- st_lnx_header_t header;
- char dest_name[FILENAME_MAX];
- if (!rominfo->buheader_len)
- {
- fprintf (stderr, "ERROR: This is no LNX file\n\n");
- return -1;
- }
- ucon64_fread (&header, 0, sizeof (st_lnx_header_t), ucon64.rom);
- header.rotation = rotation; // header.rotation is an 8-bit field
- strcpy (dest_name, ucon64.rom);
- ucon64_file_handler (dest_name, NULL, 0);
- fcopy (ucon64.rom, 0, ucon64.file_size, dest_name, "wb");
- ucon64_fwrite (&header, 0, sizeof (st_lnx_header_t), dest_name, "r+b");
- printf (ucon64_msg[WROTE], dest_name);
- return 0;
- }
- int
- lynx_nrot (st_rominfo_t *rominfo)
- {
- return lynx_rot (rominfo, 0); // no rotation
- }
- int
- lynx_rotl (st_rominfo_t *rominfo)
- {
- return lynx_rot (rominfo, 1); // rotate left
- }
- int
- lynx_rotr (st_rominfo_t *rominfo)
- {
- return lynx_rot (rominfo, 2); // rotate right
- }
- int
- lynx_n (st_rominfo_t *rominfo, const char *name)
- {
- st_lnx_header_t header;
- char dest_name[FILENAME_MAX];
- if (!rominfo->buheader_len)
- {
- fprintf (stderr, "ERROR: This is no LNX file\n\n");
- return -1;
- }
- ucon64_fread (&header, 0, sizeof (st_lnx_header_t), ucon64.rom);
- memset (header.cartname, 0, sizeof (header.cartname));
- strncpy (header.cartname, name, sizeof (header.cartname));
- strcpy (dest_name, ucon64.rom);
- ucon64_file_handler (dest_name, NULL, 0);
- fcopy (ucon64.rom, 0, ucon64.file_size, dest_name, "wb");
- ucon64_fwrite (&header, 0, sizeof (st_lnx_header_t), dest_name, "r+b");
- printf (ucon64_msg[WROTE], dest_name);
- return 0;
- }
- static int
- lynx_b (st_rominfo_t *rominfo, int bank, const char *value)
- {
- st_lnx_header_t header;
- short int *bankvar;
- char dest_name[FILENAME_MAX];
- if (!rominfo->buheader_len)
- {
- fprintf (stderr, "ERROR: This is no LNX file\n\n");
- return -1;
- }
- ucon64_fread (&header, 0, sizeof (st_lnx_header_t), ucon64.rom);
- bankvar = (bank == 0 ? &header.page_size_bank0 : &header.page_size_bank1);
- if ((atol (value) % 64) != 0 || (atol (value) > 512))
- *bankvar = 0;
- else
- #ifdef WORDS_BIGENDIAN
- *bankvar = bswap_16 (atol (value) * 4);
- #else
- *bankvar = atol (value) * 4;
- #endif
- strcpy (dest_name, ucon64.rom);
- ucon64_file_handler (dest_name, NULL, 0);
- fcopy (ucon64.rom, 0, ucon64.file_size, dest_name, "wb");
- ucon64_fwrite (&header, 0, sizeof (st_lnx_header_t), dest_name, "r+b");
- printf (ucon64_msg[WROTE], dest_name);
- return 0;
- }
- int
- lynx_b0 (st_rominfo_t *rominfo, const char *value)
- {
- return lynx_b (rominfo, 0, value);
- }
- int
- lynx_b1 (st_rominfo_t *rominfo, const char *value)
- {
- return lynx_b (rominfo, 1, value);
- }
- int
- lynx_init (st_rominfo_t *rominfo)
- {
- int result = -1;
- rominfo->console_usage = lynx_usage[0].help;
- rominfo->copier_usage = unknown_usage[0].help;
- ucon64_fread (&lnx_header, 0, LNX_HEADER_LEN, ucon64.rom);
- if (!strncmp (lnx_header.magic, "LYNX", 4))
- result = 0;
- else
- result = -1;
- if (ucon64.console == UCON64_LYNX)
- result = 0;
- if (!strncmp (lnx_header.magic, "LYNX", 4))
- {
- rominfo->buheader_len = UCON64_ISSET (ucon64.buheader_len) ?
- ucon64.buheader_len : (int) LNX_HEADER_LEN;
- if (UCON64_ISSET (ucon64.buheader_len) && !ucon64.buheader_len)
- return ucon64.console == UCON64_LYNX ? 0 : result;
- ucon64_fread (&lnx_header, 0, LNX_HEADER_LEN, ucon64.rom);
- rominfo->buheader = &lnx_header;
- // internal ROM name
- strcpy (rominfo->name, lnx_header.cartname);
- // ROM maker
- rominfo->maker = lnx_header.manufname;
- // misc stuff
- sprintf (rominfo->misc,
- "Internal Size: Bank0 %hd Bytes (%.4f Mb)\n"
- " Bank1 %hd Bytes (%.4f Mb)\n"
- "Version: %hd\n"
- "Rotation: %s",
- #ifdef WORDS_BIGENDIAN
- bswap_16 (lnx_header.page_size_bank0) * 256,
- TOMBIT_F (bswap_16 (lnx_header.page_size_bank0) * 256),
- bswap_16 (lnx_header.page_size_bank1) * 256,
- TOMBIT_F (bswap_16 (lnx_header.page_size_bank1) * 256),
- bswap_16 (lnx_header.version),
- #else
- lnx_header.page_size_bank0 * 256,
- TOMBIT_F (lnx_header.page_size_bank0 * 256),
- lnx_header.page_size_bank1 * 256,
- TOMBIT_F (lnx_header.page_size_bank1 * 256),
- lnx_header.version,
- #endif
- (!lnx_header.rotation) ? "No" : ((lnx_header.rotation == 1) ? "Left" : "Right"));
- }
- return result;
- }
|