Home | History | Annotate | Line # | Download | only in ic
isp_netbsd.c revision 1.24
      1  1.24  thorpej /* $NetBSD: isp_netbsd.c,v 1.24 2000/03/23 07:01:31 thorpej Exp $ */
      2   1.1   mjacob /*
      3   1.1   mjacob  * Platform (NetBSD) dependent common attachment code for Qlogic adapters.
      4  1.15   mjacob  * Matthew Jacob <mjacob (at) nas.nasa.gov>
      5  1.15   mjacob  */
      6  1.15   mjacob /*
      7  1.15   mjacob  * Copyright (C) 1997, 1998, 1999 National Aeronautics & Space Administration
      8   1.1   mjacob  * All rights reserved.
      9   1.1   mjacob  *
     10   1.1   mjacob  * Redistribution and use in source and binary forms, with or without
     11   1.1   mjacob  * modification, are permitted provided that the following conditions
     12   1.1   mjacob  * are met:
     13   1.1   mjacob  * 1. Redistributions of source code must retain the above copyright
     14  1.15   mjacob  *    notice, this list of conditions and the following disclaimer.
     15   1.1   mjacob  * 2. Redistributions in binary form must reproduce the above copyright
     16   1.1   mjacob  *    notice, this list of conditions and the following disclaimer in the
     17   1.1   mjacob  *    documentation and/or other materials provided with the distribution.
     18   1.1   mjacob  * 3. The name of the author may not be used to endorse or promote products
     19  1.15   mjacob  *    derived from this software without specific prior written permission
     20   1.1   mjacob  *
     21  1.15   mjacob  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     22  1.15   mjacob  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     23  1.15   mjacob  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     24  1.15   mjacob  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     25  1.15   mjacob  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     26  1.15   mjacob  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     27  1.15   mjacob  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     28  1.15   mjacob  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     29  1.15   mjacob  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     30  1.15   mjacob  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     31   1.1   mjacob  */
     32   1.1   mjacob 
     33   1.1   mjacob #include <dev/ic/isp_netbsd.h>
     34  1.17   mjacob #include <sys/scsiio.h>
     35   1.1   mjacob 
     36   1.1   mjacob static void ispminphys __P((struct buf *));
     37  1.17   mjacob static int32_t ispcmd_slow __P((ISP_SCSI_XFER_T *));
     38   1.1   mjacob static int32_t ispcmd __P((ISP_SCSI_XFER_T *));
     39  1.17   mjacob static int
     40  1.17   mjacob ispioctl __P((struct scsipi_link *, u_long, caddr_t, int, struct proc *));
     41   1.1   mjacob 
     42   1.1   mjacob static struct scsipi_device isp_dev = { NULL, NULL, NULL, NULL };
     43   1.1   mjacob static int isp_poll __P((struct ispsoftc *, ISP_SCSI_XFER_T *, int));
     44  1.10   mjacob static void isp_watch __P((void *));
     45  1.17   mjacob static void isp_command_requeue __P((void *));
     46  1.10   mjacob static void isp_internal_restart __P((void *));
     47  1.10   mjacob 
     48   1.1   mjacob /*
     49   1.1   mjacob  * Complete attachment of hardware, include subdevices.
     50   1.1   mjacob  */
     51   1.1   mjacob void
     52   1.1   mjacob isp_attach(isp)
     53   1.1   mjacob 	struct ispsoftc *isp;
     54   1.1   mjacob {
     55   1.6  thorpej 
     56   1.6  thorpej 	isp->isp_osinfo._adapter.scsipi_minphys = ispminphys;
     57  1.17   mjacob 	isp->isp_osinfo._adapter.scsipi_ioctl = ispioctl;
     58   1.6  thorpej 
     59   1.1   mjacob 	isp->isp_state = ISP_RUNSTATE;
     60  1.21   mjacob 	isp->isp_osinfo._link.scsipi_scsi.channel =
     61  1.21   mjacob 	    (IS_DUALBUS(isp))? 0 : SCSI_CHANNEL_ONLY_ONE;
     62   1.1   mjacob 	isp->isp_osinfo._link.adapter_softc = isp;
     63   1.1   mjacob 	isp->isp_osinfo._link.device = &isp_dev;
     64   1.6  thorpej 	isp->isp_osinfo._link.adapter = &isp->isp_osinfo._adapter;
     65  1.17   mjacob 	isp->isp_osinfo._link.openings = isp->isp_maxcmds;
     66  1.18   mjacob 	TAILQ_INIT(&isp->isp_osinfo.waitq);	/* XXX 2nd Bus? */
     67   1.1   mjacob 
     68  1.15   mjacob 	if (IS_FC(isp)) {
     69  1.11   mjacob 		/*
     70  1.11   mjacob 		 * Give it another chance here to come alive...
     71  1.11   mjacob 		 */
     72  1.17   mjacob 		isp->isp_osinfo._adapter.scsipi_cmd = ispcmd;
     73   1.1   mjacob 		isp->isp_osinfo._link.scsipi_scsi.max_target = MAX_FC_TARG-1;
     74  1.11   mjacob #ifdef	ISP2100_SCCLUN
     75   1.7   mjacob 		/*
     76   1.7   mjacob 		 * 16 bits worth, but let's be reasonable..
     77   1.7   mjacob 		 */
     78   1.7   mjacob 		isp->isp_osinfo._link.scsipi_scsi.max_lun = 255;
     79   1.7   mjacob #else
     80   1.7   mjacob 		isp->isp_osinfo._link.scsipi_scsi.max_lun = 15;
     81   1.7   mjacob #endif
     82  1.19   mjacob 		/* set below */
     83   1.1   mjacob 	} else {
     84  1.14   mjacob 		sdparam *sdp = isp->isp_param;
     85  1.17   mjacob 		isp->isp_osinfo._adapter.scsipi_cmd = ispcmd_slow;
     86   1.1   mjacob 		isp->isp_osinfo._link.scsipi_scsi.max_target = MAX_TARGETS-1;
     87  1.22   mjacob 		isp->isp_osinfo._link.scsipi_scsi.max_lun = 7;
     88   1.1   mjacob 		isp->isp_osinfo._link.scsipi_scsi.adapter_target =
     89  1.14   mjacob 		    sdp->isp_initiator_id;
     90  1.17   mjacob 		isp->isp_osinfo.discovered[0] = 1 << sdp->isp_initiator_id;
     91  1.21   mjacob 		if (IS_DUALBUS(isp)) {
     92  1.14   mjacob 			isp->isp_osinfo._link_b = isp->isp_osinfo._link;
     93  1.14   mjacob 			sdp++;
     94  1.18   mjacob 			isp->isp_osinfo.discovered[1] =
     95  1.18   mjacob 			    1 << sdp->isp_initiator_id;
     96  1.14   mjacob 			isp->isp_osinfo._link_b.scsipi_scsi.adapter_target =
     97  1.14   mjacob 			    sdp->isp_initiator_id;
     98  1.14   mjacob 			isp->isp_osinfo._link_b.scsipi_scsi.channel = 1;
     99  1.14   mjacob 		}
    100   1.1   mjacob 	}
    101   1.1   mjacob 	isp->isp_osinfo._link.type = BUS_SCSI;
    102   1.8   mjacob 
    103   1.8   mjacob 	/*
    104  1.10   mjacob 	 * Send a SCSI Bus Reset (used to be done as part of attach,
    105  1.10   mjacob 	 * but now left to the OS outer layers).
    106  1.10   mjacob 	 */
    107  1.14   mjacob 	if (IS_SCSI(isp)) {
    108  1.14   mjacob 		int bus = 0;
    109  1.14   mjacob 		(void) isp_control(isp, ISPCTL_RESET_BUS, &bus);
    110  1.21   mjacob 		if (IS_DUALBUS(isp)) {
    111  1.14   mjacob 			bus++;
    112  1.14   mjacob 			(void) isp_control(isp, ISPCTL_RESET_BUS, &bus);
    113  1.14   mjacob 		}
    114  1.11   mjacob 		SYS_DELAY(2*1000000);
    115  1.19   mjacob 	} else {
    116  1.19   mjacob 		int i, j;
    117  1.19   mjacob 		fcparam *fcp = isp->isp_param;
    118  1.19   mjacob 		delay(2 * 1000000);
    119  1.19   mjacob 		for (j = 0; j < 5; j++) {
    120  1.19   mjacob 			for (i = 0; i < 5; i++) {
    121  1.19   mjacob 				if (isp_control(isp, ISPCTL_FCLINK_TEST, NULL))
    122  1.19   mjacob 					continue;
    123  1.19   mjacob #ifdef	ISP2100_FABRIC
    124  1.19   mjacob 				/*
    125  1.19   mjacob 				 * Wait extra time to see if the f/w
    126  1.19   mjacob 				 * eventually completed an FLOGI that
    127  1.19   mjacob 				 * will allow us to know we're on a
    128  1.19   mjacob 				 * fabric.
    129  1.19   mjacob 				 */
    130  1.19   mjacob 				if (fcp->isp_onfabric == 0) {
    131  1.19   mjacob 					delay(1 * 1000000);
    132  1.19   mjacob 					continue;
    133  1.19   mjacob 				}
    134  1.19   mjacob #endif
    135  1.19   mjacob 				break;
    136  1.19   mjacob 			}
    137  1.19   mjacob 			if (fcp->isp_fwstate == FW_READY &&
    138  1.19   mjacob 			    fcp->isp_loopstate >= LOOP_PDB_RCVD) {
    139  1.19   mjacob 				break;
    140  1.19   mjacob 			}
    141  1.19   mjacob 		}
    142  1.19   mjacob 		isp->isp_osinfo._link.scsipi_scsi.adapter_target =
    143  1.19   mjacob 			fcp->isp_loopid;
    144  1.11   mjacob 	}
    145  1.10   mjacob 
    146  1.10   mjacob 	/*
    147   1.8   mjacob 	 * Start the watchdog.
    148   1.8   mjacob 	 */
    149  1.24  thorpej 	callout_init(&isp->isp_osinfo._watchdog);
    150   1.8   mjacob 	isp->isp_dogactive = 1;
    151  1.24  thorpej 	callout_reset(&isp->isp_osinfo._watchdog, WATCH_INTERVAL * hz,
    152  1.24  thorpej 	    isp_watch, isp);
    153   1.8   mjacob 
    154   1.8   mjacob 	/*
    155   1.8   mjacob 	 * And attach children (if any).
    156   1.8   mjacob 	 */
    157   1.1   mjacob 	config_found((void *)isp, &isp->isp_osinfo._link, scsiprint);
    158  1.21   mjacob 	if (IS_DUALBUS(isp)) {
    159  1.14   mjacob 		config_found((void *)isp, &isp->isp_osinfo._link_b, scsiprint);
    160  1.14   mjacob 	}
    161   1.1   mjacob }
    162   1.1   mjacob 
    163   1.1   mjacob /*
    164   1.1   mjacob  * minphys our xfers
    165   1.1   mjacob  *
    166   1.1   mjacob  * Unfortunately, the buffer pointer describes the target device- not the
    167   1.1   mjacob  * adapter device, so we can't use the pointer to find out what kind of
    168   1.1   mjacob  * adapter we are and adjust accordingly.
    169   1.1   mjacob  */
    170   1.1   mjacob 
    171   1.1   mjacob static void
    172   1.1   mjacob ispminphys(bp)
    173   1.1   mjacob 	struct buf *bp;
    174   1.1   mjacob {
    175   1.1   mjacob 	/*
    176   1.1   mjacob 	 * XX: Only the 1020 has a 24 bit limit.
    177   1.1   mjacob 	 */
    178   1.1   mjacob 	if (bp->b_bcount >= (1 << 24)) {
    179   1.1   mjacob 		bp->b_bcount = (1 << 24);
    180   1.1   mjacob 	}
    181   1.1   mjacob 	minphys(bp);
    182   1.1   mjacob }
    183   1.1   mjacob 
    184  1.17   mjacob static int32_t
    185  1.17   mjacob ispcmd_slow(xs)
    186   1.1   mjacob 	ISP_SCSI_XFER_T *xs;
    187   1.1   mjacob {
    188  1.19   mjacob 	sdparam *sdp;
    189  1.20   mjacob 	int tgt, chan, s;
    190  1.21   mjacob 	u_int16_t flags;
    191  1.19   mjacob 	struct ispsoftc *isp = XS_ISP(xs);
    192  1.19   mjacob 
    193  1.19   mjacob 	/*
    194  1.19   mjacob 	 * Have we completed discovery for this target on this adapter?
    195  1.19   mjacob 	 */
    196  1.20   mjacob 	tgt = XS_TGT(xs);
    197  1.20   mjacob 	chan = XS_CHANNEL(xs);
    198  1.19   mjacob 	if ((xs->xs_control & XS_CTL_DISCOVERY) != 0 ||
    199  1.19   mjacob 	    (isp->isp_osinfo.discovered[chan] & (1 << tgt)) != 0) {
    200  1.19   mjacob 		return (ispcmd(xs));
    201  1.19   mjacob 	}
    202  1.19   mjacob 
    203  1.21   mjacob 	flags = DPARM_DEFAULT;
    204  1.19   mjacob 	if (xs->sc_link->quirks & SDEV_NOSYNC) {
    205  1.21   mjacob 		flags ^= DPARM_SYNC;
    206  1.19   mjacob #ifdef	DEBUG
    207  1.19   mjacob 	} else {
    208  1.19   mjacob 		printf("%s: channel %d target %d can do SYNC xfers\n",
    209  1.19   mjacob 		    isp->isp_name, chan, tgt);
    210  1.19   mjacob #endif
    211  1.19   mjacob 	}
    212  1.19   mjacob 	if (xs->sc_link->quirks & SDEV_NOWIDE) {
    213  1.21   mjacob 		flags ^= DPARM_WIDE;
    214  1.19   mjacob #ifdef	DEBUG
    215  1.19   mjacob 	} else {
    216  1.19   mjacob 		printf("%s: channel %d target %d can do WIDE xfers\n",
    217  1.19   mjacob 		    isp->isp_name, chan, tgt);
    218  1.19   mjacob #endif
    219  1.19   mjacob 	}
    220  1.19   mjacob 	if (xs->sc_link->quirks & SDEV_NOTAG) {
    221  1.21   mjacob 		flags ^= DPARM_TQING;
    222  1.19   mjacob #ifdef	DEBUG
    223  1.19   mjacob 	} else {
    224  1.19   mjacob 		printf("%s: channel %d target %d can do TAGGED xfers\n",
    225  1.19   mjacob 		    isp->isp_name, chan, tgt);
    226  1.19   mjacob #endif
    227  1.19   mjacob 	}
    228  1.19   mjacob 	/*
    229  1.19   mjacob 	 * Okay, we know about this device now,
    230  1.19   mjacob 	 * so mark parameters to be updated for it.
    231  1.19   mjacob 	 */
    232  1.20   mjacob 	s = splbio();
    233  1.21   mjacob 	isp->isp_osinfo.discovered[chan] |= (1 << tgt);
    234  1.21   mjacob 	sdp = isp->isp_param;
    235  1.21   mjacob 	sdp += chan;
    236  1.21   mjacob 	sdp->isp_devparam[tgt].dev_flags = flags;
    237  1.19   mjacob 	sdp->isp_devparam[tgt].dev_update = 1;
    238  1.19   mjacob 	isp->isp_update |= (1 << chan);
    239  1.20   mjacob 	splx(s);
    240  1.17   mjacob 	return (ispcmd(xs));
    241  1.17   mjacob }
    242  1.17   mjacob 
    243  1.17   mjacob static int
    244  1.17   mjacob ispioctl(sc_link, cmd, addr, flag, p)
    245  1.17   mjacob 	struct scsipi_link *sc_link;
    246  1.17   mjacob 	u_long cmd;
    247  1.17   mjacob 	caddr_t addr;
    248  1.17   mjacob 	int flag;
    249  1.17   mjacob 	struct proc *p;
    250  1.17   mjacob {
    251  1.17   mjacob 	struct ispsoftc *isp = sc_link->adapter_softc;
    252  1.17   mjacob 	int s, chan, retval = ENOTTY;
    253  1.17   mjacob 
    254  1.17   mjacob 	switch (cmd) {
    255  1.17   mjacob 	case SCBUSIORESET:
    256  1.17   mjacob 		chan = sc_link->scsipi_scsi.channel;
    257  1.17   mjacob 		s = splbio();
    258  1.17   mjacob 		if (isp_control(isp, ISPCTL_RESET_BUS, &chan))
    259  1.17   mjacob 			retval = EIO;
    260  1.17   mjacob 		else
    261  1.17   mjacob 			retval = 0;
    262  1.17   mjacob 		(void) splx(s);
    263  1.17   mjacob 		break;
    264  1.17   mjacob 	default:
    265  1.17   mjacob 		break;
    266   1.3   mjacob 	}
    267  1.17   mjacob 	return (retval);
    268  1.17   mjacob }
    269  1.17   mjacob 
    270  1.17   mjacob 
    271  1.17   mjacob static int32_t
    272  1.17   mjacob ispcmd(xs)
    273  1.17   mjacob 	ISP_SCSI_XFER_T *xs;
    274  1.17   mjacob {
    275  1.17   mjacob 	struct ispsoftc *isp;
    276  1.17   mjacob 	int result, s;
    277  1.11   mjacob 
    278  1.17   mjacob 	isp = XS_ISP(xs);
    279  1.17   mjacob 	s = splbio();
    280  1.11   mjacob 	if (isp->isp_state < ISP_RUNSTATE) {
    281  1.11   mjacob 		DISABLE_INTS(isp);
    282  1.11   mjacob 		isp_init(isp);
    283  1.11   mjacob                 if (isp->isp_state != ISP_INITSTATE) {
    284  1.11   mjacob 			ENABLE_INTS(isp);
    285  1.11   mjacob                         (void) splx(s);
    286  1.11   mjacob                         XS_SETERR(xs, HBA_BOTCH);
    287  1.17   mjacob                         return (COMPLETE);
    288  1.11   mjacob                 }
    289  1.11   mjacob                 isp->isp_state = ISP_RUNSTATE;
    290  1.11   mjacob 		ENABLE_INTS(isp);
    291  1.11   mjacob         }
    292  1.11   mjacob 
    293  1.10   mjacob 	/*
    294  1.10   mjacob 	 * Check for queue blockage...
    295  1.10   mjacob 	 */
    296  1.10   mjacob 	if (isp->isp_osinfo.blocked) {
    297  1.16  thorpej 		if (xs->xs_control & XS_CTL_POLL) {
    298  1.10   mjacob 			xs->error = XS_DRIVER_STUFFUP;
    299  1.10   mjacob 			splx(s);
    300  1.10   mjacob 			return (TRY_AGAIN_LATER);
    301  1.10   mjacob 		}
    302  1.10   mjacob 		TAILQ_INSERT_TAIL(&isp->isp_osinfo.waitq, xs, adapter_q);
    303  1.10   mjacob 		splx(s);
    304  1.17   mjacob 		return (SUCCESSFULLY_QUEUED);
    305  1.10   mjacob 	}
    306  1.11   mjacob 	DISABLE_INTS(isp);
    307   1.3   mjacob 	result = ispscsicmd(xs);
    308  1.11   mjacob 	ENABLE_INTS(isp);
    309  1.17   mjacob 
    310  1.17   mjacob 	if ((xs->xs_control & XS_CTL_POLL) == 0) {
    311  1.17   mjacob 		switch (result) {
    312  1.17   mjacob 		case CMD_QUEUED:
    313  1.17   mjacob 			result = SUCCESSFULLY_QUEUED;
    314  1.17   mjacob 			break;
    315  1.17   mjacob 		case CMD_EAGAIN:
    316  1.17   mjacob 			result = TRY_AGAIN_LATER;
    317  1.17   mjacob 			break;
    318  1.17   mjacob 		case CMD_RQLATER:
    319  1.17   mjacob 			result = SUCCESSFULLY_QUEUED;
    320  1.24  thorpej 			callout_reset(&xs->xs_callout, hz,
    321  1.24  thorpej 			    isp_command_requeue, xs);
    322  1.17   mjacob 			break;
    323  1.17   mjacob 		case CMD_COMPLETE:
    324  1.17   mjacob 			result = COMPLETE;
    325  1.17   mjacob 			break;
    326  1.17   mjacob 		}
    327  1.10   mjacob 		(void) splx(s);
    328   1.3   mjacob 		return (result);
    329   1.1   mjacob 	}
    330   1.1   mjacob 
    331  1.17   mjacob 	switch (result) {
    332  1.17   mjacob 	case CMD_QUEUED:
    333  1.17   mjacob 		result = SUCCESSFULLY_QUEUED;
    334  1.17   mjacob 		break;
    335  1.17   mjacob 	case CMD_RQLATER:
    336  1.17   mjacob 	case CMD_EAGAIN:
    337  1.17   mjacob 		if (XS_NOERR(xs)) {
    338  1.17   mjacob 			xs->error = XS_DRIVER_STUFFUP;
    339  1.17   mjacob 		}
    340  1.17   mjacob 		result = TRY_AGAIN_LATER;
    341  1.17   mjacob 		break;
    342  1.17   mjacob 	case CMD_COMPLETE:
    343  1.17   mjacob 		result = COMPLETE;
    344  1.17   mjacob 		break;
    345  1.17   mjacob 
    346  1.17   mjacob 	}
    347   1.1   mjacob 	/*
    348   1.1   mjacob 	 * If we can't use interrupts, poll on completion.
    349   1.1   mjacob 	 */
    350  1.17   mjacob 	if (result == SUCCESSFULLY_QUEUED) {
    351  1.17   mjacob 		if (isp_poll(isp, xs, XS_TIME(xs))) {
    352  1.17   mjacob 			/*
    353  1.17   mjacob 			 * If no other error occurred but we didn't finish,
    354  1.17   mjacob 			 * something bad happened.
    355  1.17   mjacob 			 */
    356  1.17   mjacob 			if (XS_IS_CMD_DONE(xs) == 0) {
    357  1.17   mjacob 				if (isp_control(isp, ISPCTL_ABORT_CMD, xs)) {
    358  1.17   mjacob 					isp_restart(isp);
    359  1.17   mjacob 				}
    360  1.17   mjacob 				if (XS_NOERR(xs)) {
    361  1.17   mjacob 					XS_SETERR(xs, HBA_BOTCH);
    362  1.17   mjacob 				}
    363   1.1   mjacob 			}
    364   1.1   mjacob 		}
    365  1.17   mjacob 		result = COMPLETE;
    366   1.1   mjacob 	}
    367  1.10   mjacob 	(void) splx(s);
    368  1.17   mjacob 	return (result);
    369   1.1   mjacob }
    370   1.1   mjacob 
    371   1.1   mjacob static int
    372   1.1   mjacob isp_poll(isp, xs, mswait)
    373   1.1   mjacob 	struct ispsoftc *isp;
    374   1.1   mjacob 	ISP_SCSI_XFER_T *xs;
    375   1.1   mjacob 	int mswait;
    376   1.1   mjacob {
    377   1.1   mjacob 
    378   1.1   mjacob 	while (mswait) {
    379   1.1   mjacob 		/* Try the interrupt handling routine */
    380   1.1   mjacob 		(void)isp_intr((void *)isp);
    381   1.1   mjacob 
    382   1.1   mjacob 		/* See if the xs is now done */
    383   1.1   mjacob 		if (XS_IS_CMD_DONE(xs)) {
    384   1.1   mjacob 			return (0);
    385   1.1   mjacob 		}
    386   1.1   mjacob 		SYS_DELAY(1000);	/* wait one millisecond */
    387   1.1   mjacob 		mswait--;
    388   1.1   mjacob 	}
    389   1.1   mjacob 	return (1);
    390   1.8   mjacob }
    391   1.8   mjacob 
    392   1.8   mjacob static void
    393   1.8   mjacob isp_watch(arg)
    394   1.8   mjacob 	void *arg;
    395   1.8   mjacob {
    396   1.8   mjacob 	int i;
    397   1.8   mjacob 	struct ispsoftc *isp = arg;
    398  1.17   mjacob 	struct scsipi_xfer *xs;
    399  1.17   mjacob 	int s;
    400   1.8   mjacob 
    401   1.8   mjacob 	/*
    402   1.8   mjacob 	 * Look for completely dead commands (but not polled ones).
    403   1.8   mjacob 	 */
    404  1.17   mjacob 	s = splbio();
    405  1.17   mjacob 	for (i = 0; i < isp->isp_maxcmds; i++) {
    406  1.17   mjacob 		xs = isp->isp_xflist[i];
    407  1.17   mjacob 		if (xs == NULL) {
    408   1.8   mjacob 			continue;
    409   1.8   mjacob 		}
    410  1.17   mjacob 		if (xs->timeout == 0 || (xs->xs_control & XS_CTL_POLL)) {
    411   1.8   mjacob 			continue;
    412   1.8   mjacob 		}
    413  1.17   mjacob 		xs->timeout -= (WATCH_INTERVAL * 1000);
    414   1.8   mjacob 		/*
    415   1.8   mjacob 		 * Avoid later thinking that this
    416   1.8   mjacob 		 * transaction is not being timed.
    417   1.8   mjacob 		 * Then give ourselves to watchdog
    418   1.8   mjacob 		 * periods of grace.
    419   1.8   mjacob 		 */
    420  1.17   mjacob 		if (xs->timeout == 0) {
    421  1.17   mjacob 			xs->timeout = 1;
    422  1.17   mjacob 		} else if (xs->timeout > -(2 * WATCH_INTERVAL * 1000)) {
    423   1.8   mjacob 			continue;
    424   1.8   mjacob 		}
    425   1.8   mjacob 		if (isp_control(isp, ISPCTL_ABORT_CMD, xs)) {
    426   1.8   mjacob 			printf("%s: isp_watch failed to abort command\n",
    427   1.8   mjacob 			    isp->isp_name);
    428   1.8   mjacob 			isp_restart(isp);
    429   1.8   mjacob 			break;
    430   1.8   mjacob 		}
    431   1.8   mjacob 	}
    432  1.24  thorpej 	callout_reset(&isp->isp_osinfo._watchdog, WATCH_INTERVAL * hz,
    433  1.24  thorpej 	    isp_watch, isp);
    434   1.8   mjacob 	isp->isp_dogactive = 1;
    435  1.17   mjacob 	(void) splx(s);
    436   1.8   mjacob }
    437   1.8   mjacob 
    438   1.8   mjacob /*
    439   1.8   mjacob  * Free any associated resources prior to decommissioning and
    440   1.8   mjacob  * set the card to a known state (so it doesn't wake up and kick
    441   1.8   mjacob  * us when we aren't expecting it to).
    442   1.8   mjacob  *
    443   1.8   mjacob  * Locks are held before coming here.
    444   1.8   mjacob  */
    445   1.8   mjacob void
    446   1.8   mjacob isp_uninit(isp)
    447   1.8   mjacob 	struct ispsoftc *isp;
    448   1.8   mjacob {
    449   1.8   mjacob 	ISP_ILOCKVAL_DECL;
    450   1.8   mjacob 	ISP_ILOCK(isp);
    451   1.8   mjacob 	/*
    452   1.8   mjacob 	 * Leave with interrupts disabled.
    453   1.8   mjacob 	 */
    454   1.8   mjacob 	DISABLE_INTS(isp);
    455   1.8   mjacob 
    456   1.8   mjacob 	/*
    457   1.8   mjacob 	 * Turn off the watchdog (if active).
    458   1.8   mjacob 	 */
    459   1.8   mjacob 	if (isp->isp_dogactive) {
    460  1.24  thorpej 		callout_stop(&isp->isp_osinfo._watchdog);
    461   1.8   mjacob 		isp->isp_dogactive = 0;
    462   1.8   mjacob 	}
    463   1.8   mjacob 
    464   1.8   mjacob 	ISP_IUNLOCK(isp);
    465   1.9   mjacob }
    466   1.9   mjacob 
    467  1.10   mjacob /*
    468  1.17   mjacob  * Restart function for a command to be requeued later.
    469  1.17   mjacob  */
    470  1.17   mjacob static void
    471  1.17   mjacob isp_command_requeue(arg)
    472  1.17   mjacob 	void *arg;
    473  1.17   mjacob {
    474  1.17   mjacob 	struct scsipi_xfer *xs = arg;
    475  1.17   mjacob 	struct ispsoftc *isp = XS_ISP(xs);
    476  1.17   mjacob 	int s = splbio();
    477  1.17   mjacob 	switch (ispcmd_slow(xs)) {
    478  1.17   mjacob 	case SUCCESSFULLY_QUEUED:
    479  1.18   mjacob 		printf("%s: isp_command_requeue: requeued for %d.%d\n",
    480  1.17   mjacob 		    isp->isp_name, XS_TGT(xs), XS_LUN(xs));
    481  1.17   mjacob 		break;
    482  1.17   mjacob 	case TRY_AGAIN_LATER:
    483  1.17   mjacob 		printf("%s: EAGAIN for %d.%d\n",
    484  1.17   mjacob 		    isp->isp_name, XS_TGT(xs), XS_LUN(xs));
    485  1.17   mjacob 		/* FALLTHROUGH */
    486  1.17   mjacob 	case COMPLETE:
    487  1.18   mjacob 		/* can only be an error */
    488  1.17   mjacob 		xs->xs_status |= XS_STS_DONE;
    489  1.17   mjacob 		if (XS_NOERR(xs)) {
    490  1.17   mjacob 			XS_SETERR(xs, HBA_BOTCH);
    491  1.17   mjacob 		}
    492  1.17   mjacob 		scsipi_done(xs);
    493  1.17   mjacob 		break;
    494  1.17   mjacob 	}
    495  1.17   mjacob 	(void) splx(s);
    496  1.17   mjacob }
    497  1.18   mjacob 
    498  1.17   mjacob /*
    499  1.10   mjacob  * Restart function after a LOOP UP event (e.g.),
    500  1.10   mjacob  * done as a timeout for some hysteresis.
    501  1.10   mjacob  */
    502  1.10   mjacob static void
    503  1.10   mjacob isp_internal_restart(arg)
    504  1.10   mjacob 	void *arg;
    505  1.10   mjacob {
    506  1.10   mjacob 	struct ispsoftc *isp = arg;
    507  1.11   mjacob 	int result, nrestarted = 0, s;
    508  1.10   mjacob 
    509  1.11   mjacob 	s = splbio();
    510  1.10   mjacob 	if (isp->isp_osinfo.blocked == 0) {
    511  1.10   mjacob 		struct scsipi_xfer *xs;
    512  1.10   mjacob 		while ((xs = TAILQ_FIRST(&isp->isp_osinfo.waitq)) != NULL) {
    513  1.10   mjacob 			TAILQ_REMOVE(&isp->isp_osinfo.waitq, xs, adapter_q);
    514  1.11   mjacob 			DISABLE_INTS(isp);
    515  1.11   mjacob 			result = ispscsicmd(xs);
    516  1.11   mjacob 			ENABLE_INTS(isp);
    517  1.11   mjacob 			if (result != CMD_QUEUED) {
    518  1.10   mjacob 				printf("%s: botched command restart (0x%x)\n",
    519  1.10   mjacob 				    isp->isp_name, result);
    520  1.16  thorpej 				xs->xs_status |= XS_STS_DONE;
    521  1.10   mjacob 				if (xs->error == XS_NOERROR)
    522  1.10   mjacob 					xs->error = XS_DRIVER_STUFFUP;
    523  1.10   mjacob 				scsipi_done(xs);
    524  1.10   mjacob 			}
    525  1.10   mjacob 			nrestarted++;
    526  1.10   mjacob 		}
    527  1.10   mjacob 		printf("%s: requeued %d commands\n", isp->isp_name, nrestarted);
    528  1.10   mjacob 	}
    529  1.10   mjacob 	(void) splx(s);
    530  1.10   mjacob }
    531  1.18   mjacob 
    532   1.9   mjacob int
    533   1.9   mjacob isp_async(isp, cmd, arg)
    534   1.9   mjacob 	struct ispsoftc *isp;
    535   1.9   mjacob 	ispasync_t cmd;
    536   1.9   mjacob 	void *arg;
    537   1.9   mjacob {
    538  1.14   mjacob 	int bus, tgt;
    539  1.10   mjacob 	int s = splbio();
    540   1.9   mjacob 	switch (cmd) {
    541   1.9   mjacob 	case ISPASYNC_NEW_TGT_PARAMS:
    542  1.17   mjacob 	if (IS_SCSI(isp) && isp->isp_dblev) {
    543  1.17   mjacob 		sdparam *sdp = isp->isp_param;
    544  1.17   mjacob 		char *wt;
    545  1.17   mjacob 		int mhz, flags, period;
    546  1.17   mjacob 
    547  1.17   mjacob 		tgt = *((int *) arg);
    548  1.17   mjacob 		bus = (tgt >> 16) & 0xffff;
    549  1.17   mjacob 		tgt &= 0xffff;
    550  1.21   mjacob 		sdp += bus;
    551  1.17   mjacob 		flags = sdp->isp_devparam[tgt].cur_dflags;
    552  1.17   mjacob 		period = sdp->isp_devparam[tgt].cur_period;
    553  1.21   mjacob 
    554  1.17   mjacob 		if ((flags & DPARM_SYNC) && period &&
    555  1.17   mjacob 		    (sdp->isp_devparam[tgt].cur_offset) != 0) {
    556  1.21   mjacob #if	0
    557  1.21   mjacob 			/* CAUSES PANICS */
    558  1.21   mjacob 			static char *m = "%s: bus %d now %s mode\n";
    559  1.21   mjacob 			u_int16_t r, l;
    560  1.21   mjacob 			if (bus == 1)
    561  1.21   mjacob 				r = SXP_PINS_DIFF | SXP_BANK1_SELECT;
    562  1.21   mjacob 			else
    563  1.21   mjacob 				r = SXP_PINS_DIFF;
    564  1.21   mjacob 			l = ISP_READ(isp, r) & ISP1080_MODE_MASK;
    565  1.21   mjacob 			switch (l) {
    566  1.21   mjacob 			case ISP1080_LVD_MODE:
    567  1.21   mjacob 				sdp->isp_lvdmode = 1;
    568  1.21   mjacob 				printf(m, isp->isp_name, bus, "LVD");
    569  1.21   mjacob 				break;
    570  1.21   mjacob 			case ISP1080_HVD_MODE:
    571  1.21   mjacob 				sdp->isp_diffmode = 1;
    572  1.21   mjacob 				printf(m, isp->isp_name, bus, "Differential");
    573  1.21   mjacob 				break;
    574  1.21   mjacob 			case ISP1080_SE_MODE:
    575  1.21   mjacob 				sdp->isp_ultramode = 1;
    576  1.21   mjacob 				printf(m, isp->isp_name, bus, "Single-Ended");
    577  1.21   mjacob 				break;
    578  1.21   mjacob 			default:
    579  1.21   mjacob 				printf("%s: unknown mode on bus %d (0x%x)\n",
    580  1.21   mjacob 				    isp->isp_name, bus, l);
    581  1.21   mjacob 				break;
    582  1.21   mjacob 			}
    583  1.21   mjacob #endif
    584  1.21   mjacob 			/*
    585  1.21   mjacob 			 * There's some ambiguity about our negotiated speed
    586  1.21   mjacob 			 * if we haven't detected LVD mode correctly (which
    587  1.21   mjacob 			 * seems to happen, unfortunately). If we're in LVD
    588  1.21   mjacob 			 * mode, then different rules apply about speed.
    589  1.21   mjacob 			 */
    590  1.21   mjacob 			if (sdp->isp_lvdmode || period < 0xc) {
    591  1.17   mjacob 				switch (period) {
    592  1.23   mjacob 				case 0x9:
    593  1.23   mjacob 					mhz = 80;
    594  1.23   mjacob 					break;
    595  1.17   mjacob 				case 0xa:
    596  1.17   mjacob 					mhz = 40;
    597  1.17   mjacob 					break;
    598  1.17   mjacob 				case 0xb:
    599  1.17   mjacob 					mhz = 33;
    600  1.17   mjacob 					break;
    601  1.17   mjacob 				case 0xc:
    602  1.17   mjacob 					mhz = 25;
    603  1.17   mjacob 					break;
    604  1.17   mjacob 				default:
    605  1.12   mjacob 					mhz = 1000 / (period * 4);
    606  1.17   mjacob 					break;
    607  1.12   mjacob 				}
    608   1.9   mjacob 			} else {
    609  1.17   mjacob 				mhz = 1000 / (period * 4);
    610   1.9   mjacob 			}
    611  1.17   mjacob 		} else {
    612  1.17   mjacob 			mhz = 0;
    613  1.17   mjacob 		}
    614  1.17   mjacob 		switch (flags & (DPARM_WIDE|DPARM_TQING)) {
    615  1.17   mjacob 		case DPARM_WIDE:
    616  1.17   mjacob 			wt = ", 16 bit wide\n";
    617  1.17   mjacob 			break;
    618  1.17   mjacob 		case DPARM_TQING:
    619  1.17   mjacob 			wt = ", Tagged Queueing Enabled\n";
    620  1.17   mjacob 			break;
    621  1.17   mjacob 		case DPARM_WIDE|DPARM_TQING:
    622  1.17   mjacob 			wt = ", 16 bit wide, Tagged Queueing Enabled\n";
    623  1.17   mjacob 			break;
    624  1.17   mjacob 		default:
    625  1.17   mjacob 			wt = "\n";
    626  1.17   mjacob 			break;
    627  1.17   mjacob 		}
    628  1.17   mjacob 		if (mhz) {
    629  1.19   mjacob 			CFGPRINTF("%s: Bus %d Target %d at %dMHz Max "
    630  1.17   mjacob 			    "Offset %d%s", isp->isp_name, bus, tgt, mhz,
    631  1.17   mjacob 			    sdp->isp_devparam[tgt].cur_offset, wt);
    632  1.17   mjacob 		} else {
    633  1.19   mjacob 			CFGPRINTF("%s: Bus %d Target %d Async Mode%s",
    634  1.17   mjacob 			    isp->isp_name, bus, tgt, wt);
    635   1.9   mjacob 		}
    636  1.11   mjacob 		break;
    637  1.17   mjacob 	}
    638  1.11   mjacob 	case ISPASYNC_BUS_RESET:
    639  1.14   mjacob 		if (arg)
    640  1.14   mjacob 			bus = *((int *) arg);
    641  1.14   mjacob 		else
    642  1.14   mjacob 			bus = 0;
    643  1.14   mjacob 		printf("%s: SCSI bus %d reset detected\n", isp->isp_name, bus);
    644  1.11   mjacob 		break;
    645  1.11   mjacob 	case ISPASYNC_LOOP_DOWN:
    646  1.11   mjacob 		/*
    647  1.11   mjacob 		 * Hopefully we get here in time to minimize the number
    648  1.11   mjacob 		 * of commands we are firing off that are sure to die.
    649  1.11   mjacob 		 */
    650  1.11   mjacob 		isp->isp_osinfo.blocked = 1;
    651  1.11   mjacob 		printf("%s: Loop DOWN\n", isp->isp_name);
    652  1.11   mjacob 		break;
    653  1.11   mjacob         case ISPASYNC_LOOP_UP:
    654  1.11   mjacob 		isp->isp_osinfo.blocked = 0;
    655  1.24  thorpej 		callout_reset(&isp->isp_osinfo._restart, 1,
    656  1.24  thorpej 		    isp_internal_restart, isp);
    657  1.11   mjacob 		printf("%s: Loop UP\n", isp->isp_name);
    658  1.11   mjacob 		break;
    659  1.15   mjacob 	case ISPASYNC_PDB_CHANGED:
    660  1.17   mjacob 	if (IS_FC(isp) && isp->isp_dblev) {
    661  1.15   mjacob 		const char *fmt = "%s: Target %d (Loop 0x%x) Port ID 0x%x "
    662  1.15   mjacob 		    "role %s %s\n Port WWN 0x%08x%08x\n Node WWN 0x%08x%08x\n";
    663  1.15   mjacob 		const static char *roles[4] = {
    664  1.11   mjacob 		    "No", "Target", "Initiator", "Target/Initiator"
    665  1.11   mjacob 		};
    666  1.15   mjacob 		char *ptr;
    667  1.15   mjacob 		fcparam *fcp = isp->isp_param;
    668  1.15   mjacob 		int tgt = *((int *) arg);
    669  1.15   mjacob 		struct lportdb *lp = &fcp->portdb[tgt];
    670  1.15   mjacob 
    671  1.15   mjacob 		if (lp->valid) {
    672  1.15   mjacob 			ptr = "arrived";
    673  1.15   mjacob 		} else {
    674  1.15   mjacob 			ptr = "disappeared";
    675  1.11   mjacob 		}
    676  1.15   mjacob 		printf(fmt, isp->isp_name, tgt, lp->loopid, lp->portid,
    677  1.15   mjacob 		    roles[lp->roles & 0x3], ptr,
    678  1.15   mjacob 		    (u_int32_t) (lp->port_wwn >> 32),
    679  1.15   mjacob 		    (u_int32_t) (lp->port_wwn & 0xffffffffLL),
    680  1.15   mjacob 		    (u_int32_t) (lp->node_wwn >> 32),
    681  1.15   mjacob 		    (u_int32_t) (lp->node_wwn & 0xffffffffLL));
    682  1.11   mjacob 		break;
    683  1.11   mjacob 	}
    684  1.15   mjacob #ifdef	ISP2100_FABRIC
    685  1.11   mjacob 	case ISPASYNC_CHANGE_NOTIFY:
    686  1.11   mjacob 		printf("%s: Name Server Database Changed\n", isp->isp_name);
    687   1.9   mjacob 		break;
    688  1.15   mjacob 	case ISPASYNC_FABRIC_DEV:
    689  1.15   mjacob 	{
    690  1.15   mjacob 		int target;
    691  1.15   mjacob 		struct lportdb *lp;
    692  1.15   mjacob 		sns_scrsp_t *resp = (sns_scrsp_t *) arg;
    693  1.15   mjacob 		u_int32_t portid;
    694  1.15   mjacob 		u_int64_t wwn;
    695  1.15   mjacob 		fcparam *fcp = isp->isp_param;
    696  1.15   mjacob 
    697  1.15   mjacob 		portid =
    698  1.15   mjacob 		    (((u_int32_t) resp->snscb_port_id[0]) << 16) |
    699  1.15   mjacob 		    (((u_int32_t) resp->snscb_port_id[1]) << 8) |
    700  1.15   mjacob 		    (((u_int32_t) resp->snscb_port_id[2]));
    701  1.15   mjacob 		wwn =
    702  1.15   mjacob 		    (((u_int64_t)resp->snscb_portname[0]) << 56) |
    703  1.15   mjacob 		    (((u_int64_t)resp->snscb_portname[1]) << 48) |
    704  1.15   mjacob 		    (((u_int64_t)resp->snscb_portname[2]) << 40) |
    705  1.15   mjacob 		    (((u_int64_t)resp->snscb_portname[3]) << 32) |
    706  1.15   mjacob 		    (((u_int64_t)resp->snscb_portname[4]) << 24) |
    707  1.15   mjacob 		    (((u_int64_t)resp->snscb_portname[5]) << 16) |
    708  1.15   mjacob 		    (((u_int64_t)resp->snscb_portname[6]) <<  8) |
    709  1.15   mjacob 		    (((u_int64_t)resp->snscb_portname[7]));
    710  1.15   mjacob 		printf("%s: Fabric Device (Type 0x%x)@PortID 0x%x WWN "
    711  1.15   mjacob 		    "0x%08x%08x\n", isp->isp_name, resp->snscb_port_type,
    712  1.15   mjacob 		    portid, ((u_int32_t)(wwn >> 32)),
    713  1.15   mjacob 		    ((u_int32_t)(wwn & 0xffffffff)));
    714  1.15   mjacob 		if (resp->snscb_port_type != 2)
    715  1.15   mjacob 			break;
    716  1.15   mjacob 		for (target = FC_SNS_ID+1; target < MAX_FC_TARG; target++) {
    717  1.15   mjacob 			lp = &fcp->portdb[target];
    718  1.15   mjacob 			if (lp->port_wwn == wwn)
    719  1.15   mjacob 				break;
    720  1.15   mjacob 		}
    721  1.15   mjacob 		if (target < MAX_FC_TARG) {
    722  1.15   mjacob 			break;
    723  1.15   mjacob 		}
    724  1.15   mjacob 		for (target = FC_SNS_ID+1; target < MAX_FC_TARG; target++) {
    725  1.15   mjacob 			lp = &fcp->portdb[target];
    726  1.15   mjacob 			if (lp->port_wwn == 0)
    727  1.15   mjacob 				break;
    728  1.15   mjacob 		}
    729  1.15   mjacob 		if (target == MAX_FC_TARG) {
    730  1.15   mjacob 			printf("%s: no more space for fabric devices\n",
    731  1.15   mjacob 			    isp->isp_name);
    732  1.15   mjacob 			return (-1);
    733  1.15   mjacob 		}
    734  1.15   mjacob 		lp->port_wwn = lp->node_wwn = wwn;
    735  1.15   mjacob 		lp->portid = portid;
    736  1.15   mjacob 		break;
    737  1.15   mjacob 	}
    738  1.15   mjacob #endif
    739   1.9   mjacob 	default:
    740   1.9   mjacob 		break;
    741   1.9   mjacob 	}
    742  1.10   mjacob 	(void) splx(s);
    743   1.9   mjacob 	return (0);
    744   1.1   mjacob }
    745