// license:BSD-3-Clause // copyright-holders:Ville Linde /* Konami PowerPC-based 3D games common functions */ #include "emu.h" #include "cpu/sharc/sharc.h" #include "machine/k033906.h" #include "video/voodoo.h" #include "konppc.h" #define DSP_BANK_SIZE 0x10000 #define DSP_BANK_SIZE_WORD (DSP_BANK_SIZE / 4) /*****************************************************************************/ const device_type KONPPC = &device_creator; konppc_device::konppc_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock) : device_t(mconfig, KONPPC, "Konami PowerPC Common Functions", tag, owner, clock, "konppc", __FILE__), cgboard_type(0), num_cgboards(0)/*, cgboard_id(MAX_CG_BOARDS)*/ { } //void konppc_device::init_konami_cgboard(running_machine &machine, int num_boards, int type) void konppc_device::device_start() { int i; for (i=0; i < num_cgboards; i++) { dsp_comm_ppc[i][0] = 0x00; dsp_shared_ram[i] = auto_alloc_array(machine(), UINT32, DSP_BANK_SIZE * 2/4); dsp_shared_ram_bank[i] = 0; dsp_state[i] = 0x80; texture_bank[i] = nullptr; nwk_device_sel[i] = 0; nwk_fifo_read_ptr[i] = 0; nwk_fifo_write_ptr[i] = 0; nwk_fifo[i] = auto_alloc_array(machine(), UINT32, 0x800); nwk_ram[i] = auto_alloc_array(machine(), UINT32, 0x2000); save_item(NAME(dsp_comm_ppc[i]), i); save_item(NAME(dsp_comm_sharc[i]), i); save_item(NAME(dsp_shared_ram_bank[i]), i); save_pointer(NAME(dsp_shared_ram[i]), DSP_BANK_SIZE * 2 / sizeof(dsp_shared_ram[i][0]), i); save_item(NAME(dsp_state[i]), i); save_item(NAME(nwk_device_sel[i]), i); save_item(NAME(nwk_fifo_read_ptr[i]), i); save_item(NAME(nwk_fifo_write_ptr[i]), i); save_pointer(NAME(nwk_fifo[i]), 0x800, i); save_pointer(NAME(nwk_ram[i]), 0x2000, i); } save_item(NAME(cgboard_id)); if (cgboard_type == CGBOARD_TYPE_NWKTR) { nwk_fifo_half_full_r = 0x100; nwk_fifo_half_full_w = 0xff; nwk_fifo_full = 0x1ff; nwk_fifo_mask = 0x1ff; } if (cgboard_type == CGBOARD_TYPE_HANGPLT) { nwk_fifo_half_full_r = 0x3ff; nwk_fifo_half_full_w = 0x400; nwk_fifo_full = 0x7ff; nwk_fifo_mask = 0x7ff; } } void konppc_device::set_cgboard_id(int board_id) { if (board_id > num_cgboards-1) { cgboard_id = MAX_CG_BOARDS; } else { cgboard_id = board_id; } } int konppc_device::get_cgboard_id(void) { if (cgboard_id > num_cgboards-1) { return 0; } else { return cgboard_id; } } void konppc_device::set_cgboard_texture_bank(int board, const char *bank, UINT8 *rom) { texture_bank[board] = bank; machine().root_device().membank(bank)->configure_entries(0, 2, rom, 0x800000); } /*****************************************************************************/ /* CG Board DSP interface for PowerPC */ READ32_MEMBER( konppc_device::cgboard_dsp_comm_r_ppc ) { if (cgboard_id < MAX_CG_BOARDS) { // osd_printf_debug("dsp_cmd_r: (board %d) %08X, %08X at %08X\n", cgboard_id, offset, mem_mask, space.device().safe_pc()); return dsp_comm_sharc[cgboard_id][offset] | (dsp_state[cgboard_id] << 16); } else { return 0; } } WRITE32_MEMBER( konppc_device::cgboard_dsp_comm_w_ppc ) { const char *dsptag = (cgboard_id == 0) ? "dsp" : "dsp2"; const char *pcitag = (cgboard_id == 0) ? "k033906_1" : "k033906_2"; device_t *dsp = space.machine().device(dsptag); k033906_device *k033906 = space.machine().device(pcitag); // osd_printf_debug("dsp_cmd_w: (board %d) %08X, %08X, %08X at %08X\n", cgboard_id, data, offset, mem_mask, space.device().safe_pc()); if (cgboard_id < MAX_CG_BOARDS) { if (offset == 0) { if (ACCESSING_BITS_24_31) { assert(cgboard_id >= 0); dsp_shared_ram_bank[cgboard_id] = (data >> 24) & 0x1; if (data & 0x80000000) dsp_state[cgboard_id] |= 0x10; if (k033906 != nullptr) /* zr107.c has no PCI and some games only have one PCI Bridge */ k033906->set_reg((data & 0x20000000) ? 1 : 0); if (data & 0x10000000) dsp->execute().set_input_line(INPUT_LINE_RESET, CLEAR_LINE); else dsp->execute().set_input_line(INPUT_LINE_RESET, ASSERT_LINE); if (data & 0x02000000) dsp->execute().set_input_line(INPUT_LINE_IRQ0, ASSERT_LINE); if (data & 0x04000000) dsp->execute().set_input_line(INPUT_LINE_IRQ1, ASSERT_LINE); } if (ACCESSING_BITS_0_7) dsp_comm_ppc[cgboard_id][offset] = data & 0xff; } else dsp_comm_ppc[cgboard_id][offset] = data; } } READ32_MEMBER( konppc_device::cgboard_dsp_shared_r_ppc ) { if (cgboard_id < MAX_CG_BOARDS) { return dsp_shared_ram[cgboard_id][offset + (dsp_shared_ram_bank[cgboard_id] * DSP_BANK_SIZE_WORD)]; } else { return 0; } } WRITE32_MEMBER( konppc_device::cgboard_dsp_shared_w_ppc ) { if (cgboard_id < MAX_CG_BOARDS) { space.machine().scheduler().trigger(10000); // Remove the timeout (a part of the GTI Club FIFO test workaround) COMBINE_DATA(dsp_shared_ram[cgboard_id] + (offset + (dsp_shared_ram_bank[cgboard_id] * DSP_BANK_SIZE_WORD))); } } /*****************************************************************************/ /* CG Board DSP interface for SHARC */ UINT32 konppc_device::dsp_comm_sharc_r(int board, int offset) { return dsp_comm_ppc[board][offset]; } void konppc_device::dsp_comm_sharc_w(address_space &space, int board, int offset, UINT32 data) { if (offset >= 2) { fatalerror("dsp_comm_w: %08X, %08X\n", data, offset); } switch (cgboard_type) { case CGBOARD_TYPE_ZR107: case CGBOARD_TYPE_GTICLUB: { //machine.device("dsp")->execute().set_input_line(SHARC_INPUT_FLAG0, ASSERT_LINE); space.machine().device("dsp")->set_flag_input(0, ASSERT_LINE); if (offset == 1) { if (data & 0x03) space.machine().device("dsp")->set_input_line(INPUT_LINE_IRQ2, ASSERT_LINE); } break; } case CGBOARD_TYPE_NWKTR: case CGBOARD_TYPE_HANGPLT: { const char *dsptag = (board == 0) ? "dsp" : "dsp2"; adsp21062_device *device = space.machine().device(dsptag); if (offset == 1) { nwk_device_sel[board] = data; if (data & 0x01 || data & 0x10) { device->set_flag_input(1, ASSERT_LINE); } if (texture_bank[board] != nullptr) { int offset = (data & 0x08) ? 1 : 0; space.machine().root_device().membank(texture_bank[board])->set_entry(offset); } } break; } case CGBOARD_TYPE_HORNET: { if (offset == 1) { if (texture_bank[board] != nullptr) { int offset = (data & 0x08) ? 1 : 0; space.machine().root_device().membank(texture_bank[board])->set_entry(offset); } } break; } } // printf("%s:cgboard_dsp_comm_w_sharc: %08X, %08X, %08X\n", space.machine().describe_context(), data, offset, mem_mask); dsp_comm_sharc[board][offset] = data; } UINT32 konppc_device::dsp_shared_ram_r_sharc(int board, int offset) { // printf("dsp_shared_r: (board %d) %08X, (%08X, %08X)\n", cgboard_id, offset, (UINT32)dsp_shared_ram[(offset >> 1)], (UINT32)dsp_shared_ram[offset]); if (offset & 0x1) { return (dsp_shared_ram[board][(offset >> 1) + ((dsp_shared_ram_bank[board] ^ 1) * DSP_BANK_SIZE_WORD)] >> 0) & 0xffff; } else { return (dsp_shared_ram[board][(offset >> 1) + ((dsp_shared_ram_bank[board] ^ 1) * DSP_BANK_SIZE_WORD)] >> 16) & 0xffff; } } void konppc_device::dsp_shared_ram_w_sharc(int board, int offset, UINT32 data) { // printf("dsp_shared_w: (board %d) %08X, %08X\n", cgboard_id, offset, data); if (offset & 0x1) { dsp_shared_ram[board][(offset >> 1) + ((dsp_shared_ram_bank[board] ^ 1) * DSP_BANK_SIZE_WORD)] &= 0xffff0000; dsp_shared_ram[board][(offset >> 1) + ((dsp_shared_ram_bank[board] ^ 1) * DSP_BANK_SIZE_WORD)] |= (data & 0xffff); } else { dsp_shared_ram[board][(offset >> 1) + ((dsp_shared_ram_bank[board] ^ 1) * DSP_BANK_SIZE_WORD)] &= 0x0000ffff; dsp_shared_ram[board][(offset >> 1) + ((dsp_shared_ram_bank[board] ^ 1) * DSP_BANK_SIZE_WORD)] |= ((data & 0xffff) << 16); } } READ32_MEMBER( konppc_device::cgboard_0_comm_sharc_r ) { return dsp_comm_sharc_r(0, offset); } WRITE32_MEMBER( konppc_device::cgboard_0_comm_sharc_w ) { dsp_comm_sharc_w(space, 0, offset, data); } READ32_MEMBER( konppc_device::cgboard_0_shared_sharc_r ) { return dsp_shared_ram_r_sharc(0, offset); } WRITE32_MEMBER( konppc_device::cgboard_0_shared_sharc_w ) { dsp_shared_ram_w_sharc(0, offset, data); } READ32_MEMBER( konppc_device::cgboard_1_comm_sharc_r ) { return dsp_comm_sharc_r(1, offset); } WRITE32_MEMBER( konppc_device::cgboard_1_comm_sharc_w ) { dsp_comm_sharc_w(space, 1, offset, data); } READ32_MEMBER( konppc_device::cgboard_1_shared_sharc_r ) { return dsp_shared_ram_r_sharc(1, offset); } WRITE32_MEMBER( konppc_device::cgboard_1_shared_sharc_w ) { dsp_shared_ram_w_sharc(1, offset, data); } /*****************************************************************************/ UINT32 konppc_device::nwk_fifo_r(address_space &space, int board) { const char *dsptag = (board == 0) ? "dsp" : "dsp2"; adsp21062_device *device = space.machine().device(dsptag); UINT32 data; if (nwk_fifo_read_ptr[board] < nwk_fifo_half_full_r) { device->set_flag_input(1, CLEAR_LINE); } else { device->set_flag_input(1, ASSERT_LINE); } if (nwk_fifo_read_ptr[board] < nwk_fifo_full) { device->set_flag_input(2, ASSERT_LINE); } else { device->set_flag_input(2, CLEAR_LINE); } data = nwk_fifo[board][nwk_fifo_read_ptr[board]]; nwk_fifo_read_ptr[board]++; nwk_fifo_read_ptr[board] &= nwk_fifo_mask; return data; } void konppc_device::nwk_fifo_w(int board, UINT32 data) { const char *dsptag = (board == 0) ? "dsp" : "dsp2"; adsp21062_device *device = machine().device(dsptag); if (nwk_fifo_write_ptr[board] < nwk_fifo_half_full_w) { device->set_flag_input(1, ASSERT_LINE); } else { device->set_flag_input(1, CLEAR_LINE); } device->set_flag_input(2, ASSERT_LINE); nwk_fifo[board][nwk_fifo_write_ptr[board]] = data; nwk_fifo_write_ptr[board]++; nwk_fifo_write_ptr[board] &= nwk_fifo_mask; } /*****************************************************************************/ /* Konami K033906 PCI bridge (most emulation is now in src/emu/machine/k033906.c ) */ READ32_MEMBER( konppc_device::K033906_0_r ) { k033906_device *k033906_1 = space.machine().device("k033906_1"); if (nwk_device_sel[0] & 0x01) return nwk_fifo_r(space, 0); else return k033906_1->read(space, offset, mem_mask); } WRITE32_MEMBER( konppc_device::K033906_0_w ) { k033906_device *k033906_1 = space.machine().device("k033906_1"); k033906_1->write(space, offset, data, mem_mask); } READ32_MEMBER( konppc_device::K033906_1_r ) { k033906_device *k033906_2 = space.machine().device("k033906_2"); if (nwk_device_sel[1] & 0x01) return nwk_fifo_r(space, 1); else return k033906_2->read(space, offset, mem_mask); } WRITE32_MEMBER( konppc_device::K033906_1_w) { k033906_device *k033906_2 = space.machine().device("k033906_2"); k033906_2->write(space, offset, data, mem_mask); } /*****************************************************************************/ WRITE32_MEMBER( konppc_device::nwk_fifo_0_w) { voodoo_device *device = space.machine().device("voodoo0"); if (nwk_device_sel[0] & 0x01) { nwk_fifo_w(0, data); } else if (nwk_device_sel[0] & 0x02) { int addr = ((offset >> 8) << 9) | (offset & 0xff); nwk_ram[0][addr] = data; } else { device->voodoo_w(space, offset ^ 0x80000, data, mem_mask); } } WRITE32_MEMBER( konppc_device::nwk_fifo_1_w) { voodoo_device *device = space.machine().device("voodoo1"); if (nwk_device_sel[1] & 0x01) { nwk_fifo_w(1, data); } else if (nwk_device_sel[1] & 0x02) { int addr = ((offset >> 8) << 9) | (offset & 0xff); nwk_ram[1][addr] = data; } else { device->voodoo_w(space, offset ^ 0x80000, data, mem_mask); } } READ32_MEMBER( konppc_device::nwk_voodoo_0_r) { voodoo_device *device = space.machine().device("voodoo0"); if ((nwk_device_sel[0] == 0x4) && offset >= 0x100000 && offset < 0x200000) { return nwk_ram[0][offset & 0x1fff]; } else { return device->voodoo_r(space, offset, mem_mask); } } READ32_MEMBER( konppc_device::nwk_voodoo_1_r) { voodoo_device *device = space.machine().device("voodoo1"); if ((nwk_device_sel[1] == 0x4) && offset >= 0x100000 && offset < 0x200000) { return nwk_ram[1][offset & 0x1fff]; } else { return device->voodoo_r(space, offset, mem_mask); } } WRITE32_MEMBER( konppc_device::nwk_voodoo_0_w) { voodoo_device *device = space.machine().device("voodoo0"); if (nwk_device_sel[0] & 0x01) { nwk_fifo_w(0, data); } else if (nwk_device_sel[0] & 0x02) { int addr = ((offset >> 8) << 9) | (offset & 0xff); nwk_ram[0][addr] = data; } else { device->voodoo_w(space, offset, data, mem_mask); } } WRITE32_MEMBER( konppc_device::nwk_voodoo_1_w) { voodoo_device *device = space.machine().device("voodoo0"); if (nwk_device_sel[1] & 0x01) { nwk_fifo_w(1, data); } else if (nwk_device_sel[1] & 0x02) { int addr = ((offset >> 8) << 9) | (offset & 0xff); nwk_ram[1][addr] = data; } else { device->voodoo_w(space, offset, data, mem_mask); } } /*****************************************************************************/ #define LED_ON 0xff00ff00 void draw_7segment_led(bitmap_rgb32 &bitmap, int x, int y, UINT8 value) { if ((value & 0x7f) == 0x7f) { return; } bitmap.plot_box(x-1, y-1, 7, 11, 0x00000000); /* Top */ if( (value & 0x40) == 0 ) { bitmap.plot_box(x+1, y+0, 3, 1, LED_ON); } /* Middle */ if( (value & 0x01) == 0 ) { bitmap.plot_box(x+1, y+4, 3, 1, LED_ON); } /* Bottom */ if( (value & 0x08) == 0 ) { bitmap.plot_box(x+1, y+8, 3, 1, LED_ON); } /* Top Left */ if( (value & 0x02) == 0 ) { bitmap.plot_box(x+0, y+1, 1, 3, LED_ON); } /* Top Right */ if( (value & 0x20) == 0 ) { bitmap.plot_box(x+4, y+1, 1, 3, LED_ON); } /* Bottom Left */ if( (value & 0x04) == 0 ) { bitmap.plot_box(x+0, y+5, 1, 3, LED_ON); } /* Bottom Right */ if( (value & 0x10) == 0 ) { bitmap.plot_box(x+4, y+5, 1, 3, LED_ON); } }