drivers/scsi/arm/acornscsi.c

   1 /*
   2  *  linux/drivers/acorn/scsi/acornscsi.c
   3  *
   4  *  Acorn SCSI 3 driver
   5  *  By R.M.King.
   6  *
   7  * This program is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License version 2 as
   9  * published by the Free Software Foundation.
  10  *
  11  * Abandoned using the Select and Transfer command since there were
  12  * some nasty races between our software and the target devices that
  13  * were not easy to solve, and the device errata had a lot of entries
  14  * for this command, some of them quite nasty...
  15  *
  16  * Changelog:
  17  *  26-Sep-1997 RMK     Re-jigged to use the queue module.
  18  *                      Re-coded state machine to be based on driver
  19  *                      state not scsi state.  Should be easier to debug.
  20  *                      Added acornscsi_release to clean up properly.
  21  *                      Updated proc/scsi reporting.
  22  *  05-Oct-1997 RMK     Implemented writing to SCSI devices.
  23  *  06-Oct-1997 RMK     Corrected small (non-serious) bug with the connect/
  24  *                      reconnect race condition causing a warning message.
  25  *  12-Oct-1997 RMK     Added catch for re-entering interrupt routine.
  26  *  15-Oct-1997 RMK     Improved handling of commands.
  27  *  27-Jun-1998 RMK     Changed asm/delay.h to linux/delay.h.
  28  *  13-Dec-1998 RMK     Better abort code and command handling.  Extra state
  29  *                      transitions added to allow dodgy devices to work.
  30  */
  31 #define DEBUG_NO_WRITE  1
  32 #define DEBUG_QUEUES    2
  33 #define DEBUG_DMA       4
  34 #define DEBUG_ABORT     8
  35 #define DEBUG_DISCON    16
  36 #define DEBUG_CONNECT   32
  37 #define DEBUG_PHASES    64
  38 #define DEBUG_WRITE     128
  39 #define DEBUG_LINK      256
  40 #define DEBUG_MESSAGES  512
  41 #define DEBUG_RESET     1024
  42 #define DEBUG_ALL       (DEBUG_RESET|DEBUG_MESSAGES|DEBUG_LINK|DEBUG_WRITE|\
  43                          DEBUG_PHASES|DEBUG_CONNECT|DEBUG_DISCON|DEBUG_ABORT|\
  44                          DEBUG_DMA|DEBUG_QUEUES)
  45
  46 /* DRIVER CONFIGURATION
  47  *
  48  * SCSI-II Tagged queue support.
  49  *
  50  * I don't have any SCSI devices that support it, so it is totally untested
  51  * (except to make sure that it doesn't interfere with any non-tagging
  52  * devices).  It is not fully implemented either - what happens when a
  53  * tagging device reconnects???
  54  *
  55  * You can tell if you have a device that supports tagged queueing my
  56  * cating (eg) /proc/scsi/acornscsi/0 and see if the SCSI revision is reported
  57  * as '2 TAG'.
  58  *
  59  * Also note that CONFIG_SCSI_ACORNSCSI_TAGGED_QUEUE is normally set in the config
  60  * scripts, but disabled here.  Once debugged, remove the #undef, otherwise to debug,
  61  * comment out the undef.
  62  */
  63 #undef CONFIG_SCSI_ACORNSCSI_TAGGED_QUEUE
  64 /*
  65  * SCSI-II Linked command support.
  66  *
  67  * The higher level code doesn't support linked commands yet, and so the option
  68  * is undef'd here.
  69  */
  70 #undef CONFIG_SCSI_ACORNSCSI_LINK
  71 /*
  72  * SCSI-II Synchronous transfer support.
  73  *
  74  * Tried and tested...
  75  *
  76  * SDTR_SIZE      - maximum number of un-acknowledged bytes (0 = off, 12 = max)
  77  * SDTR_PERIOD    - period of REQ signal (min=125, max=1020)
  78  * DEFAULT_PERIOD - default REQ period.
  79  */
  80 #define SDTR_SIZE       12
  81 #define SDTR_PERIOD     125
  82 #define DEFAULT_PERIOD  500
  83
  84 /*
  85  * Debugging information
  86  *
  87  * DEBUG          - bit mask from list above
  88  * DEBUG_TARGET   - is defined to the target number if you want to debug
  89  *                  a specific target. [only recon/write/dma].
  90  */
  91 #define DEBUG (DEBUG_RESET|DEBUG_WRITE|DEBUG_NO_WRITE)
  92 /* only allow writing to SCSI device 0 */
  93 #define NO_WRITE 0xFE
  94 /*#define DEBUG_TARGET 2*/
  95 /*
  96  * Select timeout time (in 10ms units)
  97  *
  98  * This is the timeout used between the start of selection and the WD33C93
  99  * chip deciding that the device isn't responding.
 100  */
 101 #define TIMEOUT_TIME 10
 102 /*
 103  * Define this if you want to have verbose explanation of SCSI
 104  * status/messages.
 105  */
 106 #undef CONFIG_ACORNSCSI_CONSTANTS
 107 /*
 108  * Define this if you want to use the on board DMAC [don't remove this option]
 109  * If not set, then use PIO mode (not currently supported).
 110  */
 111 #define USE_DMAC
 112
 113 /*
 114  * ====================================================================================
 115  */
 116
 117 #ifdef DEBUG_TARGET
 118 #define DBG(cmd,xxx...) \
 119   if (cmd->device->id == DEBUG_TARGET) { \
 120     xxx; \
 121   }
 122 #else
 123 #define DBG(cmd,xxx...) xxx
 124 #endif
 125
 126 #include <linux/module.h>
 127 #include <linux/kernel.h>
 128 #include <linux/string.h>
 129 #include <linux/signal.h>
 130 #include <linux/errno.h>
 131 #include <linux/proc_fs.h>
 132 #include <linux/ioport.h>
 133 #include <linux/blkdev.h>
 134 #include <linux/delay.h>
 135 #include <linux/interrupt.h>
 136 #include <linux/init.h>
 137 #include <linux/bitops.h>
 138 #include <linux/stringify.h>
 139 #include <linux/io.h>
 140
 141 #include <asm/ecard.h>
 142
 143 #include "../scsi.h"
 144 #include <scsi/scsi_dbg.h>
 145 #include <scsi/scsi_host.h>
 146 #include <scsi/scsi_transport_spi.h>
 147 #include "acornscsi.h"
 148 #include "msgqueue.h"
 149 #include "scsi.h"
 150
 151 #include <scsi/scsicam.h>
 152
 153 #define VER_MAJOR 2
 154 #define VER_MINOR 0
 155 #define VER_PATCH 6
 156
 157 #ifndef ABORT_TAG
 158 #define ABORT_TAG 0xd
 159 #else
 160 #error "Yippee!  ABORT TAG is now defined!  Remove this error!"
 161 #endif
 162
 163 #ifdef CONFIG_SCSI_ACORNSCSI_LINK
 164 #error SCSI2 LINKed commands not supported (yet)!
 165 #endif
 166
 167 #ifdef USE_DMAC
 168 /*
 169  * DMAC setup parameters
 170  */
 171 #define INIT_DEVCON0    (DEVCON0_RQL|DEVCON0_EXW|DEVCON0_CMP)
 172 #define INIT_DEVCON1    (DEVCON1_BHLD)
 173 #define DMAC_READ       (MODECON_READ)
 174 #define DMAC_WRITE      (MODECON_WRITE)
 175 #define INIT_SBICDMA    (CTRL_DMABURST)
 176
 177 #define scsi_xferred    have_data_in
 178
 179 /*
 180  * Size of on-board DMA buffer
 181  */
 182 #define DMAC_BUFFER_SIZE        65536
 183 #endif
 184
 185 #define STATUS_BUFFER_TO_PRINT  24
 186
 187 unsigned int sdtr_period = SDTR_PERIOD;
 188 unsigned int sdtr_size   = SDTR_SIZE;
 189
 190 static void acornscsi_done(AS_Host *host, struct scsi_cmnd **SCpntp,
 191                            unsigned int result);
 192 static int acornscsi_reconnect_finish(AS_Host *host);
 193 static void acornscsi_dma_cleanup(AS_Host *host);
 194 static void acornscsi_abortcmd(AS_Host *host, unsigned char tag);
 195
 196 /* ====================================================================================
 197  * Miscellaneous
 198  */
 199
 200 /* Offsets from MEMC base */
 201 #define SBIC_REGIDX     0x2000
 202 #define SBIC_REGVAL     0x2004
 203 #define DMAC_OFFSET     0x3000
 204
 205 /* Offsets from FAST IOC base */
 206 #define INT_REG         0x2000
 207 #define PAGE_REG        0x3000
 208
 209 static inline void sbic_arm_write(AS_Host *host, unsigned int reg, unsigned int value)
 210 {
 211     writeb(reg, host->base + SBIC_REGIDX);
 212     writeb(value, host->base + SBIC_REGVAL);
 213 }
 214
 215 static inline int sbic_arm_read(AS_Host *host, unsigned int reg)
 216 {
 217     if(reg == SBIC_ASR)
 218            return readl(host->base + SBIC_REGIDX) & 255;
 219     writeb(reg, host->base + SBIC_REGIDX);
 220     return readl(host->base + SBIC_REGVAL) & 255;
 221 }
 222
 223 #define sbic_arm_writenext(host, val)   writeb((val), (host)->base + SBIC_REGVAL)
 224 #define sbic_arm_readnext(host)         readb((host)->base + SBIC_REGVAL)
 225
 226 #ifdef USE_DMAC
 227 #define dmac_read(host,reg) \
 228         readb((host)->base + DMAC_OFFSET + ((reg) << 2))
 229
 230 #define dmac_write(host,reg,value) \
 231         ({ writeb((value), (host)->base + DMAC_OFFSET + ((reg) << 2)); })
 232
 233 #define dmac_clearintr(host)    writeb(0, (host)->fast + INT_REG)
 234
 235 static inline unsigned int dmac_address(AS_Host *host)
 236 {
 237     return dmac_read(host, DMAC_TXADRHI) << 16 |
 238            dmac_read(host, DMAC_TXADRMD) << 8 |
 239            dmac_read(host, DMAC_TXADRLO);
 240 }
 241
 242 static
 243 void acornscsi_dumpdma(AS_Host *host, char *where)
 244 {
 245         unsigned int mode, addr, len;
 246
 247         mode = dmac_read(host, DMAC_MODECON);
 248         addr = dmac_address(host);
 249         len  = dmac_read(host, DMAC_TXCNTHI) << 8 |
 250                dmac_read(host, DMAC_TXCNTLO);
 251
 252         printk("scsi%d: %s: DMAC %02x @%06x+%04x msk %02x, ",
 253                 host->host->host_no, where,
 254                 mode, addr, (len + 1) & 0xffff,
 255                 dmac_read(host, DMAC_MASKREG));
 256
 257         printk("DMA @%06x, ", host->dma.start_addr);
 258         printk("BH @%p +%04x, ", host->scsi.SCp.ptr,
 259                 host->scsi.SCp.this_residual);
 260         printk("DT @+%04x ST @+%04x", host->dma.transferred,
 261                 host->scsi.SCp.scsi_xferred);
 262         printk("\n");
 263 }
 264 #endif
 265
 266 static
 267 unsigned long acornscsi_sbic_xfcount(AS_Host *host)
 268 {
 269     unsigned long length;
 270
 271     length = sbic_arm_read(host, SBIC_TRANSCNTH) << 16;
 272     length |= sbic_arm_readnext(host) << 8;
 273     length |= sbic_arm_readnext(host);
 274
 275     return length;
 276 }
 277
 278 static int
 279 acornscsi_sbic_wait(AS_Host *host, int stat_mask, int stat, int timeout, char *msg)
 280 {
 281         int asr;
 282
 283         do {
 284                 asr = sbic_arm_read(host, SBIC_ASR);
 285
 286                 if ((asr & stat_mask) == stat)
 287                         return 0;
 288
 289                 udelay(1);
 290         } while (--timeout);
 291
 292         printk("scsi%d: timeout while %s\n", host->host->host_no, msg);
 293
 294         return -1;
 295 }
 296
 297 static
 298 int acornscsi_sbic_issuecmd(AS_Host *host, int command)
 299 {
 300     if (acornscsi_sbic_wait(host, ASR_CIP, 0, 1000, "issuing command"))
 301         return -1;
 302
 303     sbic_arm_write(host, SBIC_CMND, command);
 304
 305     return 0;
 306 }
 307
 308 static void
 309 acornscsi_csdelay(unsigned int cs)
 310 {
 311     unsigned long target_jiffies, flags;
 312
 313     target_jiffies = jiffies + 1 + cs * HZ / 100;
 314
 315     local_save_flags(flags);
 316     local_irq_enable();
 317
 318     while (time_before(jiffies, target_jiffies)) barrier();
 319
 320     local_irq_restore(flags);
 321 }
 322
 323 static
 324 void acornscsi_resetcard(AS_Host *host)
 325 {
 326     unsigned int i, timeout;
 327
 328     /* assert reset line */
 329     host->card.page_reg = 0x80;
 330     writeb(host->card.page_reg, host->fast + PAGE_REG);
 331
 332     /* wait 3 cs.  SCSI standard says 25ms. */
 333     acornscsi_csdelay(3);
 334
 335     host->card.page_reg = 0;
 336     writeb(host->card.page_reg, host->fast + PAGE_REG);
 337
 338     /*
 339      * Should get a reset from the card
 340      */
 341     timeout = 1000;
 342     do {
 343         if (readb(host->fast + INT_REG) & 8)
 344             break;
 345         udelay(1);
 346     } while (--timeout);
 347
 348     if (timeout == 0)
 349         printk("scsi%d: timeout while resetting card\n",
 350                 host->host->host_no);
 351
 352     sbic_arm_read(host, SBIC_ASR);
 353     sbic_arm_read(host, SBIC_SSR);
 354
 355     /* setup sbic - WD33C93A */
 356     sbic_arm_write(host, SBIC_OWNID, OWNID_EAF | host->host->this_id);
 357     sbic_arm_write(host, SBIC_CMND, CMND_RESET);
 358
 359     /*
 360      * Command should cause a reset interrupt
 361      */
 362     timeout = 1000;
 363     do {
 364         if (readb(host->fast + INT_REG) & 8)
 365             break;
 366         udelay(1);
 367     } while (--timeout);
 368
 369     if (timeout == 0)
 370         printk("scsi%d: timeout while resetting card\n",
 371                 host->host->host_no);
 372
 373     sbic_arm_read(host, SBIC_ASR);
 374     if (sbic_arm_read(host, SBIC_SSR) != 0x01)
 375         printk(KERN_CRIT "scsi%d: WD33C93A didn't give enhanced reset interrupt\n",
 376                 host->host->host_no);
 377
 378     sbic_arm_write(host, SBIC_CTRL, INIT_SBICDMA | CTRL_IDI);
 379     sbic_arm_write(host, SBIC_TIMEOUT, TIMEOUT_TIME);
 380     sbic_arm_write(host, SBIC_SYNCHTRANSFER, SYNCHTRANSFER_2DBA);
 381     sbic_arm_write(host, SBIC_SOURCEID, SOURCEID_ER | SOURCEID_DSP);
 382
 383     host->card.page_reg = 0x40;
 384     writeb(host->card.page_reg, host->fast + PAGE_REG);
 385
 386     /* setup dmac - uPC71071 */
 387     dmac_write(host, DMAC_INIT, 0);
 388 #ifdef USE_DMAC
 389     dmac_write(host, DMAC_INIT, INIT_8BIT);
 390     dmac_write(host, DMAC_CHANNEL, CHANNEL_0);
 391     dmac_write(host, DMAC_DEVCON0, INIT_DEVCON0);
 392     dmac_write(host, DMAC_DEVCON1, INIT_DEVCON1);
 393 #endif
 394
 395     host->SCpnt = NULL;
 396     host->scsi.phase = PHASE_IDLE;
 397     host->scsi.disconnectable = 0;
 398
 399     memset(host->busyluns, 0, sizeof(host->busyluns));
 400
 401     for (i = 0; i < 8; i++) {
 402         host->device[i].sync_state = SYNC_NEGOCIATE;
 403         host->device[i].disconnect_ok = 1;
 404     }
 405
 406     /* wait 25 cs.  SCSI standard says 250ms. */
 407     acornscsi_csdelay(25);
 408 }
 409
 410 /*=============================================================================================
 411  * Utility routines (eg. debug)
 412  */
 413 #ifdef CONFIG_ACORNSCSI_CONSTANTS
 414 static char *acornscsi_interrupttype[] = {
 415   "rst",  "suc",  "p/a",  "3",
 416   "term", "5",    "6",    "7",
 417   "serv", "9",    "a",    "b",
 418   "c",    "d",    "e",    "f"
 419 };
 420
 421 static signed char acornscsi_map[] = {
 422   0,  1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,
 423  -1,  2, -1, -1,  -1, -1,  3, -1,   4,  5,  6,  7,   8,  9, 10, 11,
 424  12, 13, 14, -1,  -1, -1, -1, -1,   4,  5,  6,  7,   8,  9, 10, 11,
 425  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,
 426  15, 16, 17, 18,  19, -1, -1, 20,   4,  5,  6,  7,   8,  9, 10, 11,
 427  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,
 428  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,
 429  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,
 430  21, 22, -1, -1,  -1, 23, -1, -1,   4,  5,  6,  7,   8,  9, 10, 11,
 431  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,
 432  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,
 433  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,
 434  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,
 435  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,
 436  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,
 437  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1,  -1, -1, -1, -1
 438 };
 439
 440 static char *acornscsi_interruptcode[] = {
 441     /* 0 */
 442     "reset - normal mode",      /* 00 */
 443     "reset - advanced mode",    /* 01 */
 444
 445     /* 2 */
 446     "sel",                      /* 11 */
 447     "sel+xfer",                 /* 16 */
 448     "data-out",                 /* 18 */
 449     "data-in",                  /* 19 */
 450     "cmd",                      /* 1A */
 451     "stat",                     /* 1B */
 452     "??-out",                   /* 1C */
 453     "??-in",                    /* 1D */
 454     "msg-out",                  /* 1E */
 455     "msg-in",                   /* 1F */
 456
 457     /* 12 */
 458     "/ACK asserted",            /* 20 */
 459     "save-data-ptr",            /* 21 */
 460     "{re}sel",                  /* 22 */
 461
 462     /* 15 */
 463     "inv cmd",                  /* 40 */
 464     "unexpected disconnect",    /* 41 */
 465     "sel timeout",              /* 42 */
 466     "P err",                    /* 43 */
 467     "P err+ATN",                /* 44 */
 468     "bad status byte",          /* 47 */
 469
 470     /* 21 */
 471     "resel, no id",             /* 80 */
 472     "resel",                    /* 81 */
 473     "discon",                   /* 85 */
 474 };
 475
 476 static
 477 void print_scsi_status(unsigned int ssr)
 478 {
 479     if (acornscsi_map[ssr] != -1)
 480         printk("%s:%s",
 481                 acornscsi_interrupttype[(ssr >> 4)],
 482                 acornscsi_interruptcode[acornscsi_map[ssr]]);
 483     else
 484         printk("%X:%X", ssr >> 4, ssr & 0x0f);
 485 }
 486 #endif
 487
 488 static
 489 void print_sbic_status(int asr, int ssr, int cmdphase)
 490 {
 491 #ifdef CONFIG_ACORNSCSI_CONSTANTS
 492     printk("sbic: %c%c%c%c%c%c ",
 493             asr & ASR_INT ? 'I' : 'i',
 494             asr & ASR_LCI ? 'L' : 'l',
 495             asr & ASR_BSY ? 'B' : 'b',
 496             asr & ASR_CIP ? 'C' : 'c',
 497             asr & ASR_PE  ? 'P' : 'p',
 498             asr & ASR_DBR ? 'D' : 'd');
 499     printk("scsi: ");
 500     print_scsi_status(ssr);
 501     printk(" ph %02X\n", cmdphase);
 502 #else
 503     printk("sbic: %02X scsi: %X:%X ph: %02X\n",
 504             asr, (ssr & 0xf0)>>4, ssr & 0x0f, cmdphase);
 505 #endif
 506 }
 507
 508 static void
 509 acornscsi_dumplogline(AS_Host *host, int target, int line)
 510 {
 511         unsigned long prev;
 512         signed int ptr;
 513
 514         ptr = host->status_ptr[target] - STATUS_BUFFER_TO_PRINT;
 515         if (ptr < 0)
 516                 ptr += STATUS_BUFFER_SIZE;
 517
 518         printk("%c: %3s:", target == 8 ? 'H' : '0' + target,
 519                 line == 0 ? "ph" : line == 1 ? "ssr" : "int");
 520
 521         prev = host->status[target][ptr].when;
 522
 523         for (; ptr != host->status_ptr[target]; ptr = (ptr + 1) & (STATUS_BUFFER_SIZE - 1)) {
 524                 unsigned long time_diff;
 525
 526                 if (!host->status[target][ptr].when)
 527                         continue;
 528
 529                 switch (line) {
 530                 case 0:
 531                         printk("%c%02X", host->status[target][ptr].irq ? '-' : ' ',
 532                                          host->status[target][ptr].ph);
 533                         break;
 534
 535                 case 1:
 536                         printk(" %02X", host->status[target][ptr].ssr);
 537                         break;
 538
 539                 case 2:
 540                         time_diff = host->status[target][ptr].when - prev;
 541                         prev = host->status[target][ptr].when;
 542                         if (time_diff == 0)
 543                                 printk("==^");
 544                         else if (time_diff >= 100)
 545                                 printk("   ");
 546                         else
 547                                 printk(" %02ld", time_diff);
 548                         break;
 549                 }
 550         }
 551
 552         printk("\n");
 553 }
 554
 555 static
 556 void acornscsi_dumplog(AS_Host *host, int target)
 557 {
 558     do {
 559         acornscsi_dumplogline(host, target, 0);
 560         acornscsi_dumplogline(host, target, 1);
 561         acornscsi_dumplogline(host, target, 2);
 562
 563         if (target == 8)
 564             break;
 565
 566         target = 8;
 567     } while (1);
 568 }
 569
 570 static
 571 char acornscsi_target(AS_Host *host)
 572 {
 573         if (host->SCpnt)
 574                 return '0' + host->SCpnt->device->id;
 575         return 'H';
 576 }
 577
 578 /*
 579  * Prototype: cmdtype_t acornscsi_cmdtype(int command)
 580  * Purpose  : differentiate READ from WRITE from other commands
 581  * Params   : command - command to interpret
 582  * Returns  : CMD_READ  - command reads data,
 583  *            CMD_WRITE - command writes data,
 584  *            CMD_MISC  - everything else
 585  */
 586 static inline
 587 cmdtype_t acornscsi_cmdtype(int command)
 588 {
 589     switch (command) {
 590     case WRITE_6:  case WRITE_10:  case WRITE_12:
 591         return CMD_WRITE;
 592     case READ_6:   case READ_10:   case READ_12:
 593         return CMD_READ;
 594     default:
 595         return CMD_MISC;
 596     }
 597 }
 598
 599 /*
 600  * Prototype: int acornscsi_datadirection(int command)
 601  * Purpose  : differentiate between commands that have a DATA IN phase
 602  *            and a DATA OUT phase
 603  * Params   : command - command to interpret
 604  * Returns  : DATADIR_OUT - data out phase expected
 605  *            DATADIR_IN  - data in phase expected
 606  */
 607 static
 608 datadir_t acornscsi_datadirection(int command)
 609 {
 610     switch (command) {
 611     case CHANGE_DEFINITION:     case COMPARE:           case COPY:
 612     case COPY_VERIFY:           case LOG_SELECT:        case MODE_SELECT:
 613     case MODE_SELECT_10:        case SEND_DIAGNOSTIC:   case WRITE_BUFFER:
 614     case FORMAT_UNIT:           case REASSIGN_BLOCKS:   case RESERVE:
 615     case SEARCH_EQUAL:          case SEARCH_HIGH:       case SEARCH_LOW:
 616     case WRITE_6:               case WRITE_10:          case WRITE_VERIFY:
 617     case UPDATE_BLOCK:          case WRITE_LONG:        case WRITE_SAME:
 618     case SEARCH_HIGH_12:        case SEARCH_EQUAL_12:   case SEARCH_LOW_12:
 619     case WRITE_12:              case WRITE_VERIFY_12:   case SET_WINDOW:
 620     case MEDIUM_SCAN:           case SEND_VOLUME_TAG:   case 0xea:
 621         return DATADIR_OUT;
 622     default:
 623         return DATADIR_IN;
 624     }
 625 }
 626
 627 /*
 628  * Purpose  : provide values for synchronous transfers with 33C93.
 629  * Copyright: Copyright (c) 1996 John Shifflett, GeoLog Consulting
 630  *      Modified by Russell King for 8MHz WD33C93A
 631  */
 632 static struct sync_xfer_tbl {
 633     unsigned int period_ns;
 634     unsigned char reg_value;
 635 } sync_xfer_table[] = {
 636     {   1, 0x20 },    { 249, 0x20 },    { 374, 0x30 },
 637     { 499, 0x40 },    { 624, 0x50 },    { 749, 0x60 },
 638     { 874, 0x70 },    { 999, 0x00 },    {   0,    0 }
 639 };
 640
 641 /*
 642  * Prototype: int acornscsi_getperiod(unsigned char syncxfer)
 643  * Purpose  : period for the synchronous transfer setting
 644  * Params   : syncxfer SYNCXFER register value
 645  * Returns  : period in ns.
 646  */
 647 static
 648 int acornscsi_getperiod(unsigned char syncxfer)
 649 {
 650     int i;
 651
 652     syncxfer &= 0xf0;
 653     if (syncxfer == 0x10)
 654         syncxfer = 0;
 655
 656     for (i = 1; sync_xfer_table[i].period_ns; i++)
 657         if (syncxfer == sync_xfer_table[i].reg_value)
 658             return sync_xfer_table[i].period_ns;
 659     return 0;
 660 }
 661
 662 /*
 663  * Prototype: int round_period(unsigned int period)
 664  * Purpose  : return index into above table for a required REQ period
 665  * Params   : period - time (ns) for REQ
 666  * Returns  : table index
 667  * Copyright: Copyright (c) 1996 John Shifflett, GeoLog Consulting
 668  */
 669 static inline
 670 int round_period(unsigned int period)
 671 {
 672     int i;
 673
 674     for (i = 1; sync_xfer_table[i].period_ns; i++) {
 675         if ((period <= sync_xfer_table[i].period_ns) &&
 676             (period > sync_xfer_table[i - 1].period_ns))
 677             return i;
 678     }
 679     return 7;
 680 }
 681
 682 /*
 683  * Prototype: unsigned char calc_sync_xfer(unsigned int period, unsigned int offset)
 684  * Purpose  : calculate value for 33c93s SYNC register
 685  * Params   : period - time (ns) for REQ
 686  *            offset - offset in bytes between REQ/ACK
 687  * Returns  : value for SYNC register
 688  * Copyright: Copyright (c) 1996 John Shifflett, GeoLog Consulting
 689  */
 690 static
 691 unsigned char calc_sync_xfer(unsigned int period, unsigned int offset)
 692 {
 693     return sync_xfer_table[round_period(period)].reg_value |
 694                 ((offset < SDTR_SIZE) ? offset : SDTR_SIZE);
 695 }
 696
 697 /* ====================================================================================
 698  * Command functions
 699  */
 700 /*
 701  * Function: acornscsi_kick(AS_Host *host)
 702  * Purpose : kick next command to interface
 703  * Params  : host - host to send command to
 704  * Returns : INTR_IDLE if idle, otherwise INTR_PROCESSING
 705  * Notes   : interrupts are always disabled!
 706  */
 707 static
 708 intr_ret_t acornscsi_kick(AS_Host *host)
 709 {
 710     int from_queue = 0;
 711     struct scsi_cmnd *SCpnt;
 712
 713     /* first check to see if a command is waiting to be executed */
 714     SCpnt = host->origSCpnt;
 715     host->origSCpnt = NULL;
 716
 717     /* retrieve next command */
 718     if (!SCpnt) {
 719         SCpnt = queue_remove_exclude(&host->queues.issue, host->busyluns);
 720         if (!SCpnt)
 721             return INTR_IDLE;
 722
 723         from_queue = 1;
 724     }
 725
 726     if (host->scsi.disconnectable && host->SCpnt) {
 727         queue_add_cmd_tail(&host->queues.disconnected, host->SCpnt);
 728         host->scsi.disconnectable = 0;
 729 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
 730         DBG(host->SCpnt, printk("scsi%d.%c: moved command to disconnected queue\n",
 731                 host->host->host_no, acornscsi_target(host)));
 732 #endif
 733         host->SCpnt = NULL;
 734     }
 735
 736     /*
 737      * If we have an interrupt pending, then we may have been reselected.
 738      * In this case, we don't want to write to the registers
 739      */
 740     if (!(sbic_arm_read(host, SBIC_ASR) & (ASR_INT|ASR_BSY|ASR_CIP))) {
 741         sbic_arm_write(host, SBIC_DESTID, SCpnt->device->id);
 742         sbic_arm_write(host, SBIC_CMND, CMND_SELWITHATN);
 743     }
 744
 745     /*
 746      * claim host busy - all of these must happen atomically wrt
 747      * our interrupt routine.  Failure means command loss.
 748      */
 749     host->scsi.phase = PHASE_CONNECTING;
 750     host->SCpnt = SCpnt;
 751     host->scsi.SCp = SCpnt->SCp;
 752     host->dma.xfer_setup = 0;
 753     host->dma.xfer_required = 0;
 754     host->dma.xfer_done = 0;
 755
 756 #if (DEBUG & (DEBUG_ABORT|DEBUG_CONNECT))
 757     DBG(SCpnt,printk("scsi%d.%c: starting cmd %02X\n",
 758             host->host->host_no, '0' + SCpnt->device->id,
 759             SCpnt->cmnd[0]));
 760 #endif
 761
 762     if (from_queue) {
 763 #ifdef CONFIG_SCSI_ACORNSCSI_TAGGED_QUEUE
 764         /*
 765          * tagged queueing - allocate a new tag to this command
 766          */
 767         if (SCpnt->device->simple_tags) {
 768             SCpnt->device->current_tag += 1;
 769             if (SCpnt->device->current_tag == 0)
 770                 SCpnt->device->current_tag = 1;
 771             SCpnt->tag = SCpnt->device->current_tag;
 772         } else
 773 #endif
 774             set_bit(SCpnt->device->id * 8 + SCpnt->device->lun, host->busyluns);
 775
 776         host->stats.removes += 1;
 777
 778         switch (acornscsi_cmdtype(SCpnt->cmnd[0])) {
 779         case CMD_WRITE:
 780             host->stats.writes += 1;
 781             break;
 782         case CMD_READ:
 783             host->stats.reads += 1;
 784             break;
 785         case CMD_MISC:
 786             host->stats.miscs += 1;
 787             break;
 788         }
 789     }
 790
 791     return INTR_PROCESSING;
 792 }
 793
 794 /*
 795  * Function: void acornscsi_done(AS_Host *host, struct scsi_cmnd **SCpntp, unsigned int result)
 796  * Purpose : complete processing for command
 797  * Params  : host   - interface that completed
 798  *           result - driver byte of result
 799  */
 800 static void acornscsi_done(AS_Host *host, struct scsi_cmnd **SCpntp,
 801                            unsigned int result)
 802 {
 803         struct scsi_cmnd *SCpnt = *SCpntp;
 804
 805     /* clean up */
 806     sbic_arm_write(host, SBIC_SOURCEID, SOURCEID_ER | SOURCEID_DSP);
 807
 808     host->stats.fins += 1;
 809
 810     if (SCpnt) {
 811         *SCpntp = NULL;
 812
 813         acornscsi_dma_cleanup(host);
 814
 815         SCpnt->result = result << 16 | host->scsi.SCp.Message << 8 | host->scsi.SCp.Status;
 816
 817         /*
 818          * In theory, this should not happen.  In practice, it seems to.
 819          * Only trigger an error if the device attempts to report all happy
 820          * but with untransferred buffers...  If we don't do something, then
 821          * data loss will occur.  Should we check SCpnt->underflow here?
 822          * It doesn't appear to be set to something meaningful by the higher
 823          * levels all the time.
 824          */
 825         if (result == DID_OK) {
 826                 int xfer_warn = 0;
 827
 828                 if (SCpnt->underflow == 0) {
 829                         if (host->scsi.SCp.ptr &&
 830                             acornscsi_cmdtype(SCpnt->cmnd[0]) != CMD_MISC)
 831                                 xfer_warn = 1;
 832                 } else {
 833                         if (host->scsi.SCp.scsi_xferred < SCpnt->underflow ||
 834                             host->scsi.SCp.scsi_xferred != host->dma.transferred)
 835                                 xfer_warn = 1;
 836                 }
 837
 838                 /* ANSI standard says: (SCSI-2 Rev 10c Sect 5.6.6)
 839                  *  Targets which break data transfers into multiple
 840                  *  connections shall end each successful connection
 841                  *  (except possibly the last) with a SAVE DATA
 842                  *  POINTER - DISCONNECT message sequence.
 843                  *
 844                  * This makes it difficult to ensure that a transfer has
 845                  * completed.  If we reach the end of a transfer during
 846                  * the command, then we can only have finished the transfer.
 847                  * therefore, if we seem to have some data remaining, this
 848                  * is not a problem.
 849                  */
 850                 if (host->dma.xfer_done)
 851                         xfer_warn = 0;
 852
 853                 if (xfer_warn) {
 854                     switch (status_byte(SCpnt->result)) {
 855                     case CHECK_CONDITION:
 856                     case COMMAND_TERMINATED:
 857                     case BUSY:
 858                     case QUEUE_FULL:
 859                     case RESERVATION_CONFLICT:
 860                         break;
 861
 862                     default:
 863                         printk(KERN_ERR "scsi%d.H: incomplete data transfer detected: result=%08X command=",
 864                                 host->host->host_no, SCpnt->result);
 865                         __scsi_print_command(SCpnt->cmnd);
 866                         acornscsi_dumpdma(host, "done");
 867                         acornscsi_dumplog(host, SCpnt->device->id);
 868                         SCpnt->result &= 0xffff;
 869                         SCpnt->result |= DID_ERROR << 16;
 870                     }
 871                 }
 872         }
 873
 874         if (!SCpnt->scsi_done)
 875             panic("scsi%d.H: null scsi_done function in acornscsi_done", host->host->host_no);
 876
 877         clear_bit(SCpnt->device->id * 8 + SCpnt->device->lun, host->busyluns);
 878
 879         SCpnt->scsi_done(SCpnt);
 880     } else
 881         printk("scsi%d: null command in acornscsi_done", host->host->host_no);
 882
 883     host->scsi.phase = PHASE_IDLE;
 884 }
 885
 886 /* ====================================================================================
 887  * DMA routines
 888  */
 889 /*
 890  * Purpose  : update SCSI Data Pointer
 891  * Notes    : this will only be one SG entry or less
 892  */
 893 static
 894 void acornscsi_data_updateptr(AS_Host *host, struct scsi_pointer *SCp, unsigned int length)
 895 {
 896     SCp->ptr += length;
 897     SCp->this_residual -= length;
 898
 899     if (SCp->this_residual == 0 && next_SCp(SCp) == 0)
 900         host->dma.xfer_done = 1;
 901 }
 902
 903 /*
 904  * Prototype: void acornscsi_data_read(AS_Host *host, char *ptr,
 905  *                              unsigned int start_addr, unsigned int length)
 906  * Purpose  : read data from DMA RAM
 907  * Params   : host - host to transfer from
 908  *            ptr  - DRAM address
 909  *            start_addr - host mem address
 910  *            length - number of bytes to transfer
 911  * Notes    : this will only be one SG entry or less
 912  */
 913 static
 914 void acornscsi_data_read(AS_Host *host, char *ptr,
 915                                  unsigned int start_addr, unsigned int length)
 916 {
 917     extern void __acornscsi_in(void __iomem *, char *buf, int len);
 918     unsigned int page, offset, len = length;
 919
 920     page = (start_addr >> 12);
 921     offset = start_addr & ((1 << 12) - 1);
 922
 923     writeb((page & 0x3f) | host->card.page_reg, host->fast + PAGE_REG);
 924
 925     while (len > 0) {
 926         unsigned int this_len;
 927
 928         if (len + offset > (1 << 12))
 929             this_len = (1 << 12) - offset;
 930         else
 931             this_len = len;
 932
 933         __acornscsi_in(host->base + (offset << 1), ptr, this_len);
 934
 935         offset += this_len;
 936         ptr += this_len;
 937         len -= this_len;
 938
 939         if (offset == (1 << 12)) {
 940             offset = 0;
 941             page ++;
 942             writeb((page & 0x3f) | host->card.page_reg, host->fast + PAGE_REG);
 943         }
 944     }
 945     writeb(host->card.page_reg, host->fast + PAGE_REG);
 946 }
 947
 948 /*
 949  * Prototype: void acornscsi_data_write(AS_Host *host, char *ptr,
 950  *                              unsigned int start_addr, unsigned int length)
 951  * Purpose  : write data to DMA RAM
 952  * Params   : host - host to transfer from
 953  *            ptr  - DRAM address
 954  *            start_addr - host mem address
 955  *            length - number of bytes to transfer
 956  * Notes    : this will only be one SG entry or less
 957  */
 958 static
 959 void acornscsi_data_write(AS_Host *host, char *ptr,
 960                                  unsigned int start_addr, unsigned int length)
 961 {
 962     extern void __acornscsi_out(void __iomem *, char *buf, int len);
 963     unsigned int page, offset, len = length;
 964
 965     page = (start_addr >> 12);
 966     offset = start_addr & ((1 << 12) - 1);
 967
 968     writeb((page & 0x3f) | host->card.page_reg, host->fast + PAGE_REG);
 969
 970     while (len > 0) {
 971         unsigned int this_len;
 972
 973         if (len + offset > (1 << 12))
 974             this_len = (1 << 12) - offset;
 975         else
 976             this_len = len;
 977
 978         __acornscsi_out(host->base + (offset << 1), ptr, this_len);
 979
 980         offset += this_len;
 981         ptr += this_len;
 982         len -= this_len;
 983
 984         if (offset == (1 << 12)) {
 985             offset = 0;
 986             page ++;
 987             writeb((page & 0x3f) | host->card.page_reg, host->fast + PAGE_REG);
 988         }
 989     }
 990     writeb(host->card.page_reg, host->fast + PAGE_REG);
 991 }
 992
 993 /* =========================================================================================
 994  * On-board DMA routines
 995  */
 996 #ifdef USE_DMAC
 997 /*
 998  * Prototype: void acornscsi_dmastop(AS_Host *host)
 999  * Purpose  : stop all DMA
1000  * Params   : host - host on which to stop DMA
1001  * Notes    : This is called when leaving DATA IN/OUT phase,
1002  *            or when interface is RESET
1003  */
1004 static inline
1005 void acornscsi_dma_stop(AS_Host *host)
1006 {
1007     dmac_write(host, DMAC_MASKREG, MASK_ON);
1008     dmac_clearintr(host);
1009
1010 #if (DEBUG & DEBUG_DMA)
1011     DBG(host->SCpnt, acornscsi_dumpdma(host, "stop"));
1012 #endif
1013 }
1014
1015 /*
1016  * Function: void acornscsi_dma_setup(AS_Host *host, dmadir_t direction)
1017  * Purpose : setup DMA controller for data transfer
1018  * Params  : host - host to setup
1019  *           direction - data transfer direction
1020  * Notes   : This is called when entering DATA I/O phase, not
1021  *           while we're in a DATA I/O phase
1022  */
1023 static
1024 void acornscsi_dma_setup(AS_Host *host, dmadir_t direction)
1025 {
1026     unsigned int address, length, mode;
1027
1028     host->dma.direction = direction;
1029
1030     dmac_write(host, DMAC_MASKREG, MASK_ON);
1031
1032     if (direction == DMA_OUT) {
1033 #if (DEBUG & DEBUG_NO_WRITE)
1034         if (NO_WRITE & (1 << host->SCpnt->device->id)) {
1035             printk(KERN_CRIT "scsi%d.%c: I can't handle DMA_OUT!\n",
1036                     host->host->host_no, acornscsi_target(host));
1037             return;
1038         }
1039 #endif
1040         mode = DMAC_WRITE;
1041     } else
1042         mode = DMAC_READ;
1043
1044     /*
1045      * Allocate some buffer space, limited to half the buffer size
1046      */
1047     length = min_t(unsigned int, host->scsi.SCp.this_residual, DMAC_BUFFER_SIZE / 2);
1048     if (length) {
1049         host->dma.start_addr = address = host->dma.free_addr;
1050         host->dma.free_addr = (host->dma.free_addr + length) &
1051                                 (DMAC_BUFFER_SIZE - 1);
1052
1053         /*
1054          * Transfer data to DMA memory
1055          */
1056         if (direction == DMA_OUT)
1057             acornscsi_data_write(host, host->scsi.SCp.ptr, host->dma.start_addr,
1058                                 length);
1059
1060         length -= 1;
1061         dmac_write(host, DMAC_TXCNTLO, length);
1062         dmac_write(host, DMAC_TXCNTHI, length >> 8);
1063         dmac_write(host, DMAC_TXADRLO, address);
1064         dmac_write(host, DMAC_TXADRMD, address >> 8);
1065         dmac_write(host, DMAC_TXADRHI, 0);
1066         dmac_write(host, DMAC_MODECON, mode);
1067         dmac_write(host, DMAC_MASKREG, MASK_OFF);
1068
1069 #if (DEBUG & DEBUG_DMA)
1070         DBG(host->SCpnt, acornscsi_dumpdma(host, "strt"));
1071 #endif
1072         host->dma.xfer_setup = 1;
1073     }
1074 }
1075
1076 /*
1077  * Function: void acornscsi_dma_cleanup(AS_Host *host)
1078  * Purpose : ensure that all DMA transfers are up-to-date & host->scsi.SCp is correct
1079  * Params  : host - host to finish
1080  * Notes   : This is called when a command is:
1081  *              terminating, RESTORE_POINTERS, SAVE_POINTERS, DISCONECT
1082  *         : This must not return until all transfers are completed.
1083  */
1084 static
1085 void acornscsi_dma_cleanup(AS_Host *host)
1086 {
1087     dmac_write(host, DMAC_MASKREG, MASK_ON);
1088     dmac_clearintr(host);
1089
1090     /*
1091      * Check for a pending transfer
1092      */
1093     if (host->dma.xfer_required) {
1094         host->dma.xfer_required = 0;
1095         if (host->dma.direction == DMA_IN)
1096             acornscsi_data_read(host, host->dma.xfer_ptr,
1097                                  host->dma.xfer_start, host->dma.xfer_length);
1098     }
1099
1100     /*
1101      * Has a transfer been setup?
1102      */
1103     if (host->dma.xfer_setup) {
1104         unsigned int transferred;
1105
1106         host->dma.xfer_setup = 0;
1107
1108 #if (DEBUG & DEBUG_DMA)
1109         DBG(host->SCpnt, acornscsi_dumpdma(host, "cupi"));
1110 #endif
1111
1112         /*
1113          * Calculate number of bytes transferred from DMA.
1114          */
1115         transferred = dmac_address(host) - host->dma.start_addr;
1116         host->dma.transferred += transferred;
1117
1118         if (host->dma.direction == DMA_IN)
1119             acornscsi_data_read(host, host->scsi.SCp.ptr,
1120                                  host->dma.start_addr, transferred);
1121
1122         /*
1123          * Update SCSI pointers
1124          */
1125         acornscsi_data_updateptr(host, &host->scsi.SCp, transferred);
1126 #if (DEBUG & DEBUG_DMA)
1127         DBG(host->SCpnt, acornscsi_dumpdma(host, "cupo"));
1128 #endif
1129     }
1130 }
1131
1132 /*
1133  * Function: void acornscsi_dmacintr(AS_Host *host)
1134  * Purpose : handle interrupts from DMAC device
1135  * Params  : host - host to process
1136  * Notes   : If reading, we schedule the read to main memory &
1137  *           allow the transfer to continue.
1138  *         : If writing, we fill the onboard DMA memory from main
1139  *           memory.
1140  *         : Called whenever DMAC finished it's current transfer.
1141  */
1142 static
1143 void acornscsi_dma_intr(AS_Host *host)
1144 {
1145     unsigned int address, length, transferred;
1146
1147 #if (DEBUG & DEBUG_DMA)
1148     DBG(host->SCpnt, acornscsi_dumpdma(host, "inti"));
1149 #endif
1150
1151     dmac_write(host, DMAC_MASKREG, MASK_ON);
1152     dmac_clearintr(host);
1153
1154     /*
1155      * Calculate amount transferred via DMA
1156      */
1157     transferred = dmac_address(host) - host->dma.start_addr;
1158     host->dma.transferred += transferred;
1159
1160     /*
1161      * Schedule DMA transfer off board
1162      */
1163     if (host->dma.direction == DMA_IN) {
1164         host->dma.xfer_start = host->dma.start_addr;
1165         host->dma.xfer_length = transferred;
1166         host->dma.xfer_ptr = host->scsi.SCp.ptr;
1167         host->dma.xfer_required = 1;
1168     }
1169
1170     acornscsi_data_updateptr(host, &host->scsi.SCp, transferred);
1171
1172     /*
1173      * Allocate some buffer space, limited to half the on-board RAM size
1174      */
1175     length = min_t(unsigned int, host->scsi.SCp.this_residual, DMAC_BUFFER_SIZE / 2);
1176     if (length) {
1177         host->dma.start_addr = address = host->dma.free_addr;
1178         host->dma.free_addr = (host->dma.free_addr + length) &
1179                                 (DMAC_BUFFER_SIZE - 1);
1180
1181         /*
1182          * Transfer data to DMA memory
1183          */
1184         if (host->dma.direction == DMA_OUT)
1185             acornscsi_data_write(host, host->scsi.SCp.ptr, host->dma.start_addr,
1186                                 length);
1187
1188         length -= 1;
1189         dmac_write(host, DMAC_TXCNTLO, length);
1190         dmac_write(host, DMAC_TXCNTHI, length >> 8);
1191         dmac_write(host, DMAC_TXADRLO, address);
1192         dmac_write(host, DMAC_TXADRMD, address >> 8);
1193         dmac_write(host, DMAC_TXADRHI, 0);
1194         dmac_write(host, DMAC_MASKREG, MASK_OFF);
1195
1196 #if (DEBUG & DEBUG_DMA)
1197         DBG(host->SCpnt, acornscsi_dumpdma(host, "into"));
1198 #endif
1199     } else {
1200         host->dma.xfer_setup = 0;
1201 #if 0
1202         /*
1203          * If the interface still wants more, then this is an error.
1204          * We give it another byte, but we also attempt to raise an
1205          * attention condition.  We continue giving one byte until
1206          * the device recognises the attention.
1207          */
1208         if (dmac_read(host, DMAC_STATUS) & STATUS_RQ0) {
1209             acornscsi_abortcmd(host, host->SCpnt->tag);
1210
1211             dmac_write(host, DMAC_TXCNTLO, 0);
1212             dmac_write(host, DMAC_TXCNTHI, 0);
1213             dmac_write(host, DMAC_TXADRLO, 0);
1214             dmac_write(host, DMAC_TXADRMD, 0);
1215             dmac_write(host, DMAC_TXADRHI, 0);
1216             dmac_write(host, DMAC_MASKREG, MASK_OFF);
1217         }
1218 #endif
1219     }
1220 }
1221
1222 /*
1223  * Function: void acornscsi_dma_xfer(AS_Host *host)
1224  * Purpose : transfer data between AcornSCSI and memory
1225  * Params  : host - host to process
1226  */
1227 static
1228 void acornscsi_dma_xfer(AS_Host *host)
1229 {
1230     host->dma.xfer_required = 0;
1231
1232     if (host->dma.direction == DMA_IN)
1233         acornscsi_data_read(host, host->dma.xfer_ptr,
1234                                 host->dma.xfer_start, host->dma.xfer_length);
1235 }
1236
1237 /*
1238  * Function: void acornscsi_dma_adjust(AS_Host *host)
1239  * Purpose : adjust DMA pointers & count for bytes transferred to
1240  *           SBIC but not SCSI bus.
1241  * Params  : host - host to adjust DMA count for
1242  */
1243 static
1244 void acornscsi_dma_adjust(AS_Host *host)
1245 {
1246     if (host->dma.xfer_setup) {
1247         signed long transferred;
1248 #if (DEBUG & (DEBUG_DMA|DEBUG_WRITE))
1249         DBG(host->SCpnt, acornscsi_dumpdma(host, "adji"));
1250 #endif
1251         /*
1252          * Calculate correct DMA address - DMA is ahead of SCSI bus while
1253          * writing.
1254          *  host->scsi.SCp.scsi_xferred is the number of bytes
1255          *  actually transferred to/from the SCSI bus.
1256          *  host->dma.transferred is the number of bytes transferred
1257          *  over DMA since host->dma.start_addr was last set.
1258          *
1259          * real_dma_addr = host->dma.start_addr + host->scsi.SCp.scsi_xferred
1260          *                 - host->dma.transferred
1261          */
1262         transferred = host->scsi.SCp.scsi_xferred - host->dma.transferred;
1263         if (transferred < 0)
1264             printk("scsi%d.%c: Ack! DMA write correction %ld < 0!\n",
1265                     host->host->host_no, acornscsi_target(host), transferred);
1266         else if (transferred == 0)
1267             host->dma.xfer_setup = 0;
1268         else {
1269             transferred += host->dma.start_addr;
1270             dmac_write(host, DMAC_TXADRLO, transferred);
1271             dmac_write(host, DMAC_TXADRMD, transferred >> 8);
1272             dmac_write(host, DMAC_TXADRHI, transferred >> 16);
1273 #if (DEBUG & (DEBUG_DMA|DEBUG_WRITE))
1274             DBG(host->SCpnt, acornscsi_dumpdma(host, "adjo"));
1275 #endif
1276         }
1277     }
1278 }
1279 #endif
1280
1281 /* =========================================================================================
1282  * Data I/O
1283  */
1284 static int
1285 acornscsi_write_pio(AS_Host *host, char *bytes, int *ptr, int len, unsigned int max_timeout)
1286 {
1287         unsigned int asr, timeout = max_timeout;
1288         int my_ptr = *ptr;
1289
1290         while (my_ptr < len) {
1291                 asr = sbic_arm_read(host, SBIC_ASR);
1292
1293                 if (asr & ASR_DBR) {
1294                         timeout = max_timeout;
1295
1296                         sbic_arm_write(host, SBIC_DATA, bytes[my_ptr++]);
1297                 } else if (asr & ASR_INT)
1298                         break;
1299                 else if (--timeout == 0)
1300                         break;
1301                 udelay(1);
1302         }
1303
1304         *ptr = my_ptr;
1305
1306         return (timeout == 0) ? -1 : 0;
1307 }
1308
1309 /*
1310  * Function: void acornscsi_sendcommand(AS_Host *host)
1311  * Purpose : send a command to a target
1312  * Params  : host - host which is connected to target
1313  */
1314 static void
1315 acornscsi_sendcommand(AS_Host *host)
1316 {
1317         struct scsi_cmnd *SCpnt = host->SCpnt;
1318
1319     sbic_arm_write(host, SBIC_TRANSCNTH, 0);
1320     sbic_arm_writenext(host, 0);
1321     sbic_arm_writenext(host, SCpnt->cmd_len - host->scsi.SCp.sent_command);
1322
1323     acornscsi_sbic_issuecmd(host, CMND_XFERINFO);
1324
1325     if (acornscsi_write_pio(host, SCpnt->cmnd,
1326         (int *)&host->scsi.SCp.sent_command, SCpnt->cmd_len, 1000000))
1327         printk("scsi%d: timeout while sending command\n", host->host->host_no);
1328
1329     host->scsi.phase = PHASE_COMMAND;
1330 }
1331
1332 static
1333 void acornscsi_sendmessage(AS_Host *host)
1334 {
1335     unsigned int message_length = msgqueue_msglength(&host->scsi.msgs);
1336     unsigned int msgnr;
1337     struct message *msg;
1338
1339 #if (DEBUG & DEBUG_MESSAGES)
1340     printk("scsi%d.%c: sending message ",
1341             host->host->host_no, acornscsi_target(host));
1342 #endif
1343
1344     switch (message_length) {
1345     case 0:
1346         acornscsi_sbic_issuecmd(host, CMND_XFERINFO | CMND_SBT);
1347
1348         acornscsi_sbic_wait(host, ASR_DBR, ASR_DBR, 1000, "sending message 1");
1349
1350         sbic_arm_write(host, SBIC_DATA, NOP);
1351
1352         host->scsi.last_message = NOP;
1353 #if (DEBUG & DEBUG_MESSAGES)
1354         printk("NOP");
1355 #endif
1356         break;
1357
1358     case 1:
1359         acornscsi_sbic_issuecmd(host, CMND_XFERINFO | CMND_SBT);
1360         msg = msgqueue_getmsg(&host->scsi.msgs, 0);
1361
1362         acornscsi_sbic_wait(host, ASR_DBR, ASR_DBR, 1000, "sending message 2");
1363
1364         sbic_arm_write(host, SBIC_DATA, msg->msg[0]);
1365
1366         host->scsi.last_message = msg->msg[0];
1367 #if (DEBUG & DEBUG_MESSAGES)
1368         spi_print_msg(msg->msg);
1369 #endif
1370         break;
1371
1372     default:
1373         /*
1374          * ANSI standard says: (SCSI-2 Rev 10c Sect 5.6.14)
1375          * 'When a target sends this (MESSAGE_REJECT) message, it
1376          *  shall change to MESSAGE IN phase and send this message
1377          *  prior to requesting additional message bytes from the
1378          *  initiator.  This provides an interlock so that the
1379          *  initiator can determine which message byte is rejected.
1380          */
1381         sbic_arm_write(host, SBIC_TRANSCNTH, 0);
1382         sbic_arm_writenext(host, 0);
1383         sbic_arm_writenext(host, message_length);
1384         acornscsi_sbic_issuecmd(host, CMND_XFERINFO);
1385
1386         msgnr = 0;
1387         while ((msg = msgqueue_getmsg(&host->scsi.msgs, msgnr++)) != NULL) {
1388             unsigned int i;
1389 #if (DEBUG & DEBUG_MESSAGES)
1390             spi_print_msg(msg);
1391 #endif
1392             i = 0;
1393             if (acornscsi_write_pio(host, msg->msg, &i, msg->length, 1000000))
1394                 printk("scsi%d: timeout while sending message\n", host->host->host_no);
1395
1396             host->scsi.last_message = msg->msg[0];
1397             if (msg->msg[0] == EXTENDED_MESSAGE)
1398                 host->scsi.last_message |= msg->msg[2] << 8;
1399
1400             if (i != msg->length)
1401                 break;
1402         }
1403         break;
1404     }
1405 #if (DEBUG & DEBUG_MESSAGES)
1406     printk("\n");
1407 #endif
1408 }
1409
1410 /*
1411  * Function: void acornscsi_readstatusbyte(AS_Host *host)
1412  * Purpose : Read status byte from connected target
1413  * Params  : host - host connected to target
1414  */
1415 static
1416 void acornscsi_readstatusbyte(AS_Host *host)
1417 {
1418     acornscsi_sbic_issuecmd(host, CMND_XFERINFO|CMND_SBT);
1419     acornscsi_sbic_wait(host, ASR_DBR, ASR_DBR, 1000, "reading status byte");
1420     host->scsi.SCp.Status = sbic_arm_read(host, SBIC_DATA);
1421 }
1422
1423 /*
1424  * Function: unsigned char acornscsi_readmessagebyte(AS_Host *host)
1425  * Purpose : Read one message byte from connected target
1426  * Params  : host - host connected to target
1427  */
1428 static
1429 unsigned char acornscsi_readmessagebyte(AS_Host *host)
1430 {
1431     unsigned char message;
1432
1433     acornscsi_sbic_issuecmd(host, CMND_XFERINFO | CMND_SBT);
1434
1435     acornscsi_sbic_wait(host, ASR_DBR, ASR_DBR, 1000, "for message byte");
1436
1437     message = sbic_arm_read(host, SBIC_DATA);
1438
1439     /* wait for MSGIN-XFER-PAUSED */
1440     acornscsi_sbic_wait(host, ASR_INT, ASR_INT, 1000, "for interrupt after message byte");
1441
1442     sbic_arm_read(host, SBIC_SSR);
1443
1444     return message;
1445 }
1446
1447 /*
1448  * Function: void acornscsi_message(AS_Host *host)
1449  * Purpose : Read complete message from connected target & action message
1450  * Params  : host - host connected to target
1451  */
1452 static
1453 void acornscsi_message(AS_Host *host)
1454 {
1455     unsigned char message[16];
1456     unsigned int msgidx = 0, msglen = 1;
1457
1458     do {
1459         message[msgidx] = acornscsi_readmessagebyte(host);
1460
1461         switch (msgidx) {
1462         case 0:
1463             if (message[0] == EXTENDED_MESSAGE ||
1464                 (message[0] >= 0x20 && message[0] <= 0x2f))
1465                 msglen = 2;
1466             break;
1467
1468         case 1:
1469             if (message[0] == EXTENDED_MESSAGE)
1470                 msglen += message[msgidx];
1471             break;
1472         }
1473         msgidx += 1;
1474         if (msgidx < msglen) {
1475             acornscsi_sbic_issuecmd(host, CMND_NEGATEACK);
1476
1477             /* wait for next msg-in */
1478             acornscsi_sbic_wait(host, ASR_INT, ASR_INT, 1000, "for interrupt after negate ack");
1479             sbic_arm_read(host, SBIC_SSR);
1480         }
1481     } while (msgidx < msglen);
1482
1483 #if (DEBUG & DEBUG_MESSAGES)
1484     printk("scsi%d.%c: message in: ",
1485             host->host->host_no, acornscsi_target(host));
1486     spi_print_msg(message);
1487     printk("\n");
1488 #endif
1489
1490     if (host->scsi.phase == PHASE_RECONNECTED) {
1491         /*
1492          * ANSI standard says: (Section SCSI-2 Rev. 10c Sect 5.6.17)
1493          * 'Whenever a target reconnects to an initiator to continue
1494          *  a tagged I/O process, the SIMPLE QUEUE TAG message shall
1495          *  be sent immediately following the IDENTIFY message...'
1496          */
1497         if (message[0] == SIMPLE_QUEUE_TAG)
1498             host->scsi.reconnected.tag = message[1];
1499         if (acornscsi_reconnect_finish(host))
1500             host->scsi.phase = PHASE_MSGIN;
1501     }
1502
1503     switch (message[0]) {
1504     case ABORT:
1505     case ABORT_TAG:
1506     case COMMAND_COMPLETE:
1507         if (host->scsi.phase != PHASE_STATUSIN) {
1508             printk(KERN_ERR "scsi%d.%c: command complete following non-status in phase?\n",
1509                     host->host->host_no, acornscsi_target(host));
1510             acornscsi_dumplog(host, host->SCpnt->device->id);
1511         }
1512         host->scsi.phase = PHASE_DONE;
1513         host->scsi.SCp.Message = message[0];
1514         break;
1515
1516     case SAVE_POINTERS:
1517         /*
1518          * ANSI standard says: (Section SCSI-2 Rev. 10c Sect 5.6.20)
1519          * 'The SAVE DATA POINTER message is sent from a target to
1520          *  direct the initiator to copy the active data pointer to
1521          *  the saved data pointer for the current I/O process.
1522          */
1523         acornscsi_dma_cleanup(host);
1524         host->SCpnt->SCp = host->scsi.SCp;
1525         host->SCpnt->SCp.sent_command = 0;
1526         host->scsi.phase = PHASE_MSGIN;
1527         break;
1528
1529     case RESTORE_POINTERS:
1530         /*
1531          * ANSI standard says: (Section SCSI-2 Rev. 10c Sect 5.6.19)
1532          * 'The RESTORE POINTERS message is sent from a target to
1533          *  direct the initiator to copy the most recently saved
1534          *  command, data, and status pointers for the I/O process
1535          *  to the corresponding active pointers.  The command and
1536          *  status pointers shall be restored to the beginning of
1537          *  the present command and status areas.'
1538          */
1539         acornscsi_dma_cleanup(host);
1540         host->scsi.SCp = host->SCpnt->SCp;
1541         host->scsi.phase = PHASE_MSGIN;
1542         break;
1543
1544     case DISCONNECT:
1545         /*
1546          * ANSI standard says: (Section SCSI-2 Rev. 10c Sect 6.4.2)
1547          * 'On those occasions when an error or exception condition occurs
1548          *  and the target elects to repeat the information transfer, the
1549          *  target may repeat the transfer either issuing a RESTORE POINTERS
1550          *  message or by disconnecting without issuing a SAVE POINTERS
1551          *  message.  When reconnection is completed, the most recent
1552          *  saved pointer values are restored.'
1553          */
1554         acornscsi_dma_cleanup(host);
1555         host->scsi.phase = PHASE_DISCONNECT;
1556         break;
1557
1558     case MESSAGE_REJECT:
1559 #if 0 /* this isn't needed any more */
1560         /*
1561          * If we were negociating sync transfer, we don't yet know if
1562          * this REJECT is for the sync transfer or for the tagged queue/wide
1563          * transfer.  Re-initiate sync transfer negotiation now, and if
1564          * we got a REJECT in response to SDTR, then it'll be set to DONE.
1565          */
1566         if (host->device[host->SCpnt->device->id].sync_state == SYNC_SENT_REQUEST)
1567             host->device[host->SCpnt->device->id].sync_state = SYNC_NEGOCIATE;
1568 #endif
1569
1570         /*
1571          * If we have any messages waiting to go out, then assert ATN now
1572          */
1573         if (msgqueue_msglength(&host->scsi.msgs))
1574             acornscsi_sbic_issuecmd(host, CMND_ASSERTATN);
1575
1576         switch (host->scsi.last_message) {
1577 #ifdef CONFIG_SCSI_ACORNSCSI_TAGGED_QUEUE
1578         case HEAD_OF_QUEUE_TAG:
1579         case ORDERED_QUEUE_TAG:
1580         case SIMPLE_QUEUE_TAG:
1581             /*
1582              * ANSI standard says: (Section SCSI-2 Rev. 10c Sect 5.6.17)
1583              *  If a target does not implement tagged queuing and a queue tag
1584              *  message is received, it shall respond with a MESSAGE REJECT
1585              *  message and accept the I/O process as if it were untagged.
1586              */
1587             printk(KERN_NOTICE "scsi%d.%c: disabling tagged queueing\n",
1588                     host->host->host_no, acornscsi_target(host));
1589             host->SCpnt->device->simple_tags = 0;
1590             set_bit(host->SCpnt->device->id * 8 + host->SCpnt->device->lun, host->busyluns);
1591             break;
1592 #endif
1593         case EXTENDED_MESSAGE | (EXTENDED_SDTR << 8):
1594             /*
1595              * Target can't handle synchronous transfers
1596              */
1597             printk(KERN_NOTICE "scsi%d.%c: Using asynchronous transfer\n",
1598                     host->host->host_no, acornscsi_target(host));
1599             host->device[host->SCpnt->device->id].sync_xfer = SYNCHTRANSFER_2DBA;
1600             host->device[host->SCpnt->device->id].sync_state = SYNC_ASYNCHRONOUS;
1601             sbic_arm_write(host, SBIC_SYNCHTRANSFER, host->device[host->SCpnt->device->id].sync_xfer);
1602             break;
1603
1604         default:
1605             break;
1606         }
1607         break;
1608
1609     case QUEUE_FULL:
1610         /* TODO: target queue is full */
1611         break;
1612
1613     case SIMPLE_QUEUE_TAG:
1614         /* tag queue reconnect... message[1] = queue tag.  Print something to indicate something happened! */
1615         printk("scsi%d.%c: reconnect queue tag %02X\n",
1616                 host->host->host_no, acornscsi_target(host),
1617                 message[1]);
1618         break;
1619
1620     case EXTENDED_MESSAGE:
1621         switch (message[2]) {
1622 #ifdef CONFIG_SCSI_ACORNSCSI_SYNC
1623         case EXTENDED_SDTR:
1624             if (host->device[host->SCpnt->device->id].sync_state == SYNC_SENT_REQUEST) {
1625                 /*
1626                  * We requested synchronous transfers.  This isn't quite right...
1627                  * We can only say if this succeeded if we proceed on to execute the
1628                  * command from this message.  If we get a MESSAGE PARITY ERROR,
1629                  * and the target retries fail, then we fallback to asynchronous mode
1630                  */
1631                 host->device[host->SCpnt->device->id].sync_state = SYNC_COMPLETED;
1632                 printk(KERN_NOTICE "scsi%d.%c: Using synchronous transfer, offset %d, %d ns\n",
1633                         host->host->host_no, acornscsi_target(host),
1634                         message[4], message[3] * 4);
1635                 host->device[host->SCpnt->device->id].sync_xfer =
1636                         calc_sync_xfer(message[3] * 4, message[4]);
1637             } else {
1638                 unsigned char period, length;
1639                 /*
1640                  * Target requested synchronous transfers.  The agreement is only
1641                  * to be in operation AFTER the target leaves message out phase.
1642                  */
1643                 acornscsi_sbic_issuecmd(host, CMND_ASSERTATN);
1644                 period = max_t(unsigned int, message[3], sdtr_period / 4);
1645                 length = min_t(unsigned int, message[4], sdtr_size);
1646                 msgqueue_addmsg(&host->scsi.msgs, 5, EXTENDED_MESSAGE, 3,
1647                                  EXTENDED_SDTR, period, length);
1648                 host->device[host->SCpnt->device->id].sync_xfer =
1649                         calc_sync_xfer(period * 4, length);
1650             }
1651             sbic_arm_write(host, SBIC_SYNCHTRANSFER, host->device[host->SCpnt->device->id].sync_xfer);
1652             break;
1653 #else
1654             /* We do not accept synchronous transfers.  Respond with a
1655              * MESSAGE_REJECT.
1656              */
1657 #endif
1658
1659         case EXTENDED_WDTR:
1660             /* The WD33C93A is only 8-bit.  We respond with a MESSAGE_REJECT
1661              * to a wide data transfer request.
1662              */
1663         default:
1664             acornscsi_sbic_issuecmd(host, CMND_ASSERTATN);
1665             msgqueue_flush(&host->scsi.msgs);
1666             msgqueue_addmsg(&host->scsi.msgs, 1, MESSAGE_REJECT);
1667             break;
1668         }
1669         break;
1670
1671 #ifdef CONFIG_SCSI_ACORNSCSI_LINK
1672     case LINKED_CMD_COMPLETE:
1673     case LINKED_FLG_CMD_COMPLETE:
1674         /*
1675          * We don't support linked commands yet
1676          */
1677         if (0) {
1678 #if (DEBUG & DEBUG_LINK)
1679             printk("scsi%d.%c: lun %d tag %d linked command complete\n",
1680                     host->host->host_no, acornscsi_target(host), host->SCpnt->tag);
1681 #endif
1682             /*
1683              * A linked command should only terminate with one of these messages
1684              * if there are more linked commands available.
1685              */
1686             if (!host->SCpnt->next_link) {
1687                 printk(KERN_WARNING "scsi%d.%c: lun %d tag %d linked command complete, but no next_link\n",
1688                         instance->host_no, acornscsi_target(host), host->SCpnt->tag);
1689                 acornscsi_sbic_issuecmd(host, CMND_ASSERTATN);
1690                 msgqueue_addmsg(&host->scsi.msgs, 1, ABORT);
1691             } else {
1692                 struct scsi_cmnd *SCpnt = host->SCpnt;
1693
1694                 acornscsi_dma_cleanup(host);
1695
1696                 host->SCpnt = host->SCpnt->next_link;
1697                 host->SCpnt->tag = SCpnt->tag;
1698                 SCpnt->result = DID_OK | host->scsi.SCp.Message << 8 | host->Scsi.SCp.Status;
1699                 SCpnt->done(SCpnt);
1700
1701                 /* initialise host->SCpnt->SCp */
1702             }
1703             break;
1704         }
1705 #endif
1706
1707     default: /* reject message */
1708         printk(KERN_ERR "scsi%d.%c: unrecognised message %02X, rejecting\n",
1709                 host->host->host_no, acornscsi_target(host),
1710                 message[0]);
1711         acornscsi_sbic_issuecmd(host, CMND_ASSERTATN);
1712         msgqueue_flush(&host->scsi.msgs);
1713         msgqueue_addmsg(&host->scsi.msgs, 1, MESSAGE_REJECT);
1714         host->scsi.phase = PHASE_MSGIN;
1715         break;
1716     }
1717     acornscsi_sbic_issuecmd(host, CMND_NEGATEACK);
1718 }
1719
1720 /*
1721  * Function: int acornscsi_buildmessages(AS_Host *host)
1722  * Purpose : build the connection messages for a host
1723  * Params  : host - host to add messages to
1724  */
1725 static
1726 void acornscsi_buildmessages(AS_Host *host)
1727 {
1728 #if 0
1729     /* does the device need resetting? */
1730     if (cmd_reset) {
1731         msgqueue_addmsg(&host->scsi.msgs, 1, BUS_DEVICE_RESET);
1732         return;
1733     }
1734 #endif
1735
1736     msgqueue_addmsg(&host->scsi.msgs, 1,
1737                      IDENTIFY(host->device[host->SCpnt->device->id].disconnect_ok,
1738                              host->SCpnt->device->lun));
1739
1740 #if 0
1741     /* does the device need the current command aborted */
1742     if (cmd_aborted) {
1743         acornscsi_abortcmd(host->SCpnt->tag);
1744         return;
1745     }
1746 #endif
1747
1748 #ifdef CONFIG_SCSI_ACORNSCSI_TAGGED_QUEUE
1749     if (host->SCpnt->tag) {
1750         unsigned int tag_type;
1751
1752         if (host->SCpnt->cmnd[0] == REQUEST_SENSE ||
1753             host->SCpnt->cmnd[0] == TEST_UNIT_READY ||
1754             host->SCpnt->cmnd[0] == INQUIRY)
1755             tag_type = HEAD_OF_QUEUE_TAG;
1756         else
1757             tag_type = SIMPLE_QUEUE_TAG;
1758         msgqueue_addmsg(&host->scsi.msgs, 2, tag_type, host->SCpnt->tag);
1759     }
1760 #endif
1761
1762 #ifdef CONFIG_SCSI_ACORNSCSI_SYNC
1763     if (host->device[host->SCpnt->device->id].sync_state == SYNC_NEGOCIATE) {
1764         host->device[host->SCpnt->device->id].sync_state = SYNC_SENT_REQUEST;
1765         msgqueue_addmsg(&host->scsi.msgs, 5,
1766                          EXTENDED_MESSAGE, 3, EXTENDED_SDTR,
1767                          sdtr_period / 4, sdtr_size);
1768     }
1769 #endif
1770 }
1771
1772 /*
1773  * Function: int acornscsi_starttransfer(AS_Host *host)
1774  * Purpose : transfer data to/from connected target
1775  * Params  : host - host to which target is connected
1776  * Returns : 0 if failure
1777  */
1778 static
1779 int acornscsi_starttransfer(AS_Host *host)
1780 {
1781     int residual;
1782
1783     if (!host->scsi.SCp.ptr /*&& host->scsi.SCp.this_residual*/) {
1784         printk(KERN_ERR "scsi%d.%c: null buffer passed to acornscsi_starttransfer\n",
1785                 host->host->host_no, acornscsi_target(host));
1786         return 0;
1787     }
1788
1789     residual = scsi_bufflen(host->SCpnt) - host->scsi.SCp.scsi_xferred;
1790
1791     sbic_arm_write(host, SBIC_SYNCHTRANSFER, host->device[host->SCpnt->device->id].sync_xfer);
1792     sbic_arm_writenext(host, residual >> 16);
1793     sbic_arm_writenext(host, residual >> 8);
1794     sbic_arm_writenext(host, residual);
1795     acornscsi_sbic_issuecmd(host, CMND_XFERINFO);
1796     return 1;
1797 }
1798
1799 /* =========================================================================================
1800  * Connection & Disconnection
1801  */
1802 /*
1803  * Function : acornscsi_reconnect(AS_Host *host)
1804  * Purpose  : reconnect a previously disconnected command
1805  * Params   : host - host specific data
1806  * Remarks  : SCSI spec says:
1807  *              'The set of active pointers is restored from the set
1808  *               of saved pointers upon reconnection of the I/O process'
1809  */
1810 static
1811 int acornscsi_reconnect(AS_Host *host)
1812 {
1813     unsigned int target, lun, ok = 0;
1814
1815     target = sbic_arm_read(host, SBIC_SOURCEID);
1816
1817     if (!(target & 8))
1818         printk(KERN_ERR "scsi%d: invalid source id after reselection "
1819                 "- device fault?\n",
1820                 host->host->host_no);
1821
1822     target &= 7;
1823
1824     if (host->SCpnt && !host->scsi.disconnectable) {
1825         printk(KERN_ERR "scsi%d.%d: reconnected while command in "
1826                 "progress to target %d?\n",
1827                 host->host->host_no, target, host->SCpnt->device->id);
1828         host->SCpnt = NULL;
1829     }
1830
1831     lun = sbic_arm_read(host, SBIC_DATA) & 7;
1832
1833     host->scsi.reconnected.target = target;
1834     host->scsi.reconnected.lun = lun;
1835     host->scsi.reconnected.tag = 0;
1836
1837     if (host->scsi.disconnectable && host->SCpnt &&
1838         host->SCpnt->device->id == target && host->SCpnt->device->lun == lun)
1839         ok = 1;
1840
1841     if (!ok && queue_probetgtlun(&host->queues.disconnected, target, lun))
1842         ok = 1;
1843
1844     ADD_STATUS(target, 0x81, host->scsi.phase, 0);
1845
1846     if (ok) {
1847         host->scsi.phase = PHASE_RECONNECTED;
1848     } else {
1849         /* this doesn't seem to work */
1850         printk(KERN_ERR "scsi%d.%c: reselected with no command "
1851                 "to reconnect with\n",
1852                 host->host->host_no, '0' + target);
1853         acornscsi_dumplog(host, target);
1854         acornscsi_abortcmd(host, 0);
1855         if (host->SCpnt) {
1856             queue_add_cmd_tail(&host->queues.disconnected, host->SCpnt);
1857             host->SCpnt = NULL;
1858         }
1859     }
1860     acornscsi_sbic_issuecmd(host, CMND_NEGATEACK);
1861     return !ok;
1862 }
1863
1864 /*
1865  * Function: int acornscsi_reconect_finish(AS_Host *host)
1866  * Purpose : finish reconnecting a command
1867  * Params  : host - host to complete
1868  * Returns : 0 if failed
1869  */
1870 static
1871 int acornscsi_reconnect_finish(AS_Host *host)
1872 {
1873     if (host->scsi.disconnectable && host->SCpnt) {
1874         host->scsi.disconnectable = 0;
1875         if (host->SCpnt->device->id  == host->scsi.reconnected.target &&
1876             host->SCpnt->device->lun == host->scsi.reconnected.lun &&
1877             host->SCpnt->tag         == host->scsi.reconnected.tag) {
1878 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
1879             DBG(host->SCpnt, printk("scsi%d.%c: reconnected",
1880                     host->host->host_no, acornscsi_target(host)));
1881 #endif
1882         } else {
1883             queue_add_cmd_tail(&host->queues.disconnected, host->SCpnt);
1884 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
1885             DBG(host->SCpnt, printk("scsi%d.%c: had to move command "
1886                     "to disconnected queue\n",
1887                     host->host->host_no, acornscsi_target(host)));
1888 #endif
1889             host->SCpnt = NULL;
1890         }
1891     }
1892     if (!host->SCpnt) {
1893         host->SCpnt = queue_remove_tgtluntag(&host->queues.disconnected,
1894                                 host->scsi.reconnected.target,
1895                                 host->scsi.reconnected.lun,
1896                                 host->scsi.reconnected.tag);
1897 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
1898         DBG(host->SCpnt, printk("scsi%d.%c: had to get command",
1899                 host->host->host_no, acornscsi_target(host)));
1900 #endif
1901     }
1902
1903     if (!host->SCpnt)
1904         acornscsi_abortcmd(host, host->scsi.reconnected.tag);
1905     else {
1906         /*
1907          * Restore data pointer from SAVED pointers.
1908          */
1909         host->scsi.SCp = host->SCpnt->SCp;
1910 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
1911         printk(", data pointers: [%p, %X]",
1912                 host->scsi.SCp.ptr, host->scsi.SCp.this_residual);
1913 #endif
1914     }
1915 #if (DEBUG & (DEBUG_QUEUES|DEBUG_DISCON))
1916     printk("\n");
1917 #endif
1918
1919     host->dma.transferred = host->scsi.SCp.scsi_xferred;
1920
1921     return host->SCpnt != NULL;
1922 }
1923
1924 /*
1925  * Function: void acornscsi_disconnect_unexpected(AS_Host *host)
1926  * Purpose : handle an unexpected disconnect
1927  * Params  : host - host on which disconnect occurred
1928  */
1929 static
1930 void acornscsi_disconnect_unexpected(AS_Host *host)
1931 {
1932     printk(KERN_ERR "scsi%d.%c: unexpected disconnect\n",
1933             host->host->host_no, acornscsi_target(host));
1934 #if (DEBUG & DEBUG_ABORT)
1935     acornscsi_dumplog(host, 8);
1936 #endif
1937
1938     acornscsi_done(host, &host->SCpnt, DID_ERROR);
1939 }
1940
1941 /*
1942  * Function: void acornscsi_abortcmd(AS_host *host, unsigned char tag)
1943  * Purpose : abort a currently executing command
1944  * Params  : host - host with connected command to abort
1945  *           tag  - tag to abort
1946  */
1947 static
1948 void acornscsi_abortcmd(AS_Host *host, unsigned char tag)
1949 {
1950     host->scsi.phase = PHASE_ABORTED;
1951     sbic_arm_write(host, SBIC_CMND, CMND_ASSERTATN);
1952
1953     msgqueue_flush(&host->scsi.msgs);
1954 #ifdef CONFIG_SCSI_ACORNSCSI_TAGGED_QUEUE
1955     if (tag)
1956         msgqueue_addmsg(&host->scsi.msgs, 2, ABORT_TAG, tag);
1957     else
1958 #endif
1959         msgqueue_addmsg(&host->scsi.msgs, 1, ABORT);
1960 }
1961
1962 /* ==========================================================================================
1963  * Interrupt routines.
1964  */
1965 /*
1966  * Function: int acornscsi_sbicintr(AS_Host *host)
1967  * Purpose : handle interrupts from SCSI device
1968  * Params  : host - host to process
1969  * Returns : INTR_PROCESS if expecting another SBIC interrupt
1970  *           INTR_IDLE if no interrupt
1971  *           INTR_NEXT_COMMAND if we have finished processing the command
1972  */
1973 static
1974 intr_ret_t acornscsi_sbicintr(AS_Host *host, int in_irq)
1975 {
1976     unsigned int asr, ssr;
1977
1978     asr = sbic_arm_read(host, SBIC_ASR);
1979     if (!(asr & ASR_INT))
1980         return INTR_IDLE;
1981
1982     ssr = sbic_arm_read(host, SBIC_SSR);
1983
1984 #if (DEBUG & DEBUG_PHASES)
1985     print_sbic_status(asr, ssr, host->scsi.phase);
1986 #endif
1987
1988     ADD_STATUS(8, ssr, host->scsi.phase, in_irq);
1989
1990     if (host->SCpnt && !host->scsi.disconnectable)
1991         ADD_STATUS(host->SCpnt->device->id, ssr, host->scsi.phase, in_irq);
1992
1993     switch (ssr) {
1994     case 0x00:                          /* reset state - not advanced                   */
1995         printk(KERN_ERR "scsi%d: reset in standard mode but wanted advanced mode.\n",
1996                 host->host->host_no);
1997         /* setup sbic - WD33C93A */
1998         sbic_arm_write(host, SBIC_OWNID, OWNID_EAF | host->host->this_id);
1999         sbic_arm_write(host, SBIC_CMND, CMND_RESET);
2000         return INTR_IDLE;
2001
2002     case 0x01:                          /* reset state - advanced                       */
2003         sbic_arm_write(host, SBIC_CTRL, INIT_SBICDMA | CTRL_IDI);
2004         sbic_arm_write(host, SBIC_TIMEOUT, TIMEOUT_TIME);
2005         sbic_arm_write(host, SBIC_SYNCHTRANSFER, SYNCHTRANSFER_2DBA);
2006         sbic_arm_write(host, SBIC_SOURCEID, SOURCEID_ER | SOURCEID_DSP);
2007         msgqueue_flush(&host->scsi.msgs);
2008         return INTR_IDLE;
2009
2010     case 0x41:                          /* unexpected disconnect aborted command        */
2011         acornscsi_disconnect_unexpected(host);
2012         return INTR_NEXT_COMMAND;
2013     }
2014
2015     switch (host->scsi.phase) {
2016     case PHASE_CONNECTING:              /* STATE: command removed from issue queue      */
2017         switch (ssr) {
2018         case 0x11:                      /* -> PHASE_CONNECTED                           */
2019             /* BUS FREE -> SELECTION */
2020             host->scsi.phase = PHASE_CONNECTED;
2021             msgqueue_flush(&host->scsi.msgs);
2022             host->dma.transferred = host->scsi.SCp.scsi_xferred;
2023             /* 33C93 gives next interrupt indicating bus phase */
2024             asr = sbic_arm_read(host, SBIC_ASR);
2025             if (!(asr & ASR_INT))
2026                 break;
2027             ssr = sbic_arm_read(host, SBIC_SSR);
2028             ADD_STATUS(8, ssr, host->scsi.phase, 1);
2029             ADD_STATUS(host->SCpnt->device->id, ssr, host->scsi.phase, 1);
2030             goto connected;
2031
2032         case 0x42:                      /* select timed out                             */
2033                                         /* -> PHASE_IDLE                                */
2034             acornscsi_done(host, &host->SCpnt, DID_NO_CONNECT);
2035             return INTR_NEXT_COMMAND;
2036
2037         case 0x81:                      /* -> PHASE_RECONNECTED or PHASE_ABORTED        */
2038             /* BUS FREE -> RESELECTION */
2039             host->origSCpnt = host->SCpnt;
2040             host->SCpnt = NULL;
2041             msgqueue_flush(&host->scsi.msgs);
2042             acornscsi_reconnect(host);
2043             break;
2044
2045         default:
2046             printk(KERN_ERR "scsi%d.%c: PHASE_CONNECTING, SSR %02X?\n",
2047                     host->host->host_no, acornscsi_target(host), ssr);
2048             acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2049             acornscsi_abortcmd(host, host->SCpnt->tag);
2050         }
2051         return INTR_PROCESSING;
2052
2053     connected:
2054     case PHASE_CONNECTED:               /* STATE: device selected ok                    */
2055         switch (ssr) {
2056 #ifdef NONSTANDARD
2057         case 0x8a:                      /* -> PHASE_COMMAND, PHASE_COMMANDPAUSED        */
2058             /* SELECTION -> COMMAND */
2059             acornscsi_sendcommand(host);
2060             break;
2061
2062         case 0x8b:                      /* -> PHASE_STATUS                              */
2063             /* SELECTION -> STATUS */
2064             acornscsi_readstatusbyte(host);
2065             host->scsi.phase = PHASE_STATUSIN;
2066             break;
2067 #endif
2068
2069         case 0x8e:                      /* -> PHASE_MSGOUT                              */
2070             /* SELECTION ->MESSAGE OUT */
2071             host->scsi.phase = PHASE_MSGOUT;
2072             acornscsi_buildmessages(host);
2073             acornscsi_sendmessage(host);
2074             break;
2075
2076         /* these should not happen */
2077         case 0x85:                      /* target disconnected                          */
2078             acornscsi_done(host, &host->SCpnt, DID_ERROR);
2079             break;
2080
2081         default:
2082             printk(KERN_ERR "scsi%d.%c: PHASE_CONNECTED, SSR %02X?\n",
2083                     host->host->host_no, acornscsi_target(host), ssr);
2084             acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2085             acornscsi_abortcmd(host, host->SCpnt->tag);
2086         }
2087         return INTR_PROCESSING;
2088
2089     case PHASE_MSGOUT:                  /* STATE: connected & sent IDENTIFY message     */
2090         /*
2091          * SCSI standard says that MESSAGE OUT phases can be followed by a
2092          * DATA phase, STATUS phase, MESSAGE IN phase or COMMAND phase
2093          */
2094         switch (ssr) {
2095         case 0x8a:                      /* -> PHASE_COMMAND, PHASE_COMMANDPAUSED        */
2096         case 0x1a:                      /* -> PHASE_COMMAND, PHASE_COMMANDPAUSED        */
2097             /* MESSAGE OUT -> COMMAND */
2098             acornscsi_sendcommand(host);
2099             break;
2100
2101         case 0x8b:                      /* -> PHASE_STATUS                              */
2102         case 0x1b:                      /* -> PHASE_STATUS                              */
2103             /* MESSAGE OUT -> STATUS */
2104             acornscsi_readstatusbyte(host);
2105             host->scsi.phase = PHASE_STATUSIN;
2106             break;
2107
2108         case 0x8e:                      /* -> PHASE_MSGOUT                              */
2109             /* MESSAGE_OUT(MESSAGE_IN) ->MESSAGE OUT */
2110             acornscsi_sendmessage(host);
2111             break;
2112
2113         case 0x4f:                      /* -> PHASE_MSGIN, PHASE_DISCONNECT             */
2114         case 0x1f:                      /* -> PHASE_MSGIN, PHASE_DISCONNECT             */
2115             /* MESSAGE OUT -> MESSAGE IN */
2116             acornscsi_message(host);
2117             break;
2118
2119         default:
2120             printk(KERN_ERR "scsi%d.%c: PHASE_MSGOUT, SSR %02X?\n",
2121                     host->host->host_no, acornscsi_target(host), ssr);
2122             acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2123         }
2124         return INTR_PROCESSING;
2125
2126     case PHASE_COMMAND:                 /* STATE: connected & command sent              */
2127         switch (ssr) {
2128         case 0x18:                      /* -> PHASE_DATAOUT                             */
2129             /* COMMAND -> DATA OUT */
2130             if (host->scsi.SCp.sent_command != host->SCpnt->cmd_len)
2131                 acornscsi_abortcmd(host, host->SCpnt->tag);
2132             acornscsi_dma_setup(host, DMA_OUT);
2133             if (!acornscsi_starttransfer(host))
2134                 acornscsi_abortcmd(host, host->SCpnt->tag);
2135             host->scsi.phase = PHASE_DATAOUT;
2136             return INTR_IDLE;
2137
2138         case 0x19:                      /* -> PHASE_DATAIN                              */
2139             /* COMMAND -> DATA IN */
2140             if (host->scsi.SCp.sent_command != host->SCpnt->cmd_len)
2141                 acornscsi_abortcmd(host, host->SCpnt->tag);
2142             acornscsi_dma_setup(host, DMA_IN);
2143             if (!acornscsi_starttransfer(host))
2144                 acornscsi_abortcmd(host, host->SCpnt->tag);
2145             host->scsi.phase = PHASE_DATAIN;
2146             return INTR_IDLE;
2147
2148         case 0x1b:                      /* -> PHASE_STATUS                              */
2149             /* COMMAND -> STATUS */
2150             acornscsi_readstatusbyte(host);
2151             host->scsi.phase = PHASE_STATUSIN;
2152             break;
2153
2154         case 0x1e:                      /* -> PHASE_MSGOUT                              */
2155             /* COMMAND -> MESSAGE OUT */
2156             acornscsi_sendmessage(host);
2157             break;
2158
2159         case 0x1f:                      /* -> PHASE_MSGIN, PHASE_DISCONNECT             */
2160             /* COMMAND -> MESSAGE IN */
2161             acornscsi_message(host);
2162             break;
2163
2164         default:
2165             printk(KERN_ERR "scsi%d.%c: PHASE_COMMAND, SSR %02X?\n",
2166                     host->host->host_no, acornscsi_target(host), ssr);
2167             acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2168         }
2169         return INTR_PROCESSING;
2170
2171     case PHASE_DISCONNECT:              /* STATE: connected, received DISCONNECT msg    */
2172         if (ssr == 0x85) {              /* -> PHASE_IDLE                                */
2173             host->scsi.disconnectable = 1;
2174             host->scsi.reconnected.tag = 0;
2175             host->scsi.phase = PHASE_IDLE;
2176             host->stats.disconnects += 1;
2177         } else {
2178             printk(KERN_ERR "scsi%d.%c: PHASE_DISCONNECT, SSR %02X instead of disconnect?\n",
2179                     host->host->host_no, acornscsi_target(host), ssr);
2180             acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2181         }
2182         return INTR_NEXT_COMMAND;
2183
2184     case PHASE_IDLE:                    /* STATE: disconnected                          */
2185         if (ssr == 0x81)                /* -> PHASE_RECONNECTED or PHASE_ABORTED        */
2186             acornscsi_reconnect(host);
2187         else {
2188             printk(KERN_ERR "scsi%d.%c: PHASE_IDLE, SSR %02X while idle?\n",
2189                     host->host->host_no, acornscsi_target(host), ssr);
2190             acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2191         }
2192         return INTR_PROCESSING;
2193
2194     case PHASE_RECONNECTED:             /* STATE: device reconnected to initiator       */
2195         /*
2196          * Command reconnected - if MESGIN, get message - it may be
2197          * the tag.  If not, get command out of disconnected queue
2198          */
2199         /*
2200          * If we reconnected and we're not in MESSAGE IN phase after IDENTIFY,
2201          * reconnect I_T_L command
2202          */
2203         if (ssr != 0x8f && !acornscsi_reconnect_finish(host))
2204             return INTR_IDLE;
2205         ADD_STATUS(host->SCpnt->device->id, ssr, host->scsi.phase, in_irq);
2206         switch (ssr) {
2207         case 0x88:                      /* data out phase                               */
2208                                         /* -> PHASE_DATAOUT                             */
2209             /* MESSAGE IN -> DATA OUT */
2210             acornscsi_dma_setup(host, DMA_OUT);
2211             if (!acornscsi_starttransfer(host))
2212                 acornscsi_abortcmd(host, host->SCpnt->tag);
2213             host->scsi.phase = PHASE_DATAOUT;
2214             return INTR_IDLE;
2215
2216         case 0x89:                      /* data in phase                                */
2217                                         /* -> PHASE_DATAIN                              */
2218             /* MESSAGE IN -> DATA IN */
2219             acornscsi_dma_setup(host, DMA_IN);
2220             if (!acornscsi_starttransfer(host))
2221                 acornscsi_abortcmd(host, host->SCpnt->tag);
2222             host->scsi.phase = PHASE_DATAIN;
2223             return INTR_IDLE;
2224
2225         case 0x8a:                      /* command out                                  */
2226             /* MESSAGE IN -> COMMAND */
2227             acornscsi_sendcommand(host);/* -> PHASE_COMMAND, PHASE_COMMANDPAUSED        */
2228             break;
2229
2230         case 0x8b:                      /* status in                                    */
2231                                         /* -> PHASE_STATUSIN                            */
2232             /* MESSAGE IN -> STATUS */
2233             acornscsi_readstatusbyte(host);
2234             host->scsi.phase = PHASE_STATUSIN;
2235             break;
2236
2237         case 0x8e:                      /* message out                                  */
2238                                         /* -> PHASE_MSGOUT                              */
2239             /* MESSAGE IN -> MESSAGE OUT */
2240             acornscsi_sendmessage(host);
2241             break;
2242
2243         case 0x8f:                      /* message in                                   */
2244             acornscsi_message(host);    /* -> PHASE_MSGIN, PHASE_DISCONNECT             */
2245             break;
2246
2247         default:
2248             printk(KERN_ERR "scsi%d.%c: PHASE_RECONNECTED, SSR %02X after reconnect?\n",
2249                     host->host->host_no, acornscsi_target(host), ssr);
2250             acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2251         }
2252         return INTR_PROCESSING;
2253
2254     case PHASE_DATAIN:                  /* STATE: transferred data in                   */
2255         /*
2256          * This is simple - if we disconnect then the DMA address & count is
2257          * correct.
2258          */
2259         switch (ssr) {
2260         case 0x19:                      /* -> PHASE_DATAIN                              */
2261         case 0x89:                      /* -> PHASE_DATAIN                              */
2262             acornscsi_abortcmd(host, host->SCpnt->tag);
2263             return INTR_IDLE;
2264
2265         case 0x1b:                      /* -> PHASE_STATUSIN                            */
2266         case 0x4b:                      /* -> PHASE_STATUSIN                            */
2267         case 0x8b:                      /* -> PHASE_STATUSIN                            */
2268             /* DATA IN -> STATUS */
2269             host->scsi.SCp.scsi_xferred = scsi_bufflen(host->SCpnt) -
2270                                           acornscsi_sbic_xfcount(host);
2271             acornscsi_dma_stop(host);
2272             acornscsi_readstatusbyte(host);
2273             host->scsi.phase = PHASE_STATUSIN;
2274             break;
2275
2276         case 0x1e:                      /* -> PHASE_MSGOUT                              */
2277         case 0x4e:                      /* -> PHASE_MSGOUT                              */
2278         case 0x8e:                      /* -> PHASE_MSGOUT                              */
2279             /* DATA IN -> MESSAGE OUT */
2280             host->scsi.SCp.scsi_xferred = scsi_bufflen(host->SCpnt) -
2281                                           acornscsi_sbic_xfcount(host);
2282             acornscsi_dma_stop(host);
2283             acornscsi_sendmessage(host);
2284             break;
2285
2286         case 0x1f:                      /* message in                                   */
2287         case 0x4f:                      /* message in                                   */
2288         case 0x8f:                      /* message in                                   */
2289             /* DATA IN -> MESSAGE IN */
2290             host->scsi.SCp.scsi_xferred = scsi_bufflen(host->SCpnt) -
2291                                           acornscsi_sbic_xfcount(host);
2292             acornscsi_dma_stop(host);
2293             acornscsi_message(host);    /* -> PHASE_MSGIN, PHASE_DISCONNECT             */
2294             break;
2295
2296         default:
2297             printk(KERN_ERR "scsi%d.%c: PHASE_DATAIN, SSR %02X?\n",
2298                     host->host->host_no, acornscsi_target(host), ssr);
2299             acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2300         }
2301         return INTR_PROCESSING;
2302
2303     case PHASE_DATAOUT:                 /* STATE: transferred data out                  */
2304         /*
2305          * This is more complicated - if we disconnect, the DMA could be 12
2306          * bytes ahead of us.  We need to correct this.
2307          */
2308         switch (ssr) {
2309         case 0x18:                      /* -> PHASE_DATAOUT                             */
2310         case 0x88:                      /* -> PHASE_DATAOUT                             */
2311             acornscsi_abortcmd(host, host->SCpnt->tag);
2312             return INTR_IDLE;
2313
2314         case 0x1b:                      /* -> PHASE_STATUSIN                            */
2315         case 0x4b:                      /* -> PHASE_STATUSIN                            */
2316         case 0x8b:                      /* -> PHASE_STATUSIN                            */
2317             /* DATA OUT -> STATUS */
2318             host->scsi.SCp.scsi_xferred = scsi_bufflen(host->SCpnt) -
2319                                           acornscsi_sbic_xfcount(host);
2320             acornscsi_dma_stop(host);
2321             acornscsi_dma_adjust(host);
2322             acornscsi_readstatusbyte(host);
2323             host->scsi.phase = PHASE_STATUSIN;
2324             break;
2325
2326         case 0x1e:                      /* -> PHASE_MSGOUT                              */
2327         case 0x4e:                      /* -> PHASE_MSGOUT                              */
2328         case 0x8e:                      /* -> PHASE_MSGOUT                              */
2329             /* DATA OUT -> MESSAGE OUT */
2330             host->scsi.SCp.scsi_xferred = scsi_bufflen(host->SCpnt) -
2331                                           acornscsi_sbic_xfcount(host);
2332             acornscsi_dma_stop(host);
2333             acornscsi_dma_adjust(host);
2334             acornscsi_sendmessage(host);
2335             break;
2336
2337         case 0x1f:                      /* message in                                   */
2338         case 0x4f:                      /* message in                                   */
2339         case 0x8f:                      /* message in                                   */
2340             /* DATA OUT -> MESSAGE IN */
2341             host->scsi.SCp.scsi_xferred = scsi_bufflen(host->SCpnt) -
2342                                           acornscsi_sbic_xfcount(host);
2343             acornscsi_dma_stop(host);
2344             acornscsi_dma_adjust(host);
2345             acornscsi_message(host);    /* -> PHASE_MSGIN, PHASE_DISCONNECT             */
2346             break;
2347
2348         default:
2349             printk(KERN_ERR "scsi%d.%c: PHASE_DATAOUT, SSR %02X?\n",
2350                     host->host->host_no, acornscsi_target(host), ssr);
2351             acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2352         }
2353         return INTR_PROCESSING;
2354
2355     case PHASE_STATUSIN:                /* STATE: status in complete                    */
2356         switch (ssr) {
2357         case 0x1f:                      /* -> PHASE_MSGIN, PHASE_DONE, PHASE_DISCONNECT */
2358         case 0x8f:                      /* -> PHASE_MSGIN, PHASE_DONE, PHASE_DISCONNECT */
2359             /* STATUS -> MESSAGE IN */
2360             acornscsi_message(host);
2361             break;
2362
2363         case 0x1e:                      /* -> PHASE_MSGOUT                              */
2364         case 0x8e:                      /* -> PHASE_MSGOUT                              */
2365             /* STATUS -> MESSAGE OUT */
2366             acornscsi_sendmessage(host);
2367             break;
2368
2369         default:
2370             printk(KERN_ERR "scsi%d.%c: PHASE_STATUSIN, SSR %02X instead of MESSAGE_IN?\n",
2371                     host->host->host_no, acornscsi_target(host), ssr);
2372             acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2373         }
2374         return INTR_PROCESSING;
2375
2376     case PHASE_MSGIN:                   /* STATE: message in                            */
2377         switch (ssr) {
2378         case 0x1e:                      /* -> PHASE_MSGOUT                              */
2379         case 0x4e:                      /* -> PHASE_MSGOUT                              */
2380         case 0x8e:                      /* -> PHASE_MSGOUT                              */
2381             /* MESSAGE IN -> MESSAGE OUT */
2382             acornscsi_sendmessage(host);
2383             break;
2384
2385         case 0x1f:                      /* -> PHASE_MSGIN, PHASE_DONE, PHASE_DISCONNECT */
2386         case 0x2f:
2387         case 0x4f:
2388         case 0x8f:
2389             acornscsi_message(host);
2390             break;
2391
2392         case 0x85:
2393             printk("scsi%d.%c: strange message in disconnection\n",
2394                 host->host->host_no, acornscsi_target(host));
2395             acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2396             acornscsi_done(host, &host->SCpnt, DID_ERROR);
2397             break;
2398
2399         default:
2400             printk(KERN_ERR "scsi%d.%c: PHASE_MSGIN, SSR %02X after message in?\n",
2401                     host->host->host_no, acornscsi_target(host), ssr);
2402             acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2403         }
2404         return INTR_PROCESSING;
2405
2406     case PHASE_DONE:                    /* STATE: received status & message             */
2407         switch (ssr) {
2408         case 0x85:                      /* -> PHASE_IDLE                                */
2409             acornscsi_done(host, &host->SCpnt, DID_OK);
2410             return INTR_NEXT_COMMAND;
2411
2412         case 0x1e:
2413         case 0x8e:
2414             acornscsi_sendmessage(host);
2415             break;
2416
2417         default:
2418             printk(KERN_ERR "scsi%d.%c: PHASE_DONE, SSR %02X instead of disconnect?\n",
2419                     host->host->host_no, acornscsi_target(host), ssr);
2420             acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2421         }
2422         return INTR_PROCESSING;
2423
2424     case PHASE_ABORTED:
2425         switch (ssr) {
2426         case 0x85:
2427             if (host->SCpnt)
2428                 acornscsi_done(host, &host->SCpnt, DID_ABORT);
2429             else {
2430                 clear_bit(host->scsi.reconnected.target * 8 + host->scsi.reconnected.lun,
2431                           host->busyluns);
2432                 host->scsi.phase = PHASE_IDLE;
2433             }
2434             return INTR_NEXT_COMMAND;
2435
2436         case 0x1e:
2437         case 0x2e:
2438         case 0x4e:
2439         case 0x8e:
2440             acornscsi_sendmessage(host);
2441             break;
2442
2443         default:
2444             printk(KERN_ERR "scsi%d.%c: PHASE_ABORTED, SSR %02X?\n",
2445                     host->host->host_no, acornscsi_target(host), ssr);
2446             acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2447         }
2448         return INTR_PROCESSING;
2449
2450     default:
2451         printk(KERN_ERR "scsi%d.%c: unknown driver phase %d\n",
2452                 host->host->host_no, acornscsi_target(host), ssr);
2453         acornscsi_dumplog(host, host->SCpnt ? host->SCpnt->device->id : 8);
2454     }
2455     return INTR_PROCESSING;
2456 }
2457
2458 /*
2459  * Prototype: void acornscsi_intr(int irq, void *dev_id)
2460  * Purpose  : handle interrupts from Acorn SCSI card
2461  * Params   : irq    - interrupt number
2462  *            dev_id - device specific data (AS_Host structure)
2463  */
2464 static irqreturn_t
2465 acornscsi_intr(int irq, void *dev_id)
2466 {
2467     AS_Host *host = (AS_Host *)dev_id;
2468     intr_ret_t ret;
2469     int iostatus;
2470     int in_irq = 0;
2471
2472     do {
2473         ret = INTR_IDLE;
2474
2475         iostatus = readb(host->fast + INT_REG);
2476
2477         if (iostatus & 2) {
2478             acornscsi_dma_intr(host);
2479             iostatus = readb(host->fast + INT_REG);
2480         }
2481
2482         if (iostatus & 8)
2483             ret = acornscsi_sbicintr(host, in_irq);
2484
2485         /*
2486          * If we have a transfer pending, start it.
2487          * Only start it if the interface has already started transferring
2488          * it's data
2489          */
2490         if (host->dma.xfer_required)
2491             acornscsi_dma_xfer(host);
2492
2493         if (ret == INTR_NEXT_COMMAND)
2494             ret = acornscsi_kick(host);
2495
2496         in_irq = 1;
2497     } while (ret != INTR_IDLE);
2498
2499     return IRQ_HANDLED;
2500 }
2501
2502 /*=============================================================================================
2503  * Interfaces between interrupt handler and rest of scsi code
2504  */
2505
2506 /*
2507  * Function : acornscsi_queuecmd(struct scsi_cmnd *cmd, void (*done)(struct scsi_cmnd *))
2508  * Purpose  : queues a SCSI command
2509  * Params   : cmd  - SCSI command
2510  *            done - function called on completion, with pointer to command descriptor
2511  * Returns  : 0, or < 0 on error.
2512  */
2513 static int acornscsi_queuecmd_lck(struct scsi_cmnd *SCpnt,
2514                        void (*done)(struct scsi_cmnd *))
2515 {
2516     AS_Host *host = (AS_Host *)SCpnt->device->host->hostdata;
2517
2518     if (!done) {
2519         /* there should be some way of rejecting errors like this without panicing... */
2520         panic("scsi%d: queuecommand called with NULL done function [cmd=%p]",
2521                 host->host->host_no, SCpnt);
2522         return -EINVAL;
2523     }
2524
2525 #if (DEBUG & DEBUG_NO_WRITE)
2526     if (acornscsi_cmdtype(SCpnt->cmnd[0]) == CMD_WRITE && (NO_WRITE & (1 << SCpnt->device->id))) {
2527         printk(KERN_CRIT "scsi%d.%c: WRITE attempted with NO_WRITE flag set\n",
2528             host->host->host_no, '0' + SCpnt->device->id);
2529         SCpnt->result = DID_NO_CONNECT << 16;
2530         done(SCpnt);
2531         return 0;
2532     }
2533 #endif
2534
2535     SCpnt->scsi_done = done;
2536     SCpnt->host_scribble = NULL;
2537     SCpnt->result = 0;
2538     SCpnt->tag = 0;
2539     SCpnt->SCp.phase = (int)acornscsi_datadirection(SCpnt->cmnd[0]);
2540     SCpnt->SCp.sent_command = 0;
2541     SCpnt->SCp.scsi_xferred = 0;
2542
2543     init_SCp(SCpnt);
2544
2545     host->stats.queues += 1;
2546
2547     {
2548         unsigned long flags;
2549
2550         if (!queue_add_cmd_ordered(&host->queues.issue, SCpnt)) {
2551             SCpnt->result = DID_ERROR << 16;
2552             done(SCpnt);
2553             return 0;
2554         }
2555         local_irq_save(flags);
2556         if (host->scsi.phase == PHASE_IDLE)
2557             acornscsi_kick(host);
2558         local_irq_restore(flags);
2559     }
2560     return 0;
2561 }
2562
2563 DEF_SCSI_QCMD(acornscsi_queuecmd)
2564
2565 /*
2566  * Prototype: void acornscsi_reportstatus(struct scsi_cmnd **SCpntp1, struct scsi_cmnd **SCpntp2, int result)
2567  * Purpose  : pass a result to *SCpntp1, and check if *SCpntp1 = *SCpntp2
2568  * Params   : SCpntp1 - pointer to command to return
2569  *            SCpntp2 - pointer to command to check
2570  *            result  - result to pass back to mid-level done function
2571  * Returns  : *SCpntp2 = NULL if *SCpntp1 is the same command structure as *SCpntp2.
2572  */
2573 static inline void acornscsi_reportstatus(struct scsi_cmnd **SCpntp1,
2574                                           struct scsi_cmnd **SCpntp2,
2575                                           int result)
2576 {
2577         struct scsi_cmnd *SCpnt = *SCpntp1;
2578
2579     if (SCpnt) {
2580         *SCpntp1 = NULL;
2581
2582         SCpnt->result = result;
2583         SCpnt->scsi_done(SCpnt);
2584     }
2585
2586     if (SCpnt == *SCpntp2)
2587         *SCpntp2 = NULL;
2588 }
2589
2590 enum res_abort { res_not_running, res_success, res_success_clear, res_snooze };
2591
2592 /*
2593  * Prototype: enum res acornscsi_do_abort(struct scsi_cmnd *SCpnt)
2594  * Purpose  : abort a command on this host
2595  * Params   : SCpnt - command to abort
2596  * Returns  : our abort status
2597  */
2598 static enum res_abort acornscsi_do_abort(AS_Host *host, struct scsi_cmnd *SCpnt)
2599 {
2600         enum res_abort res = res_not_running;
2601
2602         if (queue_remove_cmd(&host->queues.issue, SCpnt)) {
2603                 /*
2604                  * The command was on the issue queue, and has not been
2605                  * issued yet.  We can remove the command from the queue,
2606                  * and acknowledge the abort.  Neither the devices nor the
2607                  * interface know about the command.
2608                  */
2609 //#if (DEBUG & DEBUG_ABORT)
2610                 printk("on issue queue ");
2611 //#endif
2612                 res = res_success;
2613         } else if (queue_remove_cmd(&host->queues.disconnected, SCpnt)) {
2614                 /*
2615                  * The command was on the disconnected queue.  Simply
2616                  * acknowledge the abort condition, and when the target
2617                  * reconnects, we will give it an ABORT message.  The
2618                  * target should then disconnect, and we will clear
2619                  * the busylun bit.
2620                  */
2621 //#if (DEBUG & DEBUG_ABORT)
2622                 printk("on disconnected queue ");
2623 //#endif
2624                 res = res_success;
2625         } else if (host->SCpnt == SCpnt) {
2626                 unsigned long flags;
2627
2628 //#if (DEBUG & DEBUG_ABORT)
2629                 printk("executing ");
2630 //#endif
2631
2632                 local_irq_save(flags);
2633                 switch (host->scsi.phase) {
2634                 /*
2635                  * If the interface is idle, and the command is 'disconnectable',
2636                  * then it is the same as on the disconnected queue.  We simply
2637                  * remove all traces of the command.  When the target reconnects,
2638                  * we will give it an ABORT message since the command could not
2639                  * be found.  When the target finally disconnects, we will clear
2640                  * the busylun bit.
2641                  */
2642                 case PHASE_IDLE:
2643                         if (host->scsi.disconnectable) {
2644                                 host->scsi.disconnectable = 0;
2645                                 host->SCpnt = NULL;
2646                                 res = res_success;
2647                         }
2648                         break;
2649
2650                 /*
2651                  * If the command has connected and done nothing further,
2652                  * simply force a disconnect.  We also need to clear the
2653                  * busylun bit.
2654                  */
2655                 case PHASE_CONNECTED:
2656                         sbic_arm_write(host, SBIC_CMND, CMND_DISCONNECT);
2657                         host->SCpnt = NULL;
2658                         res = res_success_clear;
2659                         break;
2660
2661                 default:
2662                         acornscsi_abortcmd(host, host->SCpnt->tag);
2663                         res = res_snooze;
2664                 }
2665                 local_irq_restore(flags);
2666         } else if (host->origSCpnt == SCpnt) {
2667                 /*
2668                  * The command will be executed next, but a command
2669                  * is currently using the interface.  This is similar to
2670                  * being on the issue queue, except the busylun bit has
2671                  * been set.
2672                  */
2673                 host->origSCpnt = NULL;
2674 //#if (DEBUG & DEBUG_ABORT)
2675                 printk("waiting for execution ");
2676 //#endif
2677                 res = res_success_clear;
2678         } else
2679                 printk("unknown ");
2680
2681         return res;
2682 }
2683
2684 /*
2685  * Prototype: int acornscsi_abort(struct scsi_cmnd *SCpnt)
2686  * Purpose  : abort a command on this host
2687  * Params   : SCpnt - command to abort
2688  * Returns  : one of SCSI_ABORT_ macros
2689  */
2690 int acornscsi_abort(struct scsi_cmnd *SCpnt)
2691 {
2692         AS_Host *host = (AS_Host *) SCpnt->device->host->hostdata;
2693         int result;
2694
2695         host->stats.aborts += 1;
2696
2697 #if (DEBUG & DEBUG_ABORT)
2698         {
2699                 int asr, ssr;
2700                 asr = sbic_arm_read(host, SBIC_ASR);
2701                 ssr = sbic_arm_read(host, SBIC_SSR);
2702
2703                 printk(KERN_WARNING "acornscsi_abort: ");
2704                 print_sbic_status(asr, ssr, host->scsi.phase);
2705                 acornscsi_dumplog(host, SCpnt->device->id);
2706         }
2707 #endif
2708
2709         printk("scsi%d: ", host->host->host_no);
2710
2711         switch (acornscsi_do_abort(host, SCpnt)) {
2712         /*
2713          * We managed to find the command and cleared it out.
2714          * We do not expect the command to be executing on the
2715          * target, but we have set the busylun bit.
2716          */
2717         case res_success_clear:
2718 //#if (DEBUG & DEBUG_ABORT)
2719                 printk("clear ");
2720 //#endif
2721                 clear_bit(SCpnt->device->id * 8 + SCpnt->device->lun, host->busyluns);
2722
2723         /*
2724          * We found the command, and cleared it out.  Either
2725          * the command is still known to be executing on the
2726          * target, or the busylun bit is not set.
2727          */
2728         case res_success:
2729 //#if (DEBUG & DEBUG_ABORT)
2730                 printk("success\n");
2731 //#endif
2732                 result = SUCCESS;
2733                 break;
2734
2735         /*
2736          * We did find the command, but unfortunately we couldn't
2737          * unhook it from ourselves.  Wait some more, and if it
2738          * still doesn't complete, reset the interface.
2739          */
2740         case res_snooze:
2741 //#if (DEBUG & DEBUG_ABORT)
2742                 printk("snooze\n");
2743 //#endif
2744                 result = FAILED;
2745                 break;
2746
2747         /*
2748          * The command could not be found (either because it completed,
2749          * or it got dropped.
2750          */
2751         default:
2752         case res_not_running:
2753                 acornscsi_dumplog(host, SCpnt->device->id);
2754                 result = FAILED;
2755 //#if (DEBUG & DEBUG_ABORT)
2756                 printk("not running\n");
2757 //#endif
2758                 break;
2759         }
2760
2761         return result;
2762 }
2763
2764 /*
2765  * Prototype: int acornscsi_reset(struct scsi_cmnd *SCpnt)
2766  * Purpose  : reset a command on this host/reset this host
2767  * Params   : SCpnt  - command causing reset
2768  * Returns  : one of SCSI_RESET_ macros
2769  */
2770 int acornscsi_bus_reset(struct scsi_cmnd *SCpnt)
2771 {
2772         AS_Host *host = (AS_Host *)SCpnt->device->host->hostdata;
2773         struct scsi_cmnd *SCptr;
2774
2775     host->stats.resets += 1;
2776
2777 #if (DEBUG & DEBUG_RESET)
2778     {
2779         int asr, ssr;
2780
2781         asr = sbic_arm_read(host, SBIC_ASR);
2782         ssr = sbic_arm_read(host, SBIC_SSR);
2783
2784         printk(KERN_WARNING "acornscsi_reset: ");
2785         print_sbic_status(asr, ssr, host->scsi.phase);
2786         acornscsi_dumplog(host, SCpnt->device->id);
2787     }
2788 #endif
2789
2790     acornscsi_dma_stop(host);
2791
2792     /*
2793      * do hard reset.  This resets all devices on this host, and so we
2794      * must set the reset status on all commands.
2795      */
2796     acornscsi_resetcard(host);
2797
2798     while ((SCptr = queue_remove(&host->queues.disconnected)) != NULL)
2799         ;
2800
2801     return SUCCESS;
2802 }
2803
2804 /*==============================================================================================
2805  * initialisation & miscellaneous support
2806  */
2807
2808 /*
2809  * Function: char *acornscsi_info(struct Scsi_Host *host)
2810  * Purpose : return a string describing this interface
2811  * Params  : host - host to give information on
2812  * Returns : a constant string
2813  */
2814 const
2815 char *acornscsi_info(struct Scsi_Host *host)
2816 {
2817     static char string[100], *p;
2818
2819     p = string;
2820
2821     p += sprintf(string, "%s at port %08lX irq %d v%d.%d.%d"
2822 #ifdef CONFIG_SCSI_ACORNSCSI_SYNC
2823     " SYNC"
2824 #endif
2825 #ifdef CONFIG_SCSI_ACORNSCSI_TAGGED_QUEUE
2826     " TAG"
2827 #endif
2828 #ifdef CONFIG_SCSI_ACORNSCSI_LINK
2829     " LINK"
2830 #endif
2831 #if (DEBUG & DEBUG_NO_WRITE)
2832     " NOWRITE (" __stringify(NO_WRITE) ")"
2833 #endif
2834                 , host->hostt->name, host->io_port, host->irq,
2835                 VER_MAJOR, VER_MINOR, VER_PATCH);
2836     return string;
2837 }
2838
2839 int acornscsi_proc_info(struct Scsi_Host *instance, char *buffer, char **start, off_t offset,
2840                         int length, int inout)
2841 {
2842     int pos, begin = 0, devidx;
2843     struct scsi_device *scd;
2844     AS_Host *host;
2845     char *p = buffer;
2846
2847     if (inout == 1)
2848         return -EINVAL;
2849
2850     host  = (AS_Host *)instance->hostdata;
2851
2852     p += sprintf(p, "AcornSCSI driver v%d.%d.%d"
2853 #ifdef CONFIG_SCSI_ACORNSCSI_SYNC
2854     " SYNC"
2855 #endif
2856 #ifdef CONFIG_SCSI_ACORNSCSI_TAGGED_QUEUE
2857     " TAG"
2858 #endif
2859 #ifdef CONFIG_SCSI_ACORNSCSI_LINK
2860     " LINK"
2861 #endif
2862 #if (DEBUG & DEBUG_NO_WRITE)
2863     " NOWRITE (" __stringify(NO_WRITE) ")"
2864 #endif
2865                 "\n\n", VER_MAJOR, VER_MINOR, VER_PATCH);
2866
2867     p += sprintf(p,     "SBIC: WD33C93A  Address: %p    IRQ : %d\n",
2868                         host->base + SBIC_REGIDX, host->scsi.irq);
2869 #ifdef USE_DMAC
2870     p += sprintf(p,     "DMAC: uPC71071  Address: %p  IRQ : %d\n\n",
2871                         host->base + DMAC_OFFSET, host->scsi.irq);
2872 #endif
2873
2874     p += sprintf(p,     "Statistics:\n"
2875                         "Queued commands: %-10u    Issued commands: %-10u\n"
2876                         "Done commands  : %-10u    Reads          : %-10u\n"
2877                         "Writes         : %-10u    Others         : %-10u\n"
2878                         "Disconnects    : %-10u    Aborts         : %-10u\n"
2879                         "Resets         : %-10u\n\nLast phases:",
2880                         host->stats.queues,             host->stats.removes,
2881                         host->stats.fins,               host->stats.reads,
2882                         host->stats.writes,             host->stats.miscs,
2883                         host->stats.disconnects,        host->stats.aborts,
2884                         host->stats.resets);
2885
2886     for (devidx = 0; devidx < 9; devidx ++) {
2887         unsigned int statptr, prev;
2888
2889         p += sprintf(p, "\n%c:", devidx == 8 ? 'H' : ('0' + devidx));
2890         statptr = host->status_ptr[devidx] - 10;
2891
2892         if ((signed int)statptr < 0)
2893             statptr += STATUS_BUFFER_SIZE;
2894
2895         prev = host->status[devidx][statptr].when;
2896
2897         for (; statptr != host->status_ptr[devidx]; statptr = (statptr + 1) & (STATUS_BUFFER_SIZE - 1)) {
2898             if (host->status[devidx][statptr].when) {
2899                 p += sprintf(p, "%c%02X:%02X+%2ld",
2900                         host->status[devidx][statptr].irq ? '-' : ' ',
2901                         host->status[devidx][statptr].ph,
2902                         host->status[devidx][statptr].ssr,
2903                         (host->status[devidx][statptr].when - prev) < 100 ?
2904                                 (host->status[devidx][statptr].when - prev) : 99);
2905                 prev = host->status[devidx][statptr].when;
2906             }
2907         }
2908     }
2909
2910     p += sprintf(p, "\nAttached devices:\n");
2911
2912     shost_for_each_device(scd, instance) {
2913         p += sprintf(p, "Device/Lun TaggedQ      Sync\n");
2914         p += sprintf(p, "     %d/%d   ", scd->id, scd->lun);
2915         if (scd->tagged_supported)
2916                 p += sprintf(p, "%3sabled(%3d) ",
2917                              scd->simple_tags ? "en" : "dis",
2918                              scd->current_tag);
2919         else
2920                 p += sprintf(p, "unsupported  ");
2921
2922         if (host->device[scd->id].sync_xfer & 15)
2923                 p += sprintf(p, "offset %d, %d ns\n",
2924                              host->device[scd->id].sync_xfer & 15,
2925                              acornscsi_getperiod(host->device[scd->id].sync_xfer));
2926         else
2927                 p += sprintf(p, "async\n");
2928
2929         pos = p - buffer;
2930         if (pos + begin < offset) {
2931             begin += pos;
2932             p = buffer;
2933         }
2934         pos = p - buffer;
2935         if (pos + begin > offset + length) {
2936             scsi_device_put(scd);
2937             break;
2938         }
2939     }
2940
2941     pos = p - buffer;
2942
2943     *start = buffer + (offset - begin);
2944     pos -= offset - begin;
2945
2946     if (pos > length)
2947         pos = length;
2948
2949     return pos;
2950 }
2951
2952 static struct scsi_host_template acornscsi_template = {
2953         .module                 = THIS_MODULE,
2954         .proc_info              = acornscsi_proc_info,
2955         .name                   = "AcornSCSI",
2956         .info                   = acornscsi_info,
2957         .queuecommand           = acornscsi_queuecmd,
2958         .eh_abort_handler       = acornscsi_abort,
2959         .eh_bus_reset_handler   = acornscsi_bus_reset,
2960         .can_queue              = 16,
2961         .this_id                = 7,
2962         .sg_tablesize           = SG_ALL,
2963         .cmd_per_lun            = 2,
2964         .use_clustering         = DISABLE_CLUSTERING,
2965         .proc_name              = "acornscsi",
2966 };
2967
2968 static int __devinit
2969 acornscsi_probe(struct expansion_card *ec, const struct ecard_id *id)
2970 {
2971         struct Scsi_Host *host;
2972         AS_Host *ashost;
2973         int ret;
2974
2975         ret = ecard_request_resources(ec);
2976         if (ret)
2977                 goto out;
2978
2979         host = scsi_host_alloc(&acornscsi_template, sizeof(AS_Host));
2980         if (!host) {
2981                 ret = -ENOMEM;
2982                 goto out_release;
2983         }
2984
2985         ashost = (AS_Host *)host->hostdata;
2986
2987         ashost->base = ecardm_iomap(ec, ECARD_RES_MEMC, 0, 0);
2988         ashost->fast = ecardm_iomap(ec, ECARD_RES_IOCFAST, 0, 0);
2989         if (!ashost->base || !ashost->fast)
2990                 goto out_put;
2991
2992         host->irq = ec->irq;
2993         ashost->host = host;
2994         ashost->scsi.irq = host->irq;
2995
2996         ec->irqaddr     = ashost->fast + INT_REG;
2997         ec->irqmask     = 0x0a;
2998
2999         ret = request_irq(host->irq, acornscsi_intr, IRQF_DISABLED, "acornscsi", ashost);
3000         if (ret) {
3001                 printk(KERN_CRIT "scsi%d: IRQ%d not free: %d\n",
3002                         host->host_no, ashost->scsi.irq, ret);
3003                 goto out_put;
3004         }
3005
3006         memset(&ashost->stats, 0, sizeof (ashost->stats));
3007         queue_initialise(&ashost->queues.issue);
3008         queue_initialise(&ashost->queues.disconnected);
3009         msgqueue_initialise(&ashost->scsi.msgs);
3010
3011         acornscsi_resetcard(ashost);
3012
3013         ret = scsi_add_host(host, &ec->dev);
3014         if (ret)
3015                 goto out_irq;
3016
3017         scsi_scan_host(host);
3018         goto out;
3019
3020  out_irq:
3021         free_irq(host->irq, ashost);
3022         msgqueue_free(&ashost->scsi.msgs);
3023         queue_free(&ashost->queues.disconnected);
3024         queue_free(&ashost->queues.issue);
3025  out_put:
3026         ecardm_iounmap(ec, ashost->fast);
3027         ecardm_iounmap(ec, ashost->base);
3028         scsi_host_put(host);
3029  out_release:
3030         ecard_release_resources(ec);
3031  out:
3032         return ret;
3033 }
3034
3035 static void __devexit acornscsi_remove(struct expansion_card *ec)
3036 {
3037         struct Scsi_Host *host = ecard_get_drvdata(ec);
3038         AS_Host *ashost = (AS_Host *)host->hostdata;
3039
3040         ecard_set_drvdata(ec, NULL);
3041         scsi_remove_host(host);
3042
3043         /*
3044          * Put card into RESET state
3045          */
3046         writeb(0x80, ashost->fast + PAGE_REG);
3047
3048         free_irq(host->irq, ashost);
3049
3050         msgqueue_free(&ashost->scsi.msgs);
3051         queue_free(&ashost->queues.disconnected);
3052         queue_free(&ashost->queues.issue);
3053         ecardm_iounmap(ec, ashost->fast);
3054         ecardm_iounmap(ec, ashost->base);
3055         scsi_host_put(host);
3056         ecard_release_resources(ec);
3057 }
3058
3059 static const struct ecard_id acornscsi_cids[] = {
3060         { MANU_ACORN, PROD_ACORN_SCSI },
3061         { 0xffff, 0xffff },
3062 };
3063
3064 static struct ecard_driver acornscsi_driver = {
3065         .probe          = acornscsi_probe,
3066         .remove         = __devexit_p(acornscsi_remove),
3067         .id_table       = acornscsi_cids,
3068         .drv = {
3069                 .name           = "acornscsi",
3070         },
3071 };
3072
3073 static int __init acornscsi_init(void)
3074 {
3075         return ecard_register_driver(&acornscsi_driver);
3076 }
3077
3078 static void __exit acornscsi_exit(void)
3079 {
3080         ecard_remove_driver(&acornscsi_driver);
3081 }
3082
3083 module_init(acornscsi_init);
3084 module_exit(acornscsi_exit);
3085
3086 MODULE_AUTHOR("Russell King");
3087 MODULE_DESCRIPTION("AcornSCSI driver");
3088 MODULE_LICENSE("GPL");