[go: nahoru, domu]

1/*
2 * Generic Generic NCR5380 driver
3 *
4 * Copyright 1993, Drew Eckhardt
5 *	Visionary Computing
6 *	(Unix and Linux consulting and custom programming)
7 *	drew@colorado.edu
8 *      +1 (303) 440-4894
9 *
10 * NCR53C400 extensions (c) 1994,1995,1996, Kevin Lentin
11 *    K.Lentin@cs.monash.edu.au
12 *
13 * NCR53C400A extensions (c) 1996, Ingmar Baumgart
14 *    ingmar@gonzo.schwaben.de
15 *
16 * DTC3181E extensions (c) 1997, Ronald van Cuijlenborg
17 * ronald.van.cuijlenborg@tip.nl or nutty@dds.nl
18 *
19 * Added ISAPNP support for DTC436 adapters,
20 * Thomas Sailer, sailer@ife.ee.ethz.ch
21 *
22 * ALPHA RELEASE 1.
23 *
24 * For more information, please consult
25 *
26 * NCR 5380 Family
27 * SCSI Protocol Controller
28 * Databook
29 *
30 * NCR Microelectronics
31 * 1635 Aeroplaza Drive
32 * Colorado Springs, CO 80916
33 * 1+ (719) 578-3400
34 * 1+ (800) 334-5454
35 */
36
37/*
38 * TODO : flesh out DMA support, find some one actually using this (I have
39 * 	a memory mapped Trantor board that works fine)
40 */
41
42/*
43 * Options :
44 *
45 * PARITY - enable parity checking.  Not supported.
46 *
47 * SCSI2 - enable support for SCSI-II tagged queueing.  Untested.
48 *
49 * USLEEP - enable support for devices that don't disconnect.  Untested.
50 *
51 * The card is detected and initialized in one of several ways :
52 * 1.  With command line overrides - NCR5380=port,irq may be
53 *     used on the LILO command line to override the defaults.
54 *
55 * 2.  With the GENERIC_NCR5380_OVERRIDE compile time define.  This is
56 *     specified as an array of address, irq, dma, board tuples.  Ie, for
57 *     one board at 0x350, IRQ5, no dma, I could say
58 *     -DGENERIC_NCR5380_OVERRIDE={{0xcc000, 5, DMA_NONE, BOARD_NCR5380}}
59 *
60 * -1 should be specified for no or DMA interrupt, -2 to autoprobe for an
61 * 	IRQ line if overridden on the command line.
62 *
63 * 3.  When included as a module, with arguments passed on the command line:
64 *         ncr_irq=xx	the interrupt
65 *         ncr_addr=xx  the port or base address (for port or memory
66 *              	mapped, resp.)
67 *         ncr_dma=xx	the DMA
68 *         ncr_5380=1	to set up for a NCR5380 board
69 *         ncr_53c400=1	to set up for a NCR53C400 board
70 *     e.g.
71 *     modprobe g_NCR5380 ncr_irq=5 ncr_addr=0x350 ncr_5380=1
72 *       for a port mapped NCR5380 board or
73 *     modprobe g_NCR5380 ncr_irq=255 ncr_addr=0xc8000 ncr_53c400=1
74 *       for a memory mapped NCR53C400 board with interrupts disabled.
75 *
76 * 255 should be specified for no or DMA interrupt, 254 to autoprobe for an
77 * 	IRQ line if overridden on the command line.
78 *
79 */
80
81/* settings for DTC3181E card with only Mustek scanner attached */
82#define USLEEP
83#define USLEEP_POLL	1
84#define USLEEP_SLEEP	20
85#define USLEEP_WAITLONG	500
86
87#define AUTOPROBE_IRQ
88#define AUTOSENSE
89
90
91#ifdef CONFIG_SCSI_GENERIC_NCR53C400
92#define NCR53C400_PSEUDO_DMA 1
93#define PSEUDO_DMA
94#define NCR53C400
95#define NCR5380_STATS
96#undef NCR5380_STAT_LIMIT
97#endif
98
99#include <asm/io.h>
100#include <linux/signal.h>
101#include <linux/blkdev.h>
102#include "scsi.h"
103#include <scsi/scsi_host.h>
104#include "g_NCR5380.h"
105#include "NCR5380.h"
106#include <linux/stat.h>
107#include <linux/init.h>
108#include <linux/ioport.h>
109#include <linux/isapnp.h>
110#include <linux/delay.h>
111#include <linux/interrupt.h>
112
113#define NCR_NOT_SET 0
114static int ncr_irq = NCR_NOT_SET;
115static int ncr_dma = NCR_NOT_SET;
116static int ncr_addr = NCR_NOT_SET;
117static int ncr_5380 = NCR_NOT_SET;
118static int ncr_53c400 = NCR_NOT_SET;
119static int ncr_53c400a = NCR_NOT_SET;
120static int dtc_3181e = NCR_NOT_SET;
121
122static struct override {
123	NCR5380_map_type NCR5380_map_name;
124	int irq;
125	int dma;
126	int board;		/* Use NCR53c400, Ricoh, etc. extensions ? */
127} overrides
128#ifdef GENERIC_NCR5380_OVERRIDE
129[] __initdata = GENERIC_NCR5380_OVERRIDE;
130#else
131[1] __initdata = { { 0,},};
132#endif
133
134#define NO_OVERRIDES ARRAY_SIZE(overrides)
135
136#ifndef MODULE
137
138/**
139 *	internal_setup		-	handle lilo command string override
140 *	@board:	BOARD_* identifier for the board
141 *	@str: unused
142 *	@ints: numeric parameters
143 *
144 * 	Do LILO command line initialization of the overrides array. Display
145 *	errors when needed
146 *
147 *	Locks: none
148 */
149
150static void __init internal_setup(int board, char *str, int *ints)
151{
152	static int commandline_current = 0;
153	switch (board) {
154	case BOARD_NCR5380:
155		if (ints[0] != 2 && ints[0] != 3) {
156			printk(KERN_ERR "generic_NCR5380_setup : usage ncr5380=" STRVAL(NCR5380_map_name) ",irq,dma\n");
157			return;
158		}
159		break;
160	case BOARD_NCR53C400:
161		if (ints[0] != 2) {
162			printk(KERN_ERR "generic_NCR53C400_setup : usage ncr53c400=" STRVAL(NCR5380_map_name) ",irq\n");
163			return;
164		}
165		break;
166	case BOARD_NCR53C400A:
167		if (ints[0] != 2) {
168			printk(KERN_ERR "generic_NCR53C400A_setup : usage ncr53c400a=" STRVAL(NCR5380_map_name) ",irq\n");
169			return;
170		}
171		break;
172	case BOARD_DTC3181E:
173		if (ints[0] != 2) {
174			printk("generic_DTC3181E_setup : usage dtc3181e=" STRVAL(NCR5380_map_name) ",irq\n");
175			return;
176		}
177		break;
178	}
179
180	if (commandline_current < NO_OVERRIDES) {
181		overrides[commandline_current].NCR5380_map_name = (NCR5380_map_type) ints[1];
182		overrides[commandline_current].irq = ints[2];
183		if (ints[0] == 3)
184			overrides[commandline_current].dma = ints[3];
185		else
186			overrides[commandline_current].dma = DMA_NONE;
187		overrides[commandline_current].board = board;
188		++commandline_current;
189	}
190}
191
192
193/**
194 * 	do_NCR53C80_setup		-	set up entry point
195 *	@str: unused
196 *
197 *	Setup function invoked at boot to parse the ncr5380= command
198 *	line.
199 */
200
201static int __init do_NCR5380_setup(char *str)
202{
203	int ints[10];
204
205	get_options(str, ARRAY_SIZE(ints), ints);
206	internal_setup(BOARD_NCR5380, str, ints);
207	return 1;
208}
209
210/**
211 * 	do_NCR53C400_setup		-	set up entry point
212 *	@str: unused
213 *	@ints: integer parameters from kernel setup code
214 *
215 *	Setup function invoked at boot to parse the ncr53c400= command
216 *	line.
217 */
218
219static int __init do_NCR53C400_setup(char *str)
220{
221	int ints[10];
222
223	get_options(str, ARRAY_SIZE(ints), ints);
224	internal_setup(BOARD_NCR53C400, str, ints);
225	return 1;
226}
227
228/**
229 * 	do_NCR53C400A_setup	-	set up entry point
230 *	@str: unused
231 *	@ints: integer parameters from kernel setup code
232 *
233 *	Setup function invoked at boot to parse the ncr53c400a= command
234 *	line.
235 */
236
237static int __init do_NCR53C400A_setup(char *str)
238{
239	int ints[10];
240
241	get_options(str, ARRAY_SIZE(ints), ints);
242	internal_setup(BOARD_NCR53C400A, str, ints);
243	return 1;
244}
245
246/**
247 * 	do_DTC3181E_setup	-	set up entry point
248 *	@str: unused
249 *	@ints: integer parameters from kernel setup code
250 *
251 *	Setup function invoked at boot to parse the dtc3181e= command
252 *	line.
253 */
254
255static int __init do_DTC3181E_setup(char *str)
256{
257	int ints[10];
258
259	get_options(str, ARRAY_SIZE(ints), ints);
260	internal_setup(BOARD_DTC3181E, str, ints);
261	return 1;
262}
263
264#endif
265
266/**
267 * 	generic_NCR5380_detect	-	look for NCR5380 controllers
268 *	@tpnt: the scsi template
269 *
270 *	Scan for the present of NCR5380, NCR53C400, NCR53C400A, DTC3181E
271 *	and DTC436(ISAPnP) controllers. If overrides have been set we use
272 *	them.
273 *
274 *	The caller supplied NCR5380_init function is invoked from here, before
275 *	the interrupt line is taken.
276 *
277 *	Locks: none
278 */
279
280int __init generic_NCR5380_detect(struct scsi_host_template * tpnt)
281{
282	static int current_override = 0;
283	int count;
284	unsigned int *ports;
285#ifndef SCSI_G_NCR5380_MEM
286	int i;
287	unsigned long region_size = 16;
288#endif
289	static unsigned int __initdata ncr_53c400a_ports[] = {
290		0x280, 0x290, 0x300, 0x310, 0x330, 0x340, 0x348, 0x350, 0
291	};
292	static unsigned int __initdata dtc_3181e_ports[] = {
293		0x220, 0x240, 0x280, 0x2a0, 0x2c0, 0x300, 0x320, 0x340, 0
294	};
295	int flags = 0;
296	struct Scsi_Host *instance;
297#ifdef SCSI_G_NCR5380_MEM
298	unsigned long base;
299	void __iomem *iomem;
300#endif
301
302	if (ncr_irq != NCR_NOT_SET)
303		overrides[0].irq = ncr_irq;
304	if (ncr_dma != NCR_NOT_SET)
305		overrides[0].dma = ncr_dma;
306	if (ncr_addr != NCR_NOT_SET)
307		overrides[0].NCR5380_map_name = (NCR5380_map_type) ncr_addr;
308	if (ncr_5380 != NCR_NOT_SET)
309		overrides[0].board = BOARD_NCR5380;
310	else if (ncr_53c400 != NCR_NOT_SET)
311		overrides[0].board = BOARD_NCR53C400;
312	else if (ncr_53c400a != NCR_NOT_SET)
313		overrides[0].board = BOARD_NCR53C400A;
314	else if (dtc_3181e != NCR_NOT_SET)
315		overrides[0].board = BOARD_DTC3181E;
316#ifndef SCSI_G_NCR5380_MEM
317	if (!current_override && isapnp_present()) {
318		struct pnp_dev *dev = NULL;
319		count = 0;
320		while ((dev = pnp_find_dev(NULL, ISAPNP_VENDOR('D', 'T', 'C'), ISAPNP_FUNCTION(0x436e), dev))) {
321			if (count >= NO_OVERRIDES)
322				break;
323			if (pnp_device_attach(dev) < 0)
324				continue;
325			if (pnp_activate_dev(dev) < 0) {
326				printk(KERN_ERR "dtc436e probe: activate failed\n");
327				pnp_device_detach(dev);
328				continue;
329			}
330			if (!pnp_port_valid(dev, 0)) {
331				printk(KERN_ERR "dtc436e probe: no valid port\n");
332				pnp_device_detach(dev);
333				continue;
334			}
335			if (pnp_irq_valid(dev, 0))
336				overrides[count].irq = pnp_irq(dev, 0);
337			else
338				overrides[count].irq = SCSI_IRQ_NONE;
339			if (pnp_dma_valid(dev, 0))
340				overrides[count].dma = pnp_dma(dev, 0);
341			else
342				overrides[count].dma = DMA_NONE;
343			overrides[count].NCR5380_map_name = (NCR5380_map_type) pnp_port_start(dev, 0);
344			overrides[count].board = BOARD_DTC3181E;
345			count++;
346		}
347	}
348#endif
349	tpnt->proc_name = "g_NCR5380";
350
351	for (count = 0; current_override < NO_OVERRIDES; ++current_override) {
352		if (!(overrides[current_override].NCR5380_map_name))
353			continue;
354
355		ports = NULL;
356		switch (overrides[current_override].board) {
357		case BOARD_NCR5380:
358			flags = FLAG_NO_PSEUDO_DMA;
359			break;
360		case BOARD_NCR53C400:
361			flags = FLAG_NCR53C400;
362			break;
363		case BOARD_NCR53C400A:
364			flags = FLAG_NO_PSEUDO_DMA;
365			ports = ncr_53c400a_ports;
366			break;
367		case BOARD_DTC3181E:
368			flags = FLAG_NO_PSEUDO_DMA | FLAG_DTC3181E;
369			ports = dtc_3181e_ports;
370			break;
371		}
372
373#ifndef SCSI_G_NCR5380_MEM
374		if (ports) {
375			/* wakeup sequence for the NCR53C400A and DTC3181E */
376
377			/* Disable the adapter and look for a free io port */
378			outb(0x59, 0x779);
379			outb(0xb9, 0x379);
380			outb(0xc5, 0x379);
381			outb(0xae, 0x379);
382			outb(0xa6, 0x379);
383			outb(0x00, 0x379);
384
385			if (overrides[current_override].NCR5380_map_name != PORT_AUTO)
386				for (i = 0; ports[i]; i++) {
387					if (!request_region(ports[i],  16, "ncr53c80"))
388						continue;
389					if (overrides[current_override].NCR5380_map_name == ports[i])
390						break;
391					release_region(ports[i], 16);
392			} else
393				for (i = 0; ports[i]; i++) {
394					if (!request_region(ports[i],  16, "ncr53c80"))
395						continue;
396					if (inb(ports[i]) == 0xff)
397						break;
398					release_region(ports[i], 16);
399				}
400			if (ports[i]) {
401				/* At this point we have our region reserved */
402				outb(0x59, 0x779);
403				outb(0xb9, 0x379);
404				outb(0xc5, 0x379);
405				outb(0xae, 0x379);
406				outb(0xa6, 0x379);
407				outb(0x80 | i, 0x379);	/* set io port to be used */
408				outb(0xc0, ports[i] + 9);
409				if (inb(ports[i] + 9) != 0x80)
410					continue;
411				else
412					overrides[current_override].NCR5380_map_name = ports[i];
413			} else
414				continue;
415		}
416		else
417		{
418			/* Not a 53C400A style setup - just grab */
419			if(!(request_region(overrides[current_override].NCR5380_map_name, NCR5380_region_size, "ncr5380")))
420				continue;
421			region_size = NCR5380_region_size;
422		}
423#else
424		base = overrides[current_override].NCR5380_map_name;
425		if (!request_mem_region(base, NCR5380_region_size, "ncr5380"))
426			continue;
427		iomem = ioremap(base, NCR5380_region_size);
428		if (!iomem) {
429			release_mem_region(base, NCR5380_region_size);
430			continue;
431		}
432#endif
433		instance = scsi_register(tpnt, sizeof(struct NCR5380_hostdata));
434		if (instance == NULL) {
435#ifndef SCSI_G_NCR5380_MEM
436			release_region(overrides[current_override].NCR5380_map_name, region_size);
437#else
438			iounmap(iomem);
439			release_mem_region(base, NCR5380_region_size);
440#endif
441			continue;
442		}
443
444		instance->NCR5380_instance_name = overrides[current_override].NCR5380_map_name;
445#ifndef SCSI_G_NCR5380_MEM
446		instance->n_io_port = region_size;
447#else
448		((struct NCR5380_hostdata *)instance->hostdata)->iomem = iomem;
449#endif
450
451		NCR5380_init(instance, flags);
452
453		if (overrides[current_override].irq != IRQ_AUTO)
454			instance->irq = overrides[current_override].irq;
455		else
456			instance->irq = NCR5380_probe_irq(instance, 0xffff);
457
458		if (instance->irq != SCSI_IRQ_NONE)
459			if (request_irq(instance->irq, generic_NCR5380_intr,
460					0, "NCR5380", instance)) {
461				printk(KERN_WARNING "scsi%d : IRQ%d not free, interrupts disabled\n", instance->host_no, instance->irq);
462				instance->irq = SCSI_IRQ_NONE;
463			}
464
465		if (instance->irq == SCSI_IRQ_NONE) {
466			printk(KERN_INFO "scsi%d : interrupts not enabled. for better interactive performance,\n", instance->host_no);
467			printk(KERN_INFO "scsi%d : please jumper the board for a free IRQ.\n", instance->host_no);
468		}
469
470		printk(KERN_INFO "scsi%d : at " STRVAL(NCR5380_map_name) " 0x%x", instance->host_no, (unsigned int) instance->NCR5380_instance_name);
471		if (instance->irq == SCSI_IRQ_NONE)
472			printk(" interrupts disabled");
473		else
474			printk(" irq %d", instance->irq);
475		printk(" options CAN_QUEUE=%d  CMD_PER_LUN=%d release=%d", CAN_QUEUE, CMD_PER_LUN, GENERIC_NCR5380_PUBLIC_RELEASE);
476		NCR5380_print_options(instance);
477		printk("\n");
478
479		++current_override;
480		++count;
481	}
482	return count;
483}
484
485/**
486 *	generic_NCR5380_info	-	reporting string
487 *	@host: NCR5380 to report on
488 *
489 *	Report driver information for the NCR5380
490 */
491
492const char *generic_NCR5380_info(struct Scsi_Host *host)
493{
494	static const char string[] = "Generic NCR5380/53C400 Driver";
495	return string;
496}
497
498/**
499 *	generic_NCR5380_release_resources	-	free resources
500 *	@instance: host adapter to clean up
501 *
502 *	Free the generic interface resources from this adapter.
503 *
504 *	Locks: none
505 */
506
507int generic_NCR5380_release_resources(struct Scsi_Host *instance)
508{
509	NCR5380_local_declare();
510	NCR5380_setup(instance);
511
512	if (instance->irq != SCSI_IRQ_NONE)
513		free_irq(instance->irq, instance);
514	NCR5380_exit(instance);
515
516#ifndef SCSI_G_NCR5380_MEM
517	release_region(instance->NCR5380_instance_name, instance->n_io_port);
518#else
519	iounmap(((struct NCR5380_hostdata *)instance->hostdata)->iomem);
520	release_mem_region(instance->NCR5380_instance_name, NCR5380_region_size);
521#endif
522
523
524	return 0;
525}
526
527#ifdef BIOSPARAM
528/**
529 *	generic_NCR5380_biosparam
530 *	@disk: disk to compute geometry for
531 *	@dev: device identifier for this disk
532 *	@ip: sizes to fill in
533 *
534 *	Generates a BIOS / DOS compatible H-C-S mapping for the specified
535 *	device / size.
536 *
537 * 	XXX Most SCSI boards use this mapping, I could be incorrect.  Someone
538 *	using hard disks on a trantor should verify that this mapping
539 *	corresponds to that used by the BIOS / ASPI driver by running the linux
540 *	fdisk program and matching the H_C_S coordinates to what DOS uses.
541 *
542 *	Locks: none
543 */
544
545static int
546generic_NCR5380_biosparam(struct scsi_device *sdev, struct block_device *bdev,
547			  sector_t capacity, int *ip)
548{
549	ip[0] = 64;
550	ip[1] = 32;
551	ip[2] = capacity >> 11;
552	return 0;
553}
554#endif
555
556#ifdef NCR53C400_PSEUDO_DMA
557
558/**
559 *	NCR5380_pread		-	pseudo DMA read
560 *	@instance: adapter to read from
561 *	@dst: buffer to read into
562 *	@len: buffer length
563 *
564 *	Perform a pseudo DMA mode read from an NCR53C400 or equivalent
565 *	controller
566 */
567
568static inline int NCR5380_pread(struct Scsi_Host *instance, unsigned char *dst, int len)
569{
570	int blocks = len / 128;
571	int start = 0;
572	int bl;
573
574	NCR5380_local_declare();
575	NCR5380_setup(instance);
576
577	NCR5380_write(C400_CONTROL_STATUS_REG, CSR_BASE | CSR_TRANS_DIR);
578	NCR5380_write(C400_BLOCK_COUNTER_REG, blocks);
579	while (1) {
580		if ((bl = NCR5380_read(C400_BLOCK_COUNTER_REG)) == 0) {
581			break;
582		}
583		if (NCR5380_read(C400_CONTROL_STATUS_REG) & CSR_GATED_53C80_IRQ) {
584			printk(KERN_ERR "53C400r: Got 53C80_IRQ start=%d, blocks=%d\n", start, blocks);
585			return -1;
586		}
587		while (NCR5380_read(C400_CONTROL_STATUS_REG) & CSR_HOST_BUF_NOT_RDY);
588
589#ifndef SCSI_G_NCR5380_MEM
590		{
591			int i;
592			for (i = 0; i < 128; i++)
593				dst[start + i] = NCR5380_read(C400_HOST_BUFFER);
594		}
595#else
596		/* implies SCSI_G_NCR5380_MEM */
597		memcpy_fromio(dst + start, iomem + NCR53C400_host_buffer, 128);
598#endif
599		start += 128;
600		blocks--;
601	}
602
603	if (blocks) {
604		while (NCR5380_read(C400_CONTROL_STATUS_REG) & CSR_HOST_BUF_NOT_RDY)
605		{
606			// FIXME - no timeout
607		}
608
609#ifndef SCSI_G_NCR5380_MEM
610		{
611			int i;
612			for (i = 0; i < 128; i++)
613				dst[start + i] = NCR5380_read(C400_HOST_BUFFER);
614		}
615#else
616		/* implies SCSI_G_NCR5380_MEM */
617		memcpy_fromio(dst + start, iomem + NCR53C400_host_buffer, 128);
618#endif
619		start += 128;
620		blocks--;
621	}
622
623	if (!(NCR5380_read(C400_CONTROL_STATUS_REG) & CSR_GATED_53C80_IRQ))
624		printk("53C400r: no 53C80 gated irq after transfer");
625
626#if 0
627	/*
628	 *	DON'T DO THIS - THEY NEVER ARRIVE!
629	 */
630	printk("53C400r: Waiting for 53C80 registers\n");
631	while (NCR5380_read(C400_CONTROL_STATUS_REG) & CSR_53C80_REG)
632		;
633#endif
634	if (!(NCR5380_read(BUS_AND_STATUS_REG) & BASR_END_DMA_TRANSFER))
635		printk(KERN_ERR "53C400r: no end dma signal\n");
636
637	NCR5380_write(MODE_REG, MR_BASE);
638	NCR5380_read(RESET_PARITY_INTERRUPT_REG);
639	return 0;
640}
641
642/**
643 *	NCR5380_write		-	pseudo DMA write
644 *	@instance: adapter to read from
645 *	@dst: buffer to read into
646 *	@len: buffer length
647 *
648 *	Perform a pseudo DMA mode read from an NCR53C400 or equivalent
649 *	controller
650 */
651
652static inline int NCR5380_pwrite(struct Scsi_Host *instance, unsigned char *src, int len)
653{
654	int blocks = len / 128;
655	int start = 0;
656	int bl;
657	int i;
658
659	NCR5380_local_declare();
660	NCR5380_setup(instance);
661
662	NCR5380_write(C400_CONTROL_STATUS_REG, CSR_BASE);
663	NCR5380_write(C400_BLOCK_COUNTER_REG, blocks);
664	while (1) {
665		if (NCR5380_read(C400_CONTROL_STATUS_REG) & CSR_GATED_53C80_IRQ) {
666			printk(KERN_ERR "53C400w: Got 53C80_IRQ start=%d, blocks=%d\n", start, blocks);
667			return -1;
668		}
669
670		if ((bl = NCR5380_read(C400_BLOCK_COUNTER_REG)) == 0) {
671			break;
672		}
673		while (NCR5380_read(C400_CONTROL_STATUS_REG) & CSR_HOST_BUF_NOT_RDY)
674			; // FIXME - timeout
675#ifndef SCSI_G_NCR5380_MEM
676		{
677			for (i = 0; i < 128; i++)
678				NCR5380_write(C400_HOST_BUFFER, src[start + i]);
679		}
680#else
681		/* implies SCSI_G_NCR5380_MEM */
682		memcpy_toio(iomem + NCR53C400_host_buffer, src + start, 128);
683#endif
684		start += 128;
685		blocks--;
686	}
687	if (blocks) {
688		while (NCR5380_read(C400_CONTROL_STATUS_REG) & CSR_HOST_BUF_NOT_RDY)
689			; // FIXME - no timeout
690
691#ifndef SCSI_G_NCR5380_MEM
692		{
693			for (i = 0; i < 128; i++)
694				NCR5380_write(C400_HOST_BUFFER, src[start + i]);
695		}
696#else
697		/* implies SCSI_G_NCR5380_MEM */
698		memcpy_toio(iomem + NCR53C400_host_buffer, src + start, 128);
699#endif
700		start += 128;
701		blocks--;
702	}
703
704#if 0
705	printk("53C400w: waiting for registers to be available\n");
706	THEY NEVER DO ! while (NCR5380_read(C400_CONTROL_STATUS_REG) & CSR_53C80_REG);
707	printk("53C400w: Got em\n");
708#endif
709
710	/* Let's wait for this instead - could be ugly */
711	/* All documentation says to check for this. Maybe my hardware is too
712	 * fast. Waiting for it seems to work fine! KLL
713	 */
714	while (!(i = NCR5380_read(C400_CONTROL_STATUS_REG) & CSR_GATED_53C80_IRQ))
715		;	// FIXME - no timeout
716
717	/*
718	 * I know. i is certainly != 0 here but the loop is new. See previous
719	 * comment.
720	 */
721	if (i) {
722		if (!((i = NCR5380_read(BUS_AND_STATUS_REG)) & BASR_END_DMA_TRANSFER))
723			printk(KERN_ERR "53C400w: No END OF DMA bit - WHOOPS! BASR=%0x\n", i);
724	} else
725		printk(KERN_ERR "53C400w: no 53C80 gated irq after transfer (last block)\n");
726
727#if 0
728	if (!(NCR5380_read(BUS_AND_STATUS_REG) & BASR_END_DMA_TRANSFER)) {
729		printk(KERN_ERR "53C400w: no end dma signal\n");
730	}
731#endif
732	while (!(NCR5380_read(TARGET_COMMAND_REG) & TCR_LAST_BYTE_SENT))
733		; 	// TIMEOUT
734	return 0;
735}
736#endif				/* PSEUDO_DMA */
737
738/*
739 *	Include the NCR5380 core code that we build our driver around
740 */
741
742#include "NCR5380.c"
743
744#define PRINTP(x) seq_printf(m, x)
745#define ANDP ,
746
747static void sprint_opcode(struct seq_file *m, int opcode)
748{
749	PRINTP("0x%02x " ANDP opcode);
750}
751
752static void sprint_command(struct seq_file *m, unsigned char *command)
753{
754	int i, s;
755	sprint_opcode(m, command[0]);
756	for (i = 1, s = COMMAND_SIZE(command[0]); i < s; ++i)
757		PRINTP("%02x " ANDP command[i]);
758	PRINTP("\n");
759}
760
761/**
762 *	sprintf_Scsi_Cmnd	-	print a scsi command
763 *	@m: seq_fil to print into
764 *	@cmd: SCSI command block
765 *
766 *	Print out the target and command data in hex
767 */
768
769static void sprint_Scsi_Cmnd(struct seq_file *m, Scsi_Cmnd * cmd)
770{
771	PRINTP("host number %d destination target %d, lun %llu\n" ANDP cmd->device->host->host_no ANDP cmd->device->id ANDP cmd->device->lun);
772	PRINTP("        command = ");
773	sprint_command(m, cmd->cmnd);
774}
775
776/**
777 *	generic_NCR5380_proc_info	-	/proc for NCR5380 driver
778 *	@buffer: buffer to print into
779 *	@start: start position
780 *	@offset: offset into buffer
781 *	@len: length
782 *	@hostno: instance to affect
783 *	@inout: read/write
784 *
785 *	Provide the procfs information for the 5380 controller. We fill
786 *	this with useful debugging information including the commands
787 *	being executed, disconnected command queue and the statistical
788 *	data
789 *
790 *	Locks: global cli/lock for queue walk
791 */
792
793static int generic_NCR5380_show_info(struct seq_file *m, struct Scsi_Host *scsi_ptr)
794{
795	NCR5380_local_declare();
796	unsigned long flags;
797	unsigned char status;
798	int i;
799	Scsi_Cmnd *ptr;
800	struct NCR5380_hostdata *hostdata;
801#ifdef NCR5380_STATS
802	struct scsi_device *dev;
803#endif
804
805	NCR5380_setup(scsi_ptr);
806	hostdata = (struct NCR5380_hostdata *) scsi_ptr->hostdata;
807
808	spin_lock_irqsave(scsi_ptr->host_lock, flags);
809	PRINTP("SCSI host number %d : %s\n" ANDP scsi_ptr->host_no ANDP scsi_ptr->hostt->name);
810	PRINTP("Generic NCR5380 driver version %d\n" ANDP GENERIC_NCR5380_PUBLIC_RELEASE);
811	PRINTP("NCR5380 core version %d\n" ANDP NCR5380_PUBLIC_RELEASE);
812#ifdef NCR53C400
813	PRINTP("NCR53C400 extension version %d\n" ANDP NCR53C400_PUBLIC_RELEASE);
814	PRINTP("NCR53C400 card%s detected\n" ANDP(((struct NCR5380_hostdata *) scsi_ptr->hostdata)->flags & FLAG_NCR53C400) ? "" : " not");
815# if NCR53C400_PSEUDO_DMA
816	PRINTP("NCR53C400 pseudo DMA used\n");
817# endif
818#else
819	PRINTP("NO NCR53C400 driver extensions\n");
820#endif
821	PRINTP("Using %s mapping at %s 0x%lx, " ANDP STRVAL(NCR5380_map_config) ANDP STRVAL(NCR5380_map_name) ANDP scsi_ptr->NCR5380_instance_name);
822	if (scsi_ptr->irq == SCSI_IRQ_NONE)
823		PRINTP("no interrupt\n");
824	else
825		PRINTP("on interrupt %d\n" ANDP scsi_ptr->irq);
826
827#ifdef NCR5380_STATS
828	if (hostdata->connected || hostdata->issue_queue || hostdata->disconnected_queue)
829		PRINTP("There are commands pending, transfer rates may be crud\n");
830	if (hostdata->pendingr)
831		PRINTP("  %d pending reads" ANDP hostdata->pendingr);
832	if (hostdata->pendingw)
833		PRINTP("  %d pending writes" ANDP hostdata->pendingw);
834	if (hostdata->pendingr || hostdata->pendingw)
835		PRINTP("\n");
836	shost_for_each_device(dev, scsi_ptr) {
837		unsigned long br = hostdata->bytes_read[dev->id];
838		unsigned long bw = hostdata->bytes_write[dev->id];
839		long tr = hostdata->time_read[dev->id] / HZ;
840		long tw = hostdata->time_write[dev->id] / HZ;
841
842		PRINTP("  T:%d %s " ANDP dev->id ANDP scsi_device_type(dev->type));
843		for (i = 0; i < 8; i++)
844			if (dev->vendor[i] >= 0x20)
845				seq_putc(m, dev->vendor[i]);
846		seq_putc(m, ' ');
847		for (i = 0; i < 16; i++)
848			if (dev->model[i] >= 0x20)
849				seq_putc(m, dev->model[i]);
850		seq_putc(m, ' ');
851		for (i = 0; i < 4; i++)
852			if (dev->rev[i] >= 0x20)
853				seq_putc(m, dev->rev[i]);
854		seq_putc(m, ' ');
855
856		PRINTP("\n%10ld kb read    in %5ld secs" ANDP br / 1024 ANDP tr);
857		if (tr)
858			PRINTP(" @ %5ld bps" ANDP br / tr);
859
860		PRINTP("\n%10ld kb written in %5ld secs" ANDP bw / 1024 ANDP tw);
861		if (tw)
862			PRINTP(" @ %5ld bps" ANDP bw / tw);
863		PRINTP("\n");
864	}
865#endif
866
867	status = NCR5380_read(STATUS_REG);
868	if (!(status & SR_REQ))
869		PRINTP("REQ not asserted, phase unknown.\n");
870	else {
871		for (i = 0; (phases[i].value != PHASE_UNKNOWN) && (phases[i].value != (status & PHASE_MASK)); ++i);
872		PRINTP("Phase %s\n" ANDP phases[i].name);
873	}
874
875	if (!hostdata->connected) {
876		PRINTP("No currently connected command\n");
877	} else {
878		sprint_Scsi_Cmnd(m, (Scsi_Cmnd *) hostdata->connected);
879	}
880
881	PRINTP("issue_queue\n");
882
883	for (ptr = (Scsi_Cmnd *) hostdata->issue_queue; ptr; ptr = (Scsi_Cmnd *) ptr->host_scribble)
884		sprint_Scsi_Cmnd(m, ptr);
885
886	PRINTP("disconnected_queue\n");
887
888	for (ptr = (Scsi_Cmnd *) hostdata->disconnected_queue; ptr; ptr = (Scsi_Cmnd *) ptr->host_scribble)
889		sprint_Scsi_Cmnd(m, ptr);
890
891	spin_unlock_irqrestore(scsi_ptr->host_lock, flags);
892	return 0;
893}
894
895#undef PRINTP
896#undef ANDP
897
898static struct scsi_host_template driver_template = {
899	.show_info      	= generic_NCR5380_show_info,
900	.name           	= "Generic NCR5380/NCR53C400 Scsi Driver",
901	.detect         	= generic_NCR5380_detect,
902	.release        	= generic_NCR5380_release_resources,
903	.info           	= generic_NCR5380_info,
904	.queuecommand   	= generic_NCR5380_queue_command,
905	.eh_abort_handler	= generic_NCR5380_abort,
906	.eh_bus_reset_handler	= generic_NCR5380_bus_reset,
907	.bios_param     	= NCR5380_BIOSPARAM,
908	.can_queue      	= CAN_QUEUE,
909        .this_id        	= 7,
910        .sg_tablesize   	= SG_ALL,
911	.cmd_per_lun    	= CMD_PER_LUN,
912        .use_clustering		= DISABLE_CLUSTERING,
913};
914#include <linux/module.h>
915#include "scsi_module.c"
916
917module_param(ncr_irq, int, 0);
918module_param(ncr_dma, int, 0);
919module_param(ncr_addr, int, 0);
920module_param(ncr_5380, int, 0);
921module_param(ncr_53c400, int, 0);
922module_param(ncr_53c400a, int, 0);
923module_param(dtc_3181e, int, 0);
924MODULE_LICENSE("GPL");
925
926#ifndef SCSI_G_NCR5380_MEM
927static struct isapnp_device_id id_table[] = {
928	{
929	 ISAPNP_ANY_ID, ISAPNP_ANY_ID,
930	 ISAPNP_VENDOR('D', 'T', 'C'), ISAPNP_FUNCTION(0x436e),
931	 0},
932	{0}
933};
934
935MODULE_DEVICE_TABLE(isapnp, id_table);
936#endif
937
938__setup("ncr5380=", do_NCR5380_setup);
939__setup("ncr53c400=", do_NCR53C400_setup);
940__setup("ncr53c400a=", do_NCR53C400A_setup);
941__setup("dtc3181e=", do_DTC3181E_setup);
942