summaryrefslogtreecommitdiffstatshomepage
path: root/src/devices/machine/vrender0.h
blob: 8a3b19d59fba9184b92e7d8b7f26f17f36e4fdcb (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
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
// license:BSD-3-Clause
// copyright-holders:Angelo Salese, ElSemi
/***************************************************************************

    MagicEyes VRender0 SoC

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

#ifndef MAME_MACHINE_VRENDER0_H
#define MAME_MACHINE_VRENDER0_H

#pragma once

#include "cpu/se3208/se3208.h"
#include "screen.h"
#include "video/vrender0.h"
#include "sound/vrender0.h"
#include "emupal.h"
#include "speaker.h"
#include "diserial.h"

//**************************************************************************
//  INTERFACE CONFIGURATION MACROS
//**************************************************************************

#define IDLE_LOOP_SPEEDUP



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

// ======================> vr0uart_device

class vrender0soc_device;

class vr0uart_device : public device_t,
					   public device_serial_interface
{
public:
	// construction/destruction
	vr0uart_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock);

	void regs_map(address_map &map);
	void set_channel_num(int ch) { m_channel_num = ch; }
	void set_parent(vrender0soc_device *parent) { m_parent = parent; }

protected:
	// device-level overrides
	virtual void device_start() override;
	virtual void device_reset() override;

private:
	uint32_t control_r();
	void control_w(offs_t offset, uint32_t data, uint32_t mem_mask = ~0);
	uint32_t baud_rate_div_r();
	void baud_rate_div_w(offs_t offset, uint32_t data, uint32_t mem_mask = ~0);
	uint32_t status_r();
	void transmit_buffer_w(offs_t offset, uint32_t data, uint32_t mem_mask = ~0);
	uint32_t receive_buffer_r(offs_t offset, uint32_t mem_mask = ~0);
	TIMER_CALLBACK_MEMBER( break_timer_cb );

	uint32_t m_ucon = 0; // control
	uint32_t m_ubdr = 0; // baud rate
	uint32_t m_ustat = 0; // status
	util::fifo<uint8_t, 16> m_urxb_fifo; // receive FIFO

	void update_serial_config();
	inline uint32_t calculate_baud_rate();

	virtual void tra_callback() override;
	virtual void tra_complete() override;
	virtual void rcv_complete() override;

	inline void tx_send_byte(uint8_t val);
	int m_channel_num;
	vrender0soc_device *m_parent;
};


// device type definition
DECLARE_DEVICE_TYPE(VRENDER0_UART, vr0uart_device)


class vrender0soc_device : public device_t
{
public:
	// construction/destruction
	vrender0soc_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock);

	void regs_map(address_map &map);
	void audiovideo_map(address_map &map);
	void texture_map(address_map &map);
	void frame_map(address_map &map);
	template<class T> void set_host_cpu_tag(T &&tag) { m_host_cpu.set_tag(std::forward<T>(tag)); }
	void set_external_vclk(const uint32_t vclk) { m_ext_vclk = vclk; }
	void set_external_vclk(const XTAL vclk) { m_ext_vclk = vclk.value(); }
	bool crt_is_blanked() { return ((m_crtcregs[0] & 0x0200) == 0x0200); }
	bool crt_active_vblank_irq();
	void IntReq( int num );
	uint8_t irq_callback();
	bool irq_pending() { return m_intst; }
	void write_line_tx(int port, uint8_t value);
	template <int Port> auto tx_callback() { return write_tx[Port].bind(); }
	template <int Port> DECLARE_WRITE_LINE_MEMBER(rx_w) { m_uart[Port]->rx_w((uint8_t)state); }

protected:
	// device-level overrides
	//virtual void device_validity_check(validity_checker &valid) const override;
	virtual void device_add_mconfig(machine_config &config) override;
	virtual void device_start() override;
	virtual void device_reset() override;

private:
	required_device <se3208_device> m_host_cpu;
	required_device <screen_device> m_screen;
	required_device <palette_device> m_palette;
	required_device <vr0video_device> m_vr0vid;
	required_device <vr0sound_device> m_vr0snd;
	required_device <speaker_device> m_lspeaker;
	required_device <speaker_device> m_rspeaker;
	required_device_array <vr0uart_device, 2> m_uart;
	required_shared_ptr <uint32_t> m_crtcregs;
	std::unique_ptr<uint16_t []> m_textureram;
	std::unique_ptr<uint16_t []> m_frameram;

	address_space *m_host_space = nullptr;
	uint32_t m_ext_vclk = 0;

	devcb_write_line::array<2> write_tx;

	// INTC
	uint32_t m_inten = 0;
	uint32_t inten_r();
	void inten_w(offs_t offset, uint32_t data, uint32_t mem_mask = ~0);

	uint32_t intvec_r();
	void intvec_w(offs_t offset, uint32_t data, uint32_t mem_mask = ~0);

	uint8_t m_IntHigh = 0;
	uint32_t m_intst = 0;
	uint32_t intst_r();
	void intst_w(uint32_t data);

	DECLARE_WRITE_LINE_MEMBER(soundirq_cb);

	// Timer
	template<int Which> void tmcon_w(offs_t offset, uint32_t data, uint32_t mem_mask = ~0);
	template<int Which> uint32_t tmcon_r();
	template<int Which> void tmcnt_w(offs_t offset, uint16_t data, uint16_t mem_mask = ~0);
	template<int Which> uint16_t tmcnt_r();
	template<int Which> TIMER_CALLBACK_MEMBER(Timercb);

	uint32_t m_timer_control[4] = { 0, 0, 0, 0 };
	uint16_t m_timer_count[4] = { 0, 0, 0, 0 };
	emu_timer  *m_Timer[4] = { nullptr, nullptr, nullptr, nullptr };
	void TimerStart(int which);

	// DMAC
	template<int Which> uint32_t dmac_r();
	template<int Which> void dmac_w(offs_t offset, uint32_t data, uint32_t mem_mask = ~0);
	template<int Which> uint32_t dmatc_r();
	template<int Which> void dmatc_w(offs_t offset, uint32_t data, uint32_t mem_mask = ~0);
	template<int Which> uint32_t dmasa_r();
	template<int Which> void dmasa_w(offs_t offset, uint32_t data, uint32_t mem_mask = ~0);
	template<int Which> uint32_t dmada_r();
	template<int Which> void dmada_w(offs_t offset, uint32_t data, uint32_t mem_mask = ~0);
	inline int dma_setup_hold(uint8_t setting, uint8_t bitmask);
	struct {
		uint32_t src = 0;
		uint32_t dst = 0;
		uint32_t size = 0;
		uint32_t ctrl = 0;
	}m_dma[2];

	// CRTC
	uint32_t crtc_r(offs_t offset);
	void crtc_w(offs_t offset, uint32_t data, uint32_t mem_mask = ~0);
	void crtc_update();
	inline bool crt_is_interlaced();

	// Misc
	uint32_t sysid_r();
	uint32_t cfgr_r();

	uint32_t screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect);
	DECLARE_WRITE_LINE_MEMBER(screen_vblank);

	uint16_t textureram_r(offs_t offset);
	void textureram_w(offs_t offset, uint16_t data, uint16_t mem_mask = ~0);
	uint16_t frameram_r(offs_t offset);
	void frameram_w(offs_t offset, uint16_t data, uint16_t mem_mask = ~0);

	// Hacks
#ifdef IDLE_LOOP_SPEEDUP
	uint8_t     m_FlipCntRead = 0;
	DECLARE_WRITE_LINE_MEMBER(idle_skip_resume_w);
	DECLARE_WRITE_LINE_MEMBER(idle_skip_speedup_w);
#endif
};


// device type definition
DECLARE_DEVICE_TYPE(VRENDER0_SOC, vrender0soc_device)


#endif // MAME_MACHINE_VRENDER0_H
> ENDIANNESS_LITTLE, 8, 24, 0, internal) , m_opcode_config("opcodes", ENDIANNESS_LITTLE, 8, 24, 0, internal) , m_vector_config("vectors", ENDIANNESS_LITTLE, 8, 5, 0) , m_wdm_w(*this) , m_cpu_type(cpu_type) { } device_memory_interface::space_config_vector g65816_device::memory_space_config() const { space_config_vector spaces = { std::make_pair(AS_PROGRAM, &m_program_config) }; if (has_configured_map(AS_DATA)) spaces.push_back(std::make_pair(AS_DATA, &m_data_config)); if (has_configured_map(AS_OPCODES)) spaces.push_back(std::make_pair(AS_OPCODES, &m_opcode_config)); if (has_configured_map(AS_VECTORS)) spaces.push_back(std::make_pair(AS_VECTORS, &m_vector_config)); return spaces; } void _5a22_device::_5a22_map(address_map &map) { map(0x4202, 0x4202).mirror(0xbf0000).w(FUNC(_5a22_device::wrmpya_w)); map(0x4203, 0x4203).mirror(0xbf0000).w(FUNC(_5a22_device::wrmpyb_w)); map(0x4204, 0x4204).mirror(0xbf0000).w(FUNC(_5a22_device::wrdivl_w)); map(0x4205, 0x4205).mirror(0xbf0000).w(FUNC(_5a22_device::wrdivh_w)); map(0x4206, 0x4206).mirror(0xbf0000).w(FUNC(_5a22_device::wrdvdd_w)); map(0x420d, 0x420d).mirror(0xbf0000).w(FUNC(_5a22_device::memsel_w)); map(0x4214, 0x4214).mirror(0xbf0000).r(FUNC(_5a22_device::rddivl_r)); map(0x4215, 0x4215).mirror(0xbf0000).r(FUNC(_5a22_device::rddivh_r)); map(0x4216, 0x4216).mirror(0xbf0000).r(FUNC(_5a22_device::rdmpyl_r)); map(0x4217, 0x4217).mirror(0xbf0000).r(FUNC(_5a22_device::rdmpyh_r)); } _5a22_device::_5a22_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock) : g65816_device(mconfig, _5A22, tag, owner, clock, CPU_TYPE_5A22, address_map_constructor(FUNC(_5a22_device::_5a22_map), this)) { } void g65816_device::g65816i_set_execution_mode(unsigned mode) { assert(mode < 5); switch (mode) { case 0: FTABLE_OPCODES = g65816i_opcodes_M0X0; break; case 1: FTABLE_OPCODES = g65816i_opcodes_M0X1; break; case 2: FTABLE_OPCODES = g65816i_opcodes_M1X0; break; case 3: FTABLE_OPCODES = g65816i_opcodes_M1X1; break; case 4: FTABLE_OPCODES = g65816i_opcodes_E; break; } FTABLE_GET_REG = s_g65816_get_reg[mode]; FTABLE_SET_REG = s_g65816_set_reg[mode]; FTABLE_SET_LINE = s_g65816_set_line[mode]; FTABLE_EXECUTE = s_g65816_execute[mode]; } const g65816_device::get_reg_func g65816_device::s_g65816_get_reg[5] = { &g65816_device::g65816i_get_reg_M0X0, &g65816_device::g65816i_get_reg_M0X1, &g65816_device::g65816i_get_reg_M1X0, &g65816_device::g65816i_get_reg_M1X1, &g65816_device::g65816i_get_reg_E }; const g65816_device::set_reg_func g65816_device::s_g65816_set_reg[5] = { &g65816_device::g65816i_set_reg_M0X0, &g65816_device::g65816i_set_reg_M0X1, &g65816_device::g65816i_set_reg_M1X0, &g65816_device::g65816i_set_reg_M1X1, &g65816_device::g65816i_set_reg_E }; const g65816_device::set_line_func g65816_device::s_g65816_set_line[5] = { &g65816_device::g65816i_set_line_M0X0, &g65816_device::g65816i_set_line_M0X1, &g65816_device::g65816i_set_line_M1X0, &g65816_device::g65816i_set_line_M1X1, &g65816_device::g65816i_set_line_E }; const g65816_device::execute_func g65816_device::s_g65816_execute[5] = { &g65816_device::g65816i_execute_M0X0, &g65816_device::g65816i_execute_M0X1, &g65816_device::g65816i_execute_M1X0, &g65816_device::g65816i_execute_M1X1, &g65816_device::g65816i_execute_E }; /* ======================================================================== */ /* ================================= MEMORY =============================== */ /* ======================================================================== */ #define ADDRESS_65816(A) ((A)&0x00ffffff) unsigned g65816_device::g65816i_read_8_normal(unsigned address) { address = ADDRESS_65816(address); CLOCKS -= (bus_5A22_cycle_burst(address)); return g65816_read_8(address); } unsigned g65816_device::g65816i_read_8_immediate(unsigned address) { address = ADDRESS_65816(address); CLOCKS -= (bus_5A22_cycle_burst(address)); return g65816_read_8_immediate(address); } unsigned g65816_device::g65816i_read_8_opcode(unsigned address) { address = ADDRESS_65816(address); CLOCKS -= (bus_5A22_cycle_burst(address)); return g65816_read_8_opcode(address); } unsigned g65816_device::g65816i_read_8_direct(unsigned address) { if (FLAG_E) { /* force address into zero page */ address = REGISTER_D + MAKE_UINT_8(address - REGISTER_D); CLOCKS -= (bus_5A22_cycle_burst(address)); } else { address = ADDRESS_65816(address); CLOCKS -= (bus_5A22_cycle_burst(address)); } return g65816_read_8(address); } unsigned g65816_device::g65816i_read_8_vector(unsigned address) { CLOCKS -= (bus_5A22_cycle_burst(address)); if (has_space(AS_VECTORS)) return space(AS_VECTORS).read_byte(address & 0x001f); else return g65816_read_8_immediate(address); } void g65816_device::g65816i_write_8_normal(unsigned address, unsigned value) { address = ADDRESS_65816(address); CLOCKS -= (bus_5A22_cycle_burst(address)); g65816_write_8(address, MAKE_UINT_8(value)); } void g65816_device::g65816i_write_8_direct(unsigned address, unsigned value) { if (FLAG_E) { /* force address into zero page */ address = REGISTER_D + MAKE_UINT_8(address - REGISTER_D); CLOCKS -= (bus_5A22_cycle_burst(address)); } else { address = ADDRESS_65816(address); CLOCKS -= (bus_5A22_cycle_burst(address)); } g65816_write_8(address, MAKE_UINT_8(value)); } unsigned g65816_device::g65816i_read_16_normal(unsigned address) { return g65816i_read_8_normal(address) | (g65816i_read_8_normal(address+1)<<8); } unsigned g65816_device::g65816i_read_16_immediate(unsigned address) { return g65816i_read_8_immediate(address) | (g65816i_read_8_immediate(address+1)<<8); } unsigned g65816_device::g65816i_read_16_direct(unsigned address) { return g65816i_read_8_direct(address) | (g65816i_read_8_direct(address+1)<<8); } unsigned g65816_device::g65816i_read_16_vector(unsigned address) { return g65816i_read_8_vector(address) | (g65816i_read_8_vector(address+1)<<8); } void g65816_device::g65816i_write_16_normal(unsigned address, unsigned value) { g65816i_write_8_normal(address, value&0xff); g65816i_write_8_normal(address+1, value>>8); } void g65816_device::g65816i_write_16_direct(unsigned address, unsigned value) { g65816i_write_8_direct(address, value&0xff); g65816i_write_8_direct(address+1, value>>8); } unsigned g65816_device::g65816i_read_24_normal(unsigned address) { return g65816i_read_8_normal(address) | (g65816i_read_8_normal(address+1)<<8) | (g65816i_read_8_normal(address+2)<<16); } unsigned g65816_device::g65816i_read_24_immediate(unsigned address) { return g65816i_read_8_immediate(address) | (g65816i_read_8_immediate(address+1)<<8) | (g65816i_read_8_immediate(address+2)<<16); } unsigned g65816_device::g65816i_read_24_direct(unsigned address) { return g65816i_read_8_direct(address) | (g65816i_read_8_direct(address+1)<<8) | (g65816i_read_8_direct(address+2)<<16); } /* ======================================================================== */ /* ================================= STACK ================================ */ /* ======================================================================== */ void g65816_device::g65816i_push_8(unsigned value) { g65816i_write_8_normal(REGISTER_S, value); if (FLAG_E) { REGISTER_S = MAKE_UINT_8(REGISTER_S-1) | 0x100; } else { REGISTER_S = MAKE_UINT_16(REGISTER_S-1); } } unsigned g65816_device::g65816i_pull_8() { if (FLAG_E) { REGISTER_S = MAKE_UINT_8(REGISTER_S+1) | 0x100; } else { REGISTER_S = MAKE_UINT_16(REGISTER_S+1); } return g65816i_read_8_normal(REGISTER_S); } void g65816_device::g65816i_push_16(unsigned value) { g65816i_push_8(value>>8); g65816i_push_8(value&0xff); } unsigned g65816_device::g65816i_pull_16() { unsigned res = g65816i_pull_8(); return res | (g65816i_pull_8() << 8); } void g65816_device::g65816i_push_24(unsigned value) { g65816i_push_8(value>>16); g65816i_push_8((value>>8)&0xff); g65816i_push_8(value&0xff); } unsigned g65816_device::g65816i_pull_24() { unsigned res = g65816i_pull_8(); res |= g65816i_pull_8() << 8; return ((res + 1) & 0xffff) | (g65816i_pull_8() << 16); } /* ======================================================================== */ /* ============================ PROGRAM COUNTER =========================== */ /* ======================================================================== */ void g65816_device::g65816i_jump_16(unsigned address) { REGISTER_PC = MAKE_UINT_16(address); g65816i_jumping(REGISTER_PC); } void g65816_device::g65816i_jump_24(unsigned address) { REGISTER_PB = address&0xff0000; REGISTER_PC = MAKE_UINT_16(address); g65816i_jumping(REGISTER_PC); } void g65816_device::g65816i_branch_8(unsigned offset) { if (FLAG_E) { unsigned old_pc = REGISTER_PC; REGISTER_PC = MAKE_UINT_16(REGISTER_PC + MAKE_INT_8(offset)); if((REGISTER_PC^old_pc)&0xff00) CLK(1); } else { REGISTER_PC = MAKE_UINT_16(REGISTER_PC + MAKE_INT_8(offset)); } g65816i_branching(REGISTER_PC); } void g65816_device::g65816i_branch_16(unsigned offset) { REGISTER_PC = MAKE_UINT_16(REGISTER_PC + offset); g65816i_branching(REGISTER_PC); } /* ======================================================================== */ /* ============================ STATUS REGISTER =========================== */ /* ======================================================================== */ void g65816_device::g65816i_set_flag_mx(unsigned value) { if (FLAG_M) { if(!(value & FLAGPOS_M)) { REGISTER_A |= REGISTER_B; REGISTER_B = 0; FLAG_M = MFLAG_CLEAR; } } else { if(value & FLAGPOS_M) { REGISTER_B = REGISTER_A & 0xff00; REGISTER_A = MAKE_UINT_8(REGISTER_A); FLAG_M = MFLAG_SET; } } if (FLAG_X) { if(!(value & FLAGPOS_X)) { FLAG_X = XFLAG_CLEAR; } } else { if(value & FLAGPOS_X) { REGISTER_X = MAKE_UINT_8(REGISTER_X); REGISTER_Y = MAKE_UINT_8(REGISTER_Y); FLAG_X = XFLAG_SET; } } g65816i_set_execution_mode((FLAG_M>>4) | (FLAG_X>>4)); } void g65816_device::g65816i_set_flag_e(unsigned value) { if (FLAG_E) { if(!value) { FLAG_E = EFLAG_CLEAR; g65816i_set_execution_mode(EXECUTION_MODE_M1X1); } } else { if(value) { if (!FLAG_M) { REGISTER_B = REGISTER_A & 0xff00; REGISTER_A &= 0x00ff; FLAG_M = MFLAG_SET; } if (!FLAG_X) { REGISTER_X = MAKE_UINT_8(REGISTER_X); REGISTER_Y = MAKE_UINT_8(REGISTER_Y); FLAG_X = XFLAG_SET; } REGISTER_S = MAKE_UINT_8(REGISTER_S) | 0x100; FLAG_E = EFLAG_SET; g65816i_set_execution_mode(EXECUTION_MODE_E); } } } void g65816_device::g65816i_set_flag_i(unsigned value) { value &= FLAGPOS_I; if(!FLAG_I || value) { FLAG_I = value; return; } FLAG_I = value; } /* Get the Processor Status Register */ unsigned g65816_device::g65816i_get_reg_p() { return (FLAG_N&0x80) | ((FLAG_V>>1)&0x40) | FLAG_M | FLAG_X | FLAG_D | FLAG_I | ((!FLAG_Z)<<1) | ((FLAG_C>>8)&1); } void g65816_device::g65816i_set_reg_p(unsigned value) { if (FLAG_E) { FLAG_N = value; FLAG_V = value << 1; FLAG_D = value & FLAGPOS_D; FLAG_Z = !(value & FLAGPOS_Z); FLAG_C = value << 8; g65816i_set_flag_i(value); } else { FLAG_N = value; FLAG_V = value << 1; FLAG_D = value & FLAGPOS_D; FLAG_Z = !(value & FLAGPOS_Z); FLAG_C = value << 8; g65816i_set_flag_mx(value); g65816i_set_flag_i(value); } } /* ======================================================================== */ /* =============================== INTERRUPTS ============================= */ /* ======================================================================== */ void g65816_device::g65816i_interrupt_hardware(unsigned vector) { if (FLAG_E) { CLK(7); g65816i_push_16(REGISTER_PC); g65816i_push_8(g65816i_get_reg_p() & ~FLAGPOS_B); FLAG_D = DFLAG_CLEAR; g65816i_set_flag_i(IFLAG_SET); REGISTER_PB = 0; g65816i_jump_16(g65816i_read_16_vector(vector)); standard_irq_callback(0); } else { CLK(8); g65816i_push_8(REGISTER_PB>>16); g65816i_push_16(REGISTER_PC); g65816i_push_8(g65816i_get_reg_p()); FLAG_D = DFLAG_CLEAR; g65816i_set_flag_i(IFLAG_SET); REGISTER_PB = 0; g65816i_jump_16(g65816i_read_16_vector(vector)); standard_irq_callback(0); } } void g65816_device::g65816i_interrupt_software(unsigned vector) { if (FLAG_E) { CLK(7); g65816i_push_16(REGISTER_PC); g65816i_push_8(g65816i_get_reg_p()); FLAG_D = DFLAG_CLEAR; g65816i_set_flag_i(IFLAG_SET); REGISTER_PB = 0; g65816i_jump_16(g65816i_read_16_immediate(vector)); } else { CLK(8); g65816i_push_8(REGISTER_PB>>16); g65816i_push_16(REGISTER_PC); g65816i_push_8(g65816i_get_reg_p()); FLAG_D = DFLAG_CLEAR; g65816i_set_flag_i(IFLAG_SET); REGISTER_PB = 0; g65816i_jump_16(g65816i_read_16_immediate(vector)); } } void g65816_device::g65816i_interrupt_nmi() { if (FLAG_E) { CLK(7); g65816i_push_16(REGISTER_PC); g65816i_push_8(g65816i_get_reg_p() & ~FLAGPOS_B); FLAG_D = DFLAG_CLEAR; REGISTER_PB = 0; g65816i_jump_16(g65816i_read_16_vector((FLAG_E) ? VECTOR_NMI_E : VECTOR_NMI_N)); } else { CLK(8); g65816i_push_8(REGISTER_PB>>16); g65816i_push_16(REGISTER_PC); g65816i_push_8(g65816i_get_reg_p()); FLAG_D = DFLAG_CLEAR; REGISTER_PB = 0; g65816i_jump_16(g65816i_read_16_vector((FLAG_E) ? VECTOR_NMI_E : VECTOR_NMI_N)); } } void g65816_device::g65816i_check_maskable_interrupt() { if(!(CPU_STOPPED & STOP_LEVEL_STOP) && LINE_IRQ && !FLAG_I) { g65816i_interrupt_hardware((FLAG_E) ? VECTOR_IRQ_E : VECTOR_IRQ_N); CPU_STOPPED &= ~STOP_LEVEL_WAI; LINE_IRQ=0; } } unsigned g65816_device::EA_IMM8() {REGISTER_PC += 1; return REGISTER_PB | MAKE_UINT_16(REGISTER_PC-1);} unsigned g65816_device::EA_IMM16() {REGISTER_PC += 2; return REGISTER_PB | MAKE_UINT_16(REGISTER_PC-2);} unsigned g65816_device::EA_IMM24() {REGISTER_PC += 3; return REGISTER_PB | MAKE_UINT_16(REGISTER_PC-3);} unsigned g65816_device::EA_D() {if(MAKE_UINT_8(REGISTER_D)) CLK(1); return MAKE_UINT_16(REGISTER_D + g65816i_read_8_immediate(EA_IMM8()));} unsigned g65816_device::EA_A() {return REGISTER_DB | g65816i_read_16_immediate(EA_IMM16());} unsigned g65816_device::EA_AL() {return g65816i_read_24_immediate(EA_IMM24());} unsigned g65816_device::EA_DX() {return MAKE_UINT_16(REGISTER_D + g65816i_read_8_immediate(EA_IMM8()) + REGISTER_X);} unsigned g65816_device::EA_DY() {return MAKE_UINT_16(REGISTER_D + g65816i_read_8_immediate(EA_IMM8()) + REGISTER_Y);} unsigned g65816_device::EA_AX() {unsigned tmp = EA_A(); if((tmp^(tmp+REGISTER_X))&0xff00) CLK(1); return tmp + REGISTER_X;} unsigned g65816_device::EA_ALX() {return EA_AL() + REGISTER_X;} unsigned g65816_device::EA_AY() {unsigned tmp = EA_A(); if((tmp^(tmp+REGISTER_X))&0xff00) CLK(1); return tmp + REGISTER_Y;} unsigned g65816_device::EA_DI() {return REGISTER_DB | g65816i_read_16_direct(EA_D());} unsigned g65816_device::EA_DLI() {return g65816i_read_24_direct(EA_D());} unsigned g65816_device::EA_AI() {return g65816i_read_16_normal(g65816i_read_16_immediate(EA_IMM16()));} unsigned g65816_device::EA_ALI() {return g65816i_read_24_normal(EA_A());} unsigned g65816_device::EA_DXI() {return REGISTER_DB | g65816i_read_16_direct(EA_DX());} unsigned g65816_device::EA_DIY() {unsigned tmp = REGISTER_DB | g65816i_read_16_direct(EA_D()); if((tmp^(tmp+REGISTER_X))&0xff00) CLK(1); return tmp + REGISTER_Y;} unsigned g65816_device::EA_DLIY() {return g65816i_read_24_direct(EA_D()) + REGISTER_Y;} unsigned g65816_device::EA_AXI() {return g65816i_read_16_normal(MAKE_UINT_16(g65816i_read_16_immediate(EA_IMM16()) + REGISTER_X));} unsigned g65816_device::EA_S() {return MAKE_UINT_16(REGISTER_S + g65816i_read_8_immediate(EA_IMM8()));} unsigned g65816_device::EA_SIY() {return MAKE_UINT_16(g65816i_read_16_normal(REGISTER_S + g65816i_read_8_immediate(EA_IMM8())) + REGISTER_Y) | REGISTER_DB;} /* ======================================================================== */ /* ================================= API ================================== */ /* ======================================================================== */ void g65816_device::device_reset() { /* Start the CPU */ CPU_STOPPED = 0; /* Put into emulation mode */ REGISTER_D = 0; REGISTER_PB = 0; REGISTER_DB = 0; REGISTER_S = (REGISTER_S & 0xff) | 0x100; REGISTER_X &= 0xff; REGISTER_Y &= 0xff; if(!FLAG_M) { REGISTER_B = REGISTER_A & 0xff00; REGISTER_A &= 0xff; } FLAG_E = EFLAG_SET; FLAG_M = MFLAG_SET; FLAG_X = XFLAG_SET; /* Clear D and set I */ FLAG_D = DFLAG_CLEAR; FLAG_I = IFLAG_SET; /* Clear all pending interrupts (should we really do this?) */ LINE_IRQ = 0; LINE_NMI = 0; IRQ_DELAY = 0; /* Set the function tables to emulation mode */ g65816i_set_execution_mode(EXECUTION_MODE_E); /* 6502 expects these, but its not in the 65816 spec */ FLAG_Z = ZFLAG_CLEAR; REGISTER_S = 0x1ff; /* Fetch the reset vector */ if (has_space(AS_VECTORS)) REGISTER_PC = space(AS_VECTORS).read_word(VECTOR_RESET & 0x001f); else REGISTER_PC = g65816_read_8_immediate(VECTOR_RESET) | (g65816_read_8_immediate(VECTOR_RESET+1)<<8); g65816i_jumping(REGISTER_PB | REGISTER_PC); } /* Execute some instructions */ void g65816_device::execute_run() { int clocks = m_ICount; m_ICount = clocks - (this->*FTABLE_EXECUTE)(m_ICount); } /* Get the current Program Counter */ unsigned g65816_device::g65816_get_pc() { return REGISTER_PB | REGISTER_PC; } /* Set the Program Counter */ void g65816_device::g65816_set_pc(unsigned val) { REGISTER_PC = MAKE_UINT_16(val); REGISTER_PB = (val >> 16) & 0xFF; g65816_jumping(REGISTER_PB | REGISTER_PC); } /* Get the current Stack Pointer */ unsigned g65816_device::g65816_get_sp() { return REGISTER_S; } /* Set the Stack Pointer */ void g65816_device::g65816_set_sp(unsigned val) { REGISTER_S = FLAG_E ? MAKE_UINT_8(val) | 0x100 : MAKE_UINT_16(val); } /* Get a register */ unsigned g65816_device::g65816_get_reg(int regnum) { /* Set the function tables to emulation mode if the FTABLE is nullptr */ if( FTABLE_GET_REG == nullptr ) g65816i_set_execution_mode(EXECUTION_MODE_E); return (this->*FTABLE_GET_REG)(regnum); } /* Set a register */ void g65816_device::g65816_set_reg(int regnum, unsigned value) { (this->*FTABLE_SET_REG)(regnum, value); } /* Set an interrupt line */ void g65816_device::execute_set_input(int line, int state) { (this->*FTABLE_SET_LINE)(line, state); } std::unique_ptr<util::disasm_interface> g65816_device::create_disassembler() { return std::make_unique<g65816_disassembler>(this); } bool g65816_device::get_m_flag() const { return FLAG_M; } bool g65816_device::get_x_flag() const { return FLAG_X; } void g65816_device::g65816_restore_state() { // restore proper function pointers g65816i_set_execution_mode((FLAG_M>>4) | (FLAG_X>>4)); // make sure the memory system can keep up g65816i_jumping(REGISTER_PB | REGISTER_PC); } void g65816_device::device_start() { m_a = 0; m_b = 0; m_x = 0; m_y = 0; m_s = 0; m_pc = 0; m_ppc = 0; m_pb = 0; m_db = 0; m_d = 0; m_flag_e = 0; m_flag_m = 0; m_flag_x = 0; m_flag_n = 0; m_flag_v = 0; m_flag_d = 0; m_flag_i = 0; m_flag_z = 0; m_flag_c = 0; m_line_irq = 0; m_line_nmi = 0; m_fastROM = 0; m_ir = 0; m_irq_delay = 0; m_stopped = 0; m_source = 0; m_destination = 0; m_wrmpya = 0; m_wrmpyb = 0; m_rdmpy = 0; m_wrdiv = 0; m_dvdd = 0; m_rddiv = 0; m_opcodes = nullptr; m_get_reg = nullptr; m_set_reg = nullptr; m_set_line = nullptr; m_execute = nullptr; m_debugger_temp = 0; address_space &program_space = space(AS_PROGRAM); m_data_space = has_space(AS_DATA) ? &space(AS_DATA) : &program_space; m_program_cache = program_space.cache<0, 0, ENDIANNESS_LITTLE>(); m_opcode_cache = (has_space(AS_OPCODES) ? space(AS_OPCODES) : program_space).cache<0, 0, ENDIANNESS_LITTLE>(); m_wdm_w.resolve_safe(); save_item(NAME(m_a)); save_item(NAME(m_b)); save_item(NAME(m_x)); save_item(NAME(m_y)); save_item(NAME(m_s)); save_item(NAME(m_pc)); save_item(NAME(m_ppc)); save_item(NAME(m_pb)); save_item(NAME(m_db)); save_item(NAME(m_d)); save_item(NAME(m_flag_e)); save_item(NAME(m_flag_m)); save_item(NAME(m_flag_x)); save_item(NAME(m_flag_n)); save_item(NAME(m_flag_v)); save_item(NAME(m_flag_d)); save_item(NAME(m_flag_i)); save_item(NAME(m_flag_z)); save_item(NAME(m_flag_c)); save_item(NAME(m_line_irq)); save_item(NAME(m_line_nmi)); save_item(NAME(m_ir)); save_item(NAME(m_irq_delay)); save_item(NAME(m_stopped)); save_item(NAME(m_fastROM)); machine().save().register_postload(save_prepost_delegate(FUNC(g65816_device::g65816_restore_state), this)); m_divider = 1; state_add( G65816_PC, "PC", m_debugger_temp).callimport().callexport().formatstr("%06X"); state_add( G65816_S, "S", m_s).callimport().formatstr("%04X"); state_add( G65816_P, "P", m_debugger_temp).callimport().callexport().formatstr("%02X"); state_add( G65816_A, "A", m_debugger_temp).callimport().callexport().formatstr("%04X"); state_add( G65816_X, "X", m_x).callimport().formatstr("%04X"); state_add( G65816_Y, "Y", m_y).callimport().formatstr("%04X"); state_add( G65816_PB, "PB", m_debugger_temp).callimport().callexport().formatstr("%02X"); state_add( G65816_DB, "DB", m_debugger_temp).callimport().callexport().formatstr("%02X"); state_add( G65816_D, "D", m_d).callimport().formatstr("%04X"); state_add( G65816_E, "E", m_flag_e).mask(0x01).callimport().formatstr("%01X"); state_add( G65816_NMI_STATE, "NMI", m_line_nmi).mask(0x01).callimport().formatstr("%01X"); state_add( G65816_IRQ_STATE, "IRQ", m_line_irq).mask(0x01).callimport().formatstr("%01X"); state_add( STATE_GENPC, "GENPC", m_debugger_temp).callimport().callexport().formatstr("%06X").noshow(); state_add( STATE_GENPCBASE, "CURPC", m_debugger_temp).callimport().callexport().formatstr("%06X").noshow(); state_add( STATE_GENSP, "GENSP", m_debugger_temp).callimport().callexport().formatstr("%06X").noshow(); state_add( STATE_GENFLAGS, "GENFLAGS", m_debugger_temp).formatstr("%8s").noshow(); set_icountptr(m_ICount); } void g65816_device::state_import(const device_state_entry &entry) { switch (entry.index()) { case STATE_GENPC: case STATE_GENPCBASE: g65816_set_pc(m_debugger_temp); break; case STATE_GENSP: g65816_set_sp(m_debugger_temp); break; case G65816_PC: case G65816_PB: case G65816_DB: g65816_set_reg(entry.index(), m_debugger_temp); break; case G65816_D: g65816_set_reg(G65816_D, m_d); break; case G65816_S: g65816_set_reg(G65816_S, m_s); break; case G65816_P: g65816_set_reg(G65816_P, m_debugger_temp); break; case G65816_E: g65816_set_reg(G65816_E, m_flag_e); break; case G65816_A: g65816_set_reg(G65816_A, m_debugger_temp); break; case G65816_X: g65816_set_reg(G65816_X, m_x); break; case G65816_Y: g65816_set_reg(G65816_Y, m_y); break; case G65816_NMI_STATE: g65816_set_reg(G65816_NMI_STATE, m_line_nmi); break; case G65816_IRQ_STATE: g65816_set_reg(G65816_IRQ_STATE, m_line_irq); break; } } void g65816_device::state_export(const device_state_entry &entry) { switch (entry.index()) { case STATE_GENPC: case STATE_GENPCBASE: case G65816_PC: m_debugger_temp = g65816_get_pc(); break; case STATE_GENSP: m_debugger_temp = g65816_get_sp(); break; case G65816_PB: m_debugger_temp = m_pb>>16; break; case G65816_DB: m_debugger_temp = m_db>>16; break; case G65816_P: m_debugger_temp = (m_flag_n&0x80) | ((m_flag_v>>1)&0x40) | m_flag_m | m_flag_x | m_flag_d | m_flag_i | ((!m_flag_z)<<1) | ((m_flag_c>>8)&1); break; case G65816_A: m_debugger_temp = m_a | m_b; break; } } void g65816_device::state_string_export(const device_state_entry &entry, std::string &str) const { switch (entry.index()) { case STATE_GENFLAGS: str = string_format("%c%c%c%c%c%c%c%c", m_flag_n & NFLAG_SET ? 'N':'.', m_flag_v & VFLAG_SET ? 'V':'.', m_flag_m & MFLAG_SET ? 'M':'.', m_flag_x & XFLAG_SET ? 'X':'.', m_flag_d & DFLAG_SET ? 'D':'.', m_flag_i & IFLAG_SET ? 'I':'.', m_flag_z == 0 ? 'Z':'.', m_flag_c & CFLAG_SET ? 'C':'.'); break; } } /* SNES specific, used to handle master cycles, based off byuu's BSNES code */ int g65816_device::bus_5A22_cycle_burst(unsigned addr) { if(m_cpu_type == CPU_TYPE_G65816) return 0; if(addr & 0x408000) { if(addr & 0x800000) return (m_fastROM & 1) ? 0 : 2; return 2; } if((addr + 0x6000) & 0x4000) return 2; if((addr - 0x4000) & 0x7e00) return 0; return 6; } void _5a22_device::device_start() { g65816_device::device_start(); state_add( _5A22_FASTROM, "fastROM", m_debugger_temp).mask(0x01).callimport().callexport().formatstr("%01X"); m_divider = 6; } void _5a22_device::state_import(const device_state_entry &entry) { switch (entry.index()) { case _5A22_FASTROM: g65816_set_reg(_5A22_FASTROM, m_debugger_temp); break; default: g65816_device::state_import(entry); break; } } void _5a22_device::state_export(const device_state_entry &entry) { switch (entry.index()) { case _5A22_FASTROM: m_debugger_temp = g65816_get_reg(_5A22_FASTROM); break; default: g65816_device::state_export(entry); break; } } void _5a22_device::device_reset() { g65816_device::device_reset(); m_fastROM = 0; m_wrmpya = 0xff; m_wrdiv = 0xffff; } /* TODO: multiplication / division should actually occur inside CPU_EXECUTE */ /* (Old note, for reference): multiplication should take 8 CPU cycles & division 16 CPU cycles, but using these timers breaks e.g. Chrono Trigger intro and Super Tennis gameplay. On the other hand, timers are needed for the translation of Breath of Fire 2 to work. More weirdness: we might need to leave 8 CPU cycles for division at first, since using 16 produces bugs (see e.g. Triforce pieces in Zelda 3 intro) */ WRITE8_MEMBER( _5a22_device::wrmpya_w ) { m_wrmpya = data; } WRITE8_MEMBER( _5a22_device::wrmpyb_w ) { m_wrmpyb = data; m_rdmpy = m_wrmpya * m_wrmpyb; /* TODO: m_rddiv == 0? */ } WRITE8_MEMBER( _5a22_device::wrdivl_w ) { m_wrdiv = (data) | (m_wrdiv & 0xff00); } WRITE8_MEMBER( _5a22_device::wrdivh_w ) { m_wrdiv = (data << 8) | (m_wrdiv & 0xff); } WRITE8_MEMBER( _5a22_device::wrdvdd_w ) { uint16_t quotient, remainder; m_dvdd = data; quotient = (m_dvdd == 0) ? 0xffff : m_wrdiv / m_dvdd; remainder = (m_dvdd == 0) ? 0x000c : m_wrdiv % m_dvdd; m_rddiv = quotient; m_rdmpy = remainder; } WRITE8_MEMBER( _5a22_device::memsel_w ) { m_fastROM = data & 1; } READ8_MEMBER( _5a22_device::rddivl_r ) { return m_rddiv & 0xff; } READ8_MEMBER( _5a22_device::rddivh_r ) { return m_rddiv >> 8; } READ8_MEMBER( _5a22_device::rdmpyl_r ) { return m_rdmpy & 0xff; } READ8_MEMBER( _5a22_device::rdmpyh_r ) { return m_rdmpy >> 8; } void _5a22_device::set_5a22_map() { space(AS_PROGRAM).install_write_handler(0x4202, 0x4202, 0, 0xbf0000, 0, write8_delegate(FUNC(_5a22_device::wrmpya_w),this)); space(AS_PROGRAM).install_write_handler(0x4203, 0x4203, 0, 0xbf0000, 0, write8_delegate(FUNC(_5a22_device::wrmpyb_w),this)); space(AS_PROGRAM).install_write_handler(0x4204, 0x4204, 0, 0xbf0000, 0, write8_delegate(FUNC(_5a22_device::wrdivl_w),this)); space(AS_PROGRAM).install_write_handler(0x4205, 0x4205, 0, 0xbf0000, 0, write8_delegate(FUNC(_5a22_device::wrdivh_w),this)); space(AS_PROGRAM).install_write_handler(0x4206, 0x4206, 0, 0xbf0000, 0, write8_delegate(FUNC(_5a22_device::wrdvdd_w),this)); space(AS_PROGRAM).install_write_handler(0x420d, 0x420d, 0, 0xbf0000, 0, write8_delegate(FUNC(_5a22_device::memsel_w),this)); space(AS_PROGRAM).install_read_handler(0x4214, 0x4214, 0, 0xbf0000, 0, read8_delegate(FUNC(_5a22_device::rddivl_r),this)); space(AS_PROGRAM).install_read_handler(0x4215, 0x4215, 0, 0xbf0000, 0, read8_delegate(FUNC(_5a22_device::rddivh_r),this)); space(AS_PROGRAM).install_read_handler(0x4216, 0x4216, 0, 0xbf0000, 0, read8_delegate(FUNC(_5a22_device::rdmpyl_r),this)); space(AS_PROGRAM).install_read_handler(0x4217, 0x4217, 0, 0xbf0000, 0, read8_delegate(FUNC(_5a22_device::rdmpyh_r),this)); } /* ======================================================================== */ /* ============================== END OF FILE ============================= */ /* ======================================================================== */