/* * digiblaster.c - DigiBlaster DAC/ADC cartridge emulation. * * Written by * Marco van den Heuvel * * This file is part of VICE, the Versatile Commodore Emulator. * See README for copyright notice. * * 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. * */ #include "vice.h" #include #include #include #include "cartio.h" #include "cartridge.h" #include "cmdline.h" #include "digiblaster.h" #include "export.h" #include "lib.h" #include "maincpu.h" #include "plus4mem.h" #include "resources.h" #include "sampler.h" #include "sidcart.h" #include "sound.h" #include "uiapi.h" /* ---------------------------------------------------------------------*/ /* Some prototypes are needed */ static int digiblaster_sound_machine_init(sound_t *psid, int speed, int cycles_per_sec); static void digiblaster_sound_machine_store(sound_t *psid, uint16_t addr, uint8_t val); static void digiblaster_sound_reset(sound_t *psid, CLOCK cpu_clk); #ifdef SOUND_SYSTEM_FLOAT static int digiblaster_sound_machine_calculate_samples(sound_t **psid, float *pbuf, int nr, int sound_chip_channels, CLOCK *delta_t); #else static int digiblaster_sound_machine_calculate_samples(sound_t **psid, int16_t *pbuf, int nr, int sound_output_channels, int sound_chip_channels, CLOCK *delta_t); #endif static int digiblaster_sound_machine_cycle_based(void) { return 0; } static int digiblaster_sound_machine_channels(void) { return 1; } #ifdef SOUND_SYSTEM_FLOAT /* stereo mixing placement of the PLUS4 DigiBlaster cartridge sound */ static sound_chip_mixing_spec_t digiblaster_sound_mixing_spec[SOUND_CHIP_CHANNELS_MAX] = { { 100, /* left channel volume % in case of stereo output, default output to both */ 100 /* right channel volume % in case of stereo output, default output to both */ } }; #endif /* PLUS4 DigiBlaster cartridge sound chip */ static sound_chip_t digiblaster_sound_chip = { NULL, /* NO sound chip open function */ digiblaster_sound_machine_init, /* sound chip init function */ NULL, /* NO sound chip close function */ digiblaster_sound_machine_calculate_samples, /* sound chip calculate samples function */ digiblaster_sound_machine_store, /* sound chip store function */ NULL, /* NO sound chip read function */ digiblaster_sound_reset, /* sound chip reset function */ digiblaster_sound_machine_cycle_based, /* sound chip 'is_cycle_based()' function, chip is NOT cycle based */ digiblaster_sound_machine_channels, /* sound chip 'get_amount_of_channels()' function, sound chip has 1 channel */ #ifdef SOUND_SYSTEM_FLOAT digiblaster_sound_mixing_spec, /* stereo mixing placement specs */ #endif 0 /* sound chip enabled flag, toggled upon device (de-)activation */ }; static uint16_t digiblaster_sound_chip_offset = 0; static sound_dac_t digiblaster_dac; void digiblaster_sound_chip_init(void) { digiblaster_sound_chip_offset = sound_chip_register(&digiblaster_sound_chip); } /* ---------------------------------------------------------------------*/ /* Some prototypes */ static uint8_t digiblaster_read(uint16_t addr); static void digiblaster_store(uint16_t addr, uint8_t value); static io_source_t digiblaster_fd5e_device = { "DigiBlaster", /* name of the device */ IO_DETACH_RESOURCE, /* use resource to detach the device when involved in a read-collision */ "DIGIBLASTER", /* resource to set to '0' */ 0xfd5e, 0xfd5f, 0x01, /* range for the device, regs:$fd5e-$fd5f */ 1, /* read is always valid */ digiblaster_store, /* store function */ NULL, /* NO poke function */ digiblaster_read, /* read function */ NULL, /* TODO: peek function */ NULL, /* nothing to dump */ CARTRIDGE_PLUS4_DIGIBLASTER, /* cartridge id */ IO_PRIO_NORMAL, /* normal priority, device read needs to be checked for collisions */ 0, /* insertion order, gets filled in by the registration function */ IO_MIRROR_NONE /* NO mirroring */ }; static io_source_t digiblaster_fe9e_device = { "DigiBlaster", /* name of the device */ IO_DETACH_RESOURCE, /* use resource to detach the device when involved in a read-collision */ "DIGIBLASTER", /* resource to set to '0' */ 0xfe9e, 0xfe9f, 0x01, /* range for the device, regs:$fe9e-$fe9f */ 1, /* read is always valid */ digiblaster_store, /* store function */ NULL, /* NO poke function */ digiblaster_read, /* read function */ NULL, /* TODO: peek function */ NULL, /* nothing to dump */ CARTRIDGE_PLUS4_DIGIBLASTER, /* cartridge id */ IO_PRIO_NORMAL, /* normal priority, device read needs to be checked for collisions */ 0, /* insertion order, gets filled in by the registration function */ IO_MIRROR_NONE /* NO mirroring */ }; static io_source_list_t *digiblaster_list_item = NULL; static const export_resource_t export_res1 = { CARTRIDGE_PLUS4_NAME_DIGIBLASTER, 0, 0, &digiblaster_fd5e_device, NULL, CARTRIDGE_PLUS4_DIGIBLASTER }; static const export_resource_t export_res2 = { CARTRIDGE_PLUS4_NAME_DIGIBLASTER, 0, 0, NULL, &digiblaster_fe9e_device, CARTRIDGE_PLUS4_DIGIBLASTER }; int digiblaster_set_address(uint16_t addr) { if (digiblaster_sound_chip.chip_enabled) { io_source_unregister(digiblaster_list_item); export_remove(&export_res1); export_remove(&export_res2); if (addr == 0xfd40) { digiblaster_list_item = io_source_register(&digiblaster_fd5e_device); if (export_add(&export_res1) < 0) { return -1; } } else { digiblaster_list_item = io_source_register(&digiblaster_fe9e_device); if (export_add(&export_res2) < 0) { return -1; } } } return 0; } int digiblaster_enabled(void) { return digiblaster_sound_chip.chip_enabled; } static int set_digiblaster_enabled(int value, void *param) { int val = value ? 1 : 0; if (digiblaster_sound_chip.chip_enabled == val) { return 0; } if (val) { export_remove(&export_res1); export_remove(&export_res2); if (sidcart_address == 0xfd40) { digiblaster_list_item = io_source_register(&digiblaster_fd5e_device); if (export_add(&export_res1) < 0) { return -1; } } else { digiblaster_list_item = io_source_register(&digiblaster_fe9e_device); if (export_add(&export_res2) < 0) { return -1; } } sampler_start(SAMPLER_OPEN_MONO, "DigiBlaster"); } else { io_source_unregister(digiblaster_list_item); digiblaster_list_item = NULL; sampler_stop(); } digiblaster_sound_chip.chip_enabled = val ? 1 : 0; return 0; } static const resource_int_t resources_int[] = { { "DIGIBLASTER", 0, RES_EVENT_STRICT, (resource_value_t)0, &digiblaster_sound_chip.chip_enabled, set_digiblaster_enabled, NULL }, RESOURCE_INT_LIST_END }; int digiblaster_resources_init(void) { return resources_register_int(resources_int); } static const cmdline_option_t cmdline_options[] = { { "-digiblaster", SET_RESOURCE, CMDLINE_ATTRIB_NONE, NULL, NULL, "DIGIBLASTER", (resource_value_t)1, NULL, "Enable the digiblaster add-on" }, { "+digiblaster", SET_RESOURCE, CMDLINE_ATTRIB_NONE, NULL, NULL, "DIGIBLASTER", (resource_value_t)0, NULL, "Disable the digiblaster add-on" }, CMDLINE_LIST_END }; int digiblaster_cmdline_options_init(void) { return cmdline_register_options(cmdline_options); } /* ---------------------------------------------------------------------*/ static uint8_t digiblaster_sound_data; struct digiblaster_sound_s { uint8_t voice0; }; static struct digiblaster_sound_s snd; #ifdef SOUND_SYSTEM_FLOAT /* FIXME */ static int digiblaster_sound_machine_calculate_samples(sound_t **psid, float *pbuf, int nr, int scc, CLOCK *delta_t) { return sound_dac_calculate_samples(&digiblaster_dac, pbuf, (int)snd.voice0 * 128, nr); } #else static int digiblaster_sound_machine_calculate_samples(sound_t **psid, int16_t *pbuf, int nr, int soc, int scc, CLOCK *delta_t) { return sound_dac_calculate_samples(&digiblaster_dac, pbuf, (int)snd.voice0 * 128, nr, soc, (soc == SOUND_OUTPUT_STEREO) ? SOUND_CHANNELS_1_AND_2 : SOUND_CHANNEL_1); } #endif static int digiblaster_sound_machine_init(sound_t *psid, int speed, int cycles_per_sec) { sound_dac_init(&digiblaster_dac, speed); snd.voice0 = 0; return 1; } static void digiblaster_sound_machine_store(sound_t *psid, uint16_t addr, uint8_t val) { snd.voice0 = val; } static void digiblaster_sound_reset(sound_t *psid, CLOCK cpu_clk) { snd.voice0 = 0; digiblaster_sound_data = 0; } /* ---------------------------------------------------------------------*/ static void digiblaster_store(uint16_t addr, uint8_t value) { if ((addr & 1) == 0) { digiblaster_sound_data = value; sound_store(digiblaster_sound_chip_offset, value, 0); } } static uint8_t digiblaster_read(uint16_t addr) { if ((addr & 1) == 0) { return sound_read(digiblaster_sound_chip_offset, 0); } return sampler_get_sample(SAMPLER_CHANNEL_DEFAULT); }