summaryrefslogtreecommitdiffstatshomepage
diff options
context:
space:
mode:
author arbee <rb6502@users.noreply.github.com>2019-07-21 17:25:41 -0400
committer arbee <rb6502@users.noreply.github.com>2019-07-21 17:25:41 -0400
commit0d716bfb5e97db67ee75065b2c002af2ac469ed2 (patch)
tree43ddde3e6c4f4bb7078dd4f862fbc3c0f32606b9
parentcb0a5d12931e418599e89b11b9fd8294e417603c (diff)
mac128/512: preliminary (not working) support for the GCC HyperDrive hard disk interface [R. Belmont, Guru]
-rw-r--r--scripts/src/bus.lua2
-rw-r--r--src/devices/bus/macpds/hyperdrive.cpp192
-rw-r--r--src/devices/bus/macpds/hyperdrive.h53
-rw-r--r--src/mame/drivers/mac128.cpp10
4 files changed, 257 insertions, 0 deletions
diff --git a/scripts/src/bus.lua b/scripts/src/bus.lua
index 4a9032087ec..7d56c201172 100644
--- a/scripts/src/bus.lua
+++ b/scripts/src/bus.lua
@@ -3208,6 +3208,8 @@ if (BUSES["MACPDS"]~=null) then
MAME_DIR .. "src/devices/bus/macpds/macpds.h",
MAME_DIR .. "src/devices/bus/macpds/pds_tpdfpd.cpp",
MAME_DIR .. "src/devices/bus/macpds/pds_tpdfpd.h",
+ MAME_DIR .. "src/devices/bus/macpds/hyperdrive.cpp",
+ MAME_DIR .. "src/devices/bus/macpds/hyperdrive.h",
}
end
diff --git a/src/devices/bus/macpds/hyperdrive.cpp b/src/devices/bus/macpds/hyperdrive.cpp
new file mode 100644
index 00000000000..0c64d077765
--- /dev/null
+++ b/src/devices/bus/macpds/hyperdrive.cpp
@@ -0,0 +1,192 @@
+// license:BSD-3-Clause
+// copyright-holders:R. Belmont
+
+/***************************************************************************
+
+HyperDrive ST-506 HDD Controller for Macintosh 128k, 512k and Plus.
+General Computer Corporation (GCC) 1985
+
+Driver by R. Belmont
+Board Notes by Guru
+
+PCB Layout
+----------
+
+HyperDrive 20 P11-A Rev 1.1
+|----------------------------------|
+|74LS123 AM26LS32 DP8465 |
+| |---|
+| |
+|P3 10MHz 74LS126 74LS74 |---|
+| |
+| |
+| ROM_HIGH.U15 ROM_LOW.U16 |
+| |
+| |-| |
+| | | PAL20L10 |
+| | | |
+| | | |
+| | | 74LS32 74LS245 |
+| | | |
+| CN| | |
+| | | 74HC4040 6116 |
+| | | |
+| | | |
+| | | WD2010A-PL |
+| | | |
+| |-| |
+| |
+| P2 74LS14 74LS273 |
+| |
+| P1 7406 7438 |
+| |
+| AM26LS31 74LS151 L13-120 74LS174 |
+| |
+|----------------------------------|
+Notes: (All IC's shown)
+
+P1/P2 - 34-pin (P1) and 20-pin (P2) ST-506 control & data cable connectors
+ The connected HDD is a ST-506 MMI Model MM112 10MB HDD manufactured by 'Microcomputer Memories Inc.'
+ The Official HDD parameters are: 306 Cylinders, 4 Heads, 17 Sectors Per Track and 512 Bytes Per Sector for a
+ total formatted capacity of 10,653,696 bytes. Note the parameters and/or capacity may not be the same
+ when used with the HyperDrive Controller.
+ The HDD was backed up on a 80386-based PC with a plug-in ST-506 controller card using the DOS program available
+ here.... http://www.partition-recovery.com/diskimage.htm
+ When backing up the drive, the Sectors Per Track was adjusted to 16 to get a good read.
+ The image was transferred to a modern PC using a parallel ZIP drive because IDE and ST-506 controllers cannot exist
+ together in the same PC due to using the same IRQ and BIOS drive 80h.
+P3 - 4-pin power connector for HDD
+CN - 64-pin connector joined with a flat cable to Macintosh motherboard 68000 CPU. The cable has a special socket
+ on the end that clips over the top of the 68000 CPU. This is required for end-user installations because the 68000
+ CPU is soldered into the Macintosh motherboard.
+DP8465 - 8kx8-bit SRAM
+6116 - 2kx8-bit SRAM
+ROM* - 2732 4kx8-bit EPROM (HyperDrive Boot ROMs)
+WD2010A-PL - Western Digital WD2010A-PL05-02 Winchester Disk Controller
+74HC4040 - 74HC4040 12-Stage Binary Ripple Counter with Clock Input, Asynchronous
+ Master Reset Input and Twelve Parallel Outputs
+AM26LS31 - AMD AM26LS31 Quad EIA-422 Differential Line Driver with Tri-State Outputs
+AM26LS32 - AMD AM26LS32 Quad EIA-422 Differential Line Receiver with Tri-State Outputs
+L13-120 - possibly a delay line?
+PAL20L10 - PAL20L10 Programmable Array Logic marked 'PALCFO'
+7406 - 7406 Hex Inverter Buffer/Driver with Open-Collector High-Voltage Outputs
+74LS14 - 74LS14 Hex Inverter with Schmitt Trigger Inputs
+74LS32 - 74LS32 Quad 2-input OR Gate
+74LS38 - 74LS38 Quad 2-input NAND Buffer
+74LS74 - 74LS74 Dual JK Flip-Flop
+74LS123 - 74LS123 Dual Retriggerable Monostable Multivibrator
+74LS126 - 74LS126 Quad Tri-State Buffer
+74LS151 - 74LS151 High-Speed 8-Input Digital Multiplexer
+74LS174 - 74LS174 Hex D-Type Flip-Flop With Clear
+74LS245 - 74LS245 Octal Bus Transceiver With 3-State Outputs
+74LS273 - 74LS273 Octal D-Type Flip-Flop With Clear
+
+***************************************************************************/
+
+#include "emu.h"
+#include "hyperdrive.h"
+
+#define HYPERDRIVE_ROM_REGION "hyperd_rom"
+
+ROM_START( hyperdrive )
+ ROM_REGION(0x2000, HYPERDRIVE_ROM_REGION, ROMREGION_16BIT|ROMREGION_BE)
+ ROM_LOAD16_BYTE( "hyperdrive 52949-h v7.06.u15", 0x000000, 0x001000, CRC(b0ec3dd9) SHA1(bf8cea0ba69f5ddbe0ba50fc709c3ba81728cecf) )
+ ROM_LOAD16_BYTE( "hyperdrive 52949-l v7.06.u16", 0x000001, 0x001000, CRC(0ff90c48) SHA1(4ebe1ead72064c470b7262c14e7e6887643816bf) )
+ROM_END
+
+//**************************************************************************
+// GLOBAL VARIABLES
+//**************************************************************************
+
+DEFINE_DEVICE_TYPE(PDS_HYPERDRIVE, macpds_hyperdrive_device, "pds_hyper", "GCC HyperDrive")
+
+//-------------------------------------------------
+// device_add_mconfig - add device configuration
+//-------------------------------------------------
+
+void macpds_hyperdrive_device::device_add_mconfig(machine_config &config)
+{
+ WD2010(config, m_hdc, 5000000);
+ // m_hdc->out_bcr_callback().set(FUNC(macpds_hyperdrive_device::clct_w));
+ m_hdc->in_bcs_callback().set(FUNC(macpds_hyperdrive_device::hdd_r));
+ m_hdc->out_bcs_callback().set(FUNC(macpds_hyperdrive_device::hdd_w));
+ m_hdc->in_drdy_callback().set_constant(1);
+ m_hdc->in_index_callback().set_constant(1);
+ m_hdc->in_wf_callback().set_constant(1);
+ m_hdc->in_tk000_callback().set_constant(1);
+ m_hdc->in_sc_callback().set_constant(1);
+
+ HARDDISK(config, "hard0", 0);
+}
+
+//-------------------------------------------------
+// rom_region - device-specific ROM region
+//-------------------------------------------------
+
+const tiny_rom_entry *macpds_hyperdrive_device::device_rom_region() const
+{
+ return ROM_NAME( hyperdrive );
+}
+
+//**************************************************************************
+// LIVE DEVICE
+//**************************************************************************
+
+//-------------------------------------------------
+// macpds_hyperdrive_device - constructor
+//-------------------------------------------------
+
+macpds_hyperdrive_device::macpds_hyperdrive_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock) :
+ macpds_hyperdrive_device(mconfig, PDS_HYPERDRIVE, tag, owner, clock)
+{
+}
+
+macpds_hyperdrive_device::macpds_hyperdrive_device(const machine_config &mconfig, device_type type, const char *tag, device_t *owner, uint32_t clock) :
+ device_t(mconfig, type, tag, owner, clock),
+ device_macpds_card_interface(mconfig, *this),
+ m_hdc(*this, "wd2010")
+{
+}
+
+//-------------------------------------------------
+// device_start - device-specific startup
+//-------------------------------------------------
+
+void macpds_hyperdrive_device::device_start()
+{
+ set_macpds_device();
+
+ install_rom(this, HYPERDRIVE_ROM_REGION, 0xf80000);
+
+ // WD200x registers
+ m_macpds->install_device(0xfc0000, 0xfc000f, read16_delegate(FUNC(macpds_hyperdrive_device::hyperdrive_r), this), write16_delegate(FUNC(macpds_hyperdrive_device::hyperdrive_w), this));
+}
+
+//-------------------------------------------------
+// device_reset - device-specific reset
+//-------------------------------------------------
+
+void macpds_hyperdrive_device::device_reset()
+{
+}
+
+WRITE16_MEMBER( macpds_hyperdrive_device::hyperdrive_w )
+{
+ m_hdc->write(offset, data & 0xff);
+}
+
+READ16_MEMBER( macpds_hyperdrive_device::hyperdrive_r )
+{
+ return m_hdc->read(offset);
+}
+
+WRITE8_MEMBER( macpds_hyperdrive_device::hdd_w )
+{
+// printf("hdd_w: %02x @ %x\n", data, offset);
+}
+
+READ8_MEMBER( macpds_hyperdrive_device::hdd_r )
+{
+// printf("hdd_r: @ %x\n", offset);
+ return 0;
+}
diff --git a/src/devices/bus/macpds/hyperdrive.h b/src/devices/bus/macpds/hyperdrive.h
new file mode 100644
index 00000000000..9d8000b1c88
--- /dev/null
+++ b/src/devices/bus/macpds/hyperdrive.h
@@ -0,0 +1,53 @@
+// license:BSD-3-Clause
+// copyright-holders:R. Belmont
+#ifndef MAME_BUS_PDS_HYPERDRIVE_H
+#define MAME_BUS_PDS_HYPERDRIVE_H
+
+#pragma once
+
+#include "macpds.h"
+#include "machine/wd2010.h"
+#include "imagedev/harddriv.h"
+
+//**************************************************************************
+// TYPE DEFINITIONS
+//**************************************************************************
+
+// ======================> macpds_hyperdrive_device
+
+class macpds_hyperdrive_device :
+ public device_t,
+ public device_macpds_card_interface
+{
+public:
+ // construction/destruction
+ macpds_hyperdrive_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock);
+
+ static constexpr feature_type imperfect_features() { return feature::DISK; }
+
+protected:
+ macpds_hyperdrive_device(const machine_config &mconfig, device_type type, const char *tag, device_t *owner, uint32_t clock);
+
+ // device-level overrides
+ virtual void device_start() override;
+ virtual void device_reset() override;
+
+ // optional information overrides
+ virtual void device_add_mconfig(machine_config &config) override;
+ virtual const tiny_rom_entry *device_rom_region() const override;
+
+ required_device<wd2010_device> m_hdc;
+
+private:
+ DECLARE_READ16_MEMBER(hyperdrive_r);
+ DECLARE_WRITE16_MEMBER(hyperdrive_w);
+
+ DECLARE_READ8_MEMBER(hdd_r);
+ DECLARE_WRITE8_MEMBER(hdd_w);
+};
+
+
+// device type definition
+DECLARE_DEVICE_TYPE(PDS_HYPERDRIVE, macpds_hyperdrive_device)
+
+#endif // MAME_BUS_PDS_TPDFPD_H
diff --git a/src/mame/drivers/mac128.cpp b/src/mame/drivers/mac128.cpp
index 0100d89a58d..46b5094373e 100644
--- a/src/mame/drivers/mac128.cpp
+++ b/src/mame/drivers/mac128.cpp
@@ -102,6 +102,8 @@ c0 8 data bits, Rx disabled
#include "softlist.h"
#include "speaker.h"
+#include "bus/macpds/hyperdrive.h"
+
#define MAC_SCREEN_NAME "screen"
#define MAC_539X_1_TAG "539x_1"
#define MAC_539X_2_TAG "539x_2"
@@ -1337,6 +1339,11 @@ static const floppy_interface mac_floppy_interface =
"floppy_3_5"
};
+static void mac_pds_cards(device_slot_interface &device)
+{
+ device.option_add("hyperdrive", PDS_HYPERDRIVE); // GCC HyperDrive ST-506 interface
+}
+
void mac128_state::mac512ke(machine_config &config)
{
/* basic machine hardware */
@@ -1390,6 +1397,9 @@ void mac128_state::mac512ke(machine_config &config)
RAM(config, m_ram);
m_ram->set_default_size("512K");
+ MACPDS(config, "macpds", "maincpu");
+ MACPDS_SLOT(config, "pds", "macpds", mac_pds_cards, nullptr);
+
// software list
SOFTWARE_LIST(config, "flop35_list").set_type("mac_flop", SOFTWARE_LIST_ORIGINAL_SYSTEM);
SOFTWARE_LIST(config, "hdd_list").set_type("mac_hdd", SOFTWARE_LIST_ORIGINAL_SYSTEM);