summaryrefslogtreecommitdiffstatshomepage
path: root/src/emu/bus/pet/user.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/emu/bus/pet/user.c')
-rw-r--r--src/emu/bus/pet/user.c124
1 files changed, 124 insertions, 0 deletions
diff --git a/src/emu/bus/pet/user.c b/src/emu/bus/pet/user.c
new file mode 100644
index 00000000000..14a87ea9e21
--- /dev/null
+++ b/src/emu/bus/pet/user.c
@@ -0,0 +1,124 @@
+// license:BSD-3-Clause
+// copyright-holders:Curt Coder
+/**********************************************************************
+
+ Commodore PET User Port emulation
+
+ Copyright MESS Team.
+ Visit http://mamedev.org for licensing and usage restrictions.
+
+**********************************************************************/
+
+#include "user.h"
+
+
+
+//**************************************************************************
+// GLOBAL VARIABLES
+//**************************************************************************
+
+const device_type PET_USER_PORT = &device_creator<pet_user_port_device>;
+
+
+
+//**************************************************************************
+// CARD INTERFACE
+//**************************************************************************
+
+//-------------------------------------------------
+// device_pet_user_port_interface - constructor
+//-------------------------------------------------
+
+device_pet_user_port_interface::device_pet_user_port_interface(const machine_config &mconfig, device_t &device)
+ : device_slot_card_interface(mconfig,device)
+{
+ m_slot = dynamic_cast<pet_user_port_device *>(device.owner());
+}
+
+
+//-------------------------------------------------
+// ~device_pet_user_port_interface - destructor
+//-------------------------------------------------
+
+device_pet_user_port_interface::~device_pet_user_port_interface()
+{
+}
+
+
+
+//**************************************************************************
+// LIVE DEVICE
+//**************************************************************************
+
+//-------------------------------------------------
+// pet_user_port_device - constructor
+//-------------------------------------------------
+
+pet_user_port_device::pet_user_port_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock) :
+ device_t(mconfig, PET_USER_PORT, "PET user port", tag, owner, clock, "pet_user_port", __FILE__),
+ device_slot_interface(mconfig, *this)
+{
+}
+
+
+//-------------------------------------------------
+// device_config_complete - perform any
+// operations now that the configuration is
+// complete
+//-------------------------------------------------
+
+void pet_user_port_device::device_config_complete()
+{
+ // inherit a copy of the static data
+ const pet_user_port_interface *intf = reinterpret_cast<const pet_user_port_interface *>(static_config());
+ if (intf != NULL)
+ {
+ *static_cast<pet_user_port_interface *>(this) = *intf;
+ }
+
+ // or initialize to defaults if none provided
+ else
+ {
+ memset(&m_out_ca1_cb, 0, sizeof(m_out_ca1_cb));
+ memset(&m_out_cb2_cb, 0, sizeof(m_out_cb2_cb));
+ }
+}
+
+
+//-------------------------------------------------
+// device_start - device-specific startup
+//-------------------------------------------------
+
+void pet_user_port_device::device_start()
+{
+ m_card = dynamic_cast<device_pet_user_port_interface *>(get_card_device());
+
+ // resolve callbacks
+ m_out_ca1_func.resolve(m_out_ca1_cb, *this);
+ m_out_cb2_func.resolve(m_out_cb2_cb, *this);
+}
+
+
+//-------------------------------------------------
+// device_reset - device-specific reset
+//-------------------------------------------------
+
+void pet_user_port_device::device_reset()
+{
+}
+
+
+READ8_MEMBER( pet_user_port_device::pa_r ) { UINT8 data = 0xff; if (m_card != NULL) data = m_card->pet_pa_r(space, offset); return data; }
+WRITE8_MEMBER( pet_user_port_device::pa_w ) { if (m_card != NULL) m_card->pet_pa_w(space, offset, data); }
+READ_LINE_MEMBER( pet_user_port_device::ca1_r ) { int state = 1; if (m_card != NULL) state = m_card->pet_ca1_r(); return state; }
+WRITE_LINE_MEMBER( pet_user_port_device::ca1_w ) { if (m_card != NULL) m_card->pet_ca1_w(state); }
+READ_LINE_MEMBER( pet_user_port_device::cb2_r ) { int state = 1; if (m_card != NULL) state = m_card->pet_cb2_r(); return state; }
+WRITE_LINE_MEMBER( pet_user_port_device::cb2_w ) { if (m_card != NULL) m_card->pet_cb2_w(state); }
+
+
+//-------------------------------------------------
+// SLOT_INTERFACE( pet_user_port_cards )
+//-------------------------------------------------
+
+SLOT_INTERFACE_START( pet_user_port_cards )
+SLOT_INTERFACE_END