The Design and Implementation of the FreeBSD Operating System, Second Edition
Now available: The Design and Implementation of the FreeBSD Operating System (Second Edition)


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]

FreeBSD/Linux Kernel Cross Reference
sys/dev/ic/aic6360.c

Version: -  FREEBSD  -  FREEBSD-13-STABLE  -  FREEBSD-13-0  -  FREEBSD-12-STABLE  -  FREEBSD-12-0  -  FREEBSD-11-STABLE  -  FREEBSD-11-0  -  FREEBSD-10-STABLE  -  FREEBSD-10-0  -  FREEBSD-9-STABLE  -  FREEBSD-9-0  -  FREEBSD-8-STABLE  -  FREEBSD-8-0  -  FREEBSD-7-STABLE  -  FREEBSD-7-0  -  FREEBSD-6-STABLE  -  FREEBSD-6-0  -  FREEBSD-5-STABLE  -  FREEBSD-5-0  -  FREEBSD-4-STABLE  -  FREEBSD-3-STABLE  -  FREEBSD22  -  l41  -  OPENBSD  -  linux-2.6  -  MK84  -  PLAN9  -  xnu-8792 
SearchContext: -  none  -  3  -  10 

    1 /*      $NetBSD: aic6360.c,v 1.80 2003/11/02 11:07:44 wiz Exp $ */
    2 
    3 /*
    4  * Copyright (c) 1994, 1995, 1996 Charles M. Hannum.  All rights reserved.
    5  *
    6  * Redistribution and use in source and binary forms, with or without
    7  * modification, are permitted provided that the following conditions
    8  * are met:
    9  * 1. Redistributions of source code must retain the above copyright
   10  *    notice, this list of conditions and the following disclaimer.
   11  * 2. Redistributions in binary form must reproduce the above copyright
   12  *    notice, this list of conditions and the following disclaimer in the
   13  *    documentation and/or other materials provided with the distribution.
   14  * 3. All advertising materials mentioning features or use of this software
   15  *    must display the following acknowledgement:
   16  *      This product includes software developed by Charles M. Hannum.
   17  * 4. The name of the author may not be used to endorse or promote products
   18  *    derived from this software without specific prior written permission.
   19  *
   20  * Copyright (c) 1994 Jarle Greipsland
   21  * All rights reserved.
   22  *
   23  * Redistribution and use in source and binary forms, with or without
   24  * modification, are permitted provided that the following conditions
   25  * are met:
   26  * 1. Redistributions of source code must retain the above copyright
   27  *    notice, this list of conditions and the following disclaimer.
   28  * 2. Redistributions in binary form must reproduce the above copyright
   29  *    notice, this list of conditions and the following disclaimer in the
   30  *    documentation and/or other materials provided with the distribution.
   31  * 3. The name of the author may not be used to endorse or promote products
   32  *    derived from this software without specific prior written permission.
   33  *
   34  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
   35  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
   36  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
   37  * DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
   38  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
   39  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
   40  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
   41  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
   42  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
   43  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
   44  * POSSIBILITY OF SUCH DAMAGE.
   45  */
   46 
   47 /*
   48  * Acknowledgements: Many of the algorithms used in this driver are
   49  * inspired by the work of Julian Elischer (julian@tfs.com) and
   50  * Charles Hannum (mycroft@duality.gnu.ai.mit.edu).  Thanks a million!
   51  */
   52 
   53 /* TODO list:
   54  * 1) Get the DMA stuff working.
   55  * 2) Get the iov/uio stuff working. Is this a good thing ???
   56  * 3) Get the synch stuff working.
   57  * 4) Rewrite it to use malloc for the acb structs instead of static alloc.?
   58  */
   59 
   60 #include <sys/cdefs.h>
   61 __KERNEL_RCSID(0, "$NetBSD: aic6360.c,v 1.80 2003/11/02 11:07:44 wiz Exp $");
   62 
   63 #include "opt_ddb.h"
   64 #ifdef DDB
   65 #define integrate
   66 #else
   67 #define integrate       static inline
   68 #endif
   69 
   70 /*
   71  * A few customizable items:
   72  */
   73 
   74 /* Use doubleword transfers to/from SCSI chip.  Note: This requires
   75  * motherboard support.  Basicly, some motherboard chipsets are able to
   76  * split a 32 bit I/O operation into two 16 bit I/O operations,
   77  * transparently to the processor.  This speeds up some things, notably long
   78  * data transfers.
   79  */
   80 #define AIC_USE_DWORDS          0
   81 
   82 /* Synchronous data transfers? */
   83 #define AIC_USE_SYNCHRONOUS     0
   84 #define AIC_SYNC_REQ_ACK_OFS    8
   85 
   86 /* Wide data transfers? */
   87 #define AIC_USE_WIDE            0
   88 #define AIC_MAX_WIDTH           0
   89 
   90 /* Max attempts made to transmit a message */
   91 #define AIC_MSG_MAX_ATTEMPT     3 /* Not used now XXX */
   92 
   93 /* Use DMA (else we do programmed I/O using string instructions) (not yet!)*/
   94 #define AIC_USE_EISA_DMA        0
   95 #define AIC_USE_ISA_DMA         0
   96 
   97 /* How to behave on the (E)ISA bus when/if DMAing (on<<4) + off in us */
   98 #define EISA_BRST_TIM ((15<<4) + 1)     /* 15us on, 1us off */
   99 
  100 /* Some spin loop parameters (essentially how long to wait some places)
  101  * The problem(?) is that sometimes we expect either to be able to transmit a
  102  * byte or to get a new one from the SCSI bus pretty soon.  In order to avoid
  103  * returning from the interrupt just to get yanked back for the next byte we
  104  * may spin in the interrupt routine waiting for this byte to come.  How long?
  105  * This is really (SCSI) device and processor dependent.  Tuneable, I guess.
  106  */
  107 #define AIC_MSGIN_SPIN          1       /* Will spinwait upto ?ms for a new msg byte */
  108 #define AIC_MSGOUT_SPIN         1
  109 
  110 /* Include debug functions?  At the end of this file there are a bunch of
  111  * functions that will print out various information regarding queued SCSI
  112  * commands, driver state and chip contents.  You can call them from the
  113  * kernel debugger.  If you set AIC_DEBUG to 0 they are not included (the
  114  * kernel uses less memory) but you lose the debugging facilities.
  115  */
  116 #define AIC_DEBUG               1
  117 
  118 #define AIC_ABORT_TIMEOUT       2000    /* time to wait for abort */
  119 
  120 /* End of customizable parameters */
  121 
  122 #if AIC_USE_EISA_DMA || AIC_USE_ISA_DMA
  123 #error "I said not yet! Start paying attention... grumble"
  124 #endif
  125 
  126 #include <sys/param.h>
  127 #include <sys/systm.h>
  128 #include <sys/callout.h>
  129 #include <sys/kernel.h>
  130 #include <sys/errno.h>
  131 #include <sys/ioctl.h>
  132 #include <sys/device.h>
  133 #include <sys/buf.h>
  134 #include <sys/proc.h>
  135 #include <sys/user.h>
  136 #include <sys/queue.h>
  137 
  138 #include <machine/bus.h>
  139 #include <machine/intr.h>
  140 
  141 #include <dev/scsipi/scsi_all.h>
  142 #include <dev/scsipi/scsipi_all.h>
  143 #include <dev/scsipi/scsi_message.h>
  144 #include <dev/scsipi/scsiconf.h>
  145 
  146 #include <dev/ic/aic6360reg.h>
  147 #include <dev/ic/aic6360var.h>
  148 
  149 #ifndef DDB
  150 #define Debugger() panic("should call debugger here (aic6360.c)")
  151 #endif /* ! DDB */
  152 
  153 #if AIC_DEBUG
  154 int aic_debug = 0x00; /* AIC_SHOWSTART|AIC_SHOWMISC|AIC_SHOWTRACE; */
  155 #endif
  156 
  157 void    aic_minphys(struct buf *);
  158 void    aic_done(struct aic_softc *, struct aic_acb *);
  159 void    aic_dequeue(struct aic_softc *, struct aic_acb *);
  160 void    aic_scsipi_request(struct scsipi_channel *, scsipi_adapter_req_t,
  161                             void *);
  162 int     aic_poll(struct aic_softc *, struct scsipi_xfer *, int);
  163 integrate void  aic_sched_msgout(struct aic_softc *, u_char);
  164 integrate void  aic_setsync(struct aic_softc *, struct aic_tinfo *);
  165 void    aic_select(struct aic_softc *, struct aic_acb *);
  166 void    aic_timeout(void *);
  167 void    aic_sched(struct aic_softc *);
  168 void    aic_scsi_reset(struct aic_softc *);
  169 void    aic_reset(struct aic_softc *);
  170 void    aic_free_acb(struct aic_softc *, struct aic_acb *);
  171 struct aic_acb* aic_get_acb(struct aic_softc *);
  172 int     aic_reselect(struct aic_softc *, int);
  173 void    aic_sense(struct aic_softc *, struct aic_acb *);
  174 void    aic_msgin(struct aic_softc *);
  175 void    aic_abort(struct aic_softc *, struct aic_acb *);
  176 void    aic_msgout(struct aic_softc *);
  177 int     aic_dataout_pio(struct aic_softc *, u_char *, int);
  178 int     aic_datain_pio(struct aic_softc *, u_char *, int);
  179 void    aic_update_xfer_mode(struct aic_softc *, int);
  180 #if AIC_DEBUG
  181 void    aic_print_acb(struct aic_acb *);
  182 void    aic_dump_driver(struct aic_softc *);
  183 void    aic_dump6360(struct aic_softc *);
  184 void    aic_show_scsi_cmd(struct aic_acb *);
  185 void    aic_print_active_acb(void);
  186 #endif
  187 
  188 /*
  189  * INITIALIZATION ROUTINES (probe, attach ++)
  190  */
  191 
  192 /* Do the real search-for-device.
  193  * Prerequisite: sc->sc_iobase should be set to the proper value
  194  */
  195 int
  196 aic_find(bus_space_tag_t iot, bus_space_handle_t ioh)
  197 {
  198         char chip_id[sizeof(IDSTRING)]; /* For chips that support it */
  199         int i;
  200 
  201         /* Remove aic6360 from possible powerdown mode */
  202         bus_space_write_1(iot, ioh, DMACNTRL0, 0);
  203 
  204         /* Thanks to mark@aggregate.com for the new method for detecting
  205          * whether the chip is present or not.  Bonus: may also work for
  206          * the AIC-6260!
  207          */
  208         AIC_TRACE(("aic: probing for aic-chip\n"));
  209         /*
  210          * Linux also init's the stack to 1-16 and then clears it,
  211          *  6260's don't appear to have an ID reg - mpg
  212          */
  213         /* Push the sequence 0,1,..,15 on the stack */
  214 #define STSIZE 16
  215         bus_space_write_1(iot, ioh, DMACNTRL1, 0); /* Reset stack pointer */
  216         for (i = 0; i < STSIZE; i++)
  217                 bus_space_write_1(iot, ioh, STACK, i);
  218 
  219         /* See if we can pull out the same sequence */
  220         bus_space_write_1(iot, ioh, DMACNTRL1, 0);
  221         for (i = 0; i < STSIZE && bus_space_read_1(iot, ioh, STACK) == i; i++)
  222                 ;
  223         if (i != STSIZE) {
  224                 AIC_START(("STACK futzed at %d.\n", i));
  225                 return 0;
  226         }
  227 
  228         /* See if we can pull the id string out of the ID register,
  229          * now only used for informational purposes.
  230          */
  231         memset(chip_id, 0, sizeof(chip_id));
  232         bus_space_read_multi_1(iot, ioh, ID, chip_id, sizeof(IDSTRING) - 1);
  233         AIC_START(("AIC found ID: %s ",chip_id));
  234         AIC_START(("chip revision %d\n",
  235             (int)bus_space_read_1(iot, ioh, REV)));
  236 
  237         return 1;
  238 }
  239 
  240 /*
  241  * Attach the AIC6360, fill out some high and low level data structures
  242  */
  243 void
  244 aicattach(struct aic_softc *sc)
  245 {
  246         struct scsipi_adapter *adapt = &sc->sc_adapter;
  247         struct scsipi_channel *chan = &sc->sc_channel;
  248 
  249         AIC_TRACE(("aicattach  "));
  250         sc->sc_state = AIC_INIT;
  251 
  252         sc->sc_initiator = 7;
  253         sc->sc_freq = 20;       /* XXXX Assume 20 MHz. */
  254 
  255         /*
  256          * These are the bounds of the sync period, based on the frequency of
  257          * the chip's clock input and the size and offset of the sync period
  258          * register.
  259          *
  260          * For a 20MHz clock, this gives us 25, or 100nS, or 10MB/s, as a
  261          * maximum transfer rate, and 112.5, or 450nS, or 2.22MB/s, as a
  262          * minimum transfer rate.
  263          */
  264         sc->sc_minsync = (2 * 250) / sc->sc_freq;
  265         sc->sc_maxsync = (9 * 250) / sc->sc_freq;
  266 
  267         /*
  268          * Fill in the scsipi_adapter.
  269          */
  270         adapt->adapt_dev = &sc->sc_dev;
  271         adapt->adapt_nchannels = 1;
  272         adapt->adapt_openings = 8;
  273         adapt->adapt_max_periph = 1;
  274         adapt->adapt_request = aic_scsipi_request;
  275         adapt->adapt_minphys = aic_minphys;
  276 
  277         /*
  278          * Fill in the scsipi_channel.
  279          */
  280         chan->chan_adapter = adapt;
  281         chan->chan_bustype = &scsi_bustype;
  282         chan->chan_channel = 0;
  283         chan->chan_ntargets = 8;
  284         chan->chan_nluns = 8;
  285         chan->chan_id = sc->sc_initiator;
  286 
  287         /*
  288          * Add reference to adapter so that we drop the reference after
  289          * config_found() to make sure the adatper is disabled.
  290          */
  291         if (scsipi_adapter_addref(adapt) != 0) {
  292                 printf("%s: unable to enable controller\n",
  293                     sc->sc_dev.dv_xname);
  294                 return;
  295         }
  296 
  297         aic_init(sc, 1);        /* Init chip and driver */
  298 
  299         /*
  300          * Ask the adapter what subunits are present
  301          */
  302         sc->sc_child = config_found(&sc->sc_dev, &sc->sc_channel, scsiprint);
  303         scsipi_adapter_delref(adapt);
  304 }
  305 
  306 int
  307 aic_activate(struct device *self, enum devact act)
  308 {
  309         struct aic_softc *sc = (struct aic_softc *) self;
  310         int s, rv = 0;
  311 
  312         s = splhigh();
  313         switch (act) {
  314         case DVACT_ACTIVATE:
  315                 rv = EOPNOTSUPP;
  316                 break;
  317 
  318         case DVACT_DEACTIVATE:
  319                 if (sc->sc_child != NULL)
  320                         rv = config_deactivate(sc->sc_child);
  321                 break;
  322         }
  323         splx(s);
  324 
  325         return (rv);
  326 }
  327 
  328 int
  329 aic_detach(struct device *self, int flags)
  330 {
  331         struct aic_softc *sc = (struct aic_softc *) self;
  332         int rv = 0;
  333 
  334         if (sc->sc_child != NULL)
  335                 rv = config_detach(sc->sc_child, flags);
  336         
  337         return (rv);
  338 }
  339 
  340 /* Initialize AIC6360 chip itself
  341  * The following conditions should hold:
  342  * aic_isa_probe should have succeeded, i.e. the iobase address in aic_softc
  343  * must be valid.
  344  */
  345 void
  346 aic_reset(struct aic_softc *sc)
  347 {
  348         bus_space_tag_t iot = sc->sc_iot;
  349         bus_space_handle_t ioh = sc->sc_ioh;
  350 
  351         /*
  352          * Doc. recommends to clear these two registers before
  353          * operations commence
  354          */
  355         bus_space_write_1(iot, ioh, SCSITEST, 0);
  356         bus_space_write_1(iot, ioh, TEST, 0);
  357 
  358         /* Reset SCSI-FIFO and abort any transfers */
  359         bus_space_write_1(iot, ioh, SXFRCTL0, CHEN | CLRCH | CLRSTCNT);
  360 
  361         /* Reset DMA-FIFO */
  362         bus_space_write_1(iot, ioh, DMACNTRL0, RSTFIFO);
  363         bus_space_write_1(iot, ioh, DMACNTRL1, 0);
  364 
  365         /* Disable all selection features */
  366         bus_space_write_1(iot, ioh, SCSISEQ, 0);
  367         bus_space_write_1(iot, ioh, SXFRCTL1, 0);
  368 
  369         /* Disable some interrupts */
  370         bus_space_write_1(iot, ioh, SIMODE0, 0x00);
  371         /* Clear a slew of interrupts */
  372         bus_space_write_1(iot, ioh, CLRSINT0, 0x7f);
  373 
  374         /* Disable some more interrupts */
  375         bus_space_write_1(iot, ioh, SIMODE1, 0x00);
  376         /* Clear another slew of interrupts */
  377         bus_space_write_1(iot, ioh, CLRSINT1, 0xef);
  378 
  379         /* Disable synchronous transfers */
  380         bus_space_write_1(iot, ioh, SCSIRATE, 0);
  381 
  382         /* Haven't seen ant errors (yet) */
  383         bus_space_write_1(iot, ioh, CLRSERR, 0x07);
  384 
  385         /* Set our SCSI-ID */
  386         bus_space_write_1(iot, ioh, SCSIID, sc->sc_initiator << OID_S);
  387         bus_space_write_1(iot, ioh, BRSTCNTRL, EISA_BRST_TIM);
  388 }
  389 
  390 /* Pull the SCSI RST line for 500 us */
  391 void
  392 aic_scsi_reset(struct aic_softc *sc)
  393 {
  394         bus_space_tag_t iot = sc->sc_iot;
  395         bus_space_handle_t ioh = sc->sc_ioh;
  396 
  397         bus_space_write_1(iot, ioh, SCSISEQ, SCSIRSTO);
  398         delay(500);
  399         bus_space_write_1(iot, ioh, SCSISEQ, 0);
  400         delay(50);
  401 }
  402 
  403 /*
  404  * Initialize aic SCSI driver.
  405  */
  406 void
  407 aic_init(struct aic_softc *sc, int bus_reset)
  408 {
  409         struct aic_acb *acb;
  410         int r;
  411 
  412         if (bus_reset) {
  413                 aic_reset(sc);
  414                 aic_scsi_reset(sc);
  415         }
  416         aic_reset(sc);
  417 
  418         if (sc->sc_state == AIC_INIT) {
  419                 /* First time through; initialize. */
  420                 TAILQ_INIT(&sc->ready_list);
  421                 TAILQ_INIT(&sc->nexus_list);
  422                 TAILQ_INIT(&sc->free_list);
  423                 sc->sc_nexus = NULL;
  424                 acb = sc->sc_acb;
  425                 memset(acb, 0, sizeof(sc->sc_acb));
  426                 for (r = 0; r < sizeof(sc->sc_acb) / sizeof(*acb); r++) {
  427                         TAILQ_INSERT_TAIL(&sc->free_list, acb, chain);
  428                         acb++;
  429                 }
  430                 memset(&sc->sc_tinfo, 0, sizeof(sc->sc_tinfo));
  431         } else {
  432                 /* Cancel any active commands. */
  433                 sc->sc_state = AIC_CLEANING;
  434                 if ((acb = sc->sc_nexus) != NULL) {
  435                         acb->xs->error = XS_DRIVER_STUFFUP;
  436                         callout_stop(&acb->xs->xs_callout);
  437                         aic_done(sc, acb);
  438                 }
  439                 while ((acb = sc->nexus_list.tqh_first) != NULL) {
  440                         acb->xs->error = XS_DRIVER_STUFFUP;
  441                         callout_stop(&acb->xs->xs_callout);
  442                         aic_done(sc, acb);
  443                 }
  444         }
  445 
  446         sc->sc_prevphase = PH_INVALID;
  447         for (r = 0; r < 8; r++) {
  448                 struct aic_tinfo *ti = &sc->sc_tinfo[r];
  449 
  450                 ti->flags = 0;
  451                 ti->period = ti->offset = 0;
  452                 ti->width = 0;
  453         }
  454 
  455         sc->sc_state = AIC_IDLE;
  456         bus_space_write_1(sc->sc_iot, sc->sc_ioh, DMACNTRL0, INTEN);
  457 }
  458 
  459 void
  460 aic_free_acb(struct aic_softc *sc, struct aic_acb *acb)
  461 {
  462         int s;
  463 
  464         s = splbio();
  465         acb->flags = 0;
  466         TAILQ_INSERT_HEAD(&sc->free_list, acb, chain);
  467         splx(s);
  468 }
  469 
  470 struct aic_acb *
  471 aic_get_acb(struct aic_softc *sc)
  472 {
  473         struct aic_acb *acb;
  474         int s;
  475 
  476         s = splbio();
  477         acb = TAILQ_FIRST(&sc->free_list);
  478         if (acb != NULL) {
  479                 TAILQ_REMOVE(&sc->free_list, acb, chain);
  480                 acb->flags |= ACB_ALLOC;
  481         }
  482         splx(s);
  483         return (acb);
  484 }
  485 
  486 /*
  487  * DRIVER FUNCTIONS CALLABLE FROM HIGHER LEVEL DRIVERS
  488  */
  489 
  490 /*
  491  * Expected sequence:
  492  * 1) Command inserted into ready list
  493  * 2) Command selected for execution
  494  * 3) Command won arbitration and has selected target device
  495  * 4) Send message out (identify message, eventually also sync.negotiations)
  496  * 5) Send command
  497  * 5a) Receive disconnect message, disconnect.
  498  * 5b) Reselected by target
  499  * 5c) Receive identify message from target.
  500  * 6) Send or receive data
  501  * 7) Receive status
  502  * 8) Receive message (command complete etc.)
  503  * 9) If status == SCSI_CHECK construct a synthetic request sense SCSI cmd.
  504  *    Repeat 2-8 (no disconnects please...)
  505  */
  506 
  507 /*
  508  * Perform a request from the SCSIPI midlayer.
  509  */
  510 void
  511 aic_scsipi_request(struct scsipi_channel *chan, scsipi_adapter_req_t req,
  512     void *arg)
  513 {
  514         struct scsipi_xfer *xs;
  515         struct scsipi_periph *periph;
  516         struct aic_softc *sc = (void *)chan->chan_adapter->adapt_dev;
  517         struct aic_acb *acb;
  518         int s, flags;
  519 
  520         AIC_TRACE(("aic_request  "));
  521 
  522         switch (req) {
  523         case ADAPTER_REQ_RUN_XFER:
  524                 xs = arg;
  525                 periph = xs->xs_periph;
  526 
  527                 AIC_CMDS(("[0x%x, %d]->%d ", (int)xs->cmd->opcode, xs->cmdlen,
  528                     periph->periph_target));
  529 
  530                 if ((sc->sc_dev.dv_flags & DVF_ACTIVE) == 0) {
  531                         xs->error = XS_DRIVER_STUFFUP;
  532                         scsipi_done(xs);
  533                         return;
  534                 }
  535 
  536                 flags = xs->xs_control;
  537                 acb = aic_get_acb(sc);
  538 #ifdef DIAGNOSTIC
  539                 /*
  540                  * This should never happen as we track the resources
  541                  * in the mid-layer.
  542                  */
  543                 if (acb == NULL) {
  544                         scsipi_printaddr(periph);
  545                         printf("unable to allocate acb\n");
  546                         panic("aic_scsipi_request");
  547                 }
  548 #endif
  549 
  550                 /* Initialize acb */
  551                 acb->xs = xs;
  552                 acb->timeout = xs->timeout;
  553 
  554                 if (xs->xs_control & XS_CTL_RESET) {
  555                         acb->flags |= ACB_RESET;
  556                         acb->scsipi_cmd_length = 0;
  557                         acb->data_length = 0;
  558                 } else {
  559                         memcpy(&acb->scsipi_cmd, xs->cmd, xs->cmdlen);
  560                         acb->scsipi_cmd_length = xs->cmdlen;
  561                         acb->data_addr = xs->data;
  562                         acb->data_length = xs->datalen;
  563                 }
  564                 acb->target_stat = 0;
  565 
  566                 s = splbio();
  567 
  568                 TAILQ_INSERT_TAIL(&sc->ready_list, acb, chain);
  569                 if (sc->sc_state == AIC_IDLE)
  570                         aic_sched(sc);
  571 
  572                 splx(s);
  573 
  574                 if ((flags & XS_CTL_POLL) == 0)
  575                         return;
  576 
  577                 /* Not allowed to use interrupts, use polling instead */
  578                 if (aic_poll(sc, xs, acb->timeout)) {
  579                         aic_timeout(acb);
  580                         if (aic_poll(sc, xs, acb->timeout))
  581                                 aic_timeout(acb);
  582                 }
  583                 return;
  584 
  585         case ADAPTER_REQ_GROW_RESOURCES:
  586                 /* XXX Not supported. */
  587                 return;
  588 
  589         case ADAPTER_REQ_SET_XFER_MODE:
  590             {
  591                 struct aic_tinfo *ti;
  592                 struct scsipi_xfer_mode *xm = arg;
  593 
  594                 ti = &sc->sc_tinfo[xm->xm_target];
  595                 ti->flags &= ~(DO_SYNC|DO_WIDE);
  596                 ti->period = 0;
  597                 ti->offset = 0;
  598 
  599 #if AIC_USE_SYNCHRONOUS
  600                 if (xm->xm_mode & PERIPH_CAP_SYNC) {
  601                         ti->flags |= DO_SYNC;
  602                         ti->period = sc->sc_minsync;
  603                         ti->offset = AIC_SYNC_REQ_ACK_OFS;
  604                 }
  605 #endif
  606 #if AIC_USE_WIDE
  607                 if (xm->xm_mode & PERIPH_CAP_WIDE16) {
  608                         ti->flags |= DO_WIDE;
  609                         ti->width = AIC_MAX_WIDTH;
  610                 }
  611 #endif
  612                 /*
  613                  * If we're not going to negotiate, send the notification
  614                  * now, since it won't happen later.
  615                  */
  616                 if ((ti->flags & (DO_SYNC|DO_WIDE)) == 0)
  617                         aic_update_xfer_mode(sc, xm->xm_target);
  618                 return;
  619             }
  620         }
  621 }
  622 
  623 void
  624 aic_update_xfer_mode(struct aic_softc *sc, int target)
  625 {
  626         struct scsipi_xfer_mode xm;
  627         struct aic_tinfo *ti = &sc->sc_tinfo[target];
  628 
  629         xm.xm_target = target;
  630         xm.xm_mode = 0;
  631         xm.xm_period = 0;
  632         xm.xm_offset = 0;
  633 
  634         if (ti->offset != 0) {
  635                 xm.xm_mode |= PERIPH_CAP_SYNC;
  636                 xm.xm_period = ti->period;
  637                 xm.xm_offset = ti->offset;
  638         }
  639         switch (ti->width) {
  640         case 2:
  641                 xm.xm_mode |= PERIPH_CAP_WIDE32;
  642                 break;
  643         case 1:
  644                 xm.xm_mode |= PERIPH_CAP_WIDE16;
  645                 break;
  646         }
  647 
  648         scsipi_async_event(&sc->sc_channel, ASYNC_EVENT_XFER_MODE, &xm);
  649 }
  650 
  651 /*
  652  * Adjust transfer size in buffer structure
  653  */
  654 void
  655 aic_minphys(struct buf *bp)
  656 {
  657 
  658         AIC_TRACE(("aic_minphys  "));
  659         if (bp->b_bcount > (AIC_NSEG << PGSHIFT))
  660                 bp->b_bcount = (AIC_NSEG << PGSHIFT);
  661         minphys(bp);
  662 }
  663 
  664 /*
  665  * Used when interrupt driven I/O isn't allowed, e.g. during boot.
  666  */
  667 int
  668 aic_poll(struct aic_softc *sc, struct scsipi_xfer *xs, int count)
  669 {
  670         bus_space_tag_t iot = sc->sc_iot;
  671         bus_space_handle_t ioh = sc->sc_ioh;
  672 
  673         AIC_TRACE(("aic_poll  "));
  674         while (count) {
  675                 /*
  676                  * If we had interrupts enabled, would we
  677                  * have got an interrupt?
  678                  */
  679                 if ((bus_space_read_1(iot, ioh, DMASTAT) & INTSTAT) != 0)
  680                         aicintr(sc);
  681                 if ((xs->xs_status & XS_STS_DONE) != 0)
  682                         return 0;
  683                 delay(1000);
  684                 count--;
  685         }
  686         return 1;
  687 }
  688 
  689 /*
  690  * LOW LEVEL SCSI UTILITIES
  691  */
  692 
  693 integrate void
  694 aic_sched_msgout(struct aic_softc *sc, u_char m)
  695 {
  696         bus_space_tag_t iot = sc->sc_iot;
  697         bus_space_handle_t ioh = sc->sc_ioh;
  698 
  699         if (sc->sc_msgpriq == 0)
  700                 bus_space_write_1(iot, ioh, SCSISIG, sc->sc_phase | ATNO);
  701         sc->sc_msgpriq |= m;
  702 }
  703 
  704 /*
  705  * Set synchronous transfer offset and period.
  706  */
  707 #if !AIC_USE_SYNCHRONOUS
  708 /* ARGSUSED */
  709 #endif
  710 integrate void
  711 aic_setsync(struct aic_softc *sc, struct aic_tinfo *ti)
  712 {
  713 #if AIC_USE_SYNCHRONOUS
  714         bus_space_tag_t iot = sc->sc_iot;
  715         bus_space_handle_t ioh = sc->sc_ioh;
  716 
  717         if (ti->offset != 0)
  718                 bus_space_write_1(iot, ioh, SCSIRATE,
  719                     ((ti->period * sc->sc_freq) / 250 - 2) << 4 | ti->offset);
  720         else
  721                 bus_space_write_1(iot, ioh, SCSIRATE, 0);
  722 #endif
  723 }
  724 
  725 /*
  726  * Start a selection.  This is used by aic_sched() to select an idle target,
  727  * and by aic_done() to immediately reselect a target to get sense information.
  728  */
  729 void
  730 aic_select(struct aic_softc *sc, struct aic_acb *acb)
  731 {
  732         struct scsipi_periph *periph = acb->xs->xs_periph;
  733         int target = periph->periph_target;
  734         struct aic_tinfo *ti = &sc->sc_tinfo[target];
  735         bus_space_tag_t iot = sc->sc_iot;
  736         bus_space_handle_t ioh = sc->sc_ioh;
  737 
  738         bus_space_write_1(iot, ioh, SCSIID,
  739             sc->sc_initiator << OID_S | target);
  740         aic_setsync(sc, ti);
  741         bus_space_write_1(iot, ioh, SXFRCTL1, STIMO_256ms | ENSTIMER);
  742 
  743         /* Always enable reselections. */
  744         bus_space_write_1(iot, ioh, SIMODE0, ENSELDI | ENSELDO);
  745         bus_space_write_1(iot, ioh, SIMODE1, ENSCSIRST | ENSELTIMO);
  746         bus_space_write_1(iot, ioh, SCSISEQ, ENRESELI | ENSELO | ENAUTOATNO);
  747 
  748         sc->sc_state = AIC_SELECTING;
  749 }
  750 
  751 int
  752 aic_reselect(struct aic_softc *sc, int message)
  753 {
  754         u_char selid, target, lun;
  755         struct aic_acb *acb;
  756         struct scsipi_periph *periph;
  757         struct aic_tinfo *ti;
  758 
  759         /*
  760          * The SCSI chip made a snapshot of the data bus while the reselection
  761          * was being negotiated.  This enables us to determine which target did
  762          * the reselect.
  763          */
  764         selid = sc->sc_selid & ~(1 << sc->sc_initiator);
  765         if (selid & (selid - 1)) {
  766                 printf("%s: reselect with invalid selid %02x; "
  767                     "sending DEVICE RESET\n", sc->sc_dev.dv_xname, selid);
  768                 AIC_BREAK();
  769                 goto reset;
  770         }
  771 
  772         /* Search wait queue for disconnected cmd
  773          * The list should be short, so I haven't bothered with
  774          * any more sophisticated structures than a simple
  775          * singly linked list.
  776          */
  777         target = ffs(selid) - 1;
  778         lun = message & 0x07;
  779         for (acb = sc->nexus_list.tqh_first; acb != NULL;
  780              acb = acb->chain.tqe_next) {
  781                 periph = acb->xs->xs_periph;
  782                 if (periph->periph_target == target &&
  783                     periph->periph_lun == lun)
  784                         break;
  785         }
  786         if (acb == NULL) {
  787                 printf("%s: reselect from target %d lun %d with no nexus; "
  788                     "sending ABORT\n", sc->sc_dev.dv_xname, target, lun);
  789                 AIC_BREAK();
  790                 goto abort;
  791         }
  792 
  793         /* Make this nexus active again. */
  794         TAILQ_REMOVE(&sc->nexus_list, acb, chain);
  795         sc->sc_state = AIC_CONNECTED;
  796         sc->sc_nexus = acb;
  797         ti = &sc->sc_tinfo[target];
  798         ti->lubusy |= (1 << lun);
  799         aic_setsync(sc, ti);
  800 
  801         if (acb->flags & ACB_RESET)
  802                 aic_sched_msgout(sc, SEND_DEV_RESET);
  803         else if (acb->flags & ACB_ABORT)
  804                 aic_sched_msgout(sc, SEND_ABORT);
  805 
  806         /* Do an implicit RESTORE POINTERS. */
  807         sc->sc_dp = acb->data_addr;
  808         sc->sc_dleft = acb->data_length;
  809         sc->sc_cp = (u_char *)&acb->scsipi_cmd;
  810         sc->sc_cleft = acb->scsipi_cmd_length;
  811 
  812         return (0);
  813 
  814 reset:
  815         aic_sched_msgout(sc, SEND_DEV_RESET);
  816         return (1);
  817 
  818 abort:
  819         aic_sched_msgout(sc, SEND_ABORT);
  820         return (1);
  821 }
  822 
  823 /*
  824  * Schedule a SCSI operation.  This has now been pulled out of the interrupt
  825  * handler so that we may call it from aic_scsipi_request and aic_done.  This
  826  * may save us an unnecessary interrupt just to get things going.  Should only
  827  * be called when state == AIC_IDLE and at bio pl.
  828  */
  829 void
  830 aic_sched(struct aic_softc *sc)
  831 {
  832         struct aic_acb *acb;
  833         struct scsipi_periph *periph;
  834         struct aic_tinfo *ti;
  835         bus_space_tag_t iot = sc->sc_iot;
  836         bus_space_handle_t ioh = sc->sc_ioh;
  837 
  838         if ((sc->sc_dev.dv_flags & DVF_ACTIVE) == 0)
  839                 return;
  840 
  841         /*
  842          * Find first acb in ready queue that is for a target/lunit pair that
  843          * is not busy.
  844          */
  845         bus_space_write_1(iot, ioh, CLRSINT1,
  846             CLRSELTIMO | CLRBUSFREE | CLRSCSIPERR);
  847         for (acb = sc->ready_list.tqh_first; acb != NULL;
  848             acb = acb->chain.tqe_next) {
  849                 periph = acb->xs->xs_periph;
  850                 ti = &sc->sc_tinfo[periph->periph_target];
  851                 if ((ti->lubusy & (1 << periph->periph_lun)) == 0) {
  852                         AIC_MISC(("selecting %d:%d  ",
  853                             periph->periph_target, periph->periph_lun));
  854                         TAILQ_REMOVE(&sc->ready_list, acb, chain);
  855                         sc->sc_nexus = acb;
  856                         aic_select(sc, acb);
  857                         return;
  858                 } else
  859                         AIC_MISC(("%d:%d busy\n",
  860                             periph->periph_target, periph->periph_lun));
  861         }
  862         AIC_MISC(("idle  "));
  863         /* Nothing to start; just enable reselections and wait. */
  864         bus_space_write_1(iot, ioh, SIMODE0, ENSELDI);
  865         bus_space_write_1(iot, ioh, SIMODE1, ENSCSIRST);
  866         bus_space_write_1(iot, ioh, SCSISEQ, ENRESELI);
  867 }
  868 
  869 void
  870 aic_sense(struct aic_softc *sc, struct aic_acb *acb)
  871 {
  872         struct scsipi_xfer *xs = acb->xs;
  873         struct scsipi_periph *periph = xs->xs_periph;
  874         struct aic_tinfo *ti = &sc->sc_tinfo[periph->periph_target];
  875         struct scsipi_sense *ss = (void *)&acb->scsipi_cmd;
  876 
  877         AIC_MISC(("requesting sense  "));
  878         /* Next, setup a request sense command block */
  879         memset(ss, 0, sizeof(*ss));
  880         ss->opcode = REQUEST_SENSE;
  881         ss->byte2 = periph->periph_lun << 5;
  882         ss->length = sizeof(struct scsipi_sense_data);
  883         acb->scsipi_cmd_length = sizeof(*ss);
  884         acb->data_addr = (char *)&xs->sense.scsi_sense;
  885         acb->data_length = sizeof(struct scsipi_sense_data);
  886         acb->flags |= ACB_SENSE;
  887         ti->senses++;
  888         if (acb->flags & ACB_NEXUS)
  889                 ti->lubusy &= ~(1 << periph->periph_lun);
  890         if (acb == sc->sc_nexus) {
  891                 aic_select(sc, acb);
  892         } else {
  893                 aic_dequeue(sc, acb);
  894                 TAILQ_INSERT_HEAD(&sc->ready_list, acb, chain);
  895                 if (sc->sc_state == AIC_IDLE)
  896                         aic_sched(sc);
  897         }
  898 }
  899 
  900 /*
  901  * POST PROCESSING OF SCSI_CMD (usually current)
  902  */
  903 void
  904 aic_done(struct aic_softc *sc, struct aic_acb *acb)
  905 {
  906         struct scsipi_xfer *xs = acb->xs;
  907         struct scsipi_periph *periph = xs->xs_periph;
  908         struct aic_tinfo *ti = &sc->sc_tinfo[periph->periph_target];
  909 
  910         AIC_TRACE(("aic_done  "));
  911 
  912         /*
  913          * Now, if we've come here with no error code, i.e. we've kept the
  914          * initial XS_NOERROR, and the status code signals that we should
  915          * check sense, we'll need to set up a request sense cmd block and
  916          * push the command back into the ready queue *before* any other
  917          * commands for this target/lunit, else we lose the sense info.
  918          * We don't support chk sense conditions for the request sense cmd.
  919          */
  920         if (xs->error == XS_NOERROR) {
  921                 if (acb->flags & ACB_ABORT) {
  922                         xs->error = XS_DRIVER_STUFFUP;
  923                 } else if (acb->flags & ACB_SENSE) {
  924                         xs->error = XS_SENSE;
  925                 } else if (acb->target_stat == SCSI_CHECK) {
  926                         /* First, save the return values */
  927                         xs->resid = acb->data_length;
  928                         xs->status = acb->target_stat;
  929                         aic_sense(sc, acb);
  930                         return;
  931                 } else {
  932                         xs->resid = acb->data_length;
  933                 }
  934         }
  935 
  936 #if AIC_DEBUG
  937         if ((aic_debug & AIC_SHOWMISC) != 0) {
  938                 if (xs->resid != 0)
  939                         printf("resid=%d ", xs->resid);
  940                 if (xs->error == XS_SENSE)
  941                         printf("sense=0x%02x\n", xs->sense.scsi_sense.error_code);
  942                 else
  943                         printf("error=%d\n", xs->error);
  944         }
  945 #endif
  946 
  947         /*
  948          * Remove the ACB from whatever queue it happens to be on.
  949          */
  950         if (acb->flags & ACB_NEXUS)
  951                 ti->lubusy &= ~(1 << periph->periph_lun);
  952         if (acb == sc->sc_nexus) {
  953                 sc->sc_nexus = NULL;
  954                 sc->sc_state = AIC_IDLE;
  955                 aic_sched(sc);
  956         } else
  957                 aic_dequeue(sc, acb);
  958 
  959         aic_free_acb(sc, acb);
  960         ti->cmds++;
  961         scsipi_done(xs);
  962 }
  963 
  964 void
  965 aic_dequeue(struct aic_softc *sc, struct aic_acb *acb)
  966 {
  967 
  968         if (acb->flags & ACB_NEXUS) {
  969                 TAILQ_REMOVE(&sc->nexus_list, acb, chain);
  970         } else {
  971                 TAILQ_REMOVE(&sc->ready_list, acb, chain);
  972         }
  973 }
  974 
  975 /*
  976  * INTERRUPT/PROTOCOL ENGINE
  977  */
  978 
  979 /*
  980  * Precondition:
  981  * The SCSI bus is already in the MSGI phase and there is a message byte
  982  * on the bus, along with an asserted REQ signal.
  983  */
  984 void
  985 aic_msgin(struct aic_softc *sc)
  986 {
  987         bus_space_tag_t iot = sc->sc_iot;
  988         bus_space_handle_t ioh = sc->sc_ioh;
  989         u_char sstat1;
  990         int n;
  991 
  992         AIC_TRACE(("aic_msgin  "));
  993 
  994         if (sc->sc_prevphase == PH_MSGIN) {
  995                 /* This is a continuation of the previous message. */
  996                 n = sc->sc_imp - sc->sc_imess;
  997                 goto nextbyte;
  998         }
  999 
 1000         /* This is a new MESSAGE IN phase.  Clean up our state. */
 1001         sc->sc_flags &= ~AIC_DROP_MSGIN;
 1002 
 1003 nextmsg:
 1004         n = 0;
 1005         sc->sc_imp = &sc->sc_imess[n];
 1006 
 1007 nextbyte:
 1008         /*
 1009          * Read a whole message, but don't ack the last byte.  If we reject the
 1010          * message, we have to assert ATN during the message transfer phase
 1011          * itself.
 1012          */
 1013         for (;;) {
 1014                 for (;;) {
 1015                         sstat1 = bus_space_read_1(iot, ioh, SSTAT1);
 1016                         if ((sstat1 & (REQINIT | PHASECHG | BUSFREE)) != 0)
 1017                                 break;
 1018                         /* Wait for REQINIT.  XXX Need timeout. */
 1019                 }
 1020                 if ((sstat1 & (PHASECHG | BUSFREE)) != 0) {
 1021                         /*
 1022                          * Target left MESSAGE IN, probably because it
 1023                          * a) noticed our ATN signal, or
 1024                          * b) ran out of messages.
 1025                          */
 1026                         goto out;
 1027                 }
 1028 
 1029                 /* If parity error, just dump everything on the floor. */
 1030                 if ((sstat1 & SCSIPERR) != 0) {
 1031                         sc->sc_flags |= AIC_DROP_MSGIN;
 1032                         aic_sched_msgout(sc, SEND_PARITY_ERROR);
 1033                 }
 1034 
 1035                 /* Gather incoming message bytes if needed. */
 1036                 if ((sc->sc_flags & AIC_DROP_MSGIN) == 0) {
 1037                         if (n >= AIC_MAX_MSG_LEN) {
 1038                                 (void) bus_space_read_1(iot, ioh, SCSIDAT);
 1039                                 sc->sc_flags |= AIC_DROP_MSGIN;
 1040                                 aic_sched_msgout(sc, SEND_REJECT);
 1041                         } else {
 1042                                 *sc->sc_imp++ = bus_space_read_1(iot, ioh,
 1043                                     SCSIDAT);
 1044                                 n++;
 1045                                 /*
 1046                                  * This testing is suboptimal, but most
 1047                                  * messages will be of the one byte variety, so
 1048                                  * it should not affect performance
 1049                                  * significantly.
 1050                                  */
 1051                                 if (n == 1 && MSG_IS1BYTE(sc->sc_imess[0]))
 1052                                         break;
 1053                                 if (n == 2 && MSG_IS2BYTE(sc->sc_imess[0]))
 1054                                         break;
 1055                                 if (n >= 3 && MSG_ISEXTENDED(sc->sc_imess[0]) &&
 1056                                     n == sc->sc_imess[1] + 2)
 1057                                         break;
 1058                         }
 1059                 } else
 1060                         (void) bus_space_read_1(iot, ioh, SCSIDAT);
 1061 
 1062                 /*
 1063                  * If we reach this spot we're either:
 1064                  * a) in the middle of a multi-byte message, or
 1065                  * b) dropping bytes.
 1066                  */
 1067                 bus_space_write_1(iot, ioh, SXFRCTL0, CHEN | SPIOEN);
 1068                 /* Ack the last byte read. */
 1069                 (void) bus_space_read_1(iot, ioh, SCSIDAT);
 1070                 bus_space_write_1(iot, ioh, SXFRCTL0, CHEN);
 1071                 while ((bus_space_read_1(iot, ioh, SCSISIG) & ACKI) != 0)
 1072                         ;
 1073         }
 1074 
 1075         AIC_MISC(("n=%d imess=0x%02x  ", n, sc->sc_imess[0]));
 1076 
 1077         /* We now have a complete message.  Parse it. */
 1078         switch (sc->sc_state) {
 1079                 struct aic_acb *acb;
 1080                 struct scsipi_periph *periph;
 1081                 struct aic_tinfo *ti;
 1082 
 1083         case AIC_CONNECTED:
 1084                 AIC_ASSERT(sc->sc_nexus != NULL);
 1085                 acb = sc->sc_nexus;
 1086                 ti = &sc->sc_tinfo[acb->xs->xs_periph->periph_target];
 1087 
 1088                 switch (sc->sc_imess[0]) {
 1089                 case MSG_CMDCOMPLETE:
 1090                         if (sc->sc_dleft < 0) {
 1091                                 periph = acb->xs->xs_periph;
 1092                                 printf("%s: %ld extra bytes from %d:%d\n",
 1093                                     sc->sc_dev.dv_xname, (long)-sc->sc_dleft,
 1094                                     periph->periph_target,
 1095                                     periph->periph_lun);
 1096                                 acb->data_length = 0;
 1097                         }
 1098                         acb->xs->resid = acb->data_length = sc->sc_dleft;
 1099                         sc->sc_state = AIC_CMDCOMPLETE;
 1100                         break;
 1101 
 1102                 case MSG_PARITY_ERROR:
 1103                         /* Resend the last message. */
 1104                         aic_sched_msgout(sc, sc->sc_lastmsg);
 1105                         break;
 1106 
 1107                 case MSG_MESSAGE_REJECT:
 1108                         AIC_MISC(("message rejected %02x  ", sc->sc_lastmsg));
 1109                         switch (sc->sc_lastmsg) {
 1110 #if AIC_USE_SYNCHRONOUS + AIC_USE_WIDE
 1111                         case SEND_IDENTIFY:
 1112                                 ti->flags &= ~(DO_SYNC | DO_WIDE);
 1113                                 ti->period = ti->offset = 0;
 1114                                 aic_setsync(sc, ti);
 1115                                 ti->width = 0;
 1116                                 break;
 1117 #endif
 1118 #if AIC_USE_SYNCHRONOUS
 1119                         case SEND_SDTR:
 1120                                 ti->flags &= ~DO_SYNC;
 1121                                 ti->period = ti->offset = 0;
 1122                                 aic_setsync(sc, ti);
 1123                                 aic_update_xfer_mode(sc,
 1124                                     acb->xs->xs_periph->periph_target);
 1125                                 break;
 1126 #endif
 1127 #if AIC_USE_WIDE
 1128                         case SEND_WDTR:
 1129                                 ti->flags &= ~DO_WIDE;
 1130                                 ti->width = 0;
 1131                                 aic_update_xfer_mode(sc,
 1132                                     acb->xs->xs_periph->periph_target);
 1133                                 break;
 1134 #endif
 1135                         case SEND_INIT_DET_ERR:
 1136                                 aic_sched_msgout(sc, SEND_ABORT);
 1137                                 break;
 1138                         }
 1139                         break;
 1140 
 1141                 case MSG_NOOP:
 1142                         break;
 1143 
 1144                 case MSG_DISCONNECT:
 1145                         ti->dconns++;
 1146                         sc->sc_state = AIC_DISCONNECT;
 1147                         break;
 1148 
 1149                 case MSG_SAVEDATAPOINTER:
 1150                         acb->data_addr = sc->sc_dp;
 1151                         acb->data_length = sc->sc_dleft;
 1152                         break;
 1153 
 1154                 case MSG_RESTOREPOINTERS:
 1155                         sc->sc_dp = acb->data_addr;
 1156                         sc->sc_dleft = acb->data_length;
 1157                         sc->sc_cp = (u_char *)&acb->scsipi_cmd;
 1158                         sc->sc_cleft = acb->scsipi_cmd_length;
 1159                         break;
 1160 
 1161                 case MSG_EXTENDED:
 1162                         switch (sc->sc_imess[2]) {
 1163 #if AIC_USE_SYNCHRONOUS
 1164                         case MSG_EXT_SDTR:
 1165                                 if (sc->sc_imess[1] != 3)
 1166                                         goto reject;
 1167                                 ti->period = sc->sc_imess[3];
 1168                                 ti->offset = sc->sc_imess[4];
 1169                                 ti->flags &= ~DO_SYNC;
 1170                                 if (ti->offset == 0) {
 1171                                 } else if (ti->period < sc->sc_minsync ||
 1172                                            ti->period > sc->sc_maxsync ||
 1173                                            ti->offset > 8) {
 1174                                         ti->period = ti->offset = 0;
 1175                                         aic_sched_msgout(sc, SEND_SDTR);
 1176                                 } else {
 1177                                         aic_update_xfer_mode(sc,
 1178                                             acb->xs->xs_periph->periph_target);
 1179                                 }
 1180                                 aic_setsync(sc, ti);
 1181                                 break;
 1182 #endif
 1183 
 1184 #if AIC_USE_WIDE
 1185                         case MSG_EXT_WDTR:
 1186                                 if (sc->sc_imess[1] != 2)
 1187                                         goto reject;
 1188                                 ti->width = sc->sc_imess[3];
 1189                                 ti->flags &= ~DO_WIDE;
 1190                                 if (ti->width == 0) {
 1191                                 } else if (ti->width > AIC_MAX_WIDTH) {
 1192                                         ti->width = 0;
 1193                                         aic_sched_msgout(sc, SEND_WDTR);
 1194                                 } else {
 1195                                         aic_update_xfer_mode(sc,
 1196                                             acb->xs->xs_periph->periph_target);
 1197                                 }
 1198                                 break;
 1199 #endif
 1200 
 1201                         default:
 1202                                 printf("%s: unrecognized MESSAGE EXTENDED; "
 1203                                     "sending REJECT\n", sc->sc_dev.dv_xname);
 1204                                 AIC_BREAK();
 1205                                 goto reject;
 1206                         }
 1207                         break;
 1208 
 1209                 default:
 1210                         printf("%s: unrecognized MESSAGE; sending REJECT\n",
 1211                             sc->sc_dev.dv_xname);
 1212                         AIC_BREAK();
 1213                 reject:
 1214                         aic_sched_msgout(sc, SEND_REJECT);
 1215                         break;
 1216                 }
 1217                 break;
 1218 
 1219         case AIC_RESELECTED:
 1220                 if (!MSG_ISIDENTIFY(sc->sc_imess[0])) {
 1221                         printf("%s: reselect without IDENTIFY; "
 1222                             "sending DEVICE RESET\n", sc->sc_dev.dv_xname);
 1223                         AIC_BREAK();
 1224                         goto reset;
 1225                 }
 1226 
 1227                 (void) aic_reselect(sc, sc->sc_imess[0]);
 1228                 break;
 1229 
 1230         default:
 1231                 printf("%s: unexpected MESSAGE IN; sending DEVICE RESET\n",
 1232                     sc->sc_dev.dv_xname);
 1233                 AIC_BREAK();
 1234         reset:
 1235                 aic_sched_msgout(sc, SEND_DEV_RESET);
 1236                 break;
 1237 
 1238 #ifdef notdef
 1239         abort:
 1240                 aic_sched_msgout(sc, SEND_ABORT);
 1241                 break;
 1242 #endif
 1243         }
 1244 
 1245         bus_space_write_1(iot, ioh, SXFRCTL0, CHEN | SPIOEN);
 1246         /* Ack the last message byte. */
 1247         (void) bus_space_read_1(iot, ioh, SCSIDAT);
 1248         bus_space_write_1(iot, ioh, SXFRCTL0, CHEN);
 1249         while ((bus_space_read_1(iot, ioh, SCSISIG) & ACKI) != 0)
 1250                 ;
 1251 
 1252         /* Go get the next message, if any. */
 1253         goto nextmsg;
 1254 
 1255 out:
 1256         AIC_MISC(("n=%d imess=0x%02x  ", n, sc->sc_imess[0]));
 1257 }
 1258 
 1259 /*
 1260  * Send the highest priority, scheduled message.
 1261  */
 1262 void
 1263 aic_msgout(struct aic_softc *sc)
 1264 {
 1265         bus_space_tag_t iot = sc->sc_iot;
 1266         bus_space_handle_t ioh = sc->sc_ioh;
 1267 #if AIC_USE_SYNCHRONOUS
 1268         struct aic_tinfo *ti;
 1269 #endif
 1270         u_char sstat1;
 1271         int n;
 1272 
 1273         AIC_TRACE(("aic_msgout  "));
 1274 
 1275         /* Reset the FIFO. */
 1276         bus_space_write_1(iot, ioh, DMACNTRL0, RSTFIFO);
 1277         /* Enable REQ/ACK protocol. */
 1278         bus_space_write_1(iot, ioh, SXFRCTL0, CHEN | SPIOEN);
 1279 
 1280         if (sc->sc_prevphase == PH_MSGOUT) {
 1281                 if (sc->sc_omp == sc->sc_omess) {
 1282                         /*
 1283                          * This is a retransmission.
 1284                          *
 1285                          * We get here if the target stayed in MESSAGE OUT
 1286                          * phase.  Section 5.1.9.2 of the SCSI 2 spec indicates
 1287                          * that all of the previously transmitted messages must
 1288                          * be sent again, in the same order.  Therefore, we
 1289                          * requeue all the previously transmitted messages, and
 1290                          * start again from the top.  Our simple priority
 1291                          * scheme keeps the messages in the right order.
 1292                          */
 1293                         AIC_MISC(("retransmitting  "));
 1294                         sc->sc_msgpriq |= sc->sc_msgoutq;
 1295                         /*
 1296                          * Set ATN.  If we're just sending a trivial 1-byte
 1297                          * message, we'll clear ATN later on anyway.
 1298                          */
 1299                         bus_space_write_1(iot, ioh, SCSISIG, PH_MSGOUT | ATNO);
 1300                 } else {
 1301                         /* This is a continuation of the previous message. */
 1302                         n = sc->sc_omp - sc->sc_omess;
 1303                         goto nextbyte;
 1304                 }
 1305         }
 1306 
 1307         /* No messages transmitted so far. */
 1308         sc->sc_msgoutq = 0;
 1309         sc->sc_lastmsg = 0;
 1310 
 1311 nextmsg:
 1312         /* Pick up highest priority message. */
 1313         sc->sc_currmsg = sc->sc_msgpriq & -sc->sc_msgpriq;
 1314         sc->sc_msgpriq &= ~sc->sc_currmsg;
 1315         sc->sc_msgoutq |= sc->sc_currmsg;
 1316 
 1317         /* Build the outgoing message data. */
 1318         switch (sc->sc_currmsg) {
 1319         case SEND_IDENTIFY:
 1320                 AIC_ASSERT(sc->sc_nexus != NULL);
 1321                 sc->sc_omess[0] =
 1322                     MSG_IDENTIFY(sc->sc_nexus->xs->xs_periph->periph_lun, 1);
 1323                 n = 1;
 1324                 break;
 1325 
 1326 #if AIC_USE_SYNCHRONOUS
 1327         case SEND_SDTR:
 1328                 AIC_ASSERT(sc->sc_nexus != NULL);
 1329                 ti = &sc->sc_tinfo[sc->sc_nexus->xs->xs_periph->periph_target];
 1330                 sc->sc_omess[4] = MSG_EXTENDED;
 1331                 sc->sc_omess[3] = 3;
 1332                 sc->sc_omess[2] = MSG_EXT_SDTR;
 1333                 sc->sc_omess[1] = ti->period >> 2;
 1334                 sc->sc_omess[0] = ti->offset;
 1335                 n = 5;
 1336                 break;
 1337 #endif
 1338 
 1339 #if AIC_USE_WIDE
 1340         case SEND_WDTR:
 1341                 AIC_ASSERT(sc->sc_nexus != NULL);
 1342                 ti = &sc->sc_tinfo[sc->sc_nexus->xs->xs_periph->periph_target];
 1343                 sc->sc_omess[3] = MSG_EXTENDED;
 1344                 sc->sc_omess[2] = 2;
 1345                 sc->sc_omess[1] = MSG_EXT_WDTR;
 1346                 sc->sc_omess[0] = ti->width;
 1347                 n = 4;
 1348                 break;
 1349 #endif
 1350 
 1351         case SEND_DEV_RESET:
 1352                 sc->sc_flags |= AIC_ABORTING;
 1353                 sc->sc_omess[0] = MSG_BUS_DEV_RESET;
 1354                 n = 1;
 1355                 break;
 1356 
 1357         case SEND_REJECT:
 1358                 sc->sc_omess[0] = MSG_MESSAGE_REJECT;
 1359                 n = 1;
 1360                 break;
 1361 
 1362         case SEND_PARITY_ERROR:
 1363                 sc->sc_omess[0] = MSG_PARITY_ERROR;
 1364                 n = 1;
 1365                 break;
 1366 
 1367         case SEND_INIT_DET_ERR:
 1368                 sc->sc_omess[0] = MSG_INITIATOR_DET_ERR;
 1369                 n = 1;
 1370                 break;
 1371 
 1372         case SEND_ABORT:
 1373                 sc->sc_flags |= AIC_ABORTING;
 1374                 sc->sc_omess[0] = MSG_ABORT;
 1375                 n = 1;
 1376                 break;
 1377 
 1378         default:
 1379                 printf("%s: unexpected MESSAGE OUT; sending NOOP\n",
 1380                     sc->sc_dev.dv_xname);
 1381                 AIC_BREAK();
 1382                 sc->sc_omess[0] = MSG_NOOP;
 1383                 n = 1;
 1384                 break;
 1385         }
 1386         sc->sc_omp = &sc->sc_omess[n];
 1387 
 1388 nextbyte:
 1389         /* Send message bytes. */
 1390         for (;;) {
 1391                 for (;;) {
 1392                         sstat1 = bus_space_read_1(iot, ioh, SSTAT1);
 1393                         if ((sstat1 & (REQINIT | PHASECHG | BUSFREE)) != 0)
 1394                                 break;
 1395                         /* Wait for REQINIT.  XXX Need timeout. */
 1396                 }
 1397                 if ((sstat1 & (PHASECHG | BUSFREE)) != 0) {
 1398                         /*
 1399                          * Target left MESSAGE OUT, possibly to reject
 1400                          * our message.
 1401                          *
 1402                          * If this is the last message being sent, then we
 1403                          * deassert ATN, since either the target is going to
 1404                          * ignore this message, or it's going to ask for a
 1405                          * retransmission via MESSAGE PARITY ERROR (in which
 1406                          * case we reassert ATN anyway).
 1407                          */
 1408                         if (sc->sc_msgpriq == 0)
 1409                                 bus_space_write_1(iot, ioh, CLRSINT1, CLRATNO);
 1410                         goto out;
 1411                 }
 1412 
 1413                 /* Clear ATN before last byte if this is the last message. */
 1414                 if (n == 1 && sc->sc_msgpriq == 0)
 1415                         bus_space_write_1(iot, ioh, CLRSINT1, CLRATNO);
 1416                 /* Send message byte. */
 1417                 bus_space_write_1(iot, ioh, SCSIDAT, *--sc->sc_omp);
 1418                 --n;
 1419                 /* Keep track of the last message we've sent any bytes of. */
 1420                 sc->sc_lastmsg = sc->sc_currmsg;
 1421                 /* Wait for ACK to be negated.  XXX Need timeout. */
 1422                 while ((bus_space_read_1(iot, ioh, SCSISIG) & ACKI) != 0)
 1423                         ;
 1424 
 1425                 if (n == 0)
 1426                         break;
 1427         }
 1428 
 1429         /* We get here only if the entire message has been transmitted. */
 1430         if (sc->sc_msgpriq != 0) {
 1431                 /* There are more outgoing messages. */
 1432                 goto nextmsg;
 1433         }
 1434 
 1435         /*
 1436          * The last message has been transmitted.  We need to remember the last
 1437          * message transmitted (in case the target switches to MESSAGE IN phase
 1438          * and sends a MESSAGE REJECT), and the list of messages transmitted
 1439          * this time around (in case the target stays in MESSAGE OUT phase to
 1440          * request a retransmit).
 1441          */
 1442 
 1443 out:
 1444         /* Disable REQ/ACK protocol. */
 1445         bus_space_write_1(iot, ioh, SXFRCTL0, CHEN);
 1446 }
 1447 
 1448 /* aic_dataout_pio: perform a data transfer using the FIFO datapath in the
 1449  * aic6360
 1450  * Precondition: The SCSI bus should be in the DOUT phase, with REQ asserted
 1451  * and ACK deasserted (i.e. waiting for a data byte)
 1452  * This new revision has been optimized (I tried) to make the common case fast,
 1453  * and the rarer cases (as a result) somewhat more comlex
 1454  */
 1455 int
 1456 aic_dataout_pio(struct aic_softc *sc, u_char *p, int n)
 1457 {
 1458         bus_space_tag_t iot = sc->sc_iot;
 1459         bus_space_handle_t ioh = sc->sc_ioh;
 1460         u_char dmastat = 0;
 1461         int out = 0;
 1462 #define DOUTAMOUNT 128          /* Full FIFO */
 1463 
 1464         AIC_MISC(("%02x%02x  ", bus_space_read_1(iot, ioh, FIFOSTAT),
 1465             bus_space_read_1(iot, ioh, SSTAT2)));
 1466 
 1467         /* Clear host FIFO and counter. */
 1468         bus_space_write_1(iot, ioh, DMACNTRL0, RSTFIFO | WRITE);
 1469         /* Enable FIFOs. */
 1470         bus_space_write_1(iot, ioh, DMACNTRL0, ENDMA | DWORDPIO | WRITE);
 1471         bus_space_write_1(iot, ioh, SXFRCTL0, SCSIEN | DMAEN | CHEN);
 1472 
 1473         /* Turn off ENREQINIT for now. */
 1474         bus_space_write_1(iot, ioh, SIMODE1,
 1475             ENSCSIRST | ENSCSIPERR | ENBUSFREE | ENPHASECHG);
 1476 
 1477         /* I have tried to make the main loop as tight as possible.  This
 1478          * means that some of the code following the loop is a bit more
 1479          * complex than otherwise.
 1480          */
 1481         while (n > 0) {
 1482                 for (;;) {
 1483                         dmastat = bus_space_read_1(iot, ioh, DMASTAT);
 1484                         if ((dmastat & (DFIFOEMP | INTSTAT)) != 0)
 1485                                 break;
 1486                 }
 1487 
 1488                 if ((dmastat & INTSTAT) != 0)
 1489                         goto phasechange;
 1490 
 1491                 if (n >= DOUTAMOUNT) {
 1492                         n -= DOUTAMOUNT;
 1493                         out += DOUTAMOUNT;
 1494 
 1495 #if AIC_USE_DWORDS
 1496                         bus_space_write_multi_4(iot, ioh, DMADATALONG,
 1497                             (u_int32_t *) p, DOUTAMOUNT >> 2);
 1498 #else
 1499                         bus_space_write_multi_2(iot, ioh, DMADATA,
 1500                             (u_int16_t *) p, DOUTAMOUNT >> 1);
 1501 #endif
 1502 
 1503                         p += DOUTAMOUNT;
 1504                 } else {
 1505                         int xfer;
 1506 
 1507                         xfer = n;
 1508                         AIC_MISC(("%d> ", xfer));
 1509 
 1510                         n -= xfer;
 1511                         out += xfer;
 1512 
 1513 #if AIC_USE_DWORDS
 1514                         if (xfer >= 12) {
 1515                                 bus_space_write_multi_4(iot, ioh, DMADATALONG,
 1516                                     (u_int32_t *) p, xfer >> 2);
 1517                                 p += xfer & ~3;
 1518                                 xfer &= 3;
 1519                         }
 1520 #else
 1521                         if (xfer >= 8) {
 1522                                 bus_space_write_multi_2(iot, ioh, DMADATA,
 1523                                     (u_int16_t *) p, xfer >> 1);
 1524                                 p += xfer & ~1;
 1525                                 xfer &= 1;
 1526                         }
 1527 #endif
 1528 
 1529                         if (xfer > 0) {
 1530                                 bus_space_write_1(iot, ioh, DMACNTRL0,
 1531                                     ENDMA | B8MODE | WRITE);
 1532                                 bus_space_write_multi_1(iot, ioh, DMADATA,
 1533                                     p, xfer);
 1534                                 p += xfer;
 1535                                 bus_space_write_1(iot, ioh, DMACNTRL0,
 1536                                     ENDMA | DWORDPIO | WRITE);
 1537                         }
 1538                 }
 1539         }
 1540 
 1541         if (out == 0) {
 1542                 bus_space_write_1(iot, ioh, SXFRCTL1, BITBUCKET);
 1543                 for (;;) {
 1544                         if ((bus_space_read_1(iot, ioh, DMASTAT) & INTSTAT)
 1545                             != 0)
 1546                                 break;
 1547                 }
 1548                 bus_space_write_1(iot, ioh, SXFRCTL1, 0);
 1549                 AIC_MISC(("extra data  "));
 1550         } else {
 1551                 /* See the bytes off chip */
 1552                 for (;;) {
 1553                         dmastat = bus_space_read_1(iot, ioh, DMASTAT);
 1554                         if ((dmastat & INTSTAT) != 0)
 1555                                 goto phasechange;
 1556                         if ((dmastat & DFIFOEMP) != 0 &&
 1557                             (bus_space_read_1(iot, ioh, SSTAT2) & SEMPTY) != 0)
 1558                                 break;
 1559                 }
 1560         }
 1561 
 1562 phasechange:
 1563         if ((dmastat & INTSTAT) != 0) {
 1564                 /* Some sort of phase change. */
 1565                 int amount;
 1566 
 1567                 /* Stop transfers, do some accounting */
 1568                 amount = bus_space_read_1(iot, ioh, FIFOSTAT)
 1569                     + (bus_space_read_1(iot, ioh, SSTAT2) & 15);
 1570                 if (amount > 0) {
 1571                         out -= amount;
 1572                         bus_space_write_1(iot, ioh, DMACNTRL0,
 1573                             RSTFIFO | WRITE);
 1574                         bus_space_write_1(iot, ioh, SXFRCTL0, CHEN | CLRCH);
 1575                         AIC_MISC(("+%d ", amount));
 1576                 }
 1577         }
 1578 
 1579         /* Turn on ENREQINIT again. */
 1580         bus_space_write_1(iot, ioh, SIMODE1,
 1581             ENSCSIRST | ENSCSIPERR | ENBUSFREE | ENREQINIT | ENPHASECHG);
 1582 
 1583         /* Stop the FIFO data path. */
 1584         bus_space_write_1(iot, ioh, SXFRCTL0, CHEN);
 1585         bus_space_write_1(iot, ioh, DMACNTRL0, 0);
 1586 
 1587         return out;
 1588 }
 1589 
 1590 /* aic_datain_pio: perform data transfers using the FIFO datapath in the
 1591  * aic6360
 1592  * Precondition: The SCSI bus should be in the DIN phase, with REQ asserted
 1593  * and ACK deasserted (i.e. at least one byte is ready).
 1594  * For now, uses a pretty dumb algorithm, hangs around until all data has been
 1595  * transferred.  This, is OK for fast targets, but not so smart for slow
 1596  * targets which don't disconnect or for huge transfers.
 1597  */
 1598 int
 1599 aic_datain_pio(struct aic_softc *sc, u_char *p, int n)
 1600 {
 1601         bus_space_tag_t iot = sc->sc_iot;
 1602         bus_space_handle_t ioh = sc->sc_ioh;
 1603         u_char dmastat;
 1604         int in = 0;
 1605 #define DINAMOUNT 128           /* Full FIFO */
 1606 
 1607         AIC_MISC(("%02x%02x  ", bus_space_read_1(iot, ioh, FIFOSTAT),
 1608             bus_space_read_1(iot, ioh, SSTAT2)));
 1609 
 1610         /* Clear host FIFO and counter. */
 1611         bus_space_write_1(iot, ioh, DMACNTRL0, RSTFIFO);
 1612         /* Enable FIFOs. */
 1613         bus_space_write_1(iot, ioh, DMACNTRL0, ENDMA | DWORDPIO);
 1614         bus_space_write_1(iot, ioh, SXFRCTL0, SCSIEN | DMAEN | CHEN);
 1615 
 1616         /* Turn off ENREQINIT for now. */
 1617         bus_space_write_1(iot, ioh, SIMODE1,
 1618             ENSCSIRST | ENSCSIPERR | ENBUSFREE | ENPHASECHG);
 1619 
 1620         /* We leave this loop if one or more of the following is true:
 1621          * a) phase != PH_DATAIN && FIFOs are empty
 1622          * b) SCSIRSTI is set (a reset has occurred) or busfree is detected.
 1623          */
 1624         while (n > 0) {
 1625                 /* Wait for fifo half full or phase mismatch */
 1626                 for (;;) {
 1627                         dmastat = bus_space_read_1(iot, ioh, DMASTAT);
 1628                         if ((dmastat & (DFIFOFULL | INTSTAT)) != 0)
 1629                                 break;
 1630                 }
 1631 
 1632                 if ((dmastat & DFIFOFULL) != 0) {
 1633                         n -= DINAMOUNT;
 1634                         in += DINAMOUNT;
 1635 
 1636 #if AIC_USE_DWORDS
 1637                         bus_space_read_multi_4(iot, ioh, DMADATALONG,
 1638                             (u_int32_t *) p, DINAMOUNT >> 2);
 1639 #else
 1640                         bus_space_read_multi_2(iot, ioh, DMADATA,
 1641                             (u_int16_t *) p, DINAMOUNT >> 1);
 1642 #endif
 1643 
 1644                         p += DINAMOUNT;
 1645                 } else {
 1646                         int xfer;
 1647 
 1648                         xfer = min(bus_space_read_1(iot, ioh, FIFOSTAT), n);
 1649                         AIC_MISC((">%d ", xfer));
 1650 
 1651                         n -= xfer;
 1652                         in += xfer;
 1653 
 1654 #if AIC_USE_DWORDS
 1655                         if (xfer >= 12) {
 1656                                 bus_space_read_multi_4(iot, ioh, DMADATALONG,
 1657                                     (u_int32_t *) p, xfer >> 2);
 1658                                 p += xfer & ~3;
 1659                                 xfer &= 3;
 1660                         }
 1661 #else
 1662                         if (xfer >= 8) {
 1663                                 bus_space_read_multi_2(iot, ioh, DMADATA,
 1664                                     (u_int16_t *) p, xfer >> 1);
 1665                                 p += xfer & ~1;
 1666                                 xfer &= 1;
 1667                         }
 1668 #endif
 1669 
 1670                         if (xfer > 0) {
 1671                                 bus_space_write_1(iot, ioh, DMACNTRL0,
 1672                                     ENDMA | B8MODE);
 1673                                 bus_space_read_multi_1(iot, ioh, DMADATA,
 1674                                     p, xfer);
 1675                                 p += xfer;
 1676                                 bus_space_write_1(iot, ioh, DMACNTRL0,
 1677                                     ENDMA | DWORDPIO);
 1678                         }
 1679                 }
 1680 
 1681                 if ((dmastat & INTSTAT) != 0)
 1682                         goto phasechange;
 1683         }
 1684 
 1685         /* Some SCSI-devices are rude enough to transfer more data than what
 1686          * was requested, e.g. 2048 bytes from a CD-ROM instead of the
 1687          * requested 512.  Test for progress, i.e. real transfers.  If no real
 1688          * transfers have been performed (n is probably already zero) and the
 1689          * FIFO is not empty, waste some bytes....
 1690          */
 1691         if (in == 0) {
 1692                 bus_space_write_1(iot, ioh, SXFRCTL1, BITBUCKET);
 1693                 for (;;) {
 1694                         if ((bus_space_read_1(iot, ioh, DMASTAT) & INTSTAT)
 1695                             != 0)
 1696                                 break;
 1697                 }
 1698                 bus_space_write_1(iot, ioh, SXFRCTL1, 0);
 1699                 AIC_MISC(("extra data  "));
 1700         }
 1701 
 1702 phasechange:
 1703         /* Turn on ENREQINIT again. */
 1704         bus_space_write_1(iot, ioh, SIMODE1,
 1705             ENSCSIRST | ENSCSIPERR | ENBUSFREE | ENREQINIT | ENPHASECHG);
 1706 
 1707         /* Stop the FIFO data path. */
 1708         bus_space_write_1(iot, ioh, SXFRCTL0, CHEN);
 1709         bus_space_write_1(iot, ioh, DMACNTRL0, 0);
 1710 
 1711         return in;
 1712 }
 1713 
 1714 /*
 1715  * This is the workhorse routine of the driver.
 1716  * Deficiencies (for now):
 1717  * 1) always uses programmed I/O
 1718  */
 1719 int
 1720 aicintr(void *arg)
 1721 {
 1722         struct aic_softc *sc = arg;
 1723         bus_space_tag_t iot = sc->sc_iot;
 1724         bus_space_handle_t ioh = sc->sc_ioh;
 1725         u_char sstat0, sstat1;
 1726         struct aic_acb *acb;
 1727         struct scsipi_periph *periph;
 1728         struct aic_tinfo *ti;
 1729         int n;
 1730 
 1731         if ((sc->sc_dev.dv_flags & DVF_ACTIVE) == 0)
 1732                 return (0);
 1733 
 1734         /*
 1735          * Clear INTEN.  We enable it again before returning.  This makes the
 1736          * interrupt esssentially level-triggered.
 1737          */
 1738         bus_space_write_1(iot, ioh, DMACNTRL0, 0);
 1739 
 1740         AIC_TRACE(("aicintr  "));
 1741 
 1742 loop:
 1743         /*
 1744          * First check for abnormal conditions, such as reset.
 1745          */
 1746         sstat1 = bus_space_read_1(iot, ioh, SSTAT1);
 1747         AIC_MISC(("sstat1:0x%02x ", sstat1));
 1748 
 1749         if ((sstat1 & SCSIRSTI) != 0) {
 1750                 printf("%s: SCSI bus reset\n", sc->sc_dev.dv_xname);
 1751                 goto reset;
 1752         }
 1753 
 1754         /*
 1755          * Check for less serious errors.
 1756          */
 1757         if ((sstat1 & SCSIPERR) != 0) {
 1758                 printf("%s: SCSI bus parity error\n", sc->sc_dev.dv_xname);
 1759                 bus_space_write_1(iot, ioh, CLRSINT1, CLRSCSIPERR);
 1760                 if (sc->sc_prevphase == PH_MSGIN) {
 1761                         sc->sc_flags |= AIC_DROP_MSGIN;
 1762                         aic_sched_msgout(sc, SEND_PARITY_ERROR);
 1763                 } else
 1764                         aic_sched_msgout(sc, SEND_INIT_DET_ERR);
 1765         }
 1766 
 1767         /*
 1768          * If we're not already busy doing something test for the following
 1769          * conditions:
 1770          * 1) We have been reselected by something
 1771          * 2) We have selected something successfully
 1772          * 3) Our selection process has timed out
 1773          * 4) This is really a bus free interrupt just to get a new command
 1774          *    going?
 1775          * 5) Spurious interrupt?
 1776          */
 1777         switch (sc->sc_state) {
 1778         case AIC_IDLE:
 1779         case AIC_SELECTING:
 1780                 sstat0 = bus_space_read_1(iot, ioh, SSTAT0);
 1781                 AIC_MISC(("sstat0:0x%02x ", sstat0));
 1782 
 1783                 if ((sstat0 & TARGET) != 0) {
 1784                         /*
 1785                          * We don't currently support target mode.
 1786                          */
 1787                         printf("%s: target mode selected; going to BUS FREE\n",
 1788                             sc->sc_dev.dv_xname);
 1789                         bus_space_write_1(iot, ioh, SCSISIG, 0);
 1790 
 1791                         goto sched;
 1792                 } else if ((sstat0 & SELDI) != 0) {
 1793                         AIC_MISC(("reselected  "));
 1794 
 1795                         /*
 1796                          * If we're trying to select a target ourselves,
 1797                          * push our command back into the ready list.
 1798                          */
 1799                         if (sc->sc_state == AIC_SELECTING) {
 1800                                 AIC_MISC(("backoff selector  "));
 1801                                 AIC_ASSERT(sc->sc_nexus != NULL);
 1802                                 acb = sc->sc_nexus;
 1803                                 sc->sc_nexus = NULL;
 1804                                 TAILQ_INSERT_HEAD(&sc->ready_list, acb, chain);
 1805                         }
 1806 
 1807                         /* Save reselection ID. */
 1808                         sc->sc_selid = bus_space_read_1(iot, ioh, SELID);
 1809 
 1810                         sc->sc_state = AIC_RESELECTED;
 1811                 } else if ((sstat0 & SELDO) != 0) {
 1812                         AIC_MISC(("selected  "));
 1813 
 1814                         /* We have selected a target. Things to do:
 1815                          * a) Determine what message(s) to send.
 1816                          * b) Verify that we're still selecting the target.
 1817                          * c) Mark device as busy.
 1818                          */
 1819                         if (sc->sc_state != AIC_SELECTING) {
 1820                                 printf("%s: selection out while idle; "
 1821                                     "resetting\n", sc->sc_dev.dv_xname);
 1822                                 AIC_BREAK();
 1823                                 goto reset;
 1824                         }
 1825                         AIC_ASSERT(sc->sc_nexus != NULL);
 1826                         acb = sc->sc_nexus;
 1827                         periph = acb->xs->xs_periph;
 1828                         ti = &sc->sc_tinfo[periph->periph_target];
 1829 
 1830                         sc->sc_msgpriq = SEND_IDENTIFY;
 1831                         if (acb->flags & ACB_RESET)
 1832                                 sc->sc_msgpriq |= SEND_DEV_RESET;
 1833                         else if (acb->flags & ACB_ABORT)
 1834                                 sc->sc_msgpriq |= SEND_ABORT;
 1835                         else {
 1836 #if AIC_USE_SYNCHRONOUS
 1837                                 if ((ti->flags & DO_SYNC) != 0)
 1838                                         sc->sc_msgpriq |= SEND_SDTR;
 1839 #endif
 1840 #if AIC_USE_WIDE
 1841                                 if ((ti->flags & DO_WIDE) != 0)
 1842                                         sc->sc_msgpriq |= SEND_WDTR;
 1843 #endif
 1844                         }
 1845 
 1846                         acb->flags |= ACB_NEXUS;
 1847                         ti->lubusy |= (1 << periph->periph_lun);
 1848 
 1849                         /* Do an implicit RESTORE POINTERS. */
 1850                         sc->sc_dp = acb->data_addr;
 1851                         sc->sc_dleft = acb->data_length;
 1852                         sc->sc_cp = (u_char *)&acb->scsipi_cmd;
 1853                         sc->sc_cleft = acb->scsipi_cmd_length;
 1854 
 1855                         /* On our first connection, schedule a timeout. */
 1856                         if ((acb->xs->xs_control & XS_CTL_POLL) == 0)
 1857                                 callout_reset(&acb->xs->xs_callout,
 1858                                     mstohz(acb->timeout), aic_timeout, acb);
 1859 
 1860                         sc->sc_state = AIC_CONNECTED;
 1861                 } else if ((sstat1 & SELTO) != 0) {
 1862                         AIC_MISC(("selection timeout  "));
 1863 
 1864                         if (sc->sc_state != AIC_SELECTING) {
 1865                                 printf("%s: selection timeout while idle; "
 1866                                     "resetting\n", sc->sc_dev.dv_xname);
 1867                                 AIC_BREAK();
 1868                                 goto reset;
 1869                         }
 1870                         AIC_ASSERT(sc->sc_nexus != NULL);
 1871                         acb = sc->sc_nexus;
 1872 
 1873                         bus_space_write_1(iot, ioh, SXFRCTL1, 0);
 1874                         bus_space_write_1(iot, ioh, SCSISEQ, ENRESELI);
 1875                         bus_space_write_1(iot, ioh, CLRSINT1, CLRSELTIMO);
 1876                         delay(250);
 1877 
 1878                         acb->xs->error = XS_SELTIMEOUT;
 1879                         goto finish;
 1880                 } else {
 1881                         if (sc->sc_state != AIC_IDLE) {
 1882                                 printf("%s: BUS FREE while not idle; "
 1883                                     "state=%d\n",
 1884                                     sc->sc_dev.dv_xname, sc->sc_state);
 1885                                 AIC_BREAK();
 1886                                 goto out;
 1887                         }
 1888 
 1889                         goto sched;
 1890                 }
 1891 
 1892                 /*
 1893                  * Turn off selection stuff, and prepare to catch bus free
 1894                  * interrupts, parity errors, and phase changes.
 1895                  */
 1896                 bus_space_write_1(iot, ioh, SXFRCTL0, CHEN | CLRSTCNT | CLRCH);
 1897                 bus_space_write_1(iot, ioh, SXFRCTL1, 0);
 1898                 bus_space_write_1(iot, ioh, SCSISEQ, ENAUTOATNP);
 1899                 bus_space_write_1(iot, ioh, CLRSINT0, CLRSELDI | CLRSELDO);
 1900                 bus_space_write_1(iot, ioh, CLRSINT1,
 1901                     CLRBUSFREE | CLRPHASECHG);
 1902                 bus_space_write_1(iot, ioh, SIMODE0, 0);
 1903                 bus_space_write_1(iot, ioh, SIMODE1,
 1904                     ENSCSIRST | ENSCSIPERR | ENBUSFREE | ENREQINIT |
 1905                     ENPHASECHG);
 1906 
 1907                 sc->sc_flags = 0;
 1908                 sc->sc_prevphase = PH_INVALID;
 1909                 goto dophase;
 1910         }
 1911 
 1912         if ((sstat1 & BUSFREE) != 0) {
 1913                 /* We've gone to BUS FREE phase. */
 1914                 bus_space_write_1(iot, ioh, CLRSINT1,
 1915                     CLRBUSFREE | CLRPHASECHG);
 1916 
 1917                 switch (sc->sc_state) {
 1918                 case AIC_RESELECTED:
 1919                         goto sched;
 1920 
 1921                 case AIC_CONNECTED:
 1922                         AIC_ASSERT(sc->sc_nexus != NULL);
 1923                         acb = sc->sc_nexus;
 1924 
 1925 #if AIC_USE_SYNCHRONOUS + AIC_USE_WIDE
 1926                         if (sc->sc_prevphase == PH_MSGOUT) {
 1927                                 /*
 1928                                  * If the target went to BUS FREE phase during
 1929                                  * or immediately after sending a SDTR or WDTR
 1930                                  * message, disable negotiation.
 1931                                  */
 1932                                 periph = acb->xs->xs_periph;
 1933                                 ti = &sc->sc_tinfo[periph->periph_target];
 1934                                 switch (sc->sc_lastmsg) {
 1935 #if AIC_USE_SYNCHRONOUS
 1936                                 case SEND_SDTR:
 1937                                         ti->flags &= ~DO_SYNC;
 1938                                         ti->period = ti->offset = 0;
 1939                                         break;
 1940 #endif
 1941 #if AIC_USE_WIDE
 1942                                 case SEND_WDTR:
 1943                                         ti->flags &= ~DO_WIDE;
 1944                                         ti->width = 0;
 1945                                         break;
 1946 #endif
 1947                                 }
 1948                         }
 1949 #endif
 1950 
 1951                         if ((sc->sc_flags & AIC_ABORTING) == 0) {
 1952                                 /*
 1953                                  * Section 5.1.1 of the SCSI 2 spec suggests
 1954                                  * issuing a REQUEST SENSE following an
 1955                                  * unexpected disconnect.  Some devices go into
 1956                                  * a contingent allegiance condition when
 1957                                  * disconnecting, and this is necessary to
 1958                                  * clean up their state.
 1959                                  */
 1960                                 printf("%s: unexpected disconnect; "
 1961                                     "sending REQUEST SENSE\n",
 1962                                     sc->sc_dev.dv_xname);
 1963                                 AIC_BREAK();
 1964                                 aic_sense(sc, acb);
 1965                                 goto out;
 1966                         }
 1967 
 1968                         acb->xs->error = XS_DRIVER_STUFFUP;
 1969                         goto finish;
 1970 
 1971                 case AIC_DISCONNECT:
 1972                         AIC_ASSERT(sc->sc_nexus != NULL);
 1973                         acb = sc->sc_nexus;
 1974 #if 1 /* XXXX */
 1975                         acb->data_addr = sc->sc_dp;
 1976                         acb->data_length = sc->sc_dleft;
 1977 #endif
 1978                         TAILQ_INSERT_HEAD(&sc->nexus_list, acb, chain);
 1979                         sc->sc_nexus = NULL;
 1980                         goto sched;
 1981 
 1982                 case AIC_CMDCOMPLETE:
 1983                         AIC_ASSERT(sc->sc_nexus != NULL);
 1984                         acb = sc->sc_nexus;
 1985                         goto finish;
 1986                 }
 1987         }
 1988 
 1989         bus_space_write_1(iot, ioh, CLRSINT1, CLRPHASECHG);
 1990 
 1991 dophase:
 1992         if ((sstat1 & REQINIT) == 0) {
 1993                 /* Wait for REQINIT. */
 1994                 goto out;
 1995         }
 1996 
 1997         sc->sc_phase = bus_space_read_1(iot, ioh, SCSISIG) & PH_MASK;
 1998         bus_space_write_1(iot, ioh, SCSISIG, sc->sc_phase);
 1999 
 2000         switch (sc->sc_phase) {
 2001         case PH_MSGOUT:
 2002                 if (sc->sc_state != AIC_CONNECTED &&
 2003                     sc->sc_state != AIC_RESELECTED)
 2004                         break;
 2005                 aic_msgout(sc);
 2006                 sc->sc_prevphase = PH_MSGOUT;
 2007                 goto loop;
 2008 
 2009         case PH_MSGIN:
 2010                 if (sc->sc_state != AIC_CONNECTED &&
 2011                     sc->sc_state != AIC_RESELECTED)
 2012                         break;
 2013                 aic_msgin(sc);
 2014                 sc->sc_prevphase = PH_MSGIN;
 2015                 goto loop;
 2016 
 2017         case PH_CMD:
 2018                 if (sc->sc_state != AIC_CONNECTED)
 2019                         break;
 2020 #if AIC_DEBUG
 2021                 if ((aic_debug & AIC_SHOWMISC) != 0) {
 2022                         AIC_ASSERT(sc->sc_nexus != NULL);
 2023                         acb = sc->sc_nexus;
 2024                         printf("cmd=0x%02x+%d ",
 2025                             acb->scsipi_cmd.opcode, acb->scsipi_cmd_length-1);
 2026                 }
 2027 #endif
 2028                 n = aic_dataout_pio(sc, sc->sc_cp, sc->sc_cleft);
 2029                 sc->sc_cp += n;
 2030                 sc->sc_cleft -= n;
 2031                 sc->sc_prevphase = PH_CMD;
 2032                 goto loop;
 2033 
 2034         case PH_DATAOUT:
 2035                 if (sc->sc_state != AIC_CONNECTED)
 2036                         break;
 2037                 AIC_MISC(("dataout %ld ", (long)sc->sc_dleft));
 2038                 n = aic_dataout_pio(sc, sc->sc_dp, sc->sc_dleft);
 2039                 sc->sc_dp += n;
 2040                 sc->sc_dleft -= n;
 2041                 sc->sc_prevphase = PH_DATAOUT;
 2042                 goto loop;
 2043 
 2044         case PH_DATAIN:
 2045                 if (sc->sc_state != AIC_CONNECTED)
 2046                         break;
 2047                 AIC_MISC(("datain %ld ", (long)sc->sc_dleft));
 2048                 n = aic_datain_pio(sc, sc->sc_dp, sc->sc_dleft);
 2049                 sc->sc_dp += n;
 2050                 sc->sc_dleft -= n;
 2051                 sc->sc_prevphase = PH_DATAIN;
 2052                 goto loop;
 2053 
 2054         case PH_STAT:
 2055                 if (sc->sc_state != AIC_CONNECTED)
 2056                         break;
 2057                 AIC_ASSERT(sc->sc_nexus != NULL);
 2058                 acb = sc->sc_nexus;
 2059                 bus_space_write_1(iot, ioh, SXFRCTL0, CHEN | SPIOEN);
 2060                 acb->target_stat = bus_space_read_1(iot, ioh, SCSIDAT);
 2061                 bus_space_write_1(iot, ioh, SXFRCTL0, CHEN);
 2062                 AIC_MISC(("target_stat=0x%02x  ", acb->target_stat));
 2063                 sc->sc_prevphase = PH_STAT;
 2064                 goto loop;
 2065         }
 2066 
 2067         printf("%s: unexpected bus phase; resetting\n", sc->sc_dev.dv_xname);
 2068         AIC_BREAK();
 2069 reset:
 2070         aic_init(sc, 1);
 2071         return 1;
 2072 
 2073 finish:
 2074         callout_stop(&acb->xs->xs_callout);
 2075         aic_done(sc, acb);
 2076         goto out;
 2077 
 2078 sched:
 2079         sc->sc_state = AIC_IDLE;
 2080         aic_sched(sc);
 2081         goto out;
 2082 
 2083 out:
 2084         bus_space_write_1(iot, ioh, DMACNTRL0, INTEN);
 2085         return 1;
 2086 }
 2087 
 2088 void
 2089 aic_abort(struct aic_softc *sc, struct aic_acb *acb)
 2090 {
 2091 
 2092         /* 2 secs for the abort */
 2093         acb->timeout = AIC_ABORT_TIMEOUT;
 2094         acb->flags |= ACB_ABORT;
 2095 
 2096         if (acb == sc->sc_nexus) {
 2097                 /*
 2098                  * If we're still selecting, the message will be scheduled
 2099                  * after selection is complete.
 2100                  */
 2101                 if (sc->sc_state == AIC_CONNECTED)
 2102                         aic_sched_msgout(sc, SEND_ABORT);
 2103         } else {
 2104                 aic_dequeue(sc, acb);
 2105                 TAILQ_INSERT_HEAD(&sc->ready_list, acb, chain);
 2106                 if (sc->sc_state == AIC_IDLE)
 2107                         aic_sched(sc);
 2108         }
 2109 }
 2110 
 2111 void
 2112 aic_timeout(void *arg)
 2113 {
 2114         struct aic_acb *acb = arg;
 2115         struct scsipi_xfer *xs = acb->xs;
 2116         struct scsipi_periph *periph = xs->xs_periph;
 2117         struct aic_softc *sc =
 2118             (void *)periph->periph_channel->chan_adapter->adapt_dev;
 2119         int s;
 2120 
 2121         scsipi_printaddr(periph);
 2122         printf("timed out");
 2123 
 2124         s = splbio();
 2125 
 2126         if (acb->flags & ACB_ABORT) {
 2127                 /* abort timed out */
 2128                 printf(" AGAIN\n");
 2129                 /* XXX Must reset! */
 2130         } else {
 2131                 /* abort the operation that has timed out */
 2132                 printf("\n");
 2133                 acb->xs->error = XS_TIMEOUT;
 2134                 aic_abort(sc, acb);
 2135         }
 2136 
 2137         splx(s);
 2138 }
 2139 
 2140 #ifdef AIC_DEBUG
 2141 /*
 2142  * The following functions are mostly used for debugging purposes, either
 2143  * directly called from the driver or from the kernel debugger.
 2144  */
 2145 
 2146 void
 2147 aic_show_scsi_cmd(struct aic_acb *acb)
 2148 {
 2149         u_char  *b = (u_char *)&acb->scsipi_cmd;
 2150         struct scsipi_periph *periph = acb->xs->xs_periph;
 2151         int i;
 2152 
 2153         scsipi_printaddr(periph);
 2154         if ((acb->xs->xs_control & XS_CTL_RESET) == 0) {
 2155                 for (i = 0; i < acb->scsipi_cmd_length; i++) {
 2156                         if (i)
 2157                                 printf(",");
 2158                         printf("%x", b[i]);
 2159                 }
 2160                 printf("\n");
 2161         } else
 2162                 printf("RESET\n");
 2163 }
 2164 
 2165 void
 2166 aic_print_acb(struct aic_acb *acb)
 2167 {
 2168 
 2169         printf("acb@%p xs=%p flags=%x", acb, acb->xs, acb->flags);
 2170         printf(" dp=%p dleft=%d target_stat=%x\n",
 2171                acb->data_addr, acb->data_length, acb->target_stat);
 2172         aic_show_scsi_cmd(acb);
 2173 }
 2174 
 2175 void
 2176 aic_print_active_acb(void)
 2177 {
 2178         extern struct cfdriver aic_cd;
 2179         struct aic_acb *acb;
 2180         struct aic_softc *sc = aic_cd.cd_devs[0];
 2181 
 2182         printf("ready list:\n");
 2183         for (acb = sc->ready_list.tqh_first; acb != NULL;
 2184             acb = acb->chain.tqe_next)
 2185                 aic_print_acb(acb);
 2186         printf("nexus:\n");
 2187         if (sc->sc_nexus != NULL)
 2188                 aic_print_acb(sc->sc_nexus);
 2189         printf("nexus list:\n");
 2190         for (acb = sc->nexus_list.tqh_first; acb != NULL;
 2191             acb = acb->chain.tqe_next)
 2192                 aic_print_acb(acb);
 2193 }
 2194 
 2195 void
 2196 aic_dump6360(struct aic_softc *sc)
 2197 {
 2198         bus_space_tag_t iot = sc->sc_iot;
 2199         bus_space_handle_t ioh = sc->sc_ioh;
 2200 
 2201         printf("aic6360: SCSISEQ=%x SXFRCTL0=%x SXFRCTL1=%x SCSISIG=%x\n",
 2202             bus_space_read_1(iot, ioh, SCSISEQ),
 2203             bus_space_read_1(iot, ioh, SXFRCTL0),
 2204             bus_space_read_1(iot, ioh, SXFRCTL1),
 2205             bus_space_read_1(iot, ioh, SCSISIG));
 2206         printf("         SSTAT0=%x SSTAT1=%x SSTAT2=%x SSTAT3=%x SSTAT4=%x\n",
 2207             bus_space_read_1(iot, ioh, SSTAT0),
 2208             bus_space_read_1(iot, ioh, SSTAT1),
 2209             bus_space_read_1(iot, ioh, SSTAT2),
 2210             bus_space_read_1(iot, ioh, SSTAT3),
 2211             bus_space_read_1(iot, ioh, SSTAT4));
 2212         printf("         SIMODE0=%x SIMODE1=%x DMACNTRL0=%x DMACNTRL1=%x "
 2213             "DMASTAT=%x\n",
 2214             bus_space_read_1(iot, ioh, SIMODE0),
 2215             bus_space_read_1(iot, ioh, SIMODE1),
 2216             bus_space_read_1(iot, ioh, DMACNTRL0),
 2217             bus_space_read_1(iot, ioh, DMACNTRL1),
 2218             bus_space_read_1(iot, ioh, DMASTAT));
 2219         printf("         FIFOSTAT=%d SCSIBUS=0x%x\n",
 2220             bus_space_read_1(iot, ioh, FIFOSTAT),
 2221             bus_space_read_1(iot, ioh, SCSIBUS));
 2222 }
 2223 
 2224 void
 2225 aic_dump_driver(struct aic_softc *sc)
 2226 {
 2227         struct aic_tinfo *ti;
 2228         int i;
 2229 
 2230         printf("nexus=%p prevphase=%x\n", sc->sc_nexus, sc->sc_prevphase);
 2231         printf("state=%x msgin=%x msgpriq=%x msgoutq=%x lastmsg=%x "
 2232             "currmsg=%x\n",
 2233             sc->sc_state, sc->sc_imess[0],
 2234             sc->sc_msgpriq, sc->sc_msgoutq, sc->sc_lastmsg, sc->sc_currmsg);
 2235         for (i = 0; i < 7; i++) {
 2236                 ti = &sc->sc_tinfo[i];
 2237                 printf("tinfo%d: %d cmds %d disconnects %d timeouts",
 2238                     i, ti->cmds, ti->dconns, ti->touts);
 2239                 printf(" %d senses flags=%x\n", ti->senses, ti->flags);
 2240         }
 2241 }
 2242 #endif

Cache object: af56f0a4b5234fb427cfb12dff63edd2


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]


This page is part of the FreeBSD/Linux Linux Kernel Cross-Reference, and was automatically generated using a modified version of the LXR engine.