1 /*- 2 * Generic register and struct definitions for the Adaptech 154x 3 * SCSI host adapters. Product specific probe and attach routines can 4 * be found in: 5 * aha 1542A/1542B/1542C/1542CF/1542CP aha_isa.c 6 */ 7 /*- 8 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD 9 * 10 * Copyright (c) 1998 M. Warner Losh. 11 * All Rights Reserved. 12 * 13 * Redistribution and use in source and binary forms, with or without 14 * modification, are permitted provided that the following conditions 15 * are met: 16 * 1. Redistributions of source code must retain the above copyright 17 * notice, this list of conditions and the following disclaimer. 18 * 2. Redistributions in binary form must reproduce the above copyright 19 * notice, this list of conditions and the following disclaimer in the 20 * documentation and/or other materials provided with the distribution. 21 * 22 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 25 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 32 * SUCH DAMAGE. 33 * 34 * Derived from bt.c written by: 35 * 36 * Copyright (c) 1998 Justin T. Gibbs. 37 * All rights reserved. 38 * 39 * Redistribution and use in source and binary forms, with or without 40 * modification, are permitted provided that the following conditions 41 * are met: 42 * 1. Redistributions of source code must retain the above copyright 43 * notice, this list of conditions, and the following disclaimer, 44 * without modification, immediately at the beginning of the file. 45 * 2. The name of the author may not be used to endorse or promote products 46 * derived from this software without specific prior written permission. 47 * 48 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 49 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 50 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 51 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR 52 * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 53 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 54 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 55 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 56 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 57 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 58 * SUCH DAMAGE. 59 */ 60 61 #include <sys/cdefs.h> 62 __FBSDID("$FreeBSD$"); 63 64 #include <sys/param.h> 65 #include <sys/conf.h> 66 #include <sys/bus.h> 67 #include <sys/systm.h> 68 #include <sys/malloc.h> 69 #include <sys/kernel.h> 70 #include <sys/lock.h> 71 #include <sys/module.h> 72 #include <sys/mutex.h> 73 #include <sys/rman.h> 74 75 #include <machine/bus.h> 76 77 #include <cam/cam.h> 78 #include <cam/cam_ccb.h> 79 #include <cam/cam_sim.h> 80 #include <cam/cam_xpt_sim.h> 81 #include <cam/cam_debug.h> 82 83 #include <cam/scsi/scsi_message.h> 84 85 #include <dev/aha/ahareg.h> 86 87 #define PRVERB(x) do { if (bootverbose) device_printf x; } while (0) 88 89 /* Macro to determine that a rev is potentially a new valid one 90 * so that the driver doesn't keep breaking on new revs as it 91 * did for the CF and CP. 92 */ 93 #define PROBABLY_NEW_BOARD(REV) (REV > 0x43 && REV < 0x56) 94 95 /* MailBox Management functions */ 96 static __inline void ahanextinbox(struct aha_softc *aha); 97 static __inline void ahanextoutbox(struct aha_softc *aha); 98 99 #define aha_name(aha) device_get_nameunit(aha->dev) 100 101 static __inline void 102 ahanextinbox(struct aha_softc *aha) 103 { 104 if (aha->cur_inbox == aha->last_inbox) 105 aha->cur_inbox = aha->in_boxes; 106 else 107 aha->cur_inbox++; 108 } 109 110 static __inline void 111 ahanextoutbox(struct aha_softc *aha) 112 { 113 if (aha->cur_outbox == aha->last_outbox) 114 aha->cur_outbox = aha->out_boxes; 115 else 116 aha->cur_outbox++; 117 } 118 119 #define ahautoa24(u,s3) \ 120 (s3)[0] = ((u) >> 16) & 0xff; \ 121 (s3)[1] = ((u) >> 8) & 0xff; \ 122 (s3)[2] = (u) & 0xff; 123 124 #define aha_a24tou(s3) \ 125 (((s3)[0] << 16) | ((s3)[1] << 8) | (s3)[2]) 126 127 /* CCB Management functions */ 128 static __inline uint32_t ahaccbvtop(struct aha_softc *aha, 129 struct aha_ccb *accb); 130 static __inline struct aha_ccb* ahaccbptov(struct aha_softc *aha, 131 uint32_t ccb_addr); 132 133 static __inline uint32_t 134 ahaccbvtop(struct aha_softc *aha, struct aha_ccb *accb) 135 { 136 return (aha->aha_ccb_physbase 137 + (uint32_t)((caddr_t)accb - (caddr_t)aha->aha_ccb_array)); 138 } 139 static __inline struct aha_ccb * 140 ahaccbptov(struct aha_softc *aha, uint32_t ccb_addr) 141 { 142 return (aha->aha_ccb_array + 143 + ((struct aha_ccb*)(uintptr_t)ccb_addr - 144 (struct aha_ccb*)(uintptr_t)aha->aha_ccb_physbase)); 145 } 146 147 static struct aha_ccb* ahagetccb(struct aha_softc *aha); 148 static __inline void ahafreeccb(struct aha_softc *aha, struct aha_ccb *accb); 149 static void ahaallocccbs(struct aha_softc *aha); 150 static bus_dmamap_callback_t ahaexecuteccb; 151 static void ahadone(struct aha_softc *aha, struct aha_ccb *accb, 152 aha_mbi_comp_code_t comp_code); 153 static void aha_intr_locked(struct aha_softc *aha); 154 155 /* Host adapter command functions */ 156 static int ahareset(struct aha_softc* aha, int hard_reset); 157 158 /* Initialization functions */ 159 static int ahainitmboxes(struct aha_softc *aha); 160 static bus_dmamap_callback_t ahamapmboxes; 161 static bus_dmamap_callback_t ahamapccbs; 162 static bus_dmamap_callback_t ahamapsgs; 163 164 /* Transfer Negotiation Functions */ 165 static void ahafetchtransinfo(struct aha_softc *aha, 166 struct ccb_trans_settings *cts); 167 168 /* CAM SIM entry points */ 169 #define ccb_accb_ptr spriv_ptr0 170 #define ccb_aha_ptr spriv_ptr1 171 static void ahaaction(struct cam_sim *sim, union ccb *ccb); 172 static void ahapoll(struct cam_sim *sim); 173 174 /* Our timeout handler */ 175 static void ahatimeout(void *arg); 176 177 /* Exported functions */ 178 void 179 aha_alloc(struct aha_softc *aha) 180 { 181 182 SLIST_INIT(&aha->free_aha_ccbs); 183 LIST_INIT(&aha->pending_ccbs); 184 SLIST_INIT(&aha->sg_maps); 185 aha->ccb_sg_opcode = INITIATOR_SG_CCB_WRESID; 186 aha->ccb_ccb_opcode = INITIATOR_CCB_WRESID; 187 mtx_init(&aha->lock, "aha", NULL, MTX_DEF); 188 } 189 190 void 191 aha_free(struct aha_softc *aha) 192 { 193 switch (aha->init_level) { 194 default: 195 case 8: 196 { 197 struct sg_map_node *sg_map; 198 199 while ((sg_map = SLIST_FIRST(&aha->sg_maps))!= NULL) { 200 SLIST_REMOVE_HEAD(&aha->sg_maps, links); 201 bus_dmamap_unload(aha->sg_dmat, sg_map->sg_dmamap); 202 bus_dmamem_free(aha->sg_dmat, sg_map->sg_vaddr, 203 sg_map->sg_dmamap); 204 free(sg_map, M_DEVBUF); 205 } 206 bus_dma_tag_destroy(aha->sg_dmat); 207 } 208 case 7: 209 bus_dmamap_unload(aha->ccb_dmat, aha->ccb_dmamap); 210 case 6: 211 bus_dmamem_free(aha->ccb_dmat, aha->aha_ccb_array, 212 aha->ccb_dmamap); 213 case 5: 214 bus_dma_tag_destroy(aha->ccb_dmat); 215 case 4: 216 bus_dmamap_unload(aha->mailbox_dmat, aha->mailbox_dmamap); 217 case 3: 218 bus_dmamem_free(aha->mailbox_dmat, aha->in_boxes, 219 aha->mailbox_dmamap); 220 case 2: 221 bus_dma_tag_destroy(aha->buffer_dmat); 222 case 1: 223 bus_dma_tag_destroy(aha->mailbox_dmat); 224 case 0: 225 break; 226 } 227 mtx_destroy(&aha->lock); 228 } 229 230 /* 231 * Probe the adapter and verify that the card is an Adaptec. 232 */ 233 int 234 aha_probe(struct aha_softc* aha) 235 { 236 u_int status; 237 u_int intstat; 238 int error; 239 board_id_data_t board_id; 240 241 /* 242 * See if the three I/O ports look reasonable. 243 * Touch the minimal number of registers in the 244 * failure case. 245 */ 246 status = aha_inb(aha, STATUS_REG); 247 if ((status == 0) || 248 (status & (DIAG_ACTIVE|CMD_REG_BUSY | STATUS_REG_RSVD)) != 0) { 249 PRVERB((aha->dev, "status reg test failed %x\n", status)); 250 return (ENXIO); 251 } 252 253 intstat = aha_inb(aha, INTSTAT_REG); 254 if ((intstat & INTSTAT_REG_RSVD) != 0) { 255 PRVERB((aha->dev, "Failed Intstat Reg Test\n")); 256 return (ENXIO); 257 } 258 259 /* 260 * Looking good so far. Final test is to reset the 261 * adapter and fetch the board ID and ensure we aren't 262 * looking at a BusLogic. 263 */ 264 if ((error = ahareset(aha, /*hard_reset*/TRUE)) != 0) { 265 PRVERB((aha->dev, "Failed Reset\n")); 266 return (ENXIO); 267 } 268 269 /* 270 * Get the board ID. We use this to see if we're dealing with 271 * a buslogic card or an aha card (or clone). 272 */ 273 error = aha_cmd(aha, AOP_INQUIRE_BOARD_ID, NULL, /*parmlen*/0, 274 (uint8_t*)&board_id, sizeof(board_id), DEFAULT_CMD_TIMEOUT); 275 if (error != 0) { 276 PRVERB((aha->dev, "INQUIRE failed %x\n", error)); 277 return (ENXIO); 278 } 279 aha->fw_major = board_id.firmware_rev_major; 280 aha->fw_minor = board_id.firmware_rev_minor; 281 aha->boardid = board_id.board_type; 282 283 /* 284 * The Buslogic cards have an id of either 0x41 or 0x42. So 285 * if those come up in the probe, we test the geometry register 286 * of the board. Adaptec boards that are this old will not have 287 * this register, and return 0xff, while buslogic cards will return 288 * something different. 289 * 290 * It appears that for reasons unknow, for the for the 291 * aha-1542B cards, we need to wait a little bit before trying 292 * to read the geometry register. I picked 10ms since we have 293 * reports that a for loop to 1000 did the trick, and this 294 * errs on the side of conservatism. Besides, no one will 295 * notice a 10mS delay here, even the 1542B card users :-) 296 * 297 * Some compatible cards return 0 here. Some cards also 298 * seem to return 0x7f. 299 * 300 * XXX I'm not sure how this will impact other cloned cards 301 * 302 * This really should be replaced with the esetup command, since 303 * that appears to be more reliable. This becomes more and more 304 * true over time as we discover more cards that don't read the 305 * geometry register consistently. 306 */ 307 if (aha->boardid <= 0x42) { 308 /* Wait 10ms before reading */ 309 DELAY(10000); 310 status = aha_inb(aha, GEOMETRY_REG); 311 if (status != 0xff && status != 0x00 && status != 0x7f) { 312 PRVERB((aha->dev, "Geometry Register test failed %#x\n", 313 status)); 314 return (ENXIO); 315 } 316 } 317 318 return (0); 319 } 320 321 /* 322 * Pull the boards setup information and record it in our softc. 323 */ 324 int 325 aha_fetch_adapter_info(struct aha_softc *aha) 326 { 327 setup_data_t setup_info; 328 config_data_t config_data; 329 uint8_t length_param; 330 int error; 331 struct aha_extbios extbios; 332 333 switch (aha->boardid) { 334 case BOARD_1540_16HEAD_BIOS: 335 snprintf(aha->model, sizeof(aha->model), "1540 16 head BIOS"); 336 break; 337 case BOARD_1540_64HEAD_BIOS: 338 snprintf(aha->model, sizeof(aha->model), "1540 64 head BIOS"); 339 break; 340 case BOARD_1542: 341 snprintf(aha->model, sizeof(aha->model), "1540/1542 64 head BIOS"); 342 break; 343 case BOARD_1542C: 344 snprintf(aha->model, sizeof(aha->model), "1542C"); 345 break; 346 case BOARD_1542CF: 347 snprintf(aha->model, sizeof(aha->model), "1542CF"); 348 break; 349 case BOARD_1542CP: 350 snprintf(aha->model, sizeof(aha->model), "1542CP"); 351 break; 352 default: 353 snprintf(aha->model, sizeof(aha->model), "Unknown"); 354 break; 355 } 356 /* 357 * If we are a new type of 1542 board (anything newer than a 1542C) 358 * then disable the extended bios so that the 359 * mailbox interface is unlocked. 360 * This is also true for the 1542B Version 3.20. First Adaptec 361 * board that supports >1Gb drives. 362 * No need to check the extended bios flags as some of the 363 * extensions that cause us problems are not flagged in that byte. 364 */ 365 if (PROBABLY_NEW_BOARD(aha->boardid) || 366 (aha->boardid == 0x41 367 && aha->fw_major == 0x31 && 368 aha->fw_minor >= 0x34)) { 369 error = aha_cmd(aha, AOP_RETURN_EXT_BIOS_INFO, NULL, 370 /*paramlen*/0, (u_char *)&extbios, sizeof(extbios), 371 DEFAULT_CMD_TIMEOUT); 372 if (error != 0) { 373 device_printf(aha->dev, 374 "AOP_RETURN_EXT_BIOS_INFO - Failed."); 375 return (error); 376 } 377 error = aha_cmd(aha, AOP_MBOX_IF_ENABLE, (uint8_t *)&extbios, 378 /*paramlen*/2, NULL, 0, DEFAULT_CMD_TIMEOUT); 379 if (error != 0) { 380 device_printf(aha->dev, "AOP_MBOX_IF_ENABLE - Failed."); 381 return (error); 382 } 383 } 384 if (aha->boardid < 0x41) 385 device_printf(aha->dev, "Warning: aha-1542A won't work.\n"); 386 387 aha->max_sg = 17; /* Need >= 17 to do 64k I/O */ 388 aha->diff_bus = 0; 389 aha->extended_lun = 0; 390 aha->extended_trans = 0; 391 aha->max_ccbs = 16; 392 /* Determine Sync/Wide/Disc settings */ 393 length_param = sizeof(setup_info); 394 error = aha_cmd(aha, AOP_INQUIRE_SETUP_INFO, &length_param, 395 /*paramlen*/1, (uint8_t*)&setup_info, sizeof(setup_info), 396 DEFAULT_CMD_TIMEOUT); 397 if (error != 0) { 398 device_printf(aha->dev, "aha_fetch_adapter_info - Failed " 399 "Get Setup Info\n"); 400 return (error); 401 } 402 if (setup_info.initiate_sync != 0) { 403 aha->sync_permitted = ALL_TARGETS; 404 } 405 aha->disc_permitted = ALL_TARGETS; 406 407 /* We need as many mailboxes as we can have ccbs */ 408 aha->num_boxes = aha->max_ccbs; 409 410 /* Determine our SCSI ID */ 411 error = aha_cmd(aha, AOP_INQUIRE_CONFIG, NULL, /*parmlen*/0, 412 (uint8_t*)&config_data, sizeof(config_data), DEFAULT_CMD_TIMEOUT); 413 if (error != 0) { 414 device_printf(aha->dev, 415 "aha_fetch_adapter_info - Failed Get Config\n"); 416 return (error); 417 } 418 aha->scsi_id = config_data.scsi_id; 419 return (0); 420 } 421 422 /* 423 * Start the board, ready for normal operation 424 */ 425 int 426 aha_init(struct aha_softc* aha) 427 { 428 /* Announce the Adapter */ 429 device_printf(aha->dev, "AHA-%s FW Rev. %c.%c (ID=%x) ", 430 aha->model, aha->fw_major, aha->fw_minor, aha->boardid); 431 432 if (aha->diff_bus != 0) 433 printf("Diff "); 434 435 printf("SCSI Host Adapter, SCSI ID %d, %d CCBs\n", aha->scsi_id, 436 aha->max_ccbs); 437 438 /* 439 * Create our DMA tags. These tags define the kinds of device 440 * accessible memory allocations and memory mappings we will 441 * need to perform during normal operation. 442 * 443 * Unless we need to further restrict the allocation, we rely 444 * on the restrictions of the parent dmat, hence the common 445 * use of MAXADDR and MAXSIZE. 446 */ 447 448 /* DMA tag for mapping buffers into device visible space. */ 449 if (bus_dma_tag_create( /* parent */ aha->parent_dmat, 450 /* alignment */ 1, 451 /* boundary */ 0, 452 /* lowaddr */ BUS_SPACE_MAXADDR, 453 /* highaddr */ BUS_SPACE_MAXADDR, 454 /* filter */ NULL, 455 /* filterarg */ NULL, 456 /* maxsize */ DFLTPHYS, 457 /* nsegments */ AHA_NSEG, 458 /* maxsegsz */ BUS_SPACE_MAXSIZE_24BIT, 459 /* flags */ BUS_DMA_ALLOCNOW, 460 /* lockfunc */ busdma_lock_mutex, 461 /* lockarg */ &aha->lock, 462 &aha->buffer_dmat) != 0) { 463 goto error_exit; 464 } 465 466 aha->init_level++; 467 /* DMA tag for our mailboxes */ 468 if (bus_dma_tag_create( /* parent */ aha->parent_dmat, 469 /* alignment */ 1, 470 /* boundary */ 0, 471 /* lowaddr */ BUS_SPACE_MAXADDR, 472 /* highaddr */ BUS_SPACE_MAXADDR, 473 /* filter */ NULL, 474 /* filterarg */ NULL, 475 /* maxsize */ aha->num_boxes * 476 (sizeof(aha_mbox_in_t) + 477 sizeof(aha_mbox_out_t)), 478 /* nsegments */ 1, 479 /* maxsegsz */ BUS_SPACE_MAXSIZE_24BIT, 480 /* flags */ 0, 481 /* lockfunc */ NULL, 482 /* lockarg */ NULL, 483 &aha->mailbox_dmat) != 0) { 484 goto error_exit; 485 } 486 487 aha->init_level++; 488 489 /* Allocation for our mailboxes */ 490 if (bus_dmamem_alloc(aha->mailbox_dmat, (void **)&aha->out_boxes, 491 BUS_DMA_NOWAIT, &aha->mailbox_dmamap) != 0) 492 goto error_exit; 493 494 aha->init_level++; 495 496 /* And permanently map them */ 497 bus_dmamap_load(aha->mailbox_dmat, aha->mailbox_dmamap, 498 aha->out_boxes, aha->num_boxes * (sizeof(aha_mbox_in_t) + 499 sizeof(aha_mbox_out_t)), ahamapmboxes, aha, /*flags*/0); 500 501 aha->init_level++; 502 503 aha->in_boxes = (aha_mbox_in_t *)&aha->out_boxes[aha->num_boxes]; 504 505 ahainitmboxes(aha); 506 507 /* DMA tag for our ccb structures */ 508 if (bus_dma_tag_create( /* parent */ aha->parent_dmat, 509 /* alignment */ 1, 510 /* boundary */ 0, 511 /* lowaddr */ BUS_SPACE_MAXADDR, 512 /* highaddr */ BUS_SPACE_MAXADDR, 513 /* filter */ NULL, 514 /* filterarg */ NULL, 515 /* maxsize */ aha->max_ccbs * 516 sizeof(struct aha_ccb), 517 /* nsegments */ 1, 518 /* maxsegsz */ BUS_SPACE_MAXSIZE_24BIT, 519 /* flags */ 0, 520 /* lockfunc */ NULL, 521 /* lockarg */ NULL, 522 &aha->ccb_dmat) != 0) { 523 goto error_exit; 524 } 525 526 aha->init_level++; 527 528 /* Allocation for our ccbs */ 529 if (bus_dmamem_alloc(aha->ccb_dmat, (void **)&aha->aha_ccb_array, 530 BUS_DMA_NOWAIT, &aha->ccb_dmamap) != 0) 531 goto error_exit; 532 533 aha->init_level++; 534 535 /* And permanently map them */ 536 bus_dmamap_load(aha->ccb_dmat, aha->ccb_dmamap, aha->aha_ccb_array, 537 aha->max_ccbs * sizeof(struct aha_ccb), ahamapccbs, aha, /*flags*/0); 538 539 aha->init_level++; 540 541 /* DMA tag for our S/G structures. We allocate in page sized chunks */ 542 if (bus_dma_tag_create( /* parent */ aha->parent_dmat, 543 /* alignment */ 1, 544 /* boundary */ 0, 545 /* lowaddr */ BUS_SPACE_MAXADDR, 546 /* highaddr */ BUS_SPACE_MAXADDR, 547 /* filter */ NULL, 548 /* filterarg */ NULL, 549 /* maxsize */ PAGE_SIZE, 550 /* nsegments */ 1, 551 /* maxsegsz */ BUS_SPACE_MAXSIZE_24BIT, 552 /* flags */ 0, 553 /* lockfunc */ NULL, 554 /* lockarg */ NULL, 555 &aha->sg_dmat) != 0) 556 goto error_exit; 557 558 aha->init_level++; 559 560 /* Perform initial CCB allocation */ 561 bzero(aha->aha_ccb_array, aha->max_ccbs * sizeof(struct aha_ccb)); 562 ahaallocccbs(aha); 563 564 if (aha->num_ccbs == 0) { 565 device_printf(aha->dev, 566 "aha_init - Unable to allocate initial ccbs\n"); 567 goto error_exit; 568 } 569 570 /* 571 * Note that we are going and return (to probe) 572 */ 573 return (0); 574 575 error_exit: 576 577 return (ENXIO); 578 } 579 580 int 581 aha_attach(struct aha_softc *aha) 582 { 583 int tagged_dev_openings; 584 struct cam_devq *devq; 585 586 /* 587 * We don't do tagged queueing, since the aha cards don't 588 * support it. 589 */ 590 tagged_dev_openings = 0; 591 592 /* 593 * Create the device queue for our SIM. 594 */ 595 devq = cam_simq_alloc(aha->max_ccbs - 1); 596 if (devq == NULL) 597 return (ENOMEM); 598 599 /* 600 * Construct our SIM entry 601 */ 602 aha->sim = cam_sim_alloc(ahaaction, ahapoll, "aha", aha, 603 device_get_unit(aha->dev), &aha->lock, 2, tagged_dev_openings, 604 devq); 605 if (aha->sim == NULL) { 606 cam_simq_free(devq); 607 return (ENOMEM); 608 } 609 mtx_lock(&aha->lock); 610 if (xpt_bus_register(aha->sim, aha->dev, 0) != CAM_SUCCESS) { 611 cam_sim_free(aha->sim, /*free_devq*/TRUE); 612 mtx_unlock(&aha->lock); 613 return (ENXIO); 614 } 615 if (xpt_create_path(&aha->path, /*periph*/NULL, cam_sim_path(aha->sim), 616 CAM_TARGET_WILDCARD, CAM_LUN_WILDCARD) != CAM_REQ_CMP) { 617 xpt_bus_deregister(cam_sim_path(aha->sim)); 618 cam_sim_free(aha->sim, /*free_devq*/TRUE); 619 mtx_unlock(&aha->lock); 620 return (ENXIO); 621 } 622 mtx_unlock(&aha->lock); 623 gone_in_dev(aha->dev, 12, "aha(4) driver"); 624 625 return (0); 626 } 627 628 static void 629 ahaallocccbs(struct aha_softc *aha) 630 { 631 struct aha_ccb *next_ccb; 632 struct sg_map_node *sg_map; 633 bus_addr_t physaddr; 634 aha_sg_t *segs; 635 int newcount; 636 int i; 637 638 next_ccb = &aha->aha_ccb_array[aha->num_ccbs]; 639 640 sg_map = malloc(sizeof(*sg_map), M_DEVBUF, M_NOWAIT); 641 642 if (sg_map == NULL) 643 return; 644 645 /* Allocate S/G space for the next batch of CCBS */ 646 if (bus_dmamem_alloc(aha->sg_dmat, (void **)&sg_map->sg_vaddr, 647 BUS_DMA_NOWAIT, &sg_map->sg_dmamap) != 0) { 648 free(sg_map, M_DEVBUF); 649 return; 650 } 651 652 SLIST_INSERT_HEAD(&aha->sg_maps, sg_map, links); 653 654 bus_dmamap_load(aha->sg_dmat, sg_map->sg_dmamap, sg_map->sg_vaddr, 655 PAGE_SIZE, ahamapsgs, aha, /*flags*/0); 656 657 segs = sg_map->sg_vaddr; 658 physaddr = sg_map->sg_physaddr; 659 660 newcount = (PAGE_SIZE / (AHA_NSEG * sizeof(aha_sg_t))); 661 for (i = 0; aha->num_ccbs < aha->max_ccbs && i < newcount; i++) { 662 int error; 663 664 next_ccb->sg_list = segs; 665 next_ccb->sg_list_phys = physaddr; 666 next_ccb->flags = ACCB_FREE; 667 callout_init_mtx(&next_ccb->timer, &aha->lock, 0); 668 error = bus_dmamap_create(aha->buffer_dmat, /*flags*/0, 669 &next_ccb->dmamap); 670 if (error != 0) 671 break; 672 SLIST_INSERT_HEAD(&aha->free_aha_ccbs, next_ccb, links); 673 segs += AHA_NSEG; 674 physaddr += (AHA_NSEG * sizeof(aha_sg_t)); 675 next_ccb++; 676 aha->num_ccbs++; 677 } 678 679 /* Reserve a CCB for error recovery */ 680 if (aha->recovery_accb == NULL) { 681 aha->recovery_accb = SLIST_FIRST(&aha->free_aha_ccbs); 682 SLIST_REMOVE_HEAD(&aha->free_aha_ccbs, links); 683 } 684 } 685 686 static __inline void 687 ahafreeccb(struct aha_softc *aha, struct aha_ccb *accb) 688 { 689 690 if (!dumping) 691 mtx_assert(&aha->lock, MA_OWNED); 692 if ((accb->flags & ACCB_ACTIVE) != 0) 693 LIST_REMOVE(&accb->ccb->ccb_h, sim_links.le); 694 if (aha->resource_shortage != 0 695 && (accb->ccb->ccb_h.status & CAM_RELEASE_SIMQ) == 0) { 696 accb->ccb->ccb_h.status |= CAM_RELEASE_SIMQ; 697 aha->resource_shortage = FALSE; 698 } 699 accb->flags = ACCB_FREE; 700 SLIST_INSERT_HEAD(&aha->free_aha_ccbs, accb, links); 701 aha->active_ccbs--; 702 } 703 704 static struct aha_ccb* 705 ahagetccb(struct aha_softc *aha) 706 { 707 struct aha_ccb* accb; 708 709 if (!dumping) 710 mtx_assert(&aha->lock, MA_OWNED); 711 if ((accb = SLIST_FIRST(&aha->free_aha_ccbs)) != NULL) { 712 SLIST_REMOVE_HEAD(&aha->free_aha_ccbs, links); 713 aha->active_ccbs++; 714 } else if (aha->num_ccbs < aha->max_ccbs) { 715 ahaallocccbs(aha); 716 accb = SLIST_FIRST(&aha->free_aha_ccbs); 717 if (accb == NULL) 718 device_printf(aha->dev, "Can't malloc ACCB\n"); 719 else { 720 SLIST_REMOVE_HEAD(&aha->free_aha_ccbs, links); 721 aha->active_ccbs++; 722 } 723 } 724 725 return (accb); 726 } 727 728 static void 729 ahaaction(struct cam_sim *sim, union ccb *ccb) 730 { 731 struct aha_softc *aha; 732 733 CAM_DEBUG(ccb->ccb_h.path, CAM_DEBUG_TRACE, ("ahaaction\n")); 734 735 aha = (struct aha_softc *)cam_sim_softc(sim); 736 mtx_assert(&aha->lock, MA_OWNED); 737 738 switch (ccb->ccb_h.func_code) { 739 /* Common cases first */ 740 case XPT_SCSI_IO: /* Execute the requested I/O operation */ 741 case XPT_RESET_DEV: /* Bus Device Reset the specified SCSI device */ { 742 struct aha_ccb *accb; 743 struct aha_hccb *hccb; 744 745 /* 746 * Get an accb to use. 747 */ 748 if ((accb = ahagetccb(aha)) == NULL) { 749 aha->resource_shortage = TRUE; 750 xpt_freeze_simq(aha->sim, /*count*/1); 751 ccb->ccb_h.status = CAM_REQUEUE_REQ; 752 xpt_done(ccb); 753 return; 754 } 755 hccb = &accb->hccb; 756 757 /* 758 * So we can find the ACCB when an abort is requested 759 */ 760 accb->ccb = ccb; 761 ccb->ccb_h.ccb_accb_ptr = accb; 762 ccb->ccb_h.ccb_aha_ptr = aha; 763 764 /* 765 * Put all the arguments for the xfer in the accb 766 */ 767 hccb->target = ccb->ccb_h.target_id; 768 hccb->lun = ccb->ccb_h.target_lun; 769 hccb->ahastat = 0; 770 hccb->sdstat = 0; 771 772 if (ccb->ccb_h.func_code == XPT_SCSI_IO) { 773 struct ccb_scsiio *csio; 774 struct ccb_hdr *ccbh; 775 int error; 776 777 csio = &ccb->csio; 778 ccbh = &csio->ccb_h; 779 hccb->opcode = aha->ccb_ccb_opcode; 780 hccb->datain = (ccb->ccb_h.flags & CAM_DIR_IN) != 0; 781 hccb->dataout = (ccb->ccb_h.flags & CAM_DIR_OUT) != 0; 782 hccb->cmd_len = csio->cdb_len; 783 if (hccb->cmd_len > sizeof(hccb->scsi_cdb)) { 784 ccb->ccb_h.status = CAM_REQ_INVALID; 785 ahafreeccb(aha, accb); 786 xpt_done(ccb); 787 return; 788 } 789 hccb->sense_len = csio->sense_len; 790 if ((ccbh->flags & CAM_CDB_POINTER) != 0) { 791 if ((ccbh->flags & CAM_CDB_PHYS) == 0) { 792 bcopy(csio->cdb_io.cdb_ptr, 793 hccb->scsi_cdb, hccb->cmd_len); 794 } else { 795 /* I guess I could map it in... */ 796 ccbh->status = CAM_REQ_INVALID; 797 ahafreeccb(aha, accb); 798 xpt_done(ccb); 799 return; 800 } 801 } else { 802 bcopy(csio->cdb_io.cdb_bytes, 803 hccb->scsi_cdb, hccb->cmd_len); 804 } 805 /* 806 * If we have any data to send with this command, 807 * map it into bus space. 808 */ 809 810 error = bus_dmamap_load_ccb( 811 aha->buffer_dmat, 812 accb->dmamap, 813 ccb, 814 ahaexecuteccb, 815 accb, 816 /*flags*/0); 817 if (error == EINPROGRESS) { 818 /* 819 * So as to maintain ordering, freeze the 820 * controller queue until our mapping is 821 * returned. 822 */ 823 xpt_freeze_simq(aha->sim, 1); 824 csio->ccb_h.status |= CAM_RELEASE_SIMQ; 825 } 826 } else { 827 hccb->opcode = INITIATOR_BUS_DEV_RESET; 828 /* No data transfer */ 829 hccb->datain = TRUE; 830 hccb->dataout = TRUE; 831 hccb->cmd_len = 0; 832 hccb->sense_len = 0; 833 ahaexecuteccb(accb, NULL, 0, 0); 834 } 835 break; 836 } 837 case XPT_ABORT: /* Abort the specified CCB */ 838 /* XXX Implement */ 839 ccb->ccb_h.status = CAM_REQ_INVALID; 840 xpt_done(ccb); 841 break; 842 case XPT_SET_TRAN_SETTINGS: 843 /* XXX Implement */ 844 ccb->ccb_h.status = CAM_PROVIDE_FAIL; 845 xpt_done(ccb); 846 break; 847 case XPT_GET_TRAN_SETTINGS: 848 /* Get default/user set transfer settings for the target */ 849 { 850 struct ccb_trans_settings *cts = &ccb->cts; 851 u_int target_mask = 0x01 << ccb->ccb_h.target_id; 852 struct ccb_trans_settings_scsi *scsi = 853 &cts->proto_specific.scsi; 854 struct ccb_trans_settings_spi *spi = 855 &cts->xport_specific.spi; 856 857 cts->protocol = PROTO_SCSI; 858 cts->protocol_version = SCSI_REV_2; 859 cts->transport = XPORT_SPI; 860 cts->transport_version = 2; 861 if (cts->type == CTS_TYPE_USER_SETTINGS) { 862 spi->flags = 0; 863 if ((aha->disc_permitted & target_mask) != 0) 864 spi->flags |= CTS_SPI_FLAGS_DISC_ENB; 865 spi->bus_width = MSG_EXT_WDTR_BUS_8_BIT; 866 if ((aha->sync_permitted & target_mask) != 0) { 867 if (aha->boardid >= BOARD_1542CF) 868 spi->sync_period = 25; 869 else 870 spi->sync_period = 50; 871 } else { 872 spi->sync_period = 0; 873 } 874 875 if (spi->sync_period != 0) 876 spi->sync_offset = 15; 877 878 spi->valid = CTS_SPI_VALID_SYNC_RATE 879 | CTS_SPI_VALID_SYNC_OFFSET 880 | CTS_SPI_VALID_BUS_WIDTH 881 | CTS_SPI_VALID_DISC; 882 scsi->valid = CTS_SCSI_VALID_TQ; 883 } else { 884 ahafetchtransinfo(aha, cts); 885 } 886 887 ccb->ccb_h.status = CAM_REQ_CMP; 888 xpt_done(ccb); 889 break; 890 } 891 case XPT_CALC_GEOMETRY: 892 { 893 struct ccb_calc_geometry *ccg; 894 uint32_t size_mb; 895 uint32_t secs_per_cylinder; 896 897 ccg = &ccb->ccg; 898 size_mb = ccg->volume_size 899 / ((1024L * 1024L) / ccg->block_size); 900 if (size_mb >= 1024 && (aha->extended_trans != 0)) { 901 if (size_mb >= 2048) { 902 ccg->heads = 255; 903 ccg->secs_per_track = 63; 904 } else { 905 ccg->heads = 128; 906 ccg->secs_per_track = 32; 907 } 908 } else { 909 ccg->heads = 64; 910 ccg->secs_per_track = 32; 911 } 912 secs_per_cylinder = ccg->heads * ccg->secs_per_track; 913 ccg->cylinders = ccg->volume_size / secs_per_cylinder; 914 ccb->ccb_h.status = CAM_REQ_CMP; 915 xpt_done(ccb); 916 break; 917 } 918 case XPT_RESET_BUS: /* Reset the specified SCSI bus */ 919 ahareset(aha, /*hardreset*/TRUE); 920 ccb->ccb_h.status = CAM_REQ_CMP; 921 xpt_done(ccb); 922 break; 923 case XPT_TERM_IO: /* Terminate the I/O process */ 924 /* XXX Implement */ 925 ccb->ccb_h.status = CAM_REQ_INVALID; 926 xpt_done(ccb); 927 break; 928 case XPT_PATH_INQ: /* Path routing inquiry */ 929 { 930 struct ccb_pathinq *cpi = &ccb->cpi; 931 932 cpi->version_num = 1; /* XXX??? */ 933 cpi->hba_inquiry = PI_SDTR_ABLE; 934 cpi->target_sprt = 0; 935 cpi->hba_misc = 0; 936 cpi->hba_eng_cnt = 0; 937 cpi->max_target = 7; 938 cpi->max_lun = 7; 939 cpi->initiator_id = aha->scsi_id; 940 cpi->bus_id = cam_sim_bus(sim); 941 cpi->base_transfer_speed = 3300; 942 strlcpy(cpi->sim_vid, "FreeBSD", SIM_IDLEN); 943 strlcpy(cpi->hba_vid, "Adaptec", HBA_IDLEN); 944 strlcpy(cpi->dev_name, cam_sim_name(sim), DEV_IDLEN); 945 cpi->unit_number = cam_sim_unit(sim); 946 cpi->transport = XPORT_SPI; 947 cpi->transport_version = 2; 948 cpi->protocol = PROTO_SCSI; 949 cpi->protocol_version = SCSI_REV_2; 950 cpi->ccb_h.status = CAM_REQ_CMP; 951 xpt_done(ccb); 952 break; 953 } 954 default: 955 ccb->ccb_h.status = CAM_REQ_INVALID; 956 xpt_done(ccb); 957 break; 958 } 959 } 960 961 static void 962 ahaexecuteccb(void *arg, bus_dma_segment_t *dm_segs, int nseg, int error) 963 { 964 struct aha_ccb *accb; 965 union ccb *ccb; 966 struct aha_softc *aha; 967 uint32_t paddr; 968 969 accb = (struct aha_ccb *)arg; 970 ccb = accb->ccb; 971 aha = (struct aha_softc *)ccb->ccb_h.ccb_aha_ptr; 972 973 if (error != 0) { 974 if (error != EFBIG) 975 device_printf(aha->dev, 976 "Unexepected error 0x%x returned from " 977 "bus_dmamap_load\n", error); 978 if (ccb->ccb_h.status == CAM_REQ_INPROG) { 979 xpt_freeze_devq(ccb->ccb_h.path, /*count*/1); 980 ccb->ccb_h.status = CAM_REQ_TOO_BIG|CAM_DEV_QFRZN; 981 } 982 ahafreeccb(aha, accb); 983 xpt_done(ccb); 984 return; 985 } 986 987 if (nseg != 0) { 988 aha_sg_t *sg; 989 bus_dma_segment_t *end_seg; 990 bus_dmasync_op_t op; 991 992 end_seg = dm_segs + nseg; 993 994 /* Copy the segments into our SG list */ 995 sg = accb->sg_list; 996 while (dm_segs < end_seg) { 997 ahautoa24(dm_segs->ds_len, sg->len); 998 ahautoa24(dm_segs->ds_addr, sg->addr); 999 sg++; 1000 dm_segs++; 1001 } 1002 1003 if (nseg > 1) { 1004 accb->hccb.opcode = aha->ccb_sg_opcode; 1005 ahautoa24((sizeof(aha_sg_t) * nseg), 1006 accb->hccb.data_len); 1007 ahautoa24(accb->sg_list_phys, accb->hccb.data_addr); 1008 } else { 1009 bcopy(accb->sg_list->len, accb->hccb.data_len, 3); 1010 bcopy(accb->sg_list->addr, accb->hccb.data_addr, 3); 1011 } 1012 1013 if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN) 1014 op = BUS_DMASYNC_PREREAD; 1015 else 1016 op = BUS_DMASYNC_PREWRITE; 1017 1018 bus_dmamap_sync(aha->buffer_dmat, accb->dmamap, op); 1019 1020 } else { 1021 accb->hccb.opcode = INITIATOR_CCB; 1022 ahautoa24(0, accb->hccb.data_len); 1023 ahautoa24(0, accb->hccb.data_addr); 1024 } 1025 1026 /* 1027 * Last time we need to check if this CCB needs to 1028 * be aborted. 1029 */ 1030 if (ccb->ccb_h.status != CAM_REQ_INPROG) { 1031 if (nseg != 0) 1032 bus_dmamap_unload(aha->buffer_dmat, accb->dmamap); 1033 ahafreeccb(aha, accb); 1034 xpt_done(ccb); 1035 return; 1036 } 1037 1038 accb->flags = ACCB_ACTIVE; 1039 ccb->ccb_h.status |= CAM_SIM_QUEUED; 1040 LIST_INSERT_HEAD(&aha->pending_ccbs, &ccb->ccb_h, sim_links.le); 1041 1042 callout_reset_sbt(&accb->timer, SBT_1MS * ccb->ccb_h.timeout, 0, 1043 ahatimeout, accb, 0); 1044 1045 /* Tell the adapter about this command */ 1046 if (aha->cur_outbox->action_code != AMBO_FREE) { 1047 /* 1048 * We should never encounter a busy mailbox. 1049 * If we do, warn the user, and treat it as 1050 * a resource shortage. If the controller is 1051 * hung, one of the pending transactions will 1052 * timeout causing us to start recovery operations. 1053 */ 1054 device_printf(aha->dev, 1055 "Encountered busy mailbox with %d out of %d " 1056 "commands active!!!", aha->active_ccbs, aha->max_ccbs); 1057 callout_stop(&accb->timer); 1058 if (nseg != 0) 1059 bus_dmamap_unload(aha->buffer_dmat, accb->dmamap); 1060 ahafreeccb(aha, accb); 1061 aha->resource_shortage = TRUE; 1062 xpt_freeze_simq(aha->sim, /*count*/1); 1063 ccb->ccb_h.status = CAM_REQUEUE_REQ; 1064 xpt_done(ccb); 1065 return; 1066 } 1067 paddr = ahaccbvtop(aha, accb); 1068 ahautoa24(paddr, aha->cur_outbox->ccb_addr); 1069 aha->cur_outbox->action_code = AMBO_START; 1070 aha_outb(aha, COMMAND_REG, AOP_START_MBOX); 1071 1072 ahanextoutbox(aha); 1073 } 1074 1075 void 1076 aha_intr(void *arg) 1077 { 1078 struct aha_softc *aha; 1079 1080 aha = arg; 1081 mtx_lock(&aha->lock); 1082 aha_intr_locked(aha); 1083 mtx_unlock(&aha->lock); 1084 } 1085 1086 void 1087 aha_intr_locked(struct aha_softc *aha) 1088 { 1089 u_int intstat; 1090 uint32_t paddr; 1091 1092 while (((intstat = aha_inb(aha, INTSTAT_REG)) & INTR_PENDING) != 0) { 1093 if ((intstat & CMD_COMPLETE) != 0) { 1094 aha->latched_status = aha_inb(aha, STATUS_REG); 1095 aha->command_cmp = TRUE; 1096 } 1097 1098 aha_outb(aha, CONTROL_REG, RESET_INTR); 1099 1100 if ((intstat & IMB_LOADED) != 0) { 1101 while (aha->cur_inbox->comp_code != AMBI_FREE) { 1102 paddr = aha_a24tou(aha->cur_inbox->ccb_addr); 1103 ahadone(aha, ahaccbptov(aha, paddr), 1104 aha->cur_inbox->comp_code); 1105 aha->cur_inbox->comp_code = AMBI_FREE; 1106 ahanextinbox(aha); 1107 } 1108 } 1109 1110 if ((intstat & SCSI_BUS_RESET) != 0) { 1111 ahareset(aha, /*hardreset*/FALSE); 1112 } 1113 } 1114 } 1115 1116 static void 1117 ahadone(struct aha_softc *aha, struct aha_ccb *accb, aha_mbi_comp_code_t comp_code) 1118 { 1119 union ccb *ccb; 1120 struct ccb_scsiio *csio; 1121 1122 ccb = accb->ccb; 1123 csio = &accb->ccb->csio; 1124 1125 if ((accb->flags & ACCB_ACTIVE) == 0) { 1126 device_printf(aha->dev, 1127 "ahadone - Attempt to free non-active ACCB %p\n", 1128 (void *)accb); 1129 return; 1130 } 1131 1132 if ((ccb->ccb_h.flags & CAM_DIR_MASK) != CAM_DIR_NONE) { 1133 bus_dmasync_op_t op; 1134 1135 if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN) 1136 op = BUS_DMASYNC_POSTREAD; 1137 else 1138 op = BUS_DMASYNC_POSTWRITE; 1139 bus_dmamap_sync(aha->buffer_dmat, accb->dmamap, op); 1140 bus_dmamap_unload(aha->buffer_dmat, accb->dmamap); 1141 } 1142 1143 if (accb == aha->recovery_accb) { 1144 /* 1145 * The recovery ACCB does not have a CCB associated 1146 * with it, so short circuit the normal error handling. 1147 * We now traverse our list of pending CCBs and process 1148 * any that were terminated by the recovery CCBs action. 1149 * We also reinstate timeouts for all remaining, pending, 1150 * CCBs. 1151 */ 1152 struct cam_path *path; 1153 struct ccb_hdr *ccb_h; 1154 cam_status error; 1155 1156 /* Notify all clients that a BDR occurred */ 1157 error = xpt_create_path(&path, /*periph*/NULL, 1158 cam_sim_path(aha->sim), accb->hccb.target, 1159 CAM_LUN_WILDCARD); 1160 1161 if (error == CAM_REQ_CMP) { 1162 xpt_async(AC_SENT_BDR, path, NULL); 1163 xpt_free_path(path); 1164 } 1165 1166 ccb_h = LIST_FIRST(&aha->pending_ccbs); 1167 while (ccb_h != NULL) { 1168 struct aha_ccb *pending_accb; 1169 1170 pending_accb = (struct aha_ccb *)ccb_h->ccb_accb_ptr; 1171 if (pending_accb->hccb.target == accb->hccb.target) { 1172 pending_accb->hccb.ahastat = AHASTAT_HA_BDR; 1173 ccb_h = LIST_NEXT(ccb_h, sim_links.le); 1174 ahadone(aha, pending_accb, AMBI_ERROR); 1175 } else { 1176 callout_reset_sbt(&pending_accb->timer, 1177 SBT_1MS * ccb_h->timeout, 0, ahatimeout, 1178 pending_accb, 0); 1179 ccb_h = LIST_NEXT(ccb_h, sim_links.le); 1180 } 1181 } 1182 device_printf(aha->dev, "No longer in timeout\n"); 1183 return; 1184 } 1185 1186 callout_stop(&accb->timer); 1187 1188 switch (comp_code) { 1189 case AMBI_FREE: 1190 device_printf(aha->dev, 1191 "ahadone - CCB completed with free status!\n"); 1192 break; 1193 case AMBI_NOT_FOUND: 1194 device_printf(aha->dev, 1195 "ahadone - CCB Abort failed to find CCB\n"); 1196 break; 1197 case AMBI_ABORT: 1198 case AMBI_ERROR: 1199 /* An error occurred */ 1200 if (accb->hccb.opcode < INITIATOR_CCB_WRESID) 1201 csio->resid = 0; 1202 else 1203 csio->resid = aha_a24tou(accb->hccb.data_len); 1204 switch(accb->hccb.ahastat) { 1205 case AHASTAT_DATARUN_ERROR: 1206 { 1207 if (csio->resid <= 0) { 1208 csio->ccb_h.status = CAM_DATA_RUN_ERR; 1209 break; 1210 } 1211 /* FALLTHROUGH */ 1212 } 1213 case AHASTAT_NOERROR: 1214 csio->scsi_status = accb->hccb.sdstat; 1215 csio->ccb_h.status |= CAM_SCSI_STATUS_ERROR; 1216 switch(csio->scsi_status) { 1217 case SCSI_STATUS_CHECK_COND: 1218 case SCSI_STATUS_CMD_TERMINATED: 1219 csio->ccb_h.status |= CAM_AUTOSNS_VALID; 1220 /* 1221 * The aha writes the sense data at different 1222 * offsets based on the scsi cmd len 1223 */ 1224 bcopy((caddr_t) &accb->hccb.scsi_cdb + 1225 accb->hccb.cmd_len, 1226 (caddr_t) &csio->sense_data, 1227 accb->hccb.sense_len); 1228 break; 1229 default: 1230 break; 1231 case SCSI_STATUS_OK: 1232 csio->ccb_h.status = CAM_REQ_CMP; 1233 break; 1234 } 1235 break; 1236 case AHASTAT_SELTIMEOUT: 1237 csio->ccb_h.status = CAM_SEL_TIMEOUT; 1238 break; 1239 case AHASTAT_UNEXPECTED_BUSFREE: 1240 csio->ccb_h.status = CAM_UNEXP_BUSFREE; 1241 break; 1242 case AHASTAT_INVALID_PHASE: 1243 csio->ccb_h.status = CAM_SEQUENCE_FAIL; 1244 break; 1245 case AHASTAT_INVALID_ACTION_CODE: 1246 panic("%s: Inavlid Action code", aha_name(aha)); 1247 break; 1248 case AHASTAT_INVALID_OPCODE: 1249 if (accb->hccb.opcode < INITIATOR_CCB_WRESID) 1250 panic("%s: Invalid CCB Opcode %x hccb = %p", 1251 aha_name(aha), accb->hccb.opcode, 1252 &accb->hccb); 1253 device_printf(aha->dev, 1254 "AHA-1540A compensation failed\n"); 1255 xpt_freeze_devq(ccb->ccb_h.path, /*count*/1); 1256 csio->ccb_h.status = CAM_REQUEUE_REQ; 1257 break; 1258 case AHASTAT_LINKED_CCB_LUN_MISMATCH: 1259 /* We don't even support linked commands... */ 1260 panic("%s: Linked CCB Lun Mismatch", aha_name(aha)); 1261 break; 1262 case AHASTAT_INVALID_CCB_OR_SG_PARAM: 1263 panic("%s: Invalid CCB or SG list", aha_name(aha)); 1264 break; 1265 case AHASTAT_HA_SCSI_BUS_RESET: 1266 if ((csio->ccb_h.status & CAM_STATUS_MASK) 1267 != CAM_CMD_TIMEOUT) 1268 csio->ccb_h.status = CAM_SCSI_BUS_RESET; 1269 break; 1270 case AHASTAT_HA_BDR: 1271 if ((accb->flags & ACCB_DEVICE_RESET) == 0) 1272 csio->ccb_h.status = CAM_BDR_SENT; 1273 else 1274 csio->ccb_h.status = CAM_CMD_TIMEOUT; 1275 break; 1276 } 1277 if (csio->ccb_h.status != CAM_REQ_CMP) { 1278 xpt_freeze_devq(csio->ccb_h.path, /*count*/1); 1279 csio->ccb_h.status |= CAM_DEV_QFRZN; 1280 } 1281 if ((accb->flags & ACCB_RELEASE_SIMQ) != 0) 1282 ccb->ccb_h.status |= CAM_RELEASE_SIMQ; 1283 ahafreeccb(aha, accb); 1284 xpt_done(ccb); 1285 break; 1286 case AMBI_OK: 1287 /* All completed without incident */ 1288 /* XXX DO WE NEED TO COPY SENSE BYTES HERE???? XXX */ 1289 /* I don't think so since it works???? */ 1290 ccb->ccb_h.status |= CAM_REQ_CMP; 1291 if ((accb->flags & ACCB_RELEASE_SIMQ) != 0) 1292 ccb->ccb_h.status |= CAM_RELEASE_SIMQ; 1293 ahafreeccb(aha, accb); 1294 xpt_done(ccb); 1295 break; 1296 } 1297 } 1298 1299 static int 1300 ahareset(struct aha_softc* aha, int hard_reset) 1301 { 1302 struct ccb_hdr *ccb_h; 1303 u_int status; 1304 u_int timeout; 1305 uint8_t reset_type; 1306 1307 if (hard_reset != 0) 1308 reset_type = HARD_RESET; 1309 else 1310 reset_type = SOFT_RESET; 1311 aha_outb(aha, CONTROL_REG, reset_type); 1312 1313 /* Wait 5sec. for Diagnostic start */ 1314 timeout = 5 * 10000; 1315 while (--timeout) { 1316 status = aha_inb(aha, STATUS_REG); 1317 if ((status & DIAG_ACTIVE) != 0) 1318 break; 1319 DELAY(100); 1320 } 1321 if (timeout == 0) { 1322 PRVERB((aha->dev, "ahareset - Diagnostic Active failed to " 1323 "assert. status = %#x\n", status)); 1324 return (ETIMEDOUT); 1325 } 1326 1327 /* Wait 10sec. for Diagnostic end */ 1328 timeout = 10 * 10000; 1329 while (--timeout) { 1330 status = aha_inb(aha, STATUS_REG); 1331 if ((status & DIAG_ACTIVE) == 0) 1332 break; 1333 DELAY(100); 1334 } 1335 if (timeout == 0) { 1336 panic("%s: ahareset - Diagnostic Active failed to drop. " 1337 "status = 0x%x\n", aha_name(aha), status); 1338 return (ETIMEDOUT); 1339 } 1340 1341 /* Wait for the host adapter to become ready or report a failure */ 1342 timeout = 10000; 1343 while (--timeout) { 1344 status = aha_inb(aha, STATUS_REG); 1345 if ((status & (DIAG_FAIL|HA_READY|DATAIN_REG_READY)) != 0) 1346 break; 1347 DELAY(100); 1348 } 1349 if (timeout == 0) { 1350 device_printf(aha->dev, "ahareset - Host adapter failed to " 1351 "come ready. status = 0x%x\n", status); 1352 return (ETIMEDOUT); 1353 } 1354 1355 /* If the diagnostics failed, tell the user */ 1356 if ((status & DIAG_FAIL) != 0 1357 || (status & HA_READY) == 0) { 1358 device_printf(aha->dev, "ahareset - Adapter failed diag\n"); 1359 1360 if ((status & DATAIN_REG_READY) != 0) 1361 device_printf(aha->dev, "ahareset - Host Adapter " 1362 "Error code = 0x%x\n", aha_inb(aha, DATAIN_REG)); 1363 return (ENXIO); 1364 } 1365 1366 /* If we've attached to the XPT, tell it about the event */ 1367 if (aha->path != NULL) 1368 xpt_async(AC_BUS_RESET, aha->path, NULL); 1369 1370 /* 1371 * Perform completion processing for all outstanding CCBs. 1372 */ 1373 while ((ccb_h = LIST_FIRST(&aha->pending_ccbs)) != NULL) { 1374 struct aha_ccb *pending_accb; 1375 1376 pending_accb = (struct aha_ccb *)ccb_h->ccb_accb_ptr; 1377 pending_accb->hccb.ahastat = AHASTAT_HA_SCSI_BUS_RESET; 1378 ahadone(aha, pending_accb, AMBI_ERROR); 1379 } 1380 1381 /* If we've allocated mailboxes, initialize them */ 1382 /* Must be done after we've aborted our queue, or aha_cmd fails */ 1383 if (aha->init_level > 4) 1384 ahainitmboxes(aha); 1385 1386 return (0); 1387 } 1388 1389 /* 1390 * Send a command to the adapter. 1391 */ 1392 int 1393 aha_cmd(struct aha_softc *aha, aha_op_t opcode, uint8_t *params, 1394 u_int param_len, uint8_t *reply_data, u_int reply_len, 1395 u_int cmd_timeout) 1396 { 1397 u_int timeout; 1398 u_int status; 1399 u_int saved_status; 1400 u_int intstat; 1401 u_int reply_buf_size; 1402 int cmd_complete; 1403 int error; 1404 1405 /* No data returned to start */ 1406 reply_buf_size = reply_len; 1407 reply_len = 0; 1408 intstat = 0; 1409 cmd_complete = 0; 1410 saved_status = 0; 1411 error = 0; 1412 1413 /* 1414 * All commands except for the "start mailbox" and the "enable 1415 * outgoing mailbox read interrupt" commands cannot be issued 1416 * while there are pending transactions. Freeze our SIMQ 1417 * and wait for all completions to occur if necessary. 1418 */ 1419 timeout = 10000; 1420 while (LIST_FIRST(&aha->pending_ccbs) != NULL && --timeout) { 1421 /* Fire the interrupt handler in case interrupts are blocked */ 1422 aha_intr(aha); 1423 DELAY(10); 1424 } 1425 1426 if (timeout == 0) { 1427 device_printf(aha->dev, 1428 "aha_cmd: Timeout waiting for adapter idle\n"); 1429 return (ETIMEDOUT); 1430 } 1431 aha->command_cmp = 0; 1432 /* 1433 * Wait up to 10 sec. for the adapter to become 1434 * ready to accept commands. 1435 */ 1436 timeout = 100000; 1437 while (--timeout) { 1438 status = aha_inb(aha, STATUS_REG); 1439 if ((status & HA_READY) != 0 && (status & CMD_REG_BUSY) == 0) 1440 break; 1441 /* 1442 * Throw away any pending data which may be 1443 * left over from earlier commands that we 1444 * timedout on. 1445 */ 1446 if ((status & DATAIN_REG_READY) != 0) 1447 (void)aha_inb(aha, DATAIN_REG); 1448 DELAY(100); 1449 } 1450 if (timeout == 0) { 1451 device_printf(aha->dev, "aha_cmd: Timeout waiting for adapter" 1452 " ready, status = 0x%x\n", status); 1453 return (ETIMEDOUT); 1454 } 1455 1456 /* 1457 * Send the opcode followed by any necessary parameter bytes. 1458 */ 1459 aha_outb(aha, COMMAND_REG, opcode); 1460 1461 /* 1462 * Wait for up to 1sec to get the parameter list sent 1463 */ 1464 timeout = 10000; 1465 while (param_len && --timeout) { 1466 DELAY(100); 1467 status = aha_inb(aha, STATUS_REG); 1468 intstat = aha_inb(aha, INTSTAT_REG); 1469 1470 if ((intstat & (INTR_PENDING|CMD_COMPLETE)) 1471 == (INTR_PENDING|CMD_COMPLETE)) { 1472 saved_status = status; 1473 cmd_complete = 1; 1474 break; 1475 } 1476 1477 if (aha->command_cmp != 0) { 1478 saved_status = aha->latched_status; 1479 cmd_complete = 1; 1480 break; 1481 } 1482 if ((status & DATAIN_REG_READY) != 0) 1483 break; 1484 if ((status & CMD_REG_BUSY) == 0) { 1485 aha_outb(aha, COMMAND_REG, *params++); 1486 param_len--; 1487 timeout = 10000; 1488 } 1489 } 1490 if (timeout == 0) { 1491 device_printf(aha->dev, "aha_cmd: Timeout sending parameters, " 1492 "status = 0x%x\n", status); 1493 error = ETIMEDOUT; 1494 } 1495 1496 /* 1497 * For all other commands, we wait for any output data 1498 * and the final comand completion interrupt. 1499 */ 1500 while (cmd_complete == 0 && --cmd_timeout) { 1501 1502 status = aha_inb(aha, STATUS_REG); 1503 intstat = aha_inb(aha, INTSTAT_REG); 1504 1505 if (aha->command_cmp != 0) { 1506 cmd_complete = 1; 1507 saved_status = aha->latched_status; 1508 } else if ((intstat & (INTR_PENDING|CMD_COMPLETE)) 1509 == (INTR_PENDING|CMD_COMPLETE)) { 1510 /* 1511 * Our poll (in case interrupts are blocked) 1512 * saw the CMD_COMPLETE interrupt. 1513 */ 1514 cmd_complete = 1; 1515 saved_status = status; 1516 } 1517 if ((status & DATAIN_REG_READY) != 0) { 1518 uint8_t data; 1519 1520 data = aha_inb(aha, DATAIN_REG); 1521 if (reply_len < reply_buf_size) { 1522 *reply_data++ = data; 1523 } else { 1524 device_printf(aha->dev, 1525 "aha_cmd - Discarded reply data " 1526 "byte for opcode 0x%x\n", opcode); 1527 } 1528 /* 1529 * Reset timeout to ensure at least a second 1530 * between response bytes. 1531 */ 1532 cmd_timeout = MAX(cmd_timeout, 10000); 1533 reply_len++; 1534 } 1535 DELAY(100); 1536 } 1537 if (cmd_timeout == 0) { 1538 device_printf(aha->dev, "aha_cmd: Timeout: status = 0x%x, " 1539 "intstat = 0x%x, reply_len = %d\n", status, intstat, 1540 reply_len); 1541 return (ETIMEDOUT); 1542 } 1543 1544 /* 1545 * Clear any pending interrupts. Block interrupts so our 1546 * interrupt handler is not re-entered. 1547 */ 1548 aha_intr(aha); 1549 1550 if (error != 0) 1551 return (error); 1552 1553 /* 1554 * If the command was rejected by the controller, tell the caller. 1555 */ 1556 if ((saved_status & CMD_INVALID) != 0) { 1557 PRVERB((aha->dev, "Invalid Command 0x%x\n", opcode)); 1558 /* 1559 * Some early adapters may not recover properly from 1560 * an invalid command. If it appears that the controller 1561 * has wedged (i.e. status was not cleared by our interrupt 1562 * reset above), perform a soft reset. 1563 */ 1564 DELAY(1000); 1565 status = aha_inb(aha, STATUS_REG); 1566 if ((status & (CMD_INVALID|STATUS_REG_RSVD|DATAIN_REG_READY| 1567 CMD_REG_BUSY|DIAG_FAIL|DIAG_ACTIVE)) != 0 1568 || (status & (HA_READY|INIT_REQUIRED)) 1569 != (HA_READY|INIT_REQUIRED)) 1570 ahareset(aha, /*hard_reset*/FALSE); 1571 return (EINVAL); 1572 } 1573 1574 if (param_len > 0) { 1575 /* The controller did not accept the full argument list */ 1576 PRVERB((aha->dev, "Controller did not accept full argument " 1577 "list (%d > 0)\n", param_len)); 1578 return (E2BIG); 1579 } 1580 1581 if (reply_len != reply_buf_size) { 1582 /* Too much or too little data received */ 1583 PRVERB((aha->dev, "data received mismatch (%d != %d)\n", 1584 reply_len, reply_buf_size)); 1585 return (EMSGSIZE); 1586 } 1587 1588 /* We were successful */ 1589 return (0); 1590 } 1591 1592 static int 1593 ahainitmboxes(struct aha_softc *aha) 1594 { 1595 int error; 1596 init_24b_mbox_params_t init_mbox; 1597 1598 bzero(aha->in_boxes, sizeof(aha_mbox_in_t) * aha->num_boxes); 1599 bzero(aha->out_boxes, sizeof(aha_mbox_out_t) * aha->num_boxes); 1600 aha->cur_inbox = aha->in_boxes; 1601 aha->last_inbox = aha->in_boxes + aha->num_boxes - 1; 1602 aha->cur_outbox = aha->out_boxes; 1603 aha->last_outbox = aha->out_boxes + aha->num_boxes - 1; 1604 1605 /* Tell the adapter about them */ 1606 init_mbox.num_mboxes = aha->num_boxes; 1607 ahautoa24(aha->mailbox_physbase, init_mbox.base_addr); 1608 error = aha_cmd(aha, AOP_INITIALIZE_MBOX, (uint8_t *)&init_mbox, 1609 /*parmlen*/sizeof(init_mbox), /*reply_buf*/NULL, 1610 /*reply_len*/0, DEFAULT_CMD_TIMEOUT); 1611 1612 if (error != 0) 1613 printf("ahainitmboxes: Initialization command failed\n"); 1614 return (error); 1615 } 1616 1617 /* 1618 * Update the XPT's idea of the negotiated transfer 1619 * parameters for a particular target. 1620 */ 1621 static void 1622 ahafetchtransinfo(struct aha_softc *aha, struct ccb_trans_settings* cts) 1623 { 1624 setup_data_t setup_info; 1625 u_int target; 1626 u_int targ_offset; 1627 u_int sync_period; 1628 int error; 1629 uint8_t param; 1630 targ_syncinfo_t sync_info; 1631 struct ccb_trans_settings_spi *spi = &cts->xport_specific.spi; 1632 1633 target = cts->ccb_h.target_id; 1634 targ_offset = (target & 0x7); 1635 1636 /* 1637 * Inquire Setup Information. This command retreives 1638 * the sync info for older models. 1639 */ 1640 param = sizeof(setup_info); 1641 error = aha_cmd(aha, AOP_INQUIRE_SETUP_INFO, ¶m, /*paramlen*/1, 1642 (uint8_t*)&setup_info, sizeof(setup_info), DEFAULT_CMD_TIMEOUT); 1643 1644 if (error != 0) { 1645 device_printf(aha->dev, 1646 "ahafetchtransinfo - Inquire Setup Info Failed %d\n", 1647 error); 1648 return; 1649 } 1650 1651 sync_info = setup_info.syncinfo[targ_offset]; 1652 1653 if (sync_info.sync == 0) 1654 spi->sync_offset = 0; 1655 else 1656 spi->sync_offset = sync_info.offset; 1657 1658 spi->bus_width = MSG_EXT_WDTR_BUS_8_BIT; 1659 1660 if (aha->boardid >= BOARD_1542CF) 1661 sync_period = 1000; 1662 else 1663 sync_period = 2000; 1664 sync_period += 500 * sync_info.period; 1665 1666 /* Convert ns value to standard SCSI sync rate */ 1667 if (spi->sync_offset != 0) 1668 spi->sync_period = scsi_calc_syncparam(sync_period); 1669 else 1670 spi->sync_period = 0; 1671 1672 spi->valid = CTS_SPI_VALID_SYNC_RATE 1673 | CTS_SPI_VALID_SYNC_OFFSET 1674 | CTS_SPI_VALID_BUS_WIDTH; 1675 xpt_async(AC_TRANSFER_NEG, cts->ccb_h.path, cts); 1676 } 1677 1678 static void 1679 ahamapmboxes(void *arg, bus_dma_segment_t *segs, int nseg, int error) 1680 { 1681 struct aha_softc* aha; 1682 1683 aha = (struct aha_softc*)arg; 1684 aha->mailbox_physbase = segs->ds_addr; 1685 } 1686 1687 static void 1688 ahamapccbs(void *arg, bus_dma_segment_t *segs, int nseg, int error) 1689 { 1690 struct aha_softc* aha; 1691 1692 aha = (struct aha_softc*)arg; 1693 aha->aha_ccb_physbase = segs->ds_addr; 1694 } 1695 1696 static void 1697 ahamapsgs(void *arg, bus_dma_segment_t *segs, int nseg, int error) 1698 { 1699 1700 struct aha_softc* aha; 1701 1702 aha = (struct aha_softc*)arg; 1703 SLIST_FIRST(&aha->sg_maps)->sg_physaddr = segs->ds_addr; 1704 } 1705 1706 static void 1707 ahapoll(struct cam_sim *sim) 1708 { 1709 aha_intr_locked(cam_sim_softc(sim)); 1710 } 1711 1712 static void 1713 ahatimeout(void *arg) 1714 { 1715 struct aha_ccb *accb; 1716 union ccb *ccb; 1717 struct aha_softc *aha; 1718 uint32_t paddr; 1719 struct ccb_hdr *ccb_h; 1720 1721 accb = (struct aha_ccb *)arg; 1722 ccb = accb->ccb; 1723 aha = (struct aha_softc *)ccb->ccb_h.ccb_aha_ptr; 1724 mtx_assert(&aha->lock, MA_OWNED); 1725 xpt_print_path(ccb->ccb_h.path); 1726 printf("CCB %p - timed out\n", (void *)accb); 1727 1728 if ((accb->flags & ACCB_ACTIVE) == 0) { 1729 xpt_print_path(ccb->ccb_h.path); 1730 printf("CCB %p - timed out CCB already completed\n", 1731 (void *)accb); 1732 return; 1733 } 1734 1735 /* 1736 * In order to simplify the recovery process, we ask the XPT 1737 * layer to halt the queue of new transactions and we traverse 1738 * the list of pending CCBs and remove their timeouts. This 1739 * means that the driver attempts to clear only one error 1740 * condition at a time. In general, timeouts that occur 1741 * close together are related anyway, so there is no benefit 1742 * in attempting to handle errors in parallel. Timeouts will 1743 * be reinstated when the recovery process ends. 1744 */ 1745 if ((accb->flags & ACCB_DEVICE_RESET) == 0) { 1746 if ((accb->flags & ACCB_RELEASE_SIMQ) == 0) { 1747 xpt_freeze_simq(aha->sim, /*count*/1); 1748 accb->flags |= ACCB_RELEASE_SIMQ; 1749 } 1750 1751 ccb_h = LIST_FIRST(&aha->pending_ccbs); 1752 while (ccb_h != NULL) { 1753 struct aha_ccb *pending_accb; 1754 1755 pending_accb = (struct aha_ccb *)ccb_h->ccb_accb_ptr; 1756 callout_stop(&pending_accb->timer); 1757 ccb_h = LIST_NEXT(ccb_h, sim_links.le); 1758 } 1759 } 1760 1761 if ((accb->flags & ACCB_DEVICE_RESET) != 0 1762 || aha->cur_outbox->action_code != AMBO_FREE) { 1763 /* 1764 * Try a full host adapter/SCSI bus reset. 1765 * We do this only if we have already attempted 1766 * to clear the condition with a BDR, or we cannot 1767 * attempt a BDR for lack of mailbox resources. 1768 */ 1769 ccb->ccb_h.status = CAM_CMD_TIMEOUT; 1770 ahareset(aha, /*hardreset*/TRUE); 1771 device_printf(aha->dev, "No longer in timeout\n"); 1772 } else { 1773 /* 1774 * Send a Bus Device Reset message: 1775 * The target that is holding up the bus may not 1776 * be the same as the one that triggered this timeout 1777 * (different commands have different timeout lengths), 1778 * but we have no way of determining this from our 1779 * timeout handler. Our strategy here is to queue a 1780 * BDR message to the target of the timed out command. 1781 * If this fails, we'll get another timeout 2 seconds 1782 * later which will attempt a bus reset. 1783 */ 1784 accb->flags |= ACCB_DEVICE_RESET; 1785 callout_reset(&accb->timer, 2 * hz, ahatimeout, accb); 1786 aha->recovery_accb->hccb.opcode = INITIATOR_BUS_DEV_RESET; 1787 1788 /* No Data Transfer */ 1789 aha->recovery_accb->hccb.datain = TRUE; 1790 aha->recovery_accb->hccb.dataout = TRUE; 1791 aha->recovery_accb->hccb.ahastat = 0; 1792 aha->recovery_accb->hccb.sdstat = 0; 1793 aha->recovery_accb->hccb.target = ccb->ccb_h.target_id; 1794 1795 /* Tell the adapter about this command */ 1796 paddr = ahaccbvtop(aha, aha->recovery_accb); 1797 ahautoa24(paddr, aha->cur_outbox->ccb_addr); 1798 aha->cur_outbox->action_code = AMBO_START; 1799 aha_outb(aha, COMMAND_REG, AOP_START_MBOX); 1800 ahanextoutbox(aha); 1801 } 1802 } 1803 1804 int 1805 aha_detach(struct aha_softc *aha) 1806 { 1807 mtx_lock(&aha->lock); 1808 xpt_async(AC_LOST_DEVICE, aha->path, NULL); 1809 xpt_free_path(aha->path); 1810 xpt_bus_deregister(cam_sim_path(aha->sim)); 1811 cam_sim_free(aha->sim, /*free_devq*/TRUE); 1812 mtx_unlock(&aha->lock); 1813 /* XXX: Drain all timers? */ 1814 return (0); 1815 } 1816 MODULE_DEPEND(aha, cam, 1, 1, 1); 1817