root/drivers/scsi/arm/acornscsi.c

/* [<][>][^][v][top][bottom][index][help] */

DEFINITIONS

This source file includes following definitions.
  1. sbic_arm_write
  2. sbic_arm_read
  3. dmac_address
  4. acornscsi_dumpdma
  5. acornscsi_sbic_xfcount
  6. acornscsi_sbic_wait
  7. acornscsi_sbic_issuecmd
  8. acornscsi_csdelay
  9. acornscsi_resetcard
  10. print_scsi_status
  11. print_sbic_status
  12. acornscsi_dumplogline
  13. acornscsi_dumplog
  14. acornscsi_target
  15. acornscsi_cmdtype
  16. acornscsi_datadirection
  17. acornscsi_getperiod
  18. round_period
  19. calc_sync_xfer
  20. acornscsi_kick
  21. acornscsi_done
  22. acornscsi_data_updateptr
  23. acornscsi_data_read
  24. acornscsi_data_write
  25. acornscsi_dma_stop
  26. acornscsi_dma_setup
  27. acornscsi_dma_cleanup
  28. acornscsi_dma_intr
  29. acornscsi_dma_xfer
  30. acornscsi_dma_adjust
  31. acornscsi_write_pio
  32. acornscsi_sendcommand
  33. acornscsi_sendmessage
  34. acornscsi_readstatusbyte
  35. acornscsi_readmessagebyte
  36. acornscsi_message
  37. acornscsi_buildmessages
  38. acornscsi_starttransfer
  39. acornscsi_reconnect
  40. acornscsi_reconnect_finish
  41. acornscsi_disconnect_unexpected
  42. acornscsi_abortcmd
  43. acornscsi_sbicintr
  44. acornscsi_intr
  45. acornscsi_queuecmd_lck
  46. DEF_SCSI_QCMD
  47. acornscsi_do_abort
  48. acornscsi_abort
  49. acornscsi_host_reset
  50. acornscsi_info
  51. acornscsi_show_info
  52. acornscsi_probe
  53. acornscsi_remove
  54. acornscsi_init
  55. acornscsi_exit

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

/* [<][>][^][v][top][bottom][index][help] */