sys/dev/aha/aha.c

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