pcmcia: CompactFlash driver for PA Semi Electra boards
[pv_ops_mirror.git] / drivers / scsi / arm / acornscsi.c
blobeceacf6d49eacb6da78c9c9e180f3e05ef641345
1 /*
2 * linux/drivers/acorn/scsi/acornscsi.c
4 * Acorn SCSI 3 driver
5 * By R.M.King.
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License version 2 as
9 * published by the Free Software Foundation.
11 * Abandoned using the Select and Transfer command since there were
12 * some nasty races between our software and the target devices that
13 * were not easy to solve, and the device errata had a lot of entries
14 * for this command, some of them quite nasty...
16 * Changelog:
17 * 26-Sep-1997 RMK Re-jigged to use the queue module.
18 * Re-coded state machine to be based on driver
19 * state not scsi state. Should be easier to debug.
20 * Added acornscsi_release to clean up properly.
21 * Updated proc/scsi reporting.
22 * 05-Oct-1997 RMK Implemented writing to SCSI devices.
23 * 06-Oct-1997 RMK Corrected small (non-serious) bug with the connect/
24 * reconnect race condition causing a warning message.
25 * 12-Oct-1997 RMK Added catch for re-entering interrupt routine.
26 * 15-Oct-1997 RMK Improved handling of commands.
27 * 27-Jun-1998 RMK Changed asm/delay.h to linux/delay.h.
28 * 13-Dec-1998 RMK Better abort code and command handling. Extra state
29 * transitions added to allow dodgy devices to work.
31 #define DEBUG_NO_WRITE 1
32 #define DEBUG_QUEUES 2
33 #define DEBUG_DMA 4
34 #define DEBUG_ABORT 8
35 #define DEBUG_DISCON 16
36 #define DEBUG_CONNECT 32
37 #define DEBUG_PHASES 64
38 #define DEBUG_WRITE 128
39 #define DEBUG_LINK 256
40 #define DEBUG_MESSAGES 512
41 #define DEBUG_RESET 1024
42 #define DEBUG_ALL (DEBUG_RESET|DEBUG_MESSAGES|DEBUG_LINK|DEBUG_WRITE|\
43 DEBUG_PHASES|DEBUG_CONNECT|DEBUG_DISCON|DEBUG_ABORT|\
44 DEBUG_DMA|DEBUG_QUEUES)
46 /* DRIVER CONFIGURATION
48 * SCSI-II Tagged queue support.
50 * I don't have any SCSI devices that support it, so it is totally untested
51 * (except to make sure that it doesn't interfere with any non-tagging
52 * devices). It is not fully implemented either - what happens when a
53 * tagging device reconnects???
55 * You can tell if you have a device that supports tagged queueing my
56 * cating (eg) /proc/scsi/acornscsi/0 and see if the SCSI revision is reported
57 * as '2 TAG'.
59 * Also note that CONFIG_SCSI_ACORNSCSI_TAGGED_QUEUE is normally set in the config
60 * scripts, but disabled here. Once debugged, remove the #undef, otherwise to debug,
61 * comment out the undef.
63 #undef CONFIG_SCSI_ACORNSCSI_TAGGED_QUEUE
65 * SCSI-II Linked command support.
67 * The higher level code doesn't support linked commands yet, and so the option
68 * is undef'd here.
70 #undef CONFIG_SCSI_ACORNSCSI_LINK
72 * SCSI-II Synchronous transfer support.
74 * Tried and tested...
76 * SDTR_SIZE - maximum number of un-acknowledged bytes (0 = off, 12 = max)
77 * SDTR_PERIOD - period of REQ signal (min=125, max=1020)
78 * DEFAULT_PERIOD - default REQ period.
80 #define SDTR_SIZE 12
81 #define SDTR_PERIOD 125
82 #define DEFAULT_PERIOD 500
85 * Debugging information
87 * DEBUG - bit mask from list above
88 * DEBUG_TARGET - is defined to the target number if you want to debug
89 * a specific target. [only recon/write/dma].
91 #define DEBUG (DEBUG_RESET|DEBUG_WRITE|DEBUG_NO_WRITE)
92 /* only allow writing to SCSI device 0 */
93 #define NO_WRITE 0xFE
94 /*#define DEBUG_TARGET 2*/
96 * Select timeout time (in 10ms units)
98 * This is the timeout used between the start of selection and the WD33C93
99 * chip deciding that the device isn't responding.
101 #define TIMEOUT_TIME 10
103 * Define this if you want to have verbose explaination of SCSI
104 * status/messages.
106 #undef CONFIG_ACORNSCSI_CONSTANTS
108 * Define this if you want to use the on board DMAC [don't remove this option]
109 * If not set, then use PIO mode (not currently supported).
111 #define USE_DMAC
114 * ====================================================================================
117 #ifdef DEBUG_TARGET
118 #define DBG(cmd,xxx...) \
119 if (cmd->device->id == DEBUG_TARGET) { \
120 xxx; \
122 #else
123 #define DBG(cmd,xxx...) xxx
124 #endif
126 #ifndef STRINGIFY
127 #define STRINGIFY(x) #x
128 #endif
129 #define STRx(x) STRINGIFY(x)
130 #define NO_WRITE_STR STRx(NO_WRITE)
132 #include <linux/module.h>
133 #include <linux/kernel.h>
134 #include <linux/string.h>
135 #include <linux/signal.h>
136 #include <linux/errno.h>
137 #include <linux/proc_fs.h>
138 #include <linux/ioport.h>
139 #include <linux/blkdev.h>
140 #include <linux/delay.h>
141 #include <linux/interrupt.h>
142 #include <linux/init.h>
143 #include <linux/bitops.h>
145 #include <asm/system.h>
146 #include <asm/io.h>
147 #include <asm/ecard.h>
149 #include "../scsi.h"
150 #include <scsi/scsi_dbg.h>
151 #include <scsi/scsi_host.h>
152 #include <scsi/scsi_transport_spi.h>
153 #include "acornscsi.h"
154 #include "msgqueue.h"
155 #include "scsi.h"
157 #include <scsi/scsicam.h>
159 #define VER_MAJOR 2
160 #define VER_MINOR 0
161 #define VER_PATCH 6
163 #ifndef ABORT_TAG
164 #define ABORT_TAG 0xd
165 #else
166 #error "Yippee! ABORT TAG is now defined! Remove this error!"
167 #endif
169 #ifdef CONFIG_SCSI_ACORNSCSI_LINK
170 #error SCSI2 LINKed commands not supported (yet)!
171 #endif
173 #ifdef USE_DMAC
175 * DMAC setup parameters
177 #define INIT_DEVCON0 (DEVCON0_RQL|DEVCON0_EXW|DEVCON0_CMP)
178 #define INIT_DEVCON1 (DEVCON1_BHLD)
179 #define DMAC_READ (MODECON_READ)
180 #define DMAC_WRITE (MODECON_WRITE)
181 #define INIT_SBICDMA (CTRL_DMABURST)
183 #define scsi_xferred have_data_in
186 * Size of on-board DMA buffer
188 #define DMAC_BUFFER_SIZE 65536
189 #endif
191 #define STATUS_BUFFER_TO_PRINT 24
193 unsigned int sdtr_period = SDTR_PERIOD;
194 unsigned int sdtr_size = SDTR_SIZE;
196 static void acornscsi_done(AS_Host *host, struct scsi_cmnd **SCpntp,
197 unsigned int result);
198 static int acornscsi_reconnect_finish(AS_Host *host);
199 static void acornscsi_dma_cleanup(AS_Host *host);
200 static void acornscsi_abortcmd(AS_Host *host, unsigned char tag);
202 /* ====================================================================================
203 * Miscellaneous
206 static inline void
207 sbic_arm_write(unsigned int io_port, int reg, int value)
209 __raw_writeb(reg, io_port);
210 __raw_writeb(value, io_port + 4);
213 #define sbic_arm_writenext(io,val) \
214 __raw_writeb((val), (io) + 4)
216 static inline
217 int sbic_arm_read(unsigned int io_port, int reg)
219 if(reg == SBIC_ASR)
220 return __raw_readl(io_port) & 255;
221 __raw_writeb(reg, io_port);
222 return __raw_readl(io_port + 4) & 255;
225 #define sbic_arm_readnext(io) \
226 __raw_readb((io) + 4)
228 #ifdef USE_DMAC
229 #define dmac_read(io_port,reg) \
230 inb((io_port) + (reg))
232 #define dmac_write(io_port,reg,value) \
233 ({ outb((value), (io_port) + (reg)); })
235 #define dmac_clearintr(io_port) \
236 ({ outb(0, (io_port)); })
238 static inline
239 unsigned int dmac_address(unsigned int io_port)
241 return dmac_read(io_port, DMAC_TXADRHI) << 16 |
242 dmac_read(io_port, DMAC_TXADRMD) << 8 |
243 dmac_read(io_port, DMAC_TXADRLO);
246 static
247 void acornscsi_dumpdma(AS_Host *host, char *where)
249 unsigned int mode, addr, len;
251 mode = dmac_read(host->dma.io_port, DMAC_MODECON);
252 addr = dmac_address(host->dma.io_port);
253 len = dmac_read(host->dma.io_port, DMAC_TXCNTHI) << 8 |
254 dmac_read(host->dma.io_port, DMAC_TXCNTLO);
256 printk("scsi%d: %s: DMAC %02x @%06x+%04x msk %02x, ",
257 host->host->host_no, where,
258 mode, addr, (len + 1) & 0xffff,
259 dmac_read(host->dma.io_port, DMAC_MASKREG));
261 printk("DMA @%06x, ", host->dma.start_addr);
262 printk("BH @%p +%04x, ", host->scsi.SCp.ptr,
263 host->scsi.SCp.this_residual);
264 printk("DT @+%04x ST @+%04x", host->dma.transferred,
265 host->scsi.SCp.scsi_xferred);
266 printk("\n");
268 #endif
270 static
271 unsigned long acornscsi_sbic_xfcount(AS_Host *host)
273 unsigned long length;
275 length = sbic_arm_read(host->scsi.io_port, SBIC_TRANSCNTH) << 16;
276 length |= sbic_arm_readnext(host->scsi.io_port) << 8;
277 length |= sbic_arm_readnext(host->scsi.io_port);
279 return length;
282 static int
283 acornscsi_sbic_wait(AS_Host *host, int stat_mask, int stat, int timeout, char *msg)
285 int asr;
287 do {
288 asr = sbic_arm_read(host->scsi.io_port, SBIC_ASR);
290 if ((asr & stat_mask) == stat)
291 return 0;
293 udelay(1);
294 } while (--timeout);
296 printk("scsi%d: timeout while %s\n", host->host->host_no, msg);
298 return -1;
301 static
302 int acornscsi_sbic_issuecmd(AS_Host *host, int command)
304 if (acornscsi_sbic_wait(host, ASR_CIP, 0, 1000, "issuing command"))
305 return -1;
307 sbic_arm_write(host->scsi.io_port, SBIC_CMND, command);
309 return 0;
312 static void
313 acornscsi_csdelay(unsigned int cs)
315 unsigned long target_jiffies, flags;
317 target_jiffies = jiffies + 1 + cs * HZ / 100;
319 local_save_flags(flags);
320 local_irq_enable();
322 while (time_before(jiffies, target_jiffies)) barrier();
324 local_irq_restore(flags);
327 static
328 void acornscsi_resetcard(AS_Host *host)
330 unsigned int i, timeout;
332 /* assert reset line */
333 host->card.page_reg = 0x80;
334 outb(host->card.page_reg, host->card.io_page);
336 /* wait 3 cs. SCSI standard says 25ms. */
337 acornscsi_csdelay(3);
339 host->card.page_reg = 0;
340 outb(host->card.page_reg, host->card.io_page);
343 * Should get a reset from the card
345 timeout = 1000;
346 do {
347 if (inb(host->card.io_intr) & 8)
348 break;
349 udelay(1);
350 } while (--timeout);
352 if (timeout == 0)
353 printk("scsi%d: timeout while resetting card\n",
354 host->host->host_no);
356 sbic_arm_read(host->scsi.io_port, SBIC_ASR);
357 sbic_arm_read(host->scsi.io_port, SBIC_SSR);
359 /* setup sbic - WD33C93A */
360 sbic_arm_write(host->scsi.io_port, SBIC_OWNID, OWNID_EAF | host->host->this_id);
361 sbic_arm_write(host->scsi.io_port, SBIC_CMND, CMND_RESET);
364 * Command should cause a reset interrupt
366 timeout = 1000;
367 do {
368 if (inb(host->card.io_intr) & 8)
369 break;
370 udelay(1);
371 } while (--timeout);
373 if (timeout == 0)
374 printk("scsi%d: timeout while resetting card\n",
375 host->host->host_no);
377 sbic_arm_read(host->scsi.io_port, SBIC_ASR);
378 if (sbic_arm_read(host->scsi.io_port, SBIC_SSR) != 0x01)
379 printk(KERN_CRIT "scsi%d: WD33C93A didn't give enhanced reset interrupt\n",
380 host->host->host_no);
382 sbic_arm_write(host->scsi.io_port, SBIC_CTRL, INIT_SBICDMA | CTRL_IDI);
383 sbic_arm_write(host->scsi.io_port, SBIC_TIMEOUT, TIMEOUT_TIME);
384 sbic_arm_write(host->scsi.io_port, SBIC_SYNCHTRANSFER, SYNCHTRANSFER_2DBA);
385 sbic_arm_write(host->scsi.io_port, SBIC_SOURCEID, SOURCEID_ER | SOURCEID_DSP);
387 host->card.page_reg = 0x40;
388 outb(host->card.page_reg, host->card.io_page);
390 /* setup dmac - uPC71071 */
391 dmac_write(host->dma.io_port, DMAC_INIT, 0);
392 #ifdef USE_DMAC
393 dmac_write(host->dma.io_port, DMAC_INIT, INIT_8BIT);
394 dmac_write(host->dma.io_port, DMAC_CHANNEL, CHANNEL_0);
395 dmac_write(host->dma.io_port, DMAC_DEVCON0, INIT_DEVCON0);
396 dmac_write(host->dma.io_port, DMAC_DEVCON1, INIT_DEVCON1);
397 #endif
399 host->SCpnt = NULL;
400 host->scsi.phase = PHASE_IDLE;
401 host->scsi.disconnectable = 0;
403 memset(host->busyluns, 0, sizeof(host->busyluns));
405 for (i = 0; i < 8; i++) {
406 host->device[i].sync_state = SYNC_NEGOCIATE;
407 host->device[i].disconnect_ok = 1;
410 /* wait 25 cs. SCSI standard says 250ms. */
411 acornscsi_csdelay(25);
414 /*=============================================================================================
415 * Utility routines (eg. debug)
417 #ifdef CONFIG_ACORNSCSI_CONSTANTS
418 static char *acornscsi_interrupttype[] = {
419 "rst", "suc", "p/a", "3",
420 "term", "5", "6", "7",
421 "serv", "9", "a", "b",
422 "c", "d", "e", "f"
425 static signed char acornscsi_map[] = {
426 0, 1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
427 -1, 2, -1, -1, -1, -1, 3, -1, 4, 5, 6, 7, 8, 9, 10, 11,
428 12, 13, 14, -1, -1, -1, -1, -1, 4, 5, 6, 7, 8, 9, 10, 11,
429 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
430 15, 16, 17, 18, 19, -1, -1, 20, 4, 5, 6, 7, 8, 9, 10, 11,
431 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
432 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
433 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
434 21, 22, -1, -1, -1, 23, -1, -1, 4, 5, 6, 7, 8, 9, 10, 11,
435 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
436 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
437 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
438 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
439 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
440 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
441 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1
444 static char *acornscsi_interruptcode[] = {
445 /* 0 */
446 "reset - normal mode", /* 00 */
447 "reset - advanced mode", /* 01 */
449 /* 2 */
450 "sel", /* 11 */
451 "sel+xfer", /* 16 */
452 "data-out", /* 18 */
453 "data-in", /* 19 */
454 "cmd", /* 1A */
455 "stat", /* 1B */
456 "??-out", /* 1C */
457 "??-in", /* 1D */
458 "msg-out", /* 1E */
459 "msg-in", /* 1F */
461 /* 12 */
462 "/ACK asserted", /* 20 */
463 "save-data-ptr", /* 21 */
464 "{re}sel", /* 22 */
466 /* 15 */
467 "inv cmd", /* 40 */
468 "unexpected disconnect", /* 41 */
469 "sel timeout", /* 42 */
470 "P err", /* 43 */
471 "P err+ATN", /* 44 */
472 "bad status byte", /* 47 */
474 /* 21 */
475 "resel, no id", /* 80 */
476 "resel", /* 81 */
477 "discon", /* 85 */
480 static
481 void print_scsi_status(unsigned int ssr)
483 if (acornscsi_map[ssr] != -1)
484 printk("%s:%s",
485 acornscsi_interrupttype[(ssr >> 4)],
486 acornscsi_interruptcode[acornscsi_map[ssr]]);
487 else
488 printk("%X:%X", ssr >> 4, ssr & 0x0f);
490 #endif
492 static
493 void print_sbic_status(int asr, int ssr, int cmdphase)
495 #ifdef CONFIG_ACORNSCSI_CONSTANTS
496 printk("sbic: %c%c%c%c%c%c ",
497 asr & ASR_INT ? 'I' : 'i',
498 asr & ASR_LCI ? 'L' : 'l',
499 asr & ASR_BSY ? 'B' : 'b',
500 asr & ASR_CIP ? 'C' : 'c',
501 asr & ASR_PE ? 'P' : 'p',
502 asr & ASR_DBR ? 'D' : 'd');
503 printk("scsi: ");
504 print_scsi_status(ssr);
505 printk(" ph %02X\n", cmdphase);
506 #else
507 printk("sbic: %02X scsi: %X:%X ph: %02X\n",
508 asr, (ssr & 0xf0)>>4, ssr & 0x0f, cmdphase);
509 #endif
512 static void
513 acornscsi_dumplogline(AS_Host *host, int target, int line)
515 unsigned long prev;
516 signed int ptr;
518 ptr = host->status_ptr[target] - STATUS_BUFFER_TO_PRINT;
519 if (ptr < 0)
520 ptr += STATUS_BUFFER_SIZE;
522 printk("%c: %3s:", target == 8 ? 'H' : '0' + target,
523 line == 0 ? "ph" : line == 1 ? "ssr" : "int");
525 prev = host->status[target][ptr].when;
527 for (; ptr != host->status_ptr[target]; ptr = (ptr + 1) & (STATUS_BUFFER_SIZE - 1)) {
528 unsigned long time_diff;
530 if (!host->status[target][ptr].when)
531 continue;
533 switch (line) {
534 case 0:
535 printk("%c%02X", host->status[target][ptr].irq ? '-' : ' ',
536 host->status[target][ptr].ph);
537 break;
539 case 1:
540 printk(" %02X", host->status[target][ptr].ssr);
541 break;
543 case 2:
544 time_diff = host->status[target][ptr].when - prev;
545 prev = host->status[target][ptr].when;
546 if (time_diff == 0)
547 printk("==^");
548 else if (time_diff >= 100)
549 printk(" ");
550 else
551 printk(" %02ld", time_diff);
552 break;
556 printk("\n");
559 static
560 void acornscsi_dumplog(AS_Host *host, int target)
562 do {
563 acornscsi_dumplogline(host, target, 0);
564 acornscsi_dumplogline(host, target, 1);
565 acornscsi_dumplogline(host, target, 2);
567 if (target == 8)
568 break;
570 target = 8;
571 } while (1);
574 static
575 char acornscsi_target(AS_Host *host)
577 if (host->SCpnt)
578 return '0' + host->SCpnt->device->id;
579 return 'H';
583 * Prototype: cmdtype_t acornscsi_cmdtype(int command)
584 * Purpose : differentiate READ from WRITE from other commands
585 * Params : command - command to interpret
586 * Returns : CMD_READ - command reads data,
587 * CMD_WRITE - command writes data,
588 * CMD_MISC - everything else
590 static inline
591 cmdtype_t acornscsi_cmdtype(int command)
593 switch (command) {
594 case WRITE_6: case WRITE_10: case WRITE_12:
595 return CMD_WRITE;
596 case READ_6: case READ_10: case READ_12:
597 return CMD_READ;
598 default:
599 return CMD_MISC;
604 * Prototype: int acornscsi_datadirection(int command)
605 * Purpose : differentiate between commands that have a DATA IN phase
606 * and a DATA OUT phase
607 * Params : command - command to interpret
608 * Returns : DATADIR_OUT - data out phase expected
609 * DATADIR_IN - data in phase expected
611 static
612 datadir_t acornscsi_datadirection(int command)
614 switch (command) {
615 case CHANGE_DEFINITION: case COMPARE: case COPY:
616 case COPY_VERIFY: case LOG_SELECT: case MODE_SELECT:
617 case MODE_SELECT_10: case SEND_DIAGNOSTIC: case WRITE_BUFFER:
618 case FORMAT_UNIT: case REASSIGN_BLOCKS: case RESERVE:
619 case SEARCH_EQUAL: case SEARCH_HIGH: case SEARCH_LOW:
620 case WRITE_6: case WRITE_10: case WRITE_VERIFY:
621 case UPDATE_BLOCK: case WRITE_LONG: case WRITE_SAME:
622 case SEARCH_HIGH_12: case SEARCH_EQUAL_12: case SEARCH_LOW_12:
623 case WRITE_12: case WRITE_VERIFY_12: case SET_WINDOW:
624 case MEDIUM_SCAN: case SEND_VOLUME_TAG: case 0xea:
625 return DATADIR_OUT;
626 default:
627 return DATADIR_IN;
632 * Purpose : provide values for synchronous transfers with 33C93.
633 * Copyright: Copyright (c) 1996 John Shifflett, GeoLog Consulting
634 * Modified by Russell King for 8MHz WD33C93A
636 static struct sync_xfer_tbl {
637 unsigned int period_ns;
638 unsigned char reg_value;
639 } sync_xfer_table[] = {
640 { 1, 0x20 }, { 249, 0x20 }, { 374, 0x30 },
641 { 499, 0x40 }, { 624, 0x50 }, { 749, 0x60 },
642 { 874, 0x70 }, { 999, 0x00 }, { 0, 0 }
646 * Prototype: int acornscsi_getperiod(unsigned char syncxfer)
647 * Purpose : period for the synchronous transfer setting
648 * Params : syncxfer SYNCXFER register value
649 * Returns : period in ns.
651 static
652 int acornscsi_getperiod(unsigned char syncxfer)
654 int i;
656 syncxfer &= 0xf0;
657 if (syncxfer == 0x10)
658 syncxfer = 0;
660 for (i = 1; sync_xfer_table[i].period_ns; i++)
661 if (syncxfer == sync_xfer_table[i].reg_value)
662 return sync_xfer_table[i].period_ns;
663 return 0;
667 * Prototype: int round_period(unsigned int period)
668 * Purpose : return index into above table for a required REQ period
669 * Params : period - time (ns) for REQ
670 * Returns : table index
671 * Copyright: Copyright (c) 1996 John Shifflett, GeoLog Consulting
673 static inline
674 int round_period(unsigned int period)
676 int i;
678 for (i = 1; sync_xfer_table[i].period_ns; i++) {
679 if ((period <= sync_xfer_table[i].period_ns) &&
680 (period > sync_xfer_table[i - 1].period_ns))
681 return i;
683 return 7;
687 * Prototype: unsigned char calc_sync_xfer(unsigned int period, unsigned int offset)
688 * Purpose : calculate value for 33c93s SYNC register
689 * Params : period - time (ns) for REQ
690 * offset - offset in bytes between REQ/ACK
691 * Returns : value for SYNC register
692 * Copyright: Copyright (c) 1996 John Shifflett, GeoLog Consulting
694 static
695 unsigned char calc_sync_xfer(unsigned int period, unsigned int offset)
697 return sync_xfer_table[round_period(period)].reg_value |
698 ((offset < SDTR_SIZE) ? offset : SDTR_SIZE);
701 /* ====================================================================================
702 * Command functions
705 * Function: acornscsi_kick(AS_Host *host)
706 * Purpose : kick next command to interface
707 * Params : host - host to send command to
708 * Returns : INTR_IDLE if idle, otherwise INTR_PROCESSING
709 * Notes : interrupts are always disabled!
711 static
712 intr_ret_t acornscsi_kick(AS_Host *host)
714 int from_queue = 0;
715 struct scsi_cmnd *SCpnt;
717 /* first check to see if a command is waiting to be executed */
718 SCpnt = host->origSCpnt;
719 host->origSCpnt = NULL;
721 /* retrieve next command */
722 if (!SCpnt) {
723 SCpnt = queue_remove_exclude(&host->queues.issue, host->busyluns);
724 if (!SCpnt)
725 return INTR_IDLE;
727 from_queue = 1;
730 if (host->scsi.disconnectable && host->SCpnt) {
731 queue_add_cmd_tail(&host->queues.disconnected, host->SCpnt);
732 host->scsi.disconnectable = 0;
733 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
734 DBG(host->SCpnt, printk("scsi%d.%c: moved command to disconnected queue\n",
735 host->host->host_no, acornscsi_target(host)));
736 #endif
737 host->SCpnt = NULL;
741 * If we have an interrupt pending, then we may have been reselected.
742 * In this case, we don't want to write to the registers
744 if (!(sbic_arm_read(host->scsi.io_port, SBIC_ASR) & (ASR_INT|ASR_BSY|ASR_CIP))) {
745 sbic_arm_write(host->scsi.io_port, SBIC_DESTID, SCpnt->device->id);
746 sbic_arm_write(host->scsi.io_port, SBIC_CMND, CMND_SELWITHATN);
750 * claim host busy - all of these must happen atomically wrt
751 * our interrupt routine. Failure means command loss.
753 host->scsi.phase = PHASE_CONNECTING;
754 host->SCpnt = SCpnt;
755 host->scsi.SCp = SCpnt->SCp;
756 host->dma.xfer_setup = 0;
757 host->dma.xfer_required = 0;
758 host->dma.xfer_done = 0;
760 #if (DEBUG & (DEBUG_ABORT|DEBUG_CONNECT))
761 DBG(SCpnt,printk("scsi%d.%c: starting cmd %02X\n",
762 host->host->host_no, '0' + SCpnt->device->id,
763 SCpnt->cmnd[0]));
764 #endif
766 if (from_queue) {
767 #ifdef CONFIG_SCSI_ACORNSCSI_TAGGED_QUEUE
769 * tagged queueing - allocate a new tag to this command
771 if (SCpnt->device->simple_tags) {
772 SCpnt->device->current_tag += 1;
773 if (SCpnt->device->current_tag == 0)
774 SCpnt->device->current_tag = 1;
775 SCpnt->tag = SCpnt->device->current_tag;
776 } else
777 #endif
778 set_bit(SCpnt->device->id * 8 + SCpnt->device->lun, host->busyluns);
780 host->stats.removes += 1;
782 switch (acornscsi_cmdtype(SCpnt->cmnd[0])) {
783 case CMD_WRITE:
784 host->stats.writes += 1;
785 break;
786 case CMD_READ:
787 host->stats.reads += 1;
788 break;
789 case CMD_MISC:
790 host->stats.miscs += 1;
791 break;
795 return INTR_PROCESSING;
799 * Function: void acornscsi_done(AS_Host *host, struct scsi_cmnd **SCpntp, unsigned int result)
800 * Purpose : complete processing for command
801 * Params : host - interface that completed
802 * result - driver byte of result
804 static void acornscsi_done(AS_Host *host, struct scsi_cmnd **SCpntp,
805 unsigned int result)
807 struct scsi_cmnd *SCpnt = *SCpntp;
809 /* clean up */
810 sbic_arm_write(host->scsi.io_port, SBIC_SOURCEID, SOURCEID_ER | SOURCEID_DSP);
812 host->stats.fins += 1;
814 if (SCpnt) {
815 *SCpntp = NULL;
817 acornscsi_dma_cleanup(host);
819 SCpnt->result = result << 16 | host->scsi.SCp.Message << 8 | host->scsi.SCp.Status;
822 * In theory, this should not happen. In practice, it seems to.
823 * Only trigger an error if the device attempts to report all happy
824 * but with untransferred buffers... If we don't do something, then
825 * data loss will occur. Should we check SCpnt->underflow here?
826 * It doesn't appear to be set to something meaningful by the higher
827 * levels all the time.
829 if (result == DID_OK) {
830 int xfer_warn = 0;
832 if (SCpnt->underflow == 0) {
833 if (host->scsi.SCp.ptr &&
834 acornscsi_cmdtype(SCpnt->cmnd[0]) != CMD_MISC)
835 xfer_warn = 1;
836 } else {
837 if (host->scsi.SCp.scsi_xferred < SCpnt->underflow ||
838 host->scsi.SCp.scsi_xferred != host->dma.transferred)
839 xfer_warn = 1;
842 /* ANSI standard says: (SCSI-2 Rev 10c Sect 5.6.6)
843 * Targets which break data transfers into multiple
844 * connections shall end each successful connection
845 * (except possibly the last) with a SAVE DATA
846 * POINTER - DISCONNECT message sequence.
848 * This makes it difficult to ensure that a transfer has
849 * completed. If we reach the end of a transfer during
850 * the command, then we can only have finished the transfer.
851 * therefore, if we seem to have some data remaining, this
852 * is not a problem.
854 if (host->dma.xfer_done)
855 xfer_warn = 0;
857 if (xfer_warn) {
858 switch (status_byte(SCpnt->result)) {
859 case CHECK_CONDITION:
860 case COMMAND_TERMINATED:
861 case BUSY:
862 case QUEUE_FULL:
863 case RESERVATION_CONFLICT:
864 break;
866 default:
867 printk(KERN_ERR "scsi%d.H: incomplete data transfer detected: result=%08X command=",
868 host->host->host_no, SCpnt->result);
869 __scsi_print_command(SCpnt->cmnd);
870 acornscsi_dumpdma(host, "done");
871 acornscsi_dumplog(host, SCpnt->device->id);
872 SCpnt->result &= 0xffff;
873 SCpnt->result |= DID_ERROR << 16;
878 if (!SCpnt->scsi_done)
879 panic("scsi%d.H: null scsi_done function in acornscsi_done", host->host->host_no);
881 clear_bit(SCpnt->device->id * 8 + SCpnt->device->lun, host->busyluns);
883 SCpnt->scsi_done(SCpnt);
884 } else
885 printk("scsi%d: null command in acornscsi_done", host->host->host_no);
887 host->scsi.phase = PHASE_IDLE;
890 /* ====================================================================================
891 * DMA routines
894 * Purpose : update SCSI Data Pointer
895 * Notes : this will only be one SG entry or less
897 static
898 void acornscsi_data_updateptr(AS_Host *host, struct scsi_pointer *SCp, unsigned int length)
900 SCp->ptr += length;
901 SCp->this_residual -= length;
903 if (SCp->this_residual == 0 && next_SCp(SCp) == 0)
904 host->dma.xfer_done = 1;
908 * Prototype: void acornscsi_data_read(AS_Host *host, char *ptr,
909 * unsigned int start_addr, unsigned int length)
910 * Purpose : read data from DMA RAM
911 * Params : host - host to transfer from
912 * ptr - DRAM address
913 * start_addr - host mem address
914 * length - number of bytes to transfer
915 * Notes : this will only be one SG entry or less
917 static
918 void acornscsi_data_read(AS_Host *host, char *ptr,
919 unsigned int start_addr, unsigned int length)
921 extern void __acornscsi_in(int port, char *buf, int len);
922 unsigned int page, offset, len = length;
924 page = (start_addr >> 12);
925 offset = start_addr & ((1 << 12) - 1);
927 outb((page & 0x3f) | host->card.page_reg, host->card.io_page);
929 while (len > 0) {
930 unsigned int this_len;
932 if (len + offset > (1 << 12))
933 this_len = (1 << 12) - offset;
934 else
935 this_len = len;
937 __acornscsi_in(host->card.io_ram + (offset << 1), ptr, this_len);
939 offset += this_len;
940 ptr += this_len;
941 len -= this_len;
943 if (offset == (1 << 12)) {
944 offset = 0;
945 page ++;
946 outb((page & 0x3f) | host->card.page_reg, host->card.io_page);
949 outb(host->card.page_reg, host->card.io_page);
953 * Prototype: void acornscsi_data_write(AS_Host *host, char *ptr,
954 * unsigned int start_addr, unsigned int length)
955 * Purpose : write data to DMA RAM
956 * Params : host - host to transfer from
957 * ptr - DRAM address
958 * start_addr - host mem address
959 * length - number of bytes to transfer
960 * Notes : this will only be one SG entry or less
962 static
963 void acornscsi_data_write(AS_Host *host, char *ptr,
964 unsigned int start_addr, unsigned int length)
966 extern void __acornscsi_out(int port, char *buf, int len);
967 unsigned int page, offset, len = length;
969 page = (start_addr >> 12);
970 offset = start_addr & ((1 << 12) - 1);
972 outb((page & 0x3f) | host->card.page_reg, host->card.io_page);
974 while (len > 0) {
975 unsigned int this_len;
977 if (len + offset > (1 << 12))
978 this_len = (1 << 12) - offset;
979 else
980 this_len = len;
982 __acornscsi_out(host->card.io_ram + (offset << 1), ptr, this_len);
984 offset += this_len;
985 ptr += this_len;
986 len -= this_len;
988 if (offset == (1 << 12)) {
989 offset = 0;
990 page ++;
991 outb((page & 0x3f) | host->card.page_reg, host->card.io_page);
994 outb(host->card.page_reg, host->card.io_page);
997 /* =========================================================================================
998 * On-board DMA routines
1000 #ifdef USE_DMAC
1002 * Prototype: void acornscsi_dmastop(AS_Host *host)
1003 * Purpose : stop all DMA
1004 * Params : host - host on which to stop DMA
1005 * Notes : This is called when leaving DATA IN/OUT phase,
1006 * or when interface is RESET
1008 static inline
1009 void acornscsi_dma_stop(AS_Host *host)
1011 dmac_write(host->dma.io_port, DMAC_MASKREG, MASK_ON);
1012 dmac_clearintr(host->dma.io_intr_clear);
1014 #if (DEBUG & DEBUG_DMA)
1015 DBG(host->SCpnt, acornscsi_dumpdma(host, "stop"));
1016 #endif
1020 * Function: void acornscsi_dma_setup(AS_Host *host, dmadir_t direction)
1021 * Purpose : setup DMA controller for data transfer
1022 * Params : host - host to setup
1023 * direction - data transfer direction
1024 * Notes : This is called when entering DATA I/O phase, not
1025 * while we're in a DATA I/O phase
1027 static
1028 void acornscsi_dma_setup(AS_Host *host, dmadir_t direction)
1030 unsigned int address, length, mode;
1032 host->dma.direction = direction;
1034 dmac_write(host->dma.io_port, DMAC_MASKREG, MASK_ON);
1036 if (direction == DMA_OUT) {
1037 #if (DEBUG & DEBUG_NO_WRITE)
1038 if (NO_WRITE & (1 << host->SCpnt->device->id)) {
1039 printk(KERN_CRIT "scsi%d.%c: I can't handle DMA_OUT!\n",
1040 host->host->host_no, acornscsi_target(host));
1041 return;
1043 #endif
1044 mode = DMAC_WRITE;
1045 } else
1046 mode = DMAC_READ;
1049 * Allocate some buffer space, limited to half the buffer size
1051 length = min_t(unsigned int, host->scsi.SCp.this_residual, DMAC_BUFFER_SIZE / 2);
1052 if (length) {
1053 host->dma.start_addr = address = host->dma.free_addr;
1054 host->dma.free_addr = (host->dma.free_addr + length) &
1055 (DMAC_BUFFER_SIZE - 1);
1058 * Transfer data to DMA memory
1060 if (direction == DMA_OUT)
1061 acornscsi_data_write(host, host->scsi.SCp.ptr, host->dma.start_addr,
1062 length);
1064 length -= 1;
1065 dmac_write(host->dma.io_port, DMAC_TXCNTLO, length);
1066 dmac_write(host->dma.io_port, DMAC_TXCNTHI, length >> 8);
1067 dmac_write(host->dma.io_port, DMAC_TXADRLO, address);
1068 dmac_write(host->dma.io_port, DMAC_TXADRMD, address >> 8);
1069 dmac_write(host->dma.io_port, DMAC_TXADRHI, 0);
1070 dmac_write(host->dma.io_port, DMAC_MODECON, mode);
1071 dmac_write(host->dma.io_port, DMAC_MASKREG, MASK_OFF);
1073 #if (DEBUG & DEBUG_DMA)
1074 DBG(host->SCpnt, acornscsi_dumpdma(host, "strt"));
1075 #endif
1076 host->dma.xfer_setup = 1;
1081 * Function: void acornscsi_dma_cleanup(AS_Host *host)
1082 * Purpose : ensure that all DMA transfers are up-to-date & host->scsi.SCp is correct
1083 * Params : host - host to finish
1084 * Notes : This is called when a command is:
1085 * terminating, RESTORE_POINTERS, SAVE_POINTERS, DISCONECT
1086 * : This must not return until all transfers are completed.
1088 static
1089 void acornscsi_dma_cleanup(AS_Host *host)
1091 dmac_write(host->dma.io_port, DMAC_MASKREG, MASK_ON);
1092 dmac_clearintr(host->dma.io_intr_clear);
1095 * Check for a pending transfer
1097 if (host->dma.xfer_required) {
1098 host->dma.xfer_required = 0;
1099 if (host->dma.direction == DMA_IN)
1100 acornscsi_data_read(host, host->dma.xfer_ptr,
1101 host->dma.xfer_start, host->dma.xfer_length);
1105 * Has a transfer been setup?
1107 if (host->dma.xfer_setup) {
1108 unsigned int transferred;
1110 host->dma.xfer_setup = 0;
1112 #if (DEBUG & DEBUG_DMA)
1113 DBG(host->SCpnt, acornscsi_dumpdma(host, "cupi"));
1114 #endif
1117 * Calculate number of bytes transferred from DMA.
1119 transferred = dmac_address(host->dma.io_port) - host->dma.start_addr;
1120 host->dma.transferred += transferred;
1122 if (host->dma.direction == DMA_IN)
1123 acornscsi_data_read(host, host->scsi.SCp.ptr,
1124 host->dma.start_addr, transferred);
1127 * Update SCSI pointers
1129 acornscsi_data_updateptr(host, &host->scsi.SCp, transferred);
1130 #if (DEBUG & DEBUG_DMA)
1131 DBG(host->SCpnt, acornscsi_dumpdma(host, "cupo"));
1132 #endif
1137 * Function: void acornscsi_dmacintr(AS_Host *host)
1138 * Purpose : handle interrupts from DMAC device
1139 * Params : host - host to process
1140 * Notes : If reading, we schedule the read to main memory &
1141 * allow the transfer to continue.
1142 * : If writing, we fill the onboard DMA memory from main
1143 * memory.
1144 * : Called whenever DMAC finished it's current transfer.
1146 static
1147 void acornscsi_dma_intr(AS_Host *host)
1149 unsigned int address, length, transferred;
1151 #if (DEBUG & DEBUG_DMA)
1152 DBG(host->SCpnt, acornscsi_dumpdma(host, "inti"));
1153 #endif
1155 dmac_write(host->dma.io_port, DMAC_MASKREG, MASK_ON);
1156 dmac_clearintr(host->dma.io_intr_clear);
1159 * Calculate amount transferred via DMA
1161 transferred = dmac_address(host->dma.io_port) - host->dma.start_addr;
1162 host->dma.transferred += transferred;
1165 * Schedule DMA transfer off board
1167 if (host->dma.direction == DMA_IN) {
1168 host->dma.xfer_start = host->dma.start_addr;
1169 host->dma.xfer_length = transferred;
1170 host->dma.xfer_ptr = host->scsi.SCp.ptr;
1171 host->dma.xfer_required = 1;
1174 acornscsi_data_updateptr(host, &host->scsi.SCp, transferred);
1177 * Allocate some buffer space, limited to half the on-board RAM size
1179 length = min_t(unsigned int, host->scsi.SCp.this_residual, DMAC_BUFFER_SIZE / 2);
1180 if (length) {
1181 host->dma.start_addr = address = host->dma.free_addr;
1182 host->dma.free_addr = (host->dma.free_addr + length) &
1183 (DMAC_BUFFER_SIZE - 1);
1186 * Transfer data to DMA memory
1188 if (host->dma.direction == DMA_OUT)
1189 acornscsi_data_write(host, host->scsi.SCp.ptr, host->dma.start_addr,
1190 length);
1192 length -= 1;
1193 dmac_write(host->dma.io_port, DMAC_TXCNTLO, length);
1194 dmac_write(host->dma.io_port, DMAC_TXCNTHI, length >> 8);
1195 dmac_write(host->dma.io_port, DMAC_TXADRLO, address);
1196 dmac_write(host->dma.io_port, DMAC_TXADRMD, address >> 8);
1197 dmac_write(host->dma.io_port, DMAC_TXADRHI, 0);
1198 dmac_write(host->dma.io_port, DMAC_MASKREG, MASK_OFF);
1200 #if (DEBUG & DEBUG_DMA)
1201 DBG(host->SCpnt, acornscsi_dumpdma(host, "into"));
1202 #endif
1203 } else {
1204 host->dma.xfer_setup = 0;
1205 #if 0
1207 * If the interface still wants more, then this is an error.
1208 * We give it another byte, but we also attempt to raise an
1209 * attention condition. We continue giving one byte until
1210 * the device recognises the attention.
1212 if (dmac_read(host->dma.io_port, DMAC_STATUS) & STATUS_RQ0) {
1213 acornscsi_abortcmd(host, host->SCpnt->tag);
1215 dmac_write(host->dma.io_port, DMAC_TXCNTLO, 0);
1216 dmac_write(host->dma.io_port, DMAC_TXCNTHI, 0);
1217 dmac_write(host->dma.io_port, DMAC_TXADRLO, 0);
1218 dmac_write(host->dma.io_port, DMAC_TXADRMD, 0);
1219 dmac_write(host->dma.io_port, DMAC_TXADRHI, 0);
1220 dmac_write(host->dma.io_port, DMAC_MASKREG, MASK_OFF);
1222 #endif
1227 * Function: void acornscsi_dma_xfer(AS_Host *host)
1228 * Purpose : transfer data between AcornSCSI and memory
1229 * Params : host - host to process
1231 static
1232 void acornscsi_dma_xfer(AS_Host *host)
1234 host->dma.xfer_required = 0;
1236 if (host->dma.direction == DMA_IN)
1237 acornscsi_data_read(host, host->dma.xfer_ptr,
1238 host->dma.xfer_start, host->dma.xfer_length);
1242 * Function: void acornscsi_dma_adjust(AS_Host *host)
1243 * Purpose : adjust DMA pointers & count for bytes transferred to
1244 * SBIC but not SCSI bus.
1245 * Params : host - host to adjust DMA count for
1247 static
1248 void acornscsi_dma_adjust(AS_Host *host)
1250 if (host->dma.xfer_setup) {
1251 signed long transferred;
1252 #if (DEBUG & (DEBUG_DMA|DEBUG_WRITE))
1253 DBG(host->SCpnt, acornscsi_dumpdma(host, "adji"));
1254 #endif
1256 * Calculate correct DMA address - DMA is ahead of SCSI bus while
1257 * writing.
1258 * host->scsi.SCp.scsi_xferred is the number of bytes
1259 * actually transferred to/from the SCSI bus.
1260 * host->dma.transferred is the number of bytes transferred
1261 * over DMA since host->dma.start_addr was last set.
1263 * real_dma_addr = host->dma.start_addr + host->scsi.SCp.scsi_xferred
1264 * - host->dma.transferred
1266 transferred = host->scsi.SCp.scsi_xferred - host->dma.transferred;
1267 if (transferred < 0)
1268 printk("scsi%d.%c: Ack! DMA write correction %ld < 0!\n",
1269 host->host->host_no, acornscsi_target(host), transferred);
1270 else if (transferred == 0)
1271 host->dma.xfer_setup = 0;
1272 else {
1273 transferred += host->dma.start_addr;
1274 dmac_write(host->dma.io_port, DMAC_TXADRLO, transferred);
1275 dmac_write(host->dma.io_port, DMAC_TXADRMD, transferred >> 8);
1276 dmac_write(host->dma.io_port, DMAC_TXADRHI, transferred >> 16);
1277 #if (DEBUG & (DEBUG_DMA|DEBUG_WRITE))
1278 DBG(host->SCpnt, acornscsi_dumpdma(host, "adjo"));
1279 #endif
1283 #endif
1285 /* =========================================================================================
1286 * Data I/O
1288 static int
1289 acornscsi_write_pio(AS_Host *host, char *bytes, int *ptr, int len, unsigned int max_timeout)
1291 unsigned int asr, timeout = max_timeout;
1292 int my_ptr = *ptr;
1294 while (my_ptr < len) {
1295 asr = sbic_arm_read(host->scsi.io_port, SBIC_ASR);
1297 if (asr & ASR_DBR) {
1298 timeout = max_timeout;
1300 sbic_arm_write(host->scsi.io_port, SBIC_DATA, bytes[my_ptr++]);
1301 } else if (asr & ASR_INT)
1302 break;
1303 else if (--timeout == 0)
1304 break;
1305 udelay(1);
1308 *ptr = my_ptr;
1310 return (timeout == 0) ? -1 : 0;
1314 * Function: void acornscsi_sendcommand(AS_Host *host)
1315 * Purpose : send a command to a target
1316 * Params : host - host which is connected to target
1318 static void
1319 acornscsi_sendcommand(AS_Host *host)
1321 struct scsi_cmnd *SCpnt = host->SCpnt;
1323 sbic_arm_write(host->scsi.io_port, SBIC_TRANSCNTH, 0);
1324 sbic_arm_writenext(host->scsi.io_port, 0);
1325 sbic_arm_writenext(host->scsi.io_port, SCpnt->cmd_len - host->scsi.SCp.sent_command);
1327 acornscsi_sbic_issuecmd(host, CMND_XFERINFO);
1329 if (acornscsi_write_pio(host, SCpnt->cmnd,
1330 (int *)&host->scsi.SCp.sent_command, SCpnt->cmd_len, 1000000))
1331 printk("scsi%d: timeout while sending command\n", host->host->host_no);
1333 host->scsi.phase = PHASE_COMMAND;
1336 static
1337 void acornscsi_sendmessage(AS_Host *host)
1339 unsigned int message_length = msgqueue_msglength(&host->scsi.msgs);
1340 unsigned int msgnr;
1341 struct message *msg;
1343 #if (DEBUG & DEBUG_MESSAGES)
1344 printk("scsi%d.%c: sending message ",
1345 host->host->host_no, acornscsi_target(host));
1346 #endif
1348 switch (message_length) {
1349 case 0:
1350 acornscsi_sbic_issuecmd(host, CMND_XFERINFO | CMND_SBT);
1352 acornscsi_sbic_wait(host, ASR_DBR, ASR_DBR, 1000, "sending message 1");
1354 sbic_arm_write(host->scsi.io_port, SBIC_DATA, NOP);
1356 host->scsi.last_message = NOP;
1357 #if (DEBUG & DEBUG_MESSAGES)
1358 printk("NOP");
1359 #endif
1360 break;
1362 case 1:
1363 acornscsi_sbic_issuecmd(host, CMND_XFERINFO | CMND_SBT);
1364 msg = msgqueue_getmsg(&host->scsi.msgs, 0);
1366 acornscsi_sbic_wait(host, ASR_DBR, ASR_DBR, 1000, "sending message 2");
1368 sbic_arm_write(host->scsi.io_port, SBIC_DATA, msg->msg[0]);
1370 host->scsi.last_message = msg->msg[0];
1371 #if (DEBUG & DEBUG_MESSAGES)
1372 spi_print_msg(msg->msg);
1373 #endif
1374 break;
1376 default:
1378 * ANSI standard says: (SCSI-2 Rev 10c Sect 5.6.14)
1379 * 'When a target sends this (MESSAGE_REJECT) message, it
1380 * shall change to MESSAGE IN phase and send this message
1381 * prior to requesting additional message bytes from the
1382 * initiator. This provides an interlock so that the
1383 * initiator can determine which message byte is rejected.
1385 sbic_arm_write(host->scsi.io_port, SBIC_TRANSCNTH, 0);
1386 sbic_arm_writenext(host->scsi.io_port, 0);
1387 sbic_arm_writenext(host->scsi.io_port, message_length);
1388 acornscsi_sbic_issuecmd(host, CMND_XFERINFO);
1390 msgnr = 0;
1391 while ((msg = msgqueue_getmsg(&host->scsi.msgs, msgnr++)) != NULL) {
1392 unsigned int i;
1393 #if (DEBUG & DEBUG_MESSAGES)
1394 spi_print_msg(msg);
1395 #endif
1396 i = 0;
1397 if (acornscsi_write_pio(host, msg->msg, &i, msg->length, 1000000))
1398 printk("scsi%d: timeout while sending message\n", host->host->host_no);
1400 host->scsi.last_message = msg->msg[0];
1401 if (msg->msg[0] == EXTENDED_MESSAGE)
1402 host->scsi.last_message |= msg->msg[2] << 8;
1404 if (i != msg->length)
1405 break;
1407 break;
1409 #if (DEBUG & DEBUG_MESSAGES)
1410 printk("\n");
1411 #endif
1415 * Function: void acornscsi_readstatusbyte(AS_Host *host)
1416 * Purpose : Read status byte from connected target
1417 * Params : host - host connected to target
1419 static
1420 void acornscsi_readstatusbyte(AS_Host *host)
1422 acornscsi_sbic_issuecmd(host, CMND_XFERINFO|CMND_SBT);
1423 acornscsi_sbic_wait(host, ASR_DBR, ASR_DBR, 1000, "reading status byte");
1424 host->scsi.SCp.Status = sbic_arm_read(host->scsi.io_port, SBIC_DATA);
1428 * Function: unsigned char acornscsi_readmessagebyte(AS_Host *host)
1429 * Purpose : Read one message byte from connected target
1430 * Params : host - host connected to target
1432 static
1433 unsigned char acornscsi_readmessagebyte(AS_Host *host)
1435 unsigned char message;
1437 acornscsi_sbic_issuecmd(host, CMND_XFERINFO | CMND_SBT);
1439 acornscsi_sbic_wait(host, ASR_DBR, ASR_DBR, 1000, "for message byte");
1441 message = sbic_arm_read(host->scsi.io_port, SBIC_DATA);
1443 /* wait for MSGIN-XFER-PAUSED */
1444 acornscsi_sbic_wait(host, ASR_INT, ASR_INT, 1000, "for interrupt after message byte");
1446 sbic_arm_read(host->scsi.io_port, SBIC_SSR);
1448 return message;
1452 * Function: void acornscsi_message(AS_Host *host)
1453 * Purpose : Read complete message from connected target & action message
1454 * Params : host - host connected to target
1456 static
1457 void acornscsi_message(AS_Host *host)
1459 unsigned char message[16];
1460 unsigned int msgidx = 0, msglen = 1;
1462 do {
1463 message[msgidx] = acornscsi_readmessagebyte(host);
1465 switch (msgidx) {
1466 case 0:
1467 if (message[0] == EXTENDED_MESSAGE ||
1468 (message[0] >= 0x20 && message[0] <= 0x2f))
1469 msglen = 2;
1470 break;
1472 case 1:
1473 if (message[0] == EXTENDED_MESSAGE)
1474 msglen += message[msgidx];
1475 break;
1477 msgidx += 1;
1478 if (msgidx < msglen) {
1479 acornscsi_sbic_issuecmd(host, CMND_NEGATEACK);
1481 /* wait for next msg-in */
1482 acornscsi_sbic_wait(host, ASR_INT, ASR_INT, 1000, "for interrupt after negate ack");
1483 sbic_arm_read(host->scsi.io_port, SBIC_SSR);
1485 } while (msgidx < msglen);
1487 #if (DEBUG & DEBUG_MESSAGES)
1488 printk("scsi%d.%c: message in: ",
1489 host->host->host_no, acornscsi_target(host));
1490 spi_print_msg(message);
1491 printk("\n");
1492 #endif
1494 if (host->scsi.phase == PHASE_RECONNECTED) {
1496 * ANSI standard says: (Section SCSI-2 Rev. 10c Sect 5.6.17)
1497 * 'Whenever a target reconnects to an initiator to continue
1498 * a tagged I/O process, the SIMPLE QUEUE TAG message shall
1499 * be sent immediately following the IDENTIFY message...'
1501 if (message[0] == SIMPLE_QUEUE_TAG)
1502 host->scsi.reconnected.tag = message[1];
1503 if (acornscsi_reconnect_finish(host))
1504 host->scsi.phase = PHASE_MSGIN;
1507 switch (message[0]) {
1508 case ABORT:
1509 case ABORT_TAG:
1510 case COMMAND_COMPLETE:
1511 if (host->scsi.phase != PHASE_STATUSIN) {
1512 printk(KERN_ERR "scsi%d.%c: command complete following non-status in phase?\n",
1513 host->host->host_no, acornscsi_target(host));
1514 acornscsi_dumplog(host, host->SCpnt->device->id);
1516 host->scsi.phase = PHASE_DONE;
1517 host->scsi.SCp.Message = message[0];
1518 break;
1520 case SAVE_POINTERS:
1522 * ANSI standard says: (Section SCSI-2 Rev. 10c Sect 5.6.20)
1523 * 'The SAVE DATA POINTER message is sent from a target to
1524 * direct the initiator to copy the active data pointer to
1525 * the saved data pointer for the current I/O process.
1527 acornscsi_dma_cleanup(host);
1528 host->SCpnt->SCp = host->scsi.SCp;
1529 host->SCpnt->SCp.sent_command = 0;
1530 host->scsi.phase = PHASE_MSGIN;
1531 break;
1533 case RESTORE_POINTERS:
1535 * ANSI standard says: (Section SCSI-2 Rev. 10c Sect 5.6.19)
1536 * 'The RESTORE POINTERS message is sent from a target to
1537 * direct the initiator to copy the most recently saved
1538 * command, data, and status pointers for the I/O process
1539 * to the corresponding active pointers. The command and
1540 * status pointers shall be restored to the beginning of
1541 * the present command and status areas.'
1543 acornscsi_dma_cleanup(host);
1544 host->scsi.SCp = host->SCpnt->SCp;
1545 host->scsi.phase = PHASE_MSGIN;
1546 break;
1548 case DISCONNECT:
1550 * ANSI standard says: (Section SCSI-2 Rev. 10c Sect 6.4.2)
1551 * 'On those occasions when an error or exception condition occurs
1552 * and the target elects to repeat the information transfer, the
1553 * target may repeat the transfer either issuing a RESTORE POINTERS
1554 * message or by disconnecting without issuing a SAVE POINTERS
1555 * message. When reconnection is completed, the most recent
1556 * saved pointer values are restored.'
1558 acornscsi_dma_cleanup(host);
1559 host->scsi.phase = PHASE_DISCONNECT;
1560 break;
1562 case MESSAGE_REJECT:
1563 #if 0 /* this isn't needed any more */
1565 * If we were negociating sync transfer, we don't yet know if
1566 * this REJECT is for the sync transfer or for the tagged queue/wide
1567 * transfer. Re-initiate sync transfer negociation now, and if
1568 * we got a REJECT in response to SDTR, then it'll be set to DONE.
1570 if (host->device[host->SCpnt->device->id].sync_state == SYNC_SENT_REQUEST)
1571 host->device[host->SCpnt->device->id].sync_state = SYNC_NEGOCIATE;
1572 #endif
1575 * If we have any messages waiting to go out, then assert ATN now
1577 if (msgqueue_msglength(&host->scsi.msgs))
1578 acornscsi_sbic_issuecmd(host, CMND_ASSERTATN);
1580 switch (host->scsi.last_message) {
1581 #ifdef CONFIG_SCSI_ACORNSCSI_TAGGED_QUEUE
1582 case HEAD_OF_QUEUE_TAG:
1583 case ORDERED_QUEUE_TAG:
1584 case SIMPLE_QUEUE_TAG:
1586 * ANSI standard says: (Section SCSI-2 Rev. 10c Sect 5.6.17)
1587 * If a target does not implement tagged queuing and a queue tag
1588 * message is received, it shall respond with a MESSAGE REJECT
1589 * message and accept the I/O process as if it were untagged.
1591 printk(KERN_NOTICE "scsi%d.%c: disabling tagged queueing\n",
1592 host->host->host_no, acornscsi_target(host));
1593 host->SCpnt->device->simple_tags = 0;
1594 set_bit(host->SCpnt->device->id * 8 + host->SCpnt->device->lun, host->busyluns);
1595 break;
1596 #endif
1597 case EXTENDED_MESSAGE | (EXTENDED_SDTR << 8):
1599 * Target can't handle synchronous transfers
1601 printk(KERN_NOTICE "scsi%d.%c: Using asynchronous transfer\n",
1602 host->host->host_no, acornscsi_target(host));
1603 host->device[host->SCpnt->device->id].sync_xfer = SYNCHTRANSFER_2DBA;
1604 host->device[host->SCpnt->device->id].sync_state = SYNC_ASYNCHRONOUS;
1605 sbic_arm_write(host->scsi.io_port, SBIC_SYNCHTRANSFER, host->device[host->SCpnt->device->id].sync_xfer);
1606 break;
1608 default:
1609 break;
1611 break;
1613 case QUEUE_FULL:
1614 /* TODO: target queue is full */
1615 break;
1617 case SIMPLE_QUEUE_TAG:
1618 /* tag queue reconnect... message[1] = queue tag. Print something to indicate something happened! */
1619 printk("scsi%d.%c: reconnect queue tag %02X\n",
1620 host->host->host_no, acornscsi_target(host),
1621 message[1]);
1622 break;
1624 case EXTENDED_MESSAGE:
1625 switch (message[2]) {
1626 #ifdef CONFIG_SCSI_ACORNSCSI_SYNC
1627 case EXTENDED_SDTR:
1628 if (host->device[host->SCpnt->device->id].sync_state == SYNC_SENT_REQUEST) {
1630 * We requested synchronous transfers. This isn't quite right...
1631 * We can only say if this succeeded if we proceed on to execute the
1632 * command from this message. If we get a MESSAGE PARITY ERROR,
1633 * and the target retries fail, then we fallback to asynchronous mode
1635 host->device[host->SCpnt->device->id].sync_state = SYNC_COMPLETED;
1636 printk(KERN_NOTICE "scsi%d.%c: Using synchronous transfer, offset %d, %d ns\n",
1637 host->host->host_no, acornscsi_target(host),
1638 message[4], message[3] * 4);
1639 host->device[host->SCpnt->device->id].sync_xfer =
1640 calc_sync_xfer(message[3] * 4, message[4]);
1641 } else {
1642 unsigned char period, length;
1644 * Target requested synchronous transfers. The agreement is only
1645 * to be in operation AFTER the target leaves message out phase.
1647 acornscsi_sbic_issuecmd(host, CMND_ASSERTATN);
1648 period = max_t(unsigned int, message[3], sdtr_period / 4);
1649 length = min_t(unsigned int, message[4], sdtr_size);
1650 msgqueue_addmsg(&host->scsi.msgs, 5, EXTENDED_MESSAGE, 3,
1651 EXTENDED_SDTR, period, length);
1652 host->device[host->SCpnt->device->id].sync_xfer =
1653 calc_sync_xfer(period * 4, length);
1655 sbic_arm_write(host->scsi.io_port, SBIC_SYNCHTRANSFER, host->device[host->SCpnt->device->id].sync_xfer);
1656 break;
1657 #else
1658 /* We do not accept synchronous transfers. Respond with a
1659 * MESSAGE_REJECT.
1661 #endif
1663 case EXTENDED_WDTR:
1664 /* The WD33C93A is only 8-bit. We respond with a MESSAGE_REJECT
1665 * to a wide data transfer request.
1667 default:
1668 acornscsi_sbic_issuecmd(host, CMND_ASSERTATN);
1669 msgqueue_flush(&host->scsi.msgs);
1670 msgqueue_addmsg(&host->scsi.msgs, 1, MESSAGE_REJECT);
1671 break;
1673 break;
1675 #ifdef CONFIG_SCSI_ACORNSCSI_LINK
1676 case LINKED_CMD_COMPLETE:
1677 case LINKED_FLG_CMD_COMPLETE:
1679 * We don't support linked commands yet
1681 if (0) {
1682 #if (DEBUG & DEBUG_LINK)
1683 printk("scsi%d.%c: lun %d tag %d linked command complete\n",
1684 host->host->host_no, acornscsi_target(host), host->SCpnt->tag);
1685 #endif
1687 * A linked command should only terminate with one of these messages
1688 * if there are more linked commands available.
1690 if (!host->SCpnt->next_link) {
1691 printk(KERN_WARNING "scsi%d.%c: lun %d tag %d linked command complete, but no next_link\n",
1692 instance->host_no, acornscsi_target(host), host->SCpnt->tag);
1693 acornscsi_sbic_issuecmd(host, CMND_ASSERTATN);
1694 msgqueue_addmsg(&host->scsi.msgs, 1, ABORT);
1695 } else {
1696 struct scsi_cmnd *SCpnt = host->SCpnt;
1698 acornscsi_dma_cleanup(host);
1700 host->SCpnt = host->SCpnt->next_link;
1701 host->SCpnt->tag = SCpnt->tag;
1702 SCpnt->result = DID_OK | host->scsi.SCp.Message << 8 | host->Scsi.SCp.Status;
1703 SCpnt->done(SCpnt);
1705 /* initialise host->SCpnt->SCp */
1707 break;
1709 #endif
1711 default: /* reject message */
1712 printk(KERN_ERR "scsi%d.%c: unrecognised message %02X, rejecting\n",
1713 host->host->host_no, acornscsi_target(host),
1714 message[0]);
1715 acornscsi_sbic_issuecmd(host, CMND_ASSERTATN);
1716 msgqueue_flush(&host->scsi.msgs);
1717 msgqueue_addmsg(&host->scsi.msgs, 1, MESSAGE_REJECT);
1718 host->scsi.phase = PHASE_MSGIN;
1719 break;
1721 acornscsi_sbic_issuecmd(host, CMND_NEGATEACK);
1725 * Function: int acornscsi_buildmessages(AS_Host *host)
1726 * Purpose : build the connection messages for a host
1727 * Params : host - host to add messages to
1729 static
1730 void acornscsi_buildmessages(AS_Host *host)
1732 #if 0
1733 /* does the device need resetting? */
1734 if (cmd_reset) {
1735 msgqueue_addmsg(&host->scsi.msgs, 1, BUS_DEVICE_RESET);
1736 return;
1738 #endif
1740 msgqueue_addmsg(&host->scsi.msgs, 1,
1741 IDENTIFY(host->device[host->SCpnt->device->id].disconnect_ok,
1742 host->SCpnt->device->lun));
1744 #if 0
1745 /* does the device need the current command aborted */
1746 if (cmd_aborted) {
1747 acornscsi_abortcmd(host->SCpnt->tag);
1748 return;
1750 #endif
1752 #ifdef CONFIG_SCSI_ACORNSCSI_TAGGED_QUEUE
1753 if (host->SCpnt->tag) {
1754 unsigned int tag_type;
1756 if (host->SCpnt->cmnd[0] == REQUEST_SENSE ||
1757 host->SCpnt->cmnd[0] == TEST_UNIT_READY ||
1758 host->SCpnt->cmnd[0] == INQUIRY)
1759 tag_type = HEAD_OF_QUEUE_TAG;
1760 else
1761 tag_type = SIMPLE_QUEUE_TAG;
1762 msgqueue_addmsg(&host->scsi.msgs, 2, tag_type, host->SCpnt->tag);
1764 #endif
1766 #ifdef CONFIG_SCSI_ACORNSCSI_SYNC
1767 if (host->device[host->SCpnt->device->id].sync_state == SYNC_NEGOCIATE) {
1768 host->device[host->SCpnt->device->id].sync_state = SYNC_SENT_REQUEST;
1769 msgqueue_addmsg(&host->scsi.msgs, 5,
1770 EXTENDED_MESSAGE, 3, EXTENDED_SDTR,
1771 sdtr_period / 4, sdtr_size);
1773 #endif
1777 * Function: int acornscsi_starttransfer(AS_Host *host)
1778 * Purpose : transfer data to/from connected target
1779 * Params : host - host to which target is connected
1780 * Returns : 0 if failure
1782 static
1783 int acornscsi_starttransfer(AS_Host *host)
1785 int residual;
1787 if (!host->scsi.SCp.ptr /*&& host->scsi.SCp.this_residual*/) {
1788 printk(KERN_ERR "scsi%d.%c: null buffer passed to acornscsi_starttransfer\n",
1789 host->host->host_no, acornscsi_target(host));
1790 return 0;
1793 residual = host->SCpnt->request_bufflen - host->scsi.SCp.scsi_xferred;
1795 sbic_arm_write(host->scsi.io_port, SBIC_SYNCHTRANSFER, host->device[host->SCpnt->device->id].sync_xfer);
1796 sbic_arm_writenext(host->scsi.io_port, residual >> 16);
1797 sbic_arm_writenext(host->scsi.io_port, residual >> 8);
1798 sbic_arm_writenext(host->scsi.io_port, residual);
1799 acornscsi_sbic_issuecmd(host, CMND_XFERINFO);
1800 return 1;
1803 /* =========================================================================================
1804 * Connection & Disconnection
1807 * Function : acornscsi_reconnect(AS_Host *host)
1808 * Purpose : reconnect a previously disconnected command
1809 * Params : host - host specific data
1810 * Remarks : SCSI spec says:
1811 * 'The set of active pointers is restored from the set
1812 * of saved pointers upon reconnection of the I/O process'
1814 static
1815 int acornscsi_reconnect(AS_Host *host)
1817 unsigned int target, lun, ok = 0;
1819 target = sbic_arm_read(host->scsi.io_port, SBIC_SOURCEID);
1821 if (!(target & 8))
1822 printk(KERN_ERR "scsi%d: invalid source id after reselection "
1823 "- device fault?\n",
1824 host->host->host_no);
1826 target &= 7;
1828 if (host->SCpnt && !host->scsi.disconnectable) {
1829 printk(KERN_ERR "scsi%d.%d: reconnected while command in "
1830 "progress to target %d?\n",
1831 host->host->host_no, target, host->SCpnt->device->id);
1832 host->SCpnt = NULL;
1835 lun = sbic_arm_read(host->scsi.io_port, SBIC_DATA) & 7;
1837 host->scsi.reconnected.target = target;
1838 host->scsi.reconnected.lun = lun;
1839 host->scsi.reconnected.tag = 0;
1841 if (host->scsi.disconnectable && host->SCpnt &&
1842 host->SCpnt->device->id == target && host->SCpnt->device->lun == lun)
1843 ok = 1;
1845 if (!ok && queue_probetgtlun(&host->queues.disconnected, target, lun))
1846 ok = 1;
1848 ADD_STATUS(target, 0x81, host->scsi.phase, 0);
1850 if (ok) {
1851 host->scsi.phase = PHASE_RECONNECTED;
1852 } else {
1853 /* this doesn't seem to work */
1854 printk(KERN_ERR "scsi%d.%c: reselected with no command "
1855 "to reconnect with\n",
1856 host->host->host_no, '0' + target);
1857 acornscsi_dumplog(host, target);
1858 acornscsi_abortcmd(host, 0);
1859 if (host->SCpnt) {
1860 queue_add_cmd_tail(&host->queues.disconnected, host->SCpnt);
1861 host->SCpnt = NULL;
1864 acornscsi_sbic_issuecmd(host, CMND_NEGATEACK);
1865 return !ok;
1869 * Function: int acornscsi_reconect_finish(AS_Host *host)
1870 * Purpose : finish reconnecting a command
1871 * Params : host - host to complete
1872 * Returns : 0 if failed
1874 static
1875 int acornscsi_reconnect_finish(AS_Host *host)
1877 if (host->scsi.disconnectable && host->SCpnt) {
1878 host->scsi.disconnectable = 0;
1879 if (host->SCpnt->device->id == host->scsi.reconnected.target &&
1880 host->SCpnt->device->lun == host->scsi.reconnected.lun &&
1881 host->SCpnt->tag == host->scsi.reconnected.tag) {
1882 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
1883 DBG(host->SCpnt, printk("scsi%d.%c: reconnected",
1884 host->host->host_no, acornscsi_target(host)));
1885 #endif
1886 } else {
1887 queue_add_cmd_tail(&host->queues.disconnected, host->SCpnt);
1888 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
1889 DBG(host->SCpnt, printk("scsi%d.%c: had to move command "
1890 "to disconnected queue\n",
1891 host->host->host_no, acornscsi_target(host)));
1892 #endif
1893 host->SCpnt = NULL;
1896 if (!host->SCpnt) {
1897 host->SCpnt = queue_remove_tgtluntag(&host->queues.disconnected,
1898 host->scsi.reconnected.target,
1899 host->scsi.reconnected.lun,
1900 host->scsi.reconnected.tag);
1901 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
1902 DBG(host->SCpnt, printk("scsi%d.%c: had to get command",
1903 host->host->host_no, acornscsi_target(host)));
1904 #endif
1907 if (!host->SCpnt)
1908 acornscsi_abortcmd(host, host->scsi.reconnected.tag);
1909 else {
1911 * Restore data pointer from SAVED pointers.
1913 host->scsi.SCp = host->SCpnt->SCp;
1914 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
1915 printk(", data pointers: [%p, %X]",
1916 host->scsi.SCp.ptr, host->scsi.SCp.this_residual);
1917 #endif
1919 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
1920 printk("\n");
1921 #endif
1923 host->dma.transferred = host->scsi.SCp.scsi_xferred;
1925 return host->SCpnt != NULL;
1929 * Function: void acornscsi_disconnect_unexpected(AS_Host *host)
1930 * Purpose : handle an unexpected disconnect
1931 * Params : host - host on which disconnect occurred
1933 static
1934 void acornscsi_disconnect_unexpected(AS_Host *host)
1936 printk(KERN_ERR "scsi%d.%c: unexpected disconnect\n",
1937 host->host->host_no, acornscsi_target(host));
1938 #if (DEBUG & DEBUG_ABORT)
1939 acornscsi_dumplog(host, 8);
1940 #endif
1942 acornscsi_done(host, &host->SCpnt, DID_ERROR);
1946 * Function: void acornscsi_abortcmd(AS_host *host, unsigned char tag)
1947 * Purpose : abort a currently executing command
1948 * Params : host - host with connected command to abort
1949 * tag - tag to abort
1951 static
1952 void acornscsi_abortcmd(AS_Host *host, unsigned char tag)
1954 host->scsi.phase = PHASE_ABORTED;
1955 sbic_arm_write(host->scsi.io_port, SBIC_CMND, CMND_ASSERTATN);
1957 msgqueue_flush(&host->scsi.msgs);
1958 #ifdef CONFIG_SCSI_ACORNSCSI_TAGGED_QUEUE
1959 if (tag)
1960 msgqueue_addmsg(&host->scsi.msgs, 2, ABORT_TAG, tag);
1961 else
1962 #endif
1963 msgqueue_addmsg(&host->scsi.msgs, 1, ABORT);
1966 /* ==========================================================================================
1967 * Interrupt routines.
1970 * Function: int acornscsi_sbicintr(AS_Host *host)
1971 * Purpose : handle interrupts from SCSI device
1972 * Params : host - host to process
1973 * Returns : INTR_PROCESS if expecting another SBIC interrupt
1974 * INTR_IDLE if no interrupt
1975 * INTR_NEXT_COMMAND if we have finished processing the command
1977 static
1978 intr_ret_t acornscsi_sbicintr(AS_Host *host, int in_irq)
1980 unsigned int asr, ssr;
1982 asr = sbic_arm_read(host->scsi.io_port, SBIC_ASR);
1983 if (!(asr & ASR_INT))
1984 return INTR_IDLE;
1986 ssr = sbic_arm_read(host->scsi.io_port, SBIC_SSR);
1988 #if (DEBUG & DEBUG_PHASES)
1989 print_sbic_status(asr, ssr, host->scsi.phase);
1990 #endif
1992 ADD_STATUS(8, ssr, host->scsi.phase, in_irq);
1994 if (host->SCpnt && !host->scsi.disconnectable)
1995 ADD_STATUS(host->SCpnt->device->id, ssr, host->scsi.phase, in_irq);
1997 switch (ssr) {
1998 case 0x00: /* reset state - not advanced */
1999 printk(KERN_ERR "scsi%d: reset in standard mode but wanted advanced mode.\n",
2000 host->host->host_no);
2001 /* setup sbic - WD33C93A */
2002 sbic_arm_write(host->scsi.io_port, SBIC_OWNID, OWNID_EAF | host->host->this_id);
2003 sbic_arm_write(host->scsi.io_port, SBIC_CMND, CMND_RESET);
2004 return INTR_IDLE;
2006 case 0x01: /* reset state - advanced */
2007 sbic_arm_write(host->scsi.io_port, SBIC_CTRL, INIT_SBICDMA | CTRL_IDI);
2008 sbic_arm_write(host->scsi.io_port, SBIC_TIMEOUT, TIMEOUT_TIME);
2009 sbic_arm_write(host->scsi.io_port, SBIC_SYNCHTRANSFER, SYNCHTRANSFER_2DBA);
2010 sbic_arm_write(host->scsi.io_port, SBIC_SOURCEID, SOURCEID_ER | SOURCEID_DSP);
2011 msgqueue_flush(&host->scsi.msgs);
2012 return INTR_IDLE;
2014 case 0x41: /* unexpected disconnect aborted command */
2015 acornscsi_disconnect_unexpected(host);
2016 return INTR_NEXT_COMMAND;
2019 switch (host->scsi.phase) {
2020 case PHASE_CONNECTING: /* STATE: command removed from issue queue */
2021 switch (ssr) {
2022 case 0x11: /* -> PHASE_CONNECTED */
2023 /* BUS FREE -> SELECTION */
2024 host->scsi.phase = PHASE_CONNECTED;
2025 msgqueue_flush(&host->scsi.msgs);
2026 host->dma.transferred = host->scsi.SCp.scsi_xferred;
2027 /* 33C93 gives next interrupt indicating bus phase */
2028 asr = sbic_arm_read(host->scsi.io_port, SBIC_ASR);
2029 if (!(asr & ASR_INT))
2030 break;
2031 ssr = sbic_arm_read(host->scsi.io_port, SBIC_SSR);
2032 ADD_STATUS(8, ssr, host->scsi.phase, 1);
2033 ADD_STATUS(host->SCpnt->device->id, ssr, host->scsi.phase, 1);
2034 goto connected;
2036 case 0x42: /* select timed out */
2037 /* -> PHASE_IDLE */
2038 acornscsi_done(host, &host->SCpnt, DID_NO_CONNECT);
2039 return INTR_NEXT_COMMAND;
2041 case 0x81: /* -> PHASE_RECONNECTED or PHASE_ABORTED */
2042 /* BUS FREE -> RESELECTION */
2043 host->origSCpnt = host->SCpnt;
2044 host->SCpnt = NULL;
2045 msgqueue_flush(&host->scsi.msgs);
2046 acornscsi_reconnect(host);
2047 break;
2049 default:
2050 printk(KERN_ERR "scsi%d.%c: PHASE_CONNECTING, SSR %02X?\n",
2051 host->host->host_no, acornscsi_target(host), ssr);
2052 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2053 acornscsi_abortcmd(host, host->SCpnt->tag);
2055 return INTR_PROCESSING;
2057 connected:
2058 case PHASE_CONNECTED: /* STATE: device selected ok */
2059 switch (ssr) {
2060 #ifdef NONSTANDARD
2061 case 0x8a: /* -> PHASE_COMMAND, PHASE_COMMANDPAUSED */
2062 /* SELECTION -> COMMAND */
2063 acornscsi_sendcommand(host);
2064 break;
2066 case 0x8b: /* -> PHASE_STATUS */
2067 /* SELECTION -> STATUS */
2068 acornscsi_readstatusbyte(host);
2069 host->scsi.phase = PHASE_STATUSIN;
2070 break;
2071 #endif
2073 case 0x8e: /* -> PHASE_MSGOUT */
2074 /* SELECTION ->MESSAGE OUT */
2075 host->scsi.phase = PHASE_MSGOUT;
2076 acornscsi_buildmessages(host);
2077 acornscsi_sendmessage(host);
2078 break;
2080 /* these should not happen */
2081 case 0x85: /* target disconnected */
2082 acornscsi_done(host, &host->SCpnt, DID_ERROR);
2083 break;
2085 default:
2086 printk(KERN_ERR "scsi%d.%c: PHASE_CONNECTED, SSR %02X?\n",
2087 host->host->host_no, acornscsi_target(host), ssr);
2088 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2089 acornscsi_abortcmd(host, host->SCpnt->tag);
2091 return INTR_PROCESSING;
2093 case PHASE_MSGOUT: /* STATE: connected & sent IDENTIFY message */
2095 * SCSI standard says that MESSAGE OUT phases can be followed by a
2096 * DATA phase, STATUS phase, MESSAGE IN phase or COMMAND phase
2098 switch (ssr) {
2099 case 0x8a: /* -> PHASE_COMMAND, PHASE_COMMANDPAUSED */
2100 case 0x1a: /* -> PHASE_COMMAND, PHASE_COMMANDPAUSED */
2101 /* MESSAGE OUT -> COMMAND */
2102 acornscsi_sendcommand(host);
2103 break;
2105 case 0x8b: /* -> PHASE_STATUS */
2106 case 0x1b: /* -> PHASE_STATUS */
2107 /* MESSAGE OUT -> STATUS */
2108 acornscsi_readstatusbyte(host);
2109 host->scsi.phase = PHASE_STATUSIN;
2110 break;
2112 case 0x8e: /* -> PHASE_MSGOUT */
2113 /* MESSAGE_OUT(MESSAGE_IN) ->MESSAGE OUT */
2114 acornscsi_sendmessage(host);
2115 break;
2117 case 0x4f: /* -> PHASE_MSGIN, PHASE_DISCONNECT */
2118 case 0x1f: /* -> PHASE_MSGIN, PHASE_DISCONNECT */
2119 /* MESSAGE OUT -> MESSAGE IN */
2120 acornscsi_message(host);
2121 break;
2123 default:
2124 printk(KERN_ERR "scsi%d.%c: PHASE_MSGOUT, SSR %02X?\n",
2125 host->host->host_no, acornscsi_target(host), ssr);
2126 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2128 return INTR_PROCESSING;
2130 case PHASE_COMMAND: /* STATE: connected & command sent */
2131 switch (ssr) {
2132 case 0x18: /* -> PHASE_DATAOUT */
2133 /* COMMAND -> DATA OUT */
2134 if (host->scsi.SCp.sent_command != host->SCpnt->cmd_len)
2135 acornscsi_abortcmd(host, host->SCpnt->tag);
2136 acornscsi_dma_setup(host, DMA_OUT);
2137 if (!acornscsi_starttransfer(host))
2138 acornscsi_abortcmd(host, host->SCpnt->tag);
2139 host->scsi.phase = PHASE_DATAOUT;
2140 return INTR_IDLE;
2142 case 0x19: /* -> PHASE_DATAIN */
2143 /* COMMAND -> DATA IN */
2144 if (host->scsi.SCp.sent_command != host->SCpnt->cmd_len)
2145 acornscsi_abortcmd(host, host->SCpnt->tag);
2146 acornscsi_dma_setup(host, DMA_IN);
2147 if (!acornscsi_starttransfer(host))
2148 acornscsi_abortcmd(host, host->SCpnt->tag);
2149 host->scsi.phase = PHASE_DATAIN;
2150 return INTR_IDLE;
2152 case 0x1b: /* -> PHASE_STATUS */
2153 /* COMMAND -> STATUS */
2154 acornscsi_readstatusbyte(host);
2155 host->scsi.phase = PHASE_STATUSIN;
2156 break;
2158 case 0x1e: /* -> PHASE_MSGOUT */
2159 /* COMMAND -> MESSAGE OUT */
2160 acornscsi_sendmessage(host);
2161 break;
2163 case 0x1f: /* -> PHASE_MSGIN, PHASE_DISCONNECT */
2164 /* COMMAND -> MESSAGE IN */
2165 acornscsi_message(host);
2166 break;
2168 default:
2169 printk(KERN_ERR "scsi%d.%c: PHASE_COMMAND, SSR %02X?\n",
2170 host->host->host_no, acornscsi_target(host), ssr);
2171 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2173 return INTR_PROCESSING;
2175 case PHASE_DISCONNECT: /* STATE: connected, received DISCONNECT msg */
2176 if (ssr == 0x85) { /* -> PHASE_IDLE */
2177 host->scsi.disconnectable = 1;
2178 host->scsi.reconnected.tag = 0;
2179 host->scsi.phase = PHASE_IDLE;
2180 host->stats.disconnects += 1;
2181 } else {
2182 printk(KERN_ERR "scsi%d.%c: PHASE_DISCONNECT, SSR %02X instead of disconnect?\n",
2183 host->host->host_no, acornscsi_target(host), ssr);
2184 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2186 return INTR_NEXT_COMMAND;
2188 case PHASE_IDLE: /* STATE: disconnected */
2189 if (ssr == 0x81) /* -> PHASE_RECONNECTED or PHASE_ABORTED */
2190 acornscsi_reconnect(host);
2191 else {
2192 printk(KERN_ERR "scsi%d.%c: PHASE_IDLE, SSR %02X while idle?\n",
2193 host->host->host_no, acornscsi_target(host), ssr);
2194 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2196 return INTR_PROCESSING;
2198 case PHASE_RECONNECTED: /* STATE: device reconnected to initiator */
2200 * Command reconnected - if MESGIN, get message - it may be
2201 * the tag. If not, get command out of disconnected queue
2204 * If we reconnected and we're not in MESSAGE IN phase after IDENTIFY,
2205 * reconnect I_T_L command
2207 if (ssr != 0x8f && !acornscsi_reconnect_finish(host))
2208 return INTR_IDLE;
2209 ADD_STATUS(host->SCpnt->device->id, ssr, host->scsi.phase, in_irq);
2210 switch (ssr) {
2211 case 0x88: /* data out phase */
2212 /* -> PHASE_DATAOUT */
2213 /* MESSAGE IN -> DATA OUT */
2214 acornscsi_dma_setup(host, DMA_OUT);
2215 if (!acornscsi_starttransfer(host))
2216 acornscsi_abortcmd(host, host->SCpnt->tag);
2217 host->scsi.phase = PHASE_DATAOUT;
2218 return INTR_IDLE;
2220 case 0x89: /* data in phase */
2221 /* -> PHASE_DATAIN */
2222 /* MESSAGE IN -> DATA IN */
2223 acornscsi_dma_setup(host, DMA_IN);
2224 if (!acornscsi_starttransfer(host))
2225 acornscsi_abortcmd(host, host->SCpnt->tag);
2226 host->scsi.phase = PHASE_DATAIN;
2227 return INTR_IDLE;
2229 case 0x8a: /* command out */
2230 /* MESSAGE IN -> COMMAND */
2231 acornscsi_sendcommand(host);/* -> PHASE_COMMAND, PHASE_COMMANDPAUSED */
2232 break;
2234 case 0x8b: /* status in */
2235 /* -> PHASE_STATUSIN */
2236 /* MESSAGE IN -> STATUS */
2237 acornscsi_readstatusbyte(host);
2238 host->scsi.phase = PHASE_STATUSIN;
2239 break;
2241 case 0x8e: /* message out */
2242 /* -> PHASE_MSGOUT */
2243 /* MESSAGE IN -> MESSAGE OUT */
2244 acornscsi_sendmessage(host);
2245 break;
2247 case 0x8f: /* message in */
2248 acornscsi_message(host); /* -> PHASE_MSGIN, PHASE_DISCONNECT */
2249 break;
2251 default:
2252 printk(KERN_ERR "scsi%d.%c: PHASE_RECONNECTED, SSR %02X after reconnect?\n",
2253 host->host->host_no, acornscsi_target(host), ssr);
2254 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2256 return INTR_PROCESSING;
2258 case PHASE_DATAIN: /* STATE: transferred data in */
2260 * This is simple - if we disconnect then the DMA address & count is
2261 * correct.
2263 switch (ssr) {
2264 case 0x19: /* -> PHASE_DATAIN */
2265 case 0x89: /* -> PHASE_DATAIN */
2266 acornscsi_abortcmd(host, host->SCpnt->tag);
2267 return INTR_IDLE;
2269 case 0x1b: /* -> PHASE_STATUSIN */
2270 case 0x4b: /* -> PHASE_STATUSIN */
2271 case 0x8b: /* -> PHASE_STATUSIN */
2272 /* DATA IN -> STATUS */
2273 host->scsi.SCp.scsi_xferred = host->SCpnt->request_bufflen -
2274 acornscsi_sbic_xfcount(host);
2275 acornscsi_dma_stop(host);
2276 acornscsi_readstatusbyte(host);
2277 host->scsi.phase = PHASE_STATUSIN;
2278 break;
2280 case 0x1e: /* -> PHASE_MSGOUT */
2281 case 0x4e: /* -> PHASE_MSGOUT */
2282 case 0x8e: /* -> PHASE_MSGOUT */
2283 /* DATA IN -> MESSAGE OUT */
2284 host->scsi.SCp.scsi_xferred = host->SCpnt->request_bufflen -
2285 acornscsi_sbic_xfcount(host);
2286 acornscsi_dma_stop(host);
2287 acornscsi_sendmessage(host);
2288 break;
2290 case 0x1f: /* message in */
2291 case 0x4f: /* message in */
2292 case 0x8f: /* message in */
2293 /* DATA IN -> MESSAGE IN */
2294 host->scsi.SCp.scsi_xferred = host->SCpnt->request_bufflen -
2295 acornscsi_sbic_xfcount(host);
2296 acornscsi_dma_stop(host);
2297 acornscsi_message(host); /* -> PHASE_MSGIN, PHASE_DISCONNECT */
2298 break;
2300 default:
2301 printk(KERN_ERR "scsi%d.%c: PHASE_DATAIN, SSR %02X?\n",
2302 host->host->host_no, acornscsi_target(host), ssr);
2303 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2305 return INTR_PROCESSING;
2307 case PHASE_DATAOUT: /* STATE: transferred data out */
2309 * This is more complicated - if we disconnect, the DMA could be 12
2310 * bytes ahead of us. We need to correct this.
2312 switch (ssr) {
2313 case 0x18: /* -> PHASE_DATAOUT */
2314 case 0x88: /* -> PHASE_DATAOUT */
2315 acornscsi_abortcmd(host, host->SCpnt->tag);
2316 return INTR_IDLE;
2318 case 0x1b: /* -> PHASE_STATUSIN */
2319 case 0x4b: /* -> PHASE_STATUSIN */
2320 case 0x8b: /* -> PHASE_STATUSIN */
2321 /* DATA OUT -> STATUS */
2322 host->scsi.SCp.scsi_xferred = host->SCpnt->request_bufflen -
2323 acornscsi_sbic_xfcount(host);
2324 acornscsi_dma_stop(host);
2325 acornscsi_dma_adjust(host);
2326 acornscsi_readstatusbyte(host);
2327 host->scsi.phase = PHASE_STATUSIN;
2328 break;
2330 case 0x1e: /* -> PHASE_MSGOUT */
2331 case 0x4e: /* -> PHASE_MSGOUT */
2332 case 0x8e: /* -> PHASE_MSGOUT */
2333 /* DATA OUT -> MESSAGE OUT */
2334 host->scsi.SCp.scsi_xferred = host->SCpnt->request_bufflen -
2335 acornscsi_sbic_xfcount(host);
2336 acornscsi_dma_stop(host);
2337 acornscsi_dma_adjust(host);
2338 acornscsi_sendmessage(host);
2339 break;
2341 case 0x1f: /* message in */
2342 case 0x4f: /* message in */
2343 case 0x8f: /* message in */
2344 /* DATA OUT -> MESSAGE IN */
2345 host->scsi.SCp.scsi_xferred = host->SCpnt->request_bufflen -
2346 acornscsi_sbic_xfcount(host);
2347 acornscsi_dma_stop(host);
2348 acornscsi_dma_adjust(host);
2349 acornscsi_message(host); /* -> PHASE_MSGIN, PHASE_DISCONNECT */
2350 break;
2352 default:
2353 printk(KERN_ERR "scsi%d.%c: PHASE_DATAOUT, SSR %02X?\n",
2354 host->host->host_no, acornscsi_target(host), ssr);
2355 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2357 return INTR_PROCESSING;
2359 case PHASE_STATUSIN: /* STATE: status in complete */
2360 switch (ssr) {
2361 case 0x1f: /* -> PHASE_MSGIN, PHASE_DONE, PHASE_DISCONNECT */
2362 case 0x8f: /* -> PHASE_MSGIN, PHASE_DONE, PHASE_DISCONNECT */
2363 /* STATUS -> MESSAGE IN */
2364 acornscsi_message(host);
2365 break;
2367 case 0x1e: /* -> PHASE_MSGOUT */
2368 case 0x8e: /* -> PHASE_MSGOUT */
2369 /* STATUS -> MESSAGE OUT */
2370 acornscsi_sendmessage(host);
2371 break;
2373 default:
2374 printk(KERN_ERR "scsi%d.%c: PHASE_STATUSIN, SSR %02X instead of MESSAGE_IN?\n",
2375 host->host->host_no, acornscsi_target(host), ssr);
2376 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2378 return INTR_PROCESSING;
2380 case PHASE_MSGIN: /* STATE: message in */
2381 switch (ssr) {
2382 case 0x1e: /* -> PHASE_MSGOUT */
2383 case 0x4e: /* -> PHASE_MSGOUT */
2384 case 0x8e: /* -> PHASE_MSGOUT */
2385 /* MESSAGE IN -> MESSAGE OUT */
2386 acornscsi_sendmessage(host);
2387 break;
2389 case 0x1f: /* -> PHASE_MSGIN, PHASE_DONE, PHASE_DISCONNECT */
2390 case 0x2f:
2391 case 0x4f:
2392 case 0x8f:
2393 acornscsi_message(host);
2394 break;
2396 case 0x85:
2397 printk("scsi%d.%c: strange message in disconnection\n",
2398 host->host->host_no, acornscsi_target(host));
2399 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2400 acornscsi_done(host, &host->SCpnt, DID_ERROR);
2401 break;
2403 default:
2404 printk(KERN_ERR "scsi%d.%c: PHASE_MSGIN, SSR %02X after message in?\n",
2405 host->host->host_no, acornscsi_target(host), ssr);
2406 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2408 return INTR_PROCESSING;
2410 case PHASE_DONE: /* STATE: received status & message */
2411 switch (ssr) {
2412 case 0x85: /* -> PHASE_IDLE */
2413 acornscsi_done(host, &host->SCpnt, DID_OK);
2414 return INTR_NEXT_COMMAND;
2416 case 0x1e:
2417 case 0x8e:
2418 acornscsi_sendmessage(host);
2419 break;
2421 default:
2422 printk(KERN_ERR "scsi%d.%c: PHASE_DONE, SSR %02X instead of disconnect?\n",
2423 host->host->host_no, acornscsi_target(host), ssr);
2424 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2426 return INTR_PROCESSING;
2428 case PHASE_ABORTED:
2429 switch (ssr) {
2430 case 0x85:
2431 if (host->SCpnt)
2432 acornscsi_done(host, &host->SCpnt, DID_ABORT);
2433 else {
2434 clear_bit(host->scsi.reconnected.target * 8 + host->scsi.reconnected.lun,
2435 host->busyluns);
2436 host->scsi.phase = PHASE_IDLE;
2438 return INTR_NEXT_COMMAND;
2440 case 0x1e:
2441 case 0x2e:
2442 case 0x4e:
2443 case 0x8e:
2444 acornscsi_sendmessage(host);
2445 break;
2447 default:
2448 printk(KERN_ERR "scsi%d.%c: PHASE_ABORTED, SSR %02X?\n",
2449 host->host->host_no, acornscsi_target(host), ssr);
2450 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2452 return INTR_PROCESSING;
2454 default:
2455 printk(KERN_ERR "scsi%d.%c: unknown driver phase %d\n",
2456 host->host->host_no, acornscsi_target(host), ssr);
2457 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2459 return INTR_PROCESSING;
2463 * Prototype: void acornscsi_intr(int irq, void *dev_id)
2464 * Purpose : handle interrupts from Acorn SCSI card
2465 * Params : irq - interrupt number
2466 * dev_id - device specific data (AS_Host structure)
2468 static irqreturn_t
2469 acornscsi_intr(int irq, void *dev_id)
2471 AS_Host *host = (AS_Host *)dev_id;
2472 intr_ret_t ret;
2473 int iostatus;
2474 int in_irq = 0;
2476 do {
2477 ret = INTR_IDLE;
2479 iostatus = inb(host->card.io_intr);
2481 if (iostatus & 2) {
2482 acornscsi_dma_intr(host);
2483 iostatus = inb(host->card.io_intr);
2486 if (iostatus & 8)
2487 ret = acornscsi_sbicintr(host, in_irq);
2490 * If we have a transfer pending, start it.
2491 * Only start it if the interface has already started transferring
2492 * it's data
2494 if (host->dma.xfer_required)
2495 acornscsi_dma_xfer(host);
2497 if (ret == INTR_NEXT_COMMAND)
2498 ret = acornscsi_kick(host);
2500 in_irq = 1;
2501 } while (ret != INTR_IDLE);
2503 return IRQ_HANDLED;
2506 /*=============================================================================================
2507 * Interfaces between interrupt handler and rest of scsi code
2511 * Function : acornscsi_queuecmd(struct scsi_cmnd *cmd, void (*done)(struct scsi_cmnd *))
2512 * Purpose : queues a SCSI command
2513 * Params : cmd - SCSI command
2514 * done - function called on completion, with pointer to command descriptor
2515 * Returns : 0, or < 0 on error.
2517 int acornscsi_queuecmd(struct scsi_cmnd *SCpnt,
2518 void (*done)(struct scsi_cmnd *))
2520 AS_Host *host = (AS_Host *)SCpnt->device->host->hostdata;
2522 if (!done) {
2523 /* there should be some way of rejecting errors like this without panicing... */
2524 panic("scsi%d: queuecommand called with NULL done function [cmd=%p]",
2525 host->host->host_no, SCpnt);
2526 return -EINVAL;
2529 #if (DEBUG & DEBUG_NO_WRITE)
2530 if (acornscsi_cmdtype(SCpnt->cmnd[0]) == CMD_WRITE && (NO_WRITE & (1 << SCpnt->device->id))) {
2531 printk(KERN_CRIT "scsi%d.%c: WRITE attempted with NO_WRITE flag set\n",
2532 host->host->host_no, '0' + SCpnt->device->id);
2533 SCpnt->result = DID_NO_CONNECT << 16;
2534 done(SCpnt);
2535 return 0;
2537 #endif
2539 SCpnt->scsi_done = done;
2540 SCpnt->host_scribble = NULL;
2541 SCpnt->result = 0;
2542 SCpnt->tag = 0;
2543 SCpnt->SCp.phase = (int)acornscsi_datadirection(SCpnt->cmnd[0]);
2544 SCpnt->SCp.sent_command = 0;
2545 SCpnt->SCp.scsi_xferred = 0;
2547 init_SCp(SCpnt);
2549 host->stats.queues += 1;
2552 unsigned long flags;
2554 if (!queue_add_cmd_ordered(&host->queues.issue, SCpnt)) {
2555 SCpnt->result = DID_ERROR << 16;
2556 done(SCpnt);
2557 return 0;
2559 local_irq_save(flags);
2560 if (host->scsi.phase == PHASE_IDLE)
2561 acornscsi_kick(host);
2562 local_irq_restore(flags);
2564 return 0;
2568 * Prototype: void acornscsi_reportstatus(struct scsi_cmnd **SCpntp1, struct scsi_cmnd **SCpntp2, int result)
2569 * Purpose : pass a result to *SCpntp1, and check if *SCpntp1 = *SCpntp2
2570 * Params : SCpntp1 - pointer to command to return
2571 * SCpntp2 - pointer to command to check
2572 * result - result to pass back to mid-level done function
2573 * Returns : *SCpntp2 = NULL if *SCpntp1 is the same command structure as *SCpntp2.
2575 static inline void acornscsi_reportstatus(struct scsi_cmnd **SCpntp1,
2576 struct scsi_cmnd **SCpntp2,
2577 int result)
2579 struct scsi_cmnd *SCpnt = *SCpntp1;
2581 if (SCpnt) {
2582 *SCpntp1 = NULL;
2584 SCpnt->result = result;
2585 SCpnt->scsi_done(SCpnt);
2588 if (SCpnt == *SCpntp2)
2589 *SCpntp2 = NULL;
2592 enum res_abort { res_not_running, res_success, res_success_clear, res_snooze };
2595 * Prototype: enum res acornscsi_do_abort(struct scsi_cmnd *SCpnt)
2596 * Purpose : abort a command on this host
2597 * Params : SCpnt - command to abort
2598 * Returns : our abort status
2600 static enum res_abort acornscsi_do_abort(AS_Host *host, struct scsi_cmnd *SCpnt)
2602 enum res_abort res = res_not_running;
2604 if (queue_remove_cmd(&host->queues.issue, SCpnt)) {
2606 * The command was on the issue queue, and has not been
2607 * issued yet. We can remove the command from the queue,
2608 * and acknowledge the abort. Neither the devices nor the
2609 * interface know about the command.
2611 //#if (DEBUG & DEBUG_ABORT)
2612 printk("on issue queue ");
2613 //#endif
2614 res = res_success;
2615 } else if (queue_remove_cmd(&host->queues.disconnected, SCpnt)) {
2617 * The command was on the disconnected queue. Simply
2618 * acknowledge the abort condition, and when the target
2619 * reconnects, we will give it an ABORT message. The
2620 * target should then disconnect, and we will clear
2621 * the busylun bit.
2623 //#if (DEBUG & DEBUG_ABORT)
2624 printk("on disconnected queue ");
2625 //#endif
2626 res = res_success;
2627 } else if (host->SCpnt == SCpnt) {
2628 unsigned long flags;
2630 //#if (DEBUG & DEBUG_ABORT)
2631 printk("executing ");
2632 //#endif
2634 local_irq_save(flags);
2635 switch (host->scsi.phase) {
2637 * If the interface is idle, and the command is 'disconnectable',
2638 * then it is the same as on the disconnected queue. We simply
2639 * remove all traces of the command. When the target reconnects,
2640 * we will give it an ABORT message since the command could not
2641 * be found. When the target finally disconnects, we will clear
2642 * the busylun bit.
2644 case PHASE_IDLE:
2645 if (host->scsi.disconnectable) {
2646 host->scsi.disconnectable = 0;
2647 host->SCpnt = NULL;
2648 res = res_success;
2650 break;
2653 * If the command has connected and done nothing further,
2654 * simply force a disconnect. We also need to clear the
2655 * busylun bit.
2657 case PHASE_CONNECTED:
2658 sbic_arm_write(host->scsi.io_port, SBIC_CMND, CMND_DISCONNECT);
2659 host->SCpnt = NULL;
2660 res = res_success_clear;
2661 break;
2663 default:
2664 acornscsi_abortcmd(host, host->SCpnt->tag);
2665 res = res_snooze;
2667 local_irq_restore(flags);
2668 } else if (host->origSCpnt == SCpnt) {
2670 * The command will be executed next, but a command
2671 * is currently using the interface. This is similar to
2672 * being on the issue queue, except the busylun bit has
2673 * been set.
2675 host->origSCpnt = NULL;
2676 //#if (DEBUG & DEBUG_ABORT)
2677 printk("waiting for execution ");
2678 //#endif
2679 res = res_success_clear;
2680 } else
2681 printk("unknown ");
2683 return res;
2687 * Prototype: int acornscsi_abort(struct scsi_cmnd *SCpnt)
2688 * Purpose : abort a command on this host
2689 * Params : SCpnt - command to abort
2690 * Returns : one of SCSI_ABORT_ macros
2692 int acornscsi_abort(struct scsi_cmnd *SCpnt)
2694 AS_Host *host = (AS_Host *) SCpnt->device->host->hostdata;
2695 int result;
2697 host->stats.aborts += 1;
2699 #if (DEBUG & DEBUG_ABORT)
2701 int asr, ssr;
2702 asr = sbic_arm_read(host->scsi.io_port, SBIC_ASR);
2703 ssr = sbic_arm_read(host->scsi.io_port, SBIC_SSR);
2705 printk(KERN_WARNING "acornscsi_abort: ");
2706 print_sbic_status(asr, ssr, host->scsi.phase);
2707 acornscsi_dumplog(host, SCpnt->device->id);
2709 #endif
2711 printk("scsi%d: ", host->host->host_no);
2713 switch (acornscsi_do_abort(host, SCpnt)) {
2715 * We managed to find the command and cleared it out.
2716 * We do not expect the command to be executing on the
2717 * target, but we have set the busylun bit.
2719 case res_success_clear:
2720 //#if (DEBUG & DEBUG_ABORT)
2721 printk("clear ");
2722 //#endif
2723 clear_bit(SCpnt->device->id * 8 + SCpnt->device->lun, host->busyluns);
2726 * We found the command, and cleared it out. Either
2727 * the command is still known to be executing on the
2728 * target, or the busylun bit is not set.
2730 case res_success:
2731 //#if (DEBUG & DEBUG_ABORT)
2732 printk("success\n");
2733 //#endif
2734 SCpnt->result = DID_ABORT << 16;
2735 SCpnt->scsi_done(SCpnt);
2736 result = SCSI_ABORT_SUCCESS;
2737 break;
2740 * We did find the command, but unfortunately we couldn't
2741 * unhook it from ourselves. Wait some more, and if it
2742 * still doesn't complete, reset the interface.
2744 case res_snooze:
2745 //#if (DEBUG & DEBUG_ABORT)
2746 printk("snooze\n");
2747 //#endif
2748 result = SCSI_ABORT_SNOOZE;
2749 break;
2752 * The command could not be found (either because it completed,
2753 * or it got dropped.
2755 default:
2756 case res_not_running:
2757 acornscsi_dumplog(host, SCpnt->device->id);
2758 #if (DEBUG & DEBUG_ABORT)
2759 result = SCSI_ABORT_SNOOZE;
2760 #else
2761 result = SCSI_ABORT_NOT_RUNNING;
2762 #endif
2763 //#if (DEBUG & DEBUG_ABORT)
2764 printk("not running\n");
2765 //#endif
2766 break;
2769 return result;
2773 * Prototype: int acornscsi_reset(struct scsi_cmnd *SCpnt, unsigned int reset_flags)
2774 * Purpose : reset a command on this host/reset this host
2775 * Params : SCpnt - command causing reset
2776 * result - what type of reset to perform
2777 * Returns : one of SCSI_RESET_ macros
2779 int acornscsi_reset(struct scsi_cmnd *SCpnt, unsigned int reset_flags)
2781 AS_Host *host = (AS_Host *)SCpnt->device->host->hostdata;
2782 struct scsi_cmnd *SCptr;
2784 host->stats.resets += 1;
2786 #if (DEBUG & DEBUG_RESET)
2788 int asr, ssr;
2790 asr = sbic_arm_read(host->scsi.io_port, SBIC_ASR);
2791 ssr = sbic_arm_read(host->scsi.io_port, SBIC_SSR);
2793 printk(KERN_WARNING "acornscsi_reset: ");
2794 print_sbic_status(asr, ssr, host->scsi.phase);
2795 acornscsi_dumplog(host, SCpnt->device->id);
2797 #endif
2799 acornscsi_dma_stop(host);
2801 SCptr = host->SCpnt;
2804 * do hard reset. This resets all devices on this host, and so we
2805 * must set the reset status on all commands.
2807 acornscsi_resetcard(host);
2810 * report reset on commands current connected/disconnected
2812 acornscsi_reportstatus(&host->SCpnt, &SCptr, DID_RESET);
2814 while ((SCptr = queue_remove(&host->queues.disconnected)) != NULL)
2815 acornscsi_reportstatus(&SCptr, &SCpnt, DID_RESET);
2817 if (SCpnt) {
2818 SCpnt->result = DID_RESET << 16;
2819 SCpnt->scsi_done(SCpnt);
2822 return SCSI_RESET_BUS_RESET | SCSI_RESET_HOST_RESET | SCSI_RESET_SUCCESS;
2825 /*==============================================================================================
2826 * initialisation & miscellaneous support
2830 * Function: char *acornscsi_info(struct Scsi_Host *host)
2831 * Purpose : return a string describing this interface
2832 * Params : host - host to give information on
2833 * Returns : a constant string
2835 const
2836 char *acornscsi_info(struct Scsi_Host *host)
2838 static char string[100], *p;
2840 p = string;
2842 p += sprintf(string, "%s at port %08lX irq %d v%d.%d.%d"
2843 #ifdef CONFIG_SCSI_ACORNSCSI_SYNC
2844 " SYNC"
2845 #endif
2846 #ifdef CONFIG_SCSI_ACORNSCSI_TAGGED_QUEUE
2847 " TAG"
2848 #endif
2849 #ifdef CONFIG_SCSI_ACORNSCSI_LINK
2850 " LINK"
2851 #endif
2852 #if (DEBUG & DEBUG_NO_WRITE)
2853 " NOWRITE ("NO_WRITE_STR")"
2854 #endif
2855 , host->hostt->name, host->io_port, host->irq,
2856 VER_MAJOR, VER_MINOR, VER_PATCH);
2857 return string;
2860 int acornscsi_proc_info(struct Scsi_Host *instance, char *buffer, char **start, off_t offset,
2861 int length, int inout)
2863 int pos, begin = 0, devidx;
2864 struct scsi_device *scd;
2865 AS_Host *host;
2866 char *p = buffer;
2868 if (inout == 1)
2869 return -EINVAL;
2871 host = (AS_Host *)instance->hostdata;
2873 p += sprintf(p, "AcornSCSI driver v%d.%d.%d"
2874 #ifdef CONFIG_SCSI_ACORNSCSI_SYNC
2875 " SYNC"
2876 #endif
2877 #ifdef CONFIG_SCSI_ACORNSCSI_TAGGED_QUEUE
2878 " TAG"
2879 #endif
2880 #ifdef CONFIG_SCSI_ACORNSCSI_LINK
2881 " LINK"
2882 #endif
2883 #if (DEBUG & DEBUG_NO_WRITE)
2884 " NOWRITE ("NO_WRITE_STR")"
2885 #endif
2886 "\n\n", VER_MAJOR, VER_MINOR, VER_PATCH);
2888 p += sprintf(p, "SBIC: WD33C93A Address: %08X IRQ : %d\n",
2889 host->scsi.io_port, host->scsi.irq);
2890 #ifdef USE_DMAC
2891 p += sprintf(p, "DMAC: uPC71071 Address: %08X IRQ : %d\n\n",
2892 host->dma.io_port, host->scsi.irq);
2893 #endif
2895 p += sprintf(p, "Statistics:\n"
2896 "Queued commands: %-10u Issued commands: %-10u\n"
2897 "Done commands : %-10u Reads : %-10u\n"
2898 "Writes : %-10u Others : %-10u\n"
2899 "Disconnects : %-10u Aborts : %-10u\n"
2900 "Resets : %-10u\n\nLast phases:",
2901 host->stats.queues, host->stats.removes,
2902 host->stats.fins, host->stats.reads,
2903 host->stats.writes, host->stats.miscs,
2904 host->stats.disconnects, host->stats.aborts,
2905 host->stats.resets);
2907 for (devidx = 0; devidx < 9; devidx ++) {
2908 unsigned int statptr, prev;
2910 p += sprintf(p, "\n%c:", devidx == 8 ? 'H' : ('0' + devidx));
2911 statptr = host->status_ptr[devidx] - 10;
2913 if ((signed int)statptr < 0)
2914 statptr += STATUS_BUFFER_SIZE;
2916 prev = host->status[devidx][statptr].when;
2918 for (; statptr != host->status_ptr[devidx]; statptr = (statptr + 1) & (STATUS_BUFFER_SIZE - 1)) {
2919 if (host->status[devidx][statptr].when) {
2920 p += sprintf(p, "%c%02X:%02X+%2ld",
2921 host->status[devidx][statptr].irq ? '-' : ' ',
2922 host->status[devidx][statptr].ph,
2923 host->status[devidx][statptr].ssr,
2924 (host->status[devidx][statptr].when - prev) < 100 ?
2925 (host->status[devidx][statptr].when - prev) : 99);
2926 prev = host->status[devidx][statptr].when;
2931 p += sprintf(p, "\nAttached devices:\n");
2933 shost_for_each_device(scd, instance) {
2934 p += sprintf(p, "Device/Lun TaggedQ Sync\n");
2935 p += sprintf(p, " %d/%d ", scd->id, scd->lun);
2936 if (scd->tagged_supported)
2937 p += sprintf(p, "%3sabled(%3d) ",
2938 scd->simple_tags ? "en" : "dis",
2939 scd->current_tag);
2940 else
2941 p += sprintf(p, "unsupported ");
2943 if (host->device[scd->id].sync_xfer & 15)
2944 p += sprintf(p, "offset %d, %d ns\n",
2945 host->device[scd->id].sync_xfer & 15,
2946 acornscsi_getperiod(host->device[scd->id].sync_xfer));
2947 else
2948 p += sprintf(p, "async\n");
2950 pos = p - buffer;
2951 if (pos + begin < offset) {
2952 begin += pos;
2953 p = buffer;
2955 pos = p - buffer;
2956 if (pos + begin > offset + length) {
2957 scsi_device_put(scd);
2958 break;
2962 pos = p - buffer;
2964 *start = buffer + (offset - begin);
2965 pos -= offset - begin;
2967 if (pos > length)
2968 pos = length;
2970 return pos;
2973 static struct scsi_host_template acornscsi_template = {
2974 .module = THIS_MODULE,
2975 .proc_info = acornscsi_proc_info,
2976 .name = "AcornSCSI",
2977 .info = acornscsi_info,
2978 .queuecommand = acornscsi_queuecmd,
2979 #warning fixme
2980 .abort = acornscsi_abort,
2981 .reset = acornscsi_reset,
2982 .can_queue = 16,
2983 .this_id = 7,
2984 .sg_tablesize = SG_ALL,
2985 .cmd_per_lun = 2,
2986 .unchecked_isa_dma = 0,
2987 .use_clustering = DISABLE_CLUSTERING,
2988 .proc_name = "acornscsi",
2991 static int __devinit
2992 acornscsi_probe(struct expansion_card *ec, const struct ecard_id *id)
2994 struct Scsi_Host *host;
2995 AS_Host *ashost;
2996 int ret = -ENOMEM;
2998 host = scsi_host_alloc(&acornscsi_template, sizeof(AS_Host));
2999 if (!host)
3000 goto out;
3002 ashost = (AS_Host *)host->hostdata;
3004 host->io_port = ecard_address(ec, ECARD_MEMC, 0);
3005 host->irq = ec->irq;
3007 ashost->host = host;
3008 ashost->scsi.io_port = ioaddr(host->io_port + 0x800);
3009 ashost->scsi.irq = host->irq;
3010 ashost->card.io_intr = POD_SPACE(host->io_port) + 0x800;
3011 ashost->card.io_page = POD_SPACE(host->io_port) + 0xc00;
3012 ashost->card.io_ram = ioaddr(host->io_port);
3013 ashost->dma.io_port = host->io_port + 0xc00;
3014 ashost->dma.io_intr_clear = POD_SPACE(host->io_port) + 0x800;
3016 ec->irqaddr = (char *)ioaddr(ashost->card.io_intr);
3017 ec->irqmask = 0x0a;
3019 ret = -EBUSY;
3020 if (!request_region(host->io_port + 0x800, 2, "acornscsi(sbic)"))
3021 goto err_1;
3022 if (!request_region(ashost->card.io_intr, 1, "acornscsi(intr)"))
3023 goto err_2;
3024 if (!request_region(ashost->card.io_page, 1, "acornscsi(page)"))
3025 goto err_3;
3026 #ifdef USE_DMAC
3027 if (!request_region(ashost->dma.io_port, 256, "acornscsi(dmac)"))
3028 goto err_4;
3029 #endif
3030 if (!request_region(host->io_port, 2048, "acornscsi(ram)"))
3031 goto err_5;
3033 ret = request_irq(host->irq, acornscsi_intr, IRQF_DISABLED, "acornscsi", ashost);
3034 if (ret) {
3035 printk(KERN_CRIT "scsi%d: IRQ%d not free: %d\n",
3036 host->host_no, ashost->scsi.irq, ret);
3037 goto err_6;
3040 memset(&ashost->stats, 0, sizeof (ashost->stats));
3041 queue_initialise(&ashost->queues.issue);
3042 queue_initialise(&ashost->queues.disconnected);
3043 msgqueue_initialise(&ashost->scsi.msgs);
3045 acornscsi_resetcard(ashost);
3047 ret = scsi_add_host(host, &ec->dev);
3048 if (ret)
3049 goto err_7;
3051 scsi_scan_host(host);
3052 goto out;
3054 err_7:
3055 free_irq(host->irq, ashost);
3056 err_6:
3057 release_region(host->io_port, 2048);
3058 err_5:
3059 #ifdef USE_DMAC
3060 release_region(ashost->dma.io_port, 256);
3061 #endif
3062 err_4:
3063 release_region(ashost->card.io_page, 1);
3064 err_3:
3065 release_region(ashost->card.io_intr, 1);
3066 err_2:
3067 release_region(host->io_port + 0x800, 2);
3068 err_1:
3069 scsi_host_put(host);
3070 out:
3071 return ret;
3074 static void __devexit acornscsi_remove(struct expansion_card *ec)
3076 struct Scsi_Host *host = ecard_get_drvdata(ec);
3077 AS_Host *ashost = (AS_Host *)host->hostdata;
3079 ecard_set_drvdata(ec, NULL);
3080 scsi_remove_host(host);
3083 * Put card into RESET state
3085 outb(0x80, ashost->card.io_page);
3087 free_irq(host->irq, ashost);
3089 release_region(host->io_port + 0x800, 2);
3090 release_region(ashost->card.io_intr, 1);
3091 release_region(ashost->card.io_page, 1);
3092 release_region(ashost->dma.io_port, 256);
3093 release_region(host->io_port, 2048);
3095 msgqueue_free(&ashost->scsi.msgs);
3096 queue_free(&ashost->queues.disconnected);
3097 queue_free(&ashost->queues.issue);
3098 scsi_host_put(host);
3101 static const struct ecard_id acornscsi_cids[] = {
3102 { MANU_ACORN, PROD_ACORN_SCSI },
3103 { 0xffff, 0xffff },
3106 static struct ecard_driver acornscsi_driver = {
3107 .probe = acornscsi_probe,
3108 .remove = __devexit_p(acornscsi_remove),
3109 .id_table = acornscsi_cids,
3110 .drv = {
3111 .name = "acornscsi",
3115 static int __init acornscsi_init(void)
3117 return ecard_register_driver(&acornscsi_driver);
3120 static void __exit acornscsi_exit(void)
3122 ecard_remove_driver(&acornscsi_driver);
3125 module_init(acornscsi_init);
3126 module_exit(acornscsi_exit);
3128 MODULE_AUTHOR("Russell King");
3129 MODULE_DESCRIPTION("AcornSCSI driver");
3130 MODULE_LICENSE("GPL");