+++ /dev/null
-/*
- * Support for a few cart mappers.
- *
- * (c) Copyright 2008, Grazvydas "notaz" Ignotas
- * Free for non-commercial use.
- *
- *
- * I should better do some pointer stuff here. But as none of these bankswitch
- * while the game runs, memcpy will suffice.
- */
-
-#include "../pico_int.h"
-
-
-/* 12-in-1 and 4-in-1. Assuming >= 2MB ROMs here. */
-static unsigned int carthw_12in1_baddr = 0;
-
-static carthw_state_chunk carthw_12in1_state[] =
-{
- { CHUNK_CARTHW, sizeof(carthw_12in1_baddr), &carthw_12in1_baddr },
- { 0, 0, NULL }
-};
-
-static unsigned int carthw_12in1_read16(unsigned int a, int realsize)
-{
- // ??
- elprintf(EL_UIO, "12-in-1: read [%06x] @ %06x", a, SekPc);
- return 0;
-}
-
-static void carthw_12in1_write8(unsigned int a, unsigned int d, int realsize)
-{
- int len;
-
- if (a < 0xA13000 || a >= 0xA13040) {
- /* 4-in-1 has Real Deal Boxing, which uses serial eeprom,
- * but I really doubt that pirate cart had it */
- if (a != 0x200001)
- elprintf(EL_ANOMALY, "12-in-1: unexpected write [%06x] %02x @ %06x", a, d, SekPc);
- return;
- }
-
- carthw_12in1_baddr = a;
- a &= 0x3f; a <<= 16;
- len = Pico.romsize - a;
- if (len <= 0) {
- elprintf(EL_ANOMALY|EL_STATUS, "12-in-1: missing bank @ %06x", a);
- return;
- }
-
- memcpy(Pico.rom, Pico.rom + Pico.romsize + a, len);
-}
-
-static void carthw_12in1_reset(void)
-{
- carthw_12in1_write8(0xA13000, 0, 0);
-}
-
-static void carthw_12in1_statef(void)
-{
- carthw_12in1_write8(carthw_12in1_baddr, 0, 0);
-}
-
-void carthw_12in1_startup(void)
-{
- void *tmp;
-
- elprintf(EL_STATUS, "12-in-1 mapper detected");
-
- tmp = realloc(Pico.rom, Pico.romsize * 2);
- if (tmp == NULL)
- {
- elprintf(EL_STATUS, "OOM");
- return;
- }
- Pico.rom = tmp;
- memcpy(Pico.rom + Pico.romsize, Pico.rom, Pico.romsize);
-
- PicoRead16Hook = carthw_12in1_read16;
- PicoWrite8Hook = carthw_12in1_write8;
- PicoResetHook = carthw_12in1_reset;
- PicoLoadStateHook = carthw_12in1_statef;
- carthw_chunks = carthw_12in1_state;
-}
-
-
-/* Realtec, based on TascoDLX doc
- * http://www.sharemation.com/TascoDLX/REALTEC%20Cart%20Mapper%20-%20description%20v1.txt
- */
-static int realtec_bank = 0x80000000, realtec_size = 0x80000000;
-static int realtec_romsize = 0;
-
-static void carthw_realtec_write8(unsigned int a, unsigned int d, int realsize)
-{
- int i, bank_old = realtec_bank, size_old = realtec_size;
-
- if (a == 0x400000)
- {
- realtec_bank &= 0x0e0000;
- realtec_bank |= 0x300000 & (d << 19);
- if (realtec_bank != bank_old)
- elprintf(EL_ANOMALY, "write [%06x] %02x @ %06x", a, d, SekPc);
- }
- else if (a == 0x402000)
- {
- realtec_size = (d << 17) & 0x3e0000;
- if (realtec_size != size_old)
- elprintf(EL_ANOMALY, "write [%06x] %02x @ %06x", a, d, SekPc);
- }
- else if (a == 0x404000)
- {
- realtec_bank &= 0x300000;
- realtec_bank |= 0x0e0000 & (d << 17);
- if (realtec_bank != bank_old)
- elprintf(EL_ANOMALY, "write [%06x] %02x @ %06x", a, d, SekPc);
- }
- else
- elprintf(EL_ANOMALY, "realtec: unexpected write [%06x] %02x @ %06x", a, d, SekPc);
-
- if (realtec_bank >= 0 && realtec_size >= 0 &&
- (realtec_bank != bank_old || realtec_size != size_old))
- {
- elprintf(EL_ANOMALY, "realtec: new bank %06x, size %06x", realtec_bank, realtec_size, SekPc);
- if (realtec_size > realtec_romsize - realtec_bank || realtec_bank >= realtec_romsize)
- {
- elprintf(EL_ANOMALY, "realtec: bank too large / out of range?");
- return;
- }
-
- for (i = 0; i < 0x400000; i += realtec_size)
- memcpy(Pico.rom + i, Pico.rom + 0x400000 + realtec_bank, realtec_size);
- }
-}
-
-static void carthw_realtec_reset(void)
-{
- int i;
- /* map boot code */
- for (i = 0; i < 0x400000; i += 0x2000)
- memcpy(Pico.rom + i, Pico.rom + 0x400000 + realtec_romsize - 0x2000, 0x2000);
- realtec_bank = realtec_size = 0x80000000;
-}
-
-void carthw_realtec_startup(void)
-{
- void *tmp;
-
- elprintf(EL_STATUS, "Realtec mapper detected");
-
- realtec_romsize = Pico.romsize;
- Pico.romsize = 0x400000;
- tmp = realloc(Pico.rom, 0x400000 + realtec_romsize);
- if (tmp == NULL)
- {
- elprintf(EL_STATUS, "OOM");
- return;
- }
- Pico.rom = tmp;
- memcpy(Pico.rom + 0x400000, Pico.rom, realtec_romsize);
-
- PicoWrite8Hook = carthw_realtec_write8;
- PicoResetHook = carthw_realtec_reset;
-}
-
-/* Radica mapper, based on DevSter's info
- * http://devster.monkeeh.com/sega/radica/
- */
-static unsigned int carthw_radica_baddr = 0;
-
-static carthw_state_chunk carthw_radica_state[] =
-{
- { CHUNK_CARTHW, sizeof(carthw_radica_baddr), &carthw_radica_baddr },
- { 0, 0, NULL }
-};
-
-static unsigned int carthw_radica_read16(unsigned int a, int realsize)
-{
- if ((a & 0xffff80) != 0xa13000) {
- elprintf(EL_UIO, "radica: r16 %06x", a);
- return 0;
- }
-
- carthw_radica_baddr = a;
- a = (a & 0x7e) << 15;
- if (a >= Pico.romsize) {
- elprintf(EL_ANOMALY|EL_STATUS, "radica: missing bank @ %06x", a);
- return 0;
- }
- memcpy(Pico.rom, Pico.rom + Pico.romsize + a, Pico.romsize - a);
-
- return 0;
-}
-
-static void carthw_radica_statef(void)
-{
- carthw_radica_read16(carthw_radica_baddr, 0);
-}
-
-static void carthw_radica_reset(void)
-{
- memcpy(Pico.rom, Pico.rom + Pico.romsize, Pico.romsize);
-}
-
-void carthw_radica_startup(void)
-{
- void *tmp;
-
- elprintf(EL_STATUS, "Radica mapper detected");
-
- tmp = realloc(Pico.rom, Pico.romsize * 2);
- if (tmp == NULL)
- {
- elprintf(EL_STATUS, "OOM");
- return;
- }
- Pico.rom = tmp;
- memcpy(Pico.rom + Pico.romsize, Pico.rom, Pico.romsize);
-
- PicoRead16Hook = carthw_radica_read16;
- PicoResetHook = carthw_radica_reset;
- PicoLoadStateHook = carthw_radica_statef;
- carthw_chunks = carthw_radica_state;
-}
-
-