X-Git-Url: https://notaz.gp2x.de/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=pico%2Fcarthw%2Fcarthw.c;fp=pico%2Fcarthw%2Fcarthw.c;h=19bd0314c07292e3db81c33640ec4ff9de4a937f;hb=1cfc5cc4ce06642b9bc45ca3b9d32793718e9455;hp=0000000000000000000000000000000000000000;hpb=d158df697da66bcda57307e35fc77929cfa5053c;p=picodrive.git diff --git a/pico/carthw/carthw.c b/pico/carthw/carthw.c new file mode 100644 index 0000000..19bd031 --- /dev/null +++ b/pico/carthw/carthw.c @@ -0,0 +1,225 @@ +/* + * 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; +} + +