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