xref: /openbmc/linux/drivers/scsi/g_NCR5380.c (revision 3932b9ca)
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
114 static int ncr_irq = NCR_NOT_SET;
115 static int ncr_dma = NCR_NOT_SET;
116 static int ncr_addr = NCR_NOT_SET;
117 static int ncr_5380 = NCR_NOT_SET;
118 static int ncr_53c400 = NCR_NOT_SET;
119 static int ncr_53c400a = NCR_NOT_SET;
120 static int dtc_3181e = NCR_NOT_SET;
121 
122 static 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 
150 static 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 
201 static 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 
219 static 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 
237 static 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 
255 static 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 
280 int __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 
492 const 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 
507 int 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 
545 static int
546 generic_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 
568 static 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 
652 static 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 
747 static void sprint_opcode(struct seq_file *m, int opcode)
748 {
749 	PRINTP("0x%02x " ANDP opcode);
750 }
751 
752 static 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 
769 static 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 
793 static 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 
898 static 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 
917 module_param(ncr_irq, int, 0);
918 module_param(ncr_dma, int, 0);
919 module_param(ncr_addr, int, 0);
920 module_param(ncr_5380, int, 0);
921 module_param(ncr_53c400, int, 0);
922 module_param(ncr_53c400a, int, 0);
923 module_param(dtc_3181e, int, 0);
924 MODULE_LICENSE("GPL");
925 
926 #ifndef SCSI_G_NCR5380_MEM
927 static 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 
935 MODULE_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