Genesis-Plus-GX/source/genesis.c

250 lines
7.7 KiB
C
Raw Normal View History

2008-08-07 14:26:07 +02:00
/***************************************************************************************
* Genesis Plus
2008-08-11 17:18:57 +02:00
* Genesis internals & Bus controller
2008-08-07 14:26:07 +02:00
*
* Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003 Charles Mac Donald (original code)
* Eke-Eke (2007,2008,2009), additional code & fixes for the GCN/Wii port
2008-08-07 14:26:07 +02:00
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
****************************************************************************************/
2007-08-10 22:34:06 +02:00
#include "shared.h"
2008-12-10 19:16:30 +01:00
uint8 bios_rom[0x10000]; /* BIOS rom */
2008-08-07 14:26:07 +02:00
uint8 work_ram[0x10000]; /* 68K work RAM */
2008-12-10 19:16:30 +01:00
uint8 zram[0x2000]; /* Z80 work RAM */
uint8 zbusreq; /* /BUSREQ from Z80 */
uint8 zreset; /* /RESET to Z80 */
uint8 zbusack; /* /BUSACK to Z80 */
uint8 zirq; /* /IRQ to Z80 */
uint32 zbank; /* Address of Z80 bank window */
2007-08-10 22:34:06 +02:00
uint8 gen_running;
2008-08-07 14:26:07 +02:00
int32 resetline;
2008-12-04 20:32:22 +01:00
2007-08-10 22:34:06 +02:00
/*--------------------------------------------------------------------------*/
/* Init, reset, shutdown functions */
/*--------------------------------------------------------------------------*/
2008-08-07 14:26:07 +02:00
void set_softreset(void)
{
2008-12-10 19:16:30 +01:00
resetline = (int) ((double) (lines_per_frame - 1) * rand() / (RAND_MAX + 1.0));
2008-08-07 14:26:07 +02:00
}
2007-08-10 22:34:06 +02:00
void gen_init(void)
2007-08-10 22:34:06 +02:00
{
2008-12-10 19:16:30 +01:00
int i;
2008-08-07 14:26:07 +02:00
2008-12-10 19:16:30 +01:00
/* initialize CPUs */
m68k_set_cpu_type(M68K_CPU_TYPE_68000);
2008-12-10 19:16:30 +01:00
m68k_init();
z80_init(0,0,0,z80_irq_callback);
2008-08-07 14:26:07 +02:00
/* initialize 68k mapped memory */
/* $000000-$7fffff is affected to cartridge area (see cart_hw.c) */
/* $800000-$ffffff is affected to WRAM (see VDP DMA) */
for (i=0x80; i<0x100; i++)
2008-12-10 19:16:30 +01:00
{
2008-12-04 20:32:22 +01:00
m68k_memory_map[i].base = work_ram;
m68k_memory_map[i].read8 = NULL;
m68k_memory_map[i].read16 = NULL;
m68k_memory_map[i].write8 = NULL;
2008-12-10 19:16:30 +01:00
m68k_memory_map[i].write16 = NULL;
2008-12-04 20:32:22 +01:00
zbank_memory_map[i].read = NULL;
zbank_memory_map[i].write = NULL;
}
/* initialize 68k memory handlers */
2008-12-10 19:16:30 +01:00
for (i=0x80; i<0xe0; i++)
{
/* illegal area */
2008-12-04 20:32:22 +01:00
m68k_memory_map[i].read8 = m68k_lockup_r_8;
m68k_memory_map[i].read16 = m68k_lockup_r_16;
m68k_memory_map[i].write8 = m68k_lockup_w_8;
2008-12-10 19:16:30 +01:00
m68k_memory_map[i].write16 = m68k_lockup_w_16;
2008-12-04 20:32:22 +01:00
zbank_memory_map[i].read = zbank_lockup_r;
zbank_memory_map[i].write = zbank_lockup_w;
2008-12-10 19:16:30 +01:00
}
2008-08-07 14:26:07 +02:00
2008-12-10 19:16:30 +01:00
/* Z80 bus */
2008-12-04 20:32:22 +01:00
m68k_memory_map[0xa0].read8 = z80_read_byte;
m68k_memory_map[0xa0].read16 = z80_read_word;
m68k_memory_map[0xa0].write8 = z80_write_byte;
m68k_memory_map[0xa0].write16 = z80_write_word;
zbank_memory_map[0xa0].read = zbank_lockup_r;
zbank_memory_map[0xa0].write = zbank_lockup_w;
2008-12-10 19:16:30 +01:00
/* I/O & Control registers */
2008-12-04 20:32:22 +01:00
m68k_memory_map[0xa1].read8 = ctrl_io_read_byte;
m68k_memory_map[0xa1].read16 = ctrl_io_read_word;
m68k_memory_map[0xa1].write8 = ctrl_io_write_byte;
m68k_memory_map[0xa1].write16 = ctrl_io_write_word;
zbank_memory_map[0xa1].read = zbank_read_ctrl_io;
zbank_memory_map[0xa1].write = zbank_write_ctrl_io;
2008-08-07 14:26:07 +02:00
/* SEGA PICO */
if (system_hw == SYSTEM_PICO)
{
2008-12-04 20:32:22 +01:00
m68k_memory_map[0x80].read8 = pico_read_byte;
m68k_memory_map[0x80].read16 = pico_read_word;
m68k_memory_map[0x80].write8 = m68k_unused_8_w;
m68k_memory_map[0x80].write16 = m68k_unused_16_w;
2008-12-10 19:16:30 +01:00
/* there is no I/O area (Notaz) */
2008-12-04 20:32:22 +01:00
m68k_memory_map[0xa0].read8 = m68k_read_bus_8;
m68k_memory_map[0xa0].read16 = m68k_read_bus_16;
m68k_memory_map[0xa0].write8 = m68k_unused_8_w;
m68k_memory_map[0xa0].write16 = m68k_unused_16_w;
m68k_memory_map[0xa1].read8 = m68k_read_bus_8;
m68k_memory_map[0xa1].read16 = m68k_read_bus_16;
m68k_memory_map[0xa1].write8 = m68k_unused_8_w;
m68k_memory_map[0xa1].write16 = m68k_unused_16_w;
2008-08-07 14:26:07 +02:00
}
2008-12-10 19:16:30 +01:00
/* VDP */
for (i=0xc0; i<0xe0; i+=8)
{
m68k_memory_map[i].read8 = vdp_read_byte;
m68k_memory_map[i].read16 = vdp_read_word;
m68k_memory_map[i].write8 = vdp_write_byte;
m68k_memory_map[i].write16 = vdp_write_word;
zbank_memory_map[i].read = zbank_read_vdp;
zbank_memory_map[i].write = zbank_write_vdp;
}
2007-08-10 22:34:06 +02:00
}
void gen_reset(uint32 hard_reset)
2007-08-10 22:34:06 +02:00
{
2008-12-10 19:16:30 +01:00
if (hard_reset)
{
/* Clear RAM */
memset (work_ram, 0x00, sizeof (work_ram));
memset (zram, 0x00, sizeof (zram));
2008-08-07 14:26:07 +02:00
2008-12-10 19:16:30 +01:00
/* TMSS BIOS */
2008-08-07 14:26:07 +02:00
if (config.bios_enabled == 3)
{
2008-12-04 20:32:22 +01:00
m68k_memory_map[0].base = bios_rom;
2008-08-07 14:26:07 +02:00
}
count_m68k = 0;
count_z80 = 0;
2008-12-10 19:16:30 +01:00
}
2008-08-07 14:26:07 +02:00
resetline = -1; /* clear !RESET */
gen_running = 1; /* System is running */
zreset = 0; /* Z80 is reset */
zbusreq = 0; /* Z80 has control of the Z bus */
zbusack = 1; /* Z80 is busy using the Z bus */
zirq = 0; /* No interrupts occuring */
zbank = 0; /* Assume default bank is $000000-$007FFF */
/* reset CPUs */
m68k_pulse_reset();
z80_reset();
fm_reset();
2007-08-10 22:34:06 +02:00
}
void gen_shutdown(void)
2007-08-10 22:34:06 +02:00
{
z80_exit();
2007-08-10 22:34:06 +02:00
}
/*-----------------------------------------------------------------------
Bus controller chip functions
-----------------------------------------------------------------------*/
void gen_busreq_w(uint32 state)
2007-08-10 22:34:06 +02:00
{
2008-12-10 19:16:30 +01:00
uint32 z80_cycles_to_run;
if (state)
{
/* Bus Request */
if (!zbusreq && zreset)
{
/* Z80 stopped */
/* z80 was ON during the last 68k cycles */
/* we execute the appropriate number of z80 cycles */
z80_cycles_to_run = line_z80 + ((count_m68k - line_m68k)*7)/15;
2008-12-04 20:32:22 +01:00
current_z80 = z80_cycles_to_run - count_z80;
if (current_z80 > 0) count_z80 += z80_execute(current_z80);
2008-12-10 19:16:30 +01:00
}
}
else
{
/* Bus released */
if (zbusreq && zreset)
{
/* Z80 started */
/* z80 was OFF during the last 68k cycles */
/* we burn the appropriate number of z80 cycles */
z80_cycles_to_run = line_z80 + ((count_m68k - line_m68k)*7)/15;
count_z80 = z80_cycles_to_run;
}
}
2008-08-07 14:26:07 +02:00
2008-12-10 19:16:30 +01:00
zbusreq = state;
zbusack = 1 ^ (zbusreq & zreset);
2007-08-10 22:34:06 +02:00
}
void gen_reset_w(uint32 state)
2007-08-10 22:34:06 +02:00
{
2008-12-10 19:16:30 +01:00
uint32 z80_cycles_to_run;
2007-08-10 22:34:06 +02:00
2008-12-10 19:16:30 +01:00
if (state)
{
/* stop RESET process */
if (!zbusreq && !zreset)
{
/* Z80 started */
/* z80 was OFF during the last 68k cycles */
/* we burn the appropriate number of z80 cycles */
z80_cycles_to_run = line_z80 + ((count_m68k - line_m68k)*7)/15;
count_z80 = z80_cycles_to_run;
}
}
else
{
/* start RESET process */
if (!zbusreq && zreset)
{
/* Z80 stopped */
/* z80 was ON during the last 68k cycles */
/* we execute the appropriate number of z80 cycles */
z80_cycles_to_run = line_z80 + ((count_m68k - line_m68k)*7)/15;
2008-12-04 20:32:22 +01:00
current_z80 = z80_cycles_to_run - count_z80;
if (current_z80 > 0) count_z80 += z80_execute(current_z80);
2008-12-10 19:16:30 +01:00
}
2008-08-07 14:26:07 +02:00
2008-12-10 19:16:30 +01:00
/* Reset Z80 & YM2612 */
z80_reset();
fm_reset();
2008-12-10 19:16:30 +01:00
}
2008-08-07 14:26:07 +02:00
2008-12-10 19:16:30 +01:00
zreset = state;
zbusack = 1 ^ (zbusreq & zreset);
2007-08-10 22:34:06 +02:00
}
2008-12-04 20:32:22 +01:00
void gen_bank_w (uint32 state)
2007-08-10 22:34:06 +02:00
{
2008-12-10 19:16:30 +01:00
zbank = ((zbank >> 1) | ((state & 1) << 23)) & 0xFF8000;
2007-08-10 22:34:06 +02:00
}
int z80_irq_callback (int param)
{
2008-12-10 19:16:30 +01:00
zirq = 0;
z80_set_irq_line (0, CLEAR_LINE);
return 0xFF;
2007-08-10 22:34:06 +02:00
}