summaryrefslogtreecommitdiffstatshomepage
path: root/src/mess/machine/d9060.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/mess/machine/d9060.c')
-rw-r--r--src/mess/machine/d9060.c601
1 files changed, 601 insertions, 0 deletions
diff --git a/src/mess/machine/d9060.c b/src/mess/machine/d9060.c
new file mode 100644
index 00000000000..e9b1564c1e7
--- /dev/null
+++ b/src/mess/machine/d9060.c
@@ -0,0 +1,601 @@
+/**********************************************************************
+
+ Commodore 9060/9090 Hard Disk Drive emulation
+
+ Copyright MESS Team.
+ Visit http://mamedev.org for licensing and usage restrictions.
+
+**********************************************************************/
+
+#include "d9060.h"
+#include "machine/scsihd.h"
+
+
+
+//**************************************************************************
+// MACROS / CONSTANTS
+//**************************************************************************
+
+#define M6502_DOS_TAG "7e"
+#define M6532_0_TAG "7f"
+#define M6532_1_TAG "7g"
+
+#define M6502_HDC_TAG "4a"
+#define M6522_TAG "4b"
+
+#define AM2910_TAG "9d"
+
+#define SASIBUS_TAG "sasi"
+
+enum
+{
+ LED_POWER = 0,
+ LED_READY,
+ LED_ERROR
+};
+
+
+
+//**************************************************************************
+// DEVICE DEFINITIONS
+//**************************************************************************
+
+const device_type D9060 = &device_creator<d9060_device>;
+const device_type D9090 = &device_creator<d9090_device>;
+
+
+//-------------------------------------------------
+// device_config_complete - perform any
+// operations now that the configuration is
+// complete
+//-------------------------------------------------
+
+void base_d9060_device::device_config_complete()
+{
+ switch (m_variant)
+ {
+ default:
+ case TYPE_9060:
+ m_shortname = "d9060";
+ break;
+
+ case TYPE_9090:
+ m_shortname = "d9090";
+ break;
+ }
+}
+
+
+//-------------------------------------------------
+// ROM( d9060 )
+//-------------------------------------------------
+
+ROM_START( d9060 )
+ ROM_REGION( 0x4000, M6502_DOS_TAG, 0 )
+ ROM_LOAD_OPTIONAL( "300516-revb.7c", 0x0000, 0x2000, CRC(2d758a14) SHA1(c959cc9dde84fc3d64e95e58a0a096a26d8107fd) )
+ ROM_LOAD( "300516-revc.7c", 0x0000, 0x2000, CRC(d6a3e88f) SHA1(bb1ddb5da94a86266012eca54818aa21dc4cef6a) )
+ ROM_LOAD_OPTIONAL( "300517-reva.7d", 0x2000, 0x2000, CRC(566df630) SHA1(b1602dfff408b165ee52a6a4ca3e2ec27e689ba9) )
+ ROM_LOAD_OPTIONAL( "300517-revb.7d", 0x2000, 0x2000, CRC(f0382bc3) SHA1(0b0a8dc520f5b41ffa832e4a636b3d226ccbb7f1) )
+ ROM_LOAD( "300517-revc.7d", 0x2000, 0x2000, CRC(2a9ad4ad) SHA1(4c17d014de48c906871b9b6c7d037d8736b1fd52) )
+
+ ROM_REGION( 0x800, M6502_HDC_TAG, 0 )
+ ROM_LOAD_OPTIONAL( "300515-reva.4c", 0x000, 0x800, CRC(99e096f7) SHA1(a3d1deb27bf5918b62b89c27fa3e488eb8f717a4) )
+ ROM_LOAD( "300515-revb.4c", 0x000, 0x800, CRC(49adf4fb) SHA1(59dafbd4855083074ba8dc96a04d4daa5b76e0d6) )
+
+ ROM_REGION( 0x5000, AM2910_TAG, 0 )
+ ROM_LOAD( "441.5b", 0x0000, 0x1000, NO_DUMP ) // 82S137
+ ROM_LOAD( "442.6b", 0x1000, 0x1000, NO_DUMP ) // 82S137
+ ROM_LOAD( "573.7b", 0x2000, 0x1000, NO_DUMP ) // 82S137
+ ROM_LOAD( "444.8b", 0x3000, 0x1000, NO_DUMP ) // 82S137
+ ROM_LOAD( "445.9b", 0x4000, 0x1000, NO_DUMP ) // 82S137
+ROM_END
+
+
+//-------------------------------------------------
+// rom_region - device-specific ROM region
+//-------------------------------------------------
+
+const rom_entry *base_d9060_device::device_rom_region() const
+{
+ return ROM_NAME( d9060 );
+}
+
+
+//-------------------------------------------------
+// ADDRESS_MAP( d9060_main_mem )
+//-------------------------------------------------
+
+static ADDRESS_MAP_START( d9060_main_mem, AS_PROGRAM, 8, base_d9060_device )
+ AM_RANGE(0x0000, 0x007f) AM_MIRROR(0x0100) AM_RAM // 6532 #1
+ AM_RANGE(0x0080, 0x00ff) AM_MIRROR(0x0100) AM_RAM // 6532 #2
+ AM_RANGE(0x0200, 0x021f) AM_MIRROR(0x0d60) AM_DEVREADWRITE_LEGACY(M6532_0_TAG, riot6532_r, riot6532_w)
+ AM_RANGE(0x0280, 0x029f) AM_MIRROR(0x0d60) AM_DEVREADWRITE_LEGACY(M6532_1_TAG, riot6532_r, riot6532_w)
+ AM_RANGE(0x1000, 0x13ff) AM_MIRROR(0x0c00) AM_RAM AM_SHARE("share1")
+ AM_RANGE(0x2000, 0x23ff) AM_MIRROR(0x0c00) AM_RAM AM_SHARE("share2")
+ AM_RANGE(0x3000, 0x33ff) AM_MIRROR(0x0c00) AM_RAM AM_SHARE("share3")
+ AM_RANGE(0x4000, 0x43ff) AM_MIRROR(0x0c00) AM_RAM AM_SHARE("share4")
+ AM_RANGE(0xc000, 0xffff) AM_ROM AM_REGION(M6502_DOS_TAG, 0)
+ADDRESS_MAP_END
+
+
+//-------------------------------------------------
+// ADDRESS_MAP( d9060_hdc_mem )
+//-------------------------------------------------
+
+static ADDRESS_MAP_START( d9060_hdc_mem, AS_PROGRAM, 8, base_d9060_device )
+ ADDRESS_MAP_GLOBAL_MASK(0x1fff)
+ AM_RANGE(0x0000, 0x007f) AM_MIRROR(0x300) AM_RAM
+ AM_RANGE(0x0080, 0x008f) AM_MIRROR(0x380) AM_DEVREADWRITE(M6522_TAG, via6522_device, read, write)
+ AM_RANGE(0x0400, 0x07ff) AM_RAM AM_SHARE("share1")
+ AM_RANGE(0x0800, 0x0bff) AM_RAM AM_SHARE("share2")
+ AM_RANGE(0x0c00, 0x0fff) AM_RAM AM_SHARE("share3")
+ AM_RANGE(0x1000, 0x13ff) AM_RAM AM_SHARE("share4")
+ AM_RANGE(0x1800, 0x1fff) AM_ROM AM_REGION(M6502_HDC_TAG, 0)
+ADDRESS_MAP_END
+
+
+//-------------------------------------------------
+// SCSIBus_interface sasi_intf
+//-------------------------------------------------
+
+static const SCSIConfigTable sasi_dev_table =
+{
+ 1,
+ {
+ { SCSI_ID_0, "harddisk0" }
+ }
+};
+
+WRITE_LINE_MEMBER( base_d9060_device::req_w )
+{
+ m_via->write_ca1(!state);
+}
+
+static const SCSIBus_interface sasi_intf =
+{
+ &sasi_dev_table,
+ NULL,
+ DEVCB_NULL,
+ DEVCB_NULL,
+ DEVCB_NULL,
+ DEVCB_NULL,
+ DEVCB_NULL,
+ DEVCB_DEVICE_LINE_MEMBER(DEVICE_SELF_OWNER, base_d9060_device, req_w),
+ DEVCB_NULL
+};
+
+
+//-------------------------------------------------
+// riot6532_interface riot0_intf
+//-------------------------------------------------
+
+READ8_MEMBER( base_d9060_device::dio_r )
+{
+ /*
+
+ bit description
+
+ PA0 DI0
+ PA1 DI1
+ PA2 DI2
+ PA3 DI3
+ PA4 DI4
+ PA5 DI5
+ PA6 DI6
+ PA7 DI7
+
+ */
+
+ return m_bus->dio_r();
+}
+
+
+WRITE8_MEMBER( base_d9060_device::dio_w )
+{
+ /*
+
+ bit description
+
+ PB0 DO0
+ PB1 DO1
+ PB2 DO2
+ PB3 DO3
+ PB4 DO4
+ PB5 DO5
+ PB6 DO6
+ PB7 DO7
+
+ */
+
+ m_bus->dio_w(this, data);
+}
+
+
+static const riot6532_interface riot0_intf =
+{
+ DEVCB_DEVICE_MEMBER(DEVICE_SELF_OWNER, base_d9060_device, dio_r),
+ DEVCB_NULL,
+ DEVCB_NULL,
+ DEVCB_DEVICE_MEMBER(DEVICE_SELF_OWNER, base_d9060_device, dio_w),
+ DEVCB_NULL
+};
+
+
+//-------------------------------------------------
+// riot6532_interface riot1_intf
+//-------------------------------------------------
+
+READ8_MEMBER( base_d9060_device::riot1_pa_r )
+{
+ /*
+
+ bit description
+
+ PA0
+ PA1
+ PA2
+ PA3
+ PA4
+ PA5 EOII
+ PA6 DAVI
+ PA7 _ATN
+
+ */
+
+ UINT8 data = 0;
+
+ // end or identify in
+ data |= m_bus->eoi_r() << 5;
+
+ // data valid in
+ data |= m_bus->dav_r() << 6;
+
+ // attention
+ data |= !m_bus->atn_r() << 7;
+
+ return data;
+}
+
+WRITE8_MEMBER( base_d9060_device::riot1_pa_w )
+{
+ /*
+
+ bit description
+
+ PA0 ATNA
+ PA1 DACO
+ PA2 RFDO
+ PA3 EOIO
+ PA4 DAVO
+ PA5
+ PA6
+ PA7
+
+ */
+
+ // attention acknowledge
+ m_atna = BIT(data, 0);
+
+ // data accepted out
+ m_daco = BIT(data, 1);
+
+ // not ready for data out
+ m_rfdo = BIT(data, 2);
+
+ // end or identify out
+ m_bus->eoi_w(this, BIT(data, 3));
+
+ // data valid out
+ m_bus->dav_w(this, BIT(data, 4));
+
+ update_ieee_signals();
+}
+
+READ8_MEMBER( base_d9060_device::riot1_pb_r )
+{
+ /*
+
+ bit description
+
+ PB0 device #
+ PB1 device #
+ PB2 device #
+ PB3
+ PB4
+ PB5
+ PB6 DACI
+ PB7 RFDI
+
+ */
+
+ UINT8 data = 0;
+
+ // device number selection
+ data |= m_address - 8;
+
+ // data accepted in
+ data |= m_bus->ndac_r() << 6;
+
+ // ready for data in
+ data |= m_bus->nrfd_r() << 7;
+
+ return data;
+}
+
+WRITE8_MEMBER( base_d9060_device::riot1_pb_w )
+{
+ /*
+
+ bit description
+
+ PB0
+ PB1
+ PB2
+ PB3
+ PB4 DRIVE RDY
+ PB5 PWR ON AND NO ERRORS
+ PB6
+ PB7
+
+ */
+
+ // ready led
+ output_set_led_value(LED_READY, BIT(data, 4));
+
+ // power led
+ output_set_led_value(LED_POWER, BIT(data, 5));
+
+ // error led
+ output_set_led_value(LED_ERROR, !BIT(data, 5));
+}
+
+static const riot6532_interface riot1_intf =
+{
+ DEVCB_DEVICE_MEMBER(DEVICE_SELF_OWNER, base_d9060_device, riot1_pa_r),
+ DEVCB_DEVICE_MEMBER(DEVICE_SELF_OWNER, base_d9060_device, riot1_pb_r),
+ DEVCB_DEVICE_MEMBER(DEVICE_SELF_OWNER, base_d9060_device, riot1_pa_w),
+ DEVCB_DEVICE_MEMBER(DEVICE_SELF_OWNER, base_d9060_device, riot1_pb_w),
+ DEVCB_CPU_INPUT_LINE(M6502_DOS_TAG, INPUT_LINE_IRQ0)
+};
+
+
+//-------------------------------------------------
+// via6522_interface via_intf
+//-------------------------------------------------
+
+READ8_MEMBER( base_d9060_device::via_pb_r )
+{
+ /*
+
+ bit description
+
+ PB0
+ PB1
+ PB2 C/D
+ PB3 BUSY
+ PB4 J14 (1=9060, 0=9090)
+ PB5 J13
+ PB6 I/O
+ PB7 MSG
+
+ */
+
+ UINT8 data = 0;
+
+ data |= !scsi_cd_r(m_sasibus) << 2;
+ data |= !scsi_bsy_r(m_sasibus) << 3;
+ data |= !scsi_io_r(m_sasibus) << 6;
+ data |= !scsi_msg_r(m_sasibus) << 7;
+
+ // drive type
+ data |= (m_variant == TYPE_9060) << 4;
+
+ return data;
+}
+
+WRITE8_MEMBER( base_d9060_device::via_pb_w )
+{
+ /*
+
+ bit description
+
+ PB0 SEL
+ PB1 RST
+ PB2
+ PB3
+ PB4
+ PB5
+ PB6
+ PB7
+
+ */
+
+ scsi_sel_w(m_sasibus, !BIT(data, 0));
+ scsi_rst_w(m_sasibus, !BIT(data, 1));
+}
+
+READ_LINE_MEMBER( base_d9060_device::req_r )
+{
+ return !scsi_req_r(m_sasibus);
+}
+
+WRITE_LINE_MEMBER( base_d9060_device::ack_w )
+{
+ scsi_ack_w(m_sasibus, state);
+}
+
+WRITE_LINE_MEMBER( base_d9060_device::enable_w )
+{
+ m_enable = state;
+}
+
+static const via6522_interface via_intf =
+{
+ DEVCB_DEVICE_HANDLER(SASIBUS_TAG, scsi_data_r),
+ DEVCB_DEVICE_MEMBER(DEVICE_SELF_OWNER, base_d9060_device, via_pb_r),
+ DEVCB_DEVICE_LINE_MEMBER(DEVICE_SELF_OWNER, base_d9060_device, req_r),
+ DEVCB_NULL,
+ DEVCB_NULL,
+ DEVCB_NULL,
+
+ DEVCB_DEVICE_HANDLER(SASIBUS_TAG, scsi_data_w),
+ DEVCB_DEVICE_MEMBER(DEVICE_SELF_OWNER, base_d9060_device, via_pb_w),
+ DEVCB_NULL,
+ DEVCB_NULL,
+ DEVCB_DEVICE_LINE_MEMBER(DEVICE_SELF_OWNER, base_d9060_device, ack_w),
+ DEVCB_DEVICE_LINE_MEMBER(DEVICE_SELF_OWNER, base_d9060_device, enable_w),
+
+ DEVCB_CPU_INPUT_LINE(M6502_HDC_TAG, INPUT_LINE_IRQ0)
+};
+
+
+//-------------------------------------------------
+// MACHINE_CONFIG_FRAGMENT( d9060 )
+//-------------------------------------------------
+
+static MACHINE_CONFIG_FRAGMENT( d9060 )
+ // DOS
+ MCFG_CPU_ADD(M6502_DOS_TAG, M6502, XTAL_4MHz/4)
+ MCFG_CPU_PROGRAM_MAP(d9060_main_mem)
+
+ MCFG_RIOT6532_ADD(M6532_0_TAG, XTAL_4MHz/4, riot0_intf)
+ MCFG_RIOT6532_ADD(M6532_1_TAG, XTAL_4MHz/4, riot1_intf)
+
+ // controller
+ MCFG_CPU_ADD(M6502_HDC_TAG, M6502, XTAL_4MHz/4)
+ MCFG_CPU_PROGRAM_MAP(d9060_hdc_mem)
+
+ MCFG_VIA6522_ADD(M6522_TAG, XTAL_4MHz/4, via_intf)
+
+ MCFG_SCSIBUS_ADD(SASIBUS_TAG, sasi_intf)
+ MCFG_DEVICE_ADD("harddisk0", SCSIHD, 0)
+MACHINE_CONFIG_END
+
+
+//-------------------------------------------------
+// machine_config_additions - device-specific
+// machine configurations
+//-------------------------------------------------
+
+machine_config_constructor base_d9060_device::device_mconfig_additions() const
+{
+ return MACHINE_CONFIG_NAME( d9060 );
+}
+
+
+
+//**************************************************************************
+// INLINE HELPERS
+//**************************************************************************
+
+//-------------------------------------------------
+// update_ieee_signals -
+//-------------------------------------------------
+
+inline void base_d9060_device::update_ieee_signals()
+{
+ int atn = m_bus->atn_r();
+ int nrfd = !(!(!(atn && m_atna) && m_rfdo) || !(atn || m_atna));
+ int ndac = !(m_daco || !(atn || m_atna));
+
+ m_bus->nrfd_w(this, nrfd);
+ m_bus->ndac_w(this, ndac);
+}
+
+
+
+//**************************************************************************
+// LIVE DEVICE
+//**************************************************************************
+
+//-------------------------------------------------
+// base_d9060_device - constructor
+//-------------------------------------------------
+
+base_d9060_device::base_d9060_device(const machine_config &mconfig, device_type type, const char *name, const char *tag, device_t *owner, UINT32 clock, UINT32 variant)
+ : device_t(mconfig, type, name, tag, owner, clock),
+ device_ieee488_interface(mconfig, *this),
+ m_maincpu(*this, M6502_DOS_TAG),
+ m_hdccpu(*this, M6502_HDC_TAG),
+ m_riot0(*this, M6532_0_TAG),
+ m_riot1(*this, M6532_1_TAG),
+ m_via(*this, M6522_TAG),
+ m_sasibus(*this, SASIBUS_TAG),
+ m_rfdo(1),
+ m_daco(1),
+ m_atna(1),
+ m_enable(1),
+ m_variant(variant)
+{
+}
+
+
+//-------------------------------------------------
+// d9060_device - constructor
+//-------------------------------------------------
+
+d9060_device::d9060_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock)
+ : base_d9060_device(mconfig, D9060, "D9060", tag, owner, clock, TYPE_9060) { }
+
+
+//-------------------------------------------------
+// d9090_device - constructor
+//-------------------------------------------------
+
+d9090_device::d9090_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock)
+ : base_d9060_device(mconfig, D9090, "D9090", tag, owner, clock, TYPE_9090) { }
+
+
+//-------------------------------------------------
+// device_start - device-specific startup
+//-------------------------------------------------
+
+void base_d9060_device::device_start()
+{
+ // state saving
+ save_item(NAME(m_rfdo));
+ save_item(NAME(m_daco));
+ save_item(NAME(m_atna));
+ save_item(NAME(m_enable));
+}
+
+
+//-------------------------------------------------
+// device_reset - device-specific reset
+//-------------------------------------------------
+
+void base_d9060_device::device_reset()
+{
+ init_scsibus(m_sasibus, 256);
+
+ m_maincpu->set_input_line(M6502_SET_OVERFLOW, ASSERT_LINE);
+ m_maincpu->set_input_line(M6502_SET_OVERFLOW, CLEAR_LINE);
+
+ m_hdccpu->set_input_line(M6502_SET_OVERFLOW, ASSERT_LINE);
+}
+
+
+//-------------------------------------------------
+// ieee488_atn - attention
+//-------------------------------------------------
+
+void base_d9060_device::ieee488_atn(int state)
+{
+ update_ieee_signals();
+
+ // set RIOT PA7
+ riot6532_porta_in_set(m_riot1, !state << 7, 0x80);
+}
+
+
+//-------------------------------------------------
+// ieee488_ifc - interface clear
+//-------------------------------------------------
+
+void base_d9060_device::ieee488_ifc(int state)
+{
+ if (!state)
+ {
+ device_reset();
+ }
+}