diff --git a/scripts/src/bus.lua b/scripts/src/bus.lua index b0d518d1f22..138e7677bda 100644 --- a/scripts/src/bus.lua +++ b/scripts/src/bus.lua @@ -2567,6 +2567,8 @@ if (BUSES["VME"]~=null) then MAME_DIR .. "src/devices/bus/vme/vme_mvme181.h", MAME_DIR .. "src/devices/bus/vme/vme_mvme327a.cpp", MAME_DIR .. "src/devices/bus/vme/vme_mvme327a.h", + MAME_DIR .. "src/devices/bus/vme/tp881v.cpp", + MAME_DIR .. "src/devices/bus/vme/tp881v.h", } end diff --git a/src/devices/bus/vme/tp881v.cpp b/src/devices/bus/vme/tp881v.cpp new file mode 100644 index 00000000000..e2f77965abd --- /dev/null +++ b/src/devices/bus/vme/tp881v.cpp @@ -0,0 +1,288 @@ +// license:BSD-3-Clause +// copyright-holders:Patrick Mackinlay + +/* + * Tadpole Technology TP881V + * + * Sources: + * - TPROM/88K User Manual, Monitor/Debugger For 88000 Boards, Issue: 1.3, 26 June 1990, Part No. DS-1003 + * - TPIX/88K version 1.06 source code + * + * TODO: + * - dma controller + * - vme interface + * - interrupt enables/masking + * - multiprocessor configurations + */ + +#include "emu.h" +#include "tp881v.h" + +#include "machine/input_merger.h" + +#include "bus/nscsi/hd.h" +#include "bus/nscsi/cd.h" + +#define VERBOSE 0 +#include "logmacro.h" + +DEFINE_DEVICE_TYPE(TP881V, tp881v_device, "tp881v", "Tadpole Technology TP881V") + +tp881v_device::tp881v_device(machine_config const &mconfig, char const *tag, device_t *owner, u32 clock) + : device_t(mconfig, TP881V, tag, owner, clock) + , device_vme_card_interface(mconfig, *this) + , m_cpu(*this, "cpu") + , m_mmu(*this, "mmu%u", 0U) + , m_cio(*this, "cio%u", 0U) + , m_rtc(*this, "rtc") + , m_scsi(*this, "scsi%u:7:ncr53c90a", 0U) + , m_net(*this, "net") + , m_scc(*this, "scc%u", 0U) + , m_vcs(*this, "vcs") + , m_gcs(*this, "gcs%u", 0U) + , m_eeprom(*this, "eeprom") + , m_serial(*this, "serial%u", 0U) +{ +} + +ROM_START(tp881v) + ROM_REGION32_BE(0x40000, "eprom", 0) + ROM_SYSTEM_BIOS(0, "v504", "TP881 Multiprocessor Monitor V5.04") + ROMX_LOAD("881v__5.04l.bin", 0x0002, 0x20000, CRC(d9027c64) SHA1(88cca011dee005d273a1cd7048480ff3fac9c06a), ROM_REVERSE | ROM_GROUPWORD | ROM_SKIP(2) | ROM_BIOS(0)) + ROMX_LOAD("881v__5.04h.bin", 0x0000, 0x20000, CRC(74de0772) SHA1(8e5bfd427c0bdea4ab350333fd5a814712014302), ROM_REVERSE | ROM_GROUPWORD | ROM_SKIP(2) | ROM_BIOS(0)) +ROM_END + +static INPUT_PORTS_START(tp881v) +INPUT_PORTS_END + +const tiny_rom_entry *tp881v_device::device_rom_region() const +{ + return ROM_NAME(tp881v); +} + +ioport_constructor tp881v_device::device_input_ports() const +{ + return INPUT_PORTS_NAME(tp881v); +} + +void tp881v_device::device_start() +{ +} + +void tp881v_device::device_reset() +{ +} + +static void scsi_devices(device_slot_interface &device) +{ + device.option_add("cdrom", NSCSI_CDROM); + device.option_add("harddisk", NSCSI_HARDDISK); + device.option_add("ncr53c90a", NCR53C90A); +} + +void tp881v_device::device_add_mconfig(machine_config &config) +{ + MC88100(config, m_cpu, 40_MHz_XTAL / 2); + m_cpu->set_addrmap(AS_PROGRAM, &tp881v_device::cpu_mem); + + MC88200(config, m_mmu[1], 40_MHz_XTAL / 2, 0x01); + m_mmu[1]->set_mbus(m_cpu, AS_PROGRAM); + m_cpu->set_cmmu_i(m_mmu[1]); + + MC88200(config, m_mmu[0], 40_MHz_XTAL / 2, 0x00); + m_mmu[0]->set_mbus(m_cpu, AS_PROGRAM); + m_cpu->set_cmmu_d(m_mmu[0]); + + // per-jp interrupt controllers + // 4MHz input clock, ct3 gives 100Hz clock, ct2 counts at 10kHz + // port a bit 0: porta int? + // port a bit 1: ethernet + // port a bit 2: scc dma + // port a bit 3: scsi0 + // port a bit 4: scsi1 + // port a bit 5: scc + // port a bit 6: acfail + // port a bit 7: parity + + // port b bit 0: port b + // port b bit 1: mbus err + // port b bit 2: port b err + // port b bit 3: vme + // port b bit 4: vme mailbox + // port b bit 5: port b err + // port b bit 6: software interrupt + // port b bit 7: vsb + + Z8036(config, m_cio[0], 4'000'000); // Z0803606VSC + m_cio[0]->irq_wr_cb().set_inputline(m_cpu, INPUT_LINE_IRQ0); + + Z8036(config, m_cio[1], 4'000'000); // Z0803606VSC + Z8036(config, m_cio[2], 4'000'000); // Z0803606VSC + Z8036(config, m_cio[3], 4'000'000); // Z0803606VSC + Z8036(config, m_cio[4], 4'000'000); // Z0803606VSC + Z8036(config, m_cio[5], 4'000'000); // Z0803606VSC + Z8036(config, m_cio[6], 4'000'000); // Z0803606VSC + Z8036(config, m_cio[7], 4'000'000); // Z0803606VSC + + M48T02(config, m_rtc, 0); + + NSCSI_BUS(config, "scsi0", 0); + NSCSI_CONNECTOR(config, "scsi0:0", scsi_devices, nullptr, false); + NSCSI_CONNECTOR(config, "scsi0:1", scsi_devices, nullptr, false); + NSCSI_CONNECTOR(config, "scsi0:2", scsi_devices, nullptr, false); + NSCSI_CONNECTOR(config, "scsi0:3", scsi_devices, nullptr, false); + NSCSI_CONNECTOR(config, "scsi0:4", scsi_devices, nullptr, false); + NSCSI_CONNECTOR(config, "scsi0:5", scsi_devices, nullptr, false); + NSCSI_CONNECTOR(config, "scsi0:6", scsi_devices, nullptr, false); + NSCSI_CONNECTOR(config, "scsi0:7").option_set("ncr53c90a", NCR53C90A).machine_config( + [this](device_t *device) + { + ncr53c90a_device &ncr53c90a(downcast(*device)); + + ncr53c90a.set_clock(20'000'000); + ncr53c90a.irq_handler_cb().set(m_cio[0], FUNC(z8036_device::pa3_w)); + //ncr53c90a.drq_cb().set(*this, ...); + }); + + NSCSI_BUS(config, "scsi1", 0); + NSCSI_CONNECTOR(config, "scsi1:0", scsi_devices, nullptr, false); + NSCSI_CONNECTOR(config, "scsi1:1", scsi_devices, nullptr, false); + NSCSI_CONNECTOR(config, "scsi1:2", scsi_devices, nullptr, false); + NSCSI_CONNECTOR(config, "scsi1:3", scsi_devices, nullptr, false); + NSCSI_CONNECTOR(config, "scsi1:4", scsi_devices, nullptr, false); + NSCSI_CONNECTOR(config, "scsi1:5", scsi_devices, nullptr, false); + NSCSI_CONNECTOR(config, "scsi1:6", scsi_devices, nullptr, false); + NSCSI_CONNECTOR(config, "scsi1:7").option_set("ncr53c90a", NCR53C90A).machine_config( + [this](device_t *device) + { + ncr53c90a_device &ncr53c90a(downcast(*device)); + + ncr53c90a.set_clock(20'000'000); + ncr53c90a.irq_handler_cb().set(m_cio[0], FUNC(z8036_device::pa4_w)); + //ncr53c90a.drq_cb().set(*this, ...); + }); + + I82596_BE32(config, m_net, 20'000'000); // A82596DX-25 + m_net->out_irq_cb().set(m_cio[0], FUNC(z8036_device::pa1_w)); + m_net->set_addrmap(0, &tp881v_device::net_mem); + + // TODO: find out what is connected to scc_drq + input_merger_any_high_device &scc_drq(INPUT_MERGER_ANY_HIGH(config, "scc_drq")); + input_merger_any_high_device &scc_irq(INPUT_MERGER_ANY_HIGH(config, "scc_irq")); + scc_drq.output_handler().set(m_cio[0], FUNC(z8036_device::pa2_w)); + scc_irq.output_handler().set(m_cio[0], FUNC(z8036_device::pa5_w)); + + SCC8030(config, m_scc[0], 3.6864_MHz_XTAL); // Z0803006VSC + m_scc[0]->configure_channels(m_scc[0]->clock(), m_scc[0]->clock(), m_scc[0]->clock(), m_scc[0]->clock()); + m_scc[0]->out_int_callback().set(scc_irq, FUNC(input_merger_any_high_device::in_w<0>)); + m_scc[0]->out_rxdrqa_callback().set(scc_drq, FUNC(input_merger_any_high_device::in_w<0>)); + m_scc[0]->out_rxdrqb_callback().set(scc_drq, FUNC(input_merger_any_high_device::in_w<1>)); + m_scc[0]->out_txdrqa_callback().set(scc_drq, FUNC(input_merger_any_high_device::in_w<2>)); + m_scc[0]->out_txdrqb_callback().set(scc_drq, FUNC(input_merger_any_high_device::in_w<3>)); + + SCC8030(config, m_scc[1], 3.6864_MHz_XTAL); // Z0803006VSC + m_scc[1]->configure_channels(m_scc[1]->clock(), m_scc[1]->clock(), m_scc[1]->clock(), m_scc[1]->clock()); + m_scc[1]->out_int_callback().set(scc_irq, FUNC(input_merger_any_high_device::in_w<1>)); + m_scc[1]->out_rxdrqa_callback().set(scc_drq, FUNC(input_merger_any_high_device::in_w<4>)); + m_scc[1]->out_rxdrqb_callback().set(scc_drq, FUNC(input_merger_any_high_device::in_w<5>)); + m_scc[1]->out_txdrqa_callback().set(scc_drq, FUNC(input_merger_any_high_device::in_w<6>)); + m_scc[1]->out_txdrqb_callback().set(scc_drq, FUNC(input_merger_any_high_device::in_w<7>)); + + RS232_PORT(config, m_serial[0], default_rs232_devices, "terminal"); + RS232_PORT(config, m_serial[1], default_rs232_devices, nullptr); + + m_scc[0]->out_txda_callback().set(m_serial[0], FUNC(rs232_port_device::write_txd)); + m_scc[0]->out_dtra_callback().set(m_serial[0], FUNC(rs232_port_device::write_dtr)); + m_scc[0]->out_rtsa_callback().set(m_serial[0], FUNC(rs232_port_device::write_rts)); + m_scc[0]->out_txdb_callback().set(m_serial[1], FUNC(rs232_port_device::write_txd)); + m_scc[0]->out_dtrb_callback().set(m_serial[1], FUNC(rs232_port_device::write_dtr)); + m_scc[0]->out_rtsb_callback().set(m_serial[1], FUNC(rs232_port_device::write_rts)); + + m_serial[0]->rxd_handler().set(m_scc[0], FUNC(z80scc_device::rxa_w)); + m_serial[0]->dcd_handler().set(m_scc[0], FUNC(z80scc_device::dcda_w)); + m_serial[0]->cts_handler().set(m_scc[0], FUNC(z80scc_device::ctsa_w)); + m_serial[1]->rxd_handler().set(m_scc[0], FUNC(z80scc_device::rxb_w)); + m_serial[1]->dcd_handler().set(m_scc[0], FUNC(z80scc_device::dcdb_w)); + m_serial[1]->cts_handler().set(m_scc[0], FUNC(z80scc_device::ctsb_w)); + + RS232_PORT(config, m_serial[2], default_rs232_devices, nullptr); + RS232_PORT(config, m_serial[3], default_rs232_devices, nullptr); + + m_scc[1]->out_txda_callback().set(m_serial[2], FUNC(rs232_port_device::write_txd)); + m_scc[1]->out_dtra_callback().set(m_serial[2], FUNC(rs232_port_device::write_dtr)); + m_scc[1]->out_rtsa_callback().set(m_serial[2], FUNC(rs232_port_device::write_rts)); + m_scc[1]->out_txdb_callback().set(m_serial[3], FUNC(rs232_port_device::write_txd)); + m_scc[1]->out_dtrb_callback().set(m_serial[3], FUNC(rs232_port_device::write_dtr)); + m_scc[1]->out_rtsb_callback().set(m_serial[3], FUNC(rs232_port_device::write_rts)); + + m_serial[2]->rxd_handler().set(m_scc[1], FUNC(z80scc_device::rxa_w)); + m_serial[2]->dcd_handler().set(m_scc[1], FUNC(z80scc_device::dcda_w)); + m_serial[2]->cts_handler().set(m_scc[1], FUNC(z80scc_device::ctsa_w)); + m_serial[3]->rxd_handler().set(m_scc[1], FUNC(z80scc_device::rxb_w)); + m_serial[3]->dcd_handler().set(m_scc[1], FUNC(z80scc_device::dcdb_w)); + m_serial[3]->cts_handler().set(m_scc[1], FUNC(z80scc_device::ctsb_w)); + + Z8036(config, m_vcs, 4'000'000); // Z0803606VSC + // port (a & 0x7f) << 25 gives vme address of dram? + + Z8036(config, m_gcs[0], 4'000'000); // Z0803606VSC + // port used to control scsi dma direction? + + Z8036(config, m_gcs[1], 4'000'000); // Z0803606VSC + m_gcs[1]->pc_wr_cb().set( + [this](u8 data) + { + // chip select + if (!BIT(data, 6)) + m_eeprom->cs_w(BIT(data, 2)); + + // data out + if (!BIT(data, 5)) + m_eeprom->di_w(BIT(data, 1)); + + // clock + if (!BIT(data, 4)) + m_eeprom->sk_w(BIT(data, 3)); + }); + m_gcs[1]->pc_rd_cb().set(m_eeprom, FUNC(nmc9306_device::do_r)); + + NMC9306(config, m_eeprom, 0); +} + +void tp881v_device::cpu_mem(address_map &map) +{ + map(0x0000'0000, 0x0003'ffff).rom().region("eprom", 0); + //map(0x2000'0000, 0x20ff'ffff); // vme short space (a24 d32) + map(0x4000'0000, 0x41ff'ffff).ram().share("ram"); + //map(0x8000'0000, 0x80ff'ffff); // vme extended space (a32 d32) + //map(0xc000'0000, 0xc0ff'ffff); // vsb space + //map(0xfff0'0000, 0xffff'ffff); // i/o + + map(0xfff3'0000, 0xfff3'003f).m(m_scsi[0], FUNC(ncr53c90a_device::map)).umask32(0x000000ff); + //0xfff30080; // dmac scsi0 + map(0xfff3'8000, 0xfff3'803f).m(m_scsi[1], FUNC(ncr53c90a_device::map)).umask32(0x000000ff); + //0xfff38080; // dmac scsi1 + //0xfff40000; // vme a16 d16 base + map(0xfff5'2000, 0xfff5'207f).rw(m_scc[1], FUNC(z80scc_device::zbus_r), FUNC(z80scc_device::zbus_w)).umask32(0x000000ff); + map(0xfff5'4000, 0xfff5'407f).rw(m_scc[0], FUNC(z80scc_device::zbus_r), FUNC(z80scc_device::zbus_w)).umask32(0x000000ff); + map(0xfff5'6000, 0xfff5'60bf).rw(m_gcs[0], FUNC(z8036_device::read), FUNC(z8036_device::write)).umask32(0x000000ff); + map(0xfff5'8000, 0xfff5'80bf).rw(m_gcs[1], FUNC(z8036_device::read), FUNC(z8036_device::write)).umask32(0x000000ff); + map(0xfff5'a000, 0xfff5'a0bf).rw(m_vcs, FUNC(z8036_device::read), FUNC(z8036_device::write)).umask32(0x000000ff); + map(0xfff5'e000, 0xfff5'ffff).rw(m_rtc, FUNC(m48t02_device::read), FUNC(m48t02_device::write)).umask32(0x000000ff); + //0xfff60000; // vme iack + //map(0xfff7'8002, 0xfff7'8003).w(m_net, FUNC(i82596_device::port)); + //map(0xfff7'c000, 0xfffc'0000).lw8([this](u8 data) { m_net->ca(1); }, "net_ca"); + map(0xfff8'0000, 0xfff8'00bf).rw(m_cio[0], FUNC(z8036_device::read), FUNC(z8036_device::write)).umask32(0x000000ff); + map(0xfff8'0400, 0xfff8'04bf).rw(m_cio[1], FUNC(z8036_device::read), FUNC(z8036_device::write)).umask32(0x000000ff); + map(0xfff8'0800, 0xfff8'08bf).rw(m_cio[2], FUNC(z8036_device::read), FUNC(z8036_device::write)).umask32(0x000000ff); + map(0xfff8'0c00, 0xfff8'0cbf).rw(m_cio[3], FUNC(z8036_device::read), FUNC(z8036_device::write)).umask32(0x000000ff); + map(0xfff9'0000, 0xfff9'00bf).rw(m_cio[4], FUNC(z8036_device::read), FUNC(z8036_device::write)).umask32(0x000000ff); + map(0xfff9'0400, 0xfff9'04bf).rw(m_cio[5], FUNC(z8036_device::read), FUNC(z8036_device::write)).umask32(0x000000ff); + map(0xfff9'0800, 0xfff9'08bf).rw(m_cio[6], FUNC(z8036_device::read), FUNC(z8036_device::write)).umask32(0x000000ff); + map(0xfff9'0c00, 0xfff9'0cbf).rw(m_cio[7], FUNC(z8036_device::read), FUNC(z8036_device::write)).umask32(0x000000ff); +} + +void tp881v_device::net_mem(address_map &map) +{ + map(0x4000'0000, 0x41ff'ffff).ram().share("ram"); +} diff --git a/src/devices/bus/vme/tp881v.h b/src/devices/bus/vme/tp881v.h new file mode 100644 index 00000000000..80f83b37d7b --- /dev/null +++ b/src/devices/bus/vme/tp881v.h @@ -0,0 +1,58 @@ +// license:BSD-3-Clause +// copyright-holders:Patrick Mackinlay + +#ifndef MAME_BUS_VME_TP881V_H +#define MAME_BUS_VME_TP881V_H + +#pragma once + +#include "cpu/m88000/m88000.h" +#include "machine/i82586.h" +//#include "machine/mc68440.h" +#include "machine/mc88200.h" +#include "machine/ncr53c90.h" +#include "machine/nmc9306.h" +#include "machine/timekpr.h" +#include "machine/z80scc.h" +#include "machine/z8536.h" + +#include "bus/vme/vme.h" +#include "bus/rs232/rs232.h" + +class tp881v_device + : public device_t + , public device_vme_card_interface +{ +public: + tp881v_device(machine_config const &mconfig, char const *tag, device_t *owner, u32 clock); + +protected: + virtual const tiny_rom_entry *device_rom_region() const override; + virtual void device_add_mconfig(machine_config &config) override; + virtual ioport_constructor device_input_ports() const override; + virtual void device_start() override; + virtual void device_reset() override; + +private: + void cpu_mem(address_map &map); + void net_mem(address_map &map); + + required_device m_cpu; + required_device_array m_mmu; + required_device_array m_cio; + + required_device m_rtc; + required_device_array m_scsi; + required_device m_net; + required_device_array m_scc; + + required_device m_vcs; // vme control and status cio + required_device_array m_gcs; // global control and status cio + required_device m_eeprom; + + required_device_array m_serial; +}; + +DECLARE_DEVICE_TYPE(TP881V, tp881v_device) + +#endif // MAME_BUS_VME_TP881V_H diff --git a/src/mame/motorola/sys1121.cpp b/src/mame/motorola/sys1121.cpp index ca884ba6c16..7636d41a23e 100644 --- a/src/mame/motorola/sys1121.cpp +++ b/src/mame/motorola/sys1121.cpp @@ -14,6 +14,7 @@ #include "bus/vme/vme_mvme181.h" #include "bus/vme/vme_mvme327a.h" #include "bus/vme/vme_smvme2000.h" +#include "bus/vme/tp881v.h" #include "logmacro.h" namespace @@ -43,6 +44,7 @@ namespace device.option_add("mvme180", VME_MVME180); device.option_add("mvme181", VME_MVME181); device.option_add("mvme327a", VME_MVME327A); + device.option_add("tp881v", TP881V); } void sys1121_state::sys1121(machine_config &config)