]> git.proxmox.com Git - qemu.git/blame - hw/esp.c
scsi: do not call send_command directly
[qemu.git] / hw / esp.c
CommitLineData
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 53typedef struct ESPState ESPState;
6f7e9aec 54
4e9aec74 55struct 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];
22548760
BS
64 uint32_t sense;
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
155static 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
164static 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
173static 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
191static 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 202static 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);
f930d07e 214 buf[0] = 0;
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
a917d384
PB
222 if (s->current_dev) {
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 240static 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;
5c6c0e51 247 s->current_req = s->current_dev->info->alloc_req(s->current_dev, 0, lun);
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;
5c6c0e51 256 s->current_dev->info->read_data(s->current_req);
2e5d83bb 257 } else {
5ad6bb97 258 s->rregs[ESP_RSTAT] |= STAT_DO;
5c6c0e51 259 s->current_dev->info->write_data(s->current_req);
b9788fc4 260 }
2f275b8f 261 }
5ad6bb97
BS
262 s->rregs[ESP_RINTR] = INTR_BS | INTR_FC;
263 s->rregs[ESP_RSEQ] = SEQ_CD;
c73f96fd 264 esp_raise_irq(s);
2f275b8f
FB
265}
266
f2818f22
AT
267static void do_cmd(ESPState *s, uint8_t *buf)
268{
269 uint8_t busid = buf[0];
270
271 do_busid_cmd(s, &buf[1], busid);
272}
273
9f149aa9
PB
274static void handle_satn(ESPState *s)
275{
276 uint8_t buf[32];
277 int len;
278
73d74342
BS
279 if (!s->dma_enabled) {
280 s->dma_cb = handle_satn;
281 return;
282 }
9f149aa9
PB
283 len = get_cmd(s, buf);
284 if (len)
285 do_cmd(s, buf);
286}
287
f2818f22
AT
288static void handle_s_without_atn(ESPState *s)
289{
290 uint8_t buf[32];
291 int len;
292
73d74342
BS
293 if (!s->dma_enabled) {
294 s->dma_cb = handle_s_without_atn;
295 return;
296 }
f2818f22
AT
297 len = get_cmd(s, buf);
298 if (len) {
299 do_busid_cmd(s, buf, 0);
300 }
301}
302
9f149aa9
PB
303static void handle_satn_stop(ESPState *s)
304{
73d74342
BS
305 if (!s->dma_enabled) {
306 s->dma_cb = handle_satn_stop;
307 return;
308 }
9f149aa9
PB
309 s->cmdlen = get_cmd(s, s->cmdbuf);
310 if (s->cmdlen) {
311 DPRINTF("Set ATN & Stop: cmdlen %d\n", s->cmdlen);
312 s->do_cmd = 1;
c73f96fd 313 s->rregs[ESP_RSTAT] = STAT_TC | STAT_CD;
5ad6bb97
BS
314 s->rregs[ESP_RINTR] = INTR_BS | INTR_FC;
315 s->rregs[ESP_RSEQ] = SEQ_CD;
c73f96fd 316 esp_raise_irq(s);
9f149aa9
PB
317 }
318}
319
0fc5c15a 320static void write_response(ESPState *s)
2f275b8f 321{
0fc5c15a
PB
322 DPRINTF("Transfer status (sense=%d)\n", s->sense);
323 s->ti_buf[0] = s->sense;
324 s->ti_buf[1] = 0;
4f6200f0 325 if (s->dma) {
8b17de88 326 s->dma_memory_write(s->dma_opaque, s->ti_buf, 2);
c73f96fd 327 s->rregs[ESP_RSTAT] = STAT_TC | STAT_ST;
5ad6bb97
BS
328 s->rregs[ESP_RINTR] = INTR_BS | INTR_FC;
329 s->rregs[ESP_RSEQ] = SEQ_CD;
4f6200f0 330 } else {
f930d07e
BS
331 s->ti_size = 2;
332 s->ti_rptr = 0;
333 s->ti_wptr = 0;
5ad6bb97 334 s->rregs[ESP_RFLAGS] = 2;
4f6200f0 335 }
c73f96fd 336 esp_raise_irq(s);
2f275b8f 337}
4f6200f0 338
a917d384
PB
339static void esp_dma_done(ESPState *s)
340{
c73f96fd 341 s->rregs[ESP_RSTAT] |= STAT_TC;
5ad6bb97
BS
342 s->rregs[ESP_RINTR] = INTR_BS;
343 s->rregs[ESP_RSEQ] = 0;
344 s->rregs[ESP_RFLAGS] = 0;
345 s->rregs[ESP_TCLO] = 0;
346 s->rregs[ESP_TCMID] = 0;
c73f96fd 347 esp_raise_irq(s);
a917d384
PB
348}
349
4d611c9a
PB
350static void esp_do_dma(ESPState *s)
351{
67e999be 352 uint32_t len;
4d611c9a 353 int to_device;
a917d384 354
67e999be 355 to_device = (s->ti_size < 0);
a917d384 356 len = s->dma_left;
4d611c9a 357 if (s->do_cmd) {
4d611c9a 358 DPRINTF("command len %d + %d\n", s->cmdlen, len);
8b17de88 359 s->dma_memory_read(s->dma_opaque, &s->cmdbuf[s->cmdlen], len);
4d611c9a
PB
360 s->ti_size = 0;
361 s->cmdlen = 0;
362 s->do_cmd = 0;
363 do_cmd(s, s->cmdbuf);
364 return;
a917d384
PB
365 }
366 if (s->async_len == 0) {
367 /* Defer until data is available. */
368 return;
369 }
370 if (len > s->async_len) {
371 len = s->async_len;
372 }
373 if (to_device) {
8b17de88 374 s->dma_memory_read(s->dma_opaque, s->async_buf, len);
4d611c9a 375 } else {
8b17de88 376 s->dma_memory_write(s->dma_opaque, s->async_buf, len);
a917d384 377 }
a917d384
PB
378 s->dma_left -= len;
379 s->async_buf += len;
380 s->async_len -= len;
6787f5fa
PB
381 if (to_device)
382 s->ti_size += len;
383 else
384 s->ti_size -= len;
a917d384 385 if (s->async_len == 0) {
4d611c9a 386 if (to_device) {
67e999be 387 // ti_size is negative
5c6c0e51 388 s->current_dev->info->write_data(s->current_req);
4d611c9a 389 } else {
5c6c0e51 390 s->current_dev->info->read_data(s->current_req);
6787f5fa 391 /* If there is still data to be read from the device then
8dea1dd4 392 complete the DMA operation immediately. Otherwise defer
6787f5fa
PB
393 until the scsi layer has completed. */
394 if (s->dma_left == 0 && s->ti_size > 0) {
395 esp_dma_done(s);
396 }
4d611c9a 397 }
6787f5fa
PB
398 } else {
399 /* Partially filled a scsi buffer. Complete immediately. */
a917d384
PB
400 esp_dma_done(s);
401 }
4d611c9a
PB
402}
403
5c6c0e51 404static void esp_command_complete(SCSIRequest *req, int reason, uint32_t arg)
2e5d83bb 405{
5c6c0e51 406 ESPState *s = DO_UPCAST(ESPState, busdev.qdev, req->bus->qbus.parent);
2e5d83bb 407
4d611c9a
PB
408 if (reason == SCSI_REASON_DONE) {
409 DPRINTF("SCSI Command complete\n");
410 if (s->ti_size != 0)
411 DPRINTF("SCSI command completed unexpectedly\n");
412 s->ti_size = 0;
a917d384
PB
413 s->dma_left = 0;
414 s->async_len = 0;
415 if (arg)
4d611c9a 416 DPRINTF("Command failed\n");
a917d384 417 s->sense = arg;
5ad6bb97 418 s->rregs[ESP_RSTAT] = STAT_ST;
a917d384 419 esp_dma_done(s);
5c6c0e51
HR
420 if (s->current_req) {
421 scsi_req_unref(s->current_req);
422 s->current_req = NULL;
423 s->current_dev = NULL;
424 }
4d611c9a
PB
425 } else {
426 DPRINTF("transfer %d/%d\n", s->dma_left, s->ti_size);
a917d384 427 s->async_len = arg;
5c6c0e51 428 s->async_buf = s->current_dev->info->get_buf(req);
6787f5fa 429 if (s->dma_left) {
a917d384 430 esp_do_dma(s);
6787f5fa
PB
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. */
434 esp_dma_done(s);
435 }
4d611c9a 436 }
2e5d83bb
PB
437}
438
2f275b8f
FB
439static void handle_ti(ESPState *s)
440{
4d611c9a 441 uint32_t dmalen, minlen;
2f275b8f 442
5ad6bb97 443 dmalen = s->rregs[ESP_TCLO] | (s->rregs[ESP_TCMID] << 8);
db59203d
PB
444 if (dmalen==0) {
445 dmalen=0x10000;
446 }
6787f5fa 447 s->dma_counter = dmalen;
db59203d 448
9f149aa9
PB
449 if (s->do_cmd)
450 minlen = (dmalen < 32) ? dmalen : 32;
67e999be
FB
451 else if (s->ti_size < 0)
452 minlen = (dmalen < -s->ti_size) ? dmalen : -s->ti_size;
9f149aa9
PB
453 else
454 minlen = (dmalen < s->ti_size) ? dmalen : s->ti_size;
db59203d 455 DPRINTF("Transfer Information len %d\n", minlen);
4f6200f0 456 if (s->dma) {
4d611c9a 457 s->dma_left = minlen;
5ad6bb97 458 s->rregs[ESP_RSTAT] &= ~STAT_TC;
4d611c9a 459 esp_do_dma(s);
9f149aa9
PB
460 } else if (s->do_cmd) {
461 DPRINTF("command len %d\n", s->cmdlen);
462 s->ti_size = 0;
463 s->cmdlen = 0;
464 s->do_cmd = 0;
465 do_cmd(s, s->cmdbuf);
466 return;
467 }
2f275b8f
FB
468}
469
85948643 470static void esp_hard_reset(DeviceState *d)
6f7e9aec 471{
63235df8 472 ESPState *s = container_of(d, ESPState, busdev.qdev);
67e999be 473
5aca8c3b
BS
474 memset(s->rregs, 0, ESP_REGS);
475 memset(s->wregs, 0, ESP_REGS);
5ad6bb97 476 s->rregs[ESP_TCHI] = TCHI_FAS100A; // Indicate fas100a
4e9aec74
PB
477 s->ti_size = 0;
478 s->ti_rptr = 0;
479 s->ti_wptr = 0;
4e9aec74 480 s->dma = 0;
9f149aa9 481 s->do_cmd = 0;
73d74342 482 s->dma_cb = NULL;
8dea1dd4
BS
483
484 s->rregs[ESP_CFG1] = 7;
6f7e9aec
FB
485}
486
85948643
BS
487static void esp_soft_reset(DeviceState *d)
488{
489 ESPState *s = container_of(d, ESPState, busdev.qdev);
490
491 qemu_irq_lower(s->irq);
492 esp_hard_reset(d);
493}
494
2d069bab
BS
495static void parent_esp_reset(void *opaque, int irq, int level)
496{
85948643
BS
497 if (level) {
498 esp_soft_reset(opaque);
499 }
2d069bab
BS
500}
501
73d74342
BS
502static void esp_gpio_demux(void *opaque, int irq, int level)
503{
504 switch (irq) {
505 case 0:
506 parent_esp_reset(opaque, irq, level);
507 break;
508 case 1:
509 esp_dma_enable(opaque, irq, level);
510 break;
511 }
512}
513
c227f099 514static uint32_t esp_mem_readb(void *opaque, target_phys_addr_t addr)
6f7e9aec
FB
515{
516 ESPState *s = opaque;
2814df28 517 uint32_t saddr, old_val;
6f7e9aec 518
e64d7d59 519 saddr = addr >> s->it_shift;
9e61bde5 520 DPRINTF("read reg[%d]: 0x%2.2x\n", saddr, s->rregs[saddr]);
6f7e9aec 521 switch (saddr) {
5ad6bb97 522 case ESP_FIFO:
f930d07e
BS
523 if (s->ti_size > 0) {
524 s->ti_size--;
5ad6bb97 525 if ((s->rregs[ESP_RSTAT] & STAT_PIO_MASK) == 0) {
8dea1dd4
BS
526 /* Data out. */
527 ESP_ERROR("PIO data read not implemented\n");
5ad6bb97 528 s->rregs[ESP_FIFO] = 0;
2e5d83bb 529 } else {
5ad6bb97 530 s->rregs[ESP_FIFO] = s->ti_buf[s->ti_rptr++];
2e5d83bb 531 }
c73f96fd 532 esp_raise_irq(s);
f930d07e
BS
533 }
534 if (s->ti_size == 0) {
4f6200f0
FB
535 s->ti_rptr = 0;
536 s->ti_wptr = 0;
537 }
f930d07e 538 break;
5ad6bb97 539 case ESP_RINTR:
2814df28
BS
540 /* Clear sequence step, interrupt register and all status bits
541 except TC */
542 old_val = s->rregs[ESP_RINTR];
543 s->rregs[ESP_RINTR] = 0;
544 s->rregs[ESP_RSTAT] &= ~STAT_TC;
545 s->rregs[ESP_RSEQ] = SEQ_CD;
c73f96fd 546 esp_lower_irq(s);
2814df28
BS
547
548 return old_val;
6f7e9aec 549 default:
f930d07e 550 break;
6f7e9aec 551 }
2f275b8f 552 return s->rregs[saddr];
6f7e9aec
FB
553}
554
c227f099 555static void esp_mem_writeb(void *opaque, target_phys_addr_t addr, uint32_t val)
6f7e9aec
FB
556{
557 ESPState *s = opaque;
558 uint32_t saddr;
559
e64d7d59 560 saddr = addr >> s->it_shift;
5ad6bb97
BS
561 DPRINTF("write reg[%d]: 0x%2.2x -> 0x%2.2x\n", saddr, s->wregs[saddr],
562 val);
6f7e9aec 563 switch (saddr) {
5ad6bb97
BS
564 case ESP_TCLO:
565 case ESP_TCMID:
566 s->rregs[ESP_RSTAT] &= ~STAT_TC;
4f6200f0 567 break;
5ad6bb97 568 case ESP_FIFO:
9f149aa9
PB
569 if (s->do_cmd) {
570 s->cmdbuf[s->cmdlen++] = val & 0xff;
8dea1dd4
BS
571 } else if (s->ti_size == TI_BUFSZ - 1) {
572 ESP_ERROR("fifo overrun\n");
2e5d83bb
PB
573 } else {
574 s->ti_size++;
575 s->ti_buf[s->ti_wptr++] = val & 0xff;
576 }
f930d07e 577 break;
5ad6bb97 578 case ESP_CMD:
4f6200f0 579 s->rregs[saddr] = val;
5ad6bb97 580 if (val & CMD_DMA) {
f930d07e 581 s->dma = 1;
6787f5fa 582 /* Reload DMA counter. */
5ad6bb97
BS
583 s->rregs[ESP_TCLO] = s->wregs[ESP_TCLO];
584 s->rregs[ESP_TCMID] = s->wregs[ESP_TCMID];
f930d07e
BS
585 } else {
586 s->dma = 0;
587 }
5ad6bb97
BS
588 switch(val & CMD_CMD) {
589 case CMD_NOP:
f930d07e
BS
590 DPRINTF("NOP (%2.2x)\n", val);
591 break;
5ad6bb97 592 case CMD_FLUSH:
f930d07e 593 DPRINTF("Flush FIFO (%2.2x)\n", val);
9e61bde5 594 //s->ti_size = 0;
5ad6bb97
BS
595 s->rregs[ESP_RINTR] = INTR_FC;
596 s->rregs[ESP_RSEQ] = 0;
a214c598 597 s->rregs[ESP_RFLAGS] = 0;
f930d07e 598 break;
5ad6bb97 599 case CMD_RESET:
f930d07e 600 DPRINTF("Chip reset (%2.2x)\n", val);
85948643 601 esp_soft_reset(&s->busdev.qdev);
f930d07e 602 break;
5ad6bb97 603 case CMD_BUSRESET:
f930d07e 604 DPRINTF("Bus reset (%2.2x)\n", val);
5ad6bb97
BS
605 s->rregs[ESP_RINTR] = INTR_RST;
606 if (!(s->wregs[ESP_CFG1] & CFG1_RESREPT)) {
c73f96fd 607 esp_raise_irq(s);
9e61bde5 608 }
f930d07e 609 break;
5ad6bb97 610 case CMD_TI:
f930d07e
BS
611 handle_ti(s);
612 break;
5ad6bb97 613 case CMD_ICCS:
f930d07e
BS
614 DPRINTF("Initiator Command Complete Sequence (%2.2x)\n", val);
615 write_response(s);
4bf5801d
BS
616 s->rregs[ESP_RINTR] = INTR_FC;
617 s->rregs[ESP_RSTAT] |= STAT_MI;
f930d07e 618 break;
5ad6bb97 619 case CMD_MSGACC:
f930d07e 620 DPRINTF("Message Accepted (%2.2x)\n", val);
5ad6bb97
BS
621 s->rregs[ESP_RINTR] = INTR_DC;
622 s->rregs[ESP_RSEQ] = 0;
4e2a68c1
AT
623 s->rregs[ESP_RFLAGS] = 0;
624 esp_raise_irq(s);
f930d07e 625 break;
0fd0eb21
BS
626 case CMD_PAD:
627 DPRINTF("Transfer padding (%2.2x)\n", val);
628 s->rregs[ESP_RSTAT] = STAT_TC;
629 s->rregs[ESP_RINTR] = INTR_FC;
630 s->rregs[ESP_RSEQ] = 0;
631 break;
5ad6bb97 632 case CMD_SATN:
f930d07e
BS
633 DPRINTF("Set ATN (%2.2x)\n", val);
634 break;
5e1e0a3b
BS
635 case CMD_SEL:
636 DPRINTF("Select without ATN (%2.2x)\n", val);
f2818f22 637 handle_s_without_atn(s);
5e1e0a3b 638 break;
5ad6bb97 639 case CMD_SELATN:
5e1e0a3b 640 DPRINTF("Select with ATN (%2.2x)\n", val);
f930d07e
BS
641 handle_satn(s);
642 break;
5ad6bb97 643 case CMD_SELATNS:
5e1e0a3b 644 DPRINTF("Select with ATN & stop (%2.2x)\n", val);
f930d07e
BS
645 handle_satn_stop(s);
646 break;
5ad6bb97 647 case CMD_ENSEL:
74ec6048 648 DPRINTF("Enable selection (%2.2x)\n", val);
e3926838 649 s->rregs[ESP_RINTR] = 0;
74ec6048 650 break;
f930d07e 651 default:
8dea1dd4 652 ESP_ERROR("Unhandled ESP command (%2.2x)\n", val);
f930d07e
BS
653 break;
654 }
655 break;
5ad6bb97 656 case ESP_WBUSID ... ESP_WSYNO:
f930d07e 657 break;
5ad6bb97 658 case ESP_CFG1:
4f6200f0
FB
659 s->rregs[saddr] = val;
660 break;
5ad6bb97 661 case ESP_WCCF ... ESP_WTEST:
4f6200f0 662 break;
b44c08fa 663 case ESP_CFG2 ... ESP_RES4:
4f6200f0
FB
664 s->rregs[saddr] = val;
665 break;
6f7e9aec 666 default:
8dea1dd4
BS
667 ESP_ERROR("invalid write of 0x%02x at [0x%x]\n", val, saddr);
668 return;
6f7e9aec 669 }
2f275b8f 670 s->wregs[saddr] = val;
6f7e9aec
FB
671}
672
d60efc6b 673static CPUReadMemoryFunc * const esp_mem_read[3] = {
6f7e9aec 674 esp_mem_readb,
7c560456
BS
675 NULL,
676 NULL,
6f7e9aec
FB
677};
678
d60efc6b 679static CPUWriteMemoryFunc * const esp_mem_write[3] = {
6f7e9aec 680 esp_mem_writeb,
7c560456 681 NULL,
daa41b00 682 esp_mem_writeb,
6f7e9aec
FB
683};
684
cc9952f3
BS
685static const VMStateDescription vmstate_esp = {
686 .name ="esp",
687 .version_id = 3,
688 .minimum_version_id = 3,
689 .minimum_version_id_old = 3,
690 .fields = (VMStateField []) {
691 VMSTATE_BUFFER(rregs, ESPState),
692 VMSTATE_BUFFER(wregs, ESPState),
693 VMSTATE_INT32(ti_size, ESPState),
694 VMSTATE_UINT32(ti_rptr, ESPState),
695 VMSTATE_UINT32(ti_wptr, ESPState),
696 VMSTATE_BUFFER(ti_buf, ESPState),
697 VMSTATE_UINT32(sense, ESPState),
698 VMSTATE_UINT32(dma, ESPState),
699 VMSTATE_BUFFER(cmdbuf, ESPState),
700 VMSTATE_UINT32(cmdlen, ESPState),
701 VMSTATE_UINT32(do_cmd, ESPState),
702 VMSTATE_UINT32(dma_left, ESPState),
703 VMSTATE_END_OF_LIST()
704 }
705};
6f7e9aec 706
c227f099 707void esp_init(target_phys_addr_t espaddr, int it_shift,
ff9868ec
BS
708 ESPDMAMemoryReadWriteFunc dma_memory_read,
709 ESPDMAMemoryReadWriteFunc dma_memory_write,
73d74342
BS
710 void *dma_opaque, qemu_irq irq, qemu_irq *reset,
711 qemu_irq *dma_enable)
6f7e9aec 712{
cfb9de9c
PB
713 DeviceState *dev;
714 SysBusDevice *s;
ee6847d1 715 ESPState *esp;
cfb9de9c
PB
716
717 dev = qdev_create(NULL, "esp");
ee6847d1
GH
718 esp = DO_UPCAST(ESPState, busdev.qdev, dev);
719 esp->dma_memory_read = dma_memory_read;
720 esp->dma_memory_write = dma_memory_write;
721 esp->dma_opaque = dma_opaque;
722 esp->it_shift = it_shift;
73d74342
BS
723 /* XXX for now until rc4030 has been changed to use DMA enable signal */
724 esp->dma_enabled = 1;
e23a1b33 725 qdev_init_nofail(dev);
cfb9de9c
PB
726 s = sysbus_from_qdev(dev);
727 sysbus_connect_irq(s, 0, irq);
728 sysbus_mmio_map(s, 0, espaddr);
74ff8d90 729 *reset = qdev_get_gpio_in(dev, 0);
73d74342 730 *dma_enable = qdev_get_gpio_in(dev, 1);
cfb9de9c 731}
6f7e9aec 732
cfdc1bb0 733static const struct SCSIBusOps esp_scsi_ops = {
94d3f98a
PB
734 .complete = esp_command_complete,
735 .cancel = esp_request_cancelled
cfdc1bb0
PB
736};
737
81a322d4 738static 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
756static 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
767static void esp_register_devices(void)
768{
63235df8 769 sysbus_register_withprop(&esp_info);
cfb9de9c
PB
770}
771
772device_init(esp_register_devices)