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