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