diff options
Diffstat (limited to 'src/mame/audio/harddriv.c')
-rw-r--r-- | src/mame/audio/harddriv.c | 398 |
1 files changed, 398 insertions, 0 deletions
diff --git a/src/mame/audio/harddriv.c b/src/mame/audio/harddriv.c new file mode 100644 index 00000000000..3319698e5cf --- /dev/null +++ b/src/mame/audio/harddriv.c @@ -0,0 +1,398 @@ +/*************************************************************************** + + Hard Drivin' sound hardware + +****************************************************************************/ + +#include "driver.h" +#include "cpu/tms32010/tms32010.h" +#include "sound/dac.h" +#include "machine/atarigen.h" +#include "harddriv.h" + + +#define BIO_FREQUENCY (1000000 / 50) +#define CYCLES_PER_BIO (5000000 / BIO_FREQUENCY) + + +UINT16 *hdsnddsp_ram; + + +/************************************* + * + * Static globals + * + *************************************/ + +static UINT8 soundflag; +static UINT8 mainflag; +static UINT16 sounddata; +static UINT16 maindata; + +static UINT8 dacmute; +static UINT8 cramen; +static UINT8 irq68k; + +static offs_t sound_rom_offs; + +static UINT8 *rombase; +static UINT32 romsize; +static UINT16 *comram; + +static UINT32 last_bio_cycles; + + + +/************************************* + * + * Driver init + * + *************************************/ + +void hdsnd_init(void) +{ + rombase = (UINT8 *)memory_region(REGION_SOUND1); + romsize = memory_region_length(REGION_SOUND1); + comram = (UINT16 *)auto_malloc(0x400); + last_bio_cycles = 0; +} + + + +/************************************* + * + * Update flags + * + *************************************/ + +static void update_68k_interrupts(void) +{ + int irqline = 0; + + if (mainflag) irqline = 1; + if (irq68k) irqline = 3; + + if (irqline) + cpunum_set_input_line(hdcpu_sound, irqline, ASSERT_LINE); + else + cpunum_set_input_line(hdcpu_sound, 7, CLEAR_LINE); +} + + + +/************************************* + * + * I/O from main CPU side + * + *************************************/ + +READ16_HANDLER( hd68k_snd_data_r ) +{ + soundflag = 0; + logerror("%06X:main read from sound=%04X\n", activecpu_get_previouspc(), sounddata); + return sounddata; +} + + +READ16_HANDLER( hd68k_snd_status_r ) +{ + return (mainflag << 15) | (soundflag << 14) | 0x1fff; +} + + +static TIMER_CALLBACK( delayed_68k_w ) +{ + maindata = param; + mainflag = 1; + update_68k_interrupts(); +} + + +WRITE16_HANDLER( hd68k_snd_data_w ) +{ + timer_call_after_resynch(data, delayed_68k_w); + logerror("%06X:main write to sound=%04X\n", activecpu_get_previouspc(), data); +} + + +WRITE16_HANDLER( hd68k_snd_reset_w ) +{ + cpunum_set_input_line(hdcpu_sound, INPUT_LINE_RESET, ASSERT_LINE); + cpunum_set_input_line(hdcpu_sound, INPUT_LINE_RESET, CLEAR_LINE); + mainflag = soundflag = 0; + update_68k_interrupts(); + logerror("%06X:Reset sound\n", activecpu_get_previouspc()); +} + + + +/************************************* + * + * I/O from sound CPU side + * + *************************************/ + +READ16_HANDLER( hdsnd68k_data_r ) +{ + mainflag = 0; + update_68k_interrupts(); + logerror("%06X:sound read from main=%04X\n", activecpu_get_previouspc(), maindata); + return maindata; +} + + +WRITE16_HANDLER( hdsnd68k_data_w ) +{ + COMBINE_DATA(&sounddata); + soundflag = 1; + logerror("%06X:sound write to main=%04X\n", activecpu_get_previouspc(), data); +} + + + +/************************************* + * + * Misc. 68k inputs + * + *************************************/ + +READ16_HANDLER( hdsnd68k_switches_r ) +{ + logerror("%06X:hdsnd68k_switches_r(%04X)\n", activecpu_get_previouspc(), offset); + return 0; +} + + +READ16_HANDLER( hdsnd68k_320port_r ) +{ + logerror("%06X:hdsnd68k_320port_r(%04X)\n", activecpu_get_previouspc(), offset); + return 0; +} + + +READ16_HANDLER( hdsnd68k_status_r ) +{ +//FFFF 3000 R READSTAT Read Status +// D15 = 'Main Flag' +// D14 = 'Sound Flag' +// D13 = Test Switch +// D12 = 5220 Ready Flag (0=Ready) + logerror("%06X:hdsnd68k_status_r(%04X)\n", activecpu_get_previouspc(), offset); + return (mainflag << 15) | (soundflag << 14) | 0x2000 | 0;//((readinputport(0) & 0x0020) << 8) | 0; +} + + + +/************************************* + * + * Misc. 68k outputs + * + *************************************/ + +WRITE16_HANDLER( hdsnd68k_latches_w ) +{ + /* bit 3 selects the value; data is ignored */ + data = (offset >> 3) & 1; + + /* low 3 bits select the function */ + offset &= 7; + switch (offset) + { + case 0: /* SPWR - 5220 write strobe */ + /* data == 0 means high, 1 means low */ + logerror("%06X:SPWR=%d\n", activecpu_get_previouspc(), data); + break; + + case 1: /* SPRES - 5220 hard reset */ + /* data == 0 means low, 1 means high */ + logerror("%06X:SPRES=%d\n", activecpu_get_previouspc(), data); + break; + + case 2: /* SPRATE */ + /* data == 0 means 8kHz, 1 means 10kHz */ + logerror("%06X:SPRATE=%d\n", activecpu_get_previouspc(), data); + break; + + case 3: /* CRAMEN */ + /* data == 0 means disable 68k access to COM320, 1 means enable */ + cramen = data; + break; + + case 4: /* RES320 */ + logerror("%06X:RES320=%d\n", activecpu_get_previouspc(), data); + if (hdcpu_sounddsp != -1) + cpunum_set_input_line(hdcpu_sounddsp, INPUT_LINE_HALT, data ? CLEAR_LINE : ASSERT_LINE); + break; + + case 7: /* LED */ + break; + } +} + + +WRITE16_HANDLER( hdsnd68k_speech_w ) +{ + logerror("%06X:hdsnd68k_speech_w(%04X)=%04X\n", activecpu_get_previouspc(), offset, data); +} + + +WRITE16_HANDLER( hdsnd68k_irqclr_w ) +{ + irq68k = 0; + update_68k_interrupts(); +} + + + +/************************************* + * + * TMS32010 access + * + *************************************/ + +READ16_HANDLER( hdsnd68k_320ram_r ) +{ + return hdsnddsp_ram[offset & 0xfff]; +} + + +WRITE16_HANDLER( hdsnd68k_320ram_w ) +{ + COMBINE_DATA(&hdsnddsp_ram[offset & 0xfff]); +} + + +READ16_HANDLER( hdsnd68k_320ports_r ) +{ + UINT16 result; + cpuintrf_push_context(hdcpu_sounddsp); + result = TMS32010_In(offset & 7); + cpuintrf_pop_context(); + return result; +} + + +WRITE16_HANDLER( hdsnd68k_320ports_w ) +{ + cpuintrf_push_context(hdcpu_sounddsp); + TMS32010_Out(offset & 7, data); + cpuintrf_pop_context(); +} + + +READ16_HANDLER( hdsnd68k_320com_r ) +{ + if (cramen) + return comram[offset & 0x1ff]; + + logerror("%06X:hdsnd68k_320com_r(%04X) -- not allowed\n", activecpu_get_previouspc(), offset); + return 0xffff; +} + + +WRITE16_HANDLER( hdsnd68k_320com_w ) +{ + if (cramen) + COMBINE_DATA(&comram[offset & 0x1ff]); + else + logerror("%06X:hdsnd68k_320com_w(%04X)=%04X -- not allowed\n", activecpu_get_previouspc(), offset, data); +} + + + +/************************************* + * + * TMS32010 interrupts + * + *************************************/ + +READ16_HANDLER( hdsnddsp_get_bio ) +{ + UINT32 cycles_since_last_bio = activecpu_gettotalcycles() - last_bio_cycles; + INT32 cycles_until_bio = CYCLES_PER_BIO - cycles_since_last_bio; + + /* if we're not at the next BIO yet, advance us there */ + if (cycles_until_bio > 0) + { + activecpu_adjust_icount(-cycles_until_bio); + last_bio_cycles += CYCLES_PER_BIO; + } + else + last_bio_cycles = activecpu_gettotalcycles(); + return ASSERT_LINE; +} + + + +/************************************* + * + * TMS32010 ports + * + *************************************/ + +WRITE16_HANDLER( hdsnddsp_dac_w ) +{ + /* DAC L */ + if (!dacmute) + DAC_signed_data_16_w(offset, data ^ 0x8000); +} + + +WRITE16_HANDLER( hdsnddsp_comport_w ) +{ + /* COM port TD0-7 */ + logerror("%06X:hdsnddsp_comport_w=%d\n", activecpu_get_previouspc(), data); +} + + +WRITE16_HANDLER( hdsnddsp_mute_w ) +{ + /* mute DAC audio, D0=1 */ +/* dacmute = data & 1; -- NOT STUFFED */ + logerror("%06X:mute DAC=%d\n", activecpu_get_previouspc(), data); +} + + +WRITE16_HANDLER( hdsnddsp_gen68kirq_w ) +{ + /* generate 68k IRQ */ + irq68k = 1; + update_68k_interrupts(); +} + + +WRITE16_HANDLER( hdsnddsp_soundaddr_w ) +{ + if (offset == 0) + { + /* select sound ROM block */ + sound_rom_offs = (sound_rom_offs & 0xffff) | ((data & 15) << 16); + } + else + { + /* sound memory address */ + sound_rom_offs = (sound_rom_offs & ~0xffff) | (data & 0xffff); + } +} + + +READ16_HANDLER( hdsnddsp_rom_r ) +{ + if (sound_rom_offs < romsize) + return rombase[sound_rom_offs++] << 7; + sound_rom_offs++; + return 0; +} + + +READ16_HANDLER( hdsnddsp_comram_r ) +{ + return comram[sound_rom_offs++ & 0x1ff]; +} + + +READ16_HANDLER( hdsnddsp_compare_r ) +{ + logerror("%06X:hdsnddsp_compare_r(%04X)\n", activecpu_get_previouspc(), offset); + return 0; +} |