New systems marked not working

------------------------------
Tadpole Technology TP881V [Plamen Mihaylov]
This commit is contained in:
Patrick Mackinlay 2023-02-08 18:40:24 +07:00
parent d5ed519910
commit 4c512e6ed9
4 changed files with 350 additions and 0 deletions

View File

@ -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

View File

@ -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<ncr53c90a_device &>(*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<ncr53c90a_device &>(*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");
}

View File

@ -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<mc88100_device> m_cpu;
required_device_array<mc88200_device, 2> m_mmu;
required_device_array<z8036_device, 8> m_cio;
required_device<m48t02_device> m_rtc;
required_device_array<ncr53c90a_device, 2> m_scsi;
required_device<i82596_device> m_net;
required_device_array<scc8030_device, 2> m_scc;
required_device<z8036_device> m_vcs; // vme control and status cio
required_device_array<z8036_device, 2> m_gcs; // global control and status cio
required_device<nmc9306_device> m_eeprom;
required_device_array<rs232_port_device, 4> m_serial;
};
DECLARE_DEVICE_TYPE(TP881V, tp881v_device)
#endif // MAME_BUS_VME_TP881V_H

View File

@ -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)