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