drivers/scsi/NCR53c406a.c

   1 /*
   2  *  NCR53c406.c
   3  *  Low-level SCSI driver for NCR53c406a chip.
   4  *  Copyright (C) 1994, 1995, 1996 Normunds Saumanis (normunds@fi.ibm.com)
   5  *
   6  *  LILO command line usage: ncr53c406a=<PORTBASE>[,<IRQ>[,<FASTPIO>]]
   7  *  Specify IRQ = 0 for non-interrupt driven mode.
   8  *  FASTPIO = 1 for fast pio mode, 0 for slow mode.
   9  *
  10  *  This program is free software; you can redistribute it and/or modify it
  11  *  under the terms of the GNU General Public License as published by the
  12  *  Free Software Foundation; either version 2, or (at your option) any
  13  *  later version.
  14  *
  15  *  This program is distributed in the hope that it will be useful, but
  16  *  WITHOUT ANY WARRANTY; without even the implied warranty of
  17  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  18  *  General Public License for more details.
  19  *
  20  */
  21
  22 #define NCR53C406A_DEBUG 0
  23 #define VERBOSE_NCR53C406A_DEBUG 0
  24
  25 /* Set this to 1 for PIO mode (recommended) or to 0 for DMA mode */
  26 #define USE_PIO 1
  27
  28 #define USE_BIOS 0
  29                                 /* #define BIOS_ADDR 0xD8000 *//* define this if autoprobe fails */
  30                                 /* #define PORT_BASE 0x330 *//* define this if autoprobe fails */
  31                                 /* #define IRQ_LEV   0  *//* define this if autoprobe fails */
  32 #define DMA_CHAN  5             /* this is ignored if DMA is disabled */
  33
  34 /* Set this to 0 if you encounter kernel lockups while transferring
  35  * data in PIO mode */
  36 #define USE_FAST_PIO 1
  37
  38 /* ============= End of user configurable parameters ============= */
  39
  40 #include <linux/module.h>
  41
  42 #include <linux/errno.h>
  43 #include <linux/ioport.h>
  44 #include <linux/sched.h>
  45 #include <linux/interrupt.h>
  46 #include <linux/proc_fs.h>
  47 #include <linux/stat.h>
  48 #include <linux/init.h>
  49 #include <asm/io.h>
  50 #include <asm/dma.h>
  51 #include <asm/bitops.h>
  52 #include <asm/irq.h>
  53
  54 #include <linux/blkdev.h>
  55 #include <linux/spinlock.h>
  56 #include "scsi.h"
  57 #include "hosts.h"
  58
  59 /* ============================================================= */
  60
  61 #define WATCHDOG 5000000
  62
  63 #define SYNC_MODE 0             /* Synchronous transfer mode */
  64
  65 #if DEBUG
  66 #undef NCR53C406A_DEBUG
  67 #define NCR53C406A_DEBUG 1
  68 #endif
  69
  70 #if USE_PIO
  71 #define USE_DMA 0
  72 #else
  73 #define USE_DMA 1
  74 #endif
  75
  76 /* Default configuration */
  77 #define C1_IMG   0x07           /* ID=7 */
  78 #define C2_IMG   0x48           /* FE SCSI2 */
  79 #if USE_DMA
  80 #define C3_IMG   0x21           /* CDB TE */
  81 #else
  82 #define C3_IMG   0x20           /* CDB */
  83 #endif
  84 #define C4_IMG   0x04           /* ANE */
  85 #define C5_IMG   0xb6           /* AA PI SIE POL */
  86
  87 #define REG0 (outb(C4_IMG, CONFIG4))
  88 #define REG1 (outb(C5_IMG, CONFIG5))
  89
  90 #if NCR53C406A_DEBUG
  91 #define DEB(x) x
  92 #else
  93 #define DEB(x)
  94 #endif
  95
  96 #if VERBOSE_NCR53C406A_DEBUG
  97 #define VDEB(x) x
  98 #else
  99 #define VDEB(x)
 100 #endif
 101
 102 #define LOAD_DMA_COUNT(count) \
 103   outb(count & 0xff, TC_LSB); \
 104   outb((count >> 8) & 0xff, TC_MSB); \
 105   outb((count >> 16) & 0xff, TC_HIGH);
 106
 107 /* Chip commands */
 108 #define DMA_OP               0x80
 109
 110 #define SCSI_NOP             0x00
 111 #define FLUSH_FIFO           0x01
 112 #define CHIP_RESET           0x02
 113 #define SCSI_RESET           0x03
 114 #define RESELECT             0x40
 115 #define SELECT_NO_ATN        0x41
 116 #define SELECT_ATN           0x42
 117 #define SELECT_ATN_STOP      0x43
 118 #define ENABLE_SEL           0x44
 119 #define DISABLE_SEL          0x45
 120 #define SELECT_ATN3          0x46
 121 #define RESELECT3            0x47
 122 #define TRANSFER_INFO        0x10
 123 #define INIT_CMD_COMPLETE    0x11
 124 #define MSG_ACCEPT           0x12
 125 #define TRANSFER_PAD         0x18
 126 #define SET_ATN              0x1a
 127 #define RESET_ATN            0x1b
 128 #define SEND_MSG             0x20
 129 #define SEND_STATUS          0x21
 130 #define SEND_DATA            0x22
 131 #define DISCONN_SEQ          0x23
 132 #define TERMINATE_SEQ        0x24
 133 #define TARG_CMD_COMPLETE    0x25
 134 #define DISCONN              0x27
 135 #define RECV_MSG             0x28
 136 #define RECV_CMD             0x29
 137 #define RECV_DATA            0x2a
 138 #define RECV_CMD_SEQ         0x2b
 139 #define TARGET_ABORT_DMA     0x04
 140
 141 /*----------------------------------------------------------------*/
 142 /* the following will set the monitor border color (useful to find
 143    where something crashed or gets stuck at */
 144 /* 1 = blue
 145    2 = green
 146    3 = cyan
 147    4 = red
 148    5 = magenta
 149    6 = yellow
 150    7 = white
 151 */
 152
 153 #if NCR53C406A_DEBUG
 154 #define rtrc(i) {inb(0x3da);outb(0x31,0x3c0);outb((i),0x3c0);}
 155 #else
 156 #define rtrc(i) {}
 157 #endif
 158 /*----------------------------------------------------------------*/
 159
 160 enum Phase {
 161         idle,
 162         data_out,
 163         data_in,
 164         command_ph,
 165         status_ph,
 166         message_out,
 167         message_in
 168 };
 169
 170 /* Static function prototypes */
 171 static void NCR53c406a_intr(int, void *, struct pt_regs *);
 172 static irqreturn_t do_NCR53c406a_intr(int, void *, struct pt_regs *);
 173 static void chip_init(void);
 174 static void calc_port_addr(void);
 175 #ifndef IRQ_LEV
 176 static int irq_probe(void);
 177 #endif
 178
 179 /* ================================================================= */
 180
 181 #if USE_BIOS
 182 static void *bios_base;
 183 #endif
 184
 185 #if PORT_BASE
 186 static int port_base = PORT_BASE;
 187 #else
 188 static int port_base;
 189 #endif
 190
 191 #if IRQ_LEV
 192 static int irq_level = IRQ_LEV;
 193 #else
 194 static int irq_level = -1;      /* 0 is 'no irq', so use -1 for 'uninitialized' */
 195 #endif
 196
 197 #if USE_DMA
 198 static int dma_chan;
 199 #endif
 200
 201 #if USE_PIO
 202 static int fast_pio = USE_FAST_PIO;
 203 #endif
 204
 205 static Scsi_Cmnd *current_SC;
 206 static char info_msg[256];
 207
 208 /* ================================================================= */
 209
 210 /* possible BIOS locations */
 211 #if USE_BIOS
 212 static void *addresses[] = {
 213         (void *) 0xd8000,
 214         (void *) 0xc8000
 215 };
 216 #define ADDRESS_COUNT (sizeof( addresses ) / sizeof( unsigned ))
 217 #endif                          /* USE_BIOS */
 218
 219 /* possible i/o port addresses */
 220 static unsigned short ports[] = { 0x230, 0x330, 0x280, 0x290, 0x330, 0x340, 0x300, 0x310, 0x348, 0x350 };
 221 #define PORT_COUNT (sizeof( ports ) / sizeof( unsigned short ))
 222
 223 /* possible interrupt channels */
 224 static unsigned short intrs[] = { 10, 11, 12, 15 };
 225 #define INTR_COUNT (sizeof( intrs ) / sizeof( unsigned short ))
 226
 227 /* signatures for NCR 53c406a based controllers */
 228 #if USE_BIOS
 229 struct signature {
 230         char *signature;
 231         int sig_offset;
 232         int sig_length;
 233 } signatures[] __initdata = {
 234         /*          1         2         3         4         5         6 */
 235         /* 123456789012345678901234567890123456789012345678901234567890 */
 236         {
 237 "Copyright (C) Acculogic, Inc.\r\n2.8M Diskette Extension Bios ver 4.04.03 03/01/1993", 61, 82},};
 238
 239 #define SIGNATURE_COUNT (sizeof( signatures ) / sizeof( struct signature ))
 240 #endif                          /* USE_BIOS */
 241
 242 /* ============================================================ */
 243
 244 /* Control Register Set 0 */
 245 static int TC_LSB;              /* transfer counter lsb         */
 246 static int TC_MSB;              /* transfer counter msb */
 247 static int SCSI_FIFO;           /* scsi fifo register   */
 248 static int CMD_REG;             /* command register             */
 249 static int STAT_REG;            /* status register              */
 250 static int DEST_ID;             /* selection/reselection bus id */
 251 static int INT_REG;             /* interrupt status register    */
 252 static int SRTIMOUT;            /* select/reselect timeout reg  */
 253 static int SEQ_REG;             /* sequence step register       */
 254 static int SYNCPRD;             /* synchronous transfer period  */
 255 static int FIFO_FLAGS;          /* indicates # of bytes in fifo */
 256 static int SYNCOFF;             /* synchronous offset register  */
 257 static int CONFIG1;             /* configuration register       */
 258 static int CLKCONV;             /* clock conversion reg */
 259                                 /*static int TESTREG;*//* test mode register           */
 260 static int CONFIG2;             /* Configuration 2 Register     */
 261 static int CONFIG3;             /* Configuration 3 Register     */
 262 static int CONFIG4;             /* Configuration 4 Register     */
 263 static int TC_HIGH;             /* Transfer Counter High */
 264                                 /*static int FIFO_BOTTOM;*//* Reserve FIFO byte register   */
 265
 266 /* Control Register Set 1 */
 267                                 /*static int JUMPER_SENSE;*//* Jumper sense port reg (r/w) */
 268                                 /*static int SRAM_PTR;*//* SRAM address pointer reg (r/w) */
 269                                 /*static int SRAM_DATA;*//* SRAM data register (r/w) */
 270 static int PIO_FIFO;            /* PIO FIFO registers (r/w) */
 271                                 /*static int PIO_FIFO1;*//*  */
 272                                 /*static int PIO_FIFO2;*//*  */
 273                                 /*static int PIO_FIFO3;*//*  */
 274 static int PIO_STATUS;          /* PIO status (r/w) */
 275                                 /*static int ATA_CMD;*//* ATA command/status reg (r/w) */
 276                                 /*static int ATA_ERR;*//* ATA features/error register (r/w) */
 277 static int PIO_FLAG;            /* PIO flag interrupt enable (r/w) */
 278 static int CONFIG5;             /* Configuration 5 register (r/w) */
 279                                 /*static int SIGNATURE;*//* Signature Register (r) */
 280                                 /*static int CONFIG6;*//* Configuration 6 register (r) */
 281
 282 /* ============================================================== */
 283
 284 #if USE_DMA
 285 static __inline__ int NCR53c406a_dma_setup(unsigned char *ptr, unsigned int count, unsigned char mode)
 286 {
 287         unsigned limit;
 288         unsigned long flags = 0;
 289
 290         VDEB(printk("dma: before count=%d   ", count));
 291         if (dma_chan <= 3) {
 292                 if (count > 65536)
 293                         count = 65536;
 294                 limit = 65536 - (((unsigned) ptr) & 0xFFFF);
 295         } else {
 296                 if (count > (65536 << 1))
 297                         count = (65536 << 1);
 298                 limit = (65536 << 1) - (((unsigned) ptr) & 0x1FFFF);
 299         }
 300
 301         if (count > limit)
 302                 count = limit;
 303
 304         VDEB(printk("after count=%d\n", count));
 305         if ((count & 1) || (((unsigned) ptr) & 1))
 306                 panic("NCR53c406a: attempted unaligned DMA transfer\n");
 307
 308         flags = claim_dma_lock();
 309         disable_dma(dma_chan);
 310         clear_dma_ff(dma_chan);
 311         set_dma_addr(dma_chan, (long) ptr);
 312         set_dma_count(dma_chan, count);
 313         set_dma_mode(dma_chan, mode);
 314         enable_dma(dma_chan);
 315         release_dma_lock(flags);
 316
 317         return count;
 318 }
 319
 320 static __inline__ int NCR53c406a_dma_write(unsigned char *src, unsigned int count)
 321 {
 322         return NCR53c406a_dma_setup(src, count, DMA_MODE_WRITE);
 323 }
 324
 325 static __inline__ int NCR53c406a_dma_read(unsigned char *src, unsigned int count)
 326 {
 327         return NCR53c406a_dma_setup(src, count, DMA_MODE_READ);
 328 }
 329
 330 static __inline__ int NCR53c406a_dma_residual(void)
 331 {
 332         register int tmp;
 333         unsigned long flags;
 334
 335         flags = claim_dma_lock();
 336         clear_dma_ff(dma_chan);
 337         tmp = get_dma_residue(dma_chan);
 338         release_dma_lock(flags);
 339
 340         return tmp;
 341 }
 342 #endif                          /* USE_DMA */
 343
 344 #if USE_PIO
 345 static __inline__ int NCR53c406a_pio_read(unsigned char *request, unsigned int reqlen)
 346 {
 347         int i;
 348         int len;                /* current scsi fifo size */
 349
 350         REG1;
 351         while (reqlen) {
 352                 i = inb(PIO_STATUS);
 353                 /*    VDEB(printk("pio_status=%x\n", i)); */
 354                 if (i & 0x80)
 355                         return 0;
 356
 357                 switch (i & 0x1e) {
 358                 default:
 359                 case 0x10:
 360                         len = 0;
 361                         break;
 362                 case 0x0:
 363                         len = 1;
 364                         break;
 365                 case 0x8:
 366                         len = 42;
 367                         break;
 368                 case 0xc:
 369                         len = 84;
 370                         break;
 371                 case 0xe:
 372                         len = 128;
 373                         break;
 374                 }
 375
 376                 if ((i & 0x40) && len == 0) {   /* fifo empty and interrupt occurred */
 377                         return 0;
 378                 }
 379
 380                 if (len) {
 381                         if (len > reqlen)
 382                                 len = reqlen;
 383
 384                         if (fast_pio && len > 3) {
 385                                 insl(PIO_FIFO, request, len >> 2);
 386                                 request += len & 0xfc;
 387                                 reqlen -= len & 0xfc;
 388                         } else {
 389                                 while (len--) {
 390                                         *request++ = inb(PIO_FIFO);
 391                                         reqlen--;
 392                                 }
 393                         }
 394                 }
 395         }
 396         return 0;
 397 }
 398
 399 static __inline__ int NCR53c406a_pio_write(unsigned char *request, unsigned int reqlen)
 400 {
 401         int i = 0;
 402         int len;                /* current scsi fifo size */
 403
 404         REG1;
 405         while (reqlen && !(i & 0x40)) {
 406                 i = inb(PIO_STATUS);
 407                 /*    VDEB(printk("pio_status=%x\n", i)); */
 408                 if (i & 0x80)   /* error */
 409                         return 0;
 410
 411                 switch (i & 0x1e) {
 412                 case 0x10:
 413                         len = 128;
 414                         break;
 415                 case 0x0:
 416                         len = 84;
 417                         break;
 418                 case 0x8:
 419                         len = 42;
 420                         break;
 421                 case 0xc:
 422                         len = 1;
 423                         break;
 424                 default:
 425                 case 0xe:
 426                         len = 0;
 427                         break;
 428                 }
 429
 430                 if (len) {
 431                         if (len > reqlen)
 432                                 len = reqlen;
 433
 434                         if (fast_pio && len > 3) {
 435                                 outsl(PIO_FIFO, request, len >> 2);
 436                                 request += len & 0xfc;
 437                                 reqlen -= len & 0xfc;
 438                         } else {
 439                                 while (len--) {
 440                                         outb(*request++, PIO_FIFO);
 441                                         reqlen--;
 442                                 }
 443                         }
 444                 }
 445         }
 446         return 0;
 447 }
 448 #endif                          /* USE_PIO */
 449
 450 static int __init NCR53c406a_detect(Scsi_Host_Template * tpnt)
 451 {
 452         int present = 0;
 453         struct Scsi_Host *shpnt = NULL;
 454 #ifndef PORT_BASE
 455         int i;
 456 #endif
 457
 458 #if USE_BIOS
 459         int ii, jj;
 460         bios_base = 0;
 461         /* look for a valid signature */
 462         for (ii = 0; ii < ADDRESS_COUNT && !bios_base; ii++)
 463                 for (jj = 0; (jj < SIGNATURE_COUNT) && !bios_base; jj++)
 464                         if (!memcmp((void *) addresses[ii] + signatures[jj].sig_offset, (void *) signatures[jj].signature, (int) signatures[jj].sig_length))
 465                                 bios_base = addresses[ii];
 466
 467         if (!bios_base) {
 468                 printk("NCR53c406a: BIOS signature not found\n");
 469                 return 0;
 470         }
 471
 472         DEB(printk("NCR53c406a BIOS found at 0x%x\n", (unsigned int) bios_base);
 473             );
 474 #endif                          /* USE_BIOS */
 475
 476 #ifdef PORT_BASE
 477         if (!request_region(port_base, 0x10, "NCR53c406a"))     /* ports already snatched */
 478                 port_base = 0;
 479
 480 #else                           /* autodetect */
 481         if (port_base) {        /* LILO override */
 482                 if (!request_region(port_base, 0x10, "NCR53c406a"))
 483                         port_base = 0;
 484         } else {
 485                 for (i = 0; i < PORT_COUNT && !port_base; i++) {
 486                         if (!request_region(ports[i], 0x10, "NCR53c406a")) {
 487                                 DEB(printk("NCR53c406a: port 0x%x in use\n", ports[i]));
 488                         } else {
 489                                 VDEB(printk("NCR53c406a: port 0x%x available\n", ports[i]));
 490                                 outb(C5_IMG, ports[i] + 0x0d);  /* reg set 1 */
 491                                 if ((inb(ports[i] + 0x0e) ^ inb(ports[i] + 0x0e)) == 7 && (inb(ports[i] + 0x0e) ^ inb(ports[i] + 0x0e)) == 7 && (inb(ports[i] + 0x0e) & 0xf8) == 0x58) {
 492                                         port_base = ports[i];
 493                                         VDEB(printk("NCR53c406a: Sig register valid\n"));
 494                                         VDEB(printk("port_base=0x%x\n", port_base));
 495                                         break;
 496                                 }
 497                                 release_region(ports[i], 0x10);
 498                         }
 499                 }
 500         }
 501 #endif                          /* PORT_BASE */
 502
 503         if (!port_base) {       /* no ports found */
 504                 printk("NCR53c406a: no available ports found\n");
 505                 return 0;
 506         }
 507
 508         DEB(printk("NCR53c406a detected\n"));
 509
 510         calc_port_addr();
 511         chip_init();
 512
 513 #ifndef IRQ_LEV
 514         if (irq_level < 0) {    /* LILO override if >= 0 */
 515                 irq_level = irq_probe();
 516                 if (irq_level < 0) {    /* Trouble */
 517                         printk("NCR53c406a: IRQ problem, irq_level=%d, giving up\n", irq_level);
 518                         goto err_release;
 519                 }
 520         }
 521 #endif
 522
 523         DEB(printk("NCR53c406a: using port_base 0x%x\n", port_base));
 524
 525         present = 1;
 526         tpnt->proc_name = "NCR53c406a";
 527
 528         shpnt = scsi_register(tpnt, 0);
 529         if (!shpnt) {
 530                 printk("NCR53c406a: Unable to register host, giving up.\n");
 531                 goto err_release;
 532         }
 533
 534         if (irq_level > 0) {
 535                 if (request_irq(irq_level, do_NCR53c406a_intr, 0, "NCR53c406a", shpnt)) {
 536                         printk("NCR53c406a: unable to allocate IRQ %d\n", irq_level);
 537                         goto err_free_scsi;
 538                 }
 539                 tpnt->can_queue = 1;
 540                 DEB(printk("NCR53c406a: allocated IRQ %d\n", irq_level));
 541         } else if (irq_level == 0) {
 542                 tpnt->can_queue = 0;
 543                 DEB(printk("NCR53c406a: No interrupts detected\n"));
 544                 printk("NCR53c406a driver no longer supports polling interface\n");
 545                 printk("Please email linux-scsi@vger.kernel.org\n");
 546
 547 #if USE_DMA
 548                 printk("NCR53c406a: No interrupts found and DMA mode defined. Giving up.\n");
 549 #endif                          /* USE_DMA */
 550                 goto err_free_scsi;
 551         } else {
 552                 DEB(printk("NCR53c406a: Shouldn't get here!\n"));
 553                 goto err_free_scsi;
 554         }
 555
 556 #if USE_DMA
 557         dma_chan = DMA_CHAN;
 558         if (request_dma(dma_chan, "NCR53c406a") != 0) {
 559                 printk("NCR53c406a: unable to allocate DMA channel %d\n", dma_chan);
 560                 goto err_free_irq;
 561         }
 562
 563         DEB(printk("Allocated DMA channel %d\n", dma_chan));
 564 #endif                          /* USE_DMA */
 565
 566         shpnt->irq = irq_level;
 567         shpnt->io_port = port_base;
 568         shpnt->n_io_port = 0x10;
 569 #if USE_DMA
 570         shpnt->dma = dma_chan;
 571 #endif
 572
 573 #if USE_DMA
 574         sprintf(info_msg, "NCR53c406a at 0x%x, IRQ %d, DMA channel %d.", port_base, irq_level, dma_chan);
 575 #else
 576         sprintf(info_msg, "NCR53c406a at 0x%x, IRQ %d, %s PIO mode.", port_base, irq_level, fast_pio ? "fast" : "slow");
 577 #endif
 578
 579         return (present);
 580
 581 #if USE_DMA
 582       err_free_irq:
 583         if (irq_level)
 584                 free_irq(irq_level, shpnt);
 585 #endif
 586       err_free_scsi:
 587         scsi_unregister(shpnt);
 588       err_release:
 589         release_region(port_base, 0x10);
 590         return 0;
 591 }
 592
 593 static int NCR53c406a_release(struct Scsi_Host *shost)
 594 {
 595         if (shost->irq)
 596                 free_irq(shost->irq, NULL);
 597 #ifdef USE_DMA
 598         if (shost->dma_channel != 0xff)
 599                 free_dma(shost->dma_channel);
 600 #endif
 601         if (shost->io_port && shost->n_io_port)
 602                 release_region(shost->io_port, shost->n_io_port);
 603
 604         scsi_unregister(shost);
 605         return 0;
 606 }
 607
 608 /* called from init/main.c */
 609 static void __init NCR53c406a_setup(char *str, int *ints)
 610 {
 611         static size_t setup_idx = 0;
 612         size_t i;
 613
 614         DEB(printk("NCR53c406a: Setup called\n");
 615             );
 616
 617         if (setup_idx >= PORT_COUNT - 1) {
 618                 printk("NCR53c406a: Setup called too many times.  Bad LILO params?\n");
 619                 return;
 620         }
 621         if (ints[0] < 1 || ints[0] > 3) {
 622                 printk("NCR53c406a: Malformed command line\n");
 623                 printk("NCR53c406a: Usage: ncr53c406a=<PORTBASE>[,<IRQ>[,<FASTPIO>]]\n");
 624                 return;
 625         }
 626         for (i = 0; i < PORT_COUNT && !port_base; i++)
 627                 if (ports[i] == ints[1]) {
 628                         port_base = ints[1];
 629                         DEB(printk("NCR53c406a: Specified port_base 0x%x\n", port_base);
 630                             )
 631                 }
 632         if (!port_base) {
 633                 printk("NCR53c406a: Invalid PORTBASE 0x%x specified\n", ints[1]);
 634                 return;
 635         }
 636
 637         if (ints[0] > 1) {
 638                 if (ints[2] == 0) {
 639                         irq_level = 0;
 640                         DEB(printk("NCR53c406a: Specified irq %d\n", irq_level);
 641                             )
 642                 } else
 643                         for (i = 0; i < INTR_COUNT && irq_level < 0; i++)
 644                                 if (intrs[i] == ints[2]) {
 645                                         irq_level = ints[2];
 646                                         DEB(printk("NCR53c406a: Specified irq %d\n", port_base);
 647                                             )
 648                                 }
 649                 if (irq_level < 0)
 650                         printk("NCR53c406a: Invalid IRQ %d specified\n", ints[2]);
 651         }
 652
 653         if (ints[0] > 2)
 654                 fast_pio = ints[3];
 655
 656         DEB(printk("NCR53c406a: port_base=0x%x, irq=%d, fast_pio=%d\n", port_base, irq_level, fast_pio);)
 657 }
 658
 659 __setup("ncr53c406a=", NCR53c406a_setup);
 660
 661 static const char *NCR53c406a_info(struct Scsi_Host *SChost)
 662 {
 663         DEB(printk("NCR53c406a_info called\n"));
 664         return (info_msg);
 665 }
 666
 667 #if 0
 668 static void wait_intr(void)
 669 {
 670         unsigned long i = jiffies + WATCHDOG;
 671
 672         while (time_after(i, jiffies) && !(inb(STAT_REG) & 0xe0)) {     /* wait for a pseudo-interrupt */
 673                 cpu_relax();
 674                 barrier();
 675         }
 676
 677         if (time_before_eq(i, jiffies)) {       /* Timed out */
 678                 rtrc(0);
 679                 current_SC->result = DID_TIME_OUT << 16;
 680                 current_SC->SCp.phase = idle;
 681                 current_SC->scsi_done(current_SC);
 682                 return;
 683         }
 684
 685         NCR53c406a_intr(0, NULL, NULL);
 686 }
 687 #endif
 688
 689 static int NCR53c406a_queue(Scsi_Cmnd * SCpnt, void (*done) (Scsi_Cmnd *))
 690 {
 691         int i;
 692
 693         VDEB(printk("NCR53c406a_queue called\n"));
 694         DEB(printk("cmd=%02x, cmd_len=%02x, target=%02x, lun=%02x, bufflen=%d\n", SCpnt->cmnd[0], SCpnt->cmd_len, SCpnt->target, SCpnt->lun, SCpnt->request_bufflen));
 695
 696 #if 0
 697         VDEB(for (i = 0; i < SCpnt->cmd_len; i++)
 698              printk("cmd[%d]=%02x  ", i, SCpnt->cmnd[i]));
 699         VDEB(printk("\n"));
 700 #endif
 701
 702         current_SC = SCpnt;
 703         current_SC->scsi_done = done;
 704         current_SC->SCp.phase = command_ph;
 705         current_SC->SCp.Status = 0;
 706         current_SC->SCp.Message = 0;
 707
 708         /* We are locked here already by the mid layer */
 709         REG0;
 710         outb(SCpnt->device->id, DEST_ID);       /* set destination */
 711         outb(FLUSH_FIFO, CMD_REG);      /* reset the fifos */
 712
 713         for (i = 0; i < SCpnt->cmd_len; i++) {
 714                 outb(SCpnt->cmnd[i], SCSI_FIFO);
 715         }
 716         outb(SELECT_NO_ATN, CMD_REG);
 717
 718         rtrc(1);
 719         return 0;
 720 }
 721
 722 static int NCR53c406a_abort(Scsi_Cmnd * SCpnt)
 723 {
 724         DEB(printk("NCR53c406a_abort called\n"));
 725         return FAILED;          /* Don't know how to abort */
 726 }
 727
 728 static int NCR53c406a_host_reset(Scsi_Cmnd * SCpnt)
 729 {
 730         DEB(printk("NCR53c406a_reset called\n"));
 731         outb(C4_IMG, CONFIG4);  /* Select reg set 0 */
 732         outb(CHIP_RESET, CMD_REG);
 733         outb(SCSI_NOP, CMD_REG);        /* required after reset */
 734         outb(SCSI_RESET, CMD_REG);
 735         chip_init();
 736
 737         rtrc(2);
 738         return SUCCESS;
 739 }
 740
 741 static int NCR53c406a_device_reset(Scsi_Cmnd * SCpnt)
 742 {
 743         return FAILED;
 744 }
 745
 746 static int NCR53c406a_bus_reset(Scsi_Cmnd * SCpnt)
 747 {
 748         return FAILED;
 749 }
 750
 751 static int NCR53c406a_biosparm(struct scsi_device *disk,
 752                                struct block_device *dev,
 753                                sector_t capacity, int *info_array)
 754 {
 755         int size;
 756
 757         DEB(printk("NCR53c406a_biosparm called\n"));
 758
 759         size = capacity;
 760         info_array[0] = 64;     /* heads */
 761         info_array[1] = 32;     /* sectors */
 762         info_array[2] = size >> 11;     /* cylinders */
 763         if (info_array[2] > 1024) {     /* big disk */
 764                 info_array[0] = 255;
 765                 info_array[1] = 63;
 766                 info_array[2] = size / (255 * 63);
 767         }
 768         return 0;
 769 }
 770
 771 static irqreturn_t do_NCR53c406a_intr(int unused, void *dev_id,
 772                                         struct pt_regs *regs)
 773 {
 774         unsigned long flags;
 775         struct Scsi_Host *dev = dev_id;
 776
 777         spin_lock_irqsave(dev->host_lock, flags);
 778         NCR53c406a_intr(0, dev_id, regs);
 779         spin_unlock_irqrestore(dev->host_lock, flags);
 780         return IRQ_HANDLED;
 781 }
 782
 783 static void NCR53c406a_intr(int unused, void *dev_id, struct pt_regs *regs)
 784 {
 785         DEB(unsigned char fifo_size;
 786             )
 787             DEB(unsigned char seq_reg;
 788             )
 789         unsigned char status, int_reg;
 790 #if USE_PIO
 791         unsigned char pio_status;
 792         struct scatterlist *sglist;
 793         unsigned int sgcount;
 794 #endif
 795
 796         VDEB(printk("NCR53c406a_intr called\n"));
 797
 798 #if USE_PIO
 799         REG1;
 800         pio_status = inb(PIO_STATUS);
 801 #endif
 802         REG0;
 803         status = inb(STAT_REG);
 804         DEB(seq_reg = inb(SEQ_REG));
 805         int_reg = inb(INT_REG);
 806         DEB(fifo_size = inb(FIFO_FLAGS) & 0x1f);
 807
 808 #if NCR53C406A_DEBUG
 809         printk("status=%02x, seq_reg=%02x, int_reg=%02x, fifo_size=%02x", status, seq_reg, int_reg, fifo_size);
 810 #if (USE_DMA)
 811         printk("\n");
 812 #else
 813         printk(", pio=%02x\n", pio_status);
 814 #endif                          /* USE_DMA */
 815 #endif                          /* NCR53C406A_DEBUG */
 816
 817         if (int_reg & 0x80) {   /* SCSI reset intr */
 818                 rtrc(3);
 819                 DEB(printk("NCR53c406a: reset intr received\n"));
 820                 current_SC->SCp.phase = idle;
 821                 current_SC->result = DID_RESET << 16;
 822                 current_SC->scsi_done(current_SC);
 823                 return;
 824         }
 825 #if USE_PIO
 826         if (pio_status & 0x80) {
 827                 printk("NCR53C406A: Warning: PIO error!\n");
 828                 current_SC->SCp.phase = idle;
 829                 current_SC->result = DID_ERROR << 16;
 830                 current_SC->scsi_done(current_SC);
 831                 return;
 832         }
 833 #endif                          /* USE_PIO */
 834
 835         if (status & 0x20) {    /* Parity error */
 836                 printk("NCR53c406a: Warning: parity error!\n");
 837                 current_SC->SCp.phase = idle;
 838                 current_SC->result = DID_PARITY << 16;
 839                 current_SC->scsi_done(current_SC);
 840                 return;
 841         }
 842
 843         if (status & 0x40) {    /* Gross error */
 844                 printk("NCR53c406a: Warning: gross error!\n");
 845                 current_SC->SCp.phase = idle;
 846                 current_SC->result = DID_ERROR << 16;
 847                 current_SC->scsi_done(current_SC);
 848                 return;
 849         }
 850
 851         if (int_reg & 0x20) {   /* Disconnect */
 852                 DEB(printk("NCR53c406a: disconnect intr received\n"));
 853                 if (current_SC->SCp.phase != message_in) {      /* Unexpected disconnect */
 854                         current_SC->result = DID_NO_CONNECT << 16;
 855                 } else {        /* Command complete, return status and message */
 856                         current_SC->result = (current_SC->SCp.Status & 0xff)
 857                             | ((current_SC->SCp.Message & 0xff) << 8) | (DID_OK << 16);
 858                 }
 859
 860                 rtrc(0);
 861                 current_SC->SCp.phase = idle;
 862                 current_SC->scsi_done(current_SC);
 863                 return;
 864         }
 865
 866         switch (status & 0x07) {        /* scsi phase */
 867         case 0x00:              /* DATA-OUT */
 868                 if (int_reg & 0x10) {   /* Target requesting info transfer */
 869                         rtrc(5);
 870                         current_SC->SCp.phase = data_out;
 871                         VDEB(printk("NCR53c406a: Data-Out phase\n"));
 872                         outb(FLUSH_FIFO, CMD_REG);
 873                         LOAD_DMA_COUNT(current_SC->request_bufflen);    /* Max transfer size */
 874 #if USE_DMA                     /* No s/g support for DMA */
 875                         NCR53c406a_dma_write(current_SC->request_buffer, current_SC->request_bufflen);
 876 #endif                          /* USE_DMA */
 877                         outb(TRANSFER_INFO | DMA_OP, CMD_REG);
 878 #if USE_PIO
 879                         if (!current_SC->use_sg)        /* Don't use scatter-gather */
 880                                 NCR53c406a_pio_write(current_SC->request_buffer, current_SC->request_bufflen);
 881                         else {  /* use scatter-gather */
 882                                 sgcount = current_SC->use_sg;
 883                                 sglist = current_SC->request_buffer;
 884                                 while (sgcount--) {
 885                                         NCR53c406a_pio_write(page_address(sglist->page) + sglist->offset, sglist->length);
 886                                         sglist++;
 887                                 }
 888                         }
 889                         REG0;
 890 #endif                          /* USE_PIO */
 891                 }
 892                 break;
 893
 894         case 0x01:              /* DATA-IN */
 895                 if (int_reg & 0x10) {   /* Target requesting info transfer */
 896                         rtrc(6);
 897                         current_SC->SCp.phase = data_in;
 898                         VDEB(printk("NCR53c406a: Data-In phase\n"));
 899                         outb(FLUSH_FIFO, CMD_REG);
 900                         LOAD_DMA_COUNT(current_SC->request_bufflen);    /* Max transfer size */
 901 #if USE_DMA                     /* No s/g support for DMA */
 902                         NCR53c406a_dma_read(current_SC->request_buffer, current_SC->request_bufflen);
 903 #endif                          /* USE_DMA */
 904                         outb(TRANSFER_INFO | DMA_OP, CMD_REG);
 905 #if USE_PIO
 906                         if (!current_SC->use_sg)        /* Don't use scatter-gather */
 907                                 NCR53c406a_pio_read(current_SC->request_buffer, current_SC->request_bufflen);
 908                         else {  /* Use scatter-gather */
 909                                 sgcount = current_SC->use_sg;
 910                                 sglist = current_SC->request_buffer;
 911                                 while (sgcount--) {
 912                                         NCR53c406a_pio_read(page_address(sglist->page) + sglist->offset, sglist->length);
 913                                         sglist++;
 914                                 }
 915                         }
 916                         REG0;
 917 #endif                          /* USE_PIO */
 918                 }
 919                 break;
 920
 921         case 0x02:              /* COMMAND */
 922                 current_SC->SCp.phase = command_ph;
 923                 printk("NCR53c406a: Warning: Unknown interrupt occurred in command phase!\n");
 924                 break;
 925
 926         case 0x03:              /* STATUS */
 927                 rtrc(7);
 928                 current_SC->SCp.phase = status_ph;
 929                 VDEB(printk("NCR53c406a: Status phase\n"));
 930                 outb(FLUSH_FIFO, CMD_REG);
 931                 outb(INIT_CMD_COMPLETE, CMD_REG);
 932                 break;
 933
 934         case 0x04:              /* Reserved */
 935         case 0x05:              /* Reserved */
 936                 printk("NCR53c406a: WARNING: Reserved phase!!!\n");
 937                 break;
 938
 939         case 0x06:              /* MESSAGE-OUT */
 940                 DEB(printk("NCR53c406a: Message-Out phase\n"));
 941                 current_SC->SCp.phase = message_out;
 942                 outb(SET_ATN, CMD_REG); /* Reject the message */
 943                 outb(MSG_ACCEPT, CMD_REG);
 944                 break;
 945
 946         case 0x07:              /* MESSAGE-IN */
 947                 rtrc(4);
 948                 VDEB(printk("NCR53c406a: Message-In phase\n"));
 949                 current_SC->SCp.phase = message_in;
 950
 951                 current_SC->SCp.Status = inb(SCSI_FIFO);
 952                 current_SC->SCp.Message = inb(SCSI_FIFO);
 953
 954                 VDEB(printk("SCSI FIFO size=%d\n", inb(FIFO_FLAGS) & 0x1f));
 955                 DEB(printk("Status = %02x  Message = %02x\n", current_SC->SCp.Status, current_SC->SCp.Message));
 956
 957                 if (current_SC->SCp.Message == SAVE_POINTERS || current_SC->SCp.Message == DISCONNECT) {
 958                         outb(SET_ATN, CMD_REG); /* Reject message */
 959                         DEB(printk("Discarding SAVE_POINTERS message\n"));
 960                 }
 961                 outb(MSG_ACCEPT, CMD_REG);
 962                 break;
 963         }
 964 }
 965
 966 #ifndef IRQ_LEV
 967 static int irq_probe(void)
 968 {
 969         int irqs, irq;
 970         unsigned long i;
 971
 972         inb(INT_REG);           /* clear the interrupt register */
 973         irqs = probe_irq_on();
 974
 975         /* Invalid command will cause an interrupt */
 976         REG0;
 977         outb(0xff, CMD_REG);
 978
 979         /* Wait for the interrupt to occur */
 980         i = jiffies + WATCHDOG;
 981         while (time_after(i, jiffies) && !(inb(STAT_REG) & 0x80))
 982                 barrier();
 983         if (time_before_eq(i, jiffies)) {       /* Timed out, must be hardware trouble */
 984                 probe_irq_off(irqs);
 985                 return -1;
 986         }
 987
 988         irq = probe_irq_off(irqs);
 989
 990         /* Kick the chip */
 991         outb(CHIP_RESET, CMD_REG);
 992         outb(SCSI_NOP, CMD_REG);
 993         chip_init();
 994
 995         return irq;
 996 }
 997 #endif                          /* IRQ_LEV */
 998
 999 static void chip_init(void)
1000 {
1001         REG1;
1002 #if USE_DMA
1003         outb(0x00, PIO_STATUS);
1004 #else                           /* USE_PIO */
1005         outb(0x01, PIO_STATUS);
1006 #endif
1007         outb(0x00, PIO_FLAG);
1008
1009         outb(C4_IMG, CONFIG4);  /* REG0; */
1010         outb(C3_IMG, CONFIG3);
1011         outb(C2_IMG, CONFIG2);
1012         outb(C1_IMG, CONFIG1);
1013
1014         outb(0x05, CLKCONV);    /* clock conversion factor */
1015         outb(0x9C, SRTIMOUT);   /* Selection timeout */
1016         outb(0x05, SYNCPRD);    /* Synchronous transfer period */
1017         outb(SYNC_MODE, SYNCOFF);       /* synchronous mode */
1018 }
1019
1020 static void __init calc_port_addr(void)
1021 {
1022         /* Control Register Set 0 */
1023         TC_LSB = (port_base + 0x00);
1024         TC_MSB = (port_base + 0x01);
1025         SCSI_FIFO = (port_base + 0x02);
1026         CMD_REG = (port_base + 0x03);
1027         STAT_REG = (port_base + 0x04);
1028         DEST_ID = (port_base + 0x04);
1029         INT_REG = (port_base + 0x05);
1030         SRTIMOUT = (port_base + 0x05);
1031         SEQ_REG = (port_base + 0x06);
1032         SYNCPRD = (port_base + 0x06);
1033         FIFO_FLAGS = (port_base + 0x07);
1034         SYNCOFF = (port_base + 0x07);
1035         CONFIG1 = (port_base + 0x08);
1036         CLKCONV = (port_base + 0x09);
1037         /* TESTREG          = (port_base+0x0A); */
1038         CONFIG2 = (port_base + 0x0B);
1039         CONFIG3 = (port_base + 0x0C);
1040         CONFIG4 = (port_base + 0x0D);
1041         TC_HIGH = (port_base + 0x0E);
1042         /* FIFO_BOTTOM      = (port_base+0x0F); */
1043
1044         /* Control Register Set 1 */
1045         /* JUMPER_SENSE     = (port_base+0x00); */
1046         /* SRAM_PTR         = (port_base+0x01); */
1047         /* SRAM_DATA        = (port_base+0x02); */
1048         PIO_FIFO = (port_base + 0x04);
1049         /* PIO_FIFO1        = (port_base+0x05); */
1050         /* PIO_FIFO2        = (port_base+0x06); */
1051         /* PIO_FIFO3        = (port_base+0x07); */
1052         PIO_STATUS = (port_base + 0x08);
1053         /* ATA_CMD          = (port_base+0x09); */
1054         /* ATA_ERR          = (port_base+0x0A); */
1055         PIO_FLAG = (port_base + 0x0B);
1056         CONFIG5 = (port_base + 0x0D);
1057         /* SIGNATURE        = (port_base+0x0E); */
1058         /* CONFIG6          = (port_base+0x0F); */
1059 }
1060
1061 MODULE_LICENSE("GPL");
1062
1063 /* NOTE:  scatter-gather support only works in PIO mode.
1064  * Use SG_NONE if DMA mode is enabled!
1065  */
1066
1067 static Scsi_Host_Template driver_template =
1068 {
1069      .proc_name                 = "NCR53c406a"          /* proc_name */,
1070      .name                      = "NCR53c406a"          /* name */,
1071      .detect                    = NCR53c406a_detect     /* detect */,
1072      .release                   = NCR53c406a_release,
1073      .info                      = NCR53c406a_info               /* info */,
1074      .queuecommand              = NCR53c406a_queue      /* queuecommand */,
1075      .eh_abort_handler          = NCR53c406a_abort      /* abort */,
1076      .eh_bus_reset_handler      = NCR53c406a_bus_reset  /* reset */,
1077      .eh_device_reset_handler   = NCR53c406a_device_reset       /* reset */,
1078      .eh_host_reset_handler     = NCR53c406a_host_reset /* reset */,
1079      .bios_param                = NCR53c406a_biosparm   /* biosparm */,
1080      .can_queue                 = 1                     /* can_queue */,
1081      .this_id                   = 7                     /* SCSI ID of the chip */,
1082      .sg_tablesize              = 32                    /*SG_ALL*/ /*SG_NONE*/,
1083      .cmd_per_lun               = 1                     /* commands per lun */,
1084      .unchecked_isa_dma         = 1                     /* unchecked_isa_dma */,
1085      .use_clustering            = ENABLE_CLUSTERING
1086 };
1087
1088 #include "scsi_module.c"
1089
1090 /*
1091  * Overrides for Emacs so that we get a uniform tabbing style.
1092  * Emacs will notice this stuff at the end of the file and automatically
1093  * adjust the settings for this buffer only.  This must remain at the end
1094  * of the file.
1095  * ---------------------------------------------------------------------------
1096  * Local variables:
1097  * c-indent-level: 4
1098  * c-brace-imaginary-offset: 0
1099  * c-brace-offset: -4
1100  * c-argdecl-indent: 4
1101  * c-label-offset: -4
1102  * c-continued-statement-offset: 4
1103  * c-continued-brace-offset: 0
1104  * indent-tabs-mode: nil
1105  * tab-width: 8
1106  * End:
1107  */