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