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