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