Home | History | Annotate | Line # | Download | only in pci
isp_pci.c revision 1.25.2.1
      1  1.25.2.1      eeh /* $NetBSD: isp_pci.c,v 1.25.2.1 1998/08/08 03:06:49 eeh Exp $ */
      2       1.1      cgd /*
      3       1.1      cgd  * PCI specific probe and attach routines for Qlogic ISP SCSI adapters.
      4       1.1      cgd  *
      5      1.21   mjacob  *---------------------------------------
      6      1.21   mjacob  * Copyright (c) 1997, 1998 by Matthew Jacob
      7      1.21   mjacob  * NASA/Ames Research Center
      8       1.1      cgd  * All rights reserved.
      9      1.21   mjacob  *---------------------------------------
     10       1.1      cgd  *
     11       1.1      cgd  * Redistribution and use in source and binary forms, with or without
     12       1.1      cgd  * modification, are permitted provided that the following conditions
     13       1.1      cgd  * are met:
     14       1.1      cgd  * 1. Redistributions of source code must retain the above copyright
     15       1.1      cgd  *    notice immediately at the beginning of the file, without modification,
     16       1.1      cgd  *    this list of conditions, and the following disclaimer.
     17       1.1      cgd  * 2. Redistributions in binary form must reproduce the above copyright
     18       1.1      cgd  *    notice, this list of conditions and the following disclaimer in the
     19       1.1      cgd  *    documentation and/or other materials provided with the distribution.
     20       1.1      cgd  * 3. The name of the author may not be used to endorse or promote products
     21       1.1      cgd  *    derived from this software without specific prior written permission.
     22       1.1      cgd  *
     23       1.1      cgd  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
     24       1.1      cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     25       1.1      cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     26       1.1      cgd  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
     27       1.1      cgd  * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     28       1.1      cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     29       1.1      cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     30       1.1      cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     31       1.1      cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     32       1.1      cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     33       1.1      cgd  * SUCH DAMAGE.
     34      1.21   mjacob  *
     35       1.1      cgd  */
     36       1.1      cgd 
     37      1.21   mjacob #include <dev/ic/isp_netbsd.h>
     38      1.21   mjacob #include <dev/microcode/isp/asm_pci.h>
     39      1.21   mjacob 
     40       1.1      cgd #include <dev/pci/pcireg.h>
     41       1.1      cgd #include <dev/pci/pcivar.h>
     42       1.1      cgd #include <dev/pci/pcidevs.h>
     43       1.3      cgd 
     44       1.1      cgd static u_int16_t isp_pci_rd_reg __P((struct ispsoftc *, int));
     45       1.1      cgd static void isp_pci_wr_reg __P((struct ispsoftc *, int, u_int16_t));
     46      1.13  thorpej static int isp_pci_mbxdma __P((struct ispsoftc *));
     47      1.16   bouyer static int isp_pci_dmasetup __P((struct ispsoftc *, struct scsipi_xfer *,
     48      1.13  thorpej 	ispreq_t *, u_int8_t *, u_int8_t));
     49      1.16   bouyer static void isp_pci_dmateardown __P((struct ispsoftc *, struct scsipi_xfer *,
     50      1.13  thorpej 	u_int32_t));
     51       1.1      cgd 
     52       1.1      cgd static void isp_pci_reset1 __P((struct ispsoftc *));
     53      1.15   mjacob static void isp_pci_dumpregs __P((struct ispsoftc *));
     54  1.25.2.1      eeh static int isp_pci_intr __P((void *));
     55       1.1      cgd 
     56       1.1      cgd static struct ispmdvec mdvec = {
     57       1.1      cgd 	isp_pci_rd_reg,
     58       1.1      cgd 	isp_pci_wr_reg,
     59       1.1      cgd 	isp_pci_mbxdma,
     60       1.1      cgd 	isp_pci_dmasetup,
     61      1.13  thorpej 	isp_pci_dmateardown,
     62       1.1      cgd 	NULL,
     63       1.1      cgd 	isp_pci_reset1,
     64      1.15   mjacob 	isp_pci_dumpregs,
     65       1.5      cgd 	ISP_RISC_CODE,
     66       1.1      cgd 	ISP_CODE_LENGTH,
     67       1.1      cgd 	ISP_CODE_ORG,
     68      1.15   mjacob 	ISP_CODE_VERSION,
     69      1.15   mjacob 	BIU_PCI_CONF1_FIFO_64 | BIU_BURST_ENABLE,
     70      1.15   mjacob 	60	/* MAGIC- all known PCI card implementations are 60MHz */
     71      1.15   mjacob };
     72      1.15   mjacob 
     73      1.15   mjacob static struct ispmdvec mdvec_2100 = {
     74      1.15   mjacob 	isp_pci_rd_reg,
     75      1.15   mjacob 	isp_pci_wr_reg,
     76      1.15   mjacob 	isp_pci_mbxdma,
     77      1.15   mjacob 	isp_pci_dmasetup,
     78      1.15   mjacob 	isp_pci_dmateardown,
     79      1.15   mjacob 	NULL,
     80      1.15   mjacob 	isp_pci_reset1,
     81      1.15   mjacob 	isp_pci_dumpregs,
     82      1.15   mjacob 	ISP2100_RISC_CODE,
     83      1.15   mjacob 	ISP2100_CODE_LENGTH,
     84      1.15   mjacob 	ISP2100_CODE_ORG,
     85      1.15   mjacob 	ISP2100_CODE_VERSION,
     86      1.15   mjacob 	BIU_PCI_CONF1_FIFO_64 | BIU_BURST_ENABLE,
     87      1.10   mjacob 	60	/* MAGIC- all known PCI card implementations are 60MHz */
     88       1.1      cgd };
     89       1.1      cgd 
     90       1.1      cgd #define	PCI_QLOGIC_ISP	\
     91       1.1      cgd 	((PCI_PRODUCT_QLOGIC_ISP1020 << 16) | PCI_VENDOR_QLOGIC)
     92       1.1      cgd 
     93      1.15   mjacob #ifndef	PCI_PRODUCT_QLOGIC_ISP2100
     94      1.15   mjacob #define	PCI_PRODUCT_QLOGIC_ISP2100	0x2100
     95      1.15   mjacob #endif
     96      1.15   mjacob #define	PCI_QLOGIC_ISP2100	\
     97      1.15   mjacob 	((PCI_PRODUCT_QLOGIC_ISP2100 << 16) | PCI_VENDOR_QLOGIC)
     98      1.15   mjacob 
     99       1.6      cgd #define IO_MAP_REG	0x10
    100       1.6      cgd #define MEM_MAP_REG	0x14
    101       1.6      cgd 
    102       1.1      cgd 
    103       1.1      cgd static int isp_pci_probe __P((struct device *, struct cfdata *, void *));
    104       1.1      cgd static void isp_pci_attach __P((struct device *, struct device *, void *));
    105       1.1      cgd 
    106       1.1      cgd struct isp_pcisoftc {
    107       1.1      cgd 	struct ispsoftc		pci_isp;
    108      1.15   mjacob 	pci_chipset_tag_t	pci_pc;
    109      1.15   mjacob 	pcitag_t		pci_tag;
    110       1.6      cgd 	bus_space_tag_t		pci_st;
    111       1.6      cgd 	bus_space_handle_t	pci_sh;
    112      1.13  thorpej 	bus_dma_tag_t		pci_dmat;
    113      1.15   mjacob 	bus_dmamap_t		pci_scratch_dmap;	/* for fcp only */
    114      1.13  thorpej 	bus_dmamap_t		pci_rquest_dmap;
    115      1.13  thorpej 	bus_dmamap_t		pci_result_dmap;
    116      1.15   mjacob 	bus_dmamap_t		pci_xfer_dmap[MAXISPREQUEST];
    117       1.1      cgd 	void *			pci_ih;
    118       1.1      cgd };
    119       1.1      cgd 
    120       1.1      cgd struct cfattach isp_pci_ca = {
    121       1.1      cgd 	sizeof (struct isp_pcisoftc), isp_pci_probe, isp_pci_attach
    122       1.1      cgd };
    123       1.1      cgd 
    124       1.1      cgd static int
    125       1.1      cgd isp_pci_probe(parent, match, aux)
    126       1.1      cgd         struct device *parent;
    127       1.1      cgd         struct cfdata *match;
    128       1.1      cgd 	void *aux;
    129       1.1      cgd {
    130       1.1      cgd         struct pci_attach_args *pa = aux;
    131       1.1      cgd 
    132      1.15   mjacob 	if (pa->pa_id == PCI_QLOGIC_ISP ||
    133      1.15   mjacob 	    pa->pa_id == PCI_QLOGIC_ISP2100) {
    134       1.1      cgd 		return (1);
    135       1.1      cgd 	} else {
    136       1.1      cgd 		return (0);
    137       1.1      cgd 	}
    138       1.1      cgd }
    139       1.1      cgd 
    140       1.1      cgd 
    141       1.1      cgd static void
    142       1.1      cgd isp_pci_attach(parent, self, aux)
    143       1.1      cgd         struct device *parent, *self;
    144       1.1      cgd         void *aux;
    145       1.1      cgd {
    146      1.25  thorpej #ifdef DEBUG
    147      1.23   mjacob 	static char oneshot = 1;
    148      1.25  thorpej #endif
    149       1.1      cgd 	struct pci_attach_args *pa = aux;
    150       1.1      cgd 	struct isp_pcisoftc *pcs = (struct isp_pcisoftc *) self;
    151      1.21   mjacob 	struct ispsoftc *isp = &pcs->pci_isp;
    152      1.11      cgd 	bus_space_tag_t st, iot, memt;
    153      1.11      cgd 	bus_space_handle_t sh, ioh, memh;
    154       1.1      cgd 	pci_intr_handle_t ih;
    155       1.1      cgd 	const char *intrstr;
    156      1.15   mjacob 	int ioh_valid, memh_valid, i;
    157      1.22   mjacob 	ISP_LOCKVAL_DECL;
    158       1.1      cgd 
    159      1.12      cgd 	ioh_valid = (pci_mapreg_map(pa, IO_MAP_REG,
    160      1.11      cgd 	    PCI_MAPREG_TYPE_IO, 0,
    161      1.11      cgd 	    &iot, &ioh, NULL, NULL) == 0);
    162      1.12      cgd 	memh_valid = (pci_mapreg_map(pa, MEM_MAP_REG,
    163      1.11      cgd 	    PCI_MAPREG_TYPE_MEM | PCI_MAPREG_MEM_TYPE_32BIT, 0,
    164      1.11      cgd 	    &memt, &memh, NULL, NULL) == 0);
    165      1.11      cgd 
    166      1.11      cgd 	if (memh_valid) {
    167      1.11      cgd 		st = memt;
    168      1.11      cgd 		sh = memh;
    169      1.11      cgd 	} else if (ioh_valid) {
    170      1.11      cgd 		st = iot;
    171      1.11      cgd 		sh = ioh;
    172       1.6      cgd 	} else {
    173      1.11      cgd 		printf(": unable to map device registers\n");
    174       1.9      cgd 		return;
    175       1.1      cgd 	}
    176       1.1      cgd 	printf("\n");
    177       1.1      cgd 
    178       1.6      cgd 	pcs->pci_st = st;
    179       1.6      cgd 	pcs->pci_sh = sh;
    180      1.13  thorpej 	pcs->pci_dmat = pa->pa_dmat;
    181      1.15   mjacob 	pcs->pci_pc = pa->pa_pc;
    182      1.15   mjacob 	pcs->pci_tag = pa->pa_tag;
    183      1.15   mjacob 	if (pa->pa_id == PCI_QLOGIC_ISP) {
    184      1.21   mjacob 		isp->isp_mdvec = &mdvec;
    185      1.21   mjacob 		isp->isp_type = ISP_HA_SCSI_UNKNOWN;
    186      1.21   mjacob 		isp->isp_param = malloc(sizeof (sdparam), M_DEVBUF, M_NOWAIT);
    187      1.21   mjacob 		if (isp->isp_param == NULL) {
    188      1.15   mjacob 			printf("%s: couldn't allocate sdparam table\n",
    189      1.21   mjacob 			       isp->isp_name);
    190      1.21   mjacob 			return;
    191      1.15   mjacob 		}
    192      1.21   mjacob 		bzero(isp->isp_param, sizeof (sdparam));
    193      1.15   mjacob 	} else if (pa->pa_id == PCI_QLOGIC_ISP2100) {
    194      1.15   mjacob 		u_int32_t data;
    195      1.21   mjacob 		isp->isp_mdvec = &mdvec_2100;
    196      1.15   mjacob 		if (ioh_valid == 0) {
    197      1.15   mjacob 			printf("%s: warning, ISP2100 cannot use I/O Space"
    198      1.21   mjacob 				" Mappings\n", isp->isp_name);
    199      1.15   mjacob 		} else {
    200      1.15   mjacob 			pcs->pci_st = iot;
    201      1.15   mjacob 			pcs->pci_sh = ioh;
    202      1.15   mjacob 		}
    203      1.15   mjacob 
    204      1.15   mjacob #if	0
    205      1.21   mjacob 		printf("%s: PCIREGS cmd=%x bhlc=%x\n", isp->isp_name,
    206      1.15   mjacob 		 pci_conf_read(pa->pa_pc, pa->pa_tag, PCI_COMMAND_STATUS_REG),
    207      1.15   mjacob 		 pci_conf_read(pa->pa_pc, pa->pa_tag, PCI_BHLC_REG));
    208      1.15   mjacob #endif
    209      1.21   mjacob 		isp->isp_type = ISP_HA_FC_2100;
    210      1.21   mjacob 		isp->isp_param = malloc(sizeof (fcparam), M_DEVBUF, M_NOWAIT);
    211      1.21   mjacob 		if (isp->isp_param == NULL) {
    212      1.15   mjacob 			printf("%s: couldn't allocate fcparam table\n",
    213      1.21   mjacob 			       isp->isp_name);
    214      1.21   mjacob 			return;
    215      1.15   mjacob 		}
    216      1.21   mjacob 		bzero(isp->isp_param, sizeof (fcparam));
    217      1.15   mjacob 
    218      1.15   mjacob 		data = pci_conf_read(pa->pa_pc, pa->pa_tag,
    219      1.15   mjacob 			PCI_COMMAND_STATUS_REG);
    220      1.15   mjacob 		data |= PCI_COMMAND_MASTER_ENABLE |
    221      1.15   mjacob 			PCI_COMMAND_INVALIDATE_ENABLE;
    222      1.15   mjacob 		pci_conf_write(pa->pa_pc, pa->pa_tag,
    223      1.15   mjacob 			PCI_COMMAND_STATUS_REG, data);
    224      1.15   mjacob 		/*
    225      1.15   mjacob 		 * Wierd- we need to clear the lsb in offset 0x30 to take the
    226      1.15   mjacob 		 * chip out of reset state.
    227      1.15   mjacob 		 */
    228      1.15   mjacob 		data = pci_conf_read(pa->pa_pc, pa->pa_tag, 0x30);
    229      1.15   mjacob 		data &= ~1;
    230      1.15   mjacob 		pci_conf_write(pa->pa_pc, pa->pa_tag, 0x30, data);
    231      1.15   mjacob #if	0
    232      1.15   mjacob 		/*
    233      1.15   mjacob 		 * XXX: Need to get the actual revision number of the 2100 FB
    234      1.15   mjacob 		 */
    235      1.15   mjacob 		data = pci_conf_read(pa->pa_pc, pa->pa_tag, PCI_BHLC_REG);
    236      1.15   mjacob 		data &= ~0xffff;
    237      1.15   mjacob 		data |= 0xf801;
    238      1.15   mjacob 		pci_conf_write(pa->pa_pc, pa->pa_tag, PCI_BHLC_REG, data);
    239      1.15   mjacob 		printf("%s: setting latency to %x and cache line size to %x\n",
    240      1.21   mjacob 			isp->isp_name, (data >> 8) & 0xff,
    241      1.15   mjacob 			data & 0xff);
    242      1.15   mjacob #endif
    243      1.15   mjacob 	} else {
    244      1.15   mjacob 		return;
    245      1.15   mjacob 	}
    246      1.21   mjacob 
    247      1.24  thorpej #ifdef DEBUG
    248      1.21   mjacob 	if (oneshot) {
    249      1.21   mjacob 		oneshot = 0;
    250      1.22   mjacob 		printf("***Qlogic ISP Driver, NetBSD (pci) Platform Version "
    251      1.22   mjacob 		    "%d.%d Core Version %d.%d\n",
    252      1.22   mjacob 		    ISP_PLATFORM_VERSION_MAJOR, ISP_PLATFORM_VERSION_MINOR,
    253      1.22   mjacob 		    ISP_CORE_VERSION_MAJOR, ISP_CORE_VERSION_MINOR);
    254      1.21   mjacob 	}
    255      1.24  thorpej #endif
    256      1.21   mjacob 
    257      1.22   mjacob 	ISP_LOCK(isp);
    258      1.21   mjacob 	isp_reset(isp);
    259      1.21   mjacob 	if (isp->isp_state != ISP_RESETSTATE) {
    260      1.22   mjacob 		ISP_UNLOCK(isp);
    261      1.21   mjacob 		free(isp->isp_param, M_DEVBUF);
    262       1.1      cgd 		return;
    263       1.1      cgd 	}
    264      1.21   mjacob 	isp_init(isp);
    265      1.21   mjacob 	if (isp->isp_state != ISP_INITSTATE) {
    266      1.21   mjacob 		isp_uninit(isp);
    267      1.22   mjacob 		ISP_UNLOCK(isp);
    268      1.21   mjacob 		free(isp->isp_param, M_DEVBUF);
    269       1.1      cgd 		return;
    270       1.1      cgd 	}
    271       1.1      cgd 
    272       1.1      cgd 	if (pci_intr_map(pa->pa_pc, pa->pa_intrtag, pa->pa_intrpin,
    273       1.1      cgd 			 pa->pa_intrline, &ih)) {
    274      1.21   mjacob 		printf("%s: couldn't map interrupt\n", isp->isp_name);
    275      1.21   mjacob 		isp_uninit(isp);
    276      1.22   mjacob 		ISP_UNLOCK(isp);
    277      1.21   mjacob 		free(isp->isp_param, M_DEVBUF);
    278       1.1      cgd 		return;
    279       1.1      cgd 	}
    280       1.1      cgd 
    281       1.1      cgd 	intrstr = pci_intr_string(pa->pa_pc, ih);
    282       1.1      cgd 	if (intrstr == NULL)
    283       1.1      cgd 		intrstr = "<I dunno>";
    284       1.1      cgd 	pcs->pci_ih =
    285  1.25.2.1      eeh 	  pci_intr_establish(pa->pa_pc, ih, IPL_BIO, isp_pci_intr, isp);
    286       1.1      cgd 	if (pcs->pci_ih == NULL) {
    287       1.1      cgd 		printf("%s: couldn't establish interrupt at %s\n",
    288      1.21   mjacob 			isp->isp_name, intrstr);
    289      1.21   mjacob 		isp_uninit(isp);
    290      1.22   mjacob 		ISP_UNLOCK(isp);
    291      1.21   mjacob 		free(isp->isp_param, M_DEVBUF);
    292       1.1      cgd 		return;
    293       1.1      cgd 	}
    294      1.21   mjacob 	printf("%s: interrupting at %s\n", isp->isp_name, intrstr);
    295       1.1      cgd 
    296       1.1      cgd 	/*
    297      1.13  thorpej 	 * Create the DMA maps for the data transfers.
    298      1.13  thorpej 	 */
    299      1.21   mjacob 	for (i = 0; i < RQUEST_QUEUE_LEN; i++) {
    300      1.13  thorpej 		if (bus_dmamap_create(pcs->pci_dmat, MAXPHYS,
    301      1.13  thorpej 		    (MAXPHYS / NBPG) + 1, MAXPHYS, 0, BUS_DMA_NOWAIT,
    302      1.13  thorpej 		    &pcs->pci_xfer_dmap[i])) {
    303      1.13  thorpej 			printf("%s: can't create dma maps\n",
    304      1.21   mjacob 			    isp->isp_name);
    305      1.21   mjacob 			isp_uninit(isp);
    306      1.22   mjacob 			ISP_UNLOCK(isp);
    307      1.13  thorpej 			return;
    308      1.13  thorpej 		}
    309      1.13  thorpej 	}
    310      1.13  thorpej 	/*
    311       1.1      cgd 	 * Do Generic attach now.
    312       1.1      cgd 	 */
    313      1.21   mjacob 	isp_attach(isp);
    314      1.21   mjacob 	if (isp->isp_state != ISP_RUNSTATE) {
    315      1.21   mjacob 		isp_uninit(isp);
    316      1.21   mjacob 		free(isp->isp_param, M_DEVBUF);
    317       1.1      cgd 	}
    318      1.22   mjacob 	ISP_UNLOCK(isp);
    319       1.1      cgd }
    320       1.1      cgd 
    321      1.15   mjacob #define  PCI_BIU_REGS_OFF		BIU_REGS_OFF
    322       1.1      cgd 
    323       1.1      cgd static u_int16_t
    324       1.1      cgd isp_pci_rd_reg(isp, regoff)
    325       1.1      cgd 	struct ispsoftc *isp;
    326       1.1      cgd 	int regoff;
    327       1.1      cgd {
    328      1.15   mjacob 	u_int16_t rv;
    329       1.1      cgd 	struct isp_pcisoftc *pcs = (struct isp_pcisoftc *) isp;
    330      1.15   mjacob 	int offset, oldsxp = 0;
    331      1.15   mjacob 
    332       1.1      cgd 	if ((regoff & BIU_BLOCK) != 0) {
    333       1.1      cgd 		offset = PCI_BIU_REGS_OFF;
    334       1.1      cgd 	} else if ((regoff & MBOX_BLOCK) != 0) {
    335      1.15   mjacob 		if (isp->isp_type & ISP_HA_SCSI)
    336      1.15   mjacob 			offset = PCI_MBOX_REGS_OFF;
    337      1.15   mjacob 		else
    338      1.15   mjacob 			offset = PCI_MBOX_REGS2100_OFF;
    339       1.1      cgd 	} else if ((regoff & SXP_BLOCK) != 0) {
    340       1.1      cgd 		offset = PCI_SXP_REGS_OFF;
    341       1.1      cgd 		/*
    342      1.15   mjacob 		 * We will assume that someone has paused the RISC processor.
    343       1.1      cgd 		 */
    344      1.15   mjacob 		oldsxp = isp_pci_rd_reg(isp, BIU_CONF1);
    345      1.15   mjacob 		isp_pci_wr_reg(isp, BIU_CONF1, oldsxp & ~BIU_PCI_CONF1_SXP);
    346       1.1      cgd 	} else {
    347       1.1      cgd 		offset = PCI_RISC_REGS_OFF;
    348       1.1      cgd 	}
    349       1.1      cgd 	regoff &= 0xff;
    350       1.1      cgd 	offset += regoff;
    351      1.15   mjacob 	rv = bus_space_read_2(pcs->pci_st, pcs->pci_sh, offset);
    352      1.15   mjacob 	if ((regoff & SXP_BLOCK) != 0) {
    353      1.15   mjacob 		isp_pci_wr_reg(isp, BIU_CONF1, oldsxp);
    354      1.15   mjacob 	}
    355      1.15   mjacob 	return (rv);
    356       1.1      cgd }
    357       1.1      cgd 
    358       1.1      cgd static void
    359       1.1      cgd isp_pci_wr_reg(isp, regoff, val)
    360       1.1      cgd 	struct ispsoftc *isp;
    361       1.1      cgd 	int regoff;
    362       1.1      cgd 	u_int16_t val;
    363       1.1      cgd {
    364       1.1      cgd 	struct isp_pcisoftc *pcs = (struct isp_pcisoftc *) isp;
    365      1.15   mjacob 	int offset, oldsxp = 0;
    366       1.1      cgd 	if ((regoff & BIU_BLOCK) != 0) {
    367       1.1      cgd 		offset = PCI_BIU_REGS_OFF;
    368       1.1      cgd 	} else if ((regoff & MBOX_BLOCK) != 0) {
    369      1.15   mjacob 		if (isp->isp_type & ISP_HA_SCSI)
    370      1.15   mjacob 			offset = PCI_MBOX_REGS_OFF;
    371      1.15   mjacob 		else
    372      1.15   mjacob 			offset = PCI_MBOX_REGS2100_OFF;
    373       1.1      cgd 	} else if ((regoff & SXP_BLOCK) != 0) {
    374       1.1      cgd 		offset = PCI_SXP_REGS_OFF;
    375       1.1      cgd 		/*
    376      1.15   mjacob 		 * We will assume that someone has paused the RISC processor.
    377       1.1      cgd 		 */
    378      1.15   mjacob 		oldsxp = isp_pci_rd_reg(isp, BIU_CONF1);
    379      1.15   mjacob 		isp_pci_wr_reg(isp, BIU_CONF1, oldsxp & ~BIU_PCI_CONF1_SXP);
    380       1.1      cgd 	} else {
    381       1.1      cgd 		offset = PCI_RISC_REGS_OFF;
    382       1.1      cgd 	}
    383       1.1      cgd 	regoff &= 0xff;
    384       1.1      cgd 	offset += regoff;
    385       1.6      cgd 	bus_space_write_2(pcs->pci_st, pcs->pci_sh, offset, val);
    386      1.15   mjacob 	if ((regoff & SXP_BLOCK) != 0) {
    387      1.15   mjacob 		isp_pci_wr_reg(isp, BIU_CONF1, oldsxp);
    388      1.15   mjacob 	}
    389       1.1      cgd }
    390       1.1      cgd 
    391      1.13  thorpej static int
    392      1.13  thorpej isp_pci_mbxdma(isp)
    393       1.1      cgd 	struct ispsoftc *isp;
    394       1.1      cgd {
    395      1.13  thorpej 	struct isp_pcisoftc *pci = (struct isp_pcisoftc *)isp;
    396      1.13  thorpej 	bus_dma_segment_t seg;
    397      1.13  thorpej 	bus_size_t len;
    398      1.15   mjacob 	fcparam *fcp;
    399      1.13  thorpej 	int rseg;
    400      1.13  thorpej 
    401      1.13  thorpej 	/*
    402      1.13  thorpej 	 * Allocate and map the request queue.
    403      1.13  thorpej 	 */
    404      1.21   mjacob 	len = ISP_QUEUE_SIZE(RQUEST_QUEUE_LEN);
    405      1.13  thorpej 	if (bus_dmamem_alloc(pci->pci_dmat, len, NBPG, 0, &seg, 1, &rseg,
    406      1.13  thorpej 	      BUS_DMA_NOWAIT) ||
    407      1.13  thorpej 	    bus_dmamem_map(pci->pci_dmat, &seg, rseg, len,
    408      1.18  thorpej 	      (caddr_t *)&isp->isp_rquest, BUS_DMA_NOWAIT|BUS_DMA_COHERENT))
    409      1.13  thorpej 		return (1);
    410      1.13  thorpej 	if (bus_dmamap_create(pci->pci_dmat, len, 1, len, 0, BUS_DMA_NOWAIT,
    411      1.13  thorpej 	      &pci->pci_rquest_dmap) ||
    412      1.13  thorpej 	    bus_dmamap_load(pci->pci_dmat, pci->pci_rquest_dmap,
    413      1.13  thorpej 	      (caddr_t)isp->isp_rquest, len, NULL, BUS_DMA_NOWAIT))
    414      1.13  thorpej 		return (1);
    415      1.13  thorpej 
    416      1.13  thorpej 	isp->isp_rquest_dma = pci->pci_rquest_dmap->dm_segs[0].ds_addr;
    417      1.13  thorpej 
    418      1.13  thorpej 	/*
    419      1.13  thorpej 	 * Allocate and map the result queue.
    420      1.13  thorpej 	 */
    421      1.21   mjacob 	len = ISP_QUEUE_SIZE(RESULT_QUEUE_LEN);
    422      1.13  thorpej 	if (bus_dmamem_alloc(pci->pci_dmat, len, NBPG, 0, &seg, 1, &rseg,
    423      1.13  thorpej 	      BUS_DMA_NOWAIT) ||
    424      1.13  thorpej 	    bus_dmamem_map(pci->pci_dmat, &seg, rseg, len,
    425      1.18  thorpej 	      (caddr_t *)&isp->isp_result, BUS_DMA_NOWAIT|BUS_DMA_COHERENT))
    426      1.13  thorpej 		return (1);
    427      1.13  thorpej 	if (bus_dmamap_create(pci->pci_dmat, len, 1, len, 0, BUS_DMA_NOWAIT,
    428      1.13  thorpej 	      &pci->pci_result_dmap) ||
    429      1.13  thorpej 	    bus_dmamap_load(pci->pci_dmat, pci->pci_result_dmap,
    430      1.13  thorpej 	      (caddr_t)isp->isp_result, len, NULL, BUS_DMA_NOWAIT))
    431      1.13  thorpej 		return (1);
    432      1.15   mjacob 	isp->isp_result_dma = pci->pci_result_dmap->dm_segs[0].ds_addr;
    433       1.1      cgd 
    434      1.15   mjacob 	if (isp->isp_type & ISP_HA_SCSI) {
    435      1.15   mjacob 		return (0);
    436      1.15   mjacob 	}
    437       1.1      cgd 
    438      1.15   mjacob 	fcp = isp->isp_param;
    439      1.15   mjacob 	len = ISP2100_SCRLEN;
    440      1.15   mjacob 	if (bus_dmamem_alloc(pci->pci_dmat, len, NBPG, 0, &seg, 1, &rseg,
    441      1.15   mjacob 		BUS_DMA_NOWAIT) ||
    442      1.15   mjacob 	    bus_dmamem_map(pci->pci_dmat, &seg, rseg, len,
    443      1.18  thorpej 	      (caddr_t *)&fcp->isp_scratch, BUS_DMA_NOWAIT|BUS_DMA_COHERENT))
    444      1.15   mjacob 		return (1);
    445      1.15   mjacob 	if (bus_dmamap_create(pci->pci_dmat, len, 1, len, 0, BUS_DMA_NOWAIT,
    446      1.15   mjacob 	      &pci->pci_scratch_dmap) ||
    447      1.15   mjacob 	    bus_dmamap_load(pci->pci_dmat, pci->pci_scratch_dmap,
    448      1.15   mjacob 	      (caddr_t)fcp->isp_scratch, len, NULL, BUS_DMA_NOWAIT))
    449      1.15   mjacob 		return (1);
    450      1.15   mjacob 	fcp->isp_scdma = pci->pci_scratch_dmap->dm_segs[0].ds_addr;
    451      1.13  thorpej 	return (0);
    452       1.1      cgd }
    453       1.1      cgd 
    454       1.1      cgd static int
    455       1.1      cgd isp_pci_dmasetup(isp, xs, rq, iptrp, optr)
    456       1.1      cgd 	struct ispsoftc *isp;
    457      1.16   bouyer 	struct scsipi_xfer *xs;
    458       1.1      cgd 	ispreq_t *rq;
    459       1.1      cgd 	u_int8_t *iptrp;
    460       1.1      cgd 	u_int8_t optr;
    461       1.1      cgd {
    462      1.13  thorpej 	struct isp_pcisoftc *pci = (struct isp_pcisoftc *)isp;
    463      1.15   mjacob 	bus_dmamap_t dmap = pci->pci_xfer_dmap[rq->req_handle - 1];
    464       1.1      cgd 	ispcontreq_t *crq;
    465      1.17   mjacob 	int segcnt, seg, error, ovseg, seglim, drq;
    466       1.1      cgd 
    467       1.1      cgd 	if (xs->datalen == 0) {
    468       1.1      cgd 		rq->req_seg_count = 1;
    469  1.25.2.1      eeh 		goto mbxsync;
    470       1.1      cgd 	}
    471       1.1      cgd 
    472      1.21   mjacob 	if (rq->req_handle > RQUEST_QUEUE_LEN || rq->req_handle < 1) {
    473      1.14  thorpej 		panic("%s: bad handle (%d) in isp_pci_dmasetup\n",
    474      1.13  thorpej 		    isp->isp_name, rq->req_handle);
    475      1.13  thorpej 		/* NOTREACHED */
    476      1.13  thorpej 	}
    477      1.13  thorpej 
    478       1.1      cgd 	if (xs->flags & SCSI_DATA_IN) {
    479      1.17   mjacob 		drq = REQFLAG_DATA_IN;
    480       1.1      cgd 	} else {
    481      1.17   mjacob 		drq = REQFLAG_DATA_OUT;
    482       1.1      cgd 	}
    483       1.1      cgd 
    484      1.15   mjacob 	if (isp->isp_type & ISP_HA_FC) {
    485      1.15   mjacob 		seglim = ISP_RQDSEG_T2;
    486      1.15   mjacob 		((ispreqt2_t *)rq)->req_totalcnt = xs->datalen;
    487      1.17   mjacob 		((ispreqt2_t *)rq)->req_flags |= drq;
    488      1.15   mjacob 	} else {
    489      1.15   mjacob 		seglim = ISP_RQDSEG;
    490      1.17   mjacob 		rq->req_flags |= drq;
    491      1.15   mjacob 	}
    492      1.13  thorpej 	error = bus_dmamap_load(pci->pci_dmat, dmap, xs->data, xs->datalen,
    493      1.13  thorpej 	    NULL, xs->flags & SCSI_NOSLEEP ? BUS_DMA_NOWAIT : BUS_DMA_WAITOK);
    494      1.21   mjacob 	if (error) {
    495      1.21   mjacob 		XS_SETERR(xs, HBA_BOTCH);
    496      1.13  thorpej 		return (error);
    497      1.21   mjacob 	}
    498      1.13  thorpej 
    499      1.13  thorpej 	segcnt = dmap->dm_nsegs;
    500      1.13  thorpej 
    501      1.13  thorpej 	for (seg = 0, rq->req_seg_count = 0;
    502      1.15   mjacob 	     seg < segcnt && rq->req_seg_count < seglim;
    503      1.15   mjacob 	     seg++, rq->req_seg_count++) {
    504      1.15   mjacob 		if (isp->isp_type & ISP_HA_FC) {
    505      1.15   mjacob 			ispreqt2_t *rq2 = (ispreqt2_t *)rq;
    506      1.15   mjacob 			rq2->req_dataseg[rq2->req_seg_count].ds_count =
    507      1.15   mjacob 			    dmap->dm_segs[seg].ds_len;
    508      1.15   mjacob 			rq2->req_dataseg[rq2->req_seg_count].ds_base =
    509      1.15   mjacob 			    dmap->dm_segs[seg].ds_addr;
    510      1.15   mjacob 		} else {
    511      1.15   mjacob 			rq->req_dataseg[rq->req_seg_count].ds_count =
    512      1.15   mjacob 			    dmap->dm_segs[seg].ds_len;
    513      1.15   mjacob 			rq->req_dataseg[rq->req_seg_count].ds_base =
    514      1.15   mjacob 			    dmap->dm_segs[seg].ds_addr;
    515      1.15   mjacob 		}
    516       1.1      cgd 	}
    517       1.1      cgd 
    518      1.13  thorpej 	if (seg == segcnt)
    519  1.25.2.1      eeh 		goto dmasync;
    520       1.1      cgd 
    521       1.1      cgd 	do {
    522      1.15   mjacob 		crq = (ispcontreq_t *)
    523      1.15   mjacob 			ISP_QUEUE_ENTRY(isp->isp_rquest, *iptrp);
    524      1.21   mjacob 		*iptrp = (*iptrp + 1) & (RQUEST_QUEUE_LEN - 1);
    525       1.1      cgd 		if (*iptrp == optr) {
    526       1.1      cgd 			printf("%s: Request Queue Overflow++\n",
    527       1.1      cgd 			       isp->isp_name);
    528      1.13  thorpej 			bus_dmamap_unload(pci->pci_dmat, dmap);
    529      1.21   mjacob 			XS_SETERR(xs, HBA_BOTCH);
    530      1.13  thorpej 			return (EFBIG);
    531       1.1      cgd 		}
    532       1.1      cgd 		rq->req_header.rqs_entry_count++;
    533       1.1      cgd 		bzero((void *)crq, sizeof (*crq));
    534       1.1      cgd 		crq->req_header.rqs_entry_count = 1;
    535       1.1      cgd 		crq->req_header.rqs_entry_type = RQSTYPE_DATASEG;
    536      1.13  thorpej 
    537      1.13  thorpej 		for (ovseg = 0; seg < segcnt && ovseg < ISP_CDSEG;
    538      1.13  thorpej 		    rq->req_seg_count++, seg++, ovseg++) {
    539      1.13  thorpej 			crq->req_dataseg[ovseg].ds_count =
    540      1.13  thorpej 			    dmap->dm_segs[seg].ds_len;
    541      1.13  thorpej 			crq->req_dataseg[ovseg].ds_base =
    542      1.13  thorpej 			    dmap->dm_segs[seg].ds_addr;
    543       1.1      cgd 		}
    544      1.13  thorpej 	} while (seg < segcnt);
    545      1.13  thorpej 
    546  1.25.2.1      eeh dmasync:
    547      1.19  thorpej 	bus_dmamap_sync(pci->pci_dmat, dmap, 0, dmap->dm_mapsize,
    548      1.19  thorpej 	    xs->flags & SCSI_DATA_IN ?
    549      1.13  thorpej 	    BUS_DMASYNC_PREREAD : BUS_DMASYNC_PREWRITE);
    550  1.25.2.1      eeh 
    551  1.25.2.1      eeh mbxsync:
    552  1.25.2.1      eeh 
    553  1.25.2.1      eeh 	bus_dmamap_sync(pci->pci_dmat, pci->pci_rquest_dmap, 0,
    554  1.25.2.1      eeh 	    pci->pci_rquest_dmap->dm_mapsize, BUS_DMASYNC_PREWRITE);
    555       1.1      cgd 	return (0);
    556  1.25.2.1      eeh }
    557  1.25.2.1      eeh 
    558  1.25.2.1      eeh static int
    559  1.25.2.1      eeh isp_pci_intr(arg)
    560  1.25.2.1      eeh 	void *arg;
    561  1.25.2.1      eeh {
    562  1.25.2.1      eeh 	struct isp_pcisoftc *pci = (struct isp_pcisoftc *)arg;
    563  1.25.2.1      eeh 	bus_dmamap_sync(pci->pci_dmat, pci->pci_result_dmap, 0,
    564  1.25.2.1      eeh 	    pci->pci_result_dmap->dm_mapsize, BUS_DMASYNC_POSTREAD);
    565  1.25.2.1      eeh 	return (isp_intr(arg));
    566      1.13  thorpej }
    567      1.13  thorpej 
    568      1.13  thorpej static void
    569      1.13  thorpej isp_pci_dmateardown(isp, xs, handle)
    570      1.13  thorpej 	struct ispsoftc *isp;
    571      1.16   bouyer 	struct scsipi_xfer *xs;
    572      1.13  thorpej 	u_int32_t handle;
    573      1.13  thorpej {
    574      1.13  thorpej 	struct isp_pcisoftc *pci = (struct isp_pcisoftc *)isp;
    575      1.13  thorpej 	bus_dmamap_t dmap = pci->pci_xfer_dmap[handle];
    576      1.13  thorpej 
    577      1.19  thorpej 	bus_dmamap_sync(pci->pci_dmat, dmap, 0, dmap->dm_mapsize,
    578      1.19  thorpej 	    xs->flags & SCSI_DATA_IN ?
    579      1.13  thorpej 	    BUS_DMASYNC_POSTREAD : BUS_DMASYNC_POSTWRITE);
    580      1.13  thorpej 	bus_dmamap_unload(pci->pci_dmat, dmap);
    581       1.1      cgd }
    582       1.1      cgd 
    583       1.1      cgd static void
    584       1.1      cgd isp_pci_reset1(isp)
    585       1.1      cgd 	struct ispsoftc *isp;
    586       1.1      cgd {
    587       1.1      cgd 	/* Make sure the BIOS is disabled */
    588       1.1      cgd 	isp_pci_wr_reg(isp, HCCR, PCI_HCCR_CMD_BIOS);
    589      1.15   mjacob }
    590      1.15   mjacob 
    591      1.15   mjacob static void
    592      1.15   mjacob isp_pci_dumpregs(isp)
    593      1.15   mjacob 	struct ispsoftc *isp;
    594      1.15   mjacob {
    595      1.15   mjacob 	struct isp_pcisoftc *pci = (struct isp_pcisoftc *)isp;
    596      1.15   mjacob 	printf("%s: PCI Status Command/Status=%x\n", pci->pci_isp.isp_name,
    597      1.15   mjacob 	    pci_conf_read(pci->pci_pc, pci->pci_tag, PCI_COMMAND_STATUS_REG));
    598       1.1      cgd }
    599