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