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
|
// license:BSD-3-Clause
// copyright-holders:Ryan Holtz
/***********************************************************************
NCR 5385E SCSI Controller
TOOD:
- Everything.
***********************************************************************/
#include "emu.h"
#include "ncr5385.h"
DEFINE_DEVICE_TYPE(NCR5385, ncr5385_device, "ncr5385", "NCR 5385E SCSI Controller")
ncr5385_device::ncr5385_device(const machine_config &mconfig, const char *tag, device_t *owner, const XTAL &clock)
: device_t(mconfig, NCR5385, tag, owner, clock)
, m_int(*this)
{
}
void ncr5385_device::device_start()
{
m_int.resolve_safe();
}
void ncr5385_device::device_reset()
{
m_state = STATE_IDLE;
m_int_reg = 0;
m_ctrl_reg = 0;
m_aux_status_reg = AUX_STATUS_TC_ZERO;
m_diag_status_reg = DIAG_COMPLETE;
}
void ncr5385_device::write(offs_t offset, uint8_t data)
{
switch (offset)
{
case 0x0: // Data Register
switch (m_state)
{
case STATE_DIAGNOSTIC_GOOD_PARITY:
m_aux_status_reg &= ~AUX_STATUS_PARITY_ERR;
m_aux_status_reg |= AUX_STATUS_DATA_FULL;
m_int_reg = INT_FUNC_COMPLETE;
m_diag_status_reg = DIAG_COMPLETE | DIAG_TURN_GOOD_PARITY;
m_state = STATE_IDLE;
m_int(1);
logerror("%s: ncr5385_w: data=%02x (diagnostic w/ good parity)\n", machine().describe_context(), data);
break;
case STATE_DIAGNOSTIC_BAD_PARITY:
m_aux_status_reg |= AUX_STATUS_PARITY_ERR | AUX_STATUS_DATA_FULL;
m_int_reg = INT_FUNC_COMPLETE;
m_diag_status_reg = DIAG_COMPLETE | DIAG_TURN_BAD_PARITY;
m_state = STATE_IDLE;
m_int(1);
logerror("%s: ncr5385_w: data=%02x (diagnostic w/ bad parity)\n", machine().describe_context(), data);
break;
default:
logerror("%s: ncr5385_w: data=%02x\n", machine().describe_context(), data);
break;
}
break;
case 0x1: // Command Register
switch (data & 0x3f)
{
case 0x00: // Chip Reset
logerror("%s: ncr5385_w: command: reset\n", machine().describe_context());
m_state = STATE_IDLE;
m_int_reg = 0;
m_aux_status_reg = AUX_STATUS_TC_ZERO;
m_diag_status_reg = DIAG_COMPLETE;
m_int(0);
break;
case 0x0b: // Diagnostic
logerror("%s: ncr5385_w: command: diagnostic (%s parity)\n", machine().describe_context(), BIT(data, 6) ? "bad" : "good");
if (BIT(data, 6))
m_state = STATE_DIAGNOSTIC_BAD_PARITY;
else
m_state = STATE_DIAGNOSTIC_GOOD_PARITY;
break;
default:
logerror("%s: ncr5385_w: command: %02x\n", machine().describe_context(), data);
break;
}
break;
case 0x2: // Control Register
m_ctrl_reg = data & 0x07;
logerror("%s: ncr5385_w: control: parity_en=%d, reselect_en=%d, select_en=%d\n", machine().describe_context(), BIT(data, CTRL_PARITY_BIT), BIT(data, CTRL_RESELECT_BIT), BIT(data, CTRL_SELECT_BIT));
break;
default:
logerror("%s: ncr5385_w: %x=%02x\n", machine().describe_context(), offset, data);
break;
}
}
uint8_t ncr5385_device::read(offs_t offset)
{
switch (offset)
{
case 0x2:
logerror("%s: ncr5385_r: control (%02x)\n", machine().describe_context(), m_ctrl_reg);
return m_ctrl_reg;
case 0x4:
logerror("%s: ncr5385_r: aux status (%02x)\n", machine().describe_context(), m_aux_status_reg);
return m_aux_status_reg;
case 0x6:
logerror("%s: ncr5385_r: interrupt (%02x)\n", machine().describe_context(), m_int_reg);
m_int(1);
return m_int_reg;
case 0x9:
logerror("%s: ncr5385_r: diagnostic status (%02x)\n", machine().describe_context(), m_diag_status_reg);
return m_diag_status_reg;
default:
logerror("%s: ncr5385_r: %x (%02x)\n", machine().describe_context(), offset, 0);
return 0;
}
}
|