From 5cbbd0499fa709a7cd1993ae4f6f787a629ee881 Mon Sep 17 00:00:00 2001
From: AJR <ajrhacker@users.noreply.github.com>
Date: Wed, 27 Mar 2019 17:55:23 -0400
Subject: [PATCH] Add dumps and skeleton device for Ultra 12F ISA ESDI
 controller

---
 scripts/src/bus.lua               |  2 +
 src/devices/bus/isa/isa_cards.cpp |  2 +
 src/devices/bus/isa/ultra12f.cpp  | 64 +++++++++++++++++++++++++++++++
 src/devices/bus/isa/ultra12f.h    | 38 ++++++++++++++++++
 4 files changed, 106 insertions(+)
 create mode 100644 src/devices/bus/isa/ultra12f.cpp
 create mode 100644 src/devices/bus/isa/ultra12f.h

diff --git a/scripts/src/bus.lua b/scripts/src/bus.lua
index 14130a37ae7..2ecf90c0ace 100644
--- a/scripts/src/bus.lua
+++ b/scripts/src/bus.lua
@@ -1320,6 +1320,8 @@ if (BUSES["ISA"]~=null) then
 		MAME_DIR .. "src/devices/bus/isa/bt54x.h",
 		MAME_DIR .. "src/devices/bus/isa/dcb.cpp",
 		MAME_DIR .. "src/devices/bus/isa/dcb.h",
+		MAME_DIR .. "src/devices/bus/isa/ultra12f.cpp",
+		MAME_DIR .. "src/devices/bus/isa/ultra12f.h",
 	}
 end
 
diff --git a/src/devices/bus/isa/isa_cards.cpp b/src/devices/bus/isa/isa_cards.cpp
index 8ab0832c03d..5b0c2315f38 100644
--- a/src/devices/bus/isa/isa_cards.cpp
+++ b/src/devices/bus/isa/isa_cards.cpp
@@ -41,6 +41,7 @@
 #include "cl_sh260.h"
 #include "bt54x.h"
 #include "dcb.h"
+#include "ultra12f.h"
 
 // sound
 #include "adlib.h"
@@ -187,4 +188,5 @@ void pc_isa16_cards(device_slot_interface &device)
 	device.option_add("bt542bh", BT542BH);
 	device.option_add("bt545s", BT545S);
 	device.option_add("dcb", NOVELL_DCB);
+	device.option_add("ultra12f", ULTRA12F);
 }
diff --git a/src/devices/bus/isa/ultra12f.cpp b/src/devices/bus/isa/ultra12f.cpp
new file mode 100644
index 00000000000..f2f93507548
--- /dev/null
+++ b/src/devices/bus/isa/ultra12f.cpp
@@ -0,0 +1,64 @@
+// license:BSD-3-Clause
+// copyright-holders:AJR
+/***************************************************************************
+
+    UltraStor Ultra 12F ESDI Caching Disk Controller
+
+***************************************************************************/
+
+#include "emu.h"
+#include "ultra12f.h"
+
+DEFINE_DEVICE_TYPE(ULTRA12F, ultra12f_device, "ultra12f", "Ultra 12F ESDI Caching Disk Controller")
+
+ultra12f_device::ultra12f_device(const machine_config &mconfig, const char *tag, device_t *owner, u32 clock)
+	: device_t(mconfig, ULTRA12F, tag, owner, clock)
+	, device_isa16_card_interface(mconfig, *this)
+	, m_hpc(*this, "hpc")
+	, m_bios(*this, "bios")
+{
+}
+
+void ultra12f_device::device_start()
+{
+	// Firmware EPROM has a couple of lines scrambled
+	u8 *firmware = memregion("firmware")->base();
+	for (offs_t b = 0; b < 0x8000; b += 0x100)
+	{
+		for (offs_t x = 0; x < 0x10; x++)
+		{
+			std::swap(firmware[b | x | 0x10], firmware[b | x | 0x80]);
+			std::swap(firmware[b | x | 0x30], firmware[b | x | 0xa0]);
+			std::swap(firmware[b | x | 0x50], firmware[b | x | 0xc0]);
+			std::swap(firmware[b | x | 0x70], firmware[b | x | 0xe0]);
+		}
+	}
+}
+
+void ultra12f_device::hpc_map(address_map &map)
+{
+	map(0x8000, 0xffff).rom().region("firmware", 0);
+}
+
+void ultra12f_device::device_add_mconfig(machine_config &config)
+{
+	HPC46003(config, m_hpc, 24_MHz_XTAL); // apparently a HPC46003V30 custom-labeled as "USC010-1-30"
+	m_hpc->set_addrmap(AS_PROGRAM, &ultra12f_device::hpc_map);
+}
+
+ROM_START(ultra12f)
+	ROM_REGION(0x4000, "bios", 0)
+	ROM_SYSTEM_BIOS(0, "v202", "UBIOS 2.02") // "Date : 04/05/90 Version 2.02"
+	ROMX_LOAD("38001-009.bin", 0x0000, 0x4000, CRC(b96c4839) SHA1(4e601c4ff1deae959c0807479d25de6db4e6cf3e), ROM_BIOS(0)) // 27C128, 150ns EPROM
+	ROM_SYSTEM_BIOS(1, "v300", "UBIOS 3.00") // "Date : 06/18/91 Version 3.00"
+	ROMX_LOAD("38001-010.bin", 0x0000, 0x4000, CRC(aa80d74e) SHA1(b507e6ead79e836969b8b6f2fa88ca99d6b354ad), ROM_BIOS(1)) // 27C128-12
+
+	ROM_REGION(0x8000, "firmware", 0)
+	ROMX_LOAD("28001-009.bin", 0x0000, 0x8000, CRC(0b6c74a1) SHA1(1a9eb5866f2104e94295d0915fe10c4c1745665b), ROM_BIOS(0)) // 27C256, 120ns EPROM
+	ROMX_LOAD("28001-012.bin", 0x0000, 0x8000, CRC(62fd2f69) SHA1(48d6e65001a262b3e99d373fa59e0672c5ec4284), ROM_BIOS(1)) // 27C256-12
+ROM_END
+
+const tiny_rom_entry *ultra12f_device::device_rom_region() const
+{
+	return ROM_NAME(ultra12f);
+}
diff --git a/src/devices/bus/isa/ultra12f.h b/src/devices/bus/isa/ultra12f.h
new file mode 100644
index 00000000000..6b259aefa6b
--- /dev/null
+++ b/src/devices/bus/isa/ultra12f.h
@@ -0,0 +1,38 @@
+// license:BSD-3-Clause
+// copyright-holders:AJR
+/***************************************************************************
+
+    UltraStor Ultra 12F ESDI Caching Disk Controller
+
+***************************************************************************/
+
+#ifndef MAME_BUS_ISA_ULTRA12F_H
+#define MAME_BUS_ISA_ULTRA12F_H
+
+#pragma once
+
+#include "isa.h"
+#include "cpu/hpc/hpc.h"
+
+class ultra12f_device : public device_t, public device_isa16_card_interface
+{
+public:
+	ultra12f_device(const machine_config &mconfig, const char *tag, device_t *owner, u32 clock);
+
+	static constexpr feature_type unemulated_features() { return feature::DISK; }
+
+protected:
+	virtual void device_start() override;
+	virtual void device_add_mconfig(machine_config &config) override;
+	virtual const tiny_rom_entry *device_rom_region() const override;
+
+private:
+	void hpc_map(address_map &map);
+
+	required_device<hpc_device> m_hpc;
+	required_region_ptr<u8> m_bios;
+};
+
+DECLARE_DEVICE_TYPE(ULTRA12F, ultra12f_device)
+
+#endif // MAME_BUS_ISA_ULTRA12F_H