1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3 * linux/drivers/acorn/scsi/acornscsi.c
4 *
5 * Acorn SCSI 3 driver
6 * By R.M.King.
7 *
8 * Abandoned using the Select and Transfer command since there were
9 * some nasty races between our software and the target devices that
10 * were not easy to solve, and the device errata had a lot of entries
11 * for this command, some of them quite nasty...
12 *
13 * Changelog:
14 * 26-Sep-1997 RMK Re-jigged to use the queue module.
15 * Re-coded state machine to be based on driver
16 * state not scsi state. Should be easier to debug.
17 * Added acornscsi_release to clean up properly.
18 * Updated proc/scsi reporting.
19 * 05-Oct-1997 RMK Implemented writing to SCSI devices.
20 * 06-Oct-1997 RMK Corrected small (non-serious) bug with the connect/
21 * reconnect race condition causing a warning message.
22 * 12-Oct-1997 RMK Added catch for re-entering interrupt routine.
23 * 15-Oct-1997 RMK Improved handling of commands.
24 * 27-Jun-1998 RMK Changed asm/delay.h to linux/delay.h.
25 * 13-Dec-1998 RMK Better abort code and command handling. Extra state
26 * transitions added to allow dodgy devices to work.
27 */
28 #define DEBUG_NO_WRITE 1
29 #define DEBUG_QUEUES 2
30 #define DEBUG_DMA 4
31 #define DEBUG_ABORT 8
32 #define DEBUG_DISCON 16
33 #define DEBUG_CONNECT 32
34 #define DEBUG_PHASES 64
35 #define DEBUG_WRITE 128
36 #define DEBUG_LINK 256
37 #define DEBUG_MESSAGES 512
38 #define DEBUG_RESET 1024
39 #define DEBUG_ALL (DEBUG_RESET|DEBUG_MESSAGES|DEBUG_LINK|DEBUG_WRITE|\
40 DEBUG_PHASES|DEBUG_CONNECT|DEBUG_DISCON|DEBUG_ABORT|\
41 DEBUG_DMA|DEBUG_QUEUES)
42
43 /* DRIVER CONFIGURATION
44 *
45 * SCSI-II Tagged queue support.
46 *
47 * I don't have any SCSI devices that support it, so it is totally untested
48 * (except to make sure that it doesn't interfere with any non-tagging
49 * devices). It is not fully implemented either - what happens when a
50 * tagging device reconnects???
51 *
52 * You can tell if you have a device that supports tagged queueing my
53 * cating (eg) /proc/scsi/acornscsi/0 and see if the SCSI revision is reported
54 * as '2 TAG'.
55 */
56
57 /*
58 * SCSI-II Synchronous transfer support.
59 *
60 * Tried and tested...
61 *
62 * SDTR_SIZE - maximum number of un-acknowledged bytes (0 = off, 12 = max)
63 * SDTR_PERIOD - period of REQ signal (min=125, max=1020)
64 * DEFAULT_PERIOD - default REQ period.
65 */
66 #define SDTR_SIZE 12
67 #define SDTR_PERIOD 125
68 #define DEFAULT_PERIOD 500
69
70 /*
71 * Debugging information
72 *
73 * DEBUG - bit mask from list above
74 * DEBUG_TARGET - is defined to the target number if you want to debug
75 * a specific target. [only recon/write/dma].
76 */
77 #define DEBUG (DEBUG_RESET|DEBUG_WRITE|DEBUG_NO_WRITE)
78 /* only allow writing to SCSI device 0 */
79 #define NO_WRITE 0xFE
80 /*#define DEBUG_TARGET 2*/
81 /*
82 * Select timeout time (in 10ms units)
83 *
84 * This is the timeout used between the start of selection and the WD33C93
85 * chip deciding that the device isn't responding.
86 */
87 #define TIMEOUT_TIME 10
88 /*
89 * Define this if you want to have verbose explanation of SCSI
90 * status/messages.
91 */
92 #undef CONFIG_ACORNSCSI_CONSTANTS
93 /*
94 * Define this if you want to use the on board DMAC [don't remove this option]
95 * If not set, then use PIO mode (not currently supported).
96 */
97 #define USE_DMAC
98
99 /*
100 * ====================================================================================
101 */
102
103 #ifdef DEBUG_TARGET
104 #define DBG(cmd,xxx...) \
105 if (cmd->device->id == DEBUG_TARGET) { \
106 xxx; \
107 }
108 #else
109 #define DBG(cmd,xxx...) xxx
110 #endif
111
112 #include <linux/module.h>
113 #include <linux/kernel.h>
114 #include <linux/string.h>
115 #include <linux/signal.h>
116 #include <linux/errno.h>
117 #include <linux/proc_fs.h>
118 #include <linux/ioport.h>
119 #include <linux/blkdev.h>
120 #include <linux/delay.h>
121 #include <linux/interrupt.h>
122 #include <linux/init.h>
123 #include <linux/bitops.h>
124 #include <linux/stringify.h>
125 #include <linux/io.h>
126
127 #include <asm/ecard.h>
128
129 #include "../scsi.h"
130 #include <scsi/scsi_dbg.h>
131 #include <scsi/scsi_host.h>
132 #include <scsi/scsi_transport_spi.h>
133 #include "acornscsi.h"
134 #include "msgqueue.h"
135 #include "scsi.h"
136
137 #include <scsi/scsicam.h>
138
139 #define VER_MAJOR 2
140 #define VER_MINOR 0
141 #define VER_PATCH 6
142
143 #ifdef USE_DMAC
144 /*
145 * DMAC setup parameters
146 */
147 #define INIT_DEVCON0 (DEVCON0_RQL|DEVCON0_EXW|DEVCON0_CMP)
148 #define INIT_DEVCON1 (DEVCON1_BHLD)
149 #define DMAC_READ (MODECON_READ)
150 #define DMAC_WRITE (MODECON_WRITE)
151 #define INIT_SBICDMA (CTRL_DMABURST)
152
153 #define scsi_xferred have_data_in
154
155 /*
156 * Size of on-board DMA buffer
157 */
158 #define DMAC_BUFFER_SIZE 65536
159 #endif
160
161 #define STATUS_BUFFER_TO_PRINT 24
162
163 unsigned int sdtr_period = SDTR_PERIOD;
164 unsigned int sdtr_size = SDTR_SIZE;
165
166 static void acornscsi_done(AS_Host *host, struct scsi_cmnd **SCpntp,
167 unsigned int result);
168 static int acornscsi_reconnect_finish(AS_Host *host);
169 static void acornscsi_dma_cleanup(AS_Host *host);
170 static void acornscsi_abortcmd(AS_Host *host);
171
172 /* ====================================================================================
173 * Miscellaneous
174 */
175
176 /* Offsets from MEMC base */
177 #define SBIC_REGIDX 0x2000
178 #define SBIC_REGVAL 0x2004
179 #define DMAC_OFFSET 0x3000
180
181 /* Offsets from FAST IOC base */
182 #define INT_REG 0x2000
183 #define PAGE_REG 0x3000
184
sbic_arm_write(AS_Host * host,unsigned int reg,unsigned int value)185 static inline void sbic_arm_write(AS_Host *host, unsigned int reg, unsigned int value)
186 {
187 writeb(reg, host->base + SBIC_REGIDX);
188 writeb(value, host->base + SBIC_REGVAL);
189 }
190
sbic_arm_read(AS_Host * host,unsigned int reg)191 static inline int sbic_arm_read(AS_Host *host, unsigned int reg)
192 {
193 if(reg == SBIC_ASR)
194 return readl(host->base + SBIC_REGIDX) & 255;
195 writeb(reg, host->base + SBIC_REGIDX);
196 return readl(host->base + SBIC_REGVAL) & 255;
197 }
198
199 #define sbic_arm_writenext(host, val) writeb((val), (host)->base + SBIC_REGVAL)
200 #define sbic_arm_readnext(host) readb((host)->base + SBIC_REGVAL)
201
202 #ifdef USE_DMAC
203 #define dmac_read(host,reg) \
204 readb((host)->base + DMAC_OFFSET + ((reg) << 2))
205
206 #define dmac_write(host,reg,value) \
207 ({ writeb((value), (host)->base + DMAC_OFFSET + ((reg) << 2)); })
208
209 #define dmac_clearintr(host) writeb(0, (host)->fast + INT_REG)
210
dmac_address(AS_Host * host)211 static inline unsigned int dmac_address(AS_Host *host)
212 {
213 return dmac_read(host, DMAC_TXADRHI) << 16 |
214 dmac_read(host, DMAC_TXADRMD) << 8 |
215 dmac_read(host, DMAC_TXADRLO);
216 }
217
218 static
acornscsi_dumpdma(AS_Host * host,char * where)219 void acornscsi_dumpdma(AS_Host *host, char *where)
220 {
221 unsigned int mode, addr, len;
222
223 mode = dmac_read(host, DMAC_MODECON);
224 addr = dmac_address(host);
225 len = dmac_read(host, DMAC_TXCNTHI) << 8 |
226 dmac_read(host, DMAC_TXCNTLO);
227
228 printk("scsi%d: %s: DMAC %02x @%06x+%04x msk %02x, ",
229 host->host->host_no, where,
230 mode, addr, (len + 1) & 0xffff,
231 dmac_read(host, DMAC_MASKREG));
232
233 printk("DMA @%06x, ", host->dma.start_addr);
234 printk("BH @%p +%04x, ", host->scsi.SCp.ptr,
235 host->scsi.SCp.this_residual);
236 printk("DT @+%04x ST @+%04x", host->dma.transferred,
237 host->scsi.SCp.scsi_xferred);
238 printk("\n");
239 }
240 #endif
241
242 static
acornscsi_sbic_xfcount(AS_Host * host)243 unsigned long acornscsi_sbic_xfcount(AS_Host *host)
244 {
245 unsigned long length;
246
247 length = sbic_arm_read(host, SBIC_TRANSCNTH) << 16;
248 length |= sbic_arm_readnext(host) << 8;
249 length |= sbic_arm_readnext(host);
250
251 return length;
252 }
253
254 static int
acornscsi_sbic_wait(AS_Host * host,int stat_mask,int stat,int timeout,char * msg)255 acornscsi_sbic_wait(AS_Host *host, int stat_mask, int stat, int timeout, char *msg)
256 {
257 int asr;
258
259 do {
260 asr = sbic_arm_read(host, SBIC_ASR);
261
262 if ((asr & stat_mask) == stat)
263 return 0;
264
265 udelay(1);
266 } while (--timeout);
267
268 printk("scsi%d: timeout while %s\n", host->host->host_no, msg);
269
270 return -1;
271 }
272
273 static
acornscsi_sbic_issuecmd(AS_Host * host,int command)274 int acornscsi_sbic_issuecmd(AS_Host *host, int command)
275 {
276 if (acornscsi_sbic_wait(host, ASR_CIP, 0, 1000, "issuing command"))
277 return -1;
278
279 sbic_arm_write(host, SBIC_CMND, command);
280
281 return 0;
282 }
283
284 static void
acornscsi_csdelay(unsigned int cs)285 acornscsi_csdelay(unsigned int cs)
286 {
287 unsigned long target_jiffies, flags;
288
289 target_jiffies = jiffies + 1 + cs * HZ / 100;
290
291 local_save_flags(flags);
292 local_irq_enable();
293
294 while (time_before(jiffies, target_jiffies)) barrier();
295
296 local_irq_restore(flags);
297 }
298
299 static
acornscsi_resetcard(AS_Host * host)300 void acornscsi_resetcard(AS_Host *host)
301 {
302 unsigned int i, timeout;
303
304 /* assert reset line */
305 host->card.page_reg = 0x80;
306 writeb(host->card.page_reg, host->fast + PAGE_REG);
307
308 /* wait 3 cs. SCSI standard says 25ms. */
309 acornscsi_csdelay(3);
310
311 host->card.page_reg = 0;
312 writeb(host->card.page_reg, host->fast + PAGE_REG);
313
314 /*
315 * Should get a reset from the card
316 */
317 timeout = 1000;
318 do {
319 if (readb(host->fast + INT_REG) & 8)
320 break;
321 udelay(1);
322 } while (--timeout);
323
324 if (timeout == 0)
325 printk("scsi%d: timeout while resetting card\n",
326 host->host->host_no);
327
328 sbic_arm_read(host, SBIC_ASR);
329 sbic_arm_read(host, SBIC_SSR);
330
331 /* setup sbic - WD33C93A */
332 sbic_arm_write(host, SBIC_OWNID, OWNID_EAF | host->host->this_id);
333 sbic_arm_write(host, SBIC_CMND, CMND_RESET);
334
335 /*
336 * Command should cause a reset interrupt
337 */
338 timeout = 1000;
339 do {
340 if (readb(host->fast + INT_REG) & 8)
341 break;
342 udelay(1);
343 } while (--timeout);
344
345 if (timeout == 0)
346 printk("scsi%d: timeout while resetting card\n",
347 host->host->host_no);
348
349 sbic_arm_read(host, SBIC_ASR);
350 if (sbic_arm_read(host, SBIC_SSR) != 0x01)
351 printk(KERN_CRIT "scsi%d: WD33C93A didn't give enhanced reset interrupt\n",
352 host->host->host_no);
353
354 sbic_arm_write(host, SBIC_CTRL, INIT_SBICDMA | CTRL_IDI);
355 sbic_arm_write(host, SBIC_TIMEOUT, TIMEOUT_TIME);
356 sbic_arm_write(host, SBIC_SYNCHTRANSFER, SYNCHTRANSFER_2DBA);
357 sbic_arm_write(host, SBIC_SOURCEID, SOURCEID_ER | SOURCEID_DSP);
358
359 host->card.page_reg = 0x40;
360 writeb(host->card.page_reg, host->fast + PAGE_REG);
361
362 /* setup dmac - uPC71071 */
363 dmac_write(host, DMAC_INIT, 0);
364 #ifdef USE_DMAC
365 dmac_write(host, DMAC_INIT, INIT_8BIT);
366 dmac_write(host, DMAC_CHANNEL, CHANNEL_0);
367 dmac_write(host, DMAC_DEVCON0, INIT_DEVCON0);
368 dmac_write(host, DMAC_DEVCON1, INIT_DEVCON1);
369 #endif
370
371 host->SCpnt = NULL;
372 host->scsi.phase = PHASE_IDLE;
373 host->scsi.disconnectable = 0;
374
375 memset(host->busyluns, 0, sizeof(host->busyluns));
376
377 for (i = 0; i < 8; i++) {
378 host->device[i].sync_state = SYNC_NEGOCIATE;
379 host->device[i].disconnect_ok = 1;
380 }
381
382 /* wait 25 cs. SCSI standard says 250ms. */
383 acornscsi_csdelay(25);
384 }
385
386 /*=============================================================================================
387 * Utility routines (eg. debug)
388 */
389 #ifdef CONFIG_ACORNSCSI_CONSTANTS
390 static char *acornscsi_interrupttype[] = {
391 "rst", "suc", "p/a", "3",
392 "term", "5", "6", "7",
393 "serv", "9", "a", "b",
394 "c", "d", "e", "f"
395 };
396
397 static signed char acornscsi_map[] = {
398 0, 1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
399 -1, 2, -1, -1, -1, -1, 3, -1, 4, 5, 6, 7, 8, 9, 10, 11,
400 12, 13, 14, -1, -1, -1, -1, -1, 4, 5, 6, 7, 8, 9, 10, 11,
401 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
402 15, 16, 17, 18, 19, -1, -1, 20, 4, 5, 6, 7, 8, 9, 10, 11,
403 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
404 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
405 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
406 21, 22, -1, -1, -1, 23, -1, -1, 4, 5, 6, 7, 8, 9, 10, 11,
407 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
408 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
409 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
410 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
411 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
412 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
413 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1
414 };
415
416 static char *acornscsi_interruptcode[] = {
417 /* 0 */
418 "reset - normal mode", /* 00 */
419 "reset - advanced mode", /* 01 */
420
421 /* 2 */
422 "sel", /* 11 */
423 "sel+xfer", /* 16 */
424 "data-out", /* 18 */
425 "data-in", /* 19 */
426 "cmd", /* 1A */
427 "stat", /* 1B */
428 "??-out", /* 1C */
429 "??-in", /* 1D */
430 "msg-out", /* 1E */
431 "msg-in", /* 1F */
432
433 /* 12 */
434 "/ACK asserted", /* 20 */
435 "save-data-ptr", /* 21 */
436 "{re}sel", /* 22 */
437
438 /* 15 */
439 "inv cmd", /* 40 */
440 "unexpected disconnect", /* 41 */
441 "sel timeout", /* 42 */
442 "P err", /* 43 */
443 "P err+ATN", /* 44 */
444 "bad status byte", /* 47 */
445
446 /* 21 */
447 "resel, no id", /* 80 */
448 "resel", /* 81 */
449 "discon", /* 85 */
450 };
451
452 static
print_scsi_status(unsigned int ssr)453 void print_scsi_status(unsigned int ssr)
454 {
455 if (acornscsi_map[ssr] != -1)
456 printk("%s:%s",
457 acornscsi_interrupttype[(ssr >> 4)],
458 acornscsi_interruptcode[acornscsi_map[ssr]]);
459 else
460 printk("%X:%X", ssr >> 4, ssr & 0x0f);
461 }
462 #endif
463
464 static
print_sbic_status(int asr,int ssr,int cmdphase)465 void print_sbic_status(int asr, int ssr, int cmdphase)
466 {
467 #ifdef CONFIG_ACORNSCSI_CONSTANTS
468 printk("sbic: %c%c%c%c%c%c ",
469 asr & ASR_INT ? 'I' : 'i',
470 asr & ASR_LCI ? 'L' : 'l',
471 asr & ASR_BSY ? 'B' : 'b',
472 asr & ASR_CIP ? 'C' : 'c',
473 asr & ASR_PE ? 'P' : 'p',
474 asr & ASR_DBR ? 'D' : 'd');
475 printk("scsi: ");
476 print_scsi_status(ssr);
477 printk(" ph %02X\n", cmdphase);
478 #else
479 printk("sbic: %02X scsi: %X:%X ph: %02X\n",
480 asr, (ssr & 0xf0)>>4, ssr & 0x0f, cmdphase);
481 #endif
482 }
483
484 static void
acornscsi_dumplogline(AS_Host * host,int target,int line)485 acornscsi_dumplogline(AS_Host *host, int target, int line)
486 {
487 unsigned long prev;
488 signed int ptr;
489
490 ptr = host->status_ptr[target] - STATUS_BUFFER_TO_PRINT;
491 if (ptr < 0)
492 ptr += STATUS_BUFFER_SIZE;
493
494 printk("%c: %3s:", target == 8 ? 'H' : '0' + target,
495 line == 0 ? "ph" : line == 1 ? "ssr" : "int");
496
497 prev = host->status[target][ptr].when;
498
499 for (; ptr != host->status_ptr[target]; ptr = (ptr + 1) & (STATUS_BUFFER_SIZE - 1)) {
500 unsigned long time_diff;
501
502 if (!host->status[target][ptr].when)
503 continue;
504
505 switch (line) {
506 case 0:
507 printk("%c%02X", host->status[target][ptr].irq ? '-' : ' ',
508 host->status[target][ptr].ph);
509 break;
510
511 case 1:
512 printk(" %02X", host->status[target][ptr].ssr);
513 break;
514
515 case 2:
516 time_diff = host->status[target][ptr].when - prev;
517 prev = host->status[target][ptr].when;
518 if (time_diff == 0)
519 printk("==^");
520 else if (time_diff >= 100)
521 printk(" ");
522 else
523 printk(" %02ld", time_diff);
524 break;
525 }
526 }
527
528 printk("\n");
529 }
530
531 static
acornscsi_dumplog(AS_Host * host,int target)532 void acornscsi_dumplog(AS_Host *host, int target)
533 {
534 do {
535 acornscsi_dumplogline(host, target, 0);
536 acornscsi_dumplogline(host, target, 1);
537 acornscsi_dumplogline(host, target, 2);
538
539 if (target == 8)
540 break;
541
542 target = 8;
543 } while (1);
544 }
545
546 static
acornscsi_target(AS_Host * host)547 char acornscsi_target(AS_Host *host)
548 {
549 if (host->SCpnt)
550 return '0' + host->SCpnt->device->id;
551 return 'H';
552 }
553
554 /*
555 * Prototype: cmdtype_t acornscsi_cmdtype(int command)
556 * Purpose : differentiate READ from WRITE from other commands
557 * Params : command - command to interpret
558 * Returns : CMD_READ - command reads data,
559 * CMD_WRITE - command writes data,
560 * CMD_MISC - everything else
561 */
562 static inline
acornscsi_cmdtype(int command)563 cmdtype_t acornscsi_cmdtype(int command)
564 {
565 switch (command) {
566 case WRITE_6: case WRITE_10: case WRITE_12:
567 return CMD_WRITE;
568 case READ_6: case READ_10: case READ_12:
569 return CMD_READ;
570 default:
571 return CMD_MISC;
572 }
573 }
574
575 /*
576 * Prototype: int acornscsi_datadirection(int command)
577 * Purpose : differentiate between commands that have a DATA IN phase
578 * and a DATA OUT phase
579 * Params : command - command to interpret
580 * Returns : DATADIR_OUT - data out phase expected
581 * DATADIR_IN - data in phase expected
582 */
583 static
acornscsi_datadirection(int command)584 datadir_t acornscsi_datadirection(int command)
585 {
586 switch (command) {
587 case CHANGE_DEFINITION: case COMPARE: case COPY:
588 case COPY_VERIFY: case LOG_SELECT: case MODE_SELECT:
589 case MODE_SELECT_10: case SEND_DIAGNOSTIC: case WRITE_BUFFER:
590 case FORMAT_UNIT: case REASSIGN_BLOCKS: case RESERVE:
591 case SEARCH_EQUAL: case SEARCH_HIGH: case SEARCH_LOW:
592 case WRITE_6: case WRITE_10: case WRITE_VERIFY:
593 case UPDATE_BLOCK: case WRITE_LONG: case WRITE_SAME:
594 case SEARCH_HIGH_12: case SEARCH_EQUAL_12: case SEARCH_LOW_12:
595 case WRITE_12: case WRITE_VERIFY_12: case SET_WINDOW:
596 case MEDIUM_SCAN: case SEND_VOLUME_TAG: case 0xea:
597 return DATADIR_OUT;
598 default:
599 return DATADIR_IN;
600 }
601 }
602
603 /*
604 * Purpose : provide values for synchronous transfers with 33C93.
605 * Copyright: Copyright (c) 1996 John Shifflett, GeoLog Consulting
606 * Modified by Russell King for 8MHz WD33C93A
607 */
608 static struct sync_xfer_tbl {
609 unsigned int period_ns;
610 unsigned char reg_value;
611 } sync_xfer_table[] = {
612 { 1, 0x20 }, { 249, 0x20 }, { 374, 0x30 },
613 { 499, 0x40 }, { 624, 0x50 }, { 749, 0x60 },
614 { 874, 0x70 }, { 999, 0x00 }, { 0, 0 }
615 };
616
617 /*
618 * Prototype: int acornscsi_getperiod(unsigned char syncxfer)
619 * Purpose : period for the synchronous transfer setting
620 * Params : syncxfer SYNCXFER register value
621 * Returns : period in ns.
622 */
623 static
acornscsi_getperiod(unsigned char syncxfer)624 int acornscsi_getperiod(unsigned char syncxfer)
625 {
626 int i;
627
628 syncxfer &= 0xf0;
629 if (syncxfer == 0x10)
630 syncxfer = 0;
631
632 for (i = 1; sync_xfer_table[i].period_ns; i++)
633 if (syncxfer == sync_xfer_table[i].reg_value)
634 return sync_xfer_table[i].period_ns;
635 return 0;
636 }
637
638 /*
639 * Prototype: int round_period(unsigned int period)
640 * Purpose : return index into above table for a required REQ period
641 * Params : period - time (ns) for REQ
642 * Returns : table index
643 * Copyright: Copyright (c) 1996 John Shifflett, GeoLog Consulting
644 */
645 static inline
round_period(unsigned int period)646 int round_period(unsigned int period)
647 {
648 int i;
649
650 for (i = 1; sync_xfer_table[i].period_ns; i++) {
651 if ((period <= sync_xfer_table[i].period_ns) &&
652 (period > sync_xfer_table[i - 1].period_ns))
653 return i;
654 }
655 return 7;
656 }
657
658 /*
659 * Prototype: unsigned char calc_sync_xfer(unsigned int period, unsigned int offset)
660 * Purpose : calculate value for 33c93s SYNC register
661 * Params : period - time (ns) for REQ
662 * offset - offset in bytes between REQ/ACK
663 * Returns : value for SYNC register
664 * Copyright: Copyright (c) 1996 John Shifflett, GeoLog Consulting
665 */
666 static
calc_sync_xfer(unsigned int period,unsigned int offset)667 unsigned char __maybe_unused calc_sync_xfer(unsigned int period,
668 unsigned int offset)
669 {
670 return sync_xfer_table[round_period(period)].reg_value |
671 ((offset < SDTR_SIZE) ? offset : SDTR_SIZE);
672 }
673
674 /* ====================================================================================
675 * Command functions
676 */
677 /*
678 * Function: acornscsi_kick(AS_Host *host)
679 * Purpose : kick next command to interface
680 * Params : host - host to send command to
681 * Returns : INTR_IDLE if idle, otherwise INTR_PROCESSING
682 * Notes : interrupts are always disabled!
683 */
684 static
acornscsi_kick(AS_Host * host)685 intr_ret_t acornscsi_kick(AS_Host *host)
686 {
687 int from_queue = 0;
688 struct scsi_cmnd *SCpnt;
689
690 /* first check to see if a command is waiting to be executed */
691 SCpnt = host->origSCpnt;
692 host->origSCpnt = NULL;
693
694 /* retrieve next command */
695 if (!SCpnt) {
696 SCpnt = queue_remove_exclude(&host->queues.issue, host->busyluns);
697 if (!SCpnt)
698 return INTR_IDLE;
699
700 from_queue = 1;
701 }
702
703 if (host->scsi.disconnectable && host->SCpnt) {
704 queue_add_cmd_tail(&host->queues.disconnected, host->SCpnt);
705 host->scsi.disconnectable = 0;
706 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
707 DBG(host->SCpnt, printk("scsi%d.%c: moved command to disconnected queue\n",
708 host->host->host_no, acornscsi_target(host)));
709 #endif
710 host->SCpnt = NULL;
711 }
712
713 /*
714 * If we have an interrupt pending, then we may have been reselected.
715 * In this case, we don't want to write to the registers
716 */
717 if (!(sbic_arm_read(host, SBIC_ASR) & (ASR_INT|ASR_BSY|ASR_CIP))) {
718 sbic_arm_write(host, SBIC_DESTID, SCpnt->device->id);
719 sbic_arm_write(host, SBIC_CMND, CMND_SELWITHATN);
720 }
721
722 /*
723 * claim host busy - all of these must happen atomically wrt
724 * our interrupt routine. Failure means command loss.
725 */
726 host->scsi.phase = PHASE_CONNECTING;
727 host->SCpnt = SCpnt;
728 host->scsi.SCp = SCpnt->SCp;
729 host->dma.xfer_setup = 0;
730 host->dma.xfer_required = 0;
731 host->dma.xfer_done = 0;
732
733 #if (DEBUG & (DEBUG_ABORT|DEBUG_CONNECT))
734 DBG(SCpnt,printk("scsi%d.%c: starting cmd %02X\n",
735 host->host->host_no, '0' + SCpnt->device->id,
736 SCpnt->cmnd[0]));
737 #endif
738
739 if (from_queue) {
740 set_bit(SCpnt->device->id * 8 +
741 (u8)(SCpnt->device->lun & 0x07), host->busyluns);
742
743 host->stats.removes += 1;
744
745 switch (acornscsi_cmdtype(SCpnt->cmnd[0])) {
746 case CMD_WRITE:
747 host->stats.writes += 1;
748 break;
749 case CMD_READ:
750 host->stats.reads += 1;
751 break;
752 case CMD_MISC:
753 host->stats.miscs += 1;
754 break;
755 }
756 }
757
758 return INTR_PROCESSING;
759 }
760
761 /*
762 * Function: void acornscsi_done(AS_Host *host, struct scsi_cmnd **SCpntp, unsigned int result)
763 * Purpose : complete processing for command
764 * Params : host - interface that completed
765 * result - driver byte of result
766 */
acornscsi_done(AS_Host * host,struct scsi_cmnd ** SCpntp,unsigned int result)767 static void acornscsi_done(AS_Host *host, struct scsi_cmnd **SCpntp,
768 unsigned int result)
769 {
770 struct scsi_cmnd *SCpnt = *SCpntp;
771
772 /* clean up */
773 sbic_arm_write(host, SBIC_SOURCEID, SOURCEID_ER | SOURCEID_DSP);
774
775 host->stats.fins += 1;
776
777 if (SCpnt) {
778 *SCpntp = NULL;
779
780 acornscsi_dma_cleanup(host);
781
782 set_host_byte(SCpnt, result);
783 if (result == DID_OK)
784 scsi_msg_to_host_byte(SCpnt, host->scsi.SCp.Message);
785 set_status_byte(SCpnt, host->scsi.SCp.Status);
786
787 /*
788 * In theory, this should not happen. In practice, it seems to.
789 * Only trigger an error if the device attempts to report all happy
790 * but with untransferred buffers... If we don't do something, then
791 * data loss will occur. Should we check SCpnt->underflow here?
792 * It doesn't appear to be set to something meaningful by the higher
793 * levels all the time.
794 */
795 if (result == DID_OK) {
796 int xfer_warn = 0;
797
798 if (SCpnt->underflow == 0) {
799 if (host->scsi.SCp.ptr &&
800 acornscsi_cmdtype(SCpnt->cmnd[0]) != CMD_MISC)
801 xfer_warn = 1;
802 } else {
803 if (host->scsi.SCp.scsi_xferred < SCpnt->underflow ||
804 host->scsi.SCp.scsi_xferred != host->dma.transferred)
805 xfer_warn = 1;
806 }
807
808 /* ANSI standard says: (SCSI-2 Rev 10c Sect 5.6.6)
809 * Targets which break data transfers into multiple
810 * connections shall end each successful connection
811 * (except possibly the last) with a SAVE DATA
812 * POINTER - DISCONNECT message sequence.
813 *
814 * This makes it difficult to ensure that a transfer has
815 * completed. If we reach the end of a transfer during
816 * the command, then we can only have finished the transfer.
817 * therefore, if we seem to have some data remaining, this
818 * is not a problem.
819 */
820 if (host->dma.xfer_done)
821 xfer_warn = 0;
822
823 if (xfer_warn) {
824 switch (get_status_byte(SCpnt)) {
825 case SAM_STAT_CHECK_CONDITION:
826 case SAM_STAT_COMMAND_TERMINATED:
827 case SAM_STAT_BUSY:
828 case SAM_STAT_TASK_SET_FULL:
829 case SAM_STAT_RESERVATION_CONFLICT:
830 break;
831
832 default:
833 scmd_printk(KERN_ERR, SCpnt,
834 "incomplete data transfer detected: "
835 "result=%08X", SCpnt->result);
836 scsi_print_command(SCpnt);
837 acornscsi_dumpdma(host, "done");
838 acornscsi_dumplog(host, SCpnt->device->id);
839 set_host_byte(SCpnt, DID_ERROR);
840 }
841 }
842 }
843
844 if (!SCpnt->scsi_done)
845 panic("scsi%d.H: null scsi_done function in acornscsi_done", host->host->host_no);
846
847 clear_bit(SCpnt->device->id * 8 +
848 (u8)(SCpnt->device->lun & 0x7), host->busyluns);
849
850 SCpnt->scsi_done(SCpnt);
851 } else
852 printk("scsi%d: null command in acornscsi_done", host->host->host_no);
853
854 host->scsi.phase = PHASE_IDLE;
855 }
856
857 /* ====================================================================================
858 * DMA routines
859 */
860 /*
861 * Purpose : update SCSI Data Pointer
862 * Notes : this will only be one SG entry or less
863 */
864 static
acornscsi_data_updateptr(AS_Host * host,struct scsi_pointer * SCp,unsigned int length)865 void acornscsi_data_updateptr(AS_Host *host, struct scsi_pointer *SCp, unsigned int length)
866 {
867 SCp->ptr += length;
868 SCp->this_residual -= length;
869
870 if (SCp->this_residual == 0 && next_SCp(SCp) == 0)
871 host->dma.xfer_done = 1;
872 }
873
874 /*
875 * Prototype: void acornscsi_data_read(AS_Host *host, char *ptr,
876 * unsigned int start_addr, unsigned int length)
877 * Purpose : read data from DMA RAM
878 * Params : host - host to transfer from
879 * ptr - DRAM address
880 * start_addr - host mem address
881 * length - number of bytes to transfer
882 * Notes : this will only be one SG entry or less
883 */
884 static
acornscsi_data_read(AS_Host * host,char * ptr,unsigned int start_addr,unsigned int length)885 void acornscsi_data_read(AS_Host *host, char *ptr,
886 unsigned int start_addr, unsigned int length)
887 {
888 extern void __acornscsi_in(void __iomem *, char *buf, int len);
889 unsigned int page, offset, len = length;
890
891 page = (start_addr >> 12);
892 offset = start_addr & ((1 << 12) - 1);
893
894 writeb((page & 0x3f) | host->card.page_reg, host->fast + PAGE_REG);
895
896 while (len > 0) {
897 unsigned int this_len;
898
899 if (len + offset > (1 << 12))
900 this_len = (1 << 12) - offset;
901 else
902 this_len = len;
903
904 __acornscsi_in(host->base + (offset << 1), ptr, this_len);
905
906 offset += this_len;
907 ptr += this_len;
908 len -= this_len;
909
910 if (offset == (1 << 12)) {
911 offset = 0;
912 page ++;
913 writeb((page & 0x3f) | host->card.page_reg, host->fast + PAGE_REG);
914 }
915 }
916 writeb(host->card.page_reg, host->fast + PAGE_REG);
917 }
918
919 /*
920 * Prototype: void acornscsi_data_write(AS_Host *host, char *ptr,
921 * unsigned int start_addr, unsigned int length)
922 * Purpose : write data to DMA RAM
923 * Params : host - host to transfer from
924 * ptr - DRAM address
925 * start_addr - host mem address
926 * length - number of bytes to transfer
927 * Notes : this will only be one SG entry or less
928 */
929 static
acornscsi_data_write(AS_Host * host,char * ptr,unsigned int start_addr,unsigned int length)930 void acornscsi_data_write(AS_Host *host, char *ptr,
931 unsigned int start_addr, unsigned int length)
932 {
933 extern void __acornscsi_out(void __iomem *, char *buf, int len);
934 unsigned int page, offset, len = length;
935
936 page = (start_addr >> 12);
937 offset = start_addr & ((1 << 12) - 1);
938
939 writeb((page & 0x3f) | host->card.page_reg, host->fast + PAGE_REG);
940
941 while (len > 0) {
942 unsigned int this_len;
943
944 if (len + offset > (1 << 12))
945 this_len = (1 << 12) - offset;
946 else
947 this_len = len;
948
949 __acornscsi_out(host->base + (offset << 1), ptr, this_len);
950
951 offset += this_len;
952 ptr += this_len;
953 len -= this_len;
954
955 if (offset == (1 << 12)) {
956 offset = 0;
957 page ++;
958 writeb((page & 0x3f) | host->card.page_reg, host->fast + PAGE_REG);
959 }
960 }
961 writeb(host->card.page_reg, host->fast + PAGE_REG);
962 }
963
964 /* =========================================================================================
965 * On-board DMA routines
966 */
967 #ifdef USE_DMAC
968 /*
969 * Prototype: void acornscsi_dmastop(AS_Host *host)
970 * Purpose : stop all DMA
971 * Params : host - host on which to stop DMA
972 * Notes : This is called when leaving DATA IN/OUT phase,
973 * or when interface is RESET
974 */
975 static inline
acornscsi_dma_stop(AS_Host * host)976 void acornscsi_dma_stop(AS_Host *host)
977 {
978 dmac_write(host, DMAC_MASKREG, MASK_ON);
979 dmac_clearintr(host);
980
981 #if (DEBUG & DEBUG_DMA)
982 DBG(host->SCpnt, acornscsi_dumpdma(host, "stop"));
983 #endif
984 }
985
986 /*
987 * Function: void acornscsi_dma_setup(AS_Host *host, dmadir_t direction)
988 * Purpose : setup DMA controller for data transfer
989 * Params : host - host to setup
990 * direction - data transfer direction
991 * Notes : This is called when entering DATA I/O phase, not
992 * while we're in a DATA I/O phase
993 */
994 static
acornscsi_dma_setup(AS_Host * host,dmadir_t direction)995 void acornscsi_dma_setup(AS_Host *host, dmadir_t direction)
996 {
997 unsigned int address, length, mode;
998
999 host->dma.direction = direction;
1000
1001 dmac_write(host, DMAC_MASKREG, MASK_ON);
1002
1003 if (direction == DMA_OUT) {
1004 #if (DEBUG & DEBUG_NO_WRITE)
1005 if (NO_WRITE & (1 << host->SCpnt->device->id)) {
1006 printk(KERN_CRIT "scsi%d.%c: I can't handle DMA_OUT!\n",
1007 host->host->host_no, acornscsi_target(host));
1008 return;
1009 }
1010 #endif
1011 mode = DMAC_WRITE;
1012 } else
1013 mode = DMAC_READ;
1014
1015 /*
1016 * Allocate some buffer space, limited to half the buffer size
1017 */
1018 length = min_t(unsigned int, host->scsi.SCp.this_residual, DMAC_BUFFER_SIZE / 2);
1019 if (length) {
1020 host->dma.start_addr = address = host->dma.free_addr;
1021 host->dma.free_addr = (host->dma.free_addr + length) &
1022 (DMAC_BUFFER_SIZE - 1);
1023
1024 /*
1025 * Transfer data to DMA memory
1026 */
1027 if (direction == DMA_OUT)
1028 acornscsi_data_write(host, host->scsi.SCp.ptr, host->dma.start_addr,
1029 length);
1030
1031 length -= 1;
1032 dmac_write(host, DMAC_TXCNTLO, length);
1033 dmac_write(host, DMAC_TXCNTHI, length >> 8);
1034 dmac_write(host, DMAC_TXADRLO, address);
1035 dmac_write(host, DMAC_TXADRMD, address >> 8);
1036 dmac_write(host, DMAC_TXADRHI, 0);
1037 dmac_write(host, DMAC_MODECON, mode);
1038 dmac_write(host, DMAC_MASKREG, MASK_OFF);
1039
1040 #if (DEBUG & DEBUG_DMA)
1041 DBG(host->SCpnt, acornscsi_dumpdma(host, "strt"));
1042 #endif
1043 host->dma.xfer_setup = 1;
1044 }
1045 }
1046
1047 /*
1048 * Function: void acornscsi_dma_cleanup(AS_Host *host)
1049 * Purpose : ensure that all DMA transfers are up-to-date & host->scsi.SCp is correct
1050 * Params : host - host to finish
1051 * Notes : This is called when a command is:
1052 * terminating, RESTORE_POINTERS, SAVE_POINTERS, DISCONNECT
1053 * : This must not return until all transfers are completed.
1054 */
1055 static
acornscsi_dma_cleanup(AS_Host * host)1056 void acornscsi_dma_cleanup(AS_Host *host)
1057 {
1058 dmac_write(host, DMAC_MASKREG, MASK_ON);
1059 dmac_clearintr(host);
1060
1061 /*
1062 * Check for a pending transfer
1063 */
1064 if (host->dma.xfer_required) {
1065 host->dma.xfer_required = 0;
1066 if (host->dma.direction == DMA_IN)
1067 acornscsi_data_read(host, host->dma.xfer_ptr,
1068 host->dma.xfer_start, host->dma.xfer_length);
1069 }
1070
1071 /*
1072 * Has a transfer been setup?
1073 */
1074 if (host->dma.xfer_setup) {
1075 unsigned int transferred;
1076
1077 host->dma.xfer_setup = 0;
1078
1079 #if (DEBUG & DEBUG_DMA)
1080 DBG(host->SCpnt, acornscsi_dumpdma(host, "cupi"));
1081 #endif
1082
1083 /*
1084 * Calculate number of bytes transferred from DMA.
1085 */
1086 transferred = dmac_address(host) - host->dma.start_addr;
1087 host->dma.transferred += transferred;
1088
1089 if (host->dma.direction == DMA_IN)
1090 acornscsi_data_read(host, host->scsi.SCp.ptr,
1091 host->dma.start_addr, transferred);
1092
1093 /*
1094 * Update SCSI pointers
1095 */
1096 acornscsi_data_updateptr(host, &host->scsi.SCp, transferred);
1097 #if (DEBUG & DEBUG_DMA)
1098 DBG(host->SCpnt, acornscsi_dumpdma(host, "cupo"));
1099 #endif
1100 }
1101 }
1102
1103 /*
1104 * Function: void acornscsi_dmacintr(AS_Host *host)
1105 * Purpose : handle interrupts from DMAC device
1106 * Params : host - host to process
1107 * Notes : If reading, we schedule the read to main memory &
1108 * allow the transfer to continue.
1109 * : If writing, we fill the onboard DMA memory from main
1110 * memory.
1111 * : Called whenever DMAC finished it's current transfer.
1112 */
1113 static
acornscsi_dma_intr(AS_Host * host)1114 void acornscsi_dma_intr(AS_Host *host)
1115 {
1116 unsigned int address, length, transferred;
1117
1118 #if (DEBUG & DEBUG_DMA)
1119 DBG(host->SCpnt, acornscsi_dumpdma(host, "inti"));
1120 #endif
1121
1122 dmac_write(host, DMAC_MASKREG, MASK_ON);
1123 dmac_clearintr(host);
1124
1125 /*
1126 * Calculate amount transferred via DMA
1127 */
1128 transferred = dmac_address(host) - host->dma.start_addr;
1129 host->dma.transferred += transferred;
1130
1131 /*
1132 * Schedule DMA transfer off board
1133 */
1134 if (host->dma.direction == DMA_IN) {
1135 host->dma.xfer_start = host->dma.start_addr;
1136 host->dma.xfer_length = transferred;
1137 host->dma.xfer_ptr = host->scsi.SCp.ptr;
1138 host->dma.xfer_required = 1;
1139 }
1140
1141 acornscsi_data_updateptr(host, &host->scsi.SCp, transferred);
1142
1143 /*
1144 * Allocate some buffer space, limited to half the on-board RAM size
1145 */
1146 length = min_t(unsigned int, host->scsi.SCp.this_residual, DMAC_BUFFER_SIZE / 2);
1147 if (length) {
1148 host->dma.start_addr = address = host->dma.free_addr;
1149 host->dma.free_addr = (host->dma.free_addr + length) &
1150 (DMAC_BUFFER_SIZE - 1);
1151
1152 /*
1153 * Transfer data to DMA memory
1154 */
1155 if (host->dma.direction == DMA_OUT)
1156 acornscsi_data_write(host, host->scsi.SCp.ptr, host->dma.start_addr,
1157 length);
1158
1159 length -= 1;
1160 dmac_write(host, DMAC_TXCNTLO, length);
1161 dmac_write(host, DMAC_TXCNTHI, length >> 8);
1162 dmac_write(host, DMAC_TXADRLO, address);
1163 dmac_write(host, DMAC_TXADRMD, address >> 8);
1164 dmac_write(host, DMAC_TXADRHI, 0);
1165 dmac_write(host, DMAC_MASKREG, MASK_OFF);
1166
1167 #if (DEBUG & DEBUG_DMA)
1168 DBG(host->SCpnt, acornscsi_dumpdma(host, "into"));
1169 #endif
1170 } else {
1171 host->dma.xfer_setup = 0;
1172 #if 0
1173 /*
1174 * If the interface still wants more, then this is an error.
1175 * We give it another byte, but we also attempt to raise an
1176 * attention condition. We continue giving one byte until
1177 * the device recognises the attention.
1178 */
1179 if (dmac_read(host, DMAC_STATUS) & STATUS_RQ0) {
1180 acornscsi_abortcmd(host);
1181
1182 dmac_write(host, DMAC_TXCNTLO, 0);
1183 dmac_write(host, DMAC_TXCNTHI, 0);
1184 dmac_write(host, DMAC_TXADRLO, 0);
1185 dmac_write(host, DMAC_TXADRMD, 0);
1186 dmac_write(host, DMAC_TXADRHI, 0);
1187 dmac_write(host, DMAC_MASKREG, MASK_OFF);
1188 }
1189 #endif
1190 }
1191 }
1192
1193 /*
1194 * Function: void acornscsi_dma_xfer(AS_Host *host)
1195 * Purpose : transfer data between AcornSCSI and memory
1196 * Params : host - host to process
1197 */
1198 static
acornscsi_dma_xfer(AS_Host * host)1199 void acornscsi_dma_xfer(AS_Host *host)
1200 {
1201 host->dma.xfer_required = 0;
1202
1203 if (host->dma.direction == DMA_IN)
1204 acornscsi_data_read(host, host->dma.xfer_ptr,
1205 host->dma.xfer_start, host->dma.xfer_length);
1206 }
1207
1208 /*
1209 * Function: void acornscsi_dma_adjust(AS_Host *host)
1210 * Purpose : adjust DMA pointers & count for bytes transferred to
1211 * SBIC but not SCSI bus.
1212 * Params : host - host to adjust DMA count for
1213 */
1214 static
acornscsi_dma_adjust(AS_Host * host)1215 void acornscsi_dma_adjust(AS_Host *host)
1216 {
1217 if (host->dma.xfer_setup) {
1218 signed long transferred;
1219 #if (DEBUG & (DEBUG_DMA|DEBUG_WRITE))
1220 DBG(host->SCpnt, acornscsi_dumpdma(host, "adji"));
1221 #endif
1222 /*
1223 * Calculate correct DMA address - DMA is ahead of SCSI bus while
1224 * writing.
1225 * host->scsi.SCp.scsi_xferred is the number of bytes
1226 * actually transferred to/from the SCSI bus.
1227 * host->dma.transferred is the number of bytes transferred
1228 * over DMA since host->dma.start_addr was last set.
1229 *
1230 * real_dma_addr = host->dma.start_addr + host->scsi.SCp.scsi_xferred
1231 * - host->dma.transferred
1232 */
1233 transferred = host->scsi.SCp.scsi_xferred - host->dma.transferred;
1234 if (transferred < 0)
1235 printk("scsi%d.%c: Ack! DMA write correction %ld < 0!\n",
1236 host->host->host_no, acornscsi_target(host), transferred);
1237 else if (transferred == 0)
1238 host->dma.xfer_setup = 0;
1239 else {
1240 transferred += host->dma.start_addr;
1241 dmac_write(host, DMAC_TXADRLO, transferred);
1242 dmac_write(host, DMAC_TXADRMD, transferred >> 8);
1243 dmac_write(host, DMAC_TXADRHI, transferred >> 16);
1244 #if (DEBUG & (DEBUG_DMA|DEBUG_WRITE))
1245 DBG(host->SCpnt, acornscsi_dumpdma(host, "adjo"));
1246 #endif
1247 }
1248 }
1249 }
1250 #endif
1251
1252 /* =========================================================================================
1253 * Data I/O
1254 */
1255 static int
acornscsi_write_pio(AS_Host * host,char * bytes,int * ptr,int len,unsigned int max_timeout)1256 acornscsi_write_pio(AS_Host *host, char *bytes, int *ptr, int len, unsigned int max_timeout)
1257 {
1258 unsigned int asr, timeout = max_timeout;
1259 int my_ptr = *ptr;
1260
1261 while (my_ptr < len) {
1262 asr = sbic_arm_read(host, SBIC_ASR);
1263
1264 if (asr & ASR_DBR) {
1265 timeout = max_timeout;
1266
1267 sbic_arm_write(host, SBIC_DATA, bytes[my_ptr++]);
1268 } else if (asr & ASR_INT)
1269 break;
1270 else if (--timeout == 0)
1271 break;
1272 udelay(1);
1273 }
1274
1275 *ptr = my_ptr;
1276
1277 return (timeout == 0) ? -1 : 0;
1278 }
1279
1280 /*
1281 * Function: void acornscsi_sendcommand(AS_Host *host)
1282 * Purpose : send a command to a target
1283 * Params : host - host which is connected to target
1284 */
1285 static void
acornscsi_sendcommand(AS_Host * host)1286 acornscsi_sendcommand(AS_Host *host)
1287 {
1288 struct scsi_cmnd *SCpnt = host->SCpnt;
1289
1290 sbic_arm_write(host, SBIC_TRANSCNTH, 0);
1291 sbic_arm_writenext(host, 0);
1292 sbic_arm_writenext(host, SCpnt->cmd_len - host->scsi.SCp.sent_command);
1293
1294 acornscsi_sbic_issuecmd(host, CMND_XFERINFO);
1295
1296 if (acornscsi_write_pio(host, SCpnt->cmnd,
1297 (int *)&host->scsi.SCp.sent_command, SCpnt->cmd_len, 1000000))
1298 printk("scsi%d: timeout while sending command\n", host->host->host_no);
1299
1300 host->scsi.phase = PHASE_COMMAND;
1301 }
1302
1303 static
acornscsi_sendmessage(AS_Host * host)1304 void acornscsi_sendmessage(AS_Host *host)
1305 {
1306 unsigned int message_length = msgqueue_msglength(&host->scsi.msgs);
1307 unsigned int msgnr;
1308 struct message *msg;
1309
1310 #if (DEBUG & DEBUG_MESSAGES)
1311 printk("scsi%d.%c: sending message ",
1312 host->host->host_no, acornscsi_target(host));
1313 #endif
1314
1315 switch (message_length) {
1316 case 0:
1317 acornscsi_sbic_issuecmd(host, CMND_XFERINFO | CMND_SBT);
1318
1319 acornscsi_sbic_wait(host, ASR_DBR, ASR_DBR, 1000, "sending message 1");
1320
1321 sbic_arm_write(host, SBIC_DATA, NOP);
1322
1323 host->scsi.last_message = NOP;
1324 #if (DEBUG & DEBUG_MESSAGES)
1325 printk("NOP");
1326 #endif
1327 break;
1328
1329 case 1:
1330 acornscsi_sbic_issuecmd(host, CMND_XFERINFO | CMND_SBT);
1331 msg = msgqueue_getmsg(&host->scsi.msgs, 0);
1332
1333 acornscsi_sbic_wait(host, ASR_DBR, ASR_DBR, 1000, "sending message 2");
1334
1335 sbic_arm_write(host, SBIC_DATA, msg->msg[0]);
1336
1337 host->scsi.last_message = msg->msg[0];
1338 #if (DEBUG & DEBUG_MESSAGES)
1339 spi_print_msg(msg->msg);
1340 #endif
1341 break;
1342
1343 default:
1344 /*
1345 * ANSI standard says: (SCSI-2 Rev 10c Sect 5.6.14)
1346 * 'When a target sends this (MESSAGE_REJECT) message, it
1347 * shall change to MESSAGE IN phase and send this message
1348 * prior to requesting additional message bytes from the
1349 * initiator. This provides an interlock so that the
1350 * initiator can determine which message byte is rejected.
1351 */
1352 sbic_arm_write(host, SBIC_TRANSCNTH, 0);
1353 sbic_arm_writenext(host, 0);
1354 sbic_arm_writenext(host, message_length);
1355 acornscsi_sbic_issuecmd(host, CMND_XFERINFO);
1356
1357 msgnr = 0;
1358 while ((msg = msgqueue_getmsg(&host->scsi.msgs, msgnr++)) != NULL) {
1359 unsigned int i;
1360 #if (DEBUG & DEBUG_MESSAGES)
1361 spi_print_msg(msg);
1362 #endif
1363 i = 0;
1364 if (acornscsi_write_pio(host, msg->msg, &i, msg->length, 1000000))
1365 printk("scsi%d: timeout while sending message\n", host->host->host_no);
1366
1367 host->scsi.last_message = msg->msg[0];
1368 if (msg->msg[0] == EXTENDED_MESSAGE)
1369 host->scsi.last_message |= msg->msg[2] << 8;
1370
1371 if (i != msg->length)
1372 break;
1373 }
1374 break;
1375 }
1376 #if (DEBUG & DEBUG_MESSAGES)
1377 printk("\n");
1378 #endif
1379 }
1380
1381 /*
1382 * Function: void acornscsi_readstatusbyte(AS_Host *host)
1383 * Purpose : Read status byte from connected target
1384 * Params : host - host connected to target
1385 */
1386 static
acornscsi_readstatusbyte(AS_Host * host)1387 void acornscsi_readstatusbyte(AS_Host *host)
1388 {
1389 acornscsi_sbic_issuecmd(host, CMND_XFERINFO|CMND_SBT);
1390 acornscsi_sbic_wait(host, ASR_DBR, ASR_DBR, 1000, "reading status byte");
1391 host->scsi.SCp.Status = sbic_arm_read(host, SBIC_DATA);
1392 }
1393
1394 /*
1395 * Function: unsigned char acornscsi_readmessagebyte(AS_Host *host)
1396 * Purpose : Read one message byte from connected target
1397 * Params : host - host connected to target
1398 */
1399 static
acornscsi_readmessagebyte(AS_Host * host)1400 unsigned char acornscsi_readmessagebyte(AS_Host *host)
1401 {
1402 unsigned char message;
1403
1404 acornscsi_sbic_issuecmd(host, CMND_XFERINFO | CMND_SBT);
1405
1406 acornscsi_sbic_wait(host, ASR_DBR, ASR_DBR, 1000, "for message byte");
1407
1408 message = sbic_arm_read(host, SBIC_DATA);
1409
1410 /* wait for MSGIN-XFER-PAUSED */
1411 acornscsi_sbic_wait(host, ASR_INT, ASR_INT, 1000, "for interrupt after message byte");
1412
1413 sbic_arm_read(host, SBIC_SSR);
1414
1415 return message;
1416 }
1417
1418 /*
1419 * Function: void acornscsi_message(AS_Host *host)
1420 * Purpose : Read complete message from connected target & action message
1421 * Params : host - host connected to target
1422 */
1423 static
acornscsi_message(AS_Host * host)1424 void acornscsi_message(AS_Host *host)
1425 {
1426 unsigned char message[16];
1427 unsigned int msgidx = 0, msglen = 1;
1428
1429 do {
1430 message[msgidx] = acornscsi_readmessagebyte(host);
1431
1432 switch (msgidx) {
1433 case 0:
1434 if (message[0] == EXTENDED_MESSAGE ||
1435 (message[0] >= 0x20 && message[0] <= 0x2f))
1436 msglen = 2;
1437 break;
1438
1439 case 1:
1440 if (message[0] == EXTENDED_MESSAGE)
1441 msglen += message[msgidx];
1442 break;
1443 }
1444 msgidx += 1;
1445 if (msgidx < msglen) {
1446 acornscsi_sbic_issuecmd(host, CMND_NEGATEACK);
1447
1448 /* wait for next msg-in */
1449 acornscsi_sbic_wait(host, ASR_INT, ASR_INT, 1000, "for interrupt after negate ack");
1450 sbic_arm_read(host, SBIC_SSR);
1451 }
1452 } while (msgidx < msglen);
1453
1454 #if (DEBUG & DEBUG_MESSAGES)
1455 printk("scsi%d.%c: message in: ",
1456 host->host->host_no, acornscsi_target(host));
1457 spi_print_msg(message);
1458 printk("\n");
1459 #endif
1460
1461 if (host->scsi.phase == PHASE_RECONNECTED) {
1462 /*
1463 * ANSI standard says: (Section SCSI-2 Rev. 10c Sect 5.6.17)
1464 * 'Whenever a target reconnects to an initiator to continue
1465 * a tagged I/O process, the SIMPLE QUEUE TAG message shall
1466 * be sent immediately following the IDENTIFY message...'
1467 */
1468 if (message[0] == SIMPLE_QUEUE_TAG)
1469 host->scsi.reconnected.tag = message[1];
1470 if (acornscsi_reconnect_finish(host))
1471 host->scsi.phase = PHASE_MSGIN;
1472 }
1473
1474 switch (message[0]) {
1475 case ABORT_TASK_SET:
1476 case ABORT_TASK:
1477 case COMMAND_COMPLETE:
1478 if (host->scsi.phase != PHASE_STATUSIN) {
1479 printk(KERN_ERR "scsi%d.%c: command complete following non-status in phase?\n",
1480 host->host->host_no, acornscsi_target(host));
1481 acornscsi_dumplog(host, host->SCpnt->device->id);
1482 }
1483 host->scsi.phase = PHASE_DONE;
1484 host->scsi.SCp.Message = message[0];
1485 break;
1486
1487 case SAVE_POINTERS:
1488 /*
1489 * ANSI standard says: (Section SCSI-2 Rev. 10c Sect 5.6.20)
1490 * 'The SAVE DATA POINTER message is sent from a target to
1491 * direct the initiator to copy the active data pointer to
1492 * the saved data pointer for the current I/O process.
1493 */
1494 acornscsi_dma_cleanup(host);
1495 host->SCpnt->SCp = host->scsi.SCp;
1496 host->SCpnt->SCp.sent_command = 0;
1497 host->scsi.phase = PHASE_MSGIN;
1498 break;
1499
1500 case RESTORE_POINTERS:
1501 /*
1502 * ANSI standard says: (Section SCSI-2 Rev. 10c Sect 5.6.19)
1503 * 'The RESTORE POINTERS message is sent from a target to
1504 * direct the initiator to copy the most recently saved
1505 * command, data, and status pointers for the I/O process
1506 * to the corresponding active pointers. The command and
1507 * status pointers shall be restored to the beginning of
1508 * the present command and status areas.'
1509 */
1510 acornscsi_dma_cleanup(host);
1511 host->scsi.SCp = host->SCpnt->SCp;
1512 host->scsi.phase = PHASE_MSGIN;
1513 break;
1514
1515 case DISCONNECT:
1516 /*
1517 * ANSI standard says: (Section SCSI-2 Rev. 10c Sect 6.4.2)
1518 * 'On those occasions when an error or exception condition occurs
1519 * and the target elects to repeat the information transfer, the
1520 * target may repeat the transfer either issuing a RESTORE POINTERS
1521 * message or by disconnecting without issuing a SAVE POINTERS
1522 * message. When reconnection is completed, the most recent
1523 * saved pointer values are restored.'
1524 */
1525 acornscsi_dma_cleanup(host);
1526 host->scsi.phase = PHASE_DISCONNECT;
1527 break;
1528
1529 case MESSAGE_REJECT:
1530 #if 0 /* this isn't needed any more */
1531 /*
1532 * If we were negociating sync transfer, we don't yet know if
1533 * this REJECT is for the sync transfer or for the tagged queue/wide
1534 * transfer. Re-initiate sync transfer negotiation now, and if
1535 * we got a REJECT in response to SDTR, then it'll be set to DONE.
1536 */
1537 if (host->device[host->SCpnt->device->id].sync_state == SYNC_SENT_REQUEST)
1538 host->device[host->SCpnt->device->id].sync_state = SYNC_NEGOCIATE;
1539 #endif
1540
1541 /*
1542 * If we have any messages waiting to go out, then assert ATN now
1543 */
1544 if (msgqueue_msglength(&host->scsi.msgs))
1545 acornscsi_sbic_issuecmd(host, CMND_ASSERTATN);
1546
1547 switch (host->scsi.last_message) {
1548 case EXTENDED_MESSAGE | (EXTENDED_SDTR << 8):
1549 /*
1550 * Target can't handle synchronous transfers
1551 */
1552 printk(KERN_NOTICE "scsi%d.%c: Using asynchronous transfer\n",
1553 host->host->host_no, acornscsi_target(host));
1554 host->device[host->SCpnt->device->id].sync_xfer = SYNCHTRANSFER_2DBA;
1555 host->device[host->SCpnt->device->id].sync_state = SYNC_ASYNCHRONOUS;
1556 sbic_arm_write(host, SBIC_SYNCHTRANSFER, host->device[host->SCpnt->device->id].sync_xfer);
1557 break;
1558
1559 default:
1560 break;
1561 }
1562 break;
1563
1564 case SIMPLE_QUEUE_TAG:
1565 /* tag queue reconnect... message[1] = queue tag. Print something to indicate something happened! */
1566 printk("scsi%d.%c: reconnect queue tag %02X\n",
1567 host->host->host_no, acornscsi_target(host),
1568 message[1]);
1569 break;
1570
1571 case EXTENDED_MESSAGE:
1572 switch (message[2]) {
1573 #ifdef CONFIG_SCSI_ACORNSCSI_SYNC
1574 case EXTENDED_SDTR:
1575 if (host->device[host->SCpnt->device->id].sync_state == SYNC_SENT_REQUEST) {
1576 /*
1577 * We requested synchronous transfers. This isn't quite right...
1578 * We can only say if this succeeded if we proceed on to execute the
1579 * command from this message. If we get a MESSAGE PARITY ERROR,
1580 * and the target retries fail, then we fallback to asynchronous mode
1581 */
1582 host->device[host->SCpnt->device->id].sync_state = SYNC_COMPLETED;
1583 printk(KERN_NOTICE "scsi%d.%c: Using synchronous transfer, offset %d, %d ns\n",
1584 host->host->host_no, acornscsi_target(host),
1585 message[4], message[3] * 4);
1586 host->device[host->SCpnt->device->id].sync_xfer =
1587 calc_sync_xfer(message[3] * 4, message[4]);
1588 } else {
1589 unsigned char period, length;
1590 /*
1591 * Target requested synchronous transfers. The agreement is only
1592 * to be in operation AFTER the target leaves message out phase.
1593 */
1594 acornscsi_sbic_issuecmd(host, CMND_ASSERTATN);
1595 period = max_t(unsigned int, message[3], sdtr_period / 4);
1596 length = min_t(unsigned int, message[4], sdtr_size);
1597 msgqueue_addmsg(&host->scsi.msgs, 5, EXTENDED_MESSAGE, 3,
1598 EXTENDED_SDTR, period, length);
1599 host->device[host->SCpnt->device->id].sync_xfer =
1600 calc_sync_xfer(period * 4, length);
1601 }
1602 sbic_arm_write(host, SBIC_SYNCHTRANSFER, host->device[host->SCpnt->device->id].sync_xfer);
1603 break;
1604 #else
1605 /* We do not accept synchronous transfers. Respond with a
1606 * MESSAGE_REJECT.
1607 */
1608 #endif
1609
1610 case EXTENDED_WDTR:
1611 /* The WD33C93A is only 8-bit. We respond with a MESSAGE_REJECT
1612 * to a wide data transfer request.
1613 */
1614 default:
1615 acornscsi_sbic_issuecmd(host, CMND_ASSERTATN);
1616 msgqueue_flush(&host->scsi.msgs);
1617 msgqueue_addmsg(&host->scsi.msgs, 1, MESSAGE_REJECT);
1618 break;
1619 }
1620 break;
1621
1622 default: /* reject message */
1623 printk(KERN_ERR "scsi%d.%c: unrecognised message %02X, rejecting\n",
1624 host->host->host_no, acornscsi_target(host),
1625 message[0]);
1626 acornscsi_sbic_issuecmd(host, CMND_ASSERTATN);
1627 msgqueue_flush(&host->scsi.msgs);
1628 msgqueue_addmsg(&host->scsi.msgs, 1, MESSAGE_REJECT);
1629 host->scsi.phase = PHASE_MSGIN;
1630 break;
1631 }
1632 acornscsi_sbic_issuecmd(host, CMND_NEGATEACK);
1633 }
1634
1635 /*
1636 * Function: int acornscsi_buildmessages(AS_Host *host)
1637 * Purpose : build the connection messages for a host
1638 * Params : host - host to add messages to
1639 */
1640 static
acornscsi_buildmessages(AS_Host * host)1641 void acornscsi_buildmessages(AS_Host *host)
1642 {
1643 #if 0
1644 /* does the device need resetting? */
1645 if (cmd_reset) {
1646 msgqueue_addmsg(&host->scsi.msgs, 1, BUS_DEVICE_RESET);
1647 return;
1648 }
1649 #endif
1650
1651 msgqueue_addmsg(&host->scsi.msgs, 1,
1652 IDENTIFY(host->device[host->SCpnt->device->id].disconnect_ok,
1653 host->SCpnt->device->lun));
1654
1655 #if 0
1656 /* does the device need the current command aborted */
1657 if (cmd_aborted) {
1658 acornscsi_abortcmd(host);
1659 return;
1660 }
1661 #endif
1662
1663
1664 #ifdef CONFIG_SCSI_ACORNSCSI_SYNC
1665 if (host->device[host->SCpnt->device->id].sync_state == SYNC_NEGOCIATE) {
1666 host->device[host->SCpnt->device->id].sync_state = SYNC_SENT_REQUEST;
1667 msgqueue_addmsg(&host->scsi.msgs, 5,
1668 EXTENDED_MESSAGE, 3, EXTENDED_SDTR,
1669 sdtr_period / 4, sdtr_size);
1670 }
1671 #endif
1672 }
1673
1674 /*
1675 * Function: int acornscsi_starttransfer(AS_Host *host)
1676 * Purpose : transfer data to/from connected target
1677 * Params : host - host to which target is connected
1678 * Returns : 0 if failure
1679 */
1680 static
acornscsi_starttransfer(AS_Host * host)1681 int acornscsi_starttransfer(AS_Host *host)
1682 {
1683 int residual;
1684
1685 if (!host->scsi.SCp.ptr /*&& host->scsi.SCp.this_residual*/) {
1686 printk(KERN_ERR "scsi%d.%c: null buffer passed to acornscsi_starttransfer\n",
1687 host->host->host_no, acornscsi_target(host));
1688 return 0;
1689 }
1690
1691 residual = scsi_bufflen(host->SCpnt) - host->scsi.SCp.scsi_xferred;
1692
1693 sbic_arm_write(host, SBIC_SYNCHTRANSFER, host->device[host->SCpnt->device->id].sync_xfer);
1694 sbic_arm_writenext(host, residual >> 16);
1695 sbic_arm_writenext(host, residual >> 8);
1696 sbic_arm_writenext(host, residual);
1697 acornscsi_sbic_issuecmd(host, CMND_XFERINFO);
1698 return 1;
1699 }
1700
1701 /* =========================================================================================
1702 * Connection & Disconnection
1703 */
1704 /*
1705 * Function : acornscsi_reconnect(AS_Host *host)
1706 * Purpose : reconnect a previously disconnected command
1707 * Params : host - host specific data
1708 * Remarks : SCSI spec says:
1709 * 'The set of active pointers is restored from the set
1710 * of saved pointers upon reconnection of the I/O process'
1711 */
1712 static
acornscsi_reconnect(AS_Host * host)1713 int acornscsi_reconnect(AS_Host *host)
1714 {
1715 unsigned int target, lun, ok = 0;
1716
1717 target = sbic_arm_read(host, SBIC_SOURCEID);
1718
1719 if (!(target & 8))
1720 printk(KERN_ERR "scsi%d: invalid source id after reselection "
1721 "- device fault?\n",
1722 host->host->host_no);
1723
1724 target &= 7;
1725
1726 if (host->SCpnt && !host->scsi.disconnectable) {
1727 printk(KERN_ERR "scsi%d.%d: reconnected while command in "
1728 "progress to target %d?\n",
1729 host->host->host_no, target, host->SCpnt->device->id);
1730 host->SCpnt = NULL;
1731 }
1732
1733 lun = sbic_arm_read(host, SBIC_DATA) & 7;
1734
1735 host->scsi.reconnected.target = target;
1736 host->scsi.reconnected.lun = lun;
1737 host->scsi.reconnected.tag = 0;
1738
1739 if (host->scsi.disconnectable && host->SCpnt &&
1740 host->SCpnt->device->id == target && host->SCpnt->device->lun == lun)
1741 ok = 1;
1742
1743 if (!ok && queue_probetgtlun(&host->queues.disconnected, target, lun))
1744 ok = 1;
1745
1746 ADD_STATUS(target, 0x81, host->scsi.phase, 0);
1747
1748 if (ok) {
1749 host->scsi.phase = PHASE_RECONNECTED;
1750 } else {
1751 /* this doesn't seem to work */
1752 printk(KERN_ERR "scsi%d.%c: reselected with no command "
1753 "to reconnect with\n",
1754 host->host->host_no, '0' + target);
1755 acornscsi_dumplog(host, target);
1756 acornscsi_abortcmd(host);
1757 if (host->SCpnt) {
1758 queue_add_cmd_tail(&host->queues.disconnected, host->SCpnt);
1759 host->SCpnt = NULL;
1760 }
1761 }
1762 acornscsi_sbic_issuecmd(host, CMND_NEGATEACK);
1763 return !ok;
1764 }
1765
1766 /*
1767 * Function: int acornscsi_reconnect_finish(AS_Host *host)
1768 * Purpose : finish reconnecting a command
1769 * Params : host - host to complete
1770 * Returns : 0 if failed
1771 */
1772 static
acornscsi_reconnect_finish(AS_Host * host)1773 int acornscsi_reconnect_finish(AS_Host *host)
1774 {
1775 if (host->scsi.disconnectable && host->SCpnt) {
1776 host->scsi.disconnectable = 0;
1777 if (host->SCpnt->device->id == host->scsi.reconnected.target &&
1778 host->SCpnt->device->lun == host->scsi.reconnected.lun &&
1779 scsi_cmd_to_rq(host->SCpnt)->tag == host->scsi.reconnected.tag) {
1780 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
1781 DBG(host->SCpnt, printk("scsi%d.%c: reconnected",
1782 host->host->host_no, acornscsi_target(host)));
1783 #endif
1784 } else {
1785 queue_add_cmd_tail(&host->queues.disconnected, host->SCpnt);
1786 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
1787 DBG(host->SCpnt, printk("scsi%d.%c: had to move command "
1788 "to disconnected queue\n",
1789 host->host->host_no, acornscsi_target(host)));
1790 #endif
1791 host->SCpnt = NULL;
1792 }
1793 }
1794 if (!host->SCpnt) {
1795 host->SCpnt = queue_remove_tgtluntag(&host->queues.disconnected,
1796 host->scsi.reconnected.target,
1797 host->scsi.reconnected.lun,
1798 host->scsi.reconnected.tag);
1799 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
1800 DBG(host->SCpnt, printk("scsi%d.%c: had to get command",
1801 host->host->host_no, acornscsi_target(host)));
1802 #endif
1803 }
1804
1805 if (!host->SCpnt)
1806 acornscsi_abortcmd(host);
1807 else {
1808 /*
1809 * Restore data pointer from SAVED pointers.
1810 */
1811 host->scsi.SCp = host->SCpnt->SCp;
1812 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
1813 printk(", data pointers: [%p, %X]",
1814 host->scsi.SCp.ptr, host->scsi.SCp.this_residual);
1815 #endif
1816 }
1817 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
1818 printk("\n");
1819 #endif
1820
1821 host->dma.transferred = host->scsi.SCp.scsi_xferred;
1822
1823 return host->SCpnt != NULL;
1824 }
1825
1826 /*
1827 * Function: void acornscsi_disconnect_unexpected(AS_Host *host)
1828 * Purpose : handle an unexpected disconnect
1829 * Params : host - host on which disconnect occurred
1830 */
1831 static
acornscsi_disconnect_unexpected(AS_Host * host)1832 void acornscsi_disconnect_unexpected(AS_Host *host)
1833 {
1834 printk(KERN_ERR "scsi%d.%c: unexpected disconnect\n",
1835 host->host->host_no, acornscsi_target(host));
1836 #if (DEBUG & DEBUG_ABORT)
1837 acornscsi_dumplog(host, 8);
1838 #endif
1839
1840 acornscsi_done(host, &host->SCpnt, DID_ERROR);
1841 }
1842
1843 /*
1844 * Function: void acornscsi_abortcmd(AS_host *host, unsigned char tag)
1845 * Purpose : abort a currently executing command
1846 * Params : host - host with connected command to abort
1847 */
1848 static
acornscsi_abortcmd(AS_Host * host)1849 void acornscsi_abortcmd(AS_Host *host)
1850 {
1851 host->scsi.phase = PHASE_ABORTED;
1852 sbic_arm_write(host, SBIC_CMND, CMND_ASSERTATN);
1853
1854 msgqueue_flush(&host->scsi.msgs);
1855 msgqueue_addmsg(&host->scsi.msgs, 1, ABORT);
1856 }
1857
1858 /* ==========================================================================================
1859 * Interrupt routines.
1860 */
1861 /*
1862 * Function: int acornscsi_sbicintr(AS_Host *host)
1863 * Purpose : handle interrupts from SCSI device
1864 * Params : host - host to process
1865 * Returns : INTR_PROCESS if expecting another SBIC interrupt
1866 * INTR_IDLE if no interrupt
1867 * INTR_NEXT_COMMAND if we have finished processing the command
1868 */
1869 static
acornscsi_sbicintr(AS_Host * host,int in_irq)1870 intr_ret_t acornscsi_sbicintr(AS_Host *host, int in_irq)
1871 {
1872 unsigned int asr, ssr;
1873
1874 asr = sbic_arm_read(host, SBIC_ASR);
1875 if (!(asr & ASR_INT))
1876 return INTR_IDLE;
1877
1878 ssr = sbic_arm_read(host, SBIC_SSR);
1879
1880 #if (DEBUG & DEBUG_PHASES)
1881 print_sbic_status(asr, ssr, host->scsi.phase);
1882 #endif
1883
1884 ADD_STATUS(8, ssr, host->scsi.phase, in_irq);
1885
1886 if (host->SCpnt && !host->scsi.disconnectable)
1887 ADD_STATUS(host->SCpnt->device->id, ssr, host->scsi.phase, in_irq);
1888
1889 switch (ssr) {
1890 case 0x00: /* reset state - not advanced */
1891 printk(KERN_ERR "scsi%d: reset in standard mode but wanted advanced mode.\n",
1892 host->host->host_no);
1893 /* setup sbic - WD33C93A */
1894 sbic_arm_write(host, SBIC_OWNID, OWNID_EAF | host->host->this_id);
1895 sbic_arm_write(host, SBIC_CMND, CMND_RESET);
1896 return INTR_IDLE;
1897
1898 case 0x01: /* reset state - advanced */
1899 sbic_arm_write(host, SBIC_CTRL, INIT_SBICDMA | CTRL_IDI);
1900 sbic_arm_write(host, SBIC_TIMEOUT, TIMEOUT_TIME);
1901 sbic_arm_write(host, SBIC_SYNCHTRANSFER, SYNCHTRANSFER_2DBA);
1902 sbic_arm_write(host, SBIC_SOURCEID, SOURCEID_ER | SOURCEID_DSP);
1903 msgqueue_flush(&host->scsi.msgs);
1904 return INTR_IDLE;
1905
1906 case 0x41: /* unexpected disconnect aborted command */
1907 acornscsi_disconnect_unexpected(host);
1908 return INTR_NEXT_COMMAND;
1909 }
1910
1911 switch (host->scsi.phase) {
1912 case PHASE_CONNECTING: /* STATE: command removed from issue queue */
1913 switch (ssr) {
1914 case 0x11: /* -> PHASE_CONNECTED */
1915 /* BUS FREE -> SELECTION */
1916 host->scsi.phase = PHASE_CONNECTED;
1917 msgqueue_flush(&host->scsi.msgs);
1918 host->dma.transferred = host->scsi.SCp.scsi_xferred;
1919 /* 33C93 gives next interrupt indicating bus phase */
1920 asr = sbic_arm_read(host, SBIC_ASR);
1921 if (!(asr & ASR_INT))
1922 break;
1923 ssr = sbic_arm_read(host, SBIC_SSR);
1924 ADD_STATUS(8, ssr, host->scsi.phase, 1);
1925 ADD_STATUS(host->SCpnt->device->id, ssr, host->scsi.phase, 1);
1926 goto connected;
1927
1928 case 0x42: /* select timed out */
1929 /* -> PHASE_IDLE */
1930 acornscsi_done(host, &host->SCpnt, DID_NO_CONNECT);
1931 return INTR_NEXT_COMMAND;
1932
1933 case 0x81: /* -> PHASE_RECONNECTED or PHASE_ABORTED */
1934 /* BUS FREE -> RESELECTION */
1935 host->origSCpnt = host->SCpnt;
1936 host->SCpnt = NULL;
1937 msgqueue_flush(&host->scsi.msgs);
1938 acornscsi_reconnect(host);
1939 break;
1940
1941 default:
1942 printk(KERN_ERR "scsi%d.%c: PHASE_CONNECTING, SSR %02X?\n",
1943 host->host->host_no, acornscsi_target(host), ssr);
1944 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
1945 acornscsi_abortcmd(host);
1946 }
1947 return INTR_PROCESSING;
1948
1949 connected:
1950 case PHASE_CONNECTED: /* STATE: device selected ok */
1951 switch (ssr) {
1952 #ifdef NONSTANDARD
1953 case 0x8a: /* -> PHASE_COMMAND, PHASE_COMMANDPAUSED */
1954 /* SELECTION -> COMMAND */
1955 acornscsi_sendcommand(host);
1956 break;
1957
1958 case 0x8b: /* -> PHASE_STATUS */
1959 /* SELECTION -> STATUS */
1960 acornscsi_readstatusbyte(host);
1961 host->scsi.phase = PHASE_STATUSIN;
1962 break;
1963 #endif
1964
1965 case 0x8e: /* -> PHASE_MSGOUT */
1966 /* SELECTION ->MESSAGE OUT */
1967 host->scsi.phase = PHASE_MSGOUT;
1968 acornscsi_buildmessages(host);
1969 acornscsi_sendmessage(host);
1970 break;
1971
1972 /* these should not happen */
1973 case 0x85: /* target disconnected */
1974 acornscsi_done(host, &host->SCpnt, DID_ERROR);
1975 break;
1976
1977 default:
1978 printk(KERN_ERR "scsi%d.%c: PHASE_CONNECTED, SSR %02X?\n",
1979 host->host->host_no, acornscsi_target(host), ssr);
1980 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
1981 acornscsi_abortcmd(host);
1982 }
1983 return INTR_PROCESSING;
1984
1985 case PHASE_MSGOUT: /* STATE: connected & sent IDENTIFY message */
1986 /*
1987 * SCSI standard says that MESSAGE OUT phases can be followed by a
1988 * DATA phase, STATUS phase, MESSAGE IN phase or COMMAND phase
1989 */
1990 switch (ssr) {
1991 case 0x8a: /* -> PHASE_COMMAND, PHASE_COMMANDPAUSED */
1992 case 0x1a: /* -> PHASE_COMMAND, PHASE_COMMANDPAUSED */
1993 /* MESSAGE OUT -> COMMAND */
1994 acornscsi_sendcommand(host);
1995 break;
1996
1997 case 0x8b: /* -> PHASE_STATUS */
1998 case 0x1b: /* -> PHASE_STATUS */
1999 /* MESSAGE OUT -> STATUS */
2000 acornscsi_readstatusbyte(host);
2001 host->scsi.phase = PHASE_STATUSIN;
2002 break;
2003
2004 case 0x8e: /* -> PHASE_MSGOUT */
2005 /* MESSAGE_OUT(MESSAGE_IN) ->MESSAGE OUT */
2006 acornscsi_sendmessage(host);
2007 break;
2008
2009 case 0x4f: /* -> PHASE_MSGIN, PHASE_DISCONNECT */
2010 case 0x1f: /* -> PHASE_MSGIN, PHASE_DISCONNECT */
2011 /* MESSAGE OUT -> MESSAGE IN */
2012 acornscsi_message(host);
2013 break;
2014
2015 default:
2016 printk(KERN_ERR "scsi%d.%c: PHASE_MSGOUT, SSR %02X?\n",
2017 host->host->host_no, acornscsi_target(host), ssr);
2018 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2019 }
2020 return INTR_PROCESSING;
2021
2022 case PHASE_COMMAND: /* STATE: connected & command sent */
2023 switch (ssr) {
2024 case 0x18: /* -> PHASE_DATAOUT */
2025 /* COMMAND -> DATA OUT */
2026 if (host->scsi.SCp.sent_command != host->SCpnt->cmd_len)
2027 acornscsi_abortcmd(host);
2028 acornscsi_dma_setup(host, DMA_OUT);
2029 if (!acornscsi_starttransfer(host))
2030 acornscsi_abortcmd(host);
2031 host->scsi.phase = PHASE_DATAOUT;
2032 return INTR_IDLE;
2033
2034 case 0x19: /* -> PHASE_DATAIN */
2035 /* COMMAND -> DATA IN */
2036 if (host->scsi.SCp.sent_command != host->SCpnt->cmd_len)
2037 acornscsi_abortcmd(host);
2038 acornscsi_dma_setup(host, DMA_IN);
2039 if (!acornscsi_starttransfer(host))
2040 acornscsi_abortcmd(host);
2041 host->scsi.phase = PHASE_DATAIN;
2042 return INTR_IDLE;
2043
2044 case 0x1b: /* -> PHASE_STATUS */
2045 /* COMMAND -> STATUS */
2046 acornscsi_readstatusbyte(host);
2047 host->scsi.phase = PHASE_STATUSIN;
2048 break;
2049
2050 case 0x1e: /* -> PHASE_MSGOUT */
2051 /* COMMAND -> MESSAGE OUT */
2052 acornscsi_sendmessage(host);
2053 break;
2054
2055 case 0x1f: /* -> PHASE_MSGIN, PHASE_DISCONNECT */
2056 /* COMMAND -> MESSAGE IN */
2057 acornscsi_message(host);
2058 break;
2059
2060 default:
2061 printk(KERN_ERR "scsi%d.%c: PHASE_COMMAND, SSR %02X?\n",
2062 host->host->host_no, acornscsi_target(host), ssr);
2063 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2064 }
2065 return INTR_PROCESSING;
2066
2067 case PHASE_DISCONNECT: /* STATE: connected, received DISCONNECT msg */
2068 if (ssr == 0x85) { /* -> PHASE_IDLE */
2069 host->scsi.disconnectable = 1;
2070 host->scsi.reconnected.tag = 0;
2071 host->scsi.phase = PHASE_IDLE;
2072 host->stats.disconnects += 1;
2073 } else {
2074 printk(KERN_ERR "scsi%d.%c: PHASE_DISCONNECT, SSR %02X instead of disconnect?\n",
2075 host->host->host_no, acornscsi_target(host), ssr);
2076 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2077 }
2078 return INTR_NEXT_COMMAND;
2079
2080 case PHASE_IDLE: /* STATE: disconnected */
2081 if (ssr == 0x81) /* -> PHASE_RECONNECTED or PHASE_ABORTED */
2082 acornscsi_reconnect(host);
2083 else {
2084 printk(KERN_ERR "scsi%d.%c: PHASE_IDLE, SSR %02X while idle?\n",
2085 host->host->host_no, acornscsi_target(host), ssr);
2086 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2087 }
2088 return INTR_PROCESSING;
2089
2090 case PHASE_RECONNECTED: /* STATE: device reconnected to initiator */
2091 /*
2092 * Command reconnected - if MESGIN, get message - it may be
2093 * the tag. If not, get command out of disconnected queue
2094 */
2095 /*
2096 * If we reconnected and we're not in MESSAGE IN phase after IDENTIFY,
2097 * reconnect I_T_L command
2098 */
2099 if (ssr != 0x8f && !acornscsi_reconnect_finish(host))
2100 return INTR_IDLE;
2101 ADD_STATUS(host->SCpnt->device->id, ssr, host->scsi.phase, in_irq);
2102 switch (ssr) {
2103 case 0x88: /* data out phase */
2104 /* -> PHASE_DATAOUT */
2105 /* MESSAGE IN -> DATA OUT */
2106 acornscsi_dma_setup(host, DMA_OUT);
2107 if (!acornscsi_starttransfer(host))
2108 acornscsi_abortcmd(host);
2109 host->scsi.phase = PHASE_DATAOUT;
2110 return INTR_IDLE;
2111
2112 case 0x89: /* data in phase */
2113 /* -> PHASE_DATAIN */
2114 /* MESSAGE IN -> DATA IN */
2115 acornscsi_dma_setup(host, DMA_IN);
2116 if (!acornscsi_starttransfer(host))
2117 acornscsi_abortcmd(host);
2118 host->scsi.phase = PHASE_DATAIN;
2119 return INTR_IDLE;
2120
2121 case 0x8a: /* command out */
2122 /* MESSAGE IN -> COMMAND */
2123 acornscsi_sendcommand(host);/* -> PHASE_COMMAND, PHASE_COMMANDPAUSED */
2124 break;
2125
2126 case 0x8b: /* status in */
2127 /* -> PHASE_STATUSIN */
2128 /* MESSAGE IN -> STATUS */
2129 acornscsi_readstatusbyte(host);
2130 host->scsi.phase = PHASE_STATUSIN;
2131 break;
2132
2133 case 0x8e: /* message out */
2134 /* -> PHASE_MSGOUT */
2135 /* MESSAGE IN -> MESSAGE OUT */
2136 acornscsi_sendmessage(host);
2137 break;
2138
2139 case 0x8f: /* message in */
2140 acornscsi_message(host); /* -> PHASE_MSGIN, PHASE_DISCONNECT */
2141 break;
2142
2143 default:
2144 printk(KERN_ERR "scsi%d.%c: PHASE_RECONNECTED, SSR %02X after reconnect?\n",
2145 host->host->host_no, acornscsi_target(host), ssr);
2146 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2147 }
2148 return INTR_PROCESSING;
2149
2150 case PHASE_DATAIN: /* STATE: transferred data in */
2151 /*
2152 * This is simple - if we disconnect then the DMA address & count is
2153 * correct.
2154 */
2155 switch (ssr) {
2156 case 0x19: /* -> PHASE_DATAIN */
2157 case 0x89: /* -> PHASE_DATAIN */
2158 acornscsi_abortcmd(host);
2159 return INTR_IDLE;
2160
2161 case 0x1b: /* -> PHASE_STATUSIN */
2162 case 0x4b: /* -> PHASE_STATUSIN */
2163 case 0x8b: /* -> PHASE_STATUSIN */
2164 /* DATA IN -> STATUS */
2165 host->scsi.SCp.scsi_xferred = scsi_bufflen(host->SCpnt) -
2166 acornscsi_sbic_xfcount(host);
2167 acornscsi_dma_stop(host);
2168 acornscsi_readstatusbyte(host);
2169 host->scsi.phase = PHASE_STATUSIN;
2170 break;
2171
2172 case 0x1e: /* -> PHASE_MSGOUT */
2173 case 0x4e: /* -> PHASE_MSGOUT */
2174 case 0x8e: /* -> PHASE_MSGOUT */
2175 /* DATA IN -> MESSAGE OUT */
2176 host->scsi.SCp.scsi_xferred = scsi_bufflen(host->SCpnt) -
2177 acornscsi_sbic_xfcount(host);
2178 acornscsi_dma_stop(host);
2179 acornscsi_sendmessage(host);
2180 break;
2181
2182 case 0x1f: /* message in */
2183 case 0x4f: /* message in */
2184 case 0x8f: /* message in */
2185 /* DATA IN -> MESSAGE IN */
2186 host->scsi.SCp.scsi_xferred = scsi_bufflen(host->SCpnt) -
2187 acornscsi_sbic_xfcount(host);
2188 acornscsi_dma_stop(host);
2189 acornscsi_message(host); /* -> PHASE_MSGIN, PHASE_DISCONNECT */
2190 break;
2191
2192 default:
2193 printk(KERN_ERR "scsi%d.%c: PHASE_DATAIN, SSR %02X?\n",
2194 host->host->host_no, acornscsi_target(host), ssr);
2195 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2196 }
2197 return INTR_PROCESSING;
2198
2199 case PHASE_DATAOUT: /* STATE: transferred data out */
2200 /*
2201 * This is more complicated - if we disconnect, the DMA could be 12
2202 * bytes ahead of us. We need to correct this.
2203 */
2204 switch (ssr) {
2205 case 0x18: /* -> PHASE_DATAOUT */
2206 case 0x88: /* -> PHASE_DATAOUT */
2207 acornscsi_abortcmd(host);
2208 return INTR_IDLE;
2209
2210 case 0x1b: /* -> PHASE_STATUSIN */
2211 case 0x4b: /* -> PHASE_STATUSIN */
2212 case 0x8b: /* -> PHASE_STATUSIN */
2213 /* DATA OUT -> STATUS */
2214 host->scsi.SCp.scsi_xferred = scsi_bufflen(host->SCpnt) -
2215 acornscsi_sbic_xfcount(host);
2216 acornscsi_dma_stop(host);
2217 acornscsi_dma_adjust(host);
2218 acornscsi_readstatusbyte(host);
2219 host->scsi.phase = PHASE_STATUSIN;
2220 break;
2221
2222 case 0x1e: /* -> PHASE_MSGOUT */
2223 case 0x4e: /* -> PHASE_MSGOUT */
2224 case 0x8e: /* -> PHASE_MSGOUT */
2225 /* DATA OUT -> MESSAGE OUT */
2226 host->scsi.SCp.scsi_xferred = scsi_bufflen(host->SCpnt) -
2227 acornscsi_sbic_xfcount(host);
2228 acornscsi_dma_stop(host);
2229 acornscsi_dma_adjust(host);
2230 acornscsi_sendmessage(host);
2231 break;
2232
2233 case 0x1f: /* message in */
2234 case 0x4f: /* message in */
2235 case 0x8f: /* message in */
2236 /* DATA OUT -> MESSAGE IN */
2237 host->scsi.SCp.scsi_xferred = scsi_bufflen(host->SCpnt) -
2238 acornscsi_sbic_xfcount(host);
2239 acornscsi_dma_stop(host);
2240 acornscsi_dma_adjust(host);
2241 acornscsi_message(host); /* -> PHASE_MSGIN, PHASE_DISCONNECT */
2242 break;
2243
2244 default:
2245 printk(KERN_ERR "scsi%d.%c: PHASE_DATAOUT, SSR %02X?\n",
2246 host->host->host_no, acornscsi_target(host), ssr);
2247 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2248 }
2249 return INTR_PROCESSING;
2250
2251 case PHASE_STATUSIN: /* STATE: status in complete */
2252 switch (ssr) {
2253 case 0x1f: /* -> PHASE_MSGIN, PHASE_DONE, PHASE_DISCONNECT */
2254 case 0x8f: /* -> PHASE_MSGIN, PHASE_DONE, PHASE_DISCONNECT */
2255 /* STATUS -> MESSAGE IN */
2256 acornscsi_message(host);
2257 break;
2258
2259 case 0x1e: /* -> PHASE_MSGOUT */
2260 case 0x8e: /* -> PHASE_MSGOUT */
2261 /* STATUS -> MESSAGE OUT */
2262 acornscsi_sendmessage(host);
2263 break;
2264
2265 default:
2266 printk(KERN_ERR "scsi%d.%c: PHASE_STATUSIN, SSR %02X instead of MESSAGE_IN?\n",
2267 host->host->host_no, acornscsi_target(host), ssr);
2268 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2269 }
2270 return INTR_PROCESSING;
2271
2272 case PHASE_MSGIN: /* STATE: message in */
2273 switch (ssr) {
2274 case 0x1e: /* -> PHASE_MSGOUT */
2275 case 0x4e: /* -> PHASE_MSGOUT */
2276 case 0x8e: /* -> PHASE_MSGOUT */
2277 /* MESSAGE IN -> MESSAGE OUT */
2278 acornscsi_sendmessage(host);
2279 break;
2280
2281 case 0x1f: /* -> PHASE_MSGIN, PHASE_DONE, PHASE_DISCONNECT */
2282 case 0x2f:
2283 case 0x4f:
2284 case 0x8f:
2285 acornscsi_message(host);
2286 break;
2287
2288 case 0x85:
2289 printk("scsi%d.%c: strange message in disconnection\n",
2290 host->host->host_no, acornscsi_target(host));
2291 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2292 acornscsi_done(host, &host->SCpnt, DID_ERROR);
2293 break;
2294
2295 default:
2296 printk(KERN_ERR "scsi%d.%c: PHASE_MSGIN, SSR %02X after message in?\n",
2297 host->host->host_no, acornscsi_target(host), ssr);
2298 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2299 }
2300 return INTR_PROCESSING;
2301
2302 case PHASE_DONE: /* STATE: received status & message */
2303 switch (ssr) {
2304 case 0x85: /* -> PHASE_IDLE */
2305 acornscsi_done(host, &host->SCpnt, DID_OK);
2306 return INTR_NEXT_COMMAND;
2307
2308 case 0x1e:
2309 case 0x8e:
2310 acornscsi_sendmessage(host);
2311 break;
2312
2313 default:
2314 printk(KERN_ERR "scsi%d.%c: PHASE_DONE, SSR %02X instead of disconnect?\n",
2315 host->host->host_no, acornscsi_target(host), ssr);
2316 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2317 }
2318 return INTR_PROCESSING;
2319
2320 case PHASE_ABORTED:
2321 switch (ssr) {
2322 case 0x85:
2323 if (host->SCpnt)
2324 acornscsi_done(host, &host->SCpnt, DID_ABORT);
2325 else {
2326 clear_bit(host->scsi.reconnected.target * 8 + host->scsi.reconnected.lun,
2327 host->busyluns);
2328 host->scsi.phase = PHASE_IDLE;
2329 }
2330 return INTR_NEXT_COMMAND;
2331
2332 case 0x1e:
2333 case 0x2e:
2334 case 0x4e:
2335 case 0x8e:
2336 acornscsi_sendmessage(host);
2337 break;
2338
2339 default:
2340 printk(KERN_ERR "scsi%d.%c: PHASE_ABORTED, SSR %02X?\n",
2341 host->host->host_no, acornscsi_target(host), ssr);
2342 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2343 }
2344 return INTR_PROCESSING;
2345
2346 default:
2347 printk(KERN_ERR "scsi%d.%c: unknown driver phase %d\n",
2348 host->host->host_no, acornscsi_target(host), ssr);
2349 acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2350 }
2351 return INTR_PROCESSING;
2352 }
2353
2354 /*
2355 * Prototype: void acornscsi_intr(int irq, void *dev_id)
2356 * Purpose : handle interrupts from Acorn SCSI card
2357 * Params : irq - interrupt number
2358 * dev_id - device specific data (AS_Host structure)
2359 */
2360 static irqreturn_t
acornscsi_intr(int irq,void * dev_id)2361 acornscsi_intr(int irq, void *dev_id)
2362 {
2363 AS_Host *host = (AS_Host *)dev_id;
2364 intr_ret_t ret;
2365 int iostatus;
2366 int in_irq = 0;
2367
2368 do {
2369 ret = INTR_IDLE;
2370
2371 iostatus = readb(host->fast + INT_REG);
2372
2373 if (iostatus & 2) {
2374 acornscsi_dma_intr(host);
2375 iostatus = readb(host->fast + INT_REG);
2376 }
2377
2378 if (iostatus & 8)
2379 ret = acornscsi_sbicintr(host, in_irq);
2380
2381 /*
2382 * If we have a transfer pending, start it.
2383 * Only start it if the interface has already started transferring
2384 * it's data
2385 */
2386 if (host->dma.xfer_required)
2387 acornscsi_dma_xfer(host);
2388
2389 if (ret == INTR_NEXT_COMMAND)
2390 ret = acornscsi_kick(host);
2391
2392 in_irq = 1;
2393 } while (ret != INTR_IDLE);
2394
2395 return IRQ_HANDLED;
2396 }
2397
2398 /*=============================================================================================
2399 * Interfaces between interrupt handler and rest of scsi code
2400 */
2401
2402 /*
2403 * Function : acornscsi_queuecmd(struct scsi_cmnd *cmd, void (*done)(struct scsi_cmnd *))
2404 * Purpose : queues a SCSI command
2405 * Params : cmd - SCSI command
2406 * done - function called on completion, with pointer to command descriptor
2407 * Returns : 0, or < 0 on error.
2408 */
acornscsi_queuecmd_lck(struct scsi_cmnd * SCpnt,void (* done)(struct scsi_cmnd *))2409 static int acornscsi_queuecmd_lck(struct scsi_cmnd *SCpnt,
2410 void (*done)(struct scsi_cmnd *))
2411 {
2412 AS_Host *host = (AS_Host *)SCpnt->device->host->hostdata;
2413
2414 if (!done) {
2415 /* there should be some way of rejecting errors like this without panicing... */
2416 panic("scsi%d: queuecommand called with NULL done function [cmd=%p]",
2417 host->host->host_no, SCpnt);
2418 return -EINVAL;
2419 }
2420
2421 #if (DEBUG & DEBUG_NO_WRITE)
2422 if (acornscsi_cmdtype(SCpnt->cmnd[0]) == CMD_WRITE && (NO_WRITE & (1 << SCpnt->device->id))) {
2423 printk(KERN_CRIT "scsi%d.%c: WRITE attempted with NO_WRITE flag set\n",
2424 host->host->host_no, '0' + SCpnt->device->id);
2425 set_host_byte(SCpnt, DID_NO_CONNECT);
2426 done(SCpnt);
2427 return 0;
2428 }
2429 #endif
2430
2431 SCpnt->scsi_done = done;
2432 SCpnt->host_scribble = NULL;
2433 SCpnt->result = 0;
2434 SCpnt->SCp.phase = (int)acornscsi_datadirection(SCpnt->cmnd[0]);
2435 SCpnt->SCp.sent_command = 0;
2436 SCpnt->SCp.scsi_xferred = 0;
2437
2438 init_SCp(SCpnt);
2439
2440 host->stats.queues += 1;
2441
2442 {
2443 unsigned long flags;
2444
2445 if (!queue_add_cmd_ordered(&host->queues.issue, SCpnt)) {
2446 set_host_byte(SCpnt, DID_ERROR);
2447 done(SCpnt);
2448 return 0;
2449 }
2450 local_irq_save(flags);
2451 if (host->scsi.phase == PHASE_IDLE)
2452 acornscsi_kick(host);
2453 local_irq_restore(flags);
2454 }
2455 return 0;
2456 }
2457
2458 DEF_SCSI_QCMD(acornscsi_queuecmd)
2459
2460 enum res_abort { res_not_running, res_success, res_success_clear, res_snooze };
2461
2462 /*
2463 * Prototype: enum res acornscsi_do_abort(struct scsi_cmnd *SCpnt)
2464 * Purpose : abort a command on this host
2465 * Params : SCpnt - command to abort
2466 * Returns : our abort status
2467 */
acornscsi_do_abort(AS_Host * host,struct scsi_cmnd * SCpnt)2468 static enum res_abort acornscsi_do_abort(AS_Host *host, struct scsi_cmnd *SCpnt)
2469 {
2470 enum res_abort res = res_not_running;
2471
2472 if (queue_remove_cmd(&host->queues.issue, SCpnt)) {
2473 /*
2474 * The command was on the issue queue, and has not been
2475 * issued yet. We can remove the command from the queue,
2476 * and acknowledge the abort. Neither the devices nor the
2477 * interface know about the command.
2478 */
2479 //#if (DEBUG & DEBUG_ABORT)
2480 printk("on issue queue ");
2481 //#endif
2482 res = res_success;
2483 } else if (queue_remove_cmd(&host->queues.disconnected, SCpnt)) {
2484 /*
2485 * The command was on the disconnected queue. Simply
2486 * acknowledge the abort condition, and when the target
2487 * reconnects, we will give it an ABORT message. The
2488 * target should then disconnect, and we will clear
2489 * the busylun bit.
2490 */
2491 //#if (DEBUG & DEBUG_ABORT)
2492 printk("on disconnected queue ");
2493 //#endif
2494 res = res_success;
2495 } else if (host->SCpnt == SCpnt) {
2496 unsigned long flags;
2497
2498 //#if (DEBUG & DEBUG_ABORT)
2499 printk("executing ");
2500 //#endif
2501
2502 local_irq_save(flags);
2503 switch (host->scsi.phase) {
2504 /*
2505 * If the interface is idle, and the command is 'disconnectable',
2506 * then it is the same as on the disconnected queue. We simply
2507 * remove all traces of the command. When the target reconnects,
2508 * we will give it an ABORT message since the command could not
2509 * be found. When the target finally disconnects, we will clear
2510 * the busylun bit.
2511 */
2512 case PHASE_IDLE:
2513 if (host->scsi.disconnectable) {
2514 host->scsi.disconnectable = 0;
2515 host->SCpnt = NULL;
2516 res = res_success;
2517 }
2518 break;
2519
2520 /*
2521 * If the command has connected and done nothing further,
2522 * simply force a disconnect. We also need to clear the
2523 * busylun bit.
2524 */
2525 case PHASE_CONNECTED:
2526 sbic_arm_write(host, SBIC_CMND, CMND_DISCONNECT);
2527 host->SCpnt = NULL;
2528 res = res_success_clear;
2529 break;
2530
2531 default:
2532 acornscsi_abortcmd(host);
2533 res = res_snooze;
2534 }
2535 local_irq_restore(flags);
2536 } else if (host->origSCpnt == SCpnt) {
2537 /*
2538 * The command will be executed next, but a command
2539 * is currently using the interface. This is similar to
2540 * being on the issue queue, except the busylun bit has
2541 * been set.
2542 */
2543 host->origSCpnt = NULL;
2544 //#if (DEBUG & DEBUG_ABORT)
2545 printk("waiting for execution ");
2546 //#endif
2547 res = res_success_clear;
2548 } else
2549 printk("unknown ");
2550
2551 return res;
2552 }
2553
2554 /*
2555 * Prototype: int acornscsi_abort(struct scsi_cmnd *SCpnt)
2556 * Purpose : abort a command on this host
2557 * Params : SCpnt - command to abort
2558 * Returns : one of SCSI_ABORT_ macros
2559 */
acornscsi_abort(struct scsi_cmnd * SCpnt)2560 int acornscsi_abort(struct scsi_cmnd *SCpnt)
2561 {
2562 AS_Host *host = (AS_Host *) SCpnt->device->host->hostdata;
2563 int result;
2564
2565 host->stats.aborts += 1;
2566
2567 #if (DEBUG & DEBUG_ABORT)
2568 {
2569 int asr, ssr;
2570 asr = sbic_arm_read(host, SBIC_ASR);
2571 ssr = sbic_arm_read(host, SBIC_SSR);
2572
2573 printk(KERN_WARNING "acornscsi_abort: ");
2574 print_sbic_status(asr, ssr, host->scsi.phase);
2575 acornscsi_dumplog(host, SCpnt->device->id);
2576 }
2577 #endif
2578
2579 printk("scsi%d: ", host->host->host_no);
2580
2581 switch (acornscsi_do_abort(host, SCpnt)) {
2582 /*
2583 * We managed to find the command and cleared it out.
2584 * We do not expect the command to be executing on the
2585 * target, but we have set the busylun bit.
2586 */
2587 case res_success_clear:
2588 //#if (DEBUG & DEBUG_ABORT)
2589 printk("clear ");
2590 //#endif
2591 clear_bit(SCpnt->device->id * 8 +
2592 (u8)(SCpnt->device->lun & 0x7), host->busyluns);
2593 fallthrough;
2594
2595 /*
2596 * We found the command, and cleared it out. Either
2597 * the command is still known to be executing on the
2598 * target, or the busylun bit is not set.
2599 */
2600 case res_success:
2601 //#if (DEBUG & DEBUG_ABORT)
2602 printk("success\n");
2603 //#endif
2604 result = SUCCESS;
2605 break;
2606
2607 /*
2608 * We did find the command, but unfortunately we couldn't
2609 * unhook it from ourselves. Wait some more, and if it
2610 * still doesn't complete, reset the interface.
2611 */
2612 case res_snooze:
2613 //#if (DEBUG & DEBUG_ABORT)
2614 printk("snooze\n");
2615 //#endif
2616 result = FAILED;
2617 break;
2618
2619 /*
2620 * The command could not be found (either because it completed,
2621 * or it got dropped.
2622 */
2623 default:
2624 case res_not_running:
2625 acornscsi_dumplog(host, SCpnt->device->id);
2626 result = FAILED;
2627 //#if (DEBUG & DEBUG_ABORT)
2628 printk("not running\n");
2629 //#endif
2630 break;
2631 }
2632
2633 return result;
2634 }
2635
2636 /*
2637 * Prototype: int acornscsi_reset(struct scsi_cmnd *SCpnt)
2638 * Purpose : reset a command on this host/reset this host
2639 * Params : SCpnt - command causing reset
2640 * Returns : one of SCSI_RESET_ macros
2641 */
acornscsi_host_reset(struct scsi_cmnd * SCpnt)2642 int acornscsi_host_reset(struct scsi_cmnd *SCpnt)
2643 {
2644 AS_Host *host = (AS_Host *)SCpnt->device->host->hostdata;
2645 struct scsi_cmnd *SCptr;
2646
2647 host->stats.resets += 1;
2648
2649 #if (DEBUG & DEBUG_RESET)
2650 {
2651 int asr, ssr, devidx;
2652
2653 asr = sbic_arm_read(host, SBIC_ASR);
2654 ssr = sbic_arm_read(host, SBIC_SSR);
2655
2656 printk(KERN_WARNING "acornscsi_reset: ");
2657 print_sbic_status(asr, ssr, host->scsi.phase);
2658 for (devidx = 0; devidx < 9; devidx++)
2659 acornscsi_dumplog(host, devidx);
2660 }
2661 #endif
2662
2663 acornscsi_dma_stop(host);
2664
2665 /*
2666 * do hard reset. This resets all devices on this host, and so we
2667 * must set the reset status on all commands.
2668 */
2669 acornscsi_resetcard(host);
2670
2671 while ((SCptr = queue_remove(&host->queues.disconnected)) != NULL)
2672 ;
2673
2674 return SUCCESS;
2675 }
2676
2677 /*==============================================================================================
2678 * initialisation & miscellaneous support
2679 */
2680
2681 /*
2682 * Function: char *acornscsi_info(struct Scsi_Host *host)
2683 * Purpose : return a string describing this interface
2684 * Params : host - host to give information on
2685 * Returns : a constant string
2686 */
2687 const
acornscsi_info(struct Scsi_Host * host)2688 char *acornscsi_info(struct Scsi_Host *host)
2689 {
2690 static char string[100], *p;
2691
2692 p = string;
2693
2694 p += sprintf(string, "%s at port %08lX irq %d v%d.%d.%d"
2695 #ifdef CONFIG_SCSI_ACORNSCSI_SYNC
2696 " SYNC"
2697 #endif
2698 #if (DEBUG & DEBUG_NO_WRITE)
2699 " NOWRITE (" __stringify(NO_WRITE) ")"
2700 #endif
2701 , host->hostt->name, host->io_port, host->irq,
2702 VER_MAJOR, VER_MINOR, VER_PATCH);
2703 return string;
2704 }
2705
acornscsi_show_info(struct seq_file * m,struct Scsi_Host * instance)2706 static int acornscsi_show_info(struct seq_file *m, struct Scsi_Host *instance)
2707 {
2708 int devidx;
2709 struct scsi_device *scd;
2710 AS_Host *host;
2711
2712 host = (AS_Host *)instance->hostdata;
2713
2714 seq_printf(m, "AcornSCSI driver v%d.%d.%d"
2715 #ifdef CONFIG_SCSI_ACORNSCSI_SYNC
2716 " SYNC"
2717 #endif
2718 #if (DEBUG & DEBUG_NO_WRITE)
2719 " NOWRITE (" __stringify(NO_WRITE) ")"
2720 #endif
2721 "\n\n", VER_MAJOR, VER_MINOR, VER_PATCH);
2722
2723 seq_printf(m, "SBIC: WD33C93A Address: %p IRQ : %d\n",
2724 host->base + SBIC_REGIDX, host->scsi.irq);
2725 #ifdef USE_DMAC
2726 seq_printf(m, "DMAC: uPC71071 Address: %p IRQ : %d\n\n",
2727 host->base + DMAC_OFFSET, host->scsi.irq);
2728 #endif
2729
2730 seq_printf(m, "Statistics:\n"
2731 "Queued commands: %-10u Issued commands: %-10u\n"
2732 "Done commands : %-10u Reads : %-10u\n"
2733 "Writes : %-10u Others : %-10u\n"
2734 "Disconnects : %-10u Aborts : %-10u\n"
2735 "Resets : %-10u\n\nLast phases:",
2736 host->stats.queues, host->stats.removes,
2737 host->stats.fins, host->stats.reads,
2738 host->stats.writes, host->stats.miscs,
2739 host->stats.disconnects, host->stats.aborts,
2740 host->stats.resets);
2741
2742 for (devidx = 0; devidx < 9; devidx ++) {
2743 unsigned int statptr, prev;
2744
2745 seq_printf(m, "\n%c:", devidx == 8 ? 'H' : ('0' + devidx));
2746 statptr = host->status_ptr[devidx] - 10;
2747
2748 if ((signed int)statptr < 0)
2749 statptr += STATUS_BUFFER_SIZE;
2750
2751 prev = host->status[devidx][statptr].when;
2752
2753 for (; statptr != host->status_ptr[devidx]; statptr = (statptr + 1) & (STATUS_BUFFER_SIZE - 1)) {
2754 if (host->status[devidx][statptr].when) {
2755 seq_printf(m, "%c%02X:%02X+%2ld",
2756 host->status[devidx][statptr].irq ? '-' : ' ',
2757 host->status[devidx][statptr].ph,
2758 host->status[devidx][statptr].ssr,
2759 (host->status[devidx][statptr].when - prev) < 100 ?
2760 (host->status[devidx][statptr].when - prev) : 99);
2761 prev = host->status[devidx][statptr].when;
2762 }
2763 }
2764 }
2765
2766 seq_printf(m, "\nAttached devices:\n");
2767
2768 shost_for_each_device(scd, instance) {
2769 seq_printf(m, "Device/Lun TaggedQ Sync\n");
2770 seq_printf(m, " %d/%llu ", scd->id, scd->lun);
2771 if (scd->tagged_supported)
2772 seq_printf(m, "%3sabled ",
2773 scd->simple_tags ? "en" : "dis");
2774 else
2775 seq_printf(m, "unsupported ");
2776
2777 if (host->device[scd->id].sync_xfer & 15)
2778 seq_printf(m, "offset %d, %d ns\n",
2779 host->device[scd->id].sync_xfer & 15,
2780 acornscsi_getperiod(host->device[scd->id].sync_xfer));
2781 else
2782 seq_printf(m, "async\n");
2783
2784 }
2785 return 0;
2786 }
2787
2788 static struct scsi_host_template acornscsi_template = {
2789 .module = THIS_MODULE,
2790 .show_info = acornscsi_show_info,
2791 .name = "AcornSCSI",
2792 .info = acornscsi_info,
2793 .queuecommand = acornscsi_queuecmd,
2794 .eh_abort_handler = acornscsi_abort,
2795 .eh_host_reset_handler = acornscsi_host_reset,
2796 .can_queue = 16,
2797 .this_id = 7,
2798 .sg_tablesize = SG_ALL,
2799 .cmd_per_lun = 2,
2800 .dma_boundary = PAGE_SIZE - 1,
2801 .proc_name = "acornscsi",
2802 };
2803
acornscsi_probe(struct expansion_card * ec,const struct ecard_id * id)2804 static int acornscsi_probe(struct expansion_card *ec, const struct ecard_id *id)
2805 {
2806 struct Scsi_Host *host;
2807 AS_Host *ashost;
2808 int ret;
2809
2810 ret = ecard_request_resources(ec);
2811 if (ret)
2812 goto out;
2813
2814 host = scsi_host_alloc(&acornscsi_template, sizeof(AS_Host));
2815 if (!host) {
2816 ret = -ENOMEM;
2817 goto out_release;
2818 }
2819
2820 ashost = (AS_Host *)host->hostdata;
2821
2822 ashost->base = ecardm_iomap(ec, ECARD_RES_MEMC, 0, 0);
2823 ashost->fast = ecardm_iomap(ec, ECARD_RES_IOCFAST, 0, 0);
2824 if (!ashost->base || !ashost->fast) {
2825 ret = -ENOMEM;
2826 goto out_put;
2827 }
2828
2829 host->irq = ec->irq;
2830 ashost->host = host;
2831 ashost->scsi.irq = host->irq;
2832
2833 ec->irqaddr = ashost->fast + INT_REG;
2834 ec->irqmask = 0x0a;
2835
2836 ret = request_irq(host->irq, acornscsi_intr, 0, "acornscsi", ashost);
2837 if (ret) {
2838 printk(KERN_CRIT "scsi%d: IRQ%d not free: %d\n",
2839 host->host_no, ashost->scsi.irq, ret);
2840 goto out_put;
2841 }
2842
2843 memset(&ashost->stats, 0, sizeof (ashost->stats));
2844 queue_initialise(&ashost->queues.issue);
2845 queue_initialise(&ashost->queues.disconnected);
2846 msgqueue_initialise(&ashost->scsi.msgs);
2847
2848 acornscsi_resetcard(ashost);
2849
2850 ret = scsi_add_host(host, &ec->dev);
2851 if (ret)
2852 goto out_irq;
2853
2854 scsi_scan_host(host);
2855 goto out;
2856
2857 out_irq:
2858 free_irq(host->irq, ashost);
2859 msgqueue_free(&ashost->scsi.msgs);
2860 queue_free(&ashost->queues.disconnected);
2861 queue_free(&ashost->queues.issue);
2862 out_put:
2863 ecardm_iounmap(ec, ashost->fast);
2864 ecardm_iounmap(ec, ashost->base);
2865 scsi_host_put(host);
2866 out_release:
2867 ecard_release_resources(ec);
2868 out:
2869 return ret;
2870 }
2871
acornscsi_remove(struct expansion_card * ec)2872 static void acornscsi_remove(struct expansion_card *ec)
2873 {
2874 struct Scsi_Host *host = ecard_get_drvdata(ec);
2875 AS_Host *ashost = (AS_Host *)host->hostdata;
2876
2877 ecard_set_drvdata(ec, NULL);
2878 scsi_remove_host(host);
2879
2880 /*
2881 * Put card into RESET state
2882 */
2883 writeb(0x80, ashost->fast + PAGE_REG);
2884
2885 free_irq(host->irq, ashost);
2886
2887 msgqueue_free(&ashost->scsi.msgs);
2888 queue_free(&ashost->queues.disconnected);
2889 queue_free(&ashost->queues.issue);
2890 ecardm_iounmap(ec, ashost->fast);
2891 ecardm_iounmap(ec, ashost->base);
2892 scsi_host_put(host);
2893 ecard_release_resources(ec);
2894 }
2895
2896 static const struct ecard_id acornscsi_cids[] = {
2897 { MANU_ACORN, PROD_ACORN_SCSI },
2898 { 0xffff, 0xffff },
2899 };
2900
2901 static struct ecard_driver acornscsi_driver = {
2902 .probe = acornscsi_probe,
2903 .remove = acornscsi_remove,
2904 .id_table = acornscsi_cids,
2905 .drv = {
2906 .name = "acornscsi",
2907 },
2908 };
2909
acornscsi_init(void)2910 static int __init acornscsi_init(void)
2911 {
2912 return ecard_register_driver(&acornscsi_driver);
2913 }
2914
acornscsi_exit(void)2915 static void __exit acornscsi_exit(void)
2916 {
2917 ecard_remove_driver(&acornscsi_driver);
2918 }
2919
2920 module_init(acornscsi_init);
2921 module_exit(acornscsi_exit);
2922
2923 MODULE_AUTHOR("Russell King");
2924 MODULE_DESCRIPTION("AcornSCSI driver");
2925 MODULE_LICENSE("GPL");
2926
