lowercasing filenames, part3
[picodrive.git] / pico / carthw / carthw.c
diff --git a/pico/carthw/carthw.c b/pico/carthw/carthw.c
new file mode 100644 (file)
index 0000000..19bd031
--- /dev/null
@@ -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;
+}
+
+