drivers/scsi/t128.c

   1 #define AUTOSENSE
   2 #define PSEUDO_DMA
   3
   4 /*
   5  * Trantor T128/T128F/T228 driver
   6  *      Note : architecturally, the T100 and T130 are different and won't
   7  *      work
   8  *
   9  * Copyright 1993, Drew Eckhardt
  10  *      Visionary Computing
  11  *      (Unix and Linux consulting and custom programming)
  12  *      drew@colorado.edu
  13  *      +1 (303) 440-4894
  14  *
  15  * DISTRIBUTION RELEASE 3.
  16  *
  17  * For more information, please consult
  18  *
  19  * Trantor Systems, Ltd.
  20  * T128/T128F/T228 SCSI Host Adapter
  21  * Hardware Specifications
  22  *
  23  * Trantor Systems, Ltd.
  24  * 5415 Randall Place
  25  * Fremont, CA 94538
  26  * 1+ (415) 770-1400, FAX 1+ (415) 770-9910
  27  *
  28  * and
  29  *
  30  * NCR 5380 Family
  31  * SCSI Protocol Controller
  32  * Databook
  33  *
  34  * NCR Microelectronics
  35  * 1635 Aeroplaza Drive
  36  * Colorado Springs, CO 80916
  37  * 1+ (719) 578-3400
  38  * 1+ (800) 334-5454
  39  */
  40
  41 /*
  42  * Options :
  43  * AUTOSENSE - if defined, REQUEST SENSE will be performed automatically
  44  *      for commands that return with a CHECK CONDITION status.
  45  *
  46  * PSEUDO_DMA - enables PSEUDO-DMA hardware, should give a 3-4X performance
  47  * increase compared to polled I/O.
  48  *
  49  * PARITY - enable parity checking.  Not supported.
  50  *
  51  * SCSI2 - enable support for SCSI-II tagged queueing.  Untested.
  52  *
  53  *
  54  * UNSAFE - leave interrupts enabled during pseudo-DMA transfers.  You
  55  *          only really want to use this if you're having a problem with
  56  *          dropped characters during high speed communications, and even
  57  *          then, you're going to be better off twiddling with transfersize.
  58  *
  59  * USLEEP - enable support for devices that don't disconnect.  Untested.
  60  *
  61  * The card is detected and initialized in one of several ways :
  62  * 1.  Autoprobe (default) - since the board is memory mapped,
  63  *     a BIOS signature is scanned for to locate the registers.
  64  *     An interrupt is triggered to autoprobe for the interrupt
  65  *     line.
  66  *
  67  * 2.  With command line overrides - t128=address,irq may be
  68  *     used on the LILO command line to override the defaults.
  69  *
  70  * 3.  With the T128_OVERRIDE compile time define.  This is
  71  *     specified as an array of address, irq tuples.  Ie, for
  72  *     one board at the default 0xcc000 address, IRQ5, I could say
  73  *     -DT128_OVERRIDE={{0xcc000, 5}}
  74  *
  75  *     Note that if the override methods are used, place holders must
  76  *     be specified for other boards in the system.
  77  *
  78  * T128/T128F jumper/dipswitch settings (note : on my sample, the switches
  79  * were epoxy'd shut, meaning I couldn't change the 0xcc000 base address) :
  80  *
  81  * T128    Sw7 Sw8 Sw6 = 0ws Sw5 = boot
  82  * T128F   Sw6 Sw7 Sw5 = 0ws Sw4 = boot Sw8 = floppy disable
  83  * cc000   off off
  84  * c8000   off on
  85  * dc000   on  off
  86  * d8000   on  on
  87  *
  88  *
  89  * Interrupts
  90  * There is a 12 pin jumper block, jp1, numbered as follows :
  91  *   T128 (JP1)          T128F (J5)
  92  * 2 4 6 8 10 12        11 9  7 5 3 1
  93  * 1 3 5 7 9  11        12 10 8 6 4 2
  94  *
  95  * 3   2-4
  96  * 5   1-3
  97  * 7   3-5
  98  * T128F only
  99  * 10 8-10
 100  * 12 7-9
 101  * 14 10-12
 102  * 15 9-11
 103  */
 104
 105 /*
 106  * $Log: t128.c,v $
 107  */
 108
 109 #include <asm/system.h>
 110 #include <linux/signal.h>
 111 #include <linux/sched.h>
 112 #include <asm/io.h>
 113 #include <linux/blkdev.h>
 114 #include <linux/interrupt.h>
 115 #include <linux/stat.h>
 116 #include <linux/init.h>
 117 #include <linux/module.h>
 118 #include <linux/delay.h>
 119
 120 #include "scsi.h"
 121 #include <scsi/scsi_host.h>
 122 #include "t128.h"
 123 #define AUTOPROBE_IRQ
 124 #include "NCR5380.h"
 125
 126 static struct override {
 127     unsigned long address;
 128     int irq;
 129 } overrides
 130 #ifdef T128_OVERRIDE
 131     [] __initdata = T128_OVERRIDE;
 132 #else
 133     [4] __initdata = {{0, IRQ_AUTO}, {0, IRQ_AUTO},
 134         {0 ,IRQ_AUTO}, {0, IRQ_AUTO}};
 135 #endif
 136
 137 #define NO_OVERRIDES (sizeof(overrides) / sizeof(struct override))
 138
 139 static struct base {
 140     unsigned int address;
 141     int noauto;
 142 } bases[] __initdata = {
 143     { 0xcc000, 0}, { 0xc8000, 0}, { 0xdc000, 0}, { 0xd8000, 0}
 144 };
 145
 146 #define NO_BASES (sizeof (bases) / sizeof (struct base))
 147
 148 static struct signature {
 149     const char *string;
 150     int offset;
 151 } signatures[] __initdata = {
 152 {"TSROM: SCSI BIOS, Version 1.12", 0x36},
 153 };
 154
 155 #define NO_SIGNATURES (sizeof (signatures) /  sizeof (struct signature))
 156
 157 /*
 158  * Function : t128_setup(char *str, int *ints)
 159  *
 160  * Purpose : LILO command line initialization of the overrides array,
 161  *
 162  * Inputs : str - unused, ints - array of integer parameters with ints[0]
 163  *      equal to the number of ints.
 164  *
 165  */
 166
 167 void __init t128_setup(char *str, int *ints){
 168     static int commandline_current = 0;
 169     int i;
 170     if (ints[0] != 2)
 171         printk("t128_setup : usage t128=address,irq\n");
 172     else
 173         if (commandline_current < NO_OVERRIDES) {
 174             overrides[commandline_current].address = ints[1];
 175             overrides[commandline_current].irq = ints[2];
 176             for (i = 0; i < NO_BASES; ++i)
 177                 if (bases[i].address == ints[1]) {
 178                     bases[i].noauto = 1;
 179                     break;
 180                 }
 181             ++commandline_current;
 182         }
 183 }
 184
 185 /*
 186  * Function : int t128_detect(Scsi_Host_Template * tpnt)
 187  *
 188  * Purpose : detects and initializes T128,T128F, or T228 controllers
 189  *      that were autoprobed, overridden on the LILO command line,
 190  *      or specified at compile time.
 191  *
 192  * Inputs : tpnt - template for this SCSI adapter.
 193  *
 194  * Returns : 1 if a host adapter was found, 0 if not.
 195  *
 196  */
 197
 198 int __init t128_detect(Scsi_Host_Template * tpnt){
 199     static int current_override = 0, current_base = 0;
 200     struct Scsi_Host *instance;
 201     unsigned long base;
 202     void __iomem *p;
 203     int sig, count;
 204
 205     tpnt->proc_name = "t128";
 206     tpnt->proc_info = &t128_proc_info;
 207
 208     for (count = 0; current_override < NO_OVERRIDES; ++current_override) {
 209         base = 0;
 210         p = NULL;
 211
 212         if (overrides[current_override].address) {
 213             base = overrides[current_override].address;
 214             p = ioremap(bases[current_base].address, 0x2000);
 215             if (!p)
 216                 base = 0;
 217         } else
 218             for (; !base && (current_base < NO_BASES); ++current_base) {
 219 #if (TDEBUG & TDEBUG_INIT)
 220     printk("scsi-t128 : probing address %08x\n", bases[current_base].address);
 221 #endif
 222                 if (bases[current_base].noauto)
 223                         continue;
 224                 p = ioremap(bases[current_base].address, 0x2000);
 225                 if (!p)
 226                         continue;
 227                 for (sig = 0; sig < NO_SIGNATURES; ++sig)
 228                     if (check_signature(p + signatures[sig].offset,
 229                                         signatures[sig].string,
 230                                         strlen(signatures[sig].string))) {
 231                         base = bases[current_base].address;
 232 #if (TDEBUG & TDEBUG_INIT)
 233                         printk("scsi-t128 : detected board.\n");
 234 #endif
 235                         goto found;
 236                     }
 237                 iounmap(p);
 238             }
 239
 240 #if defined(TDEBUG) && (TDEBUG & TDEBUG_INIT)
 241         printk("scsi-t128 : base = %08x\n", (unsigned int) base);
 242 #endif
 243
 244         if (!base)
 245             break;
 246
 247 found:
 248         instance = scsi_register (tpnt, sizeof(struct NCR5380_hostdata));
 249         if(instance == NULL)
 250                 break;
 251
 252         instance->base = base;
 253         ((struct NCR5380_hostdata *)instance->hostdata)->base = p;
 254
 255         NCR5380_init(instance, 0);
 256
 257         if (overrides[current_override].irq != IRQ_AUTO)
 258             instance->irq = overrides[current_override].irq;
 259         else
 260             instance->irq = NCR5380_probe_irq(instance, T128_IRQS);
 261
 262         if (instance->irq != SCSI_IRQ_NONE)
 263             if (request_irq(instance->irq, t128_intr, SA_INTERRUPT, "t128", instance)) {
 264                 printk("scsi%d : IRQ%d not free, interrupts disabled\n",
 265                     instance->host_no, instance->irq);
 266                 instance->irq = SCSI_IRQ_NONE;
 267             }
 268
 269         if (instance->irq == SCSI_IRQ_NONE) {
 270             printk("scsi%d : interrupts not enabled. for better interactive performance,\n", instance->host_no);
 271             printk("scsi%d : please jumper the board for a free IRQ.\n", instance->host_no);
 272         }
 273
 274 #if defined(TDEBUG) && (TDEBUG & TDEBUG_INIT)
 275         printk("scsi%d : irq = %d\n", instance->host_no, instance->irq);
 276 #endif
 277
 278         printk("scsi%d : at 0x%08lx", instance->host_no, instance->base);
 279         if (instance->irq == SCSI_IRQ_NONE)
 280             printk (" interrupts disabled");
 281         else
 282             printk (" irq %d", instance->irq);
 283         printk(" options CAN_QUEUE=%d  CMD_PER_LUN=%d release=%d",
 284             CAN_QUEUE, CMD_PER_LUN, T128_PUBLIC_RELEASE);
 285         NCR5380_print_options(instance);
 286         printk("\n");
 287
 288         ++current_override;
 289         ++count;
 290     }
 291     return count;
 292 }
 293
 294 static int t128_release(struct Scsi_Host *shost)
 295 {
 296         NCR5380_local_declare();
 297         NCR5380_setup(shost);
 298         if (shost->irq)
 299                 free_irq(shost->irq, NULL);
 300         NCR5380_exit(shost);
 301         if (shost->io_port && shost->n_io_port)
 302                 release_region(shost->io_port, shost->n_io_port);
 303         scsi_unregister(shost);
 304         iounmap(base);
 305         return 0;
 306 }
 307
 308 /*
 309  * Function : int t128_biosparam(Disk * disk, struct block_device *dev, int *ip)
 310  *
 311  * Purpose : Generates a BIOS / DOS compatible H-C-S mapping for
 312  *      the specified device / size.
 313  *
 314  * Inputs : size = size of device in sectors (512 bytes), dev = block device
 315  *      major / minor, ip[] = {heads, sectors, cylinders}
 316  *
 317  * Returns : always 0 (success), initializes ip
 318  *
 319  */
 320
 321 /*
 322  * XXX Most SCSI boards use this mapping, I could be incorrect.  Some one
 323  * using hard disks on a trantor should verify that this mapping corresponds
 324  * to that used by the BIOS / ASPI driver by running the linux fdisk program
 325  * and matching the H_C_S coordinates to what DOS uses.
 326  */
 327
 328 int t128_biosparam(struct scsi_device *sdev, struct block_device *bdev,
 329                 sector_t capacity, int * ip)
 330 {
 331   ip[0] = 64;
 332   ip[1] = 32;
 333   ip[2] = capacity >> 11;
 334   return 0;
 335 }
 336
 337 /*
 338  * Function : int NCR5380_pread (struct Scsi_Host *instance,
 339  *      unsigned char *dst, int len)
 340  *
 341  * Purpose : Fast 5380 pseudo-dma read function, transfers len bytes to
 342  *      dst
 343  *
 344  * Inputs : dst = destination, len = length in bytes
 345  *
 346  * Returns : 0 on success, non zero on a failure such as a watchdog
 347  *      timeout.
 348  */
 349
 350 static inline int NCR5380_pread (struct Scsi_Host *instance, unsigned char *dst,
 351     int len) {
 352     NCR5380_local_declare();
 353     void __iomem *reg;
 354     unsigned char *d = dst;
 355     register int i = len;
 356
 357     NCR5380_setup(instance);
 358     reg = base + T_DATA_REG_OFFSET;
 359
 360 #if 0
 361     for (; i; --i) {
 362         while (!(readb(base+T_STATUS_REG_OFFSET) & T_ST_RDY)) barrier();
 363 #else
 364     while (!(readb(base+T_STATUS_REG_OFFSET) & T_ST_RDY)) barrier();
 365     for (; i; --i) {
 366 #endif
 367         *d++ = readb(reg);
 368     }
 369
 370     if (readb(base + T_STATUS_REG_OFFSET) & T_ST_TIM) {
 371         unsigned char tmp;
 372         void __iomem *foo = base + T_CONTROL_REG_OFFSET;
 373         tmp = readb(foo);
 374         writeb(tmp | T_CR_CT, foo);
 375         writeb(tmp, foo);
 376         printk("scsi%d : watchdog timer fired in NCR5380_pread()\n",
 377             instance->host_no);
 378         return -1;
 379     } else
 380         return 0;
 381 }
 382
 383 /*
 384  * Function : int NCR5380_pwrite (struct Scsi_Host *instance,
 385  *      unsigned char *src, int len)
 386  *
 387  * Purpose : Fast 5380 pseudo-dma write function, transfers len bytes from
 388  *      src
 389  *
 390  * Inputs : src = source, len = length in bytes
 391  *
 392  * Returns : 0 on success, non zero on a failure such as a watchdog
 393  *      timeout.
 394  */
 395
 396 static inline int NCR5380_pwrite (struct Scsi_Host *instance, unsigned char *src,
 397     int len) {
 398     NCR5380_local_declare();
 399     void __iomem *reg;
 400     unsigned char *s = src;
 401     register int i = len;
 402
 403     NCR5380_setup(instance);
 404     reg = base + T_DATA_REG_OFFSET;
 405
 406 #if 0
 407     for (; i; --i) {
 408         while (!(readb(base+T_STATUS_REG_OFFSET) & T_ST_RDY)) barrier();
 409 #else
 410     while (!(readb(base+T_STATUS_REG_OFFSET) & T_ST_RDY)) barrier();
 411     for (; i; --i) {
 412 #endif
 413         writeb(*s++, reg);
 414     }
 415
 416     if (readb(base + T_STATUS_REG_OFFSET) & T_ST_TIM) {
 417         unsigned char tmp;
 418         void __iomem *foo = base + T_CONTROL_REG_OFFSET;
 419         tmp = readb(foo);
 420         writeb(tmp | T_CR_CT, foo);
 421         writeb(tmp, foo);
 422         printk("scsi%d : watchdog timer fired in NCR5380_pwrite()\n",
 423             instance->host_no);
 424         return -1;
 425     } else
 426         return 0;
 427 }
 428
 429 MODULE_LICENSE("GPL");
 430
 431 #include "NCR5380.c"
 432
 433 static Scsi_Host_Template driver_template = {
 434         .name           = "Trantor T128/T128F/T228",
 435         .detect         = t128_detect,
 436         .release        = t128_release,
 437         .queuecommand   = t128_queue_command,
 438         .eh_abort_handler = t128_abort,
 439         .eh_bus_reset_handler    = t128_bus_reset,
 440         .eh_host_reset_handler   = t128_host_reset,
 441         .eh_device_reset_handler = t128_device_reset,
 442         .bios_param     = t128_biosparam,
 443         .can_queue      = CAN_QUEUE,
 444         .this_id        = 7,
 445         .sg_tablesize   = SG_ALL,
 446         .cmd_per_lun    = CMD_PER_LUN,
 447         .use_clustering = DISABLE_CLUSTERING,
 448 };
 449 #include "scsi_module.c"