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
|
// license:BSD-3-Clause
// copyright-holders:R. Belmont
/******************************************************************************
*
* MIPS DECstation and AlphaStation I/O Gate Array emulation
* This IC contains some address decoding, an interrupt controller, and
* a multi-channel DMA engine.
*/
#include "emu.h"
#include "decioga.h"
#define LOG_DMA (1U << 0)
#define LOG_LANCE_DMA (1U << 1)
#define VERBOSE (LOG_DMA|LOG_LANCE_DMA)
#include "logmacro.h"
DEFINE_DEVICE_TYPE(DECSTATION_IOGA, dec_ioga_device, "decioga", "DECstation I/O Gate Array")
void dec_ioga_device::map(address_map &map)
{
map(0x040000, 0x0400ff).rw(FUNC(dec_ioga_device::dmaptr_r), FUNC(dec_ioga_device::dmaptr_w));
map(0x040100, 0x040103).rw(FUNC(dec_ioga_device::csr_r), FUNC(dec_ioga_device::csr_w));
map(0x040110, 0x040113).rw(FUNC(dec_ioga_device::intr_r), FUNC(dec_ioga_device::intr_w));
map(0x040120, 0x040123).rw(FUNC(dec_ioga_device::imsk_r), FUNC(dec_ioga_device::imsk_w));
}
dec_ioga_device::dec_ioga_device(const machine_config &mconfig, const char *tag, device_t *owner, u32 clock)
: device_t(mconfig, DECSTATION_IOGA, tag, owner, clock),
m_irq_out_cb(*this)
{
}
void dec_ioga_device::device_start()
{
m_irq_out_cb.resolve_safe();
save_item(NAME(m_csr));
save_item(NAME(m_intr));
save_item(NAME(m_imsk));
}
void dec_ioga_device::device_reset()
{
m_csr = m_intr = m_imsk = 0;
}
u32 dec_ioga_device::csr_r()
{
return m_csr;
}
void dec_ioga_device::csr_w(offs_t offset, u32 data, u32 mem_mask)
{
COMBINE_DATA(&m_csr);
#if 0
printf("%08x to CSR: diag LEDs [", m_csr);
for (int i = 7; i >= 0; i--)
{
printf("%c", (m_csr & (1<<i)) ? 'O' : '.');
}
printf("]\n");
#endif
}
u32 dec_ioga_device::intr_r()
{
u32 rv = m_intr;
m_intr &= ~0x20; // 5000/133 boot ROM tests that reading clears this bit
return rv;
}
void dec_ioga_device::recalc_irq()
{
if ((m_intr & m_imsk) != 0)
{
m_irq_out_cb(ASSERT_LINE);
}
else
{
m_irq_out_cb(CLEAR_LINE);
}
}
void dec_ioga_device::intr_w(u32 data)
{
m_intr &= ~data; // clear bits on write
}
u32 dec_ioga_device::imsk_r()
{
return m_imsk;
}
void dec_ioga_device::imsk_w(offs_t offset, u32 data, u32 mem_mask)
{
COMBINE_DATA(&m_imsk);
}
u32 dec_ioga_device::dmaptr_r(offs_t offset)
{
return m_dmaptrs[offset/4];
}
void dec_ioga_device::dmaptr_w(offs_t offset, u32 data, u32 mem_mask)
{
COMBINE_DATA(&m_dmaptrs[offset/4]);
LOGMASKED(LOG_DMA, "DECIOGA: %08x to DMA pointer %x (addr %x)\n", data, offset/4, offset*4);
}
WRITE_LINE_MEMBER(dec_ioga_device::rtc_irq_w)
{
if (state == ASSERT_LINE)
{
m_intr |= 0x20; // tested by 5000/133 boot ROM circa BFC027C8
}
recalc_irq();
}
WRITE_LINE_MEMBER(dec_ioga_device::lance_irq_w)
{
if (state == ASSERT_LINE)
{
m_intr |= 0x100;
}
else
{
m_intr &= ~0x100;
}
recalc_irq();
}
WRITE_LINE_MEMBER(dec_ioga_device::scc0_irq_w)
{
if (state == ASSERT_LINE)
{
m_intr |= 0x40;
}
else
{
m_intr &= ~0x40;
}
recalc_irq();
}
WRITE_LINE_MEMBER(dec_ioga_device::scc1_irq_w)
{
if (state == ASSERT_LINE)
{
m_intr |= 0x80;
}
else
{
m_intr &= ~0x80;
}
recalc_irq();
}
// DMA handlers
void dec_ioga_device::set_dma_space(address_space *space)
{
m_maincpu_space = space;
}
u16 dec_ioga_device::lance_dma_r(offs_t offset)
{
LOGMASKED(LOG_LANCE_DMA, "lance_dma_r: %08x (phys %08x)\n", offset, (offset<<1) + (m_dmaptrs[2]>>3));
return m_maincpu_space->read_word((offset<<1) + (m_dmaptrs[2]>>3));
}
void dec_ioga_device::lance_dma_w(offs_t offset, u16 data)
{
LOGMASKED(LOG_LANCE_DMA, "lance_dma_w: %04x to %08x\n", data, offset);
m_maincpu_space->write_word((offset<<1) + (m_dmaptrs[2]>>3), data);
}
|