1/*
2 *  NCR53c406.c
3 *  Low-level SCSI driver for NCR53c406a chip.
4 *  Copyright (C) 1994, 1995, 1996 Normunds Saumanis (normunds@fi.ibm.com)
5 *
6 *  LILO command line usage: ncr53c406a=<PORTBASE>[,<IRQ>[,<FASTPIO>]]
7 *  Specify IRQ = 0 for non-interrupt driven mode.
8 *  FASTPIO = 1 for fast pio mode, 0 for slow mode.
9 *
10 *  This program is free software; you can redistribute it and/or modify it
11 *  under the terms of the GNU General Public License as published by the
12 *  Free Software Foundation; either version 2, or (at your option) any
13 *  later version.
14 *
15 *  This program is distributed in the hope that it will be useful, but
16 *  WITHOUT ANY WARRANTY; without even the implied warranty of
17 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
18 *  General Public License for more details.
19 *
20 */
21
22#define NCR53C406A_DEBUG 0
23#define VERBOSE_NCR53C406A_DEBUG 0
24
25/* Set this to 1 for PIO mode (recommended) or to 0 for DMA mode */
26#define USE_PIO 1
27
28#define USE_BIOS 0
29				/* #define BIOS_ADDR 0xD8000 *//* define this if autoprobe fails */
30				/* #define PORT_BASE 0x330 *//* define this if autoprobe fails */
31				/* #define IRQ_LEV   0	*//* define this if autoprobe fails */
32#define DMA_CHAN  5		/* this is ignored if DMA is disabled */
33
34/* Set this to 0 if you encounter kernel lockups while transferring
35 * data in PIO mode */
36#define USE_FAST_PIO 1
37
38/* ============= End of user configurable parameters ============= */
39
40#include <linux/module.h>
41
42#include <linux/errno.h>
43#include <linux/ioport.h>
44#include <linux/interrupt.h>
45#include <linux/proc_fs.h>
46#include <linux/stat.h>
47#include <linux/init.h>
48#include <linux/bitops.h>
49#include <asm/io.h>
50#include <asm/dma.h>
51#include <asm/irq.h>
52
53#include <linux/blkdev.h>
54#include <linux/spinlock.h>
55#include "scsi.h"
56#include <scsi/scsi_host.h>
57
58/* ============================================================= */
59
60#define WATCHDOG 5000000
61
62#define SYNC_MODE 0		/* Synchronous transfer mode */
63
64#ifdef DEBUG
65#undef NCR53C406A_DEBUG
66#define NCR53C406A_DEBUG 1
67#endif
68
69#if USE_PIO
70#define USE_DMA 0
71#else
72#define USE_DMA 1
73#endif
74
75/* Default configuration */
76#define C1_IMG   0x07		/* ID=7 */
77#define C2_IMG   0x48		/* FE SCSI2 */
78#if USE_DMA
79#define C3_IMG   0x21		/* CDB TE */
80#else
81#define C3_IMG   0x20		/* CDB */
82#endif
83#define C4_IMG   0x04		/* ANE */
84#define C5_IMG   0xb6		/* AA PI SIE POL */
85
86#define REG0 (outb(C4_IMG, CONFIG4))
87#define REG1 (outb(C5_IMG, CONFIG5))
88
89#if NCR53C406A_DEBUG
90#define DEB(x) x
91#else
92#define DEB(x)
93#endif
94
95#if VERBOSE_NCR53C406A_DEBUG
96#define VDEB(x) x
97#else
98#define VDEB(x)
99#endif
100
101#define LOAD_DMA_COUNT(count) \
102  outb(count & 0xff, TC_LSB); \
103  outb((count >> 8) & 0xff, TC_MSB); \
104  outb((count >> 16) & 0xff, TC_HIGH);
105
106/* Chip commands */
107#define DMA_OP               0x80
108
109#define SCSI_NOP             0x00
110#define FLUSH_FIFO           0x01
111#define CHIP_RESET           0x02
112#define SCSI_RESET           0x03
113#define RESELECT             0x40
114#define SELECT_NO_ATN        0x41
115#define SELECT_ATN           0x42
116#define SELECT_ATN_STOP      0x43
117#define ENABLE_SEL           0x44
118#define DISABLE_SEL          0x45
119#define SELECT_ATN3          0x46
120#define RESELECT3            0x47
121#define TRANSFER_INFO        0x10
122#define INIT_CMD_COMPLETE    0x11
123#define MSG_ACCEPT           0x12
124#define TRANSFER_PAD         0x18
125#define SET_ATN              0x1a
126#define RESET_ATN            0x1b
127#define SEND_MSG             0x20
128#define SEND_STATUS          0x21
129#define SEND_DATA            0x22
130#define DISCONN_SEQ          0x23
131#define TERMINATE_SEQ        0x24
132#define TARG_CMD_COMPLETE    0x25
133#define DISCONN              0x27
134#define RECV_MSG             0x28
135#define RECV_CMD             0x29
136#define RECV_DATA            0x2a
137#define RECV_CMD_SEQ         0x2b
138#define TARGET_ABORT_DMA     0x04
139
140/*----------------------------------------------------------------*/
141/* the following will set the monitor border color (useful to find
142   where something crashed or gets stuck at */
143/* 1 = blue
144   2 = green
145   3 = cyan
146   4 = red
147   5 = magenta
148   6 = yellow
149   7 = white
150*/
151
152#if NCR53C406A_DEBUG
153#define rtrc(i) {inb(0x3da);outb(0x31,0x3c0);outb((i),0x3c0);}
154#else
155#define rtrc(i) {}
156#endif
157/*----------------------------------------------------------------*/
158
159enum Phase {
160	idle,
161	data_out,
162	data_in,
163	command_ph,
164	status_ph,
165	message_out,
166	message_in
167};
168
169/* Static function prototypes */
170static void NCR53c406a_intr(void *);
171static irqreturn_t do_NCR53c406a_intr(int, void *);
172static void chip_init(void);
173static void calc_port_addr(void);
174#ifndef IRQ_LEV
175static int irq_probe(void);
176#endif
177
178/* ================================================================= */
179
180#if USE_BIOS
181static void *bios_base;
182#endif
183
184#ifdef PORT_BASE
185static int port_base = PORT_BASE;
186#else
187static int port_base;
188#endif
189
190#ifdef IRQ_LEV
191static int irq_level = IRQ_LEV;
192#else
193static int irq_level = -1;	/* 0 is 'no irq', so use -1 for 'uninitialized' */
194#endif
195
196#if USE_DMA
197static int dma_chan;
198#endif
199
200#if USE_PIO
201static int fast_pio = USE_FAST_PIO;
202#endif
203
204static Scsi_Cmnd *current_SC;
205static char info_msg[256];
206
207/* ================================================================= */
208
209/* possible BIOS locations */
210#if USE_BIOS
211static void *addresses[] = {
212	(void *) 0xd8000,
213	(void *) 0xc8000
214};
215#define ADDRESS_COUNT ARRAY_SIZE(addresses)
216#endif				/* USE_BIOS */
217
218/* possible i/o port addresses */
219static unsigned short ports[] = { 0x230, 0x330, 0x280, 0x290, 0x330, 0x340, 0x300, 0x310, 0x348, 0x350 };
220#define PORT_COUNT ARRAY_SIZE(ports)
221
222#ifndef MODULE
223/* possible interrupt channels */
224static unsigned short intrs[] = { 10, 11, 12, 15 };
225#define INTR_COUNT ARRAY_SIZE(intrs)
226#endif /* !MODULE */
227
228/* signatures for NCR 53c406a based controllers */
229#if USE_BIOS
230struct signature {
231	char *signature;
232	int sig_offset;
233	int sig_length;
234} signatures[] __initdata = {
235	/*          1         2         3         4         5         6 */
236	/* 123456789012345678901234567890123456789012345678901234567890 */
237	{
238"Copyright (C) Acculogic, Inc.\r\n2.8M Diskette Extension Bios ver 4.04.03 03/01/1993", 61, 82},};
239
240#define SIGNATURE_COUNT ARRAY_SIZE(signatures)
241#endif				/* USE_BIOS */
242
243/* ============================================================ */
244
245/* Control Register Set 0 */
246static int TC_LSB;		/* transfer counter lsb         */
247static int TC_MSB;		/* transfer counter msb */
248static int SCSI_FIFO;		/* scsi fifo register   */
249static int CMD_REG;		/* command register             */
250static int STAT_REG;		/* status register              */
251static int DEST_ID;		/* selection/reselection bus id */
252static int INT_REG;		/* interrupt status register    */
253static int SRTIMOUT;		/* select/reselect timeout reg  */
254static int SEQ_REG;		/* sequence step register       */
255static int SYNCPRD;		/* synchronous transfer period  */
256static int FIFO_FLAGS;		/* indicates # of bytes in fifo */
257static int SYNCOFF;		/* synchronous offset register  */
258static int CONFIG1;		/* configuration register       */
259static int CLKCONV;		/* clock conversion reg */
260				/*static int TESTREG;*//* test mode register           */
261static int CONFIG2;		/* Configuration 2 Register     */
262static int CONFIG3;		/* Configuration 3 Register     */
263static int CONFIG4;		/* Configuration 4 Register     */
264static int TC_HIGH;		/* Transfer Counter High */
265				/*static int FIFO_BOTTOM;*//* Reserve FIFO byte register   */
266
267/* Control Register Set 1 */
268				/*static int JUMPER_SENSE;*//* Jumper sense port reg (r/w) */
269				/*static int SRAM_PTR;*//* SRAM address pointer reg (r/w) */
270				/*static int SRAM_DATA;*//* SRAM data register (r/w) */
271static int PIO_FIFO;		/* PIO FIFO registers (r/w) */
272				/*static int PIO_FIFO1;*//*  */
273				/*static int PIO_FIFO2;*//*  */
274				/*static int PIO_FIFO3;*//*  */
275static int PIO_STATUS;		/* PIO status (r/w) */
276				/*static int ATA_CMD;*//* ATA command/status reg (r/w) */
277				/*static int ATA_ERR;*//* ATA features/error register (r/w) */
278static int PIO_FLAG;		/* PIO flag interrupt enable (r/w) */
279static int CONFIG5;		/* Configuration 5 register (r/w) */
280				/*static int SIGNATURE;*//* Signature Register (r) */
281				/*static int CONFIG6;*//* Configuration 6 register (r) */
282
283/* ============================================================== */
284
285#if USE_DMA
286static __inline__ int NCR53c406a_dma_setup(unsigned char *ptr, unsigned int count, unsigned char mode)
287{
288	unsigned limit;
289	unsigned long flags = 0;
290
291	VDEB(printk("dma: before count=%d   ", count));
292	if (dma_chan <= 3) {
293		if (count > 65536)
294			count = 65536;
295		limit = 65536 - (((unsigned) ptr) & 0xFFFF);
296	} else {
297		if (count > (65536 << 1))
298			count = (65536 << 1);
299		limit = (65536 << 1) - (((unsigned) ptr) & 0x1FFFF);
300	}
301
302	if (count > limit)
303		count = limit;
304
305	VDEB(printk("after count=%d\n", count));
306	if ((count & 1) || (((unsigned) ptr) & 1))
307		panic("NCR53c406a: attempted unaligned DMA transfer\n");
308
309	flags = claim_dma_lock();
310	disable_dma(dma_chan);
311	clear_dma_ff(dma_chan);
312	set_dma_addr(dma_chan, (long) ptr);
313	set_dma_count(dma_chan, count);
314	set_dma_mode(dma_chan, mode);
315	enable_dma(dma_chan);
316	release_dma_lock(flags);
317
318	return count;
319}
320
321static __inline__ int NCR53c406a_dma_write(unsigned char *src, unsigned int count)
322{
323	return NCR53c406a_dma_setup(src, count, DMA_MODE_WRITE);
324}
325
326static __inline__ int NCR53c406a_dma_read(unsigned char *src, unsigned int count)
327{
328	return NCR53c406a_dma_setup(src, count, DMA_MODE_READ);
329}
330
331static __inline__ int NCR53c406a_dma_residual(void)
332{
333	register int tmp;
334	unsigned long flags;
335
336	flags = claim_dma_lock();
337	clear_dma_ff(dma_chan);
338	tmp = get_dma_residue(dma_chan);
339	release_dma_lock(flags);
340
341	return tmp;
342}
343#endif				/* USE_DMA */
344
345#if USE_PIO
346static __inline__ int NCR53c406a_pio_read(unsigned char *request, unsigned int reqlen)
347{
348	int i;
349	int len;		/* current scsi fifo size */
350
351	REG1;
352	while (reqlen) {
353		i = inb(PIO_STATUS);
354		/*    VDEB(printk("pio_status=%x\n", i)); */
355		if (i & 0x80)
356			return 0;
357
358		switch (i & 0x1e) {
359		default:
360		case 0x10:
361			len = 0;
362			break;
363		case 0x0:
364			len = 1;
365			break;
366		case 0x8:
367			len = 42;
368			break;
369		case 0xc:
370			len = 84;
371			break;
372		case 0xe:
373			len = 128;
374			break;
375		}
376
377		if ((i & 0x40) && len == 0) {	/* fifo empty and interrupt occurred */
378			return 0;
379		}
380
381		if (len) {
382			if (len > reqlen)
383				len = reqlen;
384
385			if (fast_pio && len > 3) {
386				insl(PIO_FIFO, request, len >> 2);
387				request += len & 0xfc;
388				reqlen -= len & 0xfc;
389			} else {
390				while (len--) {
391					*request++ = inb(PIO_FIFO);
392					reqlen--;
393				}
394			}
395		}
396	}
397	return 0;
398}
399
400static __inline__ int NCR53c406a_pio_write(unsigned char *request, unsigned int reqlen)
401{
402	int i = 0;
403	int len;		/* current scsi fifo size */
404
405	REG1;
406	while (reqlen && !(i & 0x40)) {
407		i = inb(PIO_STATUS);
408		/*    VDEB(printk("pio_status=%x\n", i)); */
409		if (i & 0x80)	/* error */
410			return 0;
411
412		switch (i & 0x1e) {
413		case 0x10:
414			len = 128;
415			break;
416		case 0x0:
417			len = 84;
418			break;
419		case 0x8:
420			len = 42;
421			break;
422		case 0xc:
423			len = 1;
424			break;
425		default:
426		case 0xe:
427			len = 0;
428			break;
429		}
430
431		if (len) {
432			if (len > reqlen)
433				len = reqlen;
434
435			if (fast_pio && len > 3) {
436				outsl(PIO_FIFO, request, len >> 2);
437				request += len & 0xfc;
438				reqlen -= len & 0xfc;
439			} else {
440				while (len--) {
441					outb(*request++, PIO_FIFO);
442					reqlen--;
443				}
444			}
445		}
446	}
447	return 0;
448}
449#endif				/* USE_PIO */
450
451static int __init NCR53c406a_detect(struct scsi_host_template * tpnt)
452{
453	int present = 0;
454	struct Scsi_Host *shpnt = NULL;
455#ifndef PORT_BASE
456	int i;
457#endif
458
459#if USE_BIOS
460	int ii, jj;
461	bios_base = 0;
462	/* look for a valid signature */
463	for (ii = 0; ii < ADDRESS_COUNT && !bios_base; ii++)
464		for (jj = 0; (jj < SIGNATURE_COUNT) && !bios_base; jj++)
465			if (!memcmp((void *) addresses[ii] + signatures[jj].sig_offset, (void *) signatures[jj].signature, (int) signatures[jj].sig_length))
466				bios_base = addresses[ii];
467
468	if (!bios_base) {
469		printk("NCR53c406a: BIOS signature not found\n");
470		return 0;
471	}
472
473	DEB(printk("NCR53c406a BIOS found at 0x%x\n", (unsigned int) bios_base);
474	    );
475#endif				/* USE_BIOS */
476
477#ifdef PORT_BASE
478	if (!request_region(port_base, 0x10, "NCR53c406a"))	/* ports already snatched */
479		port_base = 0;
480
481#else				/* autodetect */
482	if (port_base) {	/* LILO override */
483		if (!request_region(port_base, 0x10, "NCR53c406a"))
484			port_base = 0;
485	} else {
486		for (i = 0; i < PORT_COUNT && !port_base; i++) {
487			if (!request_region(ports[i], 0x10, "NCR53c406a")) {
488				DEB(printk("NCR53c406a: port 0x%x in use\n", ports[i]));
489			} else {
490				VDEB(printk("NCR53c406a: port 0x%x available\n", ports[i]));
491				outb(C5_IMG, ports[i] + 0x0d);	/* reg set 1 */
492				if ((inb(ports[i] + 0x0e) ^ inb(ports[i] + 0x0e)) == 7 && (inb(ports[i] + 0x0e) ^ inb(ports[i] + 0x0e)) == 7 && (inb(ports[i] + 0x0e) & 0xf8) == 0x58) {
493					port_base = ports[i];
494					VDEB(printk("NCR53c406a: Sig register valid\n"));
495					VDEB(printk("port_base=0x%x\n", port_base));
496					break;
497				}
498				release_region(ports[i], 0x10);
499			}
500		}
501	}
502#endif				/* PORT_BASE */
503
504	if (!port_base) {	/* no ports found */
505		printk("NCR53c406a: no available ports found\n");
506		return 0;
507	}
508
509	DEB(printk("NCR53c406a detected\n"));
510
511	calc_port_addr();
512	chip_init();
513
514#ifndef IRQ_LEV
515	if (irq_level < 0) {	/* LILO override if >= 0 */
516		irq_level = irq_probe();
517		if (irq_level < 0) {	/* Trouble */
518			printk("NCR53c406a: IRQ problem, irq_level=%d, giving up\n", irq_level);
519			goto err_release;
520		}
521	}
522#endif
523
524	DEB(printk("NCR53c406a: using port_base 0x%x\n", port_base));
525
526	present = 1;
527	tpnt->proc_name = "NCR53c406a";
528
529	shpnt = scsi_register(tpnt, 0);
530	if (!shpnt) {
531		printk("NCR53c406a: Unable to register host, giving up.\n");
532		goto err_release;
533	}
534
535	if (irq_level > 0) {
536		if (request_irq(irq_level, do_NCR53c406a_intr, 0, "NCR53c406a", shpnt)) {
537			printk("NCR53c406a: unable to allocate IRQ %d\n", irq_level);
538			goto err_free_scsi;
539		}
540		tpnt->can_queue = 1;
541		DEB(printk("NCR53c406a: allocated IRQ %d\n", irq_level));
542	} else if (irq_level == 0) {
543		tpnt->can_queue = 0;
544		DEB(printk("NCR53c406a: No interrupts detected\n"));
545		printk("NCR53c406a driver no longer supports polling interface\n");
546		printk("Please email linux-scsi@vger.kernel.org\n");
547
548#if USE_DMA
549		printk("NCR53c406a: No interrupts found and DMA mode defined. Giving up.\n");
550#endif				/* USE_DMA */
551		goto err_free_scsi;
552	} else {
553		DEB(printk("NCR53c406a: Shouldn't get here!\n"));
554		goto err_free_scsi;
555	}
556
557#if USE_DMA
558	dma_chan = DMA_CHAN;
559	if (request_dma(dma_chan, "NCR53c406a") != 0) {
560		printk("NCR53c406a: unable to allocate DMA channel %d\n", dma_chan);
561		goto err_free_irq;
562	}
563
564	DEB(printk("Allocated DMA channel %d\n", dma_chan));
565#endif				/* USE_DMA */
566
567	shpnt->irq = irq_level;
568	shpnt->io_port = port_base;
569	shpnt->n_io_port = 0x10;
570#if USE_DMA
571	shpnt->dma = dma_chan;
572#endif
573
574#if USE_DMA
575	sprintf(info_msg, "NCR53c406a at 0x%x, IRQ %d, DMA channel %d.", port_base, irq_level, dma_chan);
576#else
577	sprintf(info_msg, "NCR53c406a at 0x%x, IRQ %d, %s PIO mode.", port_base, irq_level, fast_pio ? "fast" : "slow");
578#endif
579
580	return (present);
581
582#if USE_DMA
583      err_free_irq:
584	if (irq_level)
585		free_irq(irq_level, shpnt);
586#endif
587      err_free_scsi:
588	scsi_unregister(shpnt);
589      err_release:
590	release_region(port_base, 0x10);
591	return 0;
592}
593
594static int NCR53c406a_release(struct Scsi_Host *shost)
595{
596	if (shost->irq)
597		free_irq(shost->irq, NULL);
598#if USE_DMA
599	if (shost->dma_channel != 0xff)
600		free_dma(shost->dma_channel);
601#endif
602	if (shost->io_port && shost->n_io_port)
603		release_region(shost->io_port, shost->n_io_port);
604
605	scsi_unregister(shost);
606	return 0;
607}
608
609#ifndef MODULE
610/* called from init/main.c */
611static int __init NCR53c406a_setup(char *str)
612{
613	static size_t setup_idx = 0;
614	size_t i;
615	int ints[4];
616
617	DEB(printk("NCR53c406a: Setup called\n");
618	    );
619
620	if (setup_idx >= PORT_COUNT - 1) {
621		printk("NCR53c406a: Setup called too many times.  Bad LILO params?\n");
622		return 0;
623	}
624	get_options(str, 4, ints);
625	if (ints[0] < 1 || ints[0] > 3) {
626		printk("NCR53c406a: Malformed command line\n");
627		printk("NCR53c406a: Usage: ncr53c406a=<PORTBASE>[,<IRQ>[,<FASTPIO>]]\n");
628		return 0;
629	}
630	for (i = 0; i < PORT_COUNT && !port_base; i++)
631		if (ports[i] == ints[1]) {
632			port_base = ints[1];
633			DEB(printk("NCR53c406a: Specified port_base 0x%x\n", port_base);
634			    )
635		}
636	if (!port_base) {
637		printk("NCR53c406a: Invalid PORTBASE 0x%x specified\n", ints[1]);
638		return 0;
639	}
640
641	if (ints[0] > 1) {
642		if (ints[2] == 0) {
643			irq_level = 0;
644			DEB(printk("NCR53c406a: Specified irq %d\n", irq_level);
645			    )
646		} else
647			for (i = 0; i < INTR_COUNT && irq_level < 0; i++)
648				if (intrs[i] == ints[2]) {
649					irq_level = ints[2];
650					DEB(printk("NCR53c406a: Specified irq %d\n", port_base);
651					    )
652				}
653		if (irq_level < 0)
654			printk("NCR53c406a: Invalid IRQ %d specified\n", ints[2]);
655	}
656
657	if (ints[0] > 2)
658		fast_pio = ints[3];
659
660	DEB(printk("NCR53c406a: port_base=0x%x, irq=%d, fast_pio=%d\n", port_base, irq_level, fast_pio);)
661	return 1;
662}
663
664__setup("ncr53c406a=", NCR53c406a_setup);
665
666#endif /* !MODULE */
667
668static const char *NCR53c406a_info(struct Scsi_Host *SChost)
669{
670	DEB(printk("NCR53c406a_info called\n"));
671	return (info_msg);
672}
673
674#if 0
675static void wait_intr(void)
676{
677	unsigned long i = jiffies + WATCHDOG;
678
679	while (time_after(i, jiffies) && !(inb(STAT_REG) & 0xe0)) {	/* wait for a pseudo-interrupt */
680		cpu_relax();
681		barrier();
682	}
683
684	if (time_before_eq(i, jiffies)) {	/* Timed out */
685		rtrc(0);
686		current_SC->result = DID_TIME_OUT << 16;
687		current_SC->SCp.phase = idle;
688		current_SC->scsi_done(current_SC);
689		return;
690	}
691
692	NCR53c406a_intr(NULL);
693}
694#endif
695
696static int NCR53c406a_queue_lck(Scsi_Cmnd * SCpnt, void (*done) (Scsi_Cmnd *))
697{
698	int i;
699
700	VDEB(printk("NCR53c406a_queue called\n"));
701        DEB(printk("cmd=%02x, cmd_len=%02x, target=%02x, lun=%02x, bufflen=%d\n", SCpnt->cmnd[0], SCpnt->cmd_len, SCpnt->device->target, (u8)SCpnt->device->lun, scsi_bufflen(SCpnt)));
702
703#if 0
704	VDEB(for (i = 0; i < SCpnt->cmd_len; i++)
705	     printk("cmd[%d]=%02x  ", i, SCpnt->cmnd[i]));
706	VDEB(printk("\n"));
707#endif
708
709	current_SC = SCpnt;
710	current_SC->scsi_done = done;
711	current_SC->SCp.phase = command_ph;
712	current_SC->SCp.Status = 0;
713	current_SC->SCp.Message = 0;
714
715	/* We are locked here already by the mid layer */
716	REG0;
717	outb(scmd_id(SCpnt), DEST_ID);	/* set destination */
718	outb(FLUSH_FIFO, CMD_REG);	/* reset the fifos */
719
720	for (i = 0; i < SCpnt->cmd_len; i++) {
721		outb(SCpnt->cmnd[i], SCSI_FIFO);
722	}
723	outb(SELECT_NO_ATN, CMD_REG);
724
725	rtrc(1);
726	return 0;
727}
728
729static DEF_SCSI_QCMD(NCR53c406a_queue)
730
731static int NCR53c406a_host_reset(Scsi_Cmnd * SCpnt)
732{
733	DEB(printk("NCR53c406a_reset called\n"));
734
735	spin_lock_irq(SCpnt->device->host->host_lock);
736
737	outb(C4_IMG, CONFIG4);	/* Select reg set 0 */
738	outb(CHIP_RESET, CMD_REG);
739	outb(SCSI_NOP, CMD_REG);	/* required after reset */
740	outb(SCSI_RESET, CMD_REG);
741	chip_init();
742
743	rtrc(2);
744
745	spin_unlock_irq(SCpnt->device->host->host_lock);
746
747	return SUCCESS;
748}
749
750static int NCR53c406a_biosparm(struct scsi_device *disk,
751                               struct block_device *dev,
752			       sector_t capacity, int *info_array)
753{
754	int size;
755
756	DEB(printk("NCR53c406a_biosparm called\n"));
757
758	size = capacity;
759	info_array[0] = 64;	/* heads */
760	info_array[1] = 32;	/* sectors */
761	info_array[2] = size >> 11;	/* cylinders */
762	if (info_array[2] > 1024) {	/* big disk */
763		info_array[0] = 255;
764		info_array[1] = 63;
765		info_array[2] = size / (255 * 63);
766	}
767	return 0;
768}
769
770static irqreturn_t do_NCR53c406a_intr(int unused, void *dev_id)
771{
772	unsigned long flags;
773	struct Scsi_Host *dev = dev_id;
774
775	spin_lock_irqsave(dev->host_lock, flags);
776	NCR53c406a_intr(dev_id);
777	spin_unlock_irqrestore(dev->host_lock, flags);
778	return IRQ_HANDLED;
779}
780
781static void NCR53c406a_intr(void *dev_id)
782{
783	DEB(unsigned char fifo_size;
784	    )
785	    DEB(unsigned char seq_reg;
786	    )
787	unsigned char status, int_reg;
788#if USE_PIO
789	unsigned char pio_status;
790	struct scatterlist *sg;
791        int i;
792#endif
793
794	VDEB(printk("NCR53c406a_intr called\n"));
795
796#if USE_PIO
797	REG1;
798	pio_status = inb(PIO_STATUS);
799#endif
800	REG0;
801	status = inb(STAT_REG);
802	DEB(seq_reg = inb(SEQ_REG));
803	int_reg = inb(INT_REG);
804	DEB(fifo_size = inb(FIFO_FLAGS) & 0x1f);
805
806#if NCR53C406A_DEBUG
807	printk("status=%02x, seq_reg=%02x, int_reg=%02x, fifo_size=%02x", status, seq_reg, int_reg, fifo_size);
808#if (USE_DMA)
809	printk("\n");
810#else
811	printk(", pio=%02x\n", pio_status);
812#endif				/* USE_DMA */
813#endif				/* NCR53C406A_DEBUG */
814
815	if (int_reg & 0x80) {	/* SCSI reset intr */
816		rtrc(3);
817		DEB(printk("NCR53c406a: reset intr received\n"));
818		current_SC->SCp.phase = idle;
819		current_SC->result = DID_RESET << 16;
820		current_SC->scsi_done(current_SC);
821		return;
822	}
823#if USE_PIO
824	if (pio_status & 0x80) {
825		printk("NCR53C406A: Warning: PIO error!\n");
826		current_SC->SCp.phase = idle;
827		current_SC->result = DID_ERROR << 16;
828		current_SC->scsi_done(current_SC);
829		return;
830	}
831#endif				/* USE_PIO */
832
833	if (status & 0x20) {	/* Parity error */
834		printk("NCR53c406a: Warning: parity error!\n");
835		current_SC->SCp.phase = idle;
836		current_SC->result = DID_PARITY << 16;
837		current_SC->scsi_done(current_SC);
838		return;
839	}
840
841	if (status & 0x40) {	/* Gross error */
842		printk("NCR53c406a: Warning: gross error!\n");
843		current_SC->SCp.phase = idle;
844		current_SC->result = DID_ERROR << 16;
845		current_SC->scsi_done(current_SC);
846		return;
847	}
848
849	if (int_reg & 0x20) {	/* Disconnect */
850		DEB(printk("NCR53c406a: disconnect intr received\n"));
851		if (current_SC->SCp.phase != message_in) {	/* Unexpected disconnect */
852			current_SC->result = DID_NO_CONNECT << 16;
853		} else {	/* Command complete, return status and message */
854			current_SC->result = (current_SC->SCp.Status & 0xff)
855			    | ((current_SC->SCp.Message & 0xff) << 8) | (DID_OK << 16);
856		}
857
858		rtrc(0);
859		current_SC->SCp.phase = idle;
860		current_SC->scsi_done(current_SC);
861		return;
862	}
863
864	switch (status & 0x07) {	/* scsi phase */
865	case 0x00:		/* DATA-OUT */
866		if (int_reg & 0x10) {	/* Target requesting info transfer */
867			rtrc(5);
868			current_SC->SCp.phase = data_out;
869			VDEB(printk("NCR53c406a: Data-Out phase\n"));
870			outb(FLUSH_FIFO, CMD_REG);
871			LOAD_DMA_COUNT(scsi_bufflen(current_SC));	/* Max transfer size */
872#if USE_DMA			/* No s/g support for DMA */
873			NCR53c406a_dma_write(scsi_sglist(current_SC),
874                                             scsdi_bufflen(current_SC));
875
876#endif				/* USE_DMA */
877			outb(TRANSFER_INFO | DMA_OP, CMD_REG);
878#if USE_PIO
879                        scsi_for_each_sg(current_SC, sg, scsi_sg_count(current_SC), i) {
880                                NCR53c406a_pio_write(sg_virt(sg), sg->length);
881                        }
882			REG0;
883#endif				/* USE_PIO */
884		}
885		break;
886
887	case 0x01:		/* DATA-IN */
888		if (int_reg & 0x10) {	/* Target requesting info transfer */
889			rtrc(6);
890			current_SC->SCp.phase = data_in;
891			VDEB(printk("NCR53c406a: Data-In phase\n"));
892			outb(FLUSH_FIFO, CMD_REG);
893			LOAD_DMA_COUNT(scsi_bufflen(current_SC));	/* Max transfer size */
894#if USE_DMA			/* No s/g support for DMA */
895			NCR53c406a_dma_read(scsi_sglist(current_SC),
896                                            scsdi_bufflen(current_SC));
897#endif				/* USE_DMA */
898			outb(TRANSFER_INFO | DMA_OP, CMD_REG);
899#if USE_PIO
900                        scsi_for_each_sg(current_SC, sg, scsi_sg_count(current_SC), i) {
901                                NCR53c406a_pio_read(sg_virt(sg), sg->length);
902                        }
903			REG0;
904#endif				/* USE_PIO */
905		}
906		break;
907
908	case 0x02:		/* COMMAND */
909		current_SC->SCp.phase = command_ph;
910		printk("NCR53c406a: Warning: Unknown interrupt occurred in command phase!\n");
911		break;
912
913	case 0x03:		/* STATUS */
914		rtrc(7);
915		current_SC->SCp.phase = status_ph;
916		VDEB(printk("NCR53c406a: Status phase\n"));
917		outb(FLUSH_FIFO, CMD_REG);
918		outb(INIT_CMD_COMPLETE, CMD_REG);
919		break;
920
921	case 0x04:		/* Reserved */
922	case 0x05:		/* Reserved */
923		printk("NCR53c406a: WARNING: Reserved phase!!!\n");
924		break;
925
926	case 0x06:		/* MESSAGE-OUT */
927		DEB(printk("NCR53c406a: Message-Out phase\n"));
928		current_SC->SCp.phase = message_out;
929		outb(SET_ATN, CMD_REG);	/* Reject the message */
930		outb(MSG_ACCEPT, CMD_REG);
931		break;
932
933	case 0x07:		/* MESSAGE-IN */
934		rtrc(4);
935		VDEB(printk("NCR53c406a: Message-In phase\n"));
936		current_SC->SCp.phase = message_in;
937
938		current_SC->SCp.Status = inb(SCSI_FIFO);
939		current_SC->SCp.Message = inb(SCSI_FIFO);
940
941		VDEB(printk("SCSI FIFO size=%d\n", inb(FIFO_FLAGS) & 0x1f));
942		DEB(printk("Status = %02x  Message = %02x\n", current_SC->SCp.Status, current_SC->SCp.Message));
943
944		if (current_SC->SCp.Message == SAVE_POINTERS || current_SC->SCp.Message == DISCONNECT) {
945			outb(SET_ATN, CMD_REG);	/* Reject message */
946			DEB(printk("Discarding SAVE_POINTERS message\n"));
947		}
948		outb(MSG_ACCEPT, CMD_REG);
949		break;
950	}
951}
952
953#ifndef IRQ_LEV
954static int irq_probe(void)
955{
956	int irqs, irq;
957	unsigned long i;
958
959	inb(INT_REG);		/* clear the interrupt register */
960	irqs = probe_irq_on();
961
962	/* Invalid command will cause an interrupt */
963	REG0;
964	outb(0xff, CMD_REG);
965
966	/* Wait for the interrupt to occur */
967	i = jiffies + WATCHDOG;
968	while (time_after(i, jiffies) && !(inb(STAT_REG) & 0x80))
969		barrier();
970	if (time_before_eq(i, jiffies)) {	/* Timed out, must be hardware trouble */
971		probe_irq_off(irqs);
972		return -1;
973	}
974
975	irq = probe_irq_off(irqs);
976
977	/* Kick the chip */
978	outb(CHIP_RESET, CMD_REG);
979	outb(SCSI_NOP, CMD_REG);
980	chip_init();
981
982	return irq;
983}
984#endif				/* IRQ_LEV */
985
986static void chip_init(void)
987{
988	REG1;
989#if USE_DMA
990	outb(0x00, PIO_STATUS);
991#else				/* USE_PIO */
992	outb(0x01, PIO_STATUS);
993#endif
994	outb(0x00, PIO_FLAG);
995
996	outb(C4_IMG, CONFIG4);	/* REG0; */
997	outb(C3_IMG, CONFIG3);
998	outb(C2_IMG, CONFIG2);
999	outb(C1_IMG, CONFIG1);
1000
1001	outb(0x05, CLKCONV);	/* clock conversion factor */
1002	outb(0x9C, SRTIMOUT);	/* Selection timeout */
1003	outb(0x05, SYNCPRD);	/* Synchronous transfer period */
1004	outb(SYNC_MODE, SYNCOFF);	/* synchronous mode */
1005}
1006
1007static void __init calc_port_addr(void)
1008{
1009	/* Control Register Set 0 */
1010	TC_LSB = (port_base + 0x00);
1011	TC_MSB = (port_base + 0x01);
1012	SCSI_FIFO = (port_base + 0x02);
1013	CMD_REG = (port_base + 0x03);
1014	STAT_REG = (port_base + 0x04);
1015	DEST_ID = (port_base + 0x04);
1016	INT_REG = (port_base + 0x05);
1017	SRTIMOUT = (port_base + 0x05);
1018	SEQ_REG = (port_base + 0x06);
1019	SYNCPRD = (port_base + 0x06);
1020	FIFO_FLAGS = (port_base + 0x07);
1021	SYNCOFF = (port_base + 0x07);
1022	CONFIG1 = (port_base + 0x08);
1023	CLKCONV = (port_base + 0x09);
1024	/* TESTREG          = (port_base+0x0A); */
1025	CONFIG2 = (port_base + 0x0B);
1026	CONFIG3 = (port_base + 0x0C);
1027	CONFIG4 = (port_base + 0x0D);
1028	TC_HIGH = (port_base + 0x0E);
1029	/* FIFO_BOTTOM      = (port_base+0x0F); */
1030
1031	/* Control Register Set 1 */
1032	/* JUMPER_SENSE     = (port_base+0x00); */
1033	/* SRAM_PTR         = (port_base+0x01); */
1034	/* SRAM_DATA        = (port_base+0x02); */
1035	PIO_FIFO = (port_base + 0x04);
1036	/* PIO_FIFO1        = (port_base+0x05); */
1037	/* PIO_FIFO2        = (port_base+0x06); */
1038	/* PIO_FIFO3        = (port_base+0x07); */
1039	PIO_STATUS = (port_base + 0x08);
1040	/* ATA_CMD          = (port_base+0x09); */
1041	/* ATA_ERR          = (port_base+0x0A); */
1042	PIO_FLAG = (port_base + 0x0B);
1043	CONFIG5 = (port_base + 0x0D);
1044	/* SIGNATURE        = (port_base+0x0E); */
1045	/* CONFIG6          = (port_base+0x0F); */
1046}
1047
1048MODULE_LICENSE("GPL");
1049
1050/* NOTE:  scatter-gather support only works in PIO mode.
1051 * Use SG_NONE if DMA mode is enabled!
1052 */
1053
1054static struct scsi_host_template driver_template =
1055{
1056     .proc_name         	= "NCR53c406a"		/* proc_name */,
1057     .name              	= "NCR53c406a"		/* name */,
1058     .detect            	= NCR53c406a_detect	/* detect */,
1059     .release            	= NCR53c406a_release,
1060     .info              	= NCR53c406a_info		/* info */,
1061     .queuecommand      	= NCR53c406a_queue	/* queuecommand */,
1062     .eh_host_reset_handler     = NCR53c406a_host_reset	/* reset */,
1063     .bios_param        	= NCR53c406a_biosparm	/* biosparm */,
1064     .can_queue         	= 1			/* can_queue */,
1065     .this_id           	= 7			/* SCSI ID of the chip */,
1066     .sg_tablesize      	= 32			/*SG_ALL*/ /*SG_NONE*/,
1067     .cmd_per_lun       	= 1			/* commands per lun */,
1068     .unchecked_isa_dma 	= 1			/* unchecked_isa_dma */,
1069     .use_clustering    	= ENABLE_CLUSTERING,
1070};
1071
1072#include "scsi_module.c"
1073
1074/*
1075 * Overrides for Emacs so that we get a uniform tabbing style.
1076 * Emacs will notice this stuff at the end of the file and automatically
1077 * adjust the settings for this buffer only.  This must remain at the end
1078 * of the file.
1079 * ---------------------------------------------------------------------------
1080 * Local variables:
1081 * c-indent-level: 4
1082 * c-brace-imaginary-offset: 0
1083 * c-brace-offset: -4
1084 * c-argdecl-indent: 4
1085 * c-label-offset: -4
1086 * c-continued-statement-offset: 4
1087 * c-continued-brace-offset: 0
1088 * indent-tabs-mode: nil
1089 * tab-width: 8
1090 * End:
1091 */
1092