drivers/scsi/g_NCR5380.c

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