/*************************************************************************** 2610intf.c The YM2610 emulator supports up to 2 chips. Each chip has the following connections: - Status Read / Control Write A - Port Read / Data Write A - Control Write B - Data Write B ***************************************************************************/ #include "emu.h" #include "streams.h" #include "ay8910.h" #include "2610intf.h" #include "fm.h" typedef struct _ym2610_state ym2610_state; struct _ym2610_state { sound_stream * stream; emu_timer * timer[2]; void * chip; void * psg; const ym2610_interface *intf; running_device *device; }; INLINE ym2610_state *get_safe_token(running_device *device) { assert(device != NULL); assert(device->token != NULL); assert(device->type == SOUND); assert(sound_get_type(device) == SOUND_YM2610 || sound_get_type(device) == SOUND_YM2610B); return (ym2610_state *)device->token; } static void psg_set_clock(void *param, int clock) { ym2610_state *info = (ym2610_state *)param; ay8910_set_clock_ym(info->psg, clock); } static void psg_write(void *param, int address, int data) { ym2610_state *info = (ym2610_state *)param; ay8910_write_ym(info->psg, address, data); } static int psg_read(void *param) { ym2610_state *info = (ym2610_state *)param; return ay8910_read_ym(info->psg); } static void psg_reset(void *param) { ym2610_state *info = (ym2610_state *)param; ay8910_reset_ym(info->psg); } static const ssg_callbacks psgintf = { psg_set_clock, psg_write, psg_read, psg_reset }; /*------------------------- TM2610 -------------------------------*/ /* IRQ Handler */ static void IRQHandler(void *param,int irq) { ym2610_state *info = (ym2610_state *)param; if(info->intf->handler) info->intf->handler(info->device, irq); } /* Timer overflow callback from timer.c */ static TIMER_CALLBACK( timer_callback_0 ) { ym2610_state *info = (ym2610_state *)ptr; ym2610_timer_over(info->chip,0); } static TIMER_CALLBACK( timer_callback_1 ) { ym2610_state *info = (ym2610_state *)ptr; ym2610_timer_over(info->chip,1); } static void timer_handler(void *param,int c,int count,int clock) { ym2610_state *info = (ym2610_state *)param; if( count == 0 ) { /* Reset FM Timer */ timer_enable(info->timer[c], 0); } else { /* Start FM Timer */ attotime period = attotime_mul(ATTOTIME_IN_HZ(clock), count); if (!timer_enable(info->timer[c], 1)) timer_adjust_oneshot(info->timer[c], period, 0); } } /* update request from fm.c */ void ym2610_update_request(void *param) { ym2610_state *info = (ym2610_state *)param; stream_update(info->stream); } static STREAM_UPDATE( ym2610_stream_update ) { ym2610_state *info = (ym2610_state *)param; ym2610_update_one(info->chip, outputs, samples); } static STREAM_UPDATE( ym2610b_stream_update ) { ym2610_state *info = (ym2610_state *)param; ym2610b_update_one(info->chip, outputs, samples); } static STATE_POSTLOAD( ym2610_intf_postload ) { ym2610_state *info = (ym2610_state *)param; ym2610_postload(info->chip); } static DEVICE_START( ym2610 ) { static const ym2610_interface generic_2610 = { 0 }; static const ay8910_interface generic_ay8910 = { AY8910_LEGACY_OUTPUT | AY8910_SINGLE_OUTPUT, AY8910_DEFAULT_LOADS, DEVCB_NULL, DEVCB_NULL, DEVCB_NULL, DEVCB_NULL }; const ym2610_interface *intf = device->baseconfig().static_config ? (const ym2610_interface *)device->baseconfig().static_config : &generic_2610; int rate = device->clock/72; void *pcmbufa,*pcmbufb; int pcmsizea,pcmsizeb; ym2610_state *info = get_safe_token(device); astring name; sound_type type = sound_get_type(device); info->intf = intf; info->device = device; info->psg = ay8910_start_ym(NULL, sound_get_type(device), device, device->clock, &generic_ay8910); assert_always(info->psg != NULL, "Error creating YM2610/AY8910 chip"); /* Timer Handler set */ info->timer[0] = timer_alloc(device->machine, timer_callback_0, info); info->timer[1] = timer_alloc(device->machine, timer_callback_1, info); /* stream system initialize */ info->stream = stream_create(device,0,2,rate,info,(type == SOUND_YM2610) ? ym2610_stream_update : ym2610b_stream_update); /* setup adpcm buffers */ pcmbufa = *device->region; pcmsizea = device->region->bytes(); name.printf("%s.deltat", device->tag.cstr()); pcmbufb = (void *)(memory_region(device->machine, name)); pcmsizeb = memory_region_length(device->machine, name); if (pcmbufb == NULL || pcmsizeb == 0) { pcmbufb = pcmbufa; pcmsizeb = pcmsizea; } /**** initialize YM2610 ****/ info->chip = ym2610_init(info,device,device->clock,rate, pcmbufa,pcmsizea,pcmbufb,pcmsizeb, timer_handler,IRQHandler,&psgintf); assert_always(info->chip != NULL, "Error creating YM2610 chip"); state_save_register_postload(device->machine, ym2610_intf_postload, info); } static DEVICE_STOP( ym2610 ) { ym2610_state *info = get_safe_token(device); ym2610_shutdown(info->chip); ay8910_stop_ym(info->psg); } static DEVICE_RESET( ym2610 ) { ym2610_state *info = get_safe_token(device); ym2610_reset_chip(info->chip); } READ8_DEVICE_HANDLER( ym2610_r ) { ym2610_state *info = get_safe_token(device); return ym2610_read(info->chip, offset & 3); } WRITE8_DEVICE_HANDLER( ym2610_w ) { ym2610_state *info = get_safe_token(device); ym2610_write(info->chip, offset & 3, data); } READ8_DEVICE_HANDLER( ym2610_status_port_a_r ) { return ym2610_r(device, 0); } READ8_DEVICE_HANDLER( ym2610_status_port_b_r ) { return ym2610_r(device, 2); } READ8_DEVICE_HANDLER( ym2610_read_port_r ) { return ym2610_r(device, 1); } WRITE8_DEVICE_HANDLER( ym2610_control_port_a_w ) { ym2610_w(device, 0, data); } WRITE8_DEVICE_HANDLER( ym2610_control_port_b_w ) { ym2610_w(device, 2, data); } WRITE8_DEVICE_HANDLER( ym2610_data_port_a_w ) { ym2610_w(device, 1, data); } WRITE8_DEVICE_HANDLER( ym2610_data_port_b_w ) { ym2610_w(device, 3, data); } /************************************************************************** * Generic get_info **************************************************************************/ DEVICE_GET_INFO( ym2610 ) { switch (state) { /* --- the following bits of info are returned as 64-bit signed integers --- */ case DEVINFO_INT_TOKEN_BYTES: info->i = sizeof(ym2610_state); break; /* --- the following bits of info are returned as pointers to data or functions --- */ case DEVINFO_FCT_START: info->start = DEVICE_START_NAME( ym2610 ); break; case DEVINFO_FCT_STOP: info->stop = DEVICE_STOP_NAME( ym2610 ); break; case DEVINFO_FCT_RESET: info->reset = DEVICE_RESET_NAME( ym2610 ); break; /* --- the following bits of info are returned as NULL-terminated strings --- */ case DEVINFO_STR_NAME: strcpy(info->s, "YM2610"); break; case DEVINFO_STR_FAMILY: strcpy(info->s, "Yamaha FM"); break; case DEVINFO_STR_VERSION: strcpy(info->s, "1.0"); break; case DEVINFO_STR_SOURCE_FILE: strcpy(info->s, __FILE__); break; case DEVINFO_STR_CREDITS: strcpy(info->s, "Copyright Nicola Salmoria and the MAME Team"); break; } } DEVICE_GET_INFO( ym2610b ) { switch (state) { /* --- the following bits of info are returned as NULL-terminated strings --- */ case DEVINFO_STR_NAME: strcpy(info->s, "YM2610B"); break; default: DEVICE_GET_INFO_CALL(ym2610); break; } }