diff options
Diffstat (limited to 'src/devices/bus/chanf/slot.c')
-rw-r--r-- | src/devices/bus/chanf/slot.c | 286 |
1 files changed, 286 insertions, 0 deletions
diff --git a/src/devices/bus/chanf/slot.c b/src/devices/bus/chanf/slot.c new file mode 100644 index 00000000000..3bb58417a9c --- /dev/null +++ b/src/devices/bus/chanf/slot.c @@ -0,0 +1,286 @@ +// license:BSD-3-Clause +// copyright-holders:Fabio Priuli +/*********************************************************************************************************** + + Fairchild Channel F cart emulation + (through slot devices) + + ***********************************************************************************************************/ + + +#include "emu.h" +#include "slot.h" + +//************************************************************************** +// GLOBAL VARIABLES +//************************************************************************** + +const device_type CHANF_CART_SLOT = &device_creator<channelf_cart_slot_device>; + +//************************************************************************** +// Channel F cartridges Interface +//************************************************************************** + +//------------------------------------------------- +// device_channelf_cart_interface - constructor +//------------------------------------------------- + +device_channelf_cart_interface::device_channelf_cart_interface(const machine_config &mconfig, device_t &device) + : device_slot_card_interface(mconfig, device), + m_rom(NULL), + m_rom_size(0) +{ +} + + +//------------------------------------------------- +// ~device_channelf_cart_interface - destructor +//------------------------------------------------- + +device_channelf_cart_interface::~device_channelf_cart_interface() +{ +} + +//------------------------------------------------- +// rom_alloc - alloc the space for the cart +//------------------------------------------------- + +void device_channelf_cart_interface::rom_alloc(UINT32 size, const char *tag) +{ + if (m_rom == NULL) + { + m_rom = device().machine().memory().region_alloc(std::string(tag).append(CHANFSLOT_ROM_REGION_TAG).c_str(), size, 1, ENDIANNESS_LITTLE)->base(); + m_rom_size = size; + } +} + + +//------------------------------------------------- +// ram_alloc - alloc the space for the ram +//------------------------------------------------- + +void device_channelf_cart_interface::ram_alloc(UINT32 size) +{ + m_ram.resize(size); +} + + +//************************************************************************** +// LIVE DEVICE +//************************************************************************** + +//------------------------------------------------- +// channelf_cart_slot_device - constructor +//------------------------------------------------- +channelf_cart_slot_device::channelf_cart_slot_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock) : + device_t(mconfig, CHANF_CART_SLOT, "Fairchild Channel F Cartridge Slot", tag, owner, clock, "cf_cart_slot", __FILE__), + device_image_interface(mconfig, *this), + device_slot_interface(mconfig, *this), + m_type(CF_CHESS) +{ +} + + +//------------------------------------------------- +// ~channelf_cart_slot_device - destructor +//------------------------------------------------- + +channelf_cart_slot_device::~channelf_cart_slot_device() +{ +} + +//------------------------------------------------- +// device_start - device-specific startup +//------------------------------------------------- + +void channelf_cart_slot_device::device_start() +{ + m_cart = dynamic_cast<device_channelf_cart_interface *>(get_card_device()); +} + +//------------------------------------------------- +// device_config_complete - perform any +// operations now that the configuration is +// complete +//------------------------------------------------- + +void channelf_cart_slot_device::device_config_complete() +{ + // set brief and instance name + update_names(); +} + + +//------------------------------------------------- +// Channel F PCB +//------------------------------------------------- + +struct chanf_slot +{ + int pcb_id; + const char *slot_option; +}; + +// Here, we take the feature attribute from .xml (i.e. the PCB name) and we assign a unique ID to it +static const chanf_slot slot_list[] = +{ + { CF_STD, "std" }, + { CF_MAZE, "maze" }, + { CF_HANGMAN, "hangman" }, + { CF_CHESS, "chess" }, + { CF_MULTI_OLD,"multi_old" }, + { CF_MULTI, "multi" } +}; + +static int chanf_get_pcb_id(const char *slot) +{ + for (int i = 0; i < ARRAY_LENGTH(slot_list); i++) + { + if (!core_stricmp(slot_list[i].slot_option, slot)) + return slot_list[i].pcb_id; + } + + return 0; +} + +static const char *chanf_get_slot(int type) +{ + for (int i = 0; i < ARRAY_LENGTH(slot_list); i++) + { + if (slot_list[i].pcb_id == type) + return slot_list[i].slot_option; + } + + return "chess"; +} + + +/*------------------------------------------------- + call load + -------------------------------------------------*/ + +bool channelf_cart_slot_device::call_load() +{ + if (m_cart) + { + UINT32 len = (software_entry() == NULL) ? length() : get_software_region_length("rom"); + m_cart->rom_alloc(len, tag()); + + if (software_entry() == NULL) + fread(m_cart->get_rom_base(), len); + else + memcpy(m_cart->get_rom_base(), get_software_region("rom"), len); + + if (software_entry() == NULL) + { + // we default to "chess" slot because some homebrew programs have been written to run + // on PCBs with RAM at $2000-$2800 as Saba Schach! + if (len == 0x40000) + m_type = CF_MULTI; // TODO1: differentiate multicart final and earlier from fullpath + else + m_type = CF_CHESS; // TODO2: is there any way to detect Maze and Hangman from fullpath? + + m_cart->ram_alloc(0x800); + } + else + { + const char *pcb_name = get_feature("slot"); + if (pcb_name) + m_type = chanf_get_pcb_id(pcb_name); + + if (get_software_region("ram")) + m_cart->ram_alloc(get_software_region_length("ram")); + } + + //printf("Type: %s\n", chanf_get_slot(m_type)); + + return IMAGE_INIT_PASS; + } + + return IMAGE_INIT_PASS; +} + + +/*------------------------------------------------- + call softlist load + -------------------------------------------------*/ + +bool channelf_cart_slot_device::call_softlist_load(software_list_device &swlist, const char *swname, const rom_entry *start_entry) +{ + load_software_part_region(*this, swlist, swname, start_entry); + return TRUE; +} + + + +/*------------------------------------------------- + get default card software + -------------------------------------------------*/ + +void channelf_cart_slot_device::get_default_card_software(std::string &result) +{ + if (open_image_file(mconfig().options())) + { + const char *slot_string = "chess"; + UINT32 len = core_fsize(m_file); + int type; + + if (len == 0x40000) + type = CF_MULTI; + else + type = CF_CHESS; // is there any way to detect the other carts from fullpath? + + slot_string = chanf_get_slot(type); + + //printf("type: %s\n", slot_string); + clear(); + + result.assign(slot_string); + return; + } + software_get_default_slot(result, "chess"); +} + +/*------------------------------------------------- + read + -------------------------------------------------*/ + +READ8_MEMBER(channelf_cart_slot_device::read_rom) +{ + if (m_cart) + return m_cart->read_rom(space, offset); + else + return 0xff; +} + +/*------------------------------------------------- + read + -------------------------------------------------*/ + +READ8_MEMBER(channelf_cart_slot_device::read_ram) +{ + if (m_cart) + return m_cart->read_ram(space, offset); + else + return 0xff; +} + +/*------------------------------------------------- + write + -------------------------------------------------*/ + +WRITE8_MEMBER(channelf_cart_slot_device::write_ram) +{ + if (m_cart) + m_cart->write_ram(space, offset, data); +} + +/*------------------------------------------------- + write + -------------------------------------------------*/ + +WRITE8_MEMBER(channelf_cart_slot_device::write_bank) +{ + if (m_cart) + m_cart->write_bank(space, offset, data); +} |