summaryrefslogtreecommitdiffstatshomepage
path: root/src/emu/sound/3812intf.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/emu/sound/3812intf.c')
-rw-r--r--src/emu/sound/3812intf.c565
1 files changed, 565 insertions, 0 deletions
diff --git a/src/emu/sound/3812intf.c b/src/emu/sound/3812intf.c
new file mode 100644
index 00000000000..6ad352864e0
--- /dev/null
+++ b/src/emu/sound/3812intf.c
@@ -0,0 +1,565 @@
+/******************************************************************************
+* FILE
+* Yamaha 3812 emulator interface - MAME VERSION
+*
+* CREATED BY
+* Ernesto Corvi
+*
+* UPDATE LOG
+* JB 28-04-2002 Fixed simultaneous usage of all three different chip types.
+* Used real sample rate when resample filter is active.
+* AAT 12-28-2001 Protected Y8950 from accessing unmapped port and keyboard handlers.
+* CHS 1999-01-09 Fixes new ym3812 emulation interface.
+* CHS 1998-10-23 Mame streaming sound chip update
+* EC 1998 Created Interface
+*
+* NOTES
+*
+******************************************************************************/
+#include "sndintrf.h"
+#include "streams.h"
+#include "cpuintrf.h"
+#include "3812intf.h"
+#include "fm.h"
+#include "sound/fmopl.h"
+
+
+#if BUILD_YM3812
+
+struct ym3812_info
+{
+ sound_stream * stream;
+ emu_timer * timer[2];
+ void * chip;
+ const struct YM3812interface *intf;
+};
+
+static void IRQHandler_3812(void *param,int irq)
+{
+ struct ym3812_info *info = param;
+ if (info->intf->handler) (info->intf->handler)(irq ? ASSERT_LINE : CLEAR_LINE);
+}
+static TIMER_CALLBACK_PTR( timer_callback_3812_0 )
+{
+ struct ym3812_info *info = param;
+ YM3812TimerOver(info->chip,0);
+}
+
+static TIMER_CALLBACK_PTR( timer_callback_3812_1 )
+{
+ struct ym3812_info *info = param;
+ YM3812TimerOver(info->chip,1);
+}
+
+static void TimerHandler_3812(void *param,int c,attotime period)
+{
+ struct ym3812_info *info = param;
+ if( attotime_compare(period, attotime_zero) == 0 )
+ { /* Reset FM Timer */
+ timer_enable(info->timer[c], 0);
+ }
+ else
+ { /* Start FM Timer */
+ timer_adjust_ptr(info->timer[c], period, attotime_zero);
+ }
+}
+
+
+static void ym3812_stream_update(void *param, stream_sample_t **inputs, stream_sample_t **buffer, int length)
+{
+ struct ym3812_info *info = param;
+ YM3812UpdateOne(info->chip, buffer[0], length);
+}
+
+static void _stream_update_3812(void * param, int interval)
+{
+ struct ym3812_info *info = param;
+ stream_update(info->stream);
+}
+
+
+static void *ym3812_start(int sndindex, int clock, const void *config)
+{
+ static const struct YM3812interface dummy = { 0 };
+ struct ym3812_info *info;
+ int rate = clock/72;
+
+ info = auto_malloc(sizeof(*info));
+ memset(info, 0, sizeof(*info));
+
+ info->intf = config ? config : &dummy;
+
+ /* stream system initialize */
+ info->chip = YM3812Init(sndindex,clock,rate);
+ if (!info->chip)
+ return NULL;
+
+ info->stream = stream_create(0,1,rate,info,ym3812_stream_update);
+
+ /* YM3812 setup */
+ YM3812SetTimerHandler (info->chip, TimerHandler_3812, info);
+ YM3812SetIRQHandler (info->chip, IRQHandler_3812, info);
+ YM3812SetUpdateHandler(info->chip, _stream_update_3812, info);
+
+ info->timer[0] = timer_alloc_ptr(timer_callback_3812_0, info);
+ info->timer[1] = timer_alloc_ptr(timer_callback_3812_1, info);
+
+ return info;
+}
+
+static void ym3812_stop(void *token)
+{
+ struct ym3812_info *info = token;
+ YM3812Shutdown(info->chip);
+}
+
+static void ym3812_reset(void *token)
+{
+ struct ym3812_info *info = token;
+ YM3812ResetChip(info->chip);
+}
+
+WRITE8_HANDLER( YM3812_control_port_0_w ) {
+ struct ym3812_info *info = sndti_token(SOUND_YM3812, 0);
+ YM3812Write(info->chip, 0, data);
+}
+WRITE8_HANDLER( YM3812_write_port_0_w ) {
+ struct ym3812_info *info = sndti_token(SOUND_YM3812, 0);
+ YM3812Write(info->chip, 1, data);
+}
+READ8_HANDLER( YM3812_status_port_0_r ) {
+ struct ym3812_info *info = sndti_token(SOUND_YM3812, 0);
+ return YM3812Read(info->chip, 0);
+}
+READ8_HANDLER( YM3812_read_port_0_r ) {
+ struct ym3812_info *info = sndti_token(SOUND_YM3812, 0);
+ return YM3812Read(info->chip, 1);
+}
+
+
+WRITE8_HANDLER( YM3812_control_port_1_w ) {
+ struct ym3812_info *info = sndti_token(SOUND_YM3812, 1);
+ YM3812Write(info->chip, 0, data);
+}
+WRITE8_HANDLER( YM3812_write_port_1_w ) {
+ struct ym3812_info *info = sndti_token(SOUND_YM3812, 1);
+ YM3812Write(info->chip, 1, data);
+}
+READ8_HANDLER( YM3812_status_port_1_r ) {
+ struct ym3812_info *info = sndti_token(SOUND_YM3812, 1);
+ return YM3812Read(info->chip, 0);
+}
+READ8_HANDLER( YM3812_read_port_1_r ) {
+ struct ym3812_info *info = sndti_token(SOUND_YM3812, 1);
+ return YM3812Read(info->chip, 1);
+}
+
+/**************************************************************************
+ * Generic get_info
+ **************************************************************************/
+
+static void ym3812_set_info(void *token, UINT32 state, sndinfo *info)
+{
+ switch (state)
+ {
+ /* no parameters to set */
+ }
+}
+
+
+void ym3812_get_info(void *token, UINT32 state, sndinfo *info)
+{
+ switch (state)
+ {
+ /* --- the following bits of info are returned as 64-bit signed integers --- */
+
+ /* --- the following bits of info are returned as pointers to data or functions --- */
+ case SNDINFO_PTR_SET_INFO: info->set_info = ym3812_set_info; break;
+ case SNDINFO_PTR_START: info->start = ym3812_start; break;
+ case SNDINFO_PTR_STOP: info->stop = ym3812_stop; break;
+ case SNDINFO_PTR_RESET: info->reset = ym3812_reset; break;
+
+ /* --- the following bits of info are returned as NULL-terminated strings --- */
+ case SNDINFO_STR_NAME: info->s = "YM3812"; break;
+ case SNDINFO_STR_CORE_FAMILY: info->s = "Yamaha FM"; break;
+ case SNDINFO_STR_CORE_VERSION: info->s = "1.0"; break;
+ case SNDINFO_STR_CORE_FILE: info->s = __FILE__; break;
+ case SNDINFO_STR_CORE_CREDITS: info->s = "Copyright (c) 2004, The MAME Team"; break;
+ }
+}
+
+#endif
+
+
+#if BUILD_YM3526
+
+struct ym3526_info
+{
+ sound_stream * stream;
+ emu_timer * timer[2];
+ void * chip;
+ const struct YM3526interface *intf;
+};
+
+
+/* IRQ Handler */
+static void IRQHandler_3526(void *param,int irq)
+{
+ struct ym3526_info *info = param;
+ if (info->intf->handler) (info->intf->handler)(irq ? ASSERT_LINE : CLEAR_LINE);
+}
+/* Timer overflow callback from timer.c */
+static TIMER_CALLBACK_PTR( timer_callback_3526_0 )
+{
+ struct ym3526_info *info = param;
+ YM3526TimerOver(info->chip,0);
+}
+static TIMER_CALLBACK_PTR( timer_callback_3526_1 )
+{
+ struct ym3526_info *info = param;
+ YM3526TimerOver(info->chip,1);
+}
+/* TimerHandler from fm.c */
+static void TimerHandler_3526(void *param,int c,attotime period)
+{
+ struct ym3526_info *info = param;
+ if( attotime_compare(period, attotime_zero) == 0 )
+ { /* Reset FM Timer */
+ timer_enable(info->timer[c], 0);
+ }
+ else
+ { /* Start FM Timer */
+ timer_adjust_ptr(info->timer[c], period, attotime_zero);
+ }
+}
+
+
+static void ym3526_stream_update(void *param, stream_sample_t **inputs, stream_sample_t **buffer, int length)
+{
+ struct ym3526_info *info = param;
+ YM3526UpdateOne(info->chip, buffer[0], length);
+}
+
+static void _stream_update_3526(void *param, int interval)
+{
+ struct ym3526_info *info = param;
+ stream_update(info->stream);
+}
+
+
+static void *ym3526_start(int sndindex, int clock, const void *config)
+{
+ static const struct YM3526interface dummy = { 0 };
+ struct ym3526_info *info;
+ int rate = clock/72;
+
+ info = auto_malloc(sizeof(*info));
+ memset(info, 0, sizeof(*info));
+
+ info->intf = config ? config : &dummy;
+
+ /* stream system initialize */
+ info->chip = YM3526Init(sndindex,clock,rate);
+ if (!info->chip)
+ return NULL;
+
+ info->stream = stream_create(0,1,rate,info,ym3526_stream_update);
+ /* YM3526 setup */
+ YM3526SetTimerHandler (info->chip, TimerHandler_3526, info);
+ YM3526SetIRQHandler (info->chip, IRQHandler_3526, info);
+ YM3526SetUpdateHandler(info->chip, _stream_update_3526, info);
+
+ info->timer[0] = timer_alloc_ptr(timer_callback_3526_0, info);
+ info->timer[1] = timer_alloc_ptr(timer_callback_3526_1, info);
+
+ return info;
+}
+
+static void ym3526_stop(void *token)
+{
+ struct ym3526_info *info = token;
+ YM3526Shutdown(info->chip);
+}
+
+static void ym3526_reset(void *token)
+{
+ struct ym3526_info *info = token;
+ YM3526ResetChip(info->chip);
+}
+
+WRITE8_HANDLER( YM3526_control_port_0_w ) {
+ struct ym3526_info *info = sndti_token(SOUND_YM3526, 0);
+ YM3526Write(info->chip, 0, data);
+}
+WRITE8_HANDLER( YM3526_write_port_0_w ) {
+ struct ym3526_info *info = sndti_token(SOUND_YM3526, 0);
+ YM3526Write(info->chip, 1, data);
+}
+READ8_HANDLER( YM3526_status_port_0_r ) {
+ struct ym3526_info *info = sndti_token(SOUND_YM3526, 0);
+ return YM3526Read(info->chip, 0);
+}
+READ8_HANDLER( YM3526_read_port_0_r ) {
+ struct ym3526_info *info = sndti_token(SOUND_YM3526, 0);
+ return YM3526Read(info->chip, 1);
+}
+
+
+WRITE8_HANDLER( YM3526_control_port_1_w ) {
+ struct ym3526_info *info = sndti_token(SOUND_YM3526, 1);
+ YM3526Write(info->chip, 0, data);
+}
+WRITE8_HANDLER( YM3526_write_port_1_w ) {
+ struct ym3526_info *info = sndti_token(SOUND_YM3526, 1);
+ YM3526Write(info->chip, 1, data);
+}
+READ8_HANDLER( YM3526_status_port_1_r ) {
+ struct ym3526_info *info = sndti_token(SOUND_YM3526, 1);
+ return YM3526Read(info->chip, 0);
+}
+READ8_HANDLER( YM3526_read_port_1_r ) {
+ struct ym3526_info *info = sndti_token(SOUND_YM3526, 1);
+ return YM3526Read(info->chip, 1);
+}
+
+/**************************************************************************
+ * Generic get_info
+ **************************************************************************/
+
+static void ym3526_set_info(void *token, UINT32 state, sndinfo *info)
+{
+ switch (state)
+ {
+ /* no parameters to set */
+ }
+}
+
+
+void ym3526_get_info(void *token, UINT32 state, sndinfo *info)
+{
+ switch (state)
+ {
+ /* --- the following bits of info are returned as 64-bit signed integers --- */
+
+ /* --- the following bits of info are returned as pointers to data or functions --- */
+ case SNDINFO_PTR_SET_INFO: info->set_info = ym3526_set_info; break;
+ case SNDINFO_PTR_START: info->start = ym3526_start; break;
+ case SNDINFO_PTR_STOP: info->stop = ym3526_stop; break;
+ case SNDINFO_PTR_RESET: info->reset = ym3526_reset; break;
+
+ /* --- the following bits of info are returned as NULL-terminated strings --- */
+ case SNDINFO_STR_NAME: info->s = "YM3526"; break;
+ case SNDINFO_STR_CORE_FAMILY: info->s = "Yamaha FM"; break;
+ case SNDINFO_STR_CORE_VERSION: info->s = "1.0"; break;
+ case SNDINFO_STR_CORE_FILE: info->s = __FILE__; break;
+ case SNDINFO_STR_CORE_CREDITS: info->s = "Copyright (c) 2004, The MAME Team"; break;
+ }
+}
+
+#endif
+
+
+#if BUILD_Y8950
+
+struct y8950_info
+{
+ sound_stream * stream;
+ emu_timer * timer[2];
+ void * chip;
+ const struct Y8950interface *intf;
+ int index;
+};
+
+static void IRQHandler_8950(void *param,int irq)
+{
+ struct y8950_info *info = param;
+ if (info->intf->handler) (info->intf->handler)(irq ? ASSERT_LINE : CLEAR_LINE);
+}
+static TIMER_CALLBACK_PTR( timer_callback_8950_0 )
+{
+ struct y8950_info *info = param;
+ Y8950TimerOver(info->chip,0);
+}
+static TIMER_CALLBACK_PTR( timer_callback_8950_1 )
+{
+ struct y8950_info *info = param;
+ Y8950TimerOver(info->chip,1);
+}
+static void TimerHandler_8950(void *param,int c,attotime period)
+{
+ struct y8950_info *info = param;
+ if( attotime_compare(period, attotime_zero) == 0 )
+ { /* Reset FM Timer */
+ timer_enable(info->timer[c], 0);
+ }
+ else
+ { /* Start FM Timer */
+ timer_adjust_ptr(info->timer[c], period, attotime_zero);
+ }
+}
+
+
+static unsigned char Y8950PortHandler_r(void *param)
+{
+ struct y8950_info *info = param;
+ if (info->intf->portread)
+ return info->intf->portread(info->index);
+ return 0;
+}
+
+static void Y8950PortHandler_w(void *param,unsigned char data)
+{
+ struct y8950_info *info = param;
+ if (info->intf->portwrite)
+ info->intf->portwrite(info->index,data);
+}
+
+static unsigned char Y8950KeyboardHandler_r(void *param)
+{
+ struct y8950_info *info = param;
+ if (info->intf->keyboardread)
+ return info->intf->keyboardread(info->index);
+ return 0;
+}
+
+static void Y8950KeyboardHandler_w(void *param,unsigned char data)
+{
+ struct y8950_info *info = param;
+ if (info->intf->keyboardwrite)
+ info->intf->keyboardwrite(info->index,data);
+}
+
+static void y8950_stream_update(void *param, stream_sample_t **inputs, stream_sample_t **buffer, int length)
+{
+ struct y8950_info *info = param;
+ Y8950UpdateOne(info->chip, buffer[0], length);
+}
+
+static void _stream_update_8950(void *param, int interval)
+{
+ struct y8950_info *info = param;
+ stream_update(info->stream);
+}
+
+
+static void *y8950_start(int sndindex, int clock, const void *config)
+{
+ static const struct Y8950interface dummy = { 0 };
+ struct y8950_info *info;
+ int rate = clock/72;
+
+ info = auto_malloc(sizeof(*info));
+ memset(info, 0, sizeof(*info));
+
+ info->intf = config ? config : &dummy;
+ info->index = sndindex;
+
+ /* stream system initialize */
+ info->chip = Y8950Init(sndindex,clock,rate);
+ if (!info->chip)
+ return NULL;
+
+ /* ADPCM ROM data */
+ Y8950SetDeltaTMemory(info->chip,
+ (void *)(memory_region(info->intf->rom_region)),
+ memory_region_length(info->intf->rom_region) );
+
+ info->stream = stream_create(0,1,rate,info,y8950_stream_update);
+
+ /* port and keyboard handler */
+ Y8950SetPortHandler(info->chip, Y8950PortHandler_w, Y8950PortHandler_r, info);
+ Y8950SetKeyboardHandler(info->chip, Y8950KeyboardHandler_w, Y8950KeyboardHandler_r, info);
+
+ /* Y8950 setup */
+ Y8950SetTimerHandler (info->chip, TimerHandler_8950, info);
+ Y8950SetIRQHandler (info->chip, IRQHandler_8950, info);
+ Y8950SetUpdateHandler(info->chip, _stream_update_8950, info);
+
+ info->timer[0] = timer_alloc_ptr(timer_callback_8950_0, info);
+ info->timer[1] = timer_alloc_ptr(timer_callback_8950_1, info);
+
+ return info;
+}
+
+static void y8950_stop(void *token)
+{
+ struct y8950_info *info = token;
+ Y8950Shutdown(info->chip);
+}
+
+static void y8950_reset(void *token)
+{
+ struct y8950_info *info = token;
+ Y8950ResetChip(info->chip);
+}
+
+WRITE8_HANDLER( Y8950_control_port_0_w ) {
+ struct y8950_info *info = sndti_token(SOUND_Y8950, 0);
+ Y8950Write(info->chip, 0, data);
+}
+WRITE8_HANDLER( Y8950_write_port_0_w ) {
+ struct y8950_info *info = sndti_token(SOUND_Y8950, 0);
+ Y8950Write(info->chip, 1, data);
+}
+READ8_HANDLER( Y8950_status_port_0_r ) {
+ struct y8950_info *info = sndti_token(SOUND_Y8950, 0);
+ return Y8950Read(info->chip, 0);
+}
+READ8_HANDLER( Y8950_read_port_0_r ) {
+ struct y8950_info *info = sndti_token(SOUND_Y8950, 0);
+ return Y8950Read(info->chip, 1);
+}
+
+
+WRITE8_HANDLER( Y8950_control_port_1_w ) {
+ struct y8950_info *info = sndti_token(SOUND_Y8950, 1);
+ Y8950Write(info->chip, 0, data);
+}
+WRITE8_HANDLER( Y8950_write_port_1_w ) {
+ struct y8950_info *info = sndti_token(SOUND_Y8950, 1);
+ Y8950Write(info->chip, 1, data);
+}
+READ8_HANDLER( Y8950_status_port_1_r ) {
+ struct y8950_info *info = sndti_token(SOUND_Y8950, 1);
+ return Y8950Read(info->chip, 0);
+}
+READ8_HANDLER( Y8950_read_port_1_r ) {
+ struct y8950_info *info = sndti_token(SOUND_Y8950, 1);
+ return Y8950Read(info->chip, 1);
+}
+
+/**************************************************************************
+ * Generic get_info
+ **************************************************************************/
+
+static void y8950_set_info(void *token, UINT32 state, sndinfo *info)
+{
+ switch (state)
+ {
+ /* no parameters to set */
+ }
+}
+
+
+void y8950_get_info(void *token, UINT32 state, sndinfo *info)
+{
+ switch (state)
+ {
+ /* --- the following bits of info are returned as 64-bit signed integers --- */
+
+ /* --- the following bits of info are returned as pointers to data or functions --- */
+ case SNDINFO_PTR_SET_INFO: info->set_info = y8950_set_info; break;
+ case SNDINFO_PTR_START: info->start = y8950_start; break;
+ case SNDINFO_PTR_STOP: info->stop = y8950_stop; break;
+ case SNDINFO_PTR_RESET: info->reset = y8950_reset; break;
+
+ /* --- the following bits of info are returned as NULL-terminated strings --- */
+ case SNDINFO_STR_NAME: info->s = "Y8950"; break;
+ case SNDINFO_STR_CORE_FAMILY: info->s = "Yamaha FM"; break;
+ case SNDINFO_STR_CORE_VERSION: info->s = "1.0"; break;
+ case SNDINFO_STR_CORE_FILE: info->s = __FILE__; break;
+ case SNDINFO_STR_CORE_CREDITS: info->s = "Copyright (c) 2004, The MAME Team"; break;
+ }
+}
+
+#endif