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