Home | History | Annotate | Line # | Download | only in sbus
isp_sbus.c revision 1.41
      1  1.41  thorpej /* $NetBSD: isp_sbus.c,v 1.41 2001/03/08 02:21:44 thorpej Exp $ */
      2  1.30   mjacob /*
      3  1.30   mjacob  * This driver, which is contained in NetBSD in the files:
      4  1.30   mjacob  *
      5  1.30   mjacob  *	sys/dev/ic/isp.c
      6  1.34      wiz  *	sys/dev/ic/isp_inline.h
      7  1.34      wiz  *	sys/dev/ic/isp_netbsd.c
      8  1.34      wiz  *	sys/dev/ic/isp_netbsd.h
      9  1.34      wiz  *	sys/dev/ic/isp_target.c
     10  1.34      wiz  *	sys/dev/ic/isp_target.h
     11  1.34      wiz  *	sys/dev/ic/isp_tpublic.h
     12  1.34      wiz  *	sys/dev/ic/ispmbox.h
     13  1.34      wiz  *	sys/dev/ic/ispreg.h
     14  1.34      wiz  *	sys/dev/ic/ispvar.h
     15  1.30   mjacob  *	sys/microcode/isp/asm_sbus.h
     16  1.30   mjacob  *	sys/microcode/isp/asm_1040.h
     17  1.30   mjacob  *	sys/microcode/isp/asm_1080.h
     18  1.30   mjacob  *	sys/microcode/isp/asm_12160.h
     19  1.30   mjacob  *	sys/microcode/isp/asm_2100.h
     20  1.30   mjacob  *	sys/microcode/isp/asm_2200.h
     21  1.30   mjacob  *	sys/pci/isp_pci.c
     22  1.30   mjacob  *	sys/sbus/isp_sbus.c
     23  1.30   mjacob  *
     24  1.30   mjacob  * Is being actively maintained by Matthew Jacob (mjacob (at) netbsd.org).
     25  1.30   mjacob  * This driver also is shared source with FreeBSD, OpenBSD, Linux, Solaris,
     26  1.30   mjacob  * Linux versions. This tends to be an interesting maintenance problem.
     27  1.30   mjacob  *
     28  1.30   mjacob  * Please coordinate with Matthew Jacob on changes you wish to make here.
     29  1.30   mjacob  */
     30   1.1      mrg /*
     31   1.1      mrg  * SBus specific probe and attach routines for Qlogic ISP SCSI adapters.
     32   1.1      mrg  *
     33  1.35   mjacob  * Copyright (c) 1997, 2001 by Matthew Jacob
     34   1.1      mrg  * NASA AMES Research Center
     35   1.1      mrg  * All rights reserved.
     36   1.1      mrg  *
     37   1.1      mrg  * Redistribution and use in source and binary forms, with or without
     38   1.1      mrg  * modification, are permitted provided that the following conditions
     39   1.1      mrg  * are met:
     40   1.1      mrg  * 1. Redistributions of source code must retain the above copyright
     41   1.1      mrg  *    notice immediately at the beginning of the file, without modification,
     42   1.1      mrg  *    this list of conditions, and the following disclaimer.
     43   1.1      mrg  * 2. Redistributions in binary form must reproduce the above copyright
     44   1.1      mrg  *    notice, this list of conditions and the following disclaimer in the
     45   1.1      mrg  *    documentation and/or other materials provided with the distribution.
     46   1.1      mrg  *
     47   1.1      mrg  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
     48   1.1      mrg  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     49   1.1      mrg  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     50   1.1      mrg  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
     51   1.1      mrg  * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     52   1.1      mrg  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     53   1.1      mrg  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     54   1.1      mrg  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     55   1.1      mrg  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     56   1.1      mrg  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     57   1.1      mrg  * SUCH DAMAGE.
     58   1.1      mrg  *
     59   1.1      mrg  */
     60   1.1      mrg 
     61   1.1      mrg #include <sys/param.h>
     62   1.1      mrg #include <sys/systm.h>
     63   1.1      mrg #include <sys/device.h>
     64   1.1      mrg #include <sys/kernel.h>
     65   1.1      mrg #include <sys/malloc.h>
     66   1.1      mrg #include <sys/queue.h>
     67   1.1      mrg 
     68  1.28       pk #include <machine/bus.h>
     69  1.28       pk #include <machine/intr.h>
     70   1.1      mrg #include <machine/autoconf.h>
     71   1.1      mrg 
     72   1.1      mrg #include <dev/ic/isp_netbsd.h>
     73  1.17   mjacob #include <dev/microcode/isp/asm_sbus.h>
     74   1.1      mrg #include <dev/sbus/sbusvar.h>
     75  1.35   mjacob #include <sys/reboot.h>
     76   1.1      mrg 
     77  1.40   mjacob /*
     78  1.41  thorpej  * Gross! But there's no way around this until sparc64 iommu.c is fixed.
     79  1.40   mjacob  */
     80  1.40   mjacob #if	_MACHINE == sparc64
     81  1.40   mjacob #define	LMAP_FLAGS	BUS_DMA_NOWAIT|BUS_DMA_COHERENT
     82  1.40   mjacob #else
     83  1.40   mjacob #define	LMAP_FLAGS	BUS_DMA_NOWAIT
     84  1.40   mjacob #endif
     85  1.40   mjacob 
     86  1.30   mjacob static int isp_sbus_intr __P((void *));
     87   1.1      mrg static u_int16_t isp_sbus_rd_reg __P((struct ispsoftc *, int));
     88   1.1      mrg static void isp_sbus_wr_reg __P((struct ispsoftc *, int, u_int16_t));
     89   1.1      mrg static int isp_sbus_mbxdma __P((struct ispsoftc *));
     90   1.1      mrg static int isp_sbus_dmasetup __P((struct ispsoftc *, struct scsipi_xfer *,
     91  1.17   mjacob 	ispreq_t *, u_int16_t *, u_int16_t));
     92   1.1      mrg static void isp_sbus_dmateardown __P((struct ispsoftc *, struct scsipi_xfer *,
     93   1.1      mrg 	u_int32_t));
     94   1.1      mrg 
     95  1.17   mjacob #ifndef	ISP_1000_RISC_CODE
     96  1.17   mjacob #define	ISP_1000_RISC_CODE	NULL
     97  1.17   mjacob #endif
     98  1.17   mjacob 
     99   1.1      mrg static struct ispmdvec mdvec = {
    100   1.1      mrg 	isp_sbus_rd_reg,
    101   1.1      mrg 	isp_sbus_wr_reg,
    102   1.1      mrg 	isp_sbus_mbxdma,
    103   1.1      mrg 	isp_sbus_dmasetup,
    104   1.1      mrg 	isp_sbus_dmateardown,
    105   1.1      mrg 	NULL,
    106   1.1      mrg 	NULL,
    107   1.1      mrg 	NULL,
    108  1.33   mjacob 	ISP_1000_RISC_CODE
    109   1.1      mrg };
    110   1.1      mrg 
    111   1.1      mrg struct isp_sbussoftc {
    112   1.1      mrg 	struct ispsoftc	sbus_isp;
    113  1.33   mjacob 	struct sbusdev	sbus_sd;
    114   1.1      mrg 	sdparam		sbus_dev;
    115   1.1      mrg 	bus_space_tag_t	sbus_bustag;
    116   1.1      mrg 	bus_dma_tag_t	sbus_dmatag;
    117   1.6   mjacob 	bus_space_handle_t sbus_reg;
    118   1.1      mrg 	int		sbus_node;
    119   1.1      mrg 	int		sbus_pri;
    120   1.1      mrg 	struct ispmdvec	sbus_mdvec;
    121  1.14   mjacob 	bus_dmamap_t	*sbus_dmamap;
    122  1.35   mjacob 	bus_dmamap_t	sbus_rquest_dmamap;
    123  1.24       pk 	bus_dmamap_t	sbus_result_dmamap;
    124   1.8   mjacob 	int16_t		sbus_poff[_NREG_BLKS];
    125   1.1      mrg };
    126   1.1      mrg 
    127   1.1      mrg 
    128   1.1      mrg static int isp_match __P((struct device *, struct cfdata *, void *));
    129   1.1      mrg static void isp_sbus_attach __P((struct device *, struct device *, void *));
    130   1.1      mrg struct cfattach isp_sbus_ca = {
    131   1.1      mrg 	sizeof (struct isp_sbussoftc), isp_match, isp_sbus_attach
    132   1.1      mrg };
    133   1.1      mrg 
    134   1.1      mrg static int
    135   1.1      mrg isp_match(parent, cf, aux)
    136   1.1      mrg         struct device *parent;
    137   1.1      mrg         struct cfdata *cf;
    138   1.1      mrg         void *aux;
    139   1.1      mrg {
    140   1.1      mrg 	int rv;
    141   1.1      mrg #ifdef DEBUG
    142   1.1      mrg 	static int oneshot = 1;
    143   1.1      mrg #endif
    144   1.1      mrg 	struct sbus_attach_args *sa = aux;
    145   1.1      mrg 
    146   1.1      mrg 	rv = (strcmp(cf->cf_driver->cd_name, sa->sa_name) == 0 ||
    147   1.1      mrg 		strcmp("PTI,ptisp", sa->sa_name) == 0 ||
    148   1.1      mrg 		strcmp("ptisp", sa->sa_name) == 0 ||
    149   1.1      mrg 		strcmp("SUNW,isp", sa->sa_name) == 0 ||
    150   1.1      mrg 		strcmp("QLGC,isp", sa->sa_name) == 0);
    151   1.1      mrg #ifdef DEBUG
    152   1.1      mrg 	if (rv && oneshot) {
    153   1.1      mrg 		oneshot = 0;
    154   1.1      mrg 		printf("Qlogic ISP Driver, NetBSD (sbus) Platform Version "
    155   1.1      mrg 		    "%d.%d Core Version %d.%d\n",
    156   1.1      mrg 		    ISP_PLATFORM_VERSION_MAJOR, ISP_PLATFORM_VERSION_MINOR,
    157   1.1      mrg 		    ISP_CORE_VERSION_MAJOR, ISP_CORE_VERSION_MINOR);
    158   1.1      mrg 	}
    159   1.1      mrg #endif
    160   1.1      mrg 	return (rv);
    161   1.1      mrg }
    162   1.1      mrg 
    163  1.20   mjacob 
    164   1.1      mrg static void
    165   1.1      mrg isp_sbus_attach(parent, self, aux)
    166   1.1      mrg         struct device *parent, *self;
    167   1.1      mrg         void *aux;
    168   1.1      mrg {
    169  1.33   mjacob 	int freq, ispburst, sbusburst;
    170   1.1      mrg 	struct sbus_attach_args *sa = aux;
    171   1.1      mrg 	struct isp_sbussoftc *sbc = (struct isp_sbussoftc *) self;
    172   1.1      mrg 	struct ispsoftc *isp = &sbc->sbus_isp;
    173   1.1      mrg 
    174   1.1      mrg 	printf(" for %s\n", sa->sa_name);
    175   1.1      mrg 
    176   1.1      mrg 	sbc->sbus_bustag = sa->sa_bustag;
    177   1.1      mrg 	sbc->sbus_dmatag = sa->sa_dmatag;
    178  1.16       pk 	if (sa->sa_nintr != 0)
    179  1.16       pk 		sbc->sbus_pri = sa->sa_pri;
    180   1.1      mrg 	sbc->sbus_mdvec = mdvec;
    181   1.1      mrg 
    182   1.1      mrg 	if (sa->sa_npromvaddrs != 0) {
    183   1.6   mjacob 		sbc->sbus_reg = (bus_space_handle_t)sa->sa_promvaddrs[0];
    184   1.1      mrg 	} else {
    185   1.6   mjacob 		if (sbus_bus_map(sa->sa_bustag, sa->sa_slot, sa->sa_offset,
    186   1.6   mjacob 				 sa->sa_size, BUS_SPACE_MAP_LINEAR, 0,
    187   1.6   mjacob 				 &sbc->sbus_reg) != 0) {
    188   1.1      mrg 			printf("%s: cannot map registers\n", self->dv_xname);
    189   1.1      mrg 			return;
    190   1.1      mrg 		}
    191   1.1      mrg 	}
    192   1.1      mrg 	sbc->sbus_node = sa->sa_node;
    193   1.1      mrg 
    194   1.1      mrg 	freq = getpropint(sa->sa_node, "clock-frequency", 0);
    195   1.1      mrg 	if (freq) {
    196   1.1      mrg 		/*
    197   1.1      mrg 		 * Convert from HZ to MHz, rounding up.
    198   1.1      mrg 		 */
    199   1.1      mrg 		freq = (freq + 500000)/1000000;
    200   1.1      mrg #if	0
    201   1.1      mrg 		printf("%s: %d MHz\n", self->dv_xname, freq);
    202   1.1      mrg #endif
    203   1.1      mrg 	}
    204   1.1      mrg 	sbc->sbus_mdvec.dv_clock = freq;
    205   1.5   mjacob 
    206   1.5   mjacob 	/*
    207  1.33   mjacob 	 * Now figure out what the proper burst sizes, etc., to use.
    208  1.33   mjacob 	 * Unfortunately, there is no ddi_dma_burstsizes here which
    209  1.33   mjacob 	 * walks up the tree finding the limiting burst size node (if
    210  1.33   mjacob 	 * any).
    211   1.5   mjacob 	 */
    212  1.33   mjacob 	sbusburst = ((struct sbus_softc *)parent)->sc_burst;
    213  1.33   mjacob 	if (sbusburst == 0)
    214  1.33   mjacob 		sbusburst = SBUS_BURST_32 - 1;
    215  1.33   mjacob 	ispburst = getpropint(sa->sa_node, "burst-sizes", -1);
    216  1.33   mjacob 	if (ispburst == -1) {
    217  1.33   mjacob 		ispburst = sbusburst;
    218  1.33   mjacob 	}
    219  1.33   mjacob 	ispburst &= sbusburst;
    220  1.33   mjacob 	ispburst &= ~(1 << 7);
    221  1.33   mjacob 	ispburst &= ~(1 << 6);
    222  1.33   mjacob 	sbc->sbus_mdvec.dv_conf1 =  0;
    223  1.33   mjacob 	if (ispburst & (1 << 5)) {
    224  1.33   mjacob 		sbc->sbus_mdvec.dv_conf1 = BIU_SBUS_CONF1_FIFO_32;
    225  1.33   mjacob 	} else if (ispburst & (1 << 4)) {
    226  1.33   mjacob 		sbc->sbus_mdvec.dv_conf1 = BIU_SBUS_CONF1_FIFO_16;
    227  1.33   mjacob 	} else if (ispburst & (1 << 3)) {
    228  1.33   mjacob 		sbc->sbus_mdvec.dv_conf1 =
    229  1.33   mjacob 		    BIU_SBUS_CONF1_BURST8 | BIU_SBUS_CONF1_FIFO_8;
    230  1.33   mjacob 	}
    231  1.33   mjacob 	if (sbc->sbus_mdvec.dv_conf1) {
    232  1.33   mjacob 		sbc->sbus_mdvec.dv_conf1 |= BIU_BURST_ENABLE;
    233  1.33   mjacob 	}
    234   1.1      mrg 
    235   1.1      mrg 	/*
    236   1.1      mrg 	 * Some early versions of the PTI SBus adapter
    237   1.1      mrg 	 * would fail in trying to download (via poking)
    238   1.1      mrg 	 * FW. We give up on them.
    239   1.1      mrg 	 */
    240   1.1      mrg 	if (strcmp("PTI,ptisp", sa->sa_name) == 0 ||
    241   1.1      mrg 	    strcmp("ptisp", sa->sa_name) == 0) {
    242  1.20   mjacob 		sbc->sbus_mdvec.dv_ispfw = NULL;
    243   1.1      mrg 	}
    244   1.1      mrg 
    245   1.1      mrg 	isp->isp_mdvec = &sbc->sbus_mdvec;
    246   1.2   mjacob 	isp->isp_bustype = ISP_BT_SBUS;
    247   1.1      mrg 	isp->isp_type = ISP_HA_SCSI_UNKNOWN;
    248   1.1      mrg 	isp->isp_param = &sbc->sbus_dev;
    249   1.1      mrg 	bzero(isp->isp_param, sizeof (sdparam));
    250   1.1      mrg 
    251   1.8   mjacob 	sbc->sbus_poff[BIU_BLOCK >> _BLK_REG_SHFT] = BIU_REGS_OFF;
    252   1.8   mjacob 	sbc->sbus_poff[MBOX_BLOCK >> _BLK_REG_SHFT] = SBUS_MBOX_REGS_OFF;
    253   1.8   mjacob 	sbc->sbus_poff[SXP_BLOCK >> _BLK_REG_SHFT] = SBUS_SXP_REGS_OFF;
    254   1.8   mjacob 	sbc->sbus_poff[RISC_BLOCK >> _BLK_REG_SHFT] = SBUS_RISC_REGS_OFF;
    255   1.8   mjacob 	sbc->sbus_poff[DMA_BLOCK >> _BLK_REG_SHFT] = DMA_REGS_OFF;
    256   1.1      mrg 
    257  1.35   mjacob 	/* Establish interrupt channel */
    258  1.35   mjacob 	bus_intr_establish(sbc->sbus_bustag, sbc->sbus_pri, IPL_BIO, 0,
    259  1.35   mjacob 	    isp_sbus_intr, sbc);
    260  1.35   mjacob 	sbus_establish(&sbc->sbus_sd, &sbc->sbus_isp.isp_osinfo._dev);
    261  1.35   mjacob 
    262  1.29   mjacob 	/*
    263  1.29   mjacob 	 * Set up logging levels.
    264  1.29   mjacob 	 */
    265  1.29   mjacob #ifdef	ISP_LOGDEFAULT
    266  1.29   mjacob 	isp->isp_dblev = ISP_LOGDEFAULT;
    267  1.29   mjacob #else
    268  1.35   mjacob 	isp->isp_dblev = ISP_LOGWARN|ISP_LOGERR;
    269  1.35   mjacob 	if (bootverbose)
    270  1.35   mjacob 		isp->isp_dblev |= ISP_LOGCONFIG|ISP_LOGINFO;
    271  1.29   mjacob #ifdef	SCSIDEBUG
    272  1.29   mjacob 	isp->isp_dblev |= ISP_LOGDEBUG1|ISP_LOGDEBUG2;
    273  1.29   mjacob #endif
    274  1.29   mjacob #ifdef	DEBUG
    275  1.35   mjacob 	isp->isp_dblev |= ISP_LOGDEBUG0;
    276  1.29   mjacob #endif
    277  1.29   mjacob #endif
    278  1.35   mjacob 
    279  1.18   mjacob 	isp->isp_confopts = self->dv_cfdata->cf_flags;
    280  1.35   mjacob 	isp->isp_role = ISP_DEFAULT_ROLES;
    281  1.35   mjacob 
    282  1.21   mjacob 	/*
    283  1.21   mjacob 	 * There's no tool on sparc to set NVRAM for ISPs, so ignore it.
    284  1.21   mjacob 	 */
    285  1.21   mjacob 	isp->isp_confopts |= ISP_CFG_NONVRAM;
    286   1.1      mrg 	ISP_LOCK(isp);
    287  1.29   mjacob 	isp->isp_osinfo.no_mbox_ints = 1;
    288   1.1      mrg 	isp_reset(isp);
    289   1.1      mrg 	if (isp->isp_state != ISP_RESETSTATE) {
    290   1.1      mrg 		ISP_UNLOCK(isp);
    291   1.1      mrg 		return;
    292   1.1      mrg 	}
    293  1.35   mjacob 	ENABLE_INTS(isp);
    294   1.1      mrg 	isp_init(isp);
    295   1.1      mrg 	if (isp->isp_state != ISP_INITSTATE) {
    296   1.1      mrg 		isp_uninit(isp);
    297   1.1      mrg 		ISP_UNLOCK(isp);
    298   1.1      mrg 		return;
    299   1.1      mrg 	}
    300   1.1      mrg 
    301   1.1      mrg 	/*
    302   1.1      mrg 	 * do generic attach.
    303   1.1      mrg 	 */
    304  1.35   mjacob 	ISP_UNLOCK(isp);
    305   1.1      mrg 	isp_attach(isp);
    306   1.1      mrg 	if (isp->isp_state != ISP_RUNSTATE) {
    307  1.35   mjacob 		ISP_LOCK(isp);
    308   1.1      mrg 		isp_uninit(isp);
    309  1.35   mjacob 		ISP_UNLOCK(isp);
    310   1.1      mrg 	}
    311  1.30   mjacob }
    312  1.30   mjacob 
    313  1.30   mjacob static int
    314  1.30   mjacob isp_sbus_intr(arg)
    315  1.30   mjacob 	void *arg;
    316  1.30   mjacob {
    317  1.30   mjacob 	int rv;
    318  1.30   mjacob 	struct isp_sbussoftc *sbc = (struct isp_sbussoftc *)arg;
    319  1.30   mjacob 	bus_dmamap_sync(sbc->sbus_dmatag, sbc->sbus_result_dmamap, 0,
    320  1.30   mjacob 	    sbc->sbus_result_dmamap->dm_mapsize, BUS_DMASYNC_POSTREAD);
    321  1.30   mjacob 	sbc->sbus_isp.isp_osinfo.onintstack = 1;
    322  1.30   mjacob 	rv = isp_intr(arg);
    323  1.30   mjacob 	sbc->sbus_isp.isp_osinfo.onintstack = 0;
    324  1.30   mjacob 	return (rv);
    325   1.1      mrg }
    326   1.1      mrg 
    327   1.1      mrg static u_int16_t
    328   1.1      mrg isp_sbus_rd_reg(isp, regoff)
    329   1.1      mrg 	struct ispsoftc *isp;
    330   1.1      mrg 	int regoff;
    331   1.1      mrg {
    332   1.1      mrg 	struct isp_sbussoftc *sbc = (struct isp_sbussoftc *) isp;
    333   1.8   mjacob 	int offset = sbc->sbus_poff[(regoff & _BLK_REG_MASK) >> _BLK_REG_SHFT];
    334   1.8   mjacob 	offset += (regoff & 0xff);
    335   1.6   mjacob 	return (bus_space_read_2(sbc->sbus_bustag, sbc->sbus_reg, offset));
    336   1.1      mrg }
    337   1.1      mrg 
    338   1.1      mrg static void
    339  1.14   mjacob isp_sbus_wr_reg(isp, regoff, val)
    340   1.1      mrg 	struct ispsoftc *isp;
    341   1.1      mrg 	int regoff;
    342   1.1      mrg 	u_int16_t val;
    343   1.1      mrg {
    344   1.1      mrg 	struct isp_sbussoftc *sbc = (struct isp_sbussoftc *) isp;
    345   1.8   mjacob 	int offset = sbc->sbus_poff[(regoff & _BLK_REG_MASK) >> _BLK_REG_SHFT];
    346   1.8   mjacob 	offset += (regoff & 0xff);
    347   1.6   mjacob 	bus_space_write_2(sbc->sbus_bustag, sbc->sbus_reg, offset, val);
    348   1.1      mrg }
    349   1.1      mrg 
    350   1.1      mrg static int
    351   1.1      mrg isp_sbus_mbxdma(isp)
    352   1.1      mrg 	struct ispsoftc *isp;
    353   1.1      mrg {
    354   1.1      mrg 	struct isp_sbussoftc *sbc = (struct isp_sbussoftc *) isp;
    355  1.24       pk 	bus_dma_tag_t dmatag = sbc->sbus_dmatag;
    356  1.40   mjacob 	bus_dma_segment_t reqseg, rspseg;
    357  1.40   mjacob 	int reqrs, rsprs, i, progress;
    358  1.14   mjacob 	size_t n;
    359  1.12       pk 	bus_size_t len;
    360   1.1      mrg 
    361  1.14   mjacob 	if (isp->isp_rquest_dma)
    362  1.14   mjacob 		return (0);
    363   1.1      mrg 
    364  1.29   mjacob 	n = sizeof (XS_T **) * isp->isp_maxcmds;
    365  1.29   mjacob 	isp->isp_xflist = (XS_T **) malloc(n, M_DEVBUF, M_WAITOK);
    366  1.14   mjacob 	if (isp->isp_xflist == NULL) {
    367  1.29   mjacob 		isp_prt(isp, ISP_LOGERR, "cannot alloc xflist array");
    368  1.14   mjacob 		return (1);
    369  1.14   mjacob 	}
    370  1.14   mjacob 	bzero(isp->isp_xflist, n);
    371  1.14   mjacob 	n = sizeof (bus_dmamap_t) * isp->isp_maxcmds;
    372  1.14   mjacob 	sbc->sbus_dmamap = (bus_dmamap_t *) malloc(n, M_DEVBUF, M_WAITOK);
    373  1.14   mjacob 	if (sbc->sbus_dmamap == NULL) {
    374  1.14   mjacob 		free(isp->isp_xflist, M_DEVBUF);
    375  1.29   mjacob 		isp->isp_xflist = NULL;
    376  1.29   mjacob 		isp_prt(isp, ISP_LOGERR, "cannot alloc dmamap array");
    377  1.29   mjacob 		return (1);
    378  1.29   mjacob 	}
    379  1.29   mjacob 	for (i = 0; i < isp->isp_maxcmds; i++) {
    380  1.29   mjacob 		/* Allocate a DMA handle */
    381  1.29   mjacob 		if (bus_dmamap_create(dmatag, MAXPHYS, 1, MAXPHYS, 0,
    382  1.29   mjacob 		    BUS_DMA_NOWAIT, &sbc->sbus_dmamap[i]) != 0) {
    383  1.29   mjacob 			isp_prt(isp, ISP_LOGERR, "cmd DMA maps create error");
    384  1.29   mjacob 			break;
    385  1.29   mjacob 		}
    386  1.29   mjacob 	}
    387  1.29   mjacob 	if (i < isp->isp_maxcmds) {
    388  1.29   mjacob 		while (--i >= 0) {
    389  1.29   mjacob 			bus_dmamap_destroy(dmatag, sbc->sbus_dmamap[i]);
    390  1.29   mjacob 		}
    391  1.29   mjacob 		free(isp->isp_xflist, M_DEVBUF);
    392  1.29   mjacob 		free(sbc->sbus_dmamap, M_DEVBUF);
    393  1.29   mjacob 		isp->isp_xflist = NULL;
    394  1.29   mjacob 		sbc->sbus_dmamap = NULL;
    395  1.14   mjacob 		return (1);
    396  1.14   mjacob 	}
    397  1.29   mjacob 
    398   1.1      mrg 	/*
    399  1.40   mjacob 	 * Allocate and map the request and response queues
    400   1.1      mrg 	 */
    401  1.40   mjacob 	progress = 0;
    402  1.29   mjacob 	len = ISP_QUEUE_SIZE(RQUEST_QUEUE_LEN(isp));
    403  1.25       pk 	if (bus_dmamap_create(dmatag, len, 1, len, 0, BUS_DMA_NOWAIT,
    404  1.35   mjacob 	    &sbc->sbus_rquest_dmamap) != 0) {
    405  1.24       pk 		goto dmafail;
    406  1.24       pk 	}
    407  1.40   mjacob 	progress++;
    408  1.40   mjacob 	if (bus_dmamem_alloc(dmatag, len, 0, 0, &reqseg, 1, &reqrs,
    409  1.40   mjacob 	    BUS_DMA_NOWAIT)) {
    410  1.24       pk 		goto dmafail;
    411  1.24       pk 	}
    412  1.41  thorpej 	isp->isp_rquest_dma = sbc->sbus_rquest_dmamap->dm_segs[0].ds_addr;
    413  1.40   mjacob 	progress++;
    414  1.41  thorpej 	if (bus_dmamem_map(dmatag, &reqseg, reqrs, len,
    415  1.41  thorpej 	    (caddr_t *)&isp->isp_rquest, BUS_DMA_NOWAIT|BUS_DMA_COHERENT)) {
    416  1.24       pk 		goto dmafail;
    417  1.24       pk 	}
    418  1.40   mjacob 	progress++;
    419  1.41  thorpej 	if (bus_dmamap_load(dmatag, sbc->sbus_rquest_dmamap,
    420  1.41  thorpej 	    isp->isp_rquest, len, NULL, LMAP_FLAGS) != 0) {
    421  1.24       pk 		goto dmafail;
    422  1.14   mjacob 	}
    423  1.40   mjacob 	progress++;
    424   1.1      mrg 
    425  1.29   mjacob 	len = ISP_QUEUE_SIZE(RESULT_QUEUE_LEN(isp));
    426  1.25       pk 	if (bus_dmamap_create(dmatag, len, 1, len, 0, BUS_DMA_NOWAIT,
    427  1.29   mjacob 	    &sbc->sbus_result_dmamap) != 0) {
    428  1.24       pk 		goto dmafail;
    429  1.24       pk 	}
    430  1.40   mjacob 	progress++;
    431  1.40   mjacob 	if (bus_dmamem_alloc(dmatag, len, 0, 0, &rspseg, 1, &rsprs,
    432  1.40   mjacob 	    BUS_DMA_NOWAIT)) {
    433  1.24       pk 		goto dmafail;
    434  1.24       pk 	}
    435  1.41  thorpej 	isp->isp_result_dma = sbc->sbus_result_dmamap->dm_segs[0].ds_addr;
    436  1.40   mjacob 	progress++;
    437  1.41  thorpej 	if (bus_dmamem_map(dmatag, &rspseg, rsprs, len,
    438  1.41  thorpej 	    (caddr_t *)&isp->isp_result, BUS_DMA_NOWAIT|BUS_DMA_COHERENT)) {
    439  1.24       pk 		goto dmafail;
    440  1.24       pk 	}
    441  1.40   mjacob 	progress++;
    442  1.41  thorpej 	if (bus_dmamap_load(dmatag, sbc->sbus_result_dmamap,
    443  1.41  thorpej 	    isp->isp_result, len, NULL, LMAP_FLAGS) != 0) {
    444  1.24       pk 		goto dmafail;
    445  1.14   mjacob 	}
    446  1.41  thorpej 	progress++;
    447   1.1      mrg 	return (0);
    448  1.24       pk 
    449  1.24       pk dmafail:
    450  1.40   mjacob 	isp_prt(isp, ISP_LOGERR, "Mailbox DMA Setup Failure");
    451  1.40   mjacob 
    452  1.40   mjacob 	if (progress >= 8) {
    453  1.41  thorpej 		bus_dmamap_unload(dmatag, sbc->sbus_result_dmamap);
    454  1.41  thorpej 	}
    455  1.41  thorpej 	if (progress >= 7) {
    456  1.40   mjacob 		bus_dmamem_unmap(dmatag,
    457  1.40   mjacob 		    isp->isp_result, ISP_QUEUE_SIZE(RESULT_QUEUE_LEN(isp)));
    458  1.40   mjacob 	}
    459  1.40   mjacob 	if (progress >= 6) {
    460  1.40   mjacob 		bus_dmamem_free(dmatag, &rspseg, rsprs);
    461  1.40   mjacob 	}
    462  1.40   mjacob 	if (progress >= 5) {
    463  1.40   mjacob 		bus_dmamap_destroy(dmatag, sbc->sbus_result_dmamap);
    464  1.40   mjacob 	}
    465  1.40   mjacob 
    466  1.40   mjacob 	if (progress >= 4) {
    467  1.41  thorpej 		bus_dmamap_unload(dmatag, sbc->sbus_rquest_dmamap);
    468  1.41  thorpej 	}
    469  1.41  thorpej 	if (progress >= 3) {
    470  1.40   mjacob 		bus_dmamem_unmap(dmatag,
    471  1.40   mjacob 		    isp->isp_rquest, ISP_QUEUE_SIZE(RQUEST_QUEUE_LEN(isp)));
    472  1.41  thorpej 
    473  1.40   mjacob 	}
    474  1.40   mjacob 	if (progress >= 2) {
    475  1.40   mjacob 		bus_dmamem_free(dmatag, &reqseg, reqrs);
    476  1.40   mjacob 	}
    477  1.40   mjacob 	if (progress >= 1) {
    478  1.40   mjacob 		bus_dmamap_destroy(dmatag, sbc->sbus_rquest_dmamap);
    479  1.40   mjacob 	}
    480  1.40   mjacob 
    481  1.29   mjacob 	for (i = 0; i < isp->isp_maxcmds; i++) {
    482  1.29   mjacob 		bus_dmamap_destroy(dmatag, sbc->sbus_dmamap[i]);
    483  1.29   mjacob 	}
    484  1.24       pk 	free(sbc->sbus_dmamap, M_DEVBUF);
    485  1.24       pk 	free(isp->isp_xflist, M_DEVBUF);
    486  1.29   mjacob 	isp->isp_xflist = NULL;
    487  1.29   mjacob 	sbc->sbus_dmamap = NULL;
    488  1.24       pk 	return (1);
    489   1.1      mrg }
    490   1.1      mrg 
    491   1.1      mrg /*
    492  1.14   mjacob  * Map a DMA request.
    493  1.14   mjacob  * We're guaranteed that rq->req_handle is a value from 1 to isp->isp_maxcmds.
    494   1.1      mrg  */
    495   1.1      mrg 
    496   1.1      mrg static int
    497   1.1      mrg isp_sbus_dmasetup(isp, xs, rq, iptrp, optr)
    498   1.1      mrg 	struct ispsoftc *isp;
    499   1.1      mrg 	struct scsipi_xfer *xs;
    500   1.1      mrg 	ispreq_t *rq;
    501  1.17   mjacob 	u_int16_t *iptrp;
    502  1.17   mjacob 	u_int16_t optr;
    503   1.1      mrg {
    504   1.1      mrg 	struct isp_sbussoftc *sbc = (struct isp_sbussoftc *) isp;
    505  1.27   mjacob 	bus_dmamap_t dmap;
    506  1.22   mjacob 	ispcontreq_t *crq;
    507  1.19   mjacob 	int cansleep = (xs->xs_control & XS_CTL_NOSLEEP) == 0;
    508  1.14   mjacob 	int in = (xs->xs_control & XS_CTL_DATA_IN) != 0;
    509   1.1      mrg 
    510   1.1      mrg 	if (xs->datalen == 0) {
    511   1.1      mrg 		rq->req_seg_count = 1;
    512  1.14   mjacob 		goto mbxsync;
    513   1.1      mrg 	}
    514  1.27   mjacob 
    515  1.27   mjacob 	dmap = sbc->sbus_dmamap[isp_handle_index(rq->req_handle)];
    516  1.27   mjacob 	if (dmap->dm_nsegs != 0) {
    517   1.1      mrg 		panic("%s: dma map already allocated\n", isp->isp_name);
    518   1.1      mrg 		/* NOTREACHED */
    519   1.1      mrg 	}
    520  1.27   mjacob 	if (bus_dmamap_load(sbc->sbus_dmatag, dmap, xs->data, xs->datalen,
    521  1.41  thorpej 	    NULL, (cansleep ? BUS_DMA_WAITOK : BUS_DMA_NOWAIT) |
    522  1.41  thorpej 	    BUS_DMA_STREAMING) != 0) {
    523   1.1      mrg 		XS_SETERR(xs, HBA_BOTCH);
    524   1.3   mjacob 		return (CMD_COMPLETE);
    525   1.1      mrg 	}
    526  1.27   mjacob 
    527  1.37   mjacob 	bus_dmamap_sync(sbc->sbus_dmatag, dmap, 0, xs->datalen,
    528  1.37   mjacob 	    in? BUS_DMASYNC_PREREAD : BUS_DMASYNC_PREWRITE);
    529  1.27   mjacob 
    530  1.14   mjacob 	if (in) {
    531   1.1      mrg 		rq->req_flags |= REQFLAG_DATA_IN;
    532   1.1      mrg 	} else {
    533   1.1      mrg 		rq->req_flags |= REQFLAG_DATA_OUT;
    534   1.1      mrg 	}
    535  1.22   mjacob 
    536  1.27   mjacob 	if (XS_CDBLEN(xs) > 12) {
    537  1.27   mjacob 		crq = (ispcontreq_t *) ISP_QUEUE_ENTRY(isp->isp_rquest, *iptrp);
    538  1.29   mjacob 		*iptrp = ISP_NXT_QENTRY(*iptrp, RQUEST_QUEUE_LEN(isp));
    539  1.27   mjacob 		if (*iptrp == optr) {
    540  1.29   mjacob 			isp_prt(isp, ISP_LOGDEBUG0, "Request Queue Overflow++");
    541  1.27   mjacob 			bus_dmamap_unload(sbc->sbus_dmatag, dmap);
    542  1.27   mjacob 			XS_SETERR(xs, HBA_BOTCH);
    543  1.27   mjacob 			return (CMD_EAGAIN);
    544  1.27   mjacob 		}
    545  1.22   mjacob 		rq->req_seg_count = 2;
    546  1.27   mjacob 		rq->req_dataseg[0].ds_count = 0;
    547  1.27   mjacob 		rq->req_dataseg[0].ds_base =  0;
    548  1.22   mjacob 		bzero((void *)crq, sizeof (*crq));
    549  1.22   mjacob 		crq->req_header.rqs_entry_count = 1;
    550  1.22   mjacob 		crq->req_header.rqs_entry_type = RQSTYPE_DATASEG;
    551  1.22   mjacob 		crq->req_dataseg[0].ds_count = xs->datalen;
    552  1.27   mjacob 		crq->req_dataseg[0].ds_base =  dmap->dm_segs[0].ds_addr;
    553  1.29   mjacob 		ISP_SBUSIFY_ISPHDR(isp, &crq->req_header)
    554  1.22   mjacob 	} else {
    555  1.22   mjacob 		rq->req_dataseg[0].ds_count = xs->datalen;
    556  1.27   mjacob 		rq->req_dataseg[0].ds_base = dmap->dm_segs[0].ds_addr;
    557  1.22   mjacob 		rq->req_seg_count = 1;
    558  1.22   mjacob 	}
    559  1.22   mjacob 
    560  1.14   mjacob mbxsync:
    561  1.35   mjacob 	ISP_SWIZZLE_REQUEST(isp, rq);
    562  1.35   mjacob 	bus_dmamap_sync(sbc->sbus_dmatag, sbc->sbus_rquest_dmamap, 0,
    563  1.35   mjacob 	     sbc->sbus_rquest_dmamap->dm_mapsize, BUS_DMASYNC_PREWRITE);
    564   1.3   mjacob 	return (CMD_QUEUED);
    565   1.1      mrg }
    566   1.1      mrg 
    567   1.1      mrg static void
    568   1.1      mrg isp_sbus_dmateardown(isp, xs, handle)
    569   1.1      mrg 	struct ispsoftc *isp;
    570   1.1      mrg 	struct scsipi_xfer *xs;
    571   1.1      mrg 	u_int32_t handle;
    572   1.1      mrg {
    573   1.1      mrg 	struct isp_sbussoftc *sbc = (struct isp_sbussoftc *) isp;
    574  1.27   mjacob 	bus_dmamap_t dmap;
    575  1.27   mjacob 
    576  1.27   mjacob 	dmap = sbc->sbus_dmamap[isp_handle_index(handle)];
    577  1.27   mjacob 
    578  1.27   mjacob 	if (dmap->dm_nsegs == 0) {
    579   1.1      mrg 		panic("%s: dma map not already allocated\n", isp->isp_name);
    580   1.1      mrg 		/* NOTREACHED */
    581   1.1      mrg 	}
    582  1.38   mjacob 	bus_dmamap_sync(sbc->sbus_dmatag, dmap, 0,
    583  1.14   mjacob 	    xs->datalen, (xs->xs_control & XS_CTL_DATA_IN)?
    584  1.14   mjacob 	    BUS_DMASYNC_POSTREAD : BUS_DMASYNC_POSTWRITE);
    585  1.27   mjacob 	bus_dmamap_unload(sbc->sbus_dmatag, dmap);
    586   1.1      mrg }
    587