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
|
// license:BSD-3-Clause
// copyright-holders:AJR
/***************************************************************************
Kawasaki Steel (Kawatetsu) KL5C80A16 CPU
Important functional blocks:
— MMU
— DMA controller (KP27) (unemulated)
— UART (KP61) (unemulated)
— Synchronous serial port (KP62) (unemulated)
— 16-bit timer/counters (KP63A)
— 16-level interrupt controller (KP69)
— Parallel ports (KP67) (unemulated)
— External bus/DRAM interface unit (unemulated)
***************************************************************************/
#include "emu.h"
#include "kl5c80a16.h"
#include "kp63.h"
// device type definition
DEFINE_DEVICE_TYPE(KL5C80A16, kl5c80a16_device, "kl5c80a16", "Kawasaki Steel KL5C80A16")
static const z80_daisy_config pseudo_daisy_config[] = { { "kp69" }, { nullptr } };
//-------------------------------------------------
// kl5c80a16_device - constructor
//-------------------------------------------------
kl5c80a16_device::kl5c80a16_device(const machine_config &mconfig, const char *tag, device_t *owner, u32 clock)
: kc82_device(mconfig, KL5C80A16, tag, owner, clock,
address_map_constructor(),
address_map_constructor(FUNC(kl5c80a16_device::internal_io), this))
, m_kp69(*this, "kp69")
{
}
//-------------------------------------------------
// internal_io - map for internal I/O registers
//-------------------------------------------------
void kl5c80a16_device::internal_io(address_map &map)
{
map(0x00, 0x07).mirror(0xff00).rw(FUNC(kl5c80a16_device::mmu_r), FUNC(kl5c80a16_device::mmu_w));
map(0x20, 0x27).mirror(0xff00).rw("timer", FUNC(kp63a_device::read), FUNC(kp63a_device::write));
map(0x34, 0x34).mirror(0xff00).rw(m_kp69, FUNC(kp69_device::isrl_r), FUNC(kp69_device::lerl_pgrl_w));
map(0x35, 0x35).mirror(0xff00).rw(m_kp69, FUNC(kp69_device::isrh_r), FUNC(kp69_device::lerh_pgrh_w));
map(0x36, 0x36).mirror(0xff00).rw(m_kp69, FUNC(kp69_device::imrl_r), FUNC(kp69_device::imrl_w));
map(0x37, 0x37).mirror(0xff00).rw(m_kp69, FUNC(kp69_device::imrh_r), FUNC(kp69_device::ivr_imrh_w));
}
//-------------------------------------------------
// device_start - device-specific startup
//-------------------------------------------------
void kl5c80a16_device::device_start()
{
kc82_device::device_start();
m_kp69->add_to_state(*this, KP69_IRR);
}
//-------------------------------------------------
// device_reset - device-specific reset
//-------------------------------------------------
void kl5c80a16_device::device_reset()
{
kc82_device::device_reset();
}
//-------------------------------------------------
// device_add_mconfig - add device-specific
// machine configuration
//-------------------------------------------------
void kl5c80a16_device::device_add_mconfig(machine_config &config)
{
KP69(config, m_kp69);
m_kp69->int_callback().set_inputline(*this, INPUT_LINE_IRQ0);
kp63a_device &timer(KP63A(config, "timer", DERIVED_CLOCK(1, 2)));
timer.outs_callback<0>().set(m_kp69, FUNC(kp69_device::ir_w<12>));
timer.outs_callback<1>().set(m_kp69, FUNC(kp69_device::ir_w<13>));
//timer.outs_callback<2>().set(m_kp69, FUNC(kp69_device::ir_w<0>)); // TODO: multiplexed with P20 input by SCR1 bit 4
//timer.outs_callback<3>().set(m_kp69, FUNC(kp69_device::ir_w<1>)); // TODO: multiplexed with P21 input by SCR1 bit 5 (may also be NMI)
}
//-------------------------------------------------
// device_config_complete - perform any
// operations now that the configuration is
// complete
//-------------------------------------------------
void kl5c80a16_device::device_config_complete()
{
set_daisy_config(pseudo_daisy_config);
}
|