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