Home | History | Annotate | Line # | Download | only in sbus
esp_sbus.c revision 1.17
      1  1.17     lukem /*	$NetBSD: esp_sbus.c,v 1.17 2001/11/13 06:58:17 lukem Exp $	*/
      2   1.1        pk 
      3   1.1        pk /*-
      4   1.1        pk  * Copyright (c) 1997, 1998 The NetBSD Foundation, Inc.
      5   1.1        pk  * All rights reserved.
      6   1.1        pk  *
      7   1.1        pk  * This code is derived from software contributed to The NetBSD Foundation
      8   1.1        pk  * by Charles M. Hannum; Jason R. Thorpe of the Numerical Aerospace
      9   1.1        pk  * Simulation Facility, NASA Ames Research Center; Paul Kranenburg.
     10   1.1        pk  *
     11   1.1        pk  * Redistribution and use in source and binary forms, with or without
     12   1.1        pk  * modification, are permitted provided that the following conditions
     13   1.1        pk  * are met:
     14   1.1        pk  * 1. Redistributions of source code must retain the above copyright
     15   1.1        pk  *    notice, this list of conditions and the following disclaimer.
     16   1.1        pk  * 2. Redistributions in binary form must reproduce the above copyright
     17   1.1        pk  *    notice, this list of conditions and the following disclaimer in the
     18   1.1        pk  *    documentation and/or other materials provided with the distribution.
     19   1.1        pk  * 3. All advertising materials mentioning features or use of this software
     20   1.1        pk  *    must display the following acknowledgement:
     21   1.1        pk  *	This product includes software developed by the NetBSD
     22   1.1        pk  *	Foundation, Inc. and its contributors.
     23   1.1        pk  * 4. Neither the name of The NetBSD Foundation nor the names of its
     24   1.1        pk  *    contributors may be used to endorse or promote products derived
     25   1.1        pk  *    from this software without specific prior written permission.
     26   1.1        pk  *
     27   1.1        pk  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     28   1.1        pk  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     29   1.1        pk  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     30   1.1        pk  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     31   1.1        pk  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     32   1.1        pk  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     33   1.1        pk  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     34   1.1        pk  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     35   1.1        pk  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     36   1.1        pk  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     37   1.1        pk  * POSSIBILITY OF SUCH DAMAGE.
     38   1.1        pk  */
     39  1.17     lukem 
     40  1.17     lukem #include <sys/cdefs.h>
     41  1.17     lukem __KERNEL_RCSID(0, "$NetBSD: esp_sbus.c,v 1.17 2001/11/13 06:58:17 lukem Exp $");
     42   1.1        pk 
     43   1.1        pk #include <sys/types.h>
     44   1.1        pk #include <sys/param.h>
     45   1.1        pk #include <sys/systm.h>
     46   1.1        pk #include <sys/device.h>
     47   1.1        pk #include <sys/buf.h>
     48  1.13    petrov #include <sys/malloc.h>
     49   1.1        pk 
     50   1.1        pk #include <dev/scsipi/scsi_all.h>
     51   1.1        pk #include <dev/scsipi/scsipi_all.h>
     52   1.1        pk #include <dev/scsipi/scsiconf.h>
     53   1.1        pk #include <dev/scsipi/scsi_message.h>
     54   1.1        pk 
     55   1.1        pk #include <machine/bus.h>
     56  1.11        pk #include <machine/intr.h>
     57   1.1        pk #include <machine/autoconf.h>
     58   1.1        pk 
     59   1.1        pk #include <dev/ic/lsi64854reg.h>
     60   1.1        pk #include <dev/ic/lsi64854var.h>
     61   1.1        pk 
     62   1.1        pk #include <dev/ic/ncr53c9xreg.h>
     63   1.1        pk #include <dev/ic/ncr53c9xvar.h>
     64   1.1        pk 
     65   1.1        pk #include <dev/sbus/sbusvar.h>
     66   1.1        pk 
     67  1.13    petrov /* #define ESP_SBUS_DEBUG */
     68  1.13    petrov 
     69   1.1        pk struct esp_softc {
     70   1.1        pk 	struct ncr53c9x_softc sc_ncr53c9x;	/* glue to MI code */
     71   1.1        pk 	struct sbusdev	sc_sd;			/* sbus device */
     72   1.1        pk 
     73   1.1        pk 	bus_space_tag_t	sc_bustag;
     74   1.1        pk 	bus_dma_tag_t	sc_dmatag;
     75   1.1        pk 
     76   1.1        pk 	bus_space_handle_t sc_reg;		/* the registers */
     77   1.1        pk 	struct lsi64854_softc *sc_dma;		/* pointer to my dma */
     78   1.1        pk 
     79   1.1        pk 	int	sc_pri;				/* SBUS priority */
     80   1.1        pk };
     81   1.1        pk 
     82   1.1        pk void	espattach_sbus	__P((struct device *, struct device *, void *));
     83   1.1        pk void	espattach_dma	__P((struct device *, struct device *, void *));
     84   1.1        pk int	espmatch_sbus	__P((struct device *, struct cfdata *, void *));
     85   1.1        pk 
     86   1.1        pk 
     87   1.1        pk /* Linkup to the rest of the kernel */
     88   1.1        pk struct cfattach esp_sbus_ca = {
     89   1.1        pk 	sizeof(struct esp_softc), espmatch_sbus, espattach_sbus
     90   1.1        pk };
     91   1.1        pk struct cfattach esp_dma_ca = {
     92   1.1        pk 	sizeof(struct esp_softc), espmatch_sbus, espattach_dma
     93   1.1        pk };
     94   1.1        pk 
     95   1.1        pk /*
     96   1.1        pk  * Functions and the switch for the MI code.
     97   1.1        pk  */
     98   1.1        pk static u_char	esp_read_reg __P((struct ncr53c9x_softc *, int));
     99   1.1        pk static void	esp_write_reg __P((struct ncr53c9x_softc *, int, u_char));
    100   1.6    mjacob static u_char	esp_rdreg1 __P((struct ncr53c9x_softc *, int));
    101   1.6    mjacob static void	esp_wrreg1 __P((struct ncr53c9x_softc *, int, u_char));
    102   1.1        pk static int	esp_dma_isintr __P((struct ncr53c9x_softc *));
    103   1.1        pk static void	esp_dma_reset __P((struct ncr53c9x_softc *));
    104   1.1        pk static int	esp_dma_intr __P((struct ncr53c9x_softc *));
    105   1.1        pk static int	esp_dma_setup __P((struct ncr53c9x_softc *, caddr_t *,
    106   1.1        pk 				    size_t *, int, size_t *));
    107   1.1        pk static void	esp_dma_go __P((struct ncr53c9x_softc *));
    108   1.1        pk static void	esp_dma_stop __P((struct ncr53c9x_softc *));
    109   1.1        pk static int	esp_dma_isactive __P((struct ncr53c9x_softc *));
    110   1.1        pk 
    111   1.1        pk static struct ncr53c9x_glue esp_sbus_glue = {
    112   1.1        pk 	esp_read_reg,
    113   1.1        pk 	esp_write_reg,
    114   1.1        pk 	esp_dma_isintr,
    115   1.1        pk 	esp_dma_reset,
    116   1.1        pk 	esp_dma_intr,
    117   1.1        pk 	esp_dma_setup,
    118   1.1        pk 	esp_dma_go,
    119   1.1        pk 	esp_dma_stop,
    120   1.1        pk 	esp_dma_isactive,
    121   1.1        pk 	NULL,			/* gl_clear_latched_intr */
    122   1.1        pk };
    123   1.1        pk 
    124   1.6    mjacob static struct ncr53c9x_glue esp_sbus_glue1 = {
    125   1.6    mjacob 	esp_rdreg1,
    126   1.6    mjacob 	esp_wrreg1,
    127   1.6    mjacob 	esp_dma_isintr,
    128   1.6    mjacob 	esp_dma_reset,
    129   1.6    mjacob 	esp_dma_intr,
    130   1.6    mjacob 	esp_dma_setup,
    131   1.6    mjacob 	esp_dma_go,
    132   1.6    mjacob 	esp_dma_stop,
    133   1.6    mjacob 	esp_dma_isactive,
    134   1.6    mjacob 	NULL,			/* gl_clear_latched_intr */
    135   1.6    mjacob };
    136   1.6    mjacob 
    137   1.6    mjacob static void	espattach __P((struct esp_softc *, struct ncr53c9x_glue *));
    138   1.6    mjacob 
    139   1.1        pk int
    140   1.1        pk espmatch_sbus(parent, cf, aux)
    141   1.1        pk 	struct device *parent;
    142   1.1        pk 	struct cfdata *cf;
    143   1.1        pk 	void *aux;
    144   1.1        pk {
    145   1.6    mjacob 	int rv;
    146   1.1        pk 	struct sbus_attach_args *sa = aux;
    147   1.1        pk 
    148  1.13    petrov 	if (strcmp("SUNW,fas", sa->sa_name) == 0)
    149  1.13    petrov 	        return 1;
    150  1.13    petrov 
    151   1.6    mjacob 	rv = (strcmp(cf->cf_driver->cd_name, sa->sa_name) == 0 ||
    152   1.6    mjacob 	    strcmp("ptscII", sa->sa_name) == 0);
    153   1.6    mjacob 	return (rv);
    154   1.1        pk }
    155   1.1        pk 
    156   1.1        pk void
    157   1.1        pk espattach_sbus(parent, self, aux)
    158   1.1        pk 	struct device *parent, *self;
    159   1.1        pk 	void *aux;
    160   1.1        pk {
    161   1.1        pk 	struct esp_softc *esc = (void *)self;
    162   1.1        pk 	struct ncr53c9x_softc *sc = &esc->sc_ncr53c9x;
    163   1.1        pk 	struct sbus_attach_args *sa = aux;
    164  1.13    petrov 	struct lsi64854_softc *lsc;
    165  1.13    petrov 	int burst, sbusburst;
    166   1.1        pk 
    167   1.1        pk 	esc->sc_bustag = sa->sa_bustag;
    168   1.1        pk 	esc->sc_dmatag = sa->sa_dmatag;
    169   1.1        pk 
    170  1.16       eeh 	sc->sc_id = PROM_getpropint(sa->sa_node, "initiator-id", 7);
    171  1.16       eeh 	sc->sc_freq = PROM_getpropint(sa->sa_node, "clock-frequency", -1);
    172   1.1        pk 	if (sc->sc_freq < 0)
    173   1.1        pk 		sc->sc_freq = ((struct sbus_softc *)
    174   1.1        pk 		    sc->sc_dev.dv_parent)->sc_clockfreq;
    175   1.1        pk 
    176  1.13    petrov #ifdef ESP_SBUS_DEBUG
    177  1.13    petrov 	printf("%s: espattach_sbus: sc_id %d, freq %d\n",
    178  1.13    petrov 	       self->dv_xname, sc->sc_id, sc->sc_freq);
    179  1.13    petrov #endif
    180  1.13    petrov 
    181  1.13    petrov 	if (strcmp("SUNW,fas", sa->sa_name) == 0) {
    182  1.13    petrov 
    183  1.13    petrov 		/*
    184  1.13    petrov 		 * fas has 2 register spaces: dma(lsi64854) and SCSI core (ncr53c9x)
    185  1.13    petrov 		 */
    186  1.13    petrov 		if (sa->sa_nreg != 2) {
    187  1.13    petrov 			printf("%s: %d register spaces\n", self->dv_xname, sa->sa_nreg);
    188  1.13    petrov 			return;
    189  1.13    petrov 		}
    190  1.13    petrov 
    191  1.13    petrov 		/*
    192  1.13    petrov 		 * allocate space for dma, in SUNW,fas there are no separate
    193  1.13    petrov 		 * dma device
    194  1.13    petrov 		 */
    195  1.13    petrov 		lsc = malloc(sizeof (struct lsi64854_softc), M_DEVBUF, M_NOWAIT);
    196  1.13    petrov 
    197  1.13    petrov 		if (lsc == NULL) {
    198  1.13    petrov 			printf("%s: out of memory (lsi64854_softc)\n",
    199  1.13    petrov 			       self->dv_xname);
    200  1.13    petrov 			return;
    201  1.13    petrov 		}
    202  1.13    petrov 		esc->sc_dma = lsc;
    203  1.13    petrov 
    204  1.13    petrov 		lsc->sc_bustag = sa->sa_bustag;
    205  1.13    petrov 		lsc->sc_dmatag = sa->sa_dmatag;
    206  1.13    petrov 
    207  1.13    petrov 		bcopy(sc->sc_dev.dv_xname, lsc->sc_dev.dv_xname,
    208  1.13    petrov 		      sizeof (lsc->sc_dev.dv_xname));
    209  1.13    petrov 
    210  1.13    petrov 		/* Map dma registers */
    211  1.13    petrov 		if (bus_space_map2(sa->sa_bustag,
    212  1.13    petrov 		                   sa->sa_reg[0].sbr_slot,
    213  1.13    petrov 			           sa->sa_reg[0].sbr_offset,
    214  1.13    petrov 			           sa->sa_reg[0].sbr_size,
    215  1.13    petrov 			           BUS_SPACE_MAP_LINEAR,
    216  1.13    petrov 			           0, &lsc->sc_regs) != 0) {
    217  1.13    petrov 			printf("%s: cannot map dma registers\n", self->dv_xname);
    218  1.13    petrov 			return;
    219  1.13    petrov 		}
    220  1.13    petrov 
    221  1.13    petrov 		/*
    222  1.13    petrov 		 * XXX is this common(from bpp.c), the same in dma_sbus...etc.
    223  1.13    petrov 		 *
    224  1.13    petrov 		 * Get transfer burst size from PROM and plug it into the
    225  1.13    petrov 		 * controller registers. This is needed on the Sun4m; do
    226  1.13    petrov 		 * others need it too?
    227  1.13    petrov 		 */
    228  1.13    petrov 		sbusburst = ((struct sbus_softc *)parent)->sc_burst;
    229  1.13    petrov 		if (sbusburst == 0)
    230  1.13    petrov 			sbusburst = SBUS_BURST_32 - 1; /* 1->16 */
    231  1.13    petrov 
    232  1.16       eeh 		burst = PROM_getpropint(sa->sa_node, "burst-sizes", -1);
    233  1.13    petrov 
    234  1.13    petrov #if ESP_SBUS_DEBUG
    235  1.13    petrov 		printf("espattach_sbus: burst 0x%x, sbus 0x%x\n",
    236  1.13    petrov 		    burst, sbusburst);
    237  1.13    petrov #endif
    238  1.13    petrov 
    239  1.13    petrov 		if (burst == -1)
    240  1.13    petrov 			/* take SBus burst sizes */
    241  1.13    petrov 			burst = sbusburst;
    242  1.13    petrov 
    243  1.13    petrov 		/* Clamp at parent's burst sizes */
    244  1.13    petrov 		burst &= sbusburst;
    245  1.13    petrov 		lsc->sc_burst = (burst & SBUS_BURST_32) ? 32 :
    246  1.13    petrov 		    (burst & SBUS_BURST_16) ? 16 : 0;
    247  1.13    petrov 
    248  1.13    petrov 		lsc->sc_channel = L64854_CHANNEL_SCSI;
    249  1.13    petrov 		lsc->sc_client = sc;
    250  1.13    petrov 
    251  1.13    petrov 		lsi64854_attach(lsc);
    252  1.13    petrov 
    253  1.13    petrov 		/*
    254  1.13    petrov 		 * map SCSI core registers
    255  1.13    petrov 		 */
    256  1.13    petrov 		if (sbus_bus_map(sa->sa_bustag,
    257  1.13    petrov 				 sa->sa_reg[1].sbr_slot,
    258  1.13    petrov 				 sa->sa_reg[1].sbr_offset,
    259  1.13    petrov 				 sa->sa_reg[1].sbr_size,
    260  1.13    petrov 				 BUS_SPACE_MAP_LINEAR,
    261  1.13    petrov 				 0, &esc->sc_reg) != 0) {
    262  1.13    petrov 			printf("%s @ sbus: cannot map scsi core registers\n",
    263  1.13    petrov 			       self->dv_xname);
    264  1.13    petrov 			return;
    265  1.13    petrov 		}
    266  1.13    petrov 
    267  1.13    petrov 		if (sa->sa_nintr == 0) {
    268  1.13    petrov 			printf("\n%s: no interrupt property\n", self->dv_xname);
    269  1.13    petrov 			return;
    270  1.13    petrov 		}
    271  1.13    petrov 
    272  1.13    petrov 		esc->sc_pri = sa->sa_pri;
    273  1.13    petrov 
    274  1.13    petrov 		/* add me to the sbus structures */
    275  1.13    petrov 		esc->sc_sd.sd_reset = (void *) ncr53c9x_reset;
    276  1.13    petrov 		sbus_establish(&esc->sc_sd, &sc->sc_dev);
    277  1.13    petrov 
    278  1.13    petrov 		espattach(esc, &esp_sbus_glue);
    279  1.13    petrov 
    280  1.13    petrov 		return;
    281  1.13    petrov 	}
    282  1.13    petrov 
    283   1.1        pk 	/*
    284   1.1        pk 	 * Find the DMA by poking around the dma device structures
    285   1.1        pk 	 *
    286   1.1        pk 	 * What happens here is that if the dma driver has not been
    287   1.1        pk 	 * configured, then this returns a NULL pointer. Then when the
    288   1.1        pk 	 * dma actually gets configured, it does the opposing test, and
    289   1.1        pk 	 * if the sc->sc_esp field in it's softc is NULL, then tries to
    290   1.1        pk 	 * find the matching esp driver.
    291   1.1        pk 	 */
    292   1.1        pk 	esc->sc_dma = (struct lsi64854_softc *)
    293   1.1        pk 				getdevunit("dma", sc->sc_dev.dv_unit);
    294   1.1        pk 
    295   1.1        pk 	/*
    296   1.1        pk 	 * and a back pointer to us, for DMA
    297   1.1        pk 	 */
    298   1.1        pk 	if (esc->sc_dma)
    299   1.2        pk 		esc->sc_dma->sc_client = sc;
    300   1.1        pk 	else {
    301   1.1        pk 		printf("\n");
    302   1.1        pk 		panic("espattach: no dma found");
    303   1.1        pk 	}
    304  1.15        pk 
    305  1.15        pk 	/*
    306  1.15        pk 	 * The `ESC' DMA chip must be reset before we can access
    307  1.15        pk 	 * the esp registers.
    308  1.15        pk 	 */
    309  1.15        pk 	if (esc->sc_dma->sc_rev == DMAREV_ESC)
    310  1.15        pk 		DMA_RESET(esc->sc_dma);
    311   1.1        pk 
    312   1.1        pk 	/*
    313   1.1        pk 	 * Map my registers in, if they aren't already in virtual
    314   1.1        pk 	 * address space.
    315   1.1        pk 	 */
    316   1.1        pk 	if (sa->sa_npromvaddrs)
    317   1.1        pk 		esc->sc_reg = (bus_space_handle_t)sa->sa_promvaddrs[0];
    318   1.1        pk 	else {
    319   1.1        pk 		if (sbus_bus_map(sa->sa_bustag, sa->sa_slot,
    320   1.1        pk 				 sa->sa_offset,
    321   1.1        pk 				 sa->sa_size,
    322   1.1        pk 				 BUS_SPACE_MAP_LINEAR,
    323   1.2        pk 				 0, &esc->sc_reg) != 0) {
    324   1.1        pk 			printf("%s @ sbus: cannot map registers\n",
    325   1.1        pk 				self->dv_xname);
    326   1.1        pk 			return;
    327   1.1        pk 		}
    328   1.1        pk 	}
    329   1.1        pk 
    330   1.7        pk 	if (sa->sa_nintr == 0) {
    331   1.7        pk 		/*
    332   1.7        pk 		 * No interrupt properties: we quit; this might
    333   1.7        pk 		 * happen on e.g. a Sparc X terminal.
    334   1.7        pk 		 */
    335   1.7        pk 		printf("\n%s: no interrupt property\n", self->dv_xname);
    336   1.7        pk 		return;
    337   1.7        pk 	}
    338   1.7        pk 
    339   1.1        pk 	esc->sc_pri = sa->sa_pri;
    340   1.1        pk 
    341   1.1        pk 	/* add me to the sbus structures */
    342   1.1        pk 	esc->sc_sd.sd_reset = (void *) ncr53c9x_reset;
    343   1.1        pk 	sbus_establish(&esc->sc_sd, &sc->sc_dev);
    344   1.1        pk 
    345   1.6    mjacob 	if (strcmp("ptscII", sa->sa_name) == 0) {
    346   1.6    mjacob 		espattach(esc, &esp_sbus_glue1);
    347   1.6    mjacob 	} else {
    348   1.6    mjacob 		espattach(esc, &esp_sbus_glue);
    349   1.6    mjacob 	}
    350   1.1        pk }
    351   1.1        pk 
    352   1.1        pk void
    353   1.1        pk espattach_dma(parent, self, aux)
    354   1.1        pk 	struct device *parent, *self;
    355   1.1        pk 	void *aux;
    356   1.1        pk {
    357   1.1        pk 	struct esp_softc *esc = (void *)self;
    358   1.1        pk 	struct ncr53c9x_softc *sc = &esc->sc_ncr53c9x;
    359   1.1        pk 	struct sbus_attach_args *sa = aux;
    360   1.1        pk 
    361   1.6    mjacob 	if (strcmp("ptscII", sa->sa_name) == 0) {
    362   1.6    mjacob 		return;
    363   1.6    mjacob 	}
    364   1.6    mjacob 
    365   1.1        pk 	esc->sc_bustag = sa->sa_bustag;
    366   1.1        pk 	esc->sc_dmatag = sa->sa_dmatag;
    367   1.1        pk 
    368  1.16       eeh 	sc->sc_id = PROM_getpropint(sa->sa_node, "initiator-id", 7);
    369  1.16       eeh 	sc->sc_freq = PROM_getpropint(sa->sa_node, "clock-frequency", -1);
    370   1.1        pk 
    371   1.1        pk 	esc->sc_dma = (struct lsi64854_softc *)parent;
    372   1.2        pk 	esc->sc_dma->sc_client = sc;
    373   1.1        pk 
    374   1.1        pk 	/*
    375   1.1        pk 	 * Map my registers in, if they aren't already in virtual
    376   1.1        pk 	 * address space.
    377   1.1        pk 	 */
    378   1.1        pk 	if (sa->sa_npromvaddrs)
    379   1.1        pk 		esc->sc_reg = (bus_space_handle_t)sa->sa_promvaddrs[0];
    380   1.1        pk 	else {
    381   1.1        pk 		if (bus_space_map2(sa->sa_bustag,
    382   1.1        pk 				   sa->sa_slot,
    383   1.1        pk 				   sa->sa_offset,
    384   1.1        pk 				   sa->sa_size,
    385   1.1        pk 				   BUS_SPACE_MAP_LINEAR,
    386   1.2        pk 				   0, &esc->sc_reg) != 0) {
    387   1.1        pk 			printf("%s @ dma: cannot map registers\n",
    388   1.1        pk 				self->dv_xname);
    389   1.1        pk 			return;
    390   1.1        pk 		}
    391   1.1        pk 	}
    392   1.1        pk 
    393   1.7        pk 	if (sa->sa_nintr == 0) {
    394   1.7        pk 		/*
    395   1.7        pk 		 * No interrupt properties: we quit; this might
    396   1.7        pk 		 * happen on e.g. a Sparc X terminal.
    397   1.7        pk 		 */
    398   1.7        pk 		printf("\n%s: no interrupt property\n", self->dv_xname);
    399   1.7        pk 		return;
    400   1.7        pk 	}
    401   1.7        pk 
    402   1.1        pk 	esc->sc_pri = sa->sa_pri;
    403   1.1        pk 
    404   1.1        pk 	/* Assume SBus is grandparent */
    405   1.1        pk 	esc->sc_sd.sd_reset = (void *) ncr53c9x_reset;
    406   1.1        pk 	sbus_establish(&esc->sc_sd, parent);
    407   1.1        pk 
    408   1.6    mjacob 	espattach(esc, &esp_sbus_glue);
    409   1.1        pk }
    410   1.1        pk 
    411   1.1        pk 
    412   1.1        pk /*
    413   1.1        pk  * Attach this instance, and then all the sub-devices
    414   1.1        pk  */
    415   1.1        pk void
    416   1.6    mjacob espattach(esc, gluep)
    417   1.1        pk 	struct esp_softc *esc;
    418   1.6    mjacob 	struct ncr53c9x_glue *gluep;
    419   1.1        pk {
    420   1.1        pk 	struct ncr53c9x_softc *sc = &esc->sc_ncr53c9x;
    421   1.1        pk 	void *icookie;
    422  1.13    petrov 	unsigned int uid = 0;
    423   1.1        pk 
    424   1.1        pk 	/*
    425   1.1        pk 	 * Set up glue for MI code early; we use some of it here.
    426   1.1        pk 	 */
    427   1.6    mjacob 	sc->sc_glue = gluep;
    428   1.1        pk 
    429   1.1        pk 	/* gimme Mhz */
    430   1.1        pk 	sc->sc_freq /= 1000000;
    431   1.1        pk 
    432   1.1        pk 	/*
    433   1.1        pk 	 * XXX More of this should be in ncr53c9x_attach(), but
    434   1.1        pk 	 * XXX should we really poke around the chip that much in
    435   1.1        pk 	 * XXX the MI code?  Think about this more...
    436   1.1        pk 	 */
    437   1.1        pk 
    438   1.1        pk 	/*
    439   1.1        pk 	 * It is necessary to try to load the 2nd config register here,
    440   1.1        pk 	 * to find out what rev the esp chip is, else the ncr53c9x_reset
    441   1.1        pk 	 * will not set up the defaults correctly.
    442   1.1        pk 	 */
    443   1.1        pk 	sc->sc_cfg1 = sc->sc_id | NCRCFG1_PARENB;
    444   1.1        pk 	sc->sc_cfg2 = NCRCFG2_SCSI2 | NCRCFG2_RPE;
    445  1.13    petrov 	sc->sc_cfg3 = NCRCFG3_CDB;
    446   1.1        pk 	NCR_WRITE_REG(sc, NCR_CFG2, sc->sc_cfg2);
    447   1.1        pk 
    448   1.1        pk 	if ((NCR_READ_REG(sc, NCR_CFG2) & ~NCRCFG2_RSVD) !=
    449   1.1        pk 	    (NCRCFG2_SCSI2 | NCRCFG2_RPE)) {
    450   1.1        pk 		sc->sc_rev = NCR_VARIANT_ESP100;
    451   1.1        pk 	} else {
    452   1.1        pk 		sc->sc_cfg2 = NCRCFG2_SCSI2;
    453   1.1        pk 		NCR_WRITE_REG(sc, NCR_CFG2, sc->sc_cfg2);
    454   1.1        pk 		sc->sc_cfg3 = 0;
    455   1.1        pk 		NCR_WRITE_REG(sc, NCR_CFG3, sc->sc_cfg3);
    456  1.13    petrov 		sc->sc_cfg3 = (NCRCFG3_CDB | NCRCFG3_FCLK);
    457   1.1        pk 		NCR_WRITE_REG(sc, NCR_CFG3, sc->sc_cfg3);
    458   1.1        pk 		if (NCR_READ_REG(sc, NCR_CFG3) !=
    459   1.1        pk 		    (NCRCFG3_CDB | NCRCFG3_FCLK)) {
    460   1.1        pk 			sc->sc_rev = NCR_VARIANT_ESP100A;
    461   1.1        pk 		} else {
    462   1.1        pk 			/* NCRCFG2_FE enables > 64K transfers */
    463   1.1        pk 			sc->sc_cfg2 |= NCRCFG2_FE;
    464  1.13    petrov 			sc->sc_cfg3 = 0;
    465   1.1        pk 			NCR_WRITE_REG(sc, NCR_CFG3, sc->sc_cfg3);
    466   1.1        pk 			sc->sc_rev = NCR_VARIANT_ESP200;
    467  1.13    petrov 
    468  1.13    petrov 			/* XXX spec says it's valid after power up or chip reset */
    469  1.13    petrov 			uid = NCR_READ_REG(sc, NCR_UID);
    470  1.13    petrov 			if (((uid & 0xf8) >> 3) == 0x0a) /* XXX */
    471  1.13    petrov 				sc->sc_rev = NCR_VARIANT_FAS366;
    472   1.1        pk 		}
    473   1.1        pk 	}
    474   1.1        pk 
    475  1.13    petrov #ifdef ESP_SBUS_DEBUG
    476  1.13    petrov 	printf("espattach: revision %d, uid 0x%x\n", sc->sc_rev, uid);
    477  1.13    petrov #endif
    478  1.13    petrov 
    479   1.1        pk 	/*
    480   1.1        pk 	 * XXX minsync and maxxfer _should_ be set up in MI code,
    481   1.1        pk 	 * XXX but it appears to have some dependency on what sort
    482   1.1        pk 	 * XXX of DMA we're hooked up to, etc.
    483   1.1        pk 	 */
    484   1.1        pk 
    485   1.1        pk 	/*
    486   1.1        pk 	 * This is the value used to start sync negotiations
    487   1.1        pk 	 * Note that the NCR register "SYNCTP" is programmed
    488   1.1        pk 	 * in "clocks per byte", and has a minimum value of 4.
    489   1.1        pk 	 * The SCSI period used in negotiation is one-fourth
    490   1.1        pk 	 * of the time (in nanoseconds) needed to transfer one byte.
    491   1.1        pk 	 * Since the chip's clock is given in MHz, we have the following
    492   1.1        pk 	 * formula: 4 * period = (1000 / freq) * 4
    493   1.1        pk 	 */
    494   1.1        pk 	sc->sc_minsync = 1000 / sc->sc_freq;
    495   1.1        pk 
    496   1.1        pk 	/*
    497   1.1        pk 	 * Alas, we must now modify the value a bit, because it's
    498   1.1        pk 	 * only valid when can switch on FASTCLK and FASTSCSI bits
    499   1.1        pk 	 * in config register 3...
    500   1.1        pk 	 */
    501   1.1        pk 	switch (sc->sc_rev) {
    502   1.1        pk 	case NCR_VARIANT_ESP100:
    503   1.1        pk 		sc->sc_maxxfer = 64 * 1024;
    504   1.1        pk 		sc->sc_minsync = 0;	/* No synch on old chip? */
    505   1.1        pk 		break;
    506   1.1        pk 
    507   1.1        pk 	case NCR_VARIANT_ESP100A:
    508   1.1        pk 		sc->sc_maxxfer = 64 * 1024;
    509   1.1        pk 		/* Min clocks/byte is 5 */
    510   1.1        pk 		sc->sc_minsync = ncr53c9x_cpb2stp(sc, 5);
    511   1.1        pk 		break;
    512   1.1        pk 
    513   1.1        pk 	case NCR_VARIANT_ESP200:
    514  1.13    petrov 	case NCR_VARIANT_FAS366:
    515   1.1        pk 		sc->sc_maxxfer = 16 * 1024 * 1024;
    516   1.1        pk 		/* XXX - do actually set FAST* bits */
    517   1.1        pk 		break;
    518   1.1        pk 	}
    519   1.1        pk 
    520   1.1        pk 	/* Establish interrupt channel */
    521  1.11        pk 	icookie = bus_intr_establish(esc->sc_bustag, esc->sc_pri, IPL_BIO, 0,
    522  1.10  nisimura 				     ncr53c9x_intr, sc);
    523   1.1        pk 
    524   1.1        pk 	/* register interrupt stats */
    525   1.9       cgd 	evcnt_attach_dynamic(&sc->sc_intrcnt, EVCNT_TYPE_INTR, NULL,
    526   1.9       cgd 	    sc->sc_dev.dv_xname, "intr");
    527   1.1        pk 
    528  1.13    petrov 	/* Turn on target selection using the `dma' method */
    529  1.13    petrov 	if (sc->sc_rev != NCR_VARIANT_FAS366)
    530  1.13    petrov 		sc->sc_features |= NCR_F_DMASELECT;
    531  1.13    petrov 
    532   1.1        pk 	/* Do the common parts of attachment. */
    533  1.14    bouyer 	sc->sc_adapter.adapt_minphys = minphys;
    534  1.14    bouyer 	sc->sc_adapter.adapt_request = ncr53c9x_scsipi_request;
    535  1.14    bouyer 	ncr53c9x_attach(sc);
    536  1.14    bouyer 
    537   1.1        pk }
    538   1.1        pk 
    539   1.1        pk /*
    540   1.1        pk  * Glue functions.
    541   1.1        pk  */
    542   1.1        pk 
    543  1.13    petrov #ifdef ESP_SBUS_DEBUG
    544  1.13    petrov int esp_sbus_debug = 0;
    545  1.13    petrov 
    546  1.13    petrov static struct {
    547  1.13    petrov 	char *r_name;
    548  1.13    petrov 	int   r_flag;
    549  1.13    petrov } esp__read_regnames [] = {
    550  1.13    petrov 	{ "TCL", 0},			/* 0/00 */
    551  1.13    petrov 	{ "TCM", 0},			/* 1/04 */
    552  1.13    petrov 	{ "FIFO", 0},			/* 2/08 */
    553  1.13    petrov 	{ "CMD", 0},			/* 3/0c */
    554  1.13    petrov 	{ "STAT", 0},			/* 4/10 */
    555  1.13    petrov 	{ "INTR", 0},			/* 5/14 */
    556  1.13    petrov 	{ "STEP", 0},			/* 6/18 */
    557  1.13    petrov 	{ "FFLAGS", 1},			/* 7/1c */
    558  1.13    petrov 	{ "CFG1", 1},			/* 8/20 */
    559  1.13    petrov 	{ "STAT2", 0},			/* 9/24 */
    560  1.13    petrov 	{ "CFG4", 1},			/* a/28 */
    561  1.13    petrov 	{ "CFG2", 1},			/* b/2c */
    562  1.13    petrov 	{ "CFG3", 1},			/* c/30 */
    563  1.13    petrov 	{ "-none", 1},			/* d/34 */
    564  1.13    petrov 	{ "TCH", 1},			/* e/38 */
    565  1.13    petrov 	{ "TCX", 1},			/* f/3c */
    566  1.13    petrov };
    567  1.13    petrov 
    568  1.13    petrov static struct {
    569  1.13    petrov 	char *r_name;
    570  1.13    petrov 	int   r_flag;
    571  1.13    petrov } esp__write_regnames[] = {
    572  1.13    petrov 	{ "TCL", 1},			/* 0/00 */
    573  1.13    petrov 	{ "TCM", 1},			/* 1/04 */
    574  1.13    petrov 	{ "FIFO", 0},			/* 2/08 */
    575  1.13    petrov 	{ "CMD", 0},			/* 3/0c */
    576  1.13    petrov 	{ "SELID", 1},			/* 4/10 */
    577  1.13    petrov 	{ "TIMEOUT", 1},		/* 5/14 */
    578  1.13    petrov 	{ "SYNCTP", 1},			/* 6/18 */
    579  1.13    petrov 	{ "SYNCOFF", 1},		/* 7/1c */
    580  1.13    petrov 	{ "CFG1", 1},			/* 8/20 */
    581  1.13    petrov 	{ "CCF", 1},			/* 9/24 */
    582  1.13    petrov 	{ "TEST", 1},			/* a/28 */
    583  1.13    petrov 	{ "CFG2", 1},			/* b/2c */
    584  1.13    petrov 	{ "CFG3", 1},			/* c/30 */
    585  1.13    petrov 	{ "-none", 1},			/* d/34 */
    586  1.13    petrov 	{ "TCH", 1},			/* e/38 */
    587  1.13    petrov 	{ "TCX", 1},			/* f/3c */
    588  1.13    petrov };
    589  1.13    petrov #endif
    590  1.13    petrov 
    591   1.1        pk u_char
    592   1.1        pk esp_read_reg(sc, reg)
    593   1.1        pk 	struct ncr53c9x_softc *sc;
    594   1.1        pk 	int reg;
    595   1.1        pk {
    596   1.1        pk 	struct esp_softc *esc = (struct esp_softc *)sc;
    597  1.13    petrov 	u_char v;
    598   1.1        pk 
    599  1.13    petrov 	v = bus_space_read_1(esc->sc_bustag, esc->sc_reg, reg * 4);
    600  1.13    petrov #ifdef ESP_SBUS_DEBUG
    601  1.13    petrov 	if (esp_sbus_debug && (reg < 0x10) && esp__read_regnames[reg].r_flag)
    602  1.13    petrov 		printf("RD:%x <%s> %x\n", reg * 4,
    603  1.13    petrov 		    ((unsigned)reg < 0x10) ? esp__read_regnames[reg].r_name : "<***>", v);
    604  1.13    petrov #endif
    605  1.13    petrov 	return v;
    606   1.1        pk }
    607   1.1        pk 
    608   1.1        pk void
    609   1.1        pk esp_write_reg(sc, reg, v)
    610   1.1        pk 	struct ncr53c9x_softc *sc;
    611   1.1        pk 	int reg;
    612   1.1        pk 	u_char v;
    613   1.1        pk {
    614   1.1        pk 	struct esp_softc *esc = (struct esp_softc *)sc;
    615   1.1        pk 
    616  1.13    petrov #ifdef ESP_SBUS_DEBUG
    617  1.13    petrov 	if (esp_sbus_debug && (reg < 0x10) && esp__write_regnames[reg].r_flag)
    618  1.13    petrov 		printf("WR:%x <%s> %x\n", reg * 4,
    619  1.13    petrov 		    ((unsigned)reg < 0x10) ? esp__write_regnames[reg].r_name : "<***>", v);
    620  1.13    petrov #endif
    621   1.1        pk 	bus_space_write_1(esc->sc_bustag, esc->sc_reg, reg * 4, v);
    622   1.6    mjacob }
    623   1.6    mjacob 
    624   1.6    mjacob u_char
    625   1.6    mjacob esp_rdreg1(sc, reg)
    626   1.6    mjacob 	struct ncr53c9x_softc *sc;
    627   1.6    mjacob 	int reg;
    628   1.6    mjacob {
    629   1.6    mjacob 	struct esp_softc *esc = (struct esp_softc *)sc;
    630   1.6    mjacob 
    631   1.6    mjacob 	return (bus_space_read_1(esc->sc_bustag, esc->sc_reg, reg));
    632   1.6    mjacob }
    633   1.6    mjacob 
    634   1.6    mjacob void
    635   1.6    mjacob esp_wrreg1(sc, reg, v)
    636   1.6    mjacob 	struct ncr53c9x_softc *sc;
    637   1.6    mjacob 	int reg;
    638   1.6    mjacob 	u_char v;
    639   1.6    mjacob {
    640   1.6    mjacob 	struct esp_softc *esc = (struct esp_softc *)sc;
    641   1.6    mjacob 
    642   1.6    mjacob 	bus_space_write_1(esc->sc_bustag, esc->sc_reg, reg, v);
    643   1.1        pk }
    644   1.1        pk 
    645   1.1        pk int
    646   1.1        pk esp_dma_isintr(sc)
    647   1.1        pk 	struct ncr53c9x_softc *sc;
    648   1.1        pk {
    649   1.1        pk 	struct esp_softc *esc = (struct esp_softc *)sc;
    650   1.1        pk 
    651   1.1        pk 	return (DMA_ISINTR(esc->sc_dma));
    652   1.1        pk }
    653   1.1        pk 
    654   1.1        pk void
    655   1.1        pk esp_dma_reset(sc)
    656   1.1        pk 	struct ncr53c9x_softc *sc;
    657   1.1        pk {
    658   1.1        pk 	struct esp_softc *esc = (struct esp_softc *)sc;
    659   1.1        pk 
    660   1.1        pk 	DMA_RESET(esc->sc_dma);
    661   1.1        pk }
    662   1.1        pk 
    663   1.1        pk int
    664   1.1        pk esp_dma_intr(sc)
    665   1.1        pk 	struct ncr53c9x_softc *sc;
    666   1.1        pk {
    667   1.1        pk 	struct esp_softc *esc = (struct esp_softc *)sc;
    668   1.1        pk 
    669   1.1        pk 	return (DMA_INTR(esc->sc_dma));
    670   1.1        pk }
    671   1.1        pk 
    672   1.1        pk int
    673   1.1        pk esp_dma_setup(sc, addr, len, datain, dmasize)
    674   1.1        pk 	struct ncr53c9x_softc *sc;
    675   1.1        pk 	caddr_t *addr;
    676   1.1        pk 	size_t *len;
    677   1.1        pk 	int datain;
    678   1.1        pk 	size_t *dmasize;
    679   1.1        pk {
    680   1.1        pk 	struct esp_softc *esc = (struct esp_softc *)sc;
    681   1.1        pk 
    682   1.1        pk 	return (DMA_SETUP(esc->sc_dma, addr, len, datain, dmasize));
    683   1.1        pk }
    684   1.1        pk 
    685   1.1        pk void
    686   1.1        pk esp_dma_go(sc)
    687   1.1        pk 	struct ncr53c9x_softc *sc;
    688   1.1        pk {
    689   1.1        pk 	struct esp_softc *esc = (struct esp_softc *)sc;
    690   1.1        pk 
    691   1.1        pk 	DMA_GO(esc->sc_dma);
    692   1.1        pk }
    693   1.1        pk 
    694   1.1        pk void
    695   1.1        pk esp_dma_stop(sc)
    696   1.1        pk 	struct ncr53c9x_softc *sc;
    697   1.1        pk {
    698   1.1        pk 	struct esp_softc *esc = (struct esp_softc *)sc;
    699   1.1        pk 	u_int32_t csr;
    700   1.1        pk 
    701   1.1        pk 	csr = L64854_GCSR(esc->sc_dma);
    702   1.1        pk 	csr &= ~D_EN_DMA;
    703   1.1        pk 	L64854_SCSR(esc->sc_dma, csr);
    704   1.1        pk }
    705   1.1        pk 
    706   1.1        pk int
    707   1.1        pk esp_dma_isactive(sc)
    708   1.1        pk 	struct ncr53c9x_softc *sc;
    709   1.1        pk {
    710   1.1        pk 	struct esp_softc *esc = (struct esp_softc *)sc;
    711   1.1        pk 
    712   1.1        pk 	return (DMA_ISACTIVE(esc->sc_dma));
    713   1.1        pk }
    714  1.12       eeh 
    715  1.12       eeh #include "opt_ddb.h"
    716  1.12       eeh #ifdef DDB
    717  1.12       eeh #include <machine/db_machdep.h>
    718  1.12       eeh #include <ddb/db_output.h>
    719  1.12       eeh 
    720  1.12       eeh void db_esp __P((db_expr_t, int, db_expr_t, char*));
    721  1.12       eeh 
    722  1.12       eeh void
    723  1.12       eeh db_esp(addr, have_addr, count, modif)
    724  1.12       eeh 	db_expr_t addr;
    725  1.12       eeh 	int have_addr;
    726  1.12       eeh 	db_expr_t count;
    727  1.12       eeh 	char *modif;
    728  1.12       eeh {
    729  1.12       eeh 	struct ncr53c9x_softc *sc;
    730  1.12       eeh 	struct ncr53c9x_ecb *ecb;
    731  1.12       eeh 	struct ncr53c9x_linfo *li;
    732  1.12       eeh 	int u, t, i;
    733  1.12       eeh 
    734  1.12       eeh 	for (u=0; u<10; u++) {
    735  1.12       eeh 		sc = (struct ncr53c9x_softc *)
    736  1.12       eeh 			getdevunit("esp", u);
    737  1.12       eeh 		if (!sc) continue;
    738  1.12       eeh 
    739  1.12       eeh 		db_printf("esp%d: nexus %p phase %x prev %x dp %p dleft %lx ify %x\n",
    740  1.12       eeh 			  u, sc->sc_nexus, sc->sc_phase, sc->sc_prevphase,
    741  1.12       eeh 			  sc->sc_dp, sc->sc_dleft, sc->sc_msgify);
    742  1.12       eeh 		db_printf("\tmsgout %x msgpriq %x msgin %x:%x:%x:%x:%x\n",
    743  1.12       eeh 			  sc->sc_msgout, sc->sc_msgpriq, sc->sc_imess[0],
    744  1.12       eeh 			  sc->sc_imess[1], sc->sc_imess[2], sc->sc_imess[3],
    745  1.12       eeh 			  sc->sc_imess[0]);
    746  1.12       eeh 		db_printf("ready: ");
    747  1.12       eeh 		for (ecb = sc->ready_list.tqh_first; ecb; ecb = ecb->chain.tqe_next) {
    748  1.12       eeh 			db_printf("ecb %p ", ecb);
    749  1.12       eeh 			if (ecb == ecb->chain.tqe_next) {
    750  1.12       eeh 				db_printf("\nWARNING: tailq loop on ecb %p", ecb);
    751  1.12       eeh 				break;
    752  1.12       eeh 			}
    753  1.12       eeh 		}
    754  1.12       eeh 		db_printf("\n");
    755  1.12       eeh 
    756  1.12       eeh 		for (t=0; t<NCR_NTARG; t++) {
    757  1.12       eeh 			LIST_FOREACH(li, &sc->sc_tinfo[t].luns, link) {
    758  1.12       eeh 				db_printf("t%d lun %d untagged %p busy %d used %x\n",
    759  1.12       eeh 					  t, (int)li->lun, li->untagged, li->busy,
    760  1.12       eeh 					  li->used);
    761  1.12       eeh 				for (i=0; i<256; i++)
    762  1.12       eeh 					if ((ecb = li->queued[i])) {
    763  1.12       eeh 						db_printf("ecb %p tag %x\n", ecb, i);
    764  1.12       eeh 					}
    765  1.12       eeh 			}
    766  1.12       eeh 		}
    767  1.12       eeh 	}
    768  1.12       eeh }
    769  1.12       eeh #endif
    770  1.13    petrov 
    771