2 * Support for a few cart mappers.
4 * (c) Copyright 2008-2009, Grazvydas "notaz" Ignotas
5 * Free for non-commercial use.
9 #include "../pico_int.h"
10 #include "../memory.h"
13 /* Common *-in-1 pirate mapper.
14 * Switches banks based on addr lines when /TIME is set.
17 static unsigned int carthw_Xin1_baddr = 0;
19 static void carthw_Xin1_do(u32 a, int mask, int shift)
23 carthw_Xin1_baddr = a;
26 len = Pico.romsize - a;
28 elprintf(EL_ANOMALY|EL_STATUS, "X-in-1: missing bank @ %06x", a);
32 len = (len + M68K_BANK_MASK) & ~M68K_BANK_MASK;
33 cpu68k_map_set(m68k_read8_map, 0x000000, len - 1, Pico.rom + a, 0);
34 cpu68k_map_set(m68k_read16_map, 0x000000, len - 1, Pico.rom + a, 0);
37 static carthw_state_chunk carthw_Xin1_state[] =
39 { CHUNK_CARTHW, sizeof(carthw_Xin1_baddr), &carthw_Xin1_baddr },
43 // TODO: test a0, reads, w16
44 static void carthw_Xin1_write8(u32 a, u32 d)
46 if ((a & 0xffff00) != 0xa13000) {
51 carthw_Xin1_do(a, 0x3f, 16);
54 static void carthw_Xin1_mem_setup(void)
56 cpu68k_map_set(m68k_write8_map, 0xa10000, 0xa1ffff, carthw_Xin1_write8, 1);
59 static void carthw_Xin1_reset(void)
61 carthw_Xin1_write8(0xa13000, 0);
64 static void carthw_Xin1_statef(void)
66 carthw_Xin1_write8(carthw_Xin1_baddr, 0);
69 void carthw_Xin1_startup(void)
71 elprintf(EL_STATUS, "X-in-1 mapper startup");
73 PicoCartMemSetup = carthw_Xin1_mem_setup;
74 PicoResetHook = carthw_Xin1_reset;
75 PicoLoadStateHook = carthw_Xin1_statef;
76 carthw_chunks = carthw_Xin1_state;
80 /* Realtec, based on TascoDLX doc
81 * http://www.sharemation.com/TascoDLX/REALTEC%20Cart%20Mapper%20-%20description%20v1.txt
83 static int realtec_bank = 0x80000000, realtec_size = 0x80000000;
85 static void carthw_realtec_write8(u32 a, u32 d)
87 int i, bank_old = realtec_bank, size_old = realtec_size;
91 realtec_bank &= 0x0e0000;
92 realtec_bank |= 0x300000 & (d << 19);
93 if (realtec_bank != bank_old)
94 elprintf(EL_ANOMALY, "write [%06x] %02x @ %06x", a, d, SekPc);
96 else if (a == 0x402000)
98 realtec_size = (d << 17) & 0x3e0000;
99 if (realtec_size != size_old)
100 elprintf(EL_ANOMALY, "write [%06x] %02x @ %06x", a, d, SekPc);
102 else if (a == 0x404000)
104 realtec_bank &= 0x300000;
105 realtec_bank |= 0x0e0000 & (d << 17);
106 if (realtec_bank != bank_old)
107 elprintf(EL_ANOMALY, "write [%06x] %02x @ %06x", a, d, SekPc);
110 elprintf(EL_ANOMALY, "realtec: unexpected write [%06x] %02x @ %06x", a, d, SekPc);
112 if (realtec_bank >= 0 && realtec_size >= 0 &&
113 (realtec_bank != bank_old || realtec_size != size_old))
115 elprintf(EL_ANOMALY, "realtec: new bank %06x, size %06x", realtec_bank, realtec_size, SekPc);
116 if (realtec_size > Pico.romsize - realtec_bank)
118 elprintf(EL_ANOMALY, "realtec: bank too large / out of range?");
122 for (i = 0; i < 0x400000; i += realtec_size) {
123 cpu68k_map_set(m68k_read8_map, i, realtec_size - 1, Pico.rom + realtec_bank, 0);
124 cpu68k_map_set(m68k_read16_map, i, realtec_size - 1, Pico.rom + realtec_bank, 0);
129 static void carthw_realtec_reset(void)
134 for (i = 0; i < 0x400000; i += M68K_BANK_SIZE) {
135 cpu68k_map_set(m68k_read8_map, i, i + M68K_BANK_SIZE - 1, Pico.rom + Pico.romsize, 0);
136 cpu68k_map_set(m68k_read16_map, i, i + M68K_BANK_SIZE - 1, Pico.rom + Pico.romsize, 0);
138 cpu68k_map_set(m68k_write8_map, 0x400000, 0x400000 + M68K_BANK_SIZE - 1, carthw_realtec_write8, 1);
139 realtec_bank = realtec_size = 0x80000000;
142 void carthw_realtec_startup(void)
147 elprintf(EL_STATUS, "Realtec mapper startup");
149 // allocate additional bank for boot code
150 // (we know those ROMs have aligned size)
151 tmp = realloc(Pico.rom, Pico.romsize + M68K_BANK_SIZE);
154 elprintf(EL_STATUS, "OOM");
159 // create bank for boot code
160 for (i = 0; i < M68K_BANK_SIZE; i += 0x2000)
161 memcpy(Pico.rom + Pico.romsize + i, Pico.rom + Pico.romsize - 0x2000, 0x2000);
163 PicoResetHook = carthw_realtec_reset;
166 /* Radica mapper, based on DevSter's info
167 * http://devster.monkeeh.com/sega/radica/
168 * XXX: mostly the same as X-in-1, merge?
170 static u32 carthw_radica_read16(u32 a)
172 if ((a & 0xffff00) != 0xa13000)
173 return PicoRead16_io(a);
175 carthw_Xin1_do(a, 0x7e, 15);
180 static void carthw_radica_mem_setup(void)
182 cpu68k_map_set(m68k_read16_map, 0xa10000, 0xa1ffff, carthw_radica_read16, 1);
185 static void carthw_radica_statef(void)
187 carthw_radica_read16(carthw_Xin1_baddr);
190 static void carthw_radica_reset(void)
192 carthw_radica_read16(0xa13000);
195 void carthw_radica_startup(void)
197 elprintf(EL_STATUS, "Radica mapper startup");
199 PicoCartMemSetup = carthw_radica_mem_setup;
200 PicoResetHook = carthw_radica_reset;
201 PicoLoadStateHook = carthw_radica_statef;
202 carthw_chunks = carthw_Xin1_state;