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