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