]>
Commit | Line | Data |
---|---|---|
6f7e9aec | 1 | /* |
67e999be | 2 | * QEMU ESP/NCR53C9x emulation |
5fafdf24 | 3 | * |
4e9aec74 | 4 | * Copyright (c) 2005-2006 Fabrice Bellard |
5fafdf24 | 5 | * |
6f7e9aec FB |
6 | * Permission is hereby granted, free of charge, to any person obtaining a copy |
7 | * of this software and associated documentation files (the "Software"), to deal | |
8 | * in the Software without restriction, including without limitation the rights | |
9 | * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell | |
10 | * copies of the Software, and to permit persons to whom the Software is | |
11 | * furnished to do so, subject to the following conditions: | |
12 | * | |
13 | * The above copyright notice and this permission notice shall be included in | |
14 | * all copies or substantial portions of the Software. | |
15 | * | |
16 | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR | |
17 | * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, | |
18 | * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL | |
19 | * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER | |
20 | * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, | |
21 | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN | |
22 | * THE SOFTWARE. | |
23 | */ | |
5d20fa6b | 24 | |
cfb9de9c | 25 | #include "sysbus.h" |
43b443b6 | 26 | #include "scsi.h" |
1cd3af54 | 27 | #include "esp.h" |
6f7e9aec FB |
28 | |
29 | /* debug ESP card */ | |
2f275b8f | 30 | //#define DEBUG_ESP |
6f7e9aec | 31 | |
67e999be | 32 | /* |
5ad6bb97 BS |
33 | * On Sparc32, this is the ESP (NCR53C90) part of chip STP2000 (Master I/O), |
34 | * also produced as NCR89C100. See | |
67e999be FB |
35 | * http://www.ibiblio.org/pub/historic-linux/early-ports/Sparc/NCR/NCR89C100.txt |
36 | * and | |
37 | * http://www.ibiblio.org/pub/historic-linux/early-ports/Sparc/NCR/NCR53C9X.txt | |
38 | */ | |
39 | ||
6f7e9aec | 40 | #ifdef DEBUG_ESP |
001faf32 BS |
41 | #define DPRINTF(fmt, ...) \ |
42 | do { printf("ESP: " fmt , ## __VA_ARGS__); } while (0) | |
6f7e9aec | 43 | #else |
001faf32 | 44 | #define DPRINTF(fmt, ...) do {} while (0) |
6f7e9aec FB |
45 | #endif |
46 | ||
001faf32 BS |
47 | #define ESP_ERROR(fmt, ...) \ |
48 | do { printf("ESP ERROR: %s: " fmt, __func__ , ## __VA_ARGS__); } while (0) | |
8dea1dd4 | 49 | |
5aca8c3b | 50 | #define ESP_REGS 16 |
8dea1dd4 | 51 | #define TI_BUFSZ 16 |
67e999be | 52 | |
4e9aec74 | 53 | typedef struct ESPState ESPState; |
6f7e9aec | 54 | |
4e9aec74 | 55 | struct ESPState { |
cfb9de9c | 56 | SysBusDevice busdev; |
5d20fa6b | 57 | uint32_t it_shift; |
70c0de96 | 58 | qemu_irq irq; |
5aca8c3b BS |
59 | uint8_t rregs[ESP_REGS]; |
60 | uint8_t wregs[ESP_REGS]; | |
67e999be | 61 | int32_t ti_size; |
4f6200f0 | 62 | uint32_t ti_rptr, ti_wptr; |
4f6200f0 | 63 | uint8_t ti_buf[TI_BUFSZ]; |
3944966d | 64 | uint32_t status; |
22548760 | 65 | uint32_t dma; |
ca9c39fa | 66 | SCSIBus bus; |
2e5d83bb | 67 | SCSIDevice *current_dev; |
5c6c0e51 | 68 | SCSIRequest *current_req; |
9f149aa9 | 69 | uint8_t cmdbuf[TI_BUFSZ]; |
22548760 BS |
70 | uint32_t cmdlen; |
71 | uint32_t do_cmd; | |
4d611c9a | 72 | |
6787f5fa | 73 | /* The amount of data left in the current DMA transfer. */ |
4d611c9a | 74 | uint32_t dma_left; |
6787f5fa PB |
75 | /* The size of the current DMA transfer. Zero if no transfer is in |
76 | progress. */ | |
77 | uint32_t dma_counter; | |
a917d384 | 78 | uint8_t *async_buf; |
4d611c9a | 79 | uint32_t async_len; |
8b17de88 | 80 | |
ff9868ec BS |
81 | ESPDMAMemoryReadWriteFunc dma_memory_read; |
82 | ESPDMAMemoryReadWriteFunc dma_memory_write; | |
67e999be | 83 | void *dma_opaque; |
73d74342 BS |
84 | int dma_enabled; |
85 | void (*dma_cb)(ESPState *s); | |
4e9aec74 | 86 | }; |
6f7e9aec | 87 | |
5ad6bb97 BS |
88 | #define ESP_TCLO 0x0 |
89 | #define ESP_TCMID 0x1 | |
90 | #define ESP_FIFO 0x2 | |
91 | #define ESP_CMD 0x3 | |
92 | #define ESP_RSTAT 0x4 | |
93 | #define ESP_WBUSID 0x4 | |
94 | #define ESP_RINTR 0x5 | |
95 | #define ESP_WSEL 0x5 | |
96 | #define ESP_RSEQ 0x6 | |
97 | #define ESP_WSYNTP 0x6 | |
98 | #define ESP_RFLAGS 0x7 | |
99 | #define ESP_WSYNO 0x7 | |
100 | #define ESP_CFG1 0x8 | |
101 | #define ESP_RRES1 0x9 | |
102 | #define ESP_WCCF 0x9 | |
103 | #define ESP_RRES2 0xa | |
104 | #define ESP_WTEST 0xa | |
105 | #define ESP_CFG2 0xb | |
106 | #define ESP_CFG3 0xc | |
107 | #define ESP_RES3 0xd | |
108 | #define ESP_TCHI 0xe | |
109 | #define ESP_RES4 0xf | |
110 | ||
111 | #define CMD_DMA 0x80 | |
112 | #define CMD_CMD 0x7f | |
113 | ||
114 | #define CMD_NOP 0x00 | |
115 | #define CMD_FLUSH 0x01 | |
116 | #define CMD_RESET 0x02 | |
117 | #define CMD_BUSRESET 0x03 | |
118 | #define CMD_TI 0x10 | |
119 | #define CMD_ICCS 0x11 | |
120 | #define CMD_MSGACC 0x12 | |
0fd0eb21 | 121 | #define CMD_PAD 0x18 |
5ad6bb97 | 122 | #define CMD_SATN 0x1a |
5e1e0a3b | 123 | #define CMD_SEL 0x41 |
5ad6bb97 BS |
124 | #define CMD_SELATN 0x42 |
125 | #define CMD_SELATNS 0x43 | |
126 | #define CMD_ENSEL 0x44 | |
127 | ||
2f275b8f FB |
128 | #define STAT_DO 0x00 |
129 | #define STAT_DI 0x01 | |
130 | #define STAT_CD 0x02 | |
131 | #define STAT_ST 0x03 | |
8dea1dd4 BS |
132 | #define STAT_MO 0x06 |
133 | #define STAT_MI 0x07 | |
5ad6bb97 | 134 | #define STAT_PIO_MASK 0x06 |
2f275b8f FB |
135 | |
136 | #define STAT_TC 0x10 | |
4d611c9a PB |
137 | #define STAT_PE 0x20 |
138 | #define STAT_GE 0x40 | |
c73f96fd | 139 | #define STAT_INT 0x80 |
2f275b8f | 140 | |
8dea1dd4 BS |
141 | #define BUSID_DID 0x07 |
142 | ||
2f275b8f FB |
143 | #define INTR_FC 0x08 |
144 | #define INTR_BS 0x10 | |
145 | #define INTR_DC 0x20 | |
9e61bde5 | 146 | #define INTR_RST 0x80 |
2f275b8f FB |
147 | |
148 | #define SEQ_0 0x0 | |
149 | #define SEQ_CD 0x4 | |
150 | ||
5ad6bb97 BS |
151 | #define CFG1_RESREPT 0x40 |
152 | ||
5ad6bb97 BS |
153 | #define TCHI_FAS100A 0x4 |
154 | ||
c73f96fd BS |
155 | static void esp_raise_irq(ESPState *s) |
156 | { | |
157 | if (!(s->rregs[ESP_RSTAT] & STAT_INT)) { | |
158 | s->rregs[ESP_RSTAT] |= STAT_INT; | |
159 | qemu_irq_raise(s->irq); | |
dca47edd | 160 | DPRINTF("Raise IRQ\n"); |
c73f96fd BS |
161 | } |
162 | } | |
163 | ||
164 | static void esp_lower_irq(ESPState *s) | |
165 | { | |
166 | if (s->rregs[ESP_RSTAT] & STAT_INT) { | |
167 | s->rregs[ESP_RSTAT] &= ~STAT_INT; | |
168 | qemu_irq_lower(s->irq); | |
dca47edd | 169 | DPRINTF("Lower IRQ\n"); |
c73f96fd BS |
170 | } |
171 | } | |
172 | ||
73d74342 BS |
173 | static void esp_dma_enable(void *opaque, int irq, int level) |
174 | { | |
175 | DeviceState *d = opaque; | |
176 | ESPState *s = container_of(d, ESPState, busdev.qdev); | |
177 | ||
178 | if (level) { | |
179 | s->dma_enabled = 1; | |
180 | DPRINTF("Raise enable\n"); | |
181 | if (s->dma_cb) { | |
182 | s->dma_cb(s); | |
183 | s->dma_cb = NULL; | |
184 | } | |
185 | } else { | |
186 | DPRINTF("Lower enable\n"); | |
187 | s->dma_enabled = 0; | |
188 | } | |
189 | } | |
190 | ||
94d3f98a PB |
191 | static void esp_request_cancelled(SCSIRequest *req) |
192 | { | |
193 | ESPState *s = DO_UPCAST(ESPState, busdev.qdev, req->bus->qbus.parent); | |
194 | ||
195 | if (req == s->current_req) { | |
196 | scsi_req_unref(s->current_req); | |
197 | s->current_req = NULL; | |
198 | s->current_dev = NULL; | |
199 | } | |
200 | } | |
201 | ||
22548760 | 202 | static uint32_t get_cmd(ESPState *s, uint8_t *buf) |
2f275b8f | 203 | { |
a917d384 | 204 | uint32_t dmalen; |
2f275b8f FB |
205 | int target; |
206 | ||
8dea1dd4 | 207 | target = s->wregs[ESP_WBUSID] & BUSID_DID; |
4f6200f0 | 208 | if (s->dma) { |
fc4d65da | 209 | dmalen = s->rregs[ESP_TCLO] | (s->rregs[ESP_TCMID] << 8); |
8b17de88 | 210 | s->dma_memory_read(s->dma_opaque, buf, dmalen); |
4f6200f0 | 211 | } else { |
fc4d65da BS |
212 | dmalen = s->ti_size; |
213 | memcpy(buf, s->ti_buf, dmalen); | |
75ef8496 | 214 | buf[0] = buf[2] >> 5; |
4f6200f0 | 215 | } |
fc4d65da | 216 | DPRINTF("get_cmd: len %d target %d\n", dmalen, target); |
2e5d83bb | 217 | |
2f275b8f | 218 | s->ti_size = 0; |
4f6200f0 FB |
219 | s->ti_rptr = 0; |
220 | s->ti_wptr = 0; | |
2f275b8f | 221 | |
429bef69 | 222 | if (s->current_req) { |
a917d384 | 223 | /* Started a new command before the old one finished. Cancel it. */ |
94d3f98a | 224 | scsi_req_cancel(s->current_req); |
a917d384 PB |
225 | s->async_len = 0; |
226 | } | |
227 | ||
ca9c39fa | 228 | if (target >= ESP_MAX_DEVS || !s->bus.devs[target]) { |
2e5d83bb | 229 | // No such drive |
c73f96fd | 230 | s->rregs[ESP_RSTAT] = 0; |
5ad6bb97 BS |
231 | s->rregs[ESP_RINTR] = INTR_DC; |
232 | s->rregs[ESP_RSEQ] = SEQ_0; | |
c73f96fd | 233 | esp_raise_irq(s); |
f930d07e | 234 | return 0; |
2f275b8f | 235 | } |
ca9c39fa | 236 | s->current_dev = s->bus.devs[target]; |
9f149aa9 PB |
237 | return dmalen; |
238 | } | |
239 | ||
f2818f22 | 240 | static void do_busid_cmd(ESPState *s, uint8_t *buf, uint8_t busid) |
9f149aa9 PB |
241 | { |
242 | int32_t datalen; | |
243 | int lun; | |
244 | ||
f2818f22 AT |
245 | DPRINTF("do_busid_cmd: busid 0x%x\n", busid); |
246 | lun = busid & 7; | |
c5bf71a9 | 247 | s->current_req = scsi_req_new(s->current_dev, 0, lun, NULL); |
fc4f0754 | 248 | datalen = scsi_req_enqueue(s->current_req, buf); |
67e999be FB |
249 | s->ti_size = datalen; |
250 | if (datalen != 0) { | |
c73f96fd | 251 | s->rregs[ESP_RSTAT] = STAT_TC; |
a917d384 | 252 | s->dma_left = 0; |
6787f5fa | 253 | s->dma_counter = 0; |
2e5d83bb | 254 | if (datalen > 0) { |
5ad6bb97 | 255 | s->rregs[ESP_RSTAT] |= STAT_DI; |
2e5d83bb | 256 | } else { |
5ad6bb97 | 257 | s->rregs[ESP_RSTAT] |= STAT_DO; |
b9788fc4 | 258 | } |
ad3376cc | 259 | scsi_req_continue(s->current_req); |
2f275b8f | 260 | } |
5ad6bb97 BS |
261 | s->rregs[ESP_RINTR] = INTR_BS | INTR_FC; |
262 | s->rregs[ESP_RSEQ] = SEQ_CD; | |
c73f96fd | 263 | esp_raise_irq(s); |
2f275b8f FB |
264 | } |
265 | ||
f2818f22 AT |
266 | static void do_cmd(ESPState *s, uint8_t *buf) |
267 | { | |
268 | uint8_t busid = buf[0]; | |
269 | ||
270 | do_busid_cmd(s, &buf[1], busid); | |
271 | } | |
272 | ||
9f149aa9 PB |
273 | static void handle_satn(ESPState *s) |
274 | { | |
275 | uint8_t buf[32]; | |
276 | int len; | |
277 | ||
73d74342 BS |
278 | if (!s->dma_enabled) { |
279 | s->dma_cb = handle_satn; | |
280 | return; | |
281 | } | |
9f149aa9 PB |
282 | len = get_cmd(s, buf); |
283 | if (len) | |
284 | do_cmd(s, buf); | |
285 | } | |
286 | ||
f2818f22 AT |
287 | static void handle_s_without_atn(ESPState *s) |
288 | { | |
289 | uint8_t buf[32]; | |
290 | int len; | |
291 | ||
73d74342 BS |
292 | if (!s->dma_enabled) { |
293 | s->dma_cb = handle_s_without_atn; | |
294 | return; | |
295 | } | |
f2818f22 AT |
296 | len = get_cmd(s, buf); |
297 | if (len) { | |
298 | do_busid_cmd(s, buf, 0); | |
299 | } | |
300 | } | |
301 | ||
9f149aa9 PB |
302 | static void handle_satn_stop(ESPState *s) |
303 | { | |
73d74342 BS |
304 | if (!s->dma_enabled) { |
305 | s->dma_cb = handle_satn_stop; | |
306 | return; | |
307 | } | |
9f149aa9 PB |
308 | s->cmdlen = get_cmd(s, s->cmdbuf); |
309 | if (s->cmdlen) { | |
310 | DPRINTF("Set ATN & Stop: cmdlen %d\n", s->cmdlen); | |
311 | s->do_cmd = 1; | |
c73f96fd | 312 | s->rregs[ESP_RSTAT] = STAT_TC | STAT_CD; |
5ad6bb97 BS |
313 | s->rregs[ESP_RINTR] = INTR_BS | INTR_FC; |
314 | s->rregs[ESP_RSEQ] = SEQ_CD; | |
c73f96fd | 315 | esp_raise_irq(s); |
9f149aa9 PB |
316 | } |
317 | } | |
318 | ||
0fc5c15a | 319 | static void write_response(ESPState *s) |
2f275b8f | 320 | { |
3944966d PB |
321 | DPRINTF("Transfer status (status=%d)\n", s->status); |
322 | s->ti_buf[0] = s->status; | |
0fc5c15a | 323 | s->ti_buf[1] = 0; |
4f6200f0 | 324 | if (s->dma) { |
8b17de88 | 325 | s->dma_memory_write(s->dma_opaque, s->ti_buf, 2); |
c73f96fd | 326 | s->rregs[ESP_RSTAT] = STAT_TC | STAT_ST; |
5ad6bb97 BS |
327 | s->rregs[ESP_RINTR] = INTR_BS | INTR_FC; |
328 | s->rregs[ESP_RSEQ] = SEQ_CD; | |
4f6200f0 | 329 | } else { |
f930d07e BS |
330 | s->ti_size = 2; |
331 | s->ti_rptr = 0; | |
332 | s->ti_wptr = 0; | |
5ad6bb97 | 333 | s->rregs[ESP_RFLAGS] = 2; |
4f6200f0 | 334 | } |
c73f96fd | 335 | esp_raise_irq(s); |
2f275b8f | 336 | } |
4f6200f0 | 337 | |
a917d384 PB |
338 | static void esp_dma_done(ESPState *s) |
339 | { | |
c73f96fd | 340 | s->rregs[ESP_RSTAT] |= STAT_TC; |
5ad6bb97 BS |
341 | s->rregs[ESP_RINTR] = INTR_BS; |
342 | s->rregs[ESP_RSEQ] = 0; | |
343 | s->rregs[ESP_RFLAGS] = 0; | |
344 | s->rregs[ESP_TCLO] = 0; | |
345 | s->rregs[ESP_TCMID] = 0; | |
c73f96fd | 346 | esp_raise_irq(s); |
a917d384 PB |
347 | } |
348 | ||
4d611c9a PB |
349 | static void esp_do_dma(ESPState *s) |
350 | { | |
67e999be | 351 | uint32_t len; |
4d611c9a | 352 | int to_device; |
a917d384 | 353 | |
67e999be | 354 | to_device = (s->ti_size < 0); |
a917d384 | 355 | len = s->dma_left; |
4d611c9a | 356 | if (s->do_cmd) { |
4d611c9a | 357 | DPRINTF("command len %d + %d\n", s->cmdlen, len); |
8b17de88 | 358 | s->dma_memory_read(s->dma_opaque, &s->cmdbuf[s->cmdlen], len); |
4d611c9a PB |
359 | s->ti_size = 0; |
360 | s->cmdlen = 0; | |
361 | s->do_cmd = 0; | |
362 | do_cmd(s, s->cmdbuf); | |
363 | return; | |
a917d384 PB |
364 | } |
365 | if (s->async_len == 0) { | |
366 | /* Defer until data is available. */ | |
367 | return; | |
368 | } | |
369 | if (len > s->async_len) { | |
370 | len = s->async_len; | |
371 | } | |
372 | if (to_device) { | |
8b17de88 | 373 | s->dma_memory_read(s->dma_opaque, s->async_buf, len); |
4d611c9a | 374 | } else { |
8b17de88 | 375 | s->dma_memory_write(s->dma_opaque, s->async_buf, len); |
a917d384 | 376 | } |
a917d384 PB |
377 | s->dma_left -= len; |
378 | s->async_buf += len; | |
379 | s->async_len -= len; | |
6787f5fa PB |
380 | if (to_device) |
381 | s->ti_size += len; | |
382 | else | |
383 | s->ti_size -= len; | |
a917d384 | 384 | if (s->async_len == 0) { |
ad3376cc PB |
385 | scsi_req_continue(s->current_req); |
386 | /* If there is still data to be read from the device then | |
387 | complete the DMA operation immediately. Otherwise defer | |
388 | until the scsi layer has completed. */ | |
389 | if (to_device || s->dma_left != 0 || s->ti_size == 0) { | |
390 | return; | |
4d611c9a | 391 | } |
a917d384 | 392 | } |
ad3376cc PB |
393 | |
394 | /* Partially filled a scsi buffer. Complete immediately. */ | |
395 | esp_dma_done(s); | |
4d611c9a PB |
396 | } |
397 | ||
aba1f023 | 398 | static void esp_command_complete(SCSIRequest *req, uint32_t status) |
2e5d83bb | 399 | { |
5c6c0e51 | 400 | ESPState *s = DO_UPCAST(ESPState, busdev.qdev, req->bus->qbus.parent); |
2e5d83bb | 401 | |
c6df7102 PB |
402 | DPRINTF("SCSI Command complete\n"); |
403 | if (s->ti_size != 0) { | |
404 | DPRINTF("SCSI command completed unexpectedly\n"); | |
405 | } | |
406 | s->ti_size = 0; | |
407 | s->dma_left = 0; | |
408 | s->async_len = 0; | |
aba1f023 | 409 | if (status) { |
c6df7102 PB |
410 | DPRINTF("Command failed\n"); |
411 | } | |
aba1f023 | 412 | s->status = status; |
c6df7102 PB |
413 | s->rregs[ESP_RSTAT] = STAT_ST; |
414 | esp_dma_done(s); | |
415 | if (s->current_req) { | |
416 | scsi_req_unref(s->current_req); | |
417 | s->current_req = NULL; | |
418 | s->current_dev = NULL; | |
419 | } | |
420 | } | |
421 | ||
aba1f023 | 422 | static void esp_transfer_data(SCSIRequest *req, uint32_t len) |
c6df7102 PB |
423 | { |
424 | ESPState *s = DO_UPCAST(ESPState, busdev.qdev, req->bus->qbus.parent); | |
425 | ||
426 | DPRINTF("transfer %d/%d\n", s->dma_left, s->ti_size); | |
aba1f023 | 427 | s->async_len = len; |
c6df7102 PB |
428 | s->async_buf = scsi_req_get_buf(req); |
429 | if (s->dma_left) { | |
430 | esp_do_dma(s); | |
431 | } else if (s->dma_counter != 0 && s->ti_size <= 0) { | |
432 | /* If this was the last part of a DMA transfer then the | |
433 | completion interrupt is deferred to here. */ | |
a917d384 | 434 | esp_dma_done(s); |
4d611c9a | 435 | } |
2e5d83bb PB |
436 | } |
437 | ||
2f275b8f FB |
438 | static void handle_ti(ESPState *s) |
439 | { | |
4d611c9a | 440 | uint32_t dmalen, minlen; |
2f275b8f | 441 | |
5ad6bb97 | 442 | dmalen = s->rregs[ESP_TCLO] | (s->rregs[ESP_TCMID] << 8); |
db59203d PB |
443 | if (dmalen==0) { |
444 | dmalen=0x10000; | |
445 | } | |
6787f5fa | 446 | s->dma_counter = dmalen; |
db59203d | 447 | |
9f149aa9 PB |
448 | if (s->do_cmd) |
449 | minlen = (dmalen < 32) ? dmalen : 32; | |
67e999be FB |
450 | else if (s->ti_size < 0) |
451 | minlen = (dmalen < -s->ti_size) ? dmalen : -s->ti_size; | |
9f149aa9 PB |
452 | else |
453 | minlen = (dmalen < s->ti_size) ? dmalen : s->ti_size; | |
db59203d | 454 | DPRINTF("Transfer Information len %d\n", minlen); |
4f6200f0 | 455 | if (s->dma) { |
4d611c9a | 456 | s->dma_left = minlen; |
5ad6bb97 | 457 | s->rregs[ESP_RSTAT] &= ~STAT_TC; |
4d611c9a | 458 | esp_do_dma(s); |
9f149aa9 PB |
459 | } else if (s->do_cmd) { |
460 | DPRINTF("command len %d\n", s->cmdlen); | |
461 | s->ti_size = 0; | |
462 | s->cmdlen = 0; | |
463 | s->do_cmd = 0; | |
464 | do_cmd(s, s->cmdbuf); | |
465 | return; | |
466 | } | |
2f275b8f FB |
467 | } |
468 | ||
85948643 | 469 | static void esp_hard_reset(DeviceState *d) |
6f7e9aec | 470 | { |
63235df8 | 471 | ESPState *s = container_of(d, ESPState, busdev.qdev); |
67e999be | 472 | |
5aca8c3b BS |
473 | memset(s->rregs, 0, ESP_REGS); |
474 | memset(s->wregs, 0, ESP_REGS); | |
5ad6bb97 | 475 | s->rregs[ESP_TCHI] = TCHI_FAS100A; // Indicate fas100a |
4e9aec74 PB |
476 | s->ti_size = 0; |
477 | s->ti_rptr = 0; | |
478 | s->ti_wptr = 0; | |
4e9aec74 | 479 | s->dma = 0; |
9f149aa9 | 480 | s->do_cmd = 0; |
73d74342 | 481 | s->dma_cb = NULL; |
8dea1dd4 BS |
482 | |
483 | s->rregs[ESP_CFG1] = 7; | |
6f7e9aec FB |
484 | } |
485 | ||
85948643 BS |
486 | static void esp_soft_reset(DeviceState *d) |
487 | { | |
488 | ESPState *s = container_of(d, ESPState, busdev.qdev); | |
489 | ||
490 | qemu_irq_lower(s->irq); | |
491 | esp_hard_reset(d); | |
492 | } | |
493 | ||
2d069bab BS |
494 | static void parent_esp_reset(void *opaque, int irq, int level) |
495 | { | |
85948643 BS |
496 | if (level) { |
497 | esp_soft_reset(opaque); | |
498 | } | |
2d069bab BS |
499 | } |
500 | ||
73d74342 BS |
501 | static void esp_gpio_demux(void *opaque, int irq, int level) |
502 | { | |
503 | switch (irq) { | |
504 | case 0: | |
505 | parent_esp_reset(opaque, irq, level); | |
506 | break; | |
507 | case 1: | |
508 | esp_dma_enable(opaque, irq, level); | |
509 | break; | |
510 | } | |
511 | } | |
512 | ||
c227f099 | 513 | static uint32_t esp_mem_readb(void *opaque, target_phys_addr_t addr) |
6f7e9aec FB |
514 | { |
515 | ESPState *s = opaque; | |
2814df28 | 516 | uint32_t saddr, old_val; |
6f7e9aec | 517 | |
e64d7d59 | 518 | saddr = addr >> s->it_shift; |
9e61bde5 | 519 | DPRINTF("read reg[%d]: 0x%2.2x\n", saddr, s->rregs[saddr]); |
6f7e9aec | 520 | switch (saddr) { |
5ad6bb97 | 521 | case ESP_FIFO: |
f930d07e BS |
522 | if (s->ti_size > 0) { |
523 | s->ti_size--; | |
5ad6bb97 | 524 | if ((s->rregs[ESP_RSTAT] & STAT_PIO_MASK) == 0) { |
8dea1dd4 BS |
525 | /* Data out. */ |
526 | ESP_ERROR("PIO data read not implemented\n"); | |
5ad6bb97 | 527 | s->rregs[ESP_FIFO] = 0; |
2e5d83bb | 528 | } else { |
5ad6bb97 | 529 | s->rregs[ESP_FIFO] = s->ti_buf[s->ti_rptr++]; |
2e5d83bb | 530 | } |
c73f96fd | 531 | esp_raise_irq(s); |
f930d07e BS |
532 | } |
533 | if (s->ti_size == 0) { | |
4f6200f0 FB |
534 | s->ti_rptr = 0; |
535 | s->ti_wptr = 0; | |
536 | } | |
f930d07e | 537 | break; |
5ad6bb97 | 538 | case ESP_RINTR: |
2814df28 BS |
539 | /* Clear sequence step, interrupt register and all status bits |
540 | except TC */ | |
541 | old_val = s->rregs[ESP_RINTR]; | |
542 | s->rregs[ESP_RINTR] = 0; | |
543 | s->rregs[ESP_RSTAT] &= ~STAT_TC; | |
544 | s->rregs[ESP_RSEQ] = SEQ_CD; | |
c73f96fd | 545 | esp_lower_irq(s); |
2814df28 BS |
546 | |
547 | return old_val; | |
6f7e9aec | 548 | default: |
f930d07e | 549 | break; |
6f7e9aec | 550 | } |
2f275b8f | 551 | return s->rregs[saddr]; |
6f7e9aec FB |
552 | } |
553 | ||
c227f099 | 554 | static void esp_mem_writeb(void *opaque, target_phys_addr_t addr, uint32_t val) |
6f7e9aec FB |
555 | { |
556 | ESPState *s = opaque; | |
557 | uint32_t saddr; | |
558 | ||
e64d7d59 | 559 | saddr = addr >> s->it_shift; |
5ad6bb97 BS |
560 | DPRINTF("write reg[%d]: 0x%2.2x -> 0x%2.2x\n", saddr, s->wregs[saddr], |
561 | val); | |
6f7e9aec | 562 | switch (saddr) { |
5ad6bb97 BS |
563 | case ESP_TCLO: |
564 | case ESP_TCMID: | |
565 | s->rregs[ESP_RSTAT] &= ~STAT_TC; | |
4f6200f0 | 566 | break; |
5ad6bb97 | 567 | case ESP_FIFO: |
9f149aa9 PB |
568 | if (s->do_cmd) { |
569 | s->cmdbuf[s->cmdlen++] = val & 0xff; | |
8dea1dd4 BS |
570 | } else if (s->ti_size == TI_BUFSZ - 1) { |
571 | ESP_ERROR("fifo overrun\n"); | |
2e5d83bb PB |
572 | } else { |
573 | s->ti_size++; | |
574 | s->ti_buf[s->ti_wptr++] = val & 0xff; | |
575 | } | |
f930d07e | 576 | break; |
5ad6bb97 | 577 | case ESP_CMD: |
4f6200f0 | 578 | s->rregs[saddr] = val; |
5ad6bb97 | 579 | if (val & CMD_DMA) { |
f930d07e | 580 | s->dma = 1; |
6787f5fa | 581 | /* Reload DMA counter. */ |
5ad6bb97 BS |
582 | s->rregs[ESP_TCLO] = s->wregs[ESP_TCLO]; |
583 | s->rregs[ESP_TCMID] = s->wregs[ESP_TCMID]; | |
f930d07e BS |
584 | } else { |
585 | s->dma = 0; | |
586 | } | |
5ad6bb97 BS |
587 | switch(val & CMD_CMD) { |
588 | case CMD_NOP: | |
f930d07e BS |
589 | DPRINTF("NOP (%2.2x)\n", val); |
590 | break; | |
5ad6bb97 | 591 | case CMD_FLUSH: |
f930d07e | 592 | DPRINTF("Flush FIFO (%2.2x)\n", val); |
9e61bde5 | 593 | //s->ti_size = 0; |
5ad6bb97 BS |
594 | s->rregs[ESP_RINTR] = INTR_FC; |
595 | s->rregs[ESP_RSEQ] = 0; | |
a214c598 | 596 | s->rregs[ESP_RFLAGS] = 0; |
f930d07e | 597 | break; |
5ad6bb97 | 598 | case CMD_RESET: |
f930d07e | 599 | DPRINTF("Chip reset (%2.2x)\n", val); |
85948643 | 600 | esp_soft_reset(&s->busdev.qdev); |
f930d07e | 601 | break; |
5ad6bb97 | 602 | case CMD_BUSRESET: |
f930d07e | 603 | DPRINTF("Bus reset (%2.2x)\n", val); |
5ad6bb97 BS |
604 | s->rregs[ESP_RINTR] = INTR_RST; |
605 | if (!(s->wregs[ESP_CFG1] & CFG1_RESREPT)) { | |
c73f96fd | 606 | esp_raise_irq(s); |
9e61bde5 | 607 | } |
f930d07e | 608 | break; |
5ad6bb97 | 609 | case CMD_TI: |
f930d07e BS |
610 | handle_ti(s); |
611 | break; | |
5ad6bb97 | 612 | case CMD_ICCS: |
f930d07e BS |
613 | DPRINTF("Initiator Command Complete Sequence (%2.2x)\n", val); |
614 | write_response(s); | |
4bf5801d BS |
615 | s->rregs[ESP_RINTR] = INTR_FC; |
616 | s->rregs[ESP_RSTAT] |= STAT_MI; | |
f930d07e | 617 | break; |
5ad6bb97 | 618 | case CMD_MSGACC: |
f930d07e | 619 | DPRINTF("Message Accepted (%2.2x)\n", val); |
5ad6bb97 BS |
620 | s->rregs[ESP_RINTR] = INTR_DC; |
621 | s->rregs[ESP_RSEQ] = 0; | |
4e2a68c1 AT |
622 | s->rregs[ESP_RFLAGS] = 0; |
623 | esp_raise_irq(s); | |
f930d07e | 624 | break; |
0fd0eb21 BS |
625 | case CMD_PAD: |
626 | DPRINTF("Transfer padding (%2.2x)\n", val); | |
627 | s->rregs[ESP_RSTAT] = STAT_TC; | |
628 | s->rregs[ESP_RINTR] = INTR_FC; | |
629 | s->rregs[ESP_RSEQ] = 0; | |
630 | break; | |
5ad6bb97 | 631 | case CMD_SATN: |
f930d07e BS |
632 | DPRINTF("Set ATN (%2.2x)\n", val); |
633 | break; | |
5e1e0a3b BS |
634 | case CMD_SEL: |
635 | DPRINTF("Select without ATN (%2.2x)\n", val); | |
f2818f22 | 636 | handle_s_without_atn(s); |
5e1e0a3b | 637 | break; |
5ad6bb97 | 638 | case CMD_SELATN: |
5e1e0a3b | 639 | DPRINTF("Select with ATN (%2.2x)\n", val); |
f930d07e BS |
640 | handle_satn(s); |
641 | break; | |
5ad6bb97 | 642 | case CMD_SELATNS: |
5e1e0a3b | 643 | DPRINTF("Select with ATN & stop (%2.2x)\n", val); |
f930d07e BS |
644 | handle_satn_stop(s); |
645 | break; | |
5ad6bb97 | 646 | case CMD_ENSEL: |
74ec6048 | 647 | DPRINTF("Enable selection (%2.2x)\n", val); |
e3926838 | 648 | s->rregs[ESP_RINTR] = 0; |
74ec6048 | 649 | break; |
f930d07e | 650 | default: |
8dea1dd4 | 651 | ESP_ERROR("Unhandled ESP command (%2.2x)\n", val); |
f930d07e BS |
652 | break; |
653 | } | |
654 | break; | |
5ad6bb97 | 655 | case ESP_WBUSID ... ESP_WSYNO: |
f930d07e | 656 | break; |
5ad6bb97 | 657 | case ESP_CFG1: |
4f6200f0 FB |
658 | s->rregs[saddr] = val; |
659 | break; | |
5ad6bb97 | 660 | case ESP_WCCF ... ESP_WTEST: |
4f6200f0 | 661 | break; |
b44c08fa | 662 | case ESP_CFG2 ... ESP_RES4: |
4f6200f0 FB |
663 | s->rregs[saddr] = val; |
664 | break; | |
6f7e9aec | 665 | default: |
8dea1dd4 BS |
666 | ESP_ERROR("invalid write of 0x%02x at [0x%x]\n", val, saddr); |
667 | return; | |
6f7e9aec | 668 | } |
2f275b8f | 669 | s->wregs[saddr] = val; |
6f7e9aec FB |
670 | } |
671 | ||
d60efc6b | 672 | static CPUReadMemoryFunc * const esp_mem_read[3] = { |
6f7e9aec | 673 | esp_mem_readb, |
7c560456 BS |
674 | NULL, |
675 | NULL, | |
6f7e9aec FB |
676 | }; |
677 | ||
d60efc6b | 678 | static CPUWriteMemoryFunc * const esp_mem_write[3] = { |
6f7e9aec | 679 | esp_mem_writeb, |
7c560456 | 680 | NULL, |
daa41b00 | 681 | esp_mem_writeb, |
6f7e9aec FB |
682 | }; |
683 | ||
cc9952f3 BS |
684 | static const VMStateDescription vmstate_esp = { |
685 | .name ="esp", | |
686 | .version_id = 3, | |
687 | .minimum_version_id = 3, | |
688 | .minimum_version_id_old = 3, | |
689 | .fields = (VMStateField []) { | |
690 | VMSTATE_BUFFER(rregs, ESPState), | |
691 | VMSTATE_BUFFER(wregs, ESPState), | |
692 | VMSTATE_INT32(ti_size, ESPState), | |
693 | VMSTATE_UINT32(ti_rptr, ESPState), | |
694 | VMSTATE_UINT32(ti_wptr, ESPState), | |
695 | VMSTATE_BUFFER(ti_buf, ESPState), | |
3944966d | 696 | VMSTATE_UINT32(status, ESPState), |
cc9952f3 BS |
697 | VMSTATE_UINT32(dma, ESPState), |
698 | VMSTATE_BUFFER(cmdbuf, ESPState), | |
699 | VMSTATE_UINT32(cmdlen, ESPState), | |
700 | VMSTATE_UINT32(do_cmd, ESPState), | |
701 | VMSTATE_UINT32(dma_left, ESPState), | |
702 | VMSTATE_END_OF_LIST() | |
703 | } | |
704 | }; | |
6f7e9aec | 705 | |
c227f099 | 706 | void esp_init(target_phys_addr_t espaddr, int it_shift, |
ff9868ec BS |
707 | ESPDMAMemoryReadWriteFunc dma_memory_read, |
708 | ESPDMAMemoryReadWriteFunc dma_memory_write, | |
73d74342 BS |
709 | void *dma_opaque, qemu_irq irq, qemu_irq *reset, |
710 | qemu_irq *dma_enable) | |
6f7e9aec | 711 | { |
cfb9de9c PB |
712 | DeviceState *dev; |
713 | SysBusDevice *s; | |
ee6847d1 | 714 | ESPState *esp; |
cfb9de9c PB |
715 | |
716 | dev = qdev_create(NULL, "esp"); | |
ee6847d1 GH |
717 | esp = DO_UPCAST(ESPState, busdev.qdev, dev); |
718 | esp->dma_memory_read = dma_memory_read; | |
719 | esp->dma_memory_write = dma_memory_write; | |
720 | esp->dma_opaque = dma_opaque; | |
721 | esp->it_shift = it_shift; | |
73d74342 BS |
722 | /* XXX for now until rc4030 has been changed to use DMA enable signal */ |
723 | esp->dma_enabled = 1; | |
e23a1b33 | 724 | qdev_init_nofail(dev); |
cfb9de9c PB |
725 | s = sysbus_from_qdev(dev); |
726 | sysbus_connect_irq(s, 0, irq); | |
727 | sysbus_mmio_map(s, 0, espaddr); | |
74ff8d90 | 728 | *reset = qdev_get_gpio_in(dev, 0); |
73d74342 | 729 | *dma_enable = qdev_get_gpio_in(dev, 1); |
cfb9de9c | 730 | } |
6f7e9aec | 731 | |
cfdc1bb0 | 732 | static const struct SCSIBusOps esp_scsi_ops = { |
c6df7102 | 733 | .transfer_data = esp_transfer_data, |
94d3f98a PB |
734 | .complete = esp_command_complete, |
735 | .cancel = esp_request_cancelled | |
cfdc1bb0 PB |
736 | }; |
737 | ||
81a322d4 | 738 | static int esp_init1(SysBusDevice *dev) |
cfb9de9c PB |
739 | { |
740 | ESPState *s = FROM_SYSBUS(ESPState, dev); | |
741 | int esp_io_memory; | |
6f7e9aec | 742 | |
cfb9de9c | 743 | sysbus_init_irq(dev, &s->irq); |
cfb9de9c | 744 | assert(s->it_shift != -1); |
6f7e9aec | 745 | |
2507c12a AG |
746 | esp_io_memory = cpu_register_io_memory(esp_mem_read, esp_mem_write, s, |
747 | DEVICE_NATIVE_ENDIAN); | |
cfb9de9c | 748 | sysbus_init_mmio(dev, ESP_REGS << s->it_shift, esp_io_memory); |
6f7e9aec | 749 | |
73d74342 | 750 | qdev_init_gpio_in(&dev->qdev, esp_gpio_demux, 2); |
2d069bab | 751 | |
cfdc1bb0 | 752 | scsi_bus_new(&s->bus, &dev->qdev, 0, ESP_MAX_DEVS, &esp_scsi_ops); |
fa66b909 | 753 | return scsi_bus_legacy_handle_cmdline(&s->bus); |
67e999be | 754 | } |
cfb9de9c | 755 | |
63235df8 BS |
756 | static SysBusDeviceInfo esp_info = { |
757 | .init = esp_init1, | |
758 | .qdev.name = "esp", | |
759 | .qdev.size = sizeof(ESPState), | |
760 | .qdev.vmsd = &vmstate_esp, | |
85948643 | 761 | .qdev.reset = esp_hard_reset, |
63235df8 BS |
762 | .qdev.props = (Property[]) { |
763 | {.name = NULL} | |
764 | } | |
765 | }; | |
766 | ||
cfb9de9c PB |
767 | static void esp_register_devices(void) |
768 | { | |
63235df8 | 769 | sysbus_register_withprop(&esp_info); |
cfb9de9c PB |
770 | } |
771 | ||
772 | device_init(esp_register_devices) |