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