// license:BSD-3-Clause // copyright-holders:Fabio Priuli /*********************************************************************************************************** PC-Engine / Turbografx-16 cart emulation (through slot devices) TODO: - reimplement cart mirroring in a better way ***********************************************************************************************************/ #include "emu.h" #include "pce_slot.h" //************************************************************************** // GLOBAL VARIABLES //************************************************************************** DEFINE_DEVICE_TYPE(PCE_CART_SLOT, pce_cart_slot_device, "pce_cart_slot", "PCE/TG16 Cartridge Slot") //************************************************************************** // PCE cartridges Interface //************************************************************************** //------------------------------------------------- // device_pce_cart_interface - constructor //------------------------------------------------- device_pce_cart_interface::device_pce_cart_interface(const machine_config &mconfig, device_t &device) : device_slot_card_interface(mconfig, device), m_rom(nullptr), m_rom_size(0) { } //------------------------------------------------- // ~device_pce_cart_interface - destructor //------------------------------------------------- device_pce_cart_interface::~device_pce_cart_interface() { } //------------------------------------------------- // rom_alloc - alloc the space for the cart //------------------------------------------------- void device_pce_cart_interface::rom_alloc(uint32_t size, const char *tag) { if (m_rom == nullptr) { m_rom = device().machine().memory().region_alloc(std::string(tag).append(PCESLOT_ROM_REGION_TAG).c_str(), size, 1, ENDIANNESS_LITTLE)->base(); m_rom_size = size; } } //------------------------------------------------- // ram_alloc - alloc the space for the ram //------------------------------------------------- void device_pce_cart_interface::ram_alloc(uint32_t size) { m_ram.resize(size); device().save_item(NAME(m_ram)); } //------------------------------------------------- // rom_map_setup - setup map of rom banks in 128K // blocks, so to simplify ROM access to mirror //------------------------------------------------- void device_pce_cart_interface::rom_map_setup(uint32_t size) { if (size == 0x60000) { // HuCard 384K are mapped with mirrored pieces rom_bank_map[0] = 0; rom_bank_map[1] = 1; rom_bank_map[2] = 0; rom_bank_map[3] = 1; rom_bank_map[4] = 2; rom_bank_map[5] = 2; rom_bank_map[6] = 2; rom_bank_map[7] = 2; } else if (size == 0x30000) { // 192K images (some demos) rom_bank_map[0] = 0; rom_bank_map[1] = 1; rom_bank_map[2] = 2; rom_bank_map[3] = 2; rom_bank_map[4] = 0; rom_bank_map[5] = 1; rom_bank_map[6] = 2; rom_bank_map[7] = 2; } else { int i; // setup the rom_bank_map array to faster ROM read for (i = 0; i < size / 0x20000 && i < 8; i++) rom_bank_map[i] = i; // fill up remaining blocks with mirrors while (i % 8) { int j = 0, repeat_banks; while ((i % (8 >> j)) && j < 3) j++; repeat_banks = i % (8 >> (j - 1)); for (int k = 0; k < repeat_banks; k++) rom_bank_map[i + k] = rom_bank_map[i + k - repeat_banks]; i += repeat_banks; } } // check bank map! // for (i = 0; i < 8; i++) // { // printf("bank %3d = %3d\t", i, rom_bank_map[i]); // } } //************************************************************************** // LIVE DEVICE //************************************************************************** //------------------------------------------------- // pce_cart_slot_device - constructor //------------------------------------------------- pce_cart_slot_device::pce_cart_slot_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock) : device_t(mconfig, PCE_CART_SLOT, tag, owner, clock), device_image_interface(mconfig, *this), device_slot_interface(mconfig, *this), m_interface("pce_cart"), m_type(PCE_STD), m_cart(nullptr) { } //------------------------------------------------- // pce_cart_slot_device - destructor //------------------------------------------------- pce_cart_slot_device::~pce_cart_slot_device() { } //------------------------------------------------- // device_start - device-specific startup //------------------------------------------------- void pce_cart_slot_device::device_start() { m_cart = dynamic_cast(get_card_device()); } //------------------------------------------------- // PCE PCB //------------------------------------------------- struct pce_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 pce_slot slot_list[] = { { PCE_STD, "rom" }, { PCE_CDSYS3U, "cdsys3u" }, { PCE_CDSYS3J, "cdsys3j" }, { PCE_POPULOUS, "populous" }, { PCE_SF2, "sf2" }, }; static int pce_get_pcb_id(const char *slot) { for (auto & elem : slot_list) { if (!core_stricmp(elem.slot_option, slot)) return elem.pcb_id; } return 0; } static const char *pce_get_slot(int type) { for (auto & elem : slot_list) { if (elem.pcb_id == type) return elem.slot_option; } return "rom"; } /*------------------------------------------------- call load -------------------------------------------------*/ image_init_result pce_cart_slot_device::call_load() { if (m_cart) { uint32_t offset; uint32_t len = !loaded_through_softlist() ? length() : get_software_region_length("rom"); uint8_t *ROM; // From fullpath, check for presence of a header and skip it if (!loaded_through_softlist() && (len % 0x4000) == 512) { logerror("Rom-header found, skipping\n"); offset = 512; len -= offset; fseek(offset, SEEK_SET); } m_cart->rom_alloc(len, tag()); ROM = m_cart->get_rom_base(); if (!loaded_through_softlist()) fread(ROM, len); else memcpy(ROM, get_software_region("rom"), len); // check for encryption (US carts) if (ROM[0x1fff] < 0xe0) { uint8_t decrypted[256]; /* Initialize decryption table */ for (int i = 0; i < 256; i++) decrypted[i] = ((i & 0x01) << 7) | ((i & 0x02) << 5) | ((i & 0x04) << 3) | ((i & 0x08) << 1) | ((i & 0x10) >> 1) | ((i & 0x20 ) >> 3) | ((i & 0x40) >> 5) | ((i & 0x80) >> 7); /* Decrypt ROM image */ for (int i = 0; i < len; i++) ROM[i] = decrypted[ROM[i]]; } m_cart->rom_map_setup(len); if (!loaded_through_softlist()) m_type = get_cart_type(ROM, len); else { const char *pcb_name = get_feature("slot"); if (pcb_name) m_type = pce_get_pcb_id(pcb_name); } //printf("Type: %s\n", pce_get_slot(m_type)); if (m_type == PCE_POPULOUS) m_cart->ram_alloc(0x8000); if (m_type == PCE_CDSYS3J || m_type == PCE_CDSYS3U) m_cart->ram_alloc(0x30000); return image_init_result::PASS; } return image_init_result::PASS; } /*------------------------------------------------- call_unload -------------------------------------------------*/ void pce_cart_slot_device::call_unload() { } /*------------------------------------------------- get_cart_type - code to detect NVRAM type from fullpath -------------------------------------------------*/ int pce_cart_slot_device::get_cart_type(const uint8_t *ROM, uint32_t len) { int type = PCE_STD; /* Check for Street fighter 2 */ if (len == 0x280000) type = PCE_SF2; /* Check for Populous */ if (len >= (0x1f26 + 8) && !memcmp(ROM + 0x1f26, "POPULOUS", 8)) type = PCE_POPULOUS; // Check for CD system card v3 which adds on-cart RAM to the system if (len >= (0x3ffb6 + 23) && !memcmp(ROM + 0x3ffb6, "PC Engine CD-ROM SYSTEM", 23)) { /* Check if 192KB additional system card ram should be used */ if (!memcmp(ROM + 0x29d1, "VER. 3.", 7)) { type = PCE_CDSYS3J; } // JP version else if (!memcmp(ROM + 0x29c4, "VER. 3.", 7 )) { type = PCE_CDSYS3U; } // US version } return type; } /*------------------------------------------------- get default card software -------------------------------------------------*/ std::string pce_cart_slot_device::get_default_card_software(get_default_card_software_hook &hook) const { if (hook.image_file()) { const char *slot_string; uint32_t len = hook.image_file()->size(); std::vector rom(len); int type; hook.image_file()->read(&rom[0], len); type = get_cart_type(&rom[0], len); slot_string = pce_get_slot(type); //printf("type: %s\n", slot_string); return std::string(slot_string); } return software_get_default_slot("rom"); } /*------------------------------------------------- read -------------------------------------------------*/ READ8_MEMBER(pce_cart_slot_device::read_cart) { if (m_cart) return m_cart->read_cart(space, offset); else return 0xff; } /*------------------------------------------------- write -------------------------------------------------*/ WRITE8_MEMBER(pce_cart_slot_device::write_cart) { if (m_cart) m_cart->write_cart(space, offset, data); }