// license:BSD-3-Clause // copyright-holders:Aaron Giles /********************************************************************* dvmemory.h Memory debugger view. ***************************************************************************/ #ifndef MAME_EMU_DEBUG_DVMEMORY_H #define MAME_EMU_DEBUG_DVMEMORY_H #pragma once #include "debugvw.h" #include "softfloat3/source/include/softfloat.h" //************************************************************************** // TYPE DEFINITIONS //************************************************************************** // a memory view_source class debug_view_memory_source : public debug_view_source { friend class debug_view_memory; public: debug_view_memory_source(std::string &&name, address_space &space); debug_view_memory_source(std::string &&name, memory_region ®ion); debug_view_memory_source(std::string &&name, void *base, int element_size, int num_elements, int num_blocks, int block_stride); address_space *space() const { return m_space; } private: address_space *m_space; // address space we reference (if any) device_memory_interface *m_memintf; // pointer to the memory interface of the device void * m_base; // pointer to memory base offs_t m_blocklength; // length of each block of memory offs_t m_numblocks; // number of blocks of memory offs_t m_blockstride; // stride between blocks of memory offs_t m_offsetxor; // XOR to apply to offsets endianness_t m_endianness; // endianness of memory u8 m_prefsize; // preferred bytes per chunk }; // debug view for memory class debug_view_memory : public debug_view { friend class debug_view_manager; // construction/destruction debug_view_memory(running_machine &machine, debug_view_osd_update_func osdupdate, void *osdprivate); public: // getters const char *expression() const { return m_expression.string(); } int get_data_format() { flush_updates(); return m_data_format; } u32 chunks_per_row() { flush_updates(); return m_chunks_per_row; } bool reverse() const { return m_reverse_view; } bool ascii() const { return m_ascii_view; } bool physical() const { return m_no_translation; } offs_t addressAtCursorPosition(const debug_view_xy& pos) { return get_cursor_pos(pos).m_address; } // setters void set_expression(const std::string &expression); void set_chunks_per_row(u32 rowchunks); void set_data_format(int format); // 1-8 current values 9 32bit floating point void set_reverse(bool reverse); void set_ascii(bool reverse); void set_physical(bool physical); protected: // view overrides virtual void view_notify(debug_view_notification type) override; virtual void view_update() override; virtual void view_char(int chval) override; virtual void view_click(const int button, const debug_view_xy& pos) override; private: struct cursor_pos { cursor_pos(offs_t address = 0, u8 shift = 0) : m_address(address), m_shift(shift) { } offs_t m_address; u8 m_shift; }; // internal helpers void enumerate_sources(); void recompute(); bool needs_recompute(); // cursor position management cursor_pos get_cursor_pos(const debug_view_xy& cursor); void set_cursor_pos(cursor_pos pos); cursor_pos begin_update_and_get_cursor_pos() { begin_update(); return get_cursor_pos(m_cursor); } void end_update_and_set_cursor_pos(cursor_pos pos) { set_cursor_pos(pos); end_update(); } // memory access bool read(u8 size, offs_t offs, u64 &data); void write(u8 size, offs_t offs, u64 data); bool read(u8 size, offs_t offs, extFloat80_t &data); bool read_chunk(offs_t address, int chunknum, u64 &chunkdata); void generate_row(debug_view_char *destmin, debug_view_char *destmax, debug_view_char *destrow, offs_t address); // internal state debug_view_expression m_expression; // expression describing the start address u32 m_chunks_per_row; // number of chunks displayed per line u8 m_bytes_per_chunk; // bytes per chunk u8 m_steps_per_chunk; // bytes per chunk int m_data_format; // 1-8 current values 9 32bit floating point bool m_reverse_view; // reverse-endian view? bool m_ascii_view; // display ASCII characters? bool m_no_translation; // don't run addresses through the cpu translation hook bool m_edit_enabled; // can modify contents ? offs_t m_maxaddr; // (derived) maximum address to display u32 m_bytes_per_row; // (derived) number of bytes displayed per line u32 m_byte_offset; // (derived) offset of starting visible byte std::string m_addrformat; // (derived) format string to use to print addresses struct section { bool contains(int x) const { return x >= m_pos && x < m_pos + m_width; } s32 m_pos; /* starting position */ s32 m_width; /* width of this section */ }; section m_section[3]; // (derived) 3 sections to manage struct memory_view_pos { u8 m_spacing; /* spacing between each entry */ u8 m_shift[24]; /* shift for each character */ }; static const memory_view_pos s_memory_pos_table[12]; // table for rendering at different data formats // constants static constexpr int MEM_MAX_LINE_WIDTH = 1024; }; #endif // MAME_EMU_DEBUG_DVMEMORY_H 27'>27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260
// license:BSD-3-Clause
// copyright-holders:68bit
/**********************************************************************

    SWTPC MP-S2 Dual Serial Interface
    For 16 byte I/O address block.

**********************************************************************/

#include "emu.h"
#include "mps2.h"

#include "bus/rs232/rs232.h"
#include "machine/6850acia.h"
#include "machine/input_merger.h"

//**************************************************************************
//  TYPE DEFINITIONS
//**************************************************************************

// ======================> ss50_mps2_device

class ss50_mps2_device : public device_t, public ss50_card_interface
{
public:
	// construction/destruction
	ss50_mps2_device(const machine_config &mconfig, const char *tag, device_t *owner, u32 clock)
		: device_t(mconfig, SS50_MPS2, tag, owner, clock)
		, ss50_card_interface(mconfig, *this)
		, m_acia_upper(*this, "acia_upper")
		, m_tx_rate_upper_jumper(*this, "TX_BAUD_UPPER")
		, m_rx_rate_upper_jumper(*this, "RX_BAUD_UPPER")
		, m_acia_lower(*this, "acia_lower")
		, m_tx_rate_lower_jumper(*this, "TX_BAUD_LOWER")
		, m_rx_rate_lower_jumper(*this, "RX_BAUD_LOWER")
	{
	}

protected:
	// device-specific overrides
	virtual ioport_constructor device_input_ports() const override ATTR_COLD;
	virtual void device_add_mconfig(machine_config &config) override ATTR_COLD;
	virtual void device_start() override { }

	// interface-specific overrides
	virtual u8 register_read(offs_t offset) override;
	virtual void register_write(offs_t offset, u8 data) override;
	virtual void f110_w(int state) override;
	virtual void f150_9600_w(int state) override;
	virtual void f300_w(int state) override;
	virtual void f600_4800_w(int state) override;
	virtual void f600_1200_w(int state) override;

private:
	required_device<acia6850_device> m_acia_upper;
	required_ioport m_tx_rate_upper_jumper;
	required_ioport m_rx_rate_upper_jumper;
	required_device<acia6850_device> m_acia_lower;
	required_ioport m_tx_rate_lower_jumper;
	required_ioport m_rx_rate_lower_jumper;
};


static INPUT_PORTS_START( mps2 )
	PORT_START("TX_BAUD_UPPER")
	PORT_DIPNAME(0x1f, 0x1d, "Upper TX Baud Rate")
	PORT_DIPSETTING(0x1e, "110 / 440")
	PORT_DIPSETTING(0x1b, "300 / 1200")
	PORT_DIPSETTING(0x0f, "1200 / 4800")
	PORT_DIPSETTING(0x17, "4800 / 19200")
	PORT_DIPSETTING(0x1d, "9600 / 38400")

	PORT_START("RX_BAUD_UPPER")
	PORT_DIPNAME(0x1f, 0x1d, "Upper RX Baud Rate")
	PORT_DIPSETTING(0x1e, "110 / 440")
	PORT_DIPSETTING(0x1b, "300 / 1200")
	PORT_DIPSETTING(0x0f, "1200 / 4800")
	PORT_DIPSETTING(0x17, "4800 / 19200")
	PORT_DIPSETTING(0x1d, "9600 / 38400")

	PORT_START("TX_BAUD_LOWER")
	PORT_DIPNAME(0x1f, 0x1d, "Lower TX Baud Rate")
	PORT_DIPSETTING(0x1e, "110 / 440")
	PORT_DIPSETTING(0x1b, "300 / 1200")
	PORT_DIPSETTING(0x0f, "1200 / 4800")
	PORT_DIPSETTING(0x17, "4800 / 19200")
	PORT_DIPSETTING(0x1d, "9600 / 38400")

	PORT_START("RX_BAUD_LOWER")
	PORT_DIPNAME(0x1f, 0x1d, "Lower RX Baud Rate")
	PORT_DIPSETTING(0x1e, "110 / 440")
	PORT_DIPSETTING(0x1b, "300 / 1200")
	PORT_DIPSETTING(0x0f, "1200 / 4800")
	PORT_DIPSETTING(0x17, "4800 / 19200")
	PORT_DIPSETTING(0x1d, "9600 / 38400")

INPUT_PORTS_END


//-------------------------------------------------
//  input_ports - device-specific input ports
//-------------------------------------------------

ioport_constructor ss50_mps2_device::device_input_ports() const
{
	return INPUT_PORTS_NAME(mps2);
}


static DEVICE_INPUT_DEFAULTS_START( terminal_upper )
	DEVICE_INPUT_DEFAULTS("RS232_RXBAUD", 0xff, RS232_BAUD_9600)
	DEVICE_INPUT_DEFAULTS("RS232_TXBAUD", 0xff, RS232_BAUD_9600)
	DEVICE_INPUT_DEFAULTS("RS232_DATABITS", 0xff, RS232_DATABITS_8)
	DEVICE_INPUT_DEFAULTS("RS232_PARITY", 0xff, RS232_PARITY_NONE)
	DEVICE_INPUT_DEFAULTS("RS232_STOPBITS", 0xff, RS232_STOPBITS_1)
DEVICE_INPUT_DEFAULTS_END

static DEVICE_INPUT_DEFAULTS_START( terminal_lower )
	DEVICE_INPUT_DEFAULTS("RS232_RXBAUD", 0xff, RS232_BAUD_9600)
	DEVICE_INPUT_DEFAULTS("RS232_TXBAUD", 0xff, RS232_BAUD_9600)
	DEVICE_INPUT_DEFAULTS("RS232_DATABITS", 0xff, RS232_DATABITS_8)
	DEVICE_INPUT_DEFAULTS("RS232_PARITY", 0xff, RS232_PARITY_NONE)
	DEVICE_INPUT_DEFAULTS("RS232_STOPBITS", 0xff, RS232_STOPBITS_1)
DEVICE_INPUT_DEFAULTS_END

//-------------------------------------------------
//  device_add_mconfig - add device-specific
//  machine configuration
//-------------------------------------------------

void ss50_mps2_device::device_add_mconfig(machine_config &config)
{
	ACIA6850(config, m_acia_upper, 0);
	m_acia_upper->txd_handler().set("rs232_upper", FUNC(rs232_port_device::write_txd));
	m_acia_upper->rts_handler().set("rs232_upper", FUNC(rs232_port_device::write_rts));
	m_acia_upper->irq_handler().set("irq", FUNC(input_merger_device::in_w<0>));

	rs232_port_device &rs232_upper(RS232_PORT(config, "rs232_upper", default_rs232_devices, "terminal"));
	rs232_upper.rxd_handler().set(m_acia_upper, FUNC(acia6850_device::write_rxd));
	rs232_upper.cts_handler().set(m_acia_upper, FUNC(acia6850_device::write_cts));
	rs232_upper.dcd_handler().set(m_acia_upper, FUNC(acia6850_device::write_dcd));
	rs232_upper.set_option_device_input_defaults("terminal", DEVICE_INPUT_DEFAULTS_NAME(terminal_upper));

	ACIA6850(config, m_acia_lower, 0);
	m_acia_lower->txd_handler().set("rs232_lower", FUNC(rs232_port_device::write_txd));
	m_acia_lower->rts_handler().set("rs232_lower", FUNC(rs232_port_device::write_rts));
	m_acia_lower->irq_handler().set("irq", FUNC(input_merger_device::in_w<1>));

	rs232_port_device &rs232_lower(RS232_PORT(config, "rs232_lower", default_rs232_devices, "terminal"));
	rs232_lower.rxd_handler().set(m_acia_lower, FUNC(acia6850_device::write_rxd));
	rs232_lower.cts_handler().set(m_acia_lower, FUNC(acia6850_device::write_cts));
	rs232_lower.dcd_handler().set(m_acia_lower, FUNC(acia6850_device::write_dcd));
	rs232_lower.set_option_device_input_defaults("terminal", DEVICE_INPUT_DEFAULTS_NAME(terminal_lower));

	INPUT_MERGER_ANY_HIGH(config, "irq").output_handler().set(FUNC(ss50_mps2_device::write_irq));
}


//-------------------------------------------------
//  register_read - read from a port register
//-------------------------------------------------

u8 ss50_mps2_device::register_read(offs_t offset)
{
	if (offset < 2)
		return m_acia_upper->read(offset & 1);

	if (offset < 4)
		return 0;

	if (offset < 6)
		return m_acia_lower->read((offset - 4) & 1);

	if (offset < 0xe)
		return 0;

	// TODO there is also a 4 bit control line input port at
	// offset 0x0f, repeated at 0x0e.
	return 0;
}

//-------------------------------------------------
//  register_write - write to a port register
//-------------------------------------------------

void ss50_mps2_device::register_write(offs_t offset, u8 data)
{
	if (offset < 2)
		m_acia_upper->write(offset & 1, data);

	if (offset < 4)
		return;

	if (offset < 6)
		m_acia_lower->write((offset - 4) & 1, data);
}

void ss50_mps2_device::f110_w(int state)
{
	if (!BIT(m_tx_rate_upper_jumper->read(), 0))
		m_acia_upper->write_txc(state);
	if (!BIT(m_rx_rate_upper_jumper->read(), 0))
		m_acia_upper->write_rxc(state);
	if (!BIT(m_tx_rate_lower_jumper->read(), 0))
		m_acia_lower->write_txc(state);
	if (!BIT(m_rx_rate_lower_jumper->read(), 0))
		m_acia_lower->write_rxc(state);
}

void ss50_mps2_device::f150_9600_w(int state)
{
	if (!BIT(m_tx_rate_upper_jumper->read(), 1))
		m_acia_upper->write_txc(state);
	if (!BIT(m_rx_rate_upper_jumper->read(), 1))
		m_acia_upper->write_rxc(state);
	if (!BIT(m_tx_rate_lower_jumper->read(), 1))
		m_acia_lower->write_txc(state);
	if (!BIT(m_rx_rate_lower_jumper->read(), 1))
		m_acia_lower->write_rxc(state);
}

void ss50_mps2_device::f300_w(int state)
{
	if (!BIT(m_tx_rate_upper_jumper->read(), 2))
		m_acia_upper->write_txc(state);
	if (!BIT(m_rx_rate_upper_jumper->read(), 2))
		m_acia_upper->write_rxc(state);
	if (!BIT(m_tx_rate_lower_jumper->read(), 2))
		m_acia_lower->write_txc(state);
	if (!BIT(m_rx_rate_lower_jumper->read(), 2))
		m_acia_lower->write_rxc(state);
}

void ss50_mps2_device::f600_4800_w(int state)
{
	if (!BIT(m_tx_rate_upper_jumper->read(), 3))
		m_acia_upper->write_txc(state);
	if (!BIT(m_rx_rate_upper_jumper->read(), 3))
		m_acia_upper->write_rxc(state);
	if (!BIT(m_tx_rate_lower_jumper->read(), 3))
		m_acia_lower->write_txc(state);
	if (!BIT(m_rx_rate_lower_jumper->read(), 3))
		m_acia_lower->write_rxc(state);
}

void ss50_mps2_device::f600_1200_w(int state)
{
	if (!BIT(m_tx_rate_upper_jumper->read(), 4))
		m_acia_upper->write_txc(state);
	if (!BIT(m_rx_rate_upper_jumper->read(), 4))
		m_acia_upper->write_rxc(state);
	if (!BIT(m_tx_rate_lower_jumper->read(), 4))
		m_acia_lower->write_txc(state);
	if (!BIT(m_rx_rate_lower_jumper->read(), 4))
		m_acia_lower->write_rxc(state);
}


// device type definition
DEFINE_DEVICE_TYPE_PRIVATE(SS50_MPS2, ss50_card_interface, ss50_mps2_device, "ss50_mps2", "MP-S2 Dual Serial Interface")