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
189	static inline void sbic_arm_write(AS_Host *host, unsigned int reg, unsigned int value)
190	{
191	writeb(val: reg, addr: host->base + SBIC_REGIDX);
192	writeb(val: value, addr: host->base + SBIC_REGVAL);
193	}
194
195	static inline int sbic_arm_read(AS_Host *host, unsigned int reg)
196	{
197	if(reg == SBIC_ASR)
198	return readl(addr: host->base + SBIC_REGIDX) & 255;
199	writeb(val: reg, addr: host->base + SBIC_REGIDX);
200	return readl(addr: 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
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
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
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
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
278	int acornscsi_sbic_issuecmd(AS_Host *host, int command)
279	{
280	if (acornscsi_sbic_wait(host, ASR_CIP, stat: 0, timeout: 1000, msg: "issuing command"))
281	return -1;
282
283	sbic_arm_write(host, SBIC_CMND, value: command);
284
285	return 0;
286	}
287
288	static void
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
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(val: host->card.page_reg, addr: host->fast + PAGE_REG);
311
312	/* wait 3 cs. SCSI standard says 25ms. */
313	acornscsi_csdelay(cs: 3);
314
315	host->card.page_reg = 0;
316	writeb(val: host->card.page_reg, addr: host->fast + PAGE_REG);
317
318	/*
319	* Should get a reset from the card
320	*/
321	timeout = 1000;
322	do {
323	if (readb(addr: 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(addr: 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(val: host->card.page_reg, addr: 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(cs: 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
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
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
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
536	void acornscsi_dumplog(AS_Host *host, int target)
537	{
538	do {
539	acornscsi_dumplogline(host, target, line: 0);
540	acornscsi_dumplogline(host, target, line: 1);
541	acornscsi_dumplogline(host, target, line: 2);
542
543	if (target == 8)
544	break;
545
546	target = 8;
547	} while (1);
548	}
549
550	static
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
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
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
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
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
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
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(queue: &host->queues.issue, exclude: 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, value: 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(cmd: 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(nr: SCpnt->device->id * 8 +
745	(u8)(SCpnt->device->lun & 0x07), addr: host->busyluns);
746
747	host->stats.removes += 1;
748
749	switch (acornscsi_cmdtype(command: 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	*/
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(cmd: SCpnt, status: result);
787	if (result == DID_OK)
788	scsi_msg_to_host_byte(cmd: SCpnt, msg: host->scsi.SCp.Message);
789	set_status_byte(cmd: SCpnt, status: 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(command: 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(cmd: 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, where: "done");
842	acornscsi_dumplog(host, target: SCpnt->device->id);
843	set_host_byte(cmd: SCpnt, status: DID_ERROR);
844	}
845	}
846	}
847
848	clear_bit(nr: SCpnt->device->id * 8 +
849	(u8)(SCpnt->device->lun & 0x7), addr: host->busyluns);
850
851	scsi_done(cmd: 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
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
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(val: (page & 0x3f) | host->card.page_reg, addr: 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), buf: ptr, len: 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(val: (page & 0x3f) | host->card.page_reg, addr: host->fast + PAGE_REG);
915	}
916	}
917	writeb(val: host->card.page_reg, addr: 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
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(val: (page & 0x3f) | host->card.page_reg, addr: 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), buf: ptr, len: 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(val: (page & 0x3f) | host->card.page_reg, addr: host->fast + PAGE_REG);
960	}
961	}
962	writeb(val: host->card.page_reg, addr: 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
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
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, ptr: host->scsi.SCp.ptr, start_addr: 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
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, ptr: host->dma.xfer_ptr,
1069	start_addr: host->dma.xfer_start, length: 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, ptr: host->scsi.SCp.ptr,
1092	start_addr: host->dma.start_addr, length: transferred);
1093
1094	/*
1095	* Update SCSI pointers
1096	*/
1097	acornscsi_data_updateptr(host, SCp: &host->scsi.SCp, length: 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
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, SCp: &host->scsi.SCp, length: 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, ptr: host->scsi.SCp.ptr, start_addr: 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
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, ptr: host->dma.xfer_ptr,
1206	start_addr: host->dma.xfer_start, length: 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
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
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, value: 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
1287	acornscsi_sendcommand(AS_Host *host)
1288	{
1289	struct scsi_cmnd *SCpnt = host->SCpnt;
1290
1291	sbic_arm_write(host, SBIC_TRANSCNTH, value: 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, bytes: SCpnt->cmnd,
1298	ptr: (int *)&host->scsi.SCp.sent_command, len: SCpnt->cmd_len, max_timeout: 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
1305	void acornscsi_sendmessage(AS_Host *host)
1306	{
1307	unsigned int message_length = msgqueue_msglength(msgq: &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, timeout: 1000, msg: "sending message 1");
1321
1322	sbic_arm_write(host, SBIC_DATA, value: 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(msgq: &host->scsi.msgs, msgno: 0);
1333
1334	acornscsi_sbic_wait(host, ASR_DBR, ASR_DBR, timeout: 1000, msg: "sending message 2");
1335
1336	sbic_arm_write(host, SBIC_DATA, value: 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, value: 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(msgq: &host->scsi.msgs, msgno: 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, bytes: msg->msg, ptr: &i, len: msg->length, max_timeout: 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
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, timeout: 1000, msg: "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
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, timeout: 1000, msg: "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, timeout: 1000, msg: "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
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, timeout: 1000, msg: "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, target: 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(cmd: 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(cmd: 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(msgq: &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, value: 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(msgq: &host->scsi.msgs);
1620	msgqueue_addmsg(msgq: &host->scsi.msgs, length: 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(msgq: &host->scsi.msgs);
1631	msgqueue_addmsg(msgq: &host->scsi.msgs, length: 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
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(msgq: &host->scsi.msgs, length: 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
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(cmd: host->SCpnt) - host->scsi.SCp.scsi_xferred;
1695
1696	sbic_arm_write(host, SBIC_SYNCHTRANSFER, value: 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
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(queue: &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
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(scmd: 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(queue: &host->queues.disconnected,
1799	target: host->scsi.reconnected.target,
1800	lun: host->scsi.reconnected.lun,
1801	tag: 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(cmd: 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
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, SCpntp: &host->SCpnt, result: 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
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(msgq: &host->scsi.msgs);
1858	msgqueue_addmsg(msgq: &host->scsi.msgs, length: 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
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(msgq: &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(msgq: &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, SCpntp: &host->SCpnt, result: 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(msgq: &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, target: 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, SCpntp: &host->SCpnt, result: 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, target: 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, target: 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, direction: 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, direction: 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, target: 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, target: 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, target: 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, direction: 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, direction: 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, target: 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(cmd: 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(cmd: 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(cmd: 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, target: 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(cmd: 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(cmd: 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(cmd: 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, target: 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, target: 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, target: host->SCpnt ? host->SCpnt->device->id : 8);
2295	acornscsi_done(host, SCpntp: &host->SCpnt, result: 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, target: 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, SCpntp: &host->SCpnt, result: 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, target: 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, SCpntp: &host->SCpnt, result: DID_ABORT);
2328	else {
2329	clear_bit(nr: host->scsi.reconnected.target * 8 + host->scsi.reconnected.lun,
2330	addr: 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, target: 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, target: 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
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(addr: host->fast + INT_REG);
2375
2376	if (iostatus & 2) {
2377	acornscsi_dma_intr(host);
2378	iostatus = readb(addr: 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	*/
2411	static int acornscsi_queuecmd_lck(struct scsi_cmnd *SCpnt)
2412	{
2413	struct scsi_pointer *scsi_pointer = arm_scsi_pointer(cmd: 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(command: 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(cmd: SCpnt, status: 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(command: 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(cmd: SCpnt, status: 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	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	*/
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(queue: &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(queue: &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	*/
2555	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(nr: SCpnt->device->id * 8 +
2587	(u8)(SCpnt->device->lun & 0x7), addr: 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, target: 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	*/
2637	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, cmdphase: host->scsi.phase);
2653	for (devidx = 0; devidx < 9; devidx++)
2654	acornscsi_dumplog(host, target: 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(queue: &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	*/
2682	const
2683	char *acornscsi_info(struct Scsi_Host *host)
2684	{
2685	static char string[100], *p;
2686
2687	p = string;
2688
2689	p += sprintf(buf: string, fmt: "%s at port %08lX irq %d v%d.%d.%d"
2690	#ifdef CONFIG_SCSI_ACORNSCSI_SYNC
2691	" SYNC"
2692	#endif
2693	#if (DEBUG & DEBUG_NO_WRITE)
2694	" NOWRITE (" __stringify(NO_WRITE) ")"
2695	#endif
2696	, host->hostt->name, host->io_port, host->irq,
2697	VER_MAJOR, VER_MINOR, VER_PATCH);
2698	return string;
2699	}
2700
2701	static int acornscsi_show_info(struct seq_file *m, struct Scsi_Host *instance)
2702	{
2703	int devidx;
2704	struct scsi_device *scd;
2705	AS_Host *host;
2706
2707	host = (AS_Host *)instance->hostdata;
2708
2709	seq_printf(m, fmt: "AcornSCSI driver v%d.%d.%d"
2710	#ifdef CONFIG_SCSI_ACORNSCSI_SYNC
2711	" SYNC"
2712	#endif
2713	#if (DEBUG & DEBUG_NO_WRITE)
2714	" NOWRITE (" __stringify(NO_WRITE) ")"
2715	#endif
2716	"\n\n", VER_MAJOR, VER_MINOR, VER_PATCH);
2717
2718	seq_printf(m, fmt: "SBIC: WD33C93A Address: %p IRQ : %d\n",
2719	host->base + SBIC_REGIDX, host->scsi.irq);
2720	#ifdef USE_DMAC
2721	seq_printf(m, fmt: "DMAC: uPC71071 Address: %p IRQ : %d\n\n",
2722	host->base + DMAC_OFFSET, host->scsi.irq);
2723	#endif
2724
2725	seq_printf(m, fmt: "Statistics:\n"
2726	"Queued commands: %-10u Issued commands: %-10u\n"
2727	"Done commands : %-10u Reads : %-10u\n"
2728	"Writes : %-10u Others : %-10u\n"
2729	"Disconnects : %-10u Aborts : %-10u\n"
2730	"Resets : %-10u\n\nLast phases:",
2731	host->stats.queues, host->stats.removes,
2732	host->stats.fins, host->stats.reads,
2733	host->stats.writes, host->stats.miscs,
2734	host->stats.disconnects, host->stats.aborts,
2735	host->stats.resets);
2736
2737	for (devidx = 0; devidx < 9; devidx ++) {
2738	unsigned int statptr, prev;
2739
2740	seq_printf(m, fmt: "\n%c:", devidx == 8 ? 'H' : ('0' + devidx));
2741	statptr = host->status_ptr[devidx] - 10;
2742
2743	if ((signed int)statptr < 0)
2744	statptr += STATUS_BUFFER_SIZE;
2745
2746	prev = host->status[devidx][statptr].when;
2747
2748	for (; statptr != host->status_ptr[devidx]; statptr = (statptr + 1) & (STATUS_BUFFER_SIZE - 1)) {
2749	if (host->status[devidx][statptr].when) {
2750	seq_printf(m, fmt: "%c%02X:%02X+%2ld",
2751	host->status[devidx][statptr].irq ? '-' : ' ',
2752	host->status[devidx][statptr].ph,
2753	host->status[devidx][statptr].ssr,
2754	(host->status[devidx][statptr].when - prev) < 100 ?
2755	(host->status[devidx][statptr].when - prev) : 99);
2756	prev = host->status[devidx][statptr].when;
2757	}
2758	}
2759	}
2760
2761	seq_printf(m, fmt: "\nAttached devices:\n");
2762
2763	shost_for_each_device(scd, instance) {
2764	seq_printf(m, fmt: "Device/Lun TaggedQ Sync\n");
2765	seq_printf(m, fmt: " %d/%llu ", scd->id, scd->lun);
2766	if (scd->tagged_supported)
2767	seq_printf(m, fmt: "%3sabled ",
2768	scd->simple_tags ? "en" : "dis");
2769	else
2770	seq_printf(m, fmt: "unsupported ");
2771
2772	if (host->device[scd->id].sync_xfer & 15)
2773	seq_printf(m, fmt: "offset %d, %d ns\n",
2774	host->device[scd->id].sync_xfer & 15,
2775	acornscsi_getperiod(syncxfer: host->device[scd->id].sync_xfer));
2776	else
2777	seq_printf(m, fmt: "async\n");
2778
2779	}
2780	return 0;
2781	}
2782
2783	static const struct scsi_host_template acornscsi_template = {
2784	.module = THIS_MODULE,
2785	.show_info = acornscsi_show_info,
2786	.name = "AcornSCSI",
2787	.info = acornscsi_info,
2788	.queuecommand = acornscsi_queuecmd,
2789	.eh_abort_handler = acornscsi_abort,
2790	.eh_host_reset_handler = acornscsi_host_reset,
2791	.can_queue = 16,
2792	.this_id = 7,
2793	.sg_tablesize = SG_ALL,
2794	.cmd_per_lun = 2,
2795	.dma_boundary = PAGE_SIZE - 1,
2796	.proc_name = "acornscsi",
2797	.cmd_size = sizeof(struct arm_cmd_priv),
2798	};
2799
2800	static int acornscsi_probe(struct expansion_card *ec, const struct ecard_id *id)
2801	{
2802	struct Scsi_Host *host;
2803	AS_Host *ashost;
2804	int ret;
2805
2806	ret = ecard_request_resources(ec);
2807	if (ret)
2808	goto out;
2809
2810	host = scsi_host_alloc(&acornscsi_template, sizeof(AS_Host));
2811	if (!host) {
2812	ret = -ENOMEM;
2813	goto out_release;
2814	}
2815
2816	ashost = (AS_Host *)host->hostdata;
2817
2818	ashost->base = ecardm_iomap(ec, ECARD_RES_MEMC, 0, 0);
2819	ashost->fast = ecardm_iomap(ec, ECARD_RES_IOCFAST, 0, 0);
2820	if (!ashost->base || !ashost->fast) {
2821	ret = -ENOMEM;
2822	goto out_put;
2823	}
2824
2825	host->irq = ec->irq;
2826	ashost->host = host;
2827	ashost->scsi.irq = host->irq;
2828
2829	ec->irqaddr = ashost->fast + INT_REG;
2830	ec->irqmask = 0x0a;
2831
2832	ret = request_irq(irq: host->irq, handler: acornscsi_intr, flags: 0, name: "acornscsi", dev: ashost);
2833	if (ret) {
2834	printk(KERN_CRIT "scsi%d: IRQ%d not free: %d\n",
2835	host->host_no, ashost->scsi.irq, ret);
2836	goto out_put;
2837	}
2838
2839	memset(&ashost->stats, 0, sizeof (ashost->stats));
2840	queue_initialise(queue: &ashost->queues.issue);
2841	queue_initialise(queue: &ashost->queues.disconnected);
2842	msgqueue_initialise(msgq: &ashost->scsi.msgs);
2843
2844	acornscsi_resetcard(host: ashost);
2845
2846	ret = scsi_add_host(host, dev: &ec->dev);
2847	if (ret)
2848	goto out_irq;
2849
2850	scsi_scan_host(host);
2851	goto out;
2852
2853	out_irq:
2854	free_irq(host->irq, ashost);
2855	msgqueue_free(msgq: &ashost->scsi.msgs);
2856	queue_free(queue: &ashost->queues.disconnected);
2857	queue_free(queue: &ashost->queues.issue);
2858	out_put:
2859	ecardm_iounmap(ec, ashost->fast);
2860	ecardm_iounmap(ec, ashost->base);
2861	scsi_host_put(t: host);
2862	out_release:
2863	ecard_release_resources(ec);
2864	out:
2865	return ret;
2866	}
2867
2868	static void acornscsi_remove(struct expansion_card *ec)
2869	{
2870	struct Scsi_Host *host = ecard_get_drvdata(ec);
2871	AS_Host *ashost = (AS_Host *)host->hostdata;
2872
2873	ecard_set_drvdata(ec, NULL);
2874	scsi_remove_host(host);
2875
2876	/*
2877	* Put card into RESET state
2878	*/
2879	writeb(val: 0x80, addr: ashost->fast + PAGE_REG);
2880
2881	free_irq(host->irq, ashost);
2882
2883	msgqueue_free(msgq: &ashost->scsi.msgs);
2884	queue_free(queue: &ashost->queues.disconnected);
2885	queue_free(queue: &ashost->queues.issue);
2886	ecardm_iounmap(ec, ashost->fast);
2887	ecardm_iounmap(ec, ashost->base);
2888	scsi_host_put(t: host);
2889	ecard_release_resources(ec);
2890	}
2891
2892	static const struct ecard_id acornscsi_cids[] = {
2893	{ MANU_ACORN, PROD_ACORN_SCSI },
2894	{ 0xffff, 0xffff },
2895	};
2896
2897	static struct ecard_driver acornscsi_driver = {
2898	.probe = acornscsi_probe,
2899	.remove = acornscsi_remove,
2900	.id_table = acornscsi_cids,
2901	.drv = {
2902	.name = "acornscsi",
2903	},
2904	};
2905
2906	static int __init acornscsi_init(void)
2907	{
2908	return ecard_register_driver(&acornscsi_driver);
2909	}
2910
2911	static void __exit acornscsi_exit(void)
2912	{
2913	ecard_remove_driver(&acornscsi_driver);
2914	}
2915
2916	module_init(acornscsi_init);
2917	module_exit(acornscsi_exit);
2918
2919	MODULE_AUTHOR("Russell King");
2920	MODULE_DESCRIPTION("AcornSCSI driver");
2921	MODULE_LICENSE("GPL");
2922