root / hw / esp.c @ 87ee1669
History | View | Annotate | Download (14.9 kB)
1 | 6f7e9aec | bellard | /*
|
---|---|---|---|
2 | 67e999be | bellard | * QEMU ESP/NCR53C9x emulation
|
3 | 6f7e9aec | bellard | *
|
4 | 4e9aec74 | pbrook | * Copyright (c) 2005-2006 Fabrice Bellard
|
5 | 6f7e9aec | bellard | *
|
6 | 6f7e9aec | bellard | * Permission is hereby granted, free of charge, to any person obtaining a copy
|
7 | 6f7e9aec | bellard | * of this software and associated documentation files (the "Software"), to deal
|
8 | 6f7e9aec | bellard | * in the Software without restriction, including without limitation the rights
|
9 | 6f7e9aec | bellard | * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
10 | 6f7e9aec | bellard | * copies of the Software, and to permit persons to whom the Software is
|
11 | 6f7e9aec | bellard | * furnished to do so, subject to the following conditions:
|
12 | 6f7e9aec | bellard | *
|
13 | 6f7e9aec | bellard | * The above copyright notice and this permission notice shall be included in
|
14 | 6f7e9aec | bellard | * all copies or substantial portions of the Software.
|
15 | 6f7e9aec | bellard | *
|
16 | 6f7e9aec | bellard | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
17 | 6f7e9aec | bellard | * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
18 | 6f7e9aec | bellard | * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
19 | 6f7e9aec | bellard | * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
20 | 6f7e9aec | bellard | * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
21 | 6f7e9aec | bellard | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
22 | 6f7e9aec | bellard | * THE SOFTWARE.
|
23 | 6f7e9aec | bellard | */
|
24 | 6f7e9aec | bellard | #include "vl.h" |
25 | 6f7e9aec | bellard | |
26 | 6f7e9aec | bellard | /* debug ESP card */
|
27 | 2f275b8f | bellard | //#define DEBUG_ESP
|
28 | 6f7e9aec | bellard | |
29 | 67e999be | bellard | /*
|
30 | 67e999be | bellard | * On Sparc32, this is the ESP (NCR53C90) part of chip STP2000 (Master I/O), also
|
31 | 67e999be | bellard | * produced as NCR89C100. See
|
32 | 67e999be | bellard | * http://www.ibiblio.org/pub/historic-linux/early-ports/Sparc/NCR/NCR89C100.txt
|
33 | 67e999be | bellard | * and
|
34 | 67e999be | bellard | * http://www.ibiblio.org/pub/historic-linux/early-ports/Sparc/NCR/NCR53C9X.txt
|
35 | 67e999be | bellard | */
|
36 | 67e999be | bellard | |
37 | 6f7e9aec | bellard | #ifdef DEBUG_ESP
|
38 | 6f7e9aec | bellard | #define DPRINTF(fmt, args...) \
|
39 | 6f7e9aec | bellard | do { printf("ESP: " fmt , ##args); } while (0) |
40 | 6f7e9aec | bellard | #else
|
41 | 6f7e9aec | bellard | #define DPRINTF(fmt, args...)
|
42 | 6f7e9aec | bellard | #endif
|
43 | 6f7e9aec | bellard | |
44 | 5aca8c3b | blueswir1 | #define ESP_MASK 0x3f |
45 | 5aca8c3b | blueswir1 | #define ESP_REGS 16 |
46 | 5aca8c3b | blueswir1 | #define ESP_SIZE (ESP_REGS * 4) |
47 | 2e5d83bb | pbrook | #define TI_BUFSZ 32 |
48 | fa1fb14c | ths | /* The HBA is ID 7, so for simplicitly limit to 7 devices. */
|
49 | fa1fb14c | ths | #define ESP_MAX_DEVS 7 |
50 | 67e999be | bellard | |
51 | 4e9aec74 | pbrook | typedef struct ESPState ESPState; |
52 | 6f7e9aec | bellard | |
53 | 4e9aec74 | pbrook | struct ESPState {
|
54 | 70c0de96 | blueswir1 | qemu_irq irq; |
55 | 6f7e9aec | bellard | BlockDriverState **bd; |
56 | 5aca8c3b | blueswir1 | uint8_t rregs[ESP_REGS]; |
57 | 5aca8c3b | blueswir1 | uint8_t wregs[ESP_REGS]; |
58 | 67e999be | bellard | int32_t ti_size; |
59 | 4f6200f0 | bellard | uint32_t ti_rptr, ti_wptr; |
60 | 4f6200f0 | bellard | uint8_t ti_buf[TI_BUFSZ]; |
61 | 0fc5c15a | pbrook | int sense;
|
62 | 4f6200f0 | bellard | int dma;
|
63 | 2e5d83bb | pbrook | SCSIDevice *scsi_dev[MAX_DISKS]; |
64 | 2e5d83bb | pbrook | SCSIDevice *current_dev; |
65 | 9f149aa9 | pbrook | uint8_t cmdbuf[TI_BUFSZ]; |
66 | 9f149aa9 | pbrook | int cmdlen;
|
67 | 9f149aa9 | pbrook | int do_cmd;
|
68 | 4d611c9a | pbrook | |
69 | 6787f5fa | pbrook | /* The amount of data left in the current DMA transfer. */
|
70 | 4d611c9a | pbrook | uint32_t dma_left; |
71 | 6787f5fa | pbrook | /* The size of the current DMA transfer. Zero if no transfer is in
|
72 | 6787f5fa | pbrook | progress. */
|
73 | 6787f5fa | pbrook | uint32_t dma_counter; |
74 | a917d384 | pbrook | uint8_t *async_buf; |
75 | 4d611c9a | pbrook | uint32_t async_len; |
76 | 67e999be | bellard | void *dma_opaque;
|
77 | 4e9aec74 | pbrook | }; |
78 | 6f7e9aec | bellard | |
79 | 2f275b8f | bellard | #define STAT_DO 0x00 |
80 | 2f275b8f | bellard | #define STAT_DI 0x01 |
81 | 2f275b8f | bellard | #define STAT_CD 0x02 |
82 | 2f275b8f | bellard | #define STAT_ST 0x03 |
83 | 2f275b8f | bellard | #define STAT_MI 0x06 |
84 | 2f275b8f | bellard | #define STAT_MO 0x07 |
85 | 2f275b8f | bellard | |
86 | 2f275b8f | bellard | #define STAT_TC 0x10 |
87 | 4d611c9a | pbrook | #define STAT_PE 0x20 |
88 | 4d611c9a | pbrook | #define STAT_GE 0x40 |
89 | 2f275b8f | bellard | #define STAT_IN 0x80 |
90 | 2f275b8f | bellard | |
91 | 2f275b8f | bellard | #define INTR_FC 0x08 |
92 | 2f275b8f | bellard | #define INTR_BS 0x10 |
93 | 2f275b8f | bellard | #define INTR_DC 0x20 |
94 | 9e61bde5 | bellard | #define INTR_RST 0x80 |
95 | 2f275b8f | bellard | |
96 | 2f275b8f | bellard | #define SEQ_0 0x0 |
97 | 2f275b8f | bellard | #define SEQ_CD 0x4 |
98 | 2f275b8f | bellard | |
99 | 9f149aa9 | pbrook | static int get_cmd(ESPState *s, uint8_t *buf) |
100 | 2f275b8f | bellard | { |
101 | a917d384 | pbrook | uint32_t dmalen; |
102 | 2f275b8f | bellard | int target;
|
103 | 2f275b8f | bellard | |
104 | 6787f5fa | pbrook | dmalen = s->rregs[0] | (s->rregs[1] << 8); |
105 | 4f6200f0 | bellard | target = s->wregs[4] & 7; |
106 | 9f149aa9 | pbrook | DPRINTF("get_cmd: len %d target %d\n", dmalen, target);
|
107 | 4f6200f0 | bellard | if (s->dma) {
|
108 | 67e999be | bellard | espdma_memory_read(s->dma_opaque, buf, dmalen); |
109 | 4f6200f0 | bellard | } else {
|
110 | 4f6200f0 | bellard | buf[0] = 0; |
111 | 4f6200f0 | bellard | memcpy(&buf[1], s->ti_buf, dmalen);
|
112 | 4f6200f0 | bellard | dmalen++; |
113 | 4f6200f0 | bellard | } |
114 | 2e5d83bb | pbrook | |
115 | 2f275b8f | bellard | s->ti_size = 0;
|
116 | 4f6200f0 | bellard | s->ti_rptr = 0;
|
117 | 4f6200f0 | bellard | s->ti_wptr = 0;
|
118 | 2f275b8f | bellard | |
119 | a917d384 | pbrook | if (s->current_dev) {
|
120 | a917d384 | pbrook | /* Started a new command before the old one finished. Cancel it. */
|
121 | a917d384 | pbrook | scsi_cancel_io(s->current_dev, 0);
|
122 | a917d384 | pbrook | s->async_len = 0;
|
123 | a917d384 | pbrook | } |
124 | a917d384 | pbrook | |
125 | 67e999be | bellard | if (target >= MAX_DISKS || !s->scsi_dev[target]) {
|
126 | 2e5d83bb | pbrook | // No such drive
|
127 | 2f275b8f | bellard | s->rregs[4] = STAT_IN;
|
128 | 2f275b8f | bellard | s->rregs[5] = INTR_DC;
|
129 | 2f275b8f | bellard | s->rregs[6] = SEQ_0;
|
130 | 70c0de96 | blueswir1 | qemu_irq_raise(s->irq); |
131 | 9f149aa9 | pbrook | return 0; |
132 | 2f275b8f | bellard | } |
133 | 2e5d83bb | pbrook | s->current_dev = s->scsi_dev[target]; |
134 | 9f149aa9 | pbrook | return dmalen;
|
135 | 9f149aa9 | pbrook | } |
136 | 9f149aa9 | pbrook | |
137 | 9f149aa9 | pbrook | static void do_cmd(ESPState *s, uint8_t *buf) |
138 | 9f149aa9 | pbrook | { |
139 | 9f149aa9 | pbrook | int32_t datalen; |
140 | 9f149aa9 | pbrook | int lun;
|
141 | 9f149aa9 | pbrook | |
142 | 9f149aa9 | pbrook | DPRINTF("do_cmd: busid 0x%x\n", buf[0]); |
143 | 9f149aa9 | pbrook | lun = buf[0] & 7; |
144 | 0fc5c15a | pbrook | datalen = scsi_send_command(s->current_dev, 0, &buf[1], lun); |
145 | 67e999be | bellard | s->ti_size = datalen; |
146 | 67e999be | bellard | if (datalen != 0) { |
147 | 2e5d83bb | pbrook | s->rregs[4] = STAT_IN | STAT_TC;
|
148 | a917d384 | pbrook | s->dma_left = 0;
|
149 | 6787f5fa | pbrook | s->dma_counter = 0;
|
150 | 2e5d83bb | pbrook | if (datalen > 0) { |
151 | 2e5d83bb | pbrook | s->rregs[4] |= STAT_DI;
|
152 | a917d384 | pbrook | scsi_read_data(s->current_dev, 0);
|
153 | 2e5d83bb | pbrook | } else {
|
154 | 2e5d83bb | pbrook | s->rregs[4] |= STAT_DO;
|
155 | a917d384 | pbrook | scsi_write_data(s->current_dev, 0);
|
156 | b9788fc4 | bellard | } |
157 | 2f275b8f | bellard | } |
158 | 2f275b8f | bellard | s->rregs[5] = INTR_BS | INTR_FC;
|
159 | 2f275b8f | bellard | s->rregs[6] = SEQ_CD;
|
160 | 70c0de96 | blueswir1 | qemu_irq_raise(s->irq); |
161 | 2f275b8f | bellard | } |
162 | 2f275b8f | bellard | |
163 | 9f149aa9 | pbrook | static void handle_satn(ESPState *s) |
164 | 9f149aa9 | pbrook | { |
165 | 9f149aa9 | pbrook | uint8_t buf[32];
|
166 | 9f149aa9 | pbrook | int len;
|
167 | 9f149aa9 | pbrook | |
168 | 9f149aa9 | pbrook | len = get_cmd(s, buf); |
169 | 9f149aa9 | pbrook | if (len)
|
170 | 9f149aa9 | pbrook | do_cmd(s, buf); |
171 | 9f149aa9 | pbrook | } |
172 | 9f149aa9 | pbrook | |
173 | 9f149aa9 | pbrook | static void handle_satn_stop(ESPState *s) |
174 | 9f149aa9 | pbrook | { |
175 | 9f149aa9 | pbrook | s->cmdlen = get_cmd(s, s->cmdbuf); |
176 | 9f149aa9 | pbrook | if (s->cmdlen) {
|
177 | 9f149aa9 | pbrook | DPRINTF("Set ATN & Stop: cmdlen %d\n", s->cmdlen);
|
178 | 9f149aa9 | pbrook | s->do_cmd = 1;
|
179 | 9f149aa9 | pbrook | s->rregs[4] = STAT_IN | STAT_TC | STAT_CD;
|
180 | 9f149aa9 | pbrook | s->rregs[5] = INTR_BS | INTR_FC;
|
181 | 9f149aa9 | pbrook | s->rregs[6] = SEQ_CD;
|
182 | 70c0de96 | blueswir1 | qemu_irq_raise(s->irq); |
183 | 9f149aa9 | pbrook | } |
184 | 9f149aa9 | pbrook | } |
185 | 9f149aa9 | pbrook | |
186 | 0fc5c15a | pbrook | static void write_response(ESPState *s) |
187 | 2f275b8f | bellard | { |
188 | 0fc5c15a | pbrook | DPRINTF("Transfer status (sense=%d)\n", s->sense);
|
189 | 0fc5c15a | pbrook | s->ti_buf[0] = s->sense;
|
190 | 0fc5c15a | pbrook | s->ti_buf[1] = 0; |
191 | 4f6200f0 | bellard | if (s->dma) {
|
192 | 67e999be | bellard | espdma_memory_write(s->dma_opaque, s->ti_buf, 2);
|
193 | 4f6200f0 | bellard | s->rregs[4] = STAT_IN | STAT_TC | STAT_ST;
|
194 | 4f6200f0 | bellard | s->rregs[5] = INTR_BS | INTR_FC;
|
195 | 4f6200f0 | bellard | s->rregs[6] = SEQ_CD;
|
196 | 4f6200f0 | bellard | } else {
|
197 | 0fc5c15a | pbrook | s->ti_size = 2;
|
198 | 4f6200f0 | bellard | s->ti_rptr = 0;
|
199 | 4f6200f0 | bellard | s->ti_wptr = 0;
|
200 | 0fc5c15a | pbrook | s->rregs[7] = 2; |
201 | 4f6200f0 | bellard | } |
202 | 70c0de96 | blueswir1 | qemu_irq_raise(s->irq); |
203 | 2f275b8f | bellard | } |
204 | 4f6200f0 | bellard | |
205 | a917d384 | pbrook | static void esp_dma_done(ESPState *s) |
206 | a917d384 | pbrook | { |
207 | a917d384 | pbrook | s->rregs[4] |= STAT_IN | STAT_TC;
|
208 | a917d384 | pbrook | s->rregs[5] = INTR_BS;
|
209 | a917d384 | pbrook | s->rregs[6] = 0; |
210 | a917d384 | pbrook | s->rregs[7] = 0; |
211 | 6787f5fa | pbrook | s->rregs[0] = 0; |
212 | 6787f5fa | pbrook | s->rregs[1] = 0; |
213 | 70c0de96 | blueswir1 | qemu_irq_raise(s->irq); |
214 | a917d384 | pbrook | } |
215 | a917d384 | pbrook | |
216 | 4d611c9a | pbrook | static void esp_do_dma(ESPState *s) |
217 | 4d611c9a | pbrook | { |
218 | 67e999be | bellard | uint32_t len; |
219 | 4d611c9a | pbrook | int to_device;
|
220 | a917d384 | pbrook | |
221 | 67e999be | bellard | to_device = (s->ti_size < 0);
|
222 | a917d384 | pbrook | len = s->dma_left; |
223 | 4d611c9a | pbrook | if (s->do_cmd) {
|
224 | 4d611c9a | pbrook | DPRINTF("command len %d + %d\n", s->cmdlen, len);
|
225 | 67e999be | bellard | espdma_memory_read(s->dma_opaque, &s->cmdbuf[s->cmdlen], len); |
226 | 4d611c9a | pbrook | s->ti_size = 0;
|
227 | 4d611c9a | pbrook | s->cmdlen = 0;
|
228 | 4d611c9a | pbrook | s->do_cmd = 0;
|
229 | 4d611c9a | pbrook | do_cmd(s, s->cmdbuf); |
230 | 4d611c9a | pbrook | return;
|
231 | a917d384 | pbrook | } |
232 | a917d384 | pbrook | if (s->async_len == 0) { |
233 | a917d384 | pbrook | /* Defer until data is available. */
|
234 | a917d384 | pbrook | return;
|
235 | a917d384 | pbrook | } |
236 | a917d384 | pbrook | if (len > s->async_len) {
|
237 | a917d384 | pbrook | len = s->async_len; |
238 | a917d384 | pbrook | } |
239 | a917d384 | pbrook | if (to_device) {
|
240 | 67e999be | bellard | espdma_memory_read(s->dma_opaque, s->async_buf, len); |
241 | 4d611c9a | pbrook | } else {
|
242 | 67e999be | bellard | espdma_memory_write(s->dma_opaque, s->async_buf, len); |
243 | a917d384 | pbrook | } |
244 | a917d384 | pbrook | s->dma_left -= len; |
245 | a917d384 | pbrook | s->async_buf += len; |
246 | a917d384 | pbrook | s->async_len -= len; |
247 | 6787f5fa | pbrook | if (to_device)
|
248 | 6787f5fa | pbrook | s->ti_size += len; |
249 | 6787f5fa | pbrook | else
|
250 | 6787f5fa | pbrook | s->ti_size -= len; |
251 | a917d384 | pbrook | if (s->async_len == 0) { |
252 | 4d611c9a | pbrook | if (to_device) {
|
253 | 67e999be | bellard | // ti_size is negative
|
254 | a917d384 | pbrook | scsi_write_data(s->current_dev, 0);
|
255 | 4d611c9a | pbrook | } else {
|
256 | a917d384 | pbrook | scsi_read_data(s->current_dev, 0);
|
257 | 6787f5fa | pbrook | /* If there is still data to be read from the device then
|
258 | 6787f5fa | pbrook | complete the DMA operation immeriately. Otherwise defer
|
259 | 6787f5fa | pbrook | until the scsi layer has completed. */
|
260 | 6787f5fa | pbrook | if (s->dma_left == 0 && s->ti_size > 0) { |
261 | 6787f5fa | pbrook | esp_dma_done(s); |
262 | 6787f5fa | pbrook | } |
263 | 4d611c9a | pbrook | } |
264 | 6787f5fa | pbrook | } else {
|
265 | 6787f5fa | pbrook | /* Partially filled a scsi buffer. Complete immediately. */
|
266 | a917d384 | pbrook | esp_dma_done(s); |
267 | a917d384 | pbrook | } |
268 | 4d611c9a | pbrook | } |
269 | 4d611c9a | pbrook | |
270 | a917d384 | pbrook | static void esp_command_complete(void *opaque, int reason, uint32_t tag, |
271 | a917d384 | pbrook | uint32_t arg) |
272 | 2e5d83bb | pbrook | { |
273 | 2e5d83bb | pbrook | ESPState *s = (ESPState *)opaque; |
274 | 2e5d83bb | pbrook | |
275 | 4d611c9a | pbrook | if (reason == SCSI_REASON_DONE) {
|
276 | 4d611c9a | pbrook | DPRINTF("SCSI Command complete\n");
|
277 | 4d611c9a | pbrook | if (s->ti_size != 0) |
278 | 4d611c9a | pbrook | DPRINTF("SCSI command completed unexpectedly\n");
|
279 | 4d611c9a | pbrook | s->ti_size = 0;
|
280 | a917d384 | pbrook | s->dma_left = 0;
|
281 | a917d384 | pbrook | s->async_len = 0;
|
282 | a917d384 | pbrook | if (arg)
|
283 | 4d611c9a | pbrook | DPRINTF("Command failed\n");
|
284 | a917d384 | pbrook | s->sense = arg; |
285 | a917d384 | pbrook | s->rregs[4] = STAT_ST;
|
286 | a917d384 | pbrook | esp_dma_done(s); |
287 | a917d384 | pbrook | s->current_dev = NULL;
|
288 | 4d611c9a | pbrook | } else {
|
289 | 4d611c9a | pbrook | DPRINTF("transfer %d/%d\n", s->dma_left, s->ti_size);
|
290 | a917d384 | pbrook | s->async_len = arg; |
291 | a917d384 | pbrook | s->async_buf = scsi_get_buf(s->current_dev, 0);
|
292 | 6787f5fa | pbrook | if (s->dma_left) {
|
293 | a917d384 | pbrook | esp_do_dma(s); |
294 | 6787f5fa | pbrook | } else if (s->dma_counter != 0 && s->ti_size <= 0) { |
295 | 6787f5fa | pbrook | /* If this was the last part of a DMA transfer then the
|
296 | 6787f5fa | pbrook | completion interrupt is deferred to here. */
|
297 | 6787f5fa | pbrook | esp_dma_done(s); |
298 | 6787f5fa | pbrook | } |
299 | 4d611c9a | pbrook | } |
300 | 2e5d83bb | pbrook | } |
301 | 2e5d83bb | pbrook | |
302 | 2f275b8f | bellard | static void handle_ti(ESPState *s) |
303 | 2f275b8f | bellard | { |
304 | 4d611c9a | pbrook | uint32_t dmalen, minlen; |
305 | 2f275b8f | bellard | |
306 | 6787f5fa | pbrook | dmalen = s->rregs[0] | (s->rregs[1] << 8); |
307 | db59203d | pbrook | if (dmalen==0) { |
308 | db59203d | pbrook | dmalen=0x10000;
|
309 | db59203d | pbrook | } |
310 | 6787f5fa | pbrook | s->dma_counter = dmalen; |
311 | db59203d | pbrook | |
312 | 9f149aa9 | pbrook | if (s->do_cmd)
|
313 | 9f149aa9 | pbrook | minlen = (dmalen < 32) ? dmalen : 32; |
314 | 67e999be | bellard | else if (s->ti_size < 0) |
315 | 67e999be | bellard | minlen = (dmalen < -s->ti_size) ? dmalen : -s->ti_size; |
316 | 9f149aa9 | pbrook | else
|
317 | 9f149aa9 | pbrook | minlen = (dmalen < s->ti_size) ? dmalen : s->ti_size; |
318 | db59203d | pbrook | DPRINTF("Transfer Information len %d\n", minlen);
|
319 | 4f6200f0 | bellard | if (s->dma) {
|
320 | 4d611c9a | pbrook | s->dma_left = minlen; |
321 | 4d611c9a | pbrook | s->rregs[4] &= ~STAT_TC;
|
322 | 4d611c9a | pbrook | esp_do_dma(s); |
323 | 9f149aa9 | pbrook | } else if (s->do_cmd) { |
324 | 9f149aa9 | pbrook | DPRINTF("command len %d\n", s->cmdlen);
|
325 | 9f149aa9 | pbrook | s->ti_size = 0;
|
326 | 9f149aa9 | pbrook | s->cmdlen = 0;
|
327 | 9f149aa9 | pbrook | s->do_cmd = 0;
|
328 | 9f149aa9 | pbrook | do_cmd(s, s->cmdbuf); |
329 | 9f149aa9 | pbrook | return;
|
330 | 9f149aa9 | pbrook | } |
331 | 2f275b8f | bellard | } |
332 | 2f275b8f | bellard | |
333 | 5aca8c3b | blueswir1 | static void esp_reset(void *opaque) |
334 | 6f7e9aec | bellard | { |
335 | 6f7e9aec | bellard | ESPState *s = opaque; |
336 | 67e999be | bellard | |
337 | 5aca8c3b | blueswir1 | memset(s->rregs, 0, ESP_REGS);
|
338 | 5aca8c3b | blueswir1 | memset(s->wregs, 0, ESP_REGS);
|
339 | 2f275b8f | bellard | s->rregs[0x0e] = 0x4; // Indicate fas100a |
340 | 4e9aec74 | pbrook | s->ti_size = 0;
|
341 | 4e9aec74 | pbrook | s->ti_rptr = 0;
|
342 | 4e9aec74 | pbrook | s->ti_wptr = 0;
|
343 | 4e9aec74 | pbrook | s->dma = 0;
|
344 | 9f149aa9 | pbrook | s->do_cmd = 0;
|
345 | 6f7e9aec | bellard | } |
346 | 6f7e9aec | bellard | |
347 | 6f7e9aec | bellard | static uint32_t esp_mem_readb(void *opaque, target_phys_addr_t addr) |
348 | 6f7e9aec | bellard | { |
349 | 6f7e9aec | bellard | ESPState *s = opaque; |
350 | 6f7e9aec | bellard | uint32_t saddr; |
351 | 6f7e9aec | bellard | |
352 | 5aca8c3b | blueswir1 | saddr = (addr & ESP_MASK) >> 2;
|
353 | 9e61bde5 | bellard | DPRINTF("read reg[%d]: 0x%2.2x\n", saddr, s->rregs[saddr]);
|
354 | 6f7e9aec | bellard | switch (saddr) {
|
355 | 4f6200f0 | bellard | case 2: |
356 | 4f6200f0 | bellard | // FIFO
|
357 | 4f6200f0 | bellard | if (s->ti_size > 0) { |
358 | 4f6200f0 | bellard | s->ti_size--; |
359 | 2e5d83bb | pbrook | if ((s->rregs[4] & 6) == 0) { |
360 | 2e5d83bb | pbrook | /* Data in/out. */
|
361 | a917d384 | pbrook | fprintf(stderr, "esp: PIO data read not implemented\n");
|
362 | a917d384 | pbrook | s->rregs[2] = 0; |
363 | 2e5d83bb | pbrook | } else {
|
364 | 2e5d83bb | pbrook | s->rregs[2] = s->ti_buf[s->ti_rptr++];
|
365 | 2e5d83bb | pbrook | } |
366 | 70c0de96 | blueswir1 | qemu_irq_raise(s->irq); |
367 | 4f6200f0 | bellard | } |
368 | 4f6200f0 | bellard | if (s->ti_size == 0) { |
369 | 4f6200f0 | bellard | s->ti_rptr = 0;
|
370 | 4f6200f0 | bellard | s->ti_wptr = 0;
|
371 | 4f6200f0 | bellard | } |
372 | 4f6200f0 | bellard | break;
|
373 | 9e61bde5 | bellard | case 5: |
374 | 9e61bde5 | bellard | // interrupt
|
375 | 4d611c9a | pbrook | // Clear interrupt/error status bits
|
376 | 4d611c9a | pbrook | s->rregs[4] &= ~(STAT_IN | STAT_GE | STAT_PE);
|
377 | 70c0de96 | blueswir1 | qemu_irq_lower(s->irq); |
378 | 9e61bde5 | bellard | break;
|
379 | 6f7e9aec | bellard | default:
|
380 | 6f7e9aec | bellard | break;
|
381 | 6f7e9aec | bellard | } |
382 | 2f275b8f | bellard | return s->rregs[saddr];
|
383 | 6f7e9aec | bellard | } |
384 | 6f7e9aec | bellard | |
385 | 6f7e9aec | bellard | static void esp_mem_writeb(void *opaque, target_phys_addr_t addr, uint32_t val) |
386 | 6f7e9aec | bellard | { |
387 | 6f7e9aec | bellard | ESPState *s = opaque; |
388 | 6f7e9aec | bellard | uint32_t saddr; |
389 | 6f7e9aec | bellard | |
390 | 5aca8c3b | blueswir1 | saddr = (addr & ESP_MASK) >> 2;
|
391 | 2f275b8f | bellard | DPRINTF("write reg[%d]: 0x%2.2x -> 0x%2.2x\n", saddr, s->wregs[saddr], val);
|
392 | 6f7e9aec | bellard | switch (saddr) {
|
393 | 4f6200f0 | bellard | case 0: |
394 | 4f6200f0 | bellard | case 1: |
395 | 4d611c9a | pbrook | s->rregs[4] &= ~STAT_TC;
|
396 | 4f6200f0 | bellard | break;
|
397 | 4f6200f0 | bellard | case 2: |
398 | 4f6200f0 | bellard | // FIFO
|
399 | 9f149aa9 | pbrook | if (s->do_cmd) {
|
400 | 9f149aa9 | pbrook | s->cmdbuf[s->cmdlen++] = val & 0xff;
|
401 | 9f149aa9 | pbrook | } else if ((s->rregs[4] & 6) == 0) { |
402 | 2e5d83bb | pbrook | uint8_t buf; |
403 | 2e5d83bb | pbrook | buf = val & 0xff;
|
404 | 2e5d83bb | pbrook | s->ti_size--; |
405 | a917d384 | pbrook | fprintf(stderr, "esp: PIO data write not implemented\n");
|
406 | 2e5d83bb | pbrook | } else {
|
407 | 2e5d83bb | pbrook | s->ti_size++; |
408 | 2e5d83bb | pbrook | s->ti_buf[s->ti_wptr++] = val & 0xff;
|
409 | 2e5d83bb | pbrook | } |
410 | 4f6200f0 | bellard | break;
|
411 | 6f7e9aec | bellard | case 3: |
412 | 4f6200f0 | bellard | s->rregs[saddr] = val; |
413 | 6f7e9aec | bellard | // Command
|
414 | 4f6200f0 | bellard | if (val & 0x80) { |
415 | 4f6200f0 | bellard | s->dma = 1;
|
416 | 6787f5fa | pbrook | /* Reload DMA counter. */
|
417 | 6787f5fa | pbrook | s->rregs[0] = s->wregs[0]; |
418 | 6787f5fa | pbrook | s->rregs[1] = s->wregs[1]; |
419 | 4f6200f0 | bellard | } else {
|
420 | 4f6200f0 | bellard | s->dma = 0;
|
421 | 4f6200f0 | bellard | } |
422 | 6f7e9aec | bellard | switch(val & 0x7f) { |
423 | 6f7e9aec | bellard | case 0: |
424 | 2f275b8f | bellard | DPRINTF("NOP (%2.2x)\n", val);
|
425 | 2f275b8f | bellard | break;
|
426 | 2f275b8f | bellard | case 1: |
427 | 2f275b8f | bellard | DPRINTF("Flush FIFO (%2.2x)\n", val);
|
428 | 9e61bde5 | bellard | //s->ti_size = 0;
|
429 | 2f275b8f | bellard | s->rregs[5] = INTR_FC;
|
430 | 9e61bde5 | bellard | s->rregs[6] = 0; |
431 | 6f7e9aec | bellard | break;
|
432 | 6f7e9aec | bellard | case 2: |
433 | 2f275b8f | bellard | DPRINTF("Chip reset (%2.2x)\n", val);
|
434 | 6f7e9aec | bellard | esp_reset(s); |
435 | 6f7e9aec | bellard | break;
|
436 | 6f7e9aec | bellard | case 3: |
437 | 2f275b8f | bellard | DPRINTF("Bus reset (%2.2x)\n", val);
|
438 | 9e61bde5 | bellard | s->rregs[5] = INTR_RST;
|
439 | 9e61bde5 | bellard | if (!(s->wregs[8] & 0x40)) { |
440 | 70c0de96 | blueswir1 | qemu_irq_raise(s->irq); |
441 | 9e61bde5 | bellard | } |
442 | 2f275b8f | bellard | break;
|
443 | 2f275b8f | bellard | case 0x10: |
444 | 2f275b8f | bellard | handle_ti(s); |
445 | 2f275b8f | bellard | break;
|
446 | 2f275b8f | bellard | case 0x11: |
447 | 2f275b8f | bellard | DPRINTF("Initiator Command Complete Sequence (%2.2x)\n", val);
|
448 | 0fc5c15a | pbrook | write_response(s); |
449 | 2f275b8f | bellard | break;
|
450 | 2f275b8f | bellard | case 0x12: |
451 | 2f275b8f | bellard | DPRINTF("Message Accepted (%2.2x)\n", val);
|
452 | 0fc5c15a | pbrook | write_response(s); |
453 | 2f275b8f | bellard | s->rregs[5] = INTR_DC;
|
454 | 2f275b8f | bellard | s->rregs[6] = 0; |
455 | 6f7e9aec | bellard | break;
|
456 | 6f7e9aec | bellard | case 0x1a: |
457 | 2f275b8f | bellard | DPRINTF("Set ATN (%2.2x)\n", val);
|
458 | 6f7e9aec | bellard | break;
|
459 | 6f7e9aec | bellard | case 0x42: |
460 | 9f149aa9 | pbrook | DPRINTF("Set ATN (%2.2x)\n", val);
|
461 | 2f275b8f | bellard | handle_satn(s); |
462 | 2f275b8f | bellard | break;
|
463 | 2f275b8f | bellard | case 0x43: |
464 | 2f275b8f | bellard | DPRINTF("Set ATN & stop (%2.2x)\n", val);
|
465 | 9f149aa9 | pbrook | handle_satn_stop(s); |
466 | 2f275b8f | bellard | break;
|
467 | 2f275b8f | bellard | default:
|
468 | 4f6200f0 | bellard | DPRINTF("Unhandled ESP command (%2.2x)\n", val);
|
469 | 6f7e9aec | bellard | break;
|
470 | 6f7e9aec | bellard | } |
471 | 6f7e9aec | bellard | break;
|
472 | 6f7e9aec | bellard | case 4 ... 7: |
473 | 6f7e9aec | bellard | break;
|
474 | 4f6200f0 | bellard | case 8: |
475 | 4f6200f0 | bellard | s->rregs[saddr] = val; |
476 | 4f6200f0 | bellard | break;
|
477 | 4f6200f0 | bellard | case 9 ... 10: |
478 | 4f6200f0 | bellard | break;
|
479 | 9e61bde5 | bellard | case 11: |
480 | 9e61bde5 | bellard | s->rregs[saddr] = val & 0x15;
|
481 | 9e61bde5 | bellard | break;
|
482 | 9e61bde5 | bellard | case 12 ... 15: |
483 | 4f6200f0 | bellard | s->rregs[saddr] = val; |
484 | 4f6200f0 | bellard | break;
|
485 | 6f7e9aec | bellard | default:
|
486 | 6f7e9aec | bellard | break;
|
487 | 6f7e9aec | bellard | } |
488 | 2f275b8f | bellard | s->wregs[saddr] = val; |
489 | 6f7e9aec | bellard | } |
490 | 6f7e9aec | bellard | |
491 | 6f7e9aec | bellard | static CPUReadMemoryFunc *esp_mem_read[3] = { |
492 | 6f7e9aec | bellard | esp_mem_readb, |
493 | 6f7e9aec | bellard | esp_mem_readb, |
494 | 6f7e9aec | bellard | esp_mem_readb, |
495 | 6f7e9aec | bellard | }; |
496 | 6f7e9aec | bellard | |
497 | 6f7e9aec | bellard | static CPUWriteMemoryFunc *esp_mem_write[3] = { |
498 | 6f7e9aec | bellard | esp_mem_writeb, |
499 | 6f7e9aec | bellard | esp_mem_writeb, |
500 | 6f7e9aec | bellard | esp_mem_writeb, |
501 | 6f7e9aec | bellard | }; |
502 | 6f7e9aec | bellard | |
503 | 6f7e9aec | bellard | static void esp_save(QEMUFile *f, void *opaque) |
504 | 6f7e9aec | bellard | { |
505 | 6f7e9aec | bellard | ESPState *s = opaque; |
506 | 2f275b8f | bellard | |
507 | 5aca8c3b | blueswir1 | qemu_put_buffer(f, s->rregs, ESP_REGS); |
508 | 5aca8c3b | blueswir1 | qemu_put_buffer(f, s->wregs, ESP_REGS); |
509 | 4f6200f0 | bellard | qemu_put_be32s(f, &s->ti_size); |
510 | 4f6200f0 | bellard | qemu_put_be32s(f, &s->ti_rptr); |
511 | 4f6200f0 | bellard | qemu_put_be32s(f, &s->ti_wptr); |
512 | 4f6200f0 | bellard | qemu_put_buffer(f, s->ti_buf, TI_BUFSZ); |
513 | 5425a216 | blueswir1 | qemu_put_be32s(f, &s->sense); |
514 | 4f6200f0 | bellard | qemu_put_be32s(f, &s->dma); |
515 | 5425a216 | blueswir1 | qemu_put_buffer(f, s->cmdbuf, TI_BUFSZ); |
516 | 5425a216 | blueswir1 | qemu_put_be32s(f, &s->cmdlen); |
517 | 5425a216 | blueswir1 | qemu_put_be32s(f, &s->do_cmd); |
518 | 5425a216 | blueswir1 | qemu_put_be32s(f, &s->dma_left); |
519 | 5425a216 | blueswir1 | // There should be no transfers in progress, so dma_counter is not saved
|
520 | 6f7e9aec | bellard | } |
521 | 6f7e9aec | bellard | |
522 | 6f7e9aec | bellard | static int esp_load(QEMUFile *f, void *opaque, int version_id) |
523 | 6f7e9aec | bellard | { |
524 | 6f7e9aec | bellard | ESPState *s = opaque; |
525 | 6f7e9aec | bellard | |
526 | 5425a216 | blueswir1 | if (version_id != 3) |
527 | 5425a216 | blueswir1 | return -EINVAL; // Cannot emulate 2 |
528 | 6f7e9aec | bellard | |
529 | 5aca8c3b | blueswir1 | qemu_get_buffer(f, s->rregs, ESP_REGS); |
530 | 5aca8c3b | blueswir1 | qemu_get_buffer(f, s->wregs, ESP_REGS); |
531 | 4f6200f0 | bellard | qemu_get_be32s(f, &s->ti_size); |
532 | 4f6200f0 | bellard | qemu_get_be32s(f, &s->ti_rptr); |
533 | 4f6200f0 | bellard | qemu_get_be32s(f, &s->ti_wptr); |
534 | 4f6200f0 | bellard | qemu_get_buffer(f, s->ti_buf, TI_BUFSZ); |
535 | 5425a216 | blueswir1 | qemu_get_be32s(f, &s->sense); |
536 | 4f6200f0 | bellard | qemu_get_be32s(f, &s->dma); |
537 | 5425a216 | blueswir1 | qemu_get_buffer(f, s->cmdbuf, TI_BUFSZ); |
538 | 5425a216 | blueswir1 | qemu_get_be32s(f, &s->cmdlen); |
539 | 5425a216 | blueswir1 | qemu_get_be32s(f, &s->do_cmd); |
540 | 5425a216 | blueswir1 | qemu_get_be32s(f, &s->dma_left); |
541 | 2f275b8f | bellard | |
542 | 6f7e9aec | bellard | return 0; |
543 | 6f7e9aec | bellard | } |
544 | 6f7e9aec | bellard | |
545 | fa1fb14c | ths | void esp_scsi_attach(void *opaque, BlockDriverState *bd, int id) |
546 | fa1fb14c | ths | { |
547 | fa1fb14c | ths | ESPState *s = (ESPState *)opaque; |
548 | fa1fb14c | ths | |
549 | fa1fb14c | ths | if (id < 0) { |
550 | fa1fb14c | ths | for (id = 0; id < ESP_MAX_DEVS; id++) { |
551 | fa1fb14c | ths | if (s->scsi_dev[id] == NULL) |
552 | fa1fb14c | ths | break;
|
553 | fa1fb14c | ths | } |
554 | fa1fb14c | ths | } |
555 | fa1fb14c | ths | if (id >= ESP_MAX_DEVS) {
|
556 | fa1fb14c | ths | DPRINTF("Bad Device ID %d\n", id);
|
557 | fa1fb14c | ths | return;
|
558 | fa1fb14c | ths | } |
559 | fa1fb14c | ths | if (s->scsi_dev[id]) {
|
560 | fa1fb14c | ths | DPRINTF("Destroying device %d\n", id);
|
561 | fa1fb14c | ths | scsi_disk_destroy(s->scsi_dev[id]); |
562 | fa1fb14c | ths | } |
563 | fa1fb14c | ths | DPRINTF("Attaching block device %d\n", id);
|
564 | fa1fb14c | ths | /* Command queueing is not implemented. */
|
565 | fa1fb14c | ths | s->scsi_dev[id] = scsi_disk_init(bd, 0, esp_command_complete, s);
|
566 | fa1fb14c | ths | } |
567 | fa1fb14c | ths | |
568 | 5dcb6b91 | blueswir1 | void *esp_init(BlockDriverState **bd, target_phys_addr_t espaddr,
|
569 | 70c0de96 | blueswir1 | void *dma_opaque, qemu_irq irq)
|
570 | 6f7e9aec | bellard | { |
571 | 6f7e9aec | bellard | ESPState *s; |
572 | 67e999be | bellard | int esp_io_memory;
|
573 | 6f7e9aec | bellard | |
574 | 6f7e9aec | bellard | s = qemu_mallocz(sizeof(ESPState));
|
575 | 6f7e9aec | bellard | if (!s)
|
576 | 67e999be | bellard | return NULL; |
577 | 6f7e9aec | bellard | |
578 | 6f7e9aec | bellard | s->bd = bd; |
579 | 70c0de96 | blueswir1 | s->irq = irq; |
580 | 67e999be | bellard | s->dma_opaque = dma_opaque; |
581 | 5aca8c3b | blueswir1 | sparc32_dma_set_reset_data(dma_opaque, esp_reset, s); |
582 | 6f7e9aec | bellard | |
583 | 6f7e9aec | bellard | esp_io_memory = cpu_register_io_memory(0, esp_mem_read, esp_mem_write, s);
|
584 | 5aca8c3b | blueswir1 | cpu_register_physical_memory(espaddr, ESP_SIZE, esp_io_memory); |
585 | 6f7e9aec | bellard | |
586 | 6f7e9aec | bellard | esp_reset(s); |
587 | 6f7e9aec | bellard | |
588 | 5425a216 | blueswir1 | register_savevm("esp", espaddr, 3, esp_save, esp_load, s); |
589 | 6f7e9aec | bellard | qemu_register_reset(esp_reset, s); |
590 | 6f7e9aec | bellard | |
591 | 67e999be | bellard | return s;
|
592 | 67e999be | bellard | } |