merge mappers from FCEU-mm
[fceu.git] / boards / onebus.c
index a09b488..3f2b994 100644 (file)
  *\r
  * You should have received a copy of the GNU General Public License\r
  * along with this program; if not, write to the Free Software\r
- * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA\r
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA\r
+ *\r
+ * VR02/VT03 Console and OneBus System\r
  *\r
- * OneBus system\r
  * Street Dance (Dance pad) (Unl)\r
  * 101-in-1 Arcade Action II\r
- * DreamGEAR 75-in-1\r
+ * DreamGEAR 75-in-1, etc.\r
+ *\r
  */\r
 \r
 #include "mapinc.h"\r
 \r
-static uint8 isDance;\r
-static uint8 regs[16],regc[6];\r
-static uint8 IRQCount,IRQLatch,IRQa, IRQReload, pcm_enable = 0, pcm_irq = 0;\r
+// General Purpose Registers\r
+static uint8 cpu410x[16], ppu201x[16], apu40xx[64];\r
+\r
+// IRQ Registers\r
+static uint8 IRQCount, IRQa, IRQReload;\r
+#define IRQLatch cpu410x[0x1]\r
+\r
+// MMC3 Registers\r
+static uint8 inv_hack = 0; // some OneBus Systems have swapped PRG reg commans in MMC3 inplementation,\r
+                           // trying to autodetect unusual behavior, due not to add a new mapper.\r
+#define mmc3cmd  cpu410x[0x5]\r
+#define mirror   cpu410x[0x6]\r
+\r
+// APU Registers\r
+static uint8 pcm_enable = 0, pcm_irq = 0;\r
 static int16 pcm_addr, pcm_size, pcm_latch, pcm_clock = 0xF6;\r
-static writefunc old4011write, old4012write, old4013write, old4015write;\r
-static readfunc old4015read;\r
+\r
+static writefunc defapuwrite[64];\r
+static readfunc defapuread[64];\r
 \r
 static SFORMAT StateRegs[]=\r
 {\r
-  {regc, 6, "REGC"},\r
-  {regs, 16, "REGS"},\r
+  {cpu410x, 16, "REGC"},\r
+  {ppu201x, 16, "REGS"},\r
+  {apu40xx, 64, "REGA"},\r
   {&IRQReload, 1, "IRQR"},\r
   {&IRQCount, 1, "IRQC"},\r
-  {&IRQLatch, 1, "IRQL"},\r
   {&IRQa, 1, "IRQA"},\r
   {&pcm_enable, 1, "PCME"},\r
-  {&pcm_irq, 1, "PCMIRQ"},\r
-  {&pcm_addr, 2, "PCMADDR"},\r
-  {&pcm_size, 2, "PCMSIZE"},\r
-  {&pcm_latch, 2, "PCMLATCH"},\r
-  {&pcm_clock, 2, "PCMCLOCK"},\r
+  {&pcm_irq, 1, "PCMI"},\r
+  {&pcm_addr, 2, "PCMA"},\r
+  {&pcm_size, 2, "PCMS"},\r
+  {&pcm_latch, 2, "PCML"},\r
+  {&pcm_clock, 2, "PCMC"},\r
   {0}\r
 };\r
 \r
-static void Sync(void)\r
+static void PSync(void)\r
 {\r
-  uint16 cswap = (regs[0xf] & 0x80) << 5;\r
-  uint16 pswap = (regs[0xd]&1)?((regs[0xf] & 0x40) << 8):0;\r
-  uint16 pbase = (regs[0]&0xf0)<<4;\r
-  uint16 cbase = (((regs[0]&0x0f)<<8)|(regs[0xc]<<1)|((regs[0xd]&0xf8)>>3))<<3;\r
-  uint16 pmask = 0x3f>>(regs[0xb]&0xf);\r
-\r
-  setchr1(cswap^0x0000,cbase|(regc[0]&(~1)));\r
-  setchr1(cswap^0x0400,cbase|(regc[0]|1));\r
-  setchr1(cswap^0x0800,cbase|(regc[1]&(-1)));\r
-  setchr1(cswap^0x0c00,cbase|(regc[1]|1));\r
-  setchr1(cswap^0x1000,cbase|(regc[2]));\r
-  setchr1(cswap^0x1400,cbase|(regc[3]));\r
-  setchr1(cswap^0x1800,cbase|(regc[4]));\r
-  setchr1(cswap^0x1c00,cbase|(regc[5]));\r
-\r
-  if(regs[0xd]&2)\r
-  {\r
-    setprg8(pswap^0x8000, pbase|(regs[0x7]&pmask)|(regs[0xa]&(~pmask)));\r
-    setprg8(      0xA000, pbase|(regs[0x8]&pmask)|(regs[0xa]&(~pmask)));\r
-    setprg8(pswap^0xC000, pbase|(regs[0x9]&pmask)|(regs[0xa]&(~pmask)));\r
-    setprg8(      0xE000, pbase|regs[0xa]);\r
-  }\r
-  else\r
-  {\r
-    setprg8(pswap^0x8000, pbase|(regs[0x7]&pmask)|(regs[0xa]&(~pmask)));\r
-    setprg8(      0xA000, pbase|(regs[0x8]&pmask)|(regs[0xa]&(~pmask)));\r
-    setprg8(pswap^0xC000, pbase|((~1)&pmask)|(regs[0xa]&(~pmask)));\r
-    setprg8(      0xE000, pbase|((~0)&pmask)|(regs[0xa]&(~pmask)));\r
-  }\r
+  uint8  bankmode = cpu410x[0xb] & 7;\r
+  uint8  mask  = (bankmode == 0x7)?(0xff):(0x3f >> bankmode);\r
+  uint32 block = ((cpu410x[0x0] & 0xf0) << 4) + (cpu410x[0xa] & (~mask));\r
+  uint32 pswap = (mmc3cmd & 0x40) << 8;\r
+\r
+//  uint8 bank0  = (cpu410x[0xb] & 0x40)?(~1):(cpu410x[0x7]);\r
+//  uint8 bank1  = cpu410x[0x8];\r
+//  uint8 bank2  = (cpu410x[0xb] & 0x40)?(cpu410x[0x9]):(~1);\r
+//  uint8 bank3  = ~0;\r
+  uint8 bank0  = cpu410x[0x7^inv_hack];\r
+  uint8 bank1  = cpu410x[0x8^inv_hack];\r
+  uint8 bank2  = (cpu410x[0xb] & 0x40)?(cpu410x[0x9]):(~1);\r
+  uint8 bank3  = ~0;\r
 \r
-  setmirror(regs[0xe]);\r
+//  FCEU_printf(" PRG: %04x [%02x]",0x8000^pswap,block | (bank0 & mask));\r
+  setprg8(0x8000^pswap, block | (bank0 & mask));\r
+//  FCEU_printf(" %04x [%02x]",0xa000^pswap,block | (bank1 & mask));\r
+  setprg8(0xa000,       block | (bank1 & mask));\r
+//  FCEU_printf(" %04x [%02x]",0xc000^pswap,block | (bank2 & mask));\r
+  setprg8(0xc000^pswap, block | (bank2 & mask));\r
+//  FCEU_printf(" %04x [%02x]\n",0xe000^pswap,block | (bank3 & mask));\r
+  setprg8(0xe000,       block | (bank3 & mask));\r
 }\r
 \r
-static DECLFW(UNLOneBusWrite20XX)\r
+static void CSync(void)\r
 {\r
-//  FCEU_printf("PPU %04x:%04x\n",A,V);\r
-  if(A == 0x201A)\r
-    regs[0xd] = V;\r
-  else if(A == 0x2018)\r
-    regs[0xc] = V;\r
-  Sync();\r
+  static const uint8 midx[8] = {0, 1, 2, 0, 3, 4, 5, 0 };\r
+  uint8  mask  = 0xff >> midx[ppu201x[0xa] & 7];\r
+  uint32 block = ((cpu410x[0x0] & 0x0f) << 11) + ((ppu201x[0x8] & 0x70) << 4) + (ppu201x[0xa] & (~mask));\r
+  uint32 cswap = (mmc3cmd & 0x80) << 5;\r
+\r
+  uint8 bank0  = ppu201x[0x6]&(~1);\r
+  uint8 bank1  = ppu201x[0x6]|1;\r
+  uint8 bank2  = ppu201x[0x7]&(~1);\r
+  uint8 bank3  = ppu201x[0x7]|1;\r
+  uint8 bank4  = ppu201x[0x2];\r
+  uint8 bank5  = ppu201x[0x3];\r
+  uint8 bank6  = ppu201x[0x4];\r
+  uint8 bank7  = ppu201x[0x5];\r
+\r
+  setchr1(0x0000^cswap, block | (bank0 & mask));\r
+  setchr1(0x0400^cswap, block | (bank1 & mask));\r
+  setchr1(0x0800^cswap, block | (bank2 & mask));\r
+  setchr1(0x0c00^cswap, block | (bank3 & mask));\r
+  setchr1(0x1000^cswap, block | (bank4 & mask));\r
+  setchr1(0x1400^cswap, block | (bank5 & mask));\r
+  setchr1(0x1800^cswap, block | (bank6 & mask));\r
+  setchr1(0x1c00^cswap, block | (bank7 & mask));\r
+\r
+  setmirror((mirror & 1) ^ 1);\r
 }\r
 \r
-static DECLFW(UNLOneBusWriteExp)\r
+static void Sync(void)\r
 {\r
-//  FCEU_printf("EXP %04x:%04x\n",A,V);\r
-//  switch(A & 0x0F)\r
-//  {\r
-//  case 2: pcm_latch = pcm_clock; FCEU_printf("write %04x:%04x\n",A,V); break;\r
-//  case 3: pcm_irqa = 0; X6502_IRQEnd(FCEU_IQEXT); pcm_irq = 0; FCEU_printf("write %04x:%04x\n",A,V); break;\r
-//  case 4: pcm_irqa = 1; FCEU_printf("write %04x:%04x\n",A,V); break;\r
-//  default:\r
-   regs[A & 0x0F] = V;\r
-   Sync();\r
-//  }\r
+  PSync();\r
+  CSync();\r
 }\r
 \r
-static DECLFW(UNLOneBusWriteDebug)\r
+static DECLFW(UNLOneBusWriteCPU410X)\r
 {\r
-//  FCEU_printf("write %04x:%04x\n",A,V);\r
+//  FCEU_printf("CPU %04x:%04x\n",A,V);\r
+  switch(A & 0xf)\r
+  {\r
+  case 0x1: IRQLatch = V & 0xfe; break;\r
+  case 0x2: IRQReload = 1; break;\r
+  case 0x3: X6502_IRQEnd(FCEU_IQEXT); IRQa = 0; break;\r
+  case 0x4: IRQa = 1; break;\r
+  default:\r
+    cpu410x[A & 0xf] = V;\r
+    Sync();\r
+  }\r
 }\r
 \r
-static DECLFW(UNLOneBusWriteMMC)\r
+static DECLFW(UNLOneBusWritePPU201X)\r
+{\r
+//  FCEU_printf("PPU %04x:%04x\n",A,V);\r
+  ppu201x[A & 0x0f] = V;\r
+  Sync();\r
+}\r
+\r
+static DECLFW(UNLOneBusWriteMMC3)\r
 {\r
 //  FCEU_printf("MMC %04x:%04x\n",A,V);\r
-  switch(A&0xE001)\r
+  switch(A&0xe001)\r
   {\r
-  case 0x8000: regs[0xf] = V; Sync(); break;\r
+  case 0x8000: mmc3cmd = (mmc3cmd & 0x38) | (V & 0xc7); Sync(); break;\r
   case 0x8001:\r
   {\r
-    uint8 mask = 0xff, mmc3cmd = regs[0xf]&7;\r
-    switch(mmc3cmd)\r
+    switch(mmc3cmd & 7)\r
     {\r
-    case 0:\r
-    case 1:\r
-    case 2:\r
-    case 3:\r
-    case 4:\r
-    case 5:\r
-      if(regs[0xd]&4)\r
-        mask = 0x0f;\r
-      else\r
-        mask >>= ((regs[0xb]&0xf0)>>4);\r
-      regc[mmc3cmd] = V&mask;\r
-      break;\r
-    case 6:\r
-    case 7:\r
-      mask = (mask&0x3f)>>(regs[0xb]&0xf);\r
-      regs[mmc3cmd+1] = (regs[mmc3cmd+1]&(~mask))|(V&mask);\r
-      break;\r
+    case 0: ppu201x[0x6] = V; CSync(); break;\r
+    case 1: ppu201x[0x7] = V; CSync(); break;\r
+    case 2: ppu201x[0x2] = V; CSync(); break;\r
+    case 3: ppu201x[0x3] = V; CSync(); break;\r
+    case 4: ppu201x[0x4] = V; CSync(); break;\r
+    case 5: ppu201x[0x5] = V; CSync(); break;\r
+    case 6: cpu410x[0x7] = V; PSync(); break;\r
+    case 7: cpu410x[0x8] = V; PSync(); break;\r
     }\r
-\r
-    Sync();\r
     break;\r
   }\r
-  case 0xA000: regs[0xe] = (V & 1)^1; Sync(); break;\r
-  case 0xC000: IRQLatch = V&0xfe; break;\r
-  case 0xC001: IRQReload = 1; break;\r
-  case 0xE000: X6502_IRQEnd(FCEU_IQEXT); IRQa = 0; break;\r
-  case 0xE001: IRQa = 1; break;\r
+  case 0xa000: mirror = V; CSync(); break;\r
+  case 0xc000: IRQLatch = V & 0xfe; break;\r
+  case 0xc001: IRQReload = 1; break;\r
+  case 0xe000: X6502_IRQEnd(FCEU_IQEXT); IRQa = 0; break;\r
+  case 0xe001: IRQa = 1; break;\r
   }\r
 }\r
 \r
@@ -171,44 +192,51 @@ static void UNLOneBusIRQHook(void)
  }\r
 }\r
 \r
-static DECLFW(UNLOneBusWriteAPU2)\r
-{\r
-//  FCEU_printf("APU2 %04x:%04x\n",A,V);\r
-   CartBW(A&0xffdf,V);\r
-}\r
-\r
-static DECLFW(UNLOneBusWrite4012)\r
-{\r
-//  FCEU_printf("write %04x:%04x\n",A,V);\r
-  pcm_addr = V << 6;\r
-  old4012write(A,V);\r
-}\r
-\r
-static DECLFW(UNLOneBusWrite4013)\r
+static DECLFW(UNLOneBusWriteAPU40XX)\r
 {\r
-//  FCEU_printf("write %04x:%04x\n",A,V);\r
-  pcm_size = (V << 4) + 1;\r
-  old4013write(A,V);\r
-}\r
-\r
-static DECLFW(UNLOneBusWrite4015)\r
-{\r
-//  FCEU_printf("write %04x:%04x\n",A,V);\r
-  pcm_enable = V&0x10;\r
-  if(pcm_irq)\r
+//  FCEU_printf("APU %04x:%04x\n",A,V);\r
+  apu40xx[A & 0x3f] = V;\r
+  switch(A & 0x3f)\r
   {\r
-    X6502_IRQEnd(FCEU_IQEXT);\r
-    pcm_irq = 0;\r
+  case 0x12:\r
+    if(apu40xx[0x30] & 0x10)\r
+    {\r
+      pcm_addr = V << 6;\r
+    }\r
+  case 0x13:\r
+    if(apu40xx[0x30] & 0x10)\r
+    {\r
+      pcm_size = (V << 4) + 1;\r
+    }\r
+  case 0x15:\r
+    if(apu40xx[0x30] & 0x10)\r
+    {\r
+      pcm_enable = V&0x10;\r
+      if(pcm_irq)\r
+      {\r
+        X6502_IRQEnd(FCEU_IQEXT);\r
+        pcm_irq = 0;\r
+      }\r
+      if(pcm_enable)\r
+        pcm_latch = pcm_clock;\r
+      V &= 0xef;\r
+    }\r
   }\r
-  if(pcm_enable)\r
-    pcm_latch = pcm_clock;\r
-  old4015write(A,V&0xEF);\r
+  defapuwrite[A & 0x3f](A, V);\r
 }\r
 \r
-static DECLFR(UNLOneBusRead4015)\r
+static DECLFR(UNLOneBusReadAPU40XX)\r
 {\r
-  uint8 result = (old4015read(A) & 0x7F)|pcm_irq;\r
+  uint8 result = defapuread[A & 0x3f](A);\r
 //  FCEU_printf("read %04x, %02x\n",A,result);\r
+  switch(A & 0x3f)\r
+  {\r
+  case 0x15:\r
+    if(apu40xx[0x30] & 0x10)\r
+    {\r
+      result = (result & 0x7f) | pcm_irq;\r
+    }\r
+  }\r
   return result;\r
 }\r
 \r
@@ -230,7 +258,7 @@ static void UNLOneBusCpuHook(int a)
          else\r
          {\r
            uint8 raw_pcm = ARead[pcm_addr](pcm_addr) >> 1;\r
-           old4011write(0x4011,raw_pcm);\r
+           defapuwrite[0x11](0x4011,raw_pcm);\r
                pcm_addr++;\r
                pcm_addr&=0x7FFF;\r
          }\r
@@ -240,43 +268,39 @@ static void UNLOneBusCpuHook(int a)
 \r
 static void UNLOneBusPower(void)\r
 {\r
-  IRQCount=IRQLatch=IRQa==0;\r
-  regs[0]=regs[1]=regs[1]=regs[2]=regs[3]=regs[4]=regs[5]=regs[6]=0;\r
-  regs[7]=regs[8]=regs[11]=regs[12]=regs[13]=regs[14]=regs[15]=0;\r
-  regs[0x09]=0x3E;\r
-  regs[0x0A]=0x3F;\r
+  uint32 i;\r
+  IRQReload = IRQCount = IRQa = 0;\r
+\r
+  memset(cpu410x, 0x00, sizeof(cpu410x));\r
+  memset(ppu201x, 0x00, sizeof(ppu201x));\r
+  memset(apu40xx, 0x00, sizeof(apu40xx));\r
 \r
-  SetupCartCHRMapping(0,PRGptr[0],4096 * 1024,0);\r
+  SetupCartCHRMapping(0, PRGptr[0], PRGsize[0], 0);\r
 \r
-  if(isDance) // quick workaround, TODO: figure out how it works together\r
+  for(i=0; i<64; i++)\r
   {\r
-    old4015read=GetReadHandler(0x4015);\r
-    SetReadHandler(0x4015,0x4015,UNLOneBusRead4015);\r
-    old4011write=GetWriteHandler(0x4011);\r
-    old4012write=GetWriteHandler(0x4012);\r
-    SetWriteHandler(0x4012,0x4012,UNLOneBusWrite4012);\r
-    old4013write=GetWriteHandler(0x4013);\r
-    SetWriteHandler(0x4013,0x4013,UNLOneBusWrite4013);\r
-    old4015write=GetWriteHandler(0x4015);\r
-    SetWriteHandler(0x4015,0x4015,UNLOneBusWrite4015);\r
+    defapuread[i] = GetReadHandler(0x4000|i);\r
+    defapuwrite[i] = GetWriteHandler(0x4000|i);\r
   }\r
+  SetReadHandler(0x4000,0x403f,UNLOneBusReadAPU40XX);\r
+  SetWriteHandler(0x4000,0x403f,UNLOneBusWriteAPU40XX);\r
 \r
   SetReadHandler(0x8000,0xFFFF,CartBR);\r
-  SetWriteHandler(0x2009,0x2fff,UNLOneBusWrite20XX);\r
-//  SetWriteHandler(0x4020,0xffff,UNLOneBusWriteDebug);\r
-//  SetWriteHandler(0x4020,0x4040,UNLOneBusWriteAPU2);\r
-  SetWriteHandler(0x4100,0x410f,UNLOneBusWriteExp);\r
-  SetWriteHandler(0x8000,0xefff,UNLOneBusWriteMMC);\r
+  SetWriteHandler(0x2010,0x201f,UNLOneBusWritePPU201X);\r
+  SetWriteHandler(0x4100,0x410f,UNLOneBusWriteCPU410X);\r
+  SetWriteHandler(0x8000,0xffff,UNLOneBusWriteMMC3);\r
+\r
   Sync();\r
 }\r
 \r
 static void UNLOneBusReset(void)\r
 {\r
-  IRQCount=IRQLatch=IRQa=0;\r
-  regs[0]=regs[1]=regs[1]=regs[2]=regs[3]=regs[4]=regs[5]=regs[6]=0;\r
-  regs[7]=regs[8]=regs[11]=regs[12]=regs[13]=regs[14]=regs[15]=0;\r
-  regs[0x09]=0x3E;\r
-  regs[0x0A]=0x3F;\r
+  IRQReload = IRQCount = IRQa = 0;\r
+\r
+  memset(cpu410x, 0x00, sizeof(cpu410x));\r
+  memset(ppu201x, 0x00, sizeof(ppu201x));\r
+  memset(apu40xx, 0x00, sizeof(apu40xx));\r
+\r
   Sync();\r
 }\r
 \r
@@ -287,20 +311,13 @@ static void StateRestore(int version)
 \r
 void UNLOneBus_Init(CartInfo *info)\r
 {\r
-  isDance = 0;\r
   info->Power=UNLOneBusPower;\r
   info->Reset=UNLOneBusReset;\r
-  GameHBIRQHook=UNLOneBusIRQHook;\r
-//  MapIRQHook=UNLOneBusCpuHook;\r
-  GameStateRestore=StateRestore;\r
-  AddExState(&StateRegs, ~0, 0, 0);\r
-}\r
 \r
-void UNLDANCE_Init(CartInfo *info)\r
-{\r
-  isDance = 1;\r
-  info->Power=UNLOneBusPower;\r
-  info->Reset=UNLOneBusReset;\r
+  if(((*(uint32*)&(info->MD5)) == 0x305fcdc3) || // PowerJoy Supermax Carts\r
+     ((*(uint32*)&(info->MD5)) == 0x6abfce8e) )\r
+    inv_hack = 0xf;\r
+\r
   GameHBIRQHook=UNLOneBusIRQHook;\r
   MapIRQHook=UNLOneBusCpuHook;\r
   GameStateRestore=StateRestore;\r