Home | History | Annotate | Line # | Download | only in dev
esp.c revision 1.51.10.1
      1  1.51.10.1      elad /*	$NetBSD: esp.c,v 1.51.10.1 2006/04/19 02:33:26 elad Exp $	*/
      2        1.1       dbj 
      3        1.1       dbj /*-
      4        1.5   mycroft  * Copyright (c) 1997, 1998 The NetBSD Foundation, Inc.
      5        1.1       dbj  * All rights reserved.
      6        1.1       dbj  *
      7        1.1       dbj  * This code is derived from software contributed to The NetBSD Foundation
      8        1.6   mycroft  * by Charles M. Hannum and by Jason R. Thorpe of the Numerical Aerospace
      9        1.6   mycroft  * Simulation Facility, NASA Ames Research Center.
     10        1.1       dbj  *
     11        1.1       dbj  * Redistribution and use in source and binary forms, with or without
     12        1.1       dbj  * modification, are permitted provided that the following conditions
     13        1.1       dbj  * are met:
     14        1.1       dbj  * 1. Redistributions of source code must retain the above copyright
     15        1.1       dbj  *    notice, this list of conditions and the following disclaimer.
     16        1.1       dbj  * 2. Redistributions in binary form must reproduce the above copyright
     17        1.1       dbj  *    notice, this list of conditions and the following disclaimer in the
     18        1.1       dbj  *    documentation and/or other materials provided with the distribution.
     19        1.1       dbj  * 3. All advertising materials mentioning features or use of this software
     20        1.1       dbj  *    must display the following acknowledgement:
     21        1.1       dbj  *	This product includes software developed by the NetBSD
     22        1.1       dbj  *	Foundation, Inc. and its contributors.
     23        1.1       dbj  * 4. Neither the name of The NetBSD Foundation nor the names of its
     24        1.1       dbj  *    contributors may be used to endorse or promote products derived
     25        1.1       dbj  *    from this software without specific prior written permission.
     26        1.1       dbj  *
     27        1.1       dbj  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     28        1.1       dbj  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     29        1.1       dbj  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     30        1.1       dbj  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     31        1.1       dbj  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     32        1.1       dbj  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     33        1.1       dbj  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     34        1.1       dbj  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     35        1.1       dbj  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     36        1.1       dbj  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     37        1.1       dbj  * POSSIBILITY OF SUCH DAMAGE.
     38        1.1       dbj  */
     39        1.1       dbj 
     40        1.1       dbj /*
     41        1.1       dbj  * Copyright (c) 1994 Peter Galbavy
     42        1.1       dbj  * All rights reserved.
     43        1.1       dbj  *
     44        1.1       dbj  * Redistribution and use in source and binary forms, with or without
     45        1.1       dbj  * modification, are permitted provided that the following conditions
     46        1.1       dbj  * are met:
     47        1.1       dbj  * 1. Redistributions of source code must retain the above copyright
     48        1.1       dbj  *    notice, this list of conditions and the following disclaimer.
     49        1.1       dbj  * 2. Redistributions in binary form must reproduce the above copyright
     50        1.1       dbj  *    notice, this list of conditions and the following disclaimer in the
     51        1.1       dbj  *    documentation and/or other materials provided with the distribution.
     52        1.1       dbj  * 3. All advertising materials mentioning features or use of this software
     53        1.1       dbj  *    must display the following acknowledgement:
     54        1.1       dbj  *	This product includes software developed by Peter Galbavy
     55        1.1       dbj  * 4. The name of the author may not be used to endorse or promote products
     56        1.1       dbj  *    derived from this software without specific prior written permission.
     57        1.1       dbj  *
     58        1.1       dbj  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     59        1.1       dbj  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
     60        1.1       dbj  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
     61        1.1       dbj  * DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
     62        1.1       dbj  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
     63        1.1       dbj  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
     64        1.1       dbj  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     65        1.1       dbj  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
     66        1.1       dbj  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
     67        1.1       dbj  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     68        1.1       dbj  * POSSIBILITY OF SUCH DAMAGE.
     69        1.1       dbj  */
     70        1.1       dbj 
     71        1.1       dbj /*
     72        1.1       dbj  * Based on aic6360 by Jarle Greipsland
     73        1.1       dbj  *
     74        1.1       dbj  * Acknowledgements: Many of the algorithms used in this driver are
     75        1.1       dbj  * inspired by the work of Julian Elischer (julian (at) tfs.com) and
     76        1.1       dbj  * Charles Hannum (mycroft (at) duality.gnu.ai.mit.edu).  Thanks a million!
     77        1.1       dbj  */
     78        1.1       dbj 
     79        1.1       dbj /*
     80        1.1       dbj  * Grabbed from the sparc port at revision 1.73 for the NeXT.
     81       1.47    keihan  * Darrin B. Jewell <dbj (at) NetBSD.org>  Sat Jul  4 15:41:32 1998
     82        1.1       dbj  */
     83       1.45     lukem 
     84       1.45     lukem #include <sys/cdefs.h>
     85  1.51.10.1      elad __KERNEL_RCSID(0, "$NetBSD: esp.c,v 1.51.10.1 2006/04/19 02:33:26 elad Exp $");
     86        1.1       dbj 
     87        1.1       dbj #include <sys/types.h>
     88        1.1       dbj #include <sys/param.h>
     89        1.1       dbj #include <sys/systm.h>
     90        1.1       dbj #include <sys/kernel.h>
     91        1.1       dbj #include <sys/errno.h>
     92        1.1       dbj #include <sys/ioctl.h>
     93        1.1       dbj #include <sys/device.h>
     94        1.1       dbj #include <sys/buf.h>
     95        1.1       dbj #include <sys/proc.h>
     96        1.1       dbj #include <sys/user.h>
     97        1.1       dbj #include <sys/queue.h>
     98        1.1       dbj 
     99       1.43   thorpej #include <uvm/uvm_extern.h>
    100       1.43   thorpej 
    101        1.1       dbj #include <dev/scsipi/scsi_all.h>
    102        1.1       dbj #include <dev/scsipi/scsipi_all.h>
    103        1.1       dbj #include <dev/scsipi/scsiconf.h>
    104        1.1       dbj #include <dev/scsipi/scsi_message.h>
    105        1.1       dbj 
    106        1.1       dbj #include <machine/bus.h>
    107        1.1       dbj #include <machine/autoconf.h>
    108        1.1       dbj #include <machine/cpu.h>
    109        1.1       dbj 
    110        1.1       dbj #include <dev/ic/ncr53c9xreg.h>
    111        1.1       dbj #include <dev/ic/ncr53c9xvar.h>
    112        1.1       dbj 
    113        1.1       dbj #include <next68k/next68k/isr.h>
    114        1.1       dbj 
    115       1.38   mycroft #include <next68k/dev/intiovar.h>
    116        1.1       dbj #include <next68k/dev/nextdmareg.h>
    117        1.1       dbj #include <next68k/dev/nextdmavar.h>
    118        1.1       dbj 
    119       1.38   mycroft #include <next68k/dev/espreg.h>
    120       1.38   mycroft #include <next68k/dev/espvar.h>
    121        1.1       dbj 
    122       1.20       dbj #ifdef DEBUG
    123       1.39   mycroft #undef ESP_DEBUG
    124        1.4       dbj #endif
    125        1.4       dbj 
    126        1.4       dbj #ifdef ESP_DEBUG
    127       1.10       dbj int esp_debug = 0;
    128       1.10       dbj #define DPRINTF(x) if (esp_debug) printf x;
    129       1.38   mycroft extern char *ndtracep;
    130       1.38   mycroft extern char ndtrace[];
    131       1.38   mycroft extern int ndtraceshow;
    132       1.38   mycroft #define NDTRACEIF(x) if (10 && ndtracep < (ndtrace + 8192)) do {x;} while (0)
    133        1.4       dbj #else
    134        1.4       dbj #define DPRINTF(x)
    135       1.38   mycroft #define NDTRACEIF(x)
    136        1.4       dbj #endif
    137       1.37  christos #define PRINTF(x) printf x;
    138        1.4       dbj 
    139        1.4       dbj 
    140       1.49       chs void	espattach_intio(struct device *, struct device *, void *);
    141       1.49       chs int	espmatch_intio(struct device *, struct cfdata *, void *);
    142        1.1       dbj 
    143        1.2       dbj /* DMA callbacks */
    144       1.49       chs bus_dmamap_t esp_dmacb_continue(void *);
    145       1.49       chs void esp_dmacb_completed(bus_dmamap_t, void *);
    146       1.49       chs void esp_dmacb_shutdown(void *);
    147        1.2       dbj 
    148       1.49       chs static void	findchannel_defer(struct device *);
    149       1.38   mycroft 
    150       1.20       dbj #ifdef ESP_DEBUG
    151       1.20       dbj char esp_dma_dump[5*1024] = "";
    152       1.20       dbj struct ncr53c9x_softc *esp_debug_sc = 0;
    153       1.49       chs void esp_dma_store(struct ncr53c9x_softc *);
    154       1.49       chs void esp_dma_print(struct ncr53c9x_softc *);
    155       1.22       dbj int esp_dma_nest = 0;
    156       1.20       dbj #endif
    157       1.20       dbj 
    158       1.20       dbj 
    159        1.1       dbj /* Linkup to the rest of the kernel */
    160       1.42   thorpej CFATTACH_DECL(esp, sizeof(struct esp_softc),
    161       1.42   thorpej     espmatch_intio, espattach_intio, NULL, NULL);
    162        1.1       dbj 
    163       1.38   mycroft static int attached = 0;
    164       1.38   mycroft 
    165        1.1       dbj /*
    166        1.1       dbj  * Functions and the switch for the MI code.
    167        1.1       dbj  */
    168       1.49       chs u_char	esp_read_reg(struct ncr53c9x_softc *, int);
    169       1.49       chs void	esp_write_reg(struct ncr53c9x_softc *, int, u_char);
    170       1.49       chs int	esp_dma_isintr(struct ncr53c9x_softc *);
    171       1.49       chs void	esp_dma_reset(struct ncr53c9x_softc *);
    172       1.49       chs int	esp_dma_intr(struct ncr53c9x_softc *);
    173       1.49       chs int	esp_dma_setup(struct ncr53c9x_softc *, caddr_t *, size_t *, int,
    174       1.49       chs 	    size_t *);
    175       1.49       chs void	esp_dma_go(struct ncr53c9x_softc *);
    176       1.49       chs void	esp_dma_stop(struct ncr53c9x_softc *);
    177       1.49       chs int	esp_dma_isactive(struct ncr53c9x_softc *);
    178        1.1       dbj 
    179        1.1       dbj struct ncr53c9x_glue esp_glue = {
    180        1.1       dbj 	esp_read_reg,
    181        1.1       dbj 	esp_write_reg,
    182        1.1       dbj 	esp_dma_isintr,
    183        1.1       dbj 	esp_dma_reset,
    184        1.1       dbj 	esp_dma_intr,
    185        1.1       dbj 	esp_dma_setup,
    186        1.1       dbj 	esp_dma_go,
    187        1.1       dbj 	esp_dma_stop,
    188        1.1       dbj 	esp_dma_isactive,
    189        1.1       dbj 	NULL,			/* gl_clear_latched_intr */
    190        1.1       dbj };
    191        1.1       dbj 
    192       1.11       dbj #ifdef ESP_DEBUG
    193       1.50  christos #define XCHR(x) hexdigits[(x) & 0xf]
    194       1.11       dbj static void
    195       1.11       dbj esp_hex_dump(unsigned char *pkt, size_t len)
    196       1.11       dbj {
    197       1.11       dbj 	size_t i, j;
    198       1.11       dbj 
    199       1.31       dbj 	printf("00000000  ");
    200       1.11       dbj 	for(i=0; i<len; i++) {
    201       1.11       dbj 		printf("%c%c ", XCHR(pkt[i]>>4), XCHR(pkt[i]));
    202       1.24       dbj 		if ((i+1) % 16 == 8) {
    203       1.24       dbj 			printf(" ");
    204       1.24       dbj 		}
    205       1.11       dbj 		if ((i+1) % 16 == 0) {
    206       1.24       dbj 			printf(" %c", '|');
    207       1.24       dbj 			for(j=0; j<16; j++) {
    208       1.11       dbj 				printf("%c", pkt[i-15+j]>=32 && pkt[i-15+j]<127?pkt[i-15+j]:'.');
    209       1.24       dbj 			}
    210       1.24       dbj 			printf("%c\n%c%c%c%c%c%c%c%c  ", '|',
    211       1.24       dbj 					XCHR((i+1)>>28),XCHR((i+1)>>24),XCHR((i+1)>>20),XCHR((i+1)>>16),
    212       1.24       dbj 					XCHR((i+1)>>12), XCHR((i+1)>>8), XCHR((i+1)>>4), XCHR(i+1));
    213       1.11       dbj 		}
    214       1.11       dbj 	}
    215       1.11       dbj 	printf("\n");
    216       1.11       dbj }
    217       1.11       dbj #endif
    218       1.11       dbj 
    219        1.1       dbj int
    220       1.49       chs espmatch_intio(struct device *parent, struct cfdata *cf, void *aux)
    221        1.1       dbj {
    222       1.38   mycroft 	struct intio_attach_args *ia = (struct intio_attach_args *)aux;
    223       1.38   mycroft 
    224       1.38   mycroft 	if (attached)
    225       1.38   mycroft 		return (0);
    226       1.38   mycroft 
    227       1.38   mycroft 	ia->ia_addr = (void *)NEXT_P_SCSI;
    228        1.1       dbj 
    229        1.3       dbj 	return(1);
    230        1.1       dbj }
    231        1.1       dbj 
    232       1.38   mycroft static void
    233       1.49       chs findchannel_defer(struct device *self)
    234       1.38   mycroft {
    235       1.38   mycroft 	struct esp_softc *esc = (void *)self;
    236       1.38   mycroft 	struct ncr53c9x_softc *sc = &esc->sc_ncr53c9x;
    237       1.38   mycroft 	int error;
    238       1.38   mycroft 
    239       1.38   mycroft 	if (!esc->sc_dma) {
    240       1.38   mycroft 		printf ("%s", sc->sc_dev.dv_xname);
    241       1.38   mycroft 		esc->sc_dma = nextdma_findchannel ("scsi");
    242       1.38   mycroft 		if (!esc->sc_dma)
    243       1.44       wiz 			panic ("%s: can't find DMA channel",
    244       1.38   mycroft 			       sc->sc_dev.dv_xname);
    245       1.38   mycroft 	}
    246       1.38   mycroft 
    247       1.38   mycroft 	nextdma_setconf (esc->sc_dma, shutdown_cb, &esp_dmacb_shutdown);
    248       1.38   mycroft 	nextdma_setconf (esc->sc_dma, continue_cb, &esp_dmacb_continue);
    249       1.38   mycroft 	nextdma_setconf (esc->sc_dma, completed_cb, &esp_dmacb_completed);
    250       1.38   mycroft 	nextdma_setconf (esc->sc_dma, cb_arg, sc);
    251       1.38   mycroft 
    252       1.38   mycroft 	error = bus_dmamap_create(esc->sc_dma->sc_dmat,
    253       1.43   thorpej 				  sc->sc_maxxfer,
    254       1.43   thorpej 				  sc->sc_maxxfer/PAGE_SIZE+1, sc->sc_maxxfer,
    255       1.38   mycroft 				  0, BUS_DMA_ALLOCNOW, &esc->sc_main_dmamap);
    256       1.38   mycroft 	if (error) {
    257       1.38   mycroft 		panic("%s: can't create main i/o DMA map, error = %d",
    258       1.38   mycroft 		      sc->sc_dev.dv_xname, error);
    259       1.38   mycroft 	}
    260       1.38   mycroft 
    261       1.38   mycroft 	error = bus_dmamap_create(esc->sc_dma->sc_dmat,
    262       1.38   mycroft 				  ESP_DMA_TAILBUFSIZE, 1, ESP_DMA_TAILBUFSIZE,
    263       1.38   mycroft 				  0, BUS_DMA_ALLOCNOW, &esc->sc_tail_dmamap);
    264       1.38   mycroft 	if (error) {
    265       1.38   mycroft 		panic("%s: can't create tail i/o DMA map, error = %d",
    266       1.38   mycroft 		      sc->sc_dev.dv_xname, error);
    267       1.38   mycroft 	}
    268       1.38   mycroft 
    269       1.38   mycroft #if 0
    270       1.44       wiz 	/* Turn on target selection using the `DMA' method */
    271       1.38   mycroft 	sc->sc_features |= NCR_F_DMASELECT;
    272       1.38   mycroft #endif
    273       1.38   mycroft 
    274       1.38   mycroft 	/* Do the common parts of attachment. */
    275       1.38   mycroft 	sc->sc_adapter.adapt_minphys = minphys;
    276       1.38   mycroft 	sc->sc_adapter.adapt_request = ncr53c9x_scsipi_request;
    277       1.38   mycroft 	ncr53c9x_attach(sc);
    278       1.38   mycroft 
    279       1.38   mycroft 	/* Establish interrupt channel */
    280       1.38   mycroft 	isrlink_autovec(ncr53c9x_intr, sc, NEXT_I_IPL(NEXT_I_SCSI), 0, NULL);
    281       1.38   mycroft 	INTR_ENABLE(NEXT_I_SCSI);
    282       1.38   mycroft 
    283       1.38   mycroft 	/* register interrupt stats */
    284       1.38   mycroft 	evcnt_attach_dynamic(&sc->sc_intrcnt, EVCNT_TYPE_INTR, NULL,
    285       1.38   mycroft 			     sc->sc_dev.dv_xname, "intr");
    286       1.38   mycroft 
    287       1.44       wiz 	printf ("%s: using DMA channel %s\n", sc->sc_dev.dv_xname,
    288       1.38   mycroft 		esc->sc_dma->sc_dev.dv_xname);
    289       1.38   mycroft }
    290       1.38   mycroft 
    291        1.1       dbj void
    292       1.49       chs espattach_intio(struct device *parent, struct device *self, void *aux)
    293        1.1       dbj {
    294        1.1       dbj 	struct esp_softc *esc = (void *)self;
    295        1.1       dbj 	struct ncr53c9x_softc *sc = &esc->sc_ncr53c9x;
    296       1.38   mycroft 	struct intio_attach_args *ia = (struct intio_attach_args *)aux;
    297        1.1       dbj 
    298       1.20       dbj #ifdef ESP_DEBUG
    299       1.20       dbj 	esp_debug_sc = sc;
    300       1.20       dbj #endif
    301       1.20       dbj 
    302       1.38   mycroft 	esc->sc_bst = ia->ia_bst;
    303        1.1       dbj 	if (bus_space_map(esc->sc_bst, NEXT_P_SCSI,
    304        1.1       dbj 			ESP_DEVICE_SIZE, 0, &esc->sc_bsh)) {
    305       1.38   mycroft 		panic("\n%s: can't map ncr53c90 registers",
    306       1.38   mycroft 		      sc->sc_dev.dv_xname);
    307        1.1       dbj 	}
    308        1.1       dbj 
    309        1.1       dbj 	sc->sc_id = 7;
    310  1.51.10.1      elad 	sc->sc_freq = 20;	/* MHz */
    311        1.1       dbj 
    312        1.1       dbj 	/*
    313        1.1       dbj 	 * Set up glue for MI code early; we use some of it here.
    314        1.1       dbj 	 */
    315        1.1       dbj 	sc->sc_glue = &esp_glue;
    316        1.1       dbj 
    317        1.1       dbj 	/*
    318        1.1       dbj 	 * XXX More of this should be in ncr53c9x_attach(), but
    319        1.1       dbj 	 * XXX should we really poke around the chip that much in
    320        1.1       dbj 	 * XXX the MI code?  Think about this more...
    321        1.1       dbj 	 */
    322        1.1       dbj 
    323        1.1       dbj 	/*
    324        1.1       dbj 	 * It is necessary to try to load the 2nd config register here,
    325        1.1       dbj 	 * to find out what rev the esp chip is, else the ncr53c9x_reset
    326        1.1       dbj 	 * will not set up the defaults correctly.
    327        1.1       dbj 	 */
    328        1.1       dbj 	sc->sc_cfg1 = sc->sc_id | NCRCFG1_PARENB;
    329        1.1       dbj 	sc->sc_cfg2 = NCRCFG2_SCSI2 | NCRCFG2_RPE;
    330        1.1       dbj 	sc->sc_cfg3 = NCRCFG3_CDB;
    331        1.1       dbj 	NCR_WRITE_REG(sc, NCR_CFG2, sc->sc_cfg2);
    332        1.1       dbj 
    333        1.1       dbj 	if ((NCR_READ_REG(sc, NCR_CFG2) & ~NCRCFG2_RSVD) !=
    334        1.1       dbj 	    (NCRCFG2_SCSI2 | NCRCFG2_RPE)) {
    335        1.1       dbj 		sc->sc_rev = NCR_VARIANT_ESP100;
    336        1.1       dbj 	} else {
    337        1.1       dbj 		sc->sc_cfg2 = NCRCFG2_SCSI2;
    338        1.1       dbj 		NCR_WRITE_REG(sc, NCR_CFG2, sc->sc_cfg2);
    339        1.1       dbj 		sc->sc_cfg3 = 0;
    340        1.1       dbj 		NCR_WRITE_REG(sc, NCR_CFG3, sc->sc_cfg3);
    341        1.1       dbj 		sc->sc_cfg3 = (NCRCFG3_CDB | NCRCFG3_FCLK);
    342        1.1       dbj 		NCR_WRITE_REG(sc, NCR_CFG3, sc->sc_cfg3);
    343        1.1       dbj 		if (NCR_READ_REG(sc, NCR_CFG3) !=
    344        1.1       dbj 		    (NCRCFG3_CDB | NCRCFG3_FCLK)) {
    345        1.1       dbj 			sc->sc_rev = NCR_VARIANT_ESP100A;
    346        1.1       dbj 		} else {
    347        1.1       dbj 			/* NCRCFG2_FE enables > 64K transfers */
    348        1.1       dbj 			sc->sc_cfg2 |= NCRCFG2_FE;
    349        1.1       dbj 			sc->sc_cfg3 = 0;
    350        1.1       dbj 			NCR_WRITE_REG(sc, NCR_CFG3, sc->sc_cfg3);
    351        1.1       dbj 			sc->sc_rev = NCR_VARIANT_ESP200;
    352        1.1       dbj 		}
    353        1.1       dbj 	}
    354        1.1       dbj 
    355        1.1       dbj 	/*
    356        1.1       dbj 	 * XXX minsync and maxxfer _should_ be set up in MI code,
    357        1.1       dbj 	 * XXX but it appears to have some dependency on what sort
    358        1.1       dbj 	 * XXX of DMA we're hooked up to, etc.
    359        1.1       dbj 	 */
    360        1.1       dbj 
    361        1.1       dbj 	/*
    362        1.1       dbj 	 * This is the value used to start sync negotiations
    363        1.1       dbj 	 * Note that the NCR register "SYNCTP" is programmed
    364        1.1       dbj 	 * in "clocks per byte", and has a minimum value of 4.
    365        1.1       dbj 	 * The SCSI period used in negotiation is one-fourth
    366        1.1       dbj 	 * of the time (in nanoseconds) needed to transfer one byte.
    367        1.1       dbj 	 * Since the chip's clock is given in MHz, we have the following
    368        1.1       dbj 	 * formula: 4 * period = (1000 / freq) * 4
    369        1.1       dbj 	 */
    370       1.39   mycroft 	sc->sc_minsync = /* 1000 / sc->sc_freq */ 0;
    371        1.1       dbj 
    372        1.1       dbj 	/*
    373        1.1       dbj 	 * Alas, we must now modify the value a bit, because it's
    374        1.1       dbj 	 * only valid when can switch on FASTCLK and FASTSCSI bits
    375        1.1       dbj 	 * in config register 3...
    376        1.1       dbj 	 */
    377        1.1       dbj 	switch (sc->sc_rev) {
    378        1.1       dbj 	case NCR_VARIANT_ESP100:
    379        1.1       dbj 		sc->sc_maxxfer = 64 * 1024;
    380        1.1       dbj 		sc->sc_minsync = 0;	/* No synch on old chip? */
    381        1.1       dbj 		break;
    382        1.1       dbj 
    383        1.1       dbj 	case NCR_VARIANT_ESP100A:
    384        1.1       dbj 		sc->sc_maxxfer = 64 * 1024;
    385        1.1       dbj 		/* Min clocks/byte is 5 */
    386       1.39   mycroft 		sc->sc_minsync = /* ncr53c9x_cpb2stp(sc, 5) */ 0;
    387        1.1       dbj 		break;
    388        1.1       dbj 
    389        1.1       dbj 	case NCR_VARIANT_ESP200:
    390        1.1       dbj 		sc->sc_maxxfer = 16 * 1024 * 1024;
    391        1.1       dbj 		/* XXX - do actually set FAST* bits */
    392        1.1       dbj 		break;
    393        1.1       dbj 	}
    394        1.1       dbj 
    395        1.3       dbj 	/* @@@ Some ESP_DCTL bits probably need setting */
    396        1.3       dbj 	NCR_WRITE_REG(sc, ESP_DCTL,
    397       1.37  christos 			ESPDCTL_16MHZ | ESPDCTL_INTENB | ESPDCTL_RESET);
    398        1.3       dbj 	DELAY(10);
    399       1.22       dbj 	DPRINTF(("esp dctl is 0x%02x\n",NCR_READ_REG(sc,ESP_DCTL)));
    400       1.37  christos 	NCR_WRITE_REG(sc, ESP_DCTL, ESPDCTL_16MHZ | ESPDCTL_INTENB);
    401        1.3       dbj 	DELAY(10);
    402       1.22       dbj 	DPRINTF(("esp dctl is 0x%02x\n",NCR_READ_REG(sc,ESP_DCTL)));
    403        1.3       dbj 
    404       1.38   mycroft 	esc->sc_dma = nextdma_findchannel ("scsi");
    405       1.38   mycroft 	if (esc->sc_dma) {
    406       1.38   mycroft 		findchannel_defer (self);
    407       1.38   mycroft 	} else {
    408       1.38   mycroft 		printf ("\n");
    409       1.38   mycroft 		config_defer (self, findchannel_defer);
    410        1.3       dbj 	}
    411        1.1       dbj 
    412       1.38   mycroft 	attached = 1;
    413        1.1       dbj }
    414        1.1       dbj 
    415        1.1       dbj /*
    416        1.1       dbj  * Glue functions.
    417        1.1       dbj  */
    418        1.1       dbj 
    419        1.1       dbj u_char
    420       1.49       chs esp_read_reg(struct ncr53c9x_softc *sc, int reg)
    421        1.1       dbj {
    422        1.1       dbj 	struct esp_softc *esc = (struct esp_softc *)sc;
    423        1.1       dbj 
    424        1.1       dbj 	return(bus_space_read_1(esc->sc_bst, esc->sc_bsh, reg));
    425        1.1       dbj }
    426        1.1       dbj 
    427        1.1       dbj void
    428       1.49       chs esp_write_reg(struct ncr53c9x_softc *sc, int reg, u_char val)
    429        1.1       dbj {
    430        1.1       dbj 	struct esp_softc *esc = (struct esp_softc *)sc;
    431        1.1       dbj 
    432        1.1       dbj 	bus_space_write_1(esc->sc_bst, esc->sc_bsh, reg, val);
    433        1.1       dbj }
    434        1.1       dbj 
    435       1.37  christos volatile u_int32_t save1;
    436       1.37  christos 
    437       1.37  christos #define xADDR 0x0211a000
    438       1.49       chs int doze(volatile int);
    439       1.37  christos int
    440       1.49       chs doze(volatile int c)
    441       1.37  christos {
    442       1.37  christos /* 	static int tmp1; */
    443       1.37  christos 	u_int32_t tmp1;
    444       1.37  christos 	volatile u_int8_t tmp2;
    445       1.37  christos 	volatile u_int8_t *reg = (volatile u_int8_t *)IIOV(xADDR);
    446       1.37  christos 	if (c > 244) return (0);
    447       1.37  christos 	if (c == 0) return (0);
    448       1.37  christos /* 		((*(volatile u_long *)IIOV(NEXT_P_INTRMASK))&=(~NEXT_I_BIT(x))) */
    449       1.37  christos 	(*reg) = 0;
    450       1.37  christos 	(*reg) = 0;
    451       1.37  christos 	do {
    452       1.37  christos 		save1 = (*reg);
    453       1.37  christos 		tmp2 = *(reg + 3);
    454       1.37  christos 		tmp1 = tmp2;
    455       1.37  christos 	} while (tmp1 <= c);
    456       1.37  christos 	return (0);
    457       1.37  christos }
    458       1.37  christos 
    459        1.1       dbj int
    460       1.49       chs esp_dma_isintr(struct ncr53c9x_softc *sc)
    461        1.1       dbj {
    462        1.4       dbj 	struct esp_softc *esc = (struct esp_softc *)sc;
    463       1.37  christos 	if (INTR_OCCURRED(NEXT_I_SCSI)) {
    464       1.38   mycroft 		NDTRACEIF (*ndtracep++ = 'i');
    465       1.37  christos 		NCR_WRITE_REG(sc, ESP_DCTL, ESPDCTL_16MHZ | ESPDCTL_INTENB | (esc->sc_datain ? ESPDCTL_DMARD : 0));
    466       1.37  christos 		return (1);
    467       1.37  christos 	} else {
    468       1.37  christos 		return (0);
    469       1.37  christos 	}
    470       1.37  christos }
    471       1.37  christos 
    472       1.49       chs #define nd_bsr4(reg) \
    473       1.49       chs 	bus_space_read_4(nsc->sc_bst, nsc->sc_bsh, (reg))
    474       1.49       chs #define nd_bsw4(reg,val) \
    475       1.49       chs 	bus_space_write_4(nsc->sc_bst, nsc->sc_bsh, (reg), (val))
    476       1.49       chs 
    477       1.37  christos int
    478       1.49       chs esp_dma_intr(struct ncr53c9x_softc *sc)
    479       1.37  christos {
    480       1.37  christos 	struct esp_softc *esc = (struct esp_softc *)sc;
    481       1.38   mycroft 	struct nextdma_softc *nsc = esc->sc_dma;
    482       1.38   mycroft 	struct nextdma_status *stat = &nsc->sc_stat;
    483        1.4       dbj 
    484        1.4       dbj 	int r = (INTR_OCCURRED(NEXT_I_SCSI));
    485       1.37  christos 	int flushcount;
    486       1.37  christos 	r = 1;
    487        1.4       dbj 
    488       1.38   mycroft 	NDTRACEIF (*ndtracep++ = 'I');
    489        1.4       dbj 	if (r) {
    490       1.37  christos 		/* printf ("esp_dma_isintr start\n"); */
    491       1.20       dbj 		{
    492       1.37  christos 			int s = spldma();
    493       1.38   mycroft 			void *ndmap = stat->nd_map;
    494       1.38   mycroft 			int ndidx = stat->nd_idx;
    495       1.37  christos 			splx(s);
    496       1.20       dbj 
    497       1.23       dbj 			flushcount = 0;
    498       1.23       dbj 
    499       1.22       dbj #ifdef ESP_DEBUG
    500       1.37  christos /* 			esp_dma_nest++; */
    501       1.28        tv 
    502       1.28        tv 			if (esp_debug) {
    503       1.28        tv 				char sbuf[256];
    504       1.28        tv 
    505       1.28        tv 				bitmask_snprintf((*(volatile u_long *)IIOV(NEXT_P_INTRSTAT)),
    506       1.28        tv 						 NEXT_INTR_BITS, sbuf, sizeof(sbuf));
    507       1.28        tv 				printf("esp_dma_isintr = 0x%s\n", sbuf);
    508       1.28        tv 			}
    509       1.22       dbj #endif
    510       1.22       dbj 
    511       1.38   mycroft 			while (!nextdma_finished(nsc)) { /* esp_dma_isactive(sc)) { */
    512       1.38   mycroft 				NDTRACEIF (*ndtracep++ = 'w');
    513       1.38   mycroft 				NDTRACEIF (
    514       1.38   mycroft 					sprintf (ndtracep, "f%dm%dl%dw", NCR_READ_REG(sc, NCR_FFLAG) & NCRFIFO_FF,
    515       1.37  christos 						 NCR_READ_REG((sc), NCR_TCM), NCR_READ_REG((sc), NCR_TCL));
    516       1.38   mycroft 					ndtracep += strlen (ndtracep);
    517       1.38   mycroft 					);
    518       1.37  christos 				if (NCR_READ_REG(sc, NCR_FFLAG) & NCRFIFO_FF)
    519       1.37  christos 					flushcount=5;
    520       1.37  christos 				NCR_WRITE_REG(sc, ESP_DCTL, ESPDCTL_16MHZ | ESPDCTL_INTENB | ESPDCTL_DMAMOD |
    521       1.37  christos 					      (esc->sc_datain ? ESPDCTL_DMARD : 0));
    522       1.37  christos 
    523       1.37  christos 				s = spldma();
    524       1.38   mycroft 				while (ndmap == stat->nd_map && ndidx == stat->nd_idx &&
    525       1.38   mycroft 				       !(nd_bsr4 (DD_CSR) & 0x08000000) &&
    526       1.37  christos 				       ++flushcount < 5) {
    527       1.37  christos 					splx(s);
    528       1.38   mycroft 					NDTRACEIF (*ndtracep++ = 'F');
    529       1.37  christos 					NCR_WRITE_REG(sc, ESP_DCTL, ESPDCTL_FLUSH |
    530       1.37  christos 						      ESPDCTL_16MHZ | ESPDCTL_INTENB | ESPDCTL_DMAMOD |
    531       1.37  christos 						      (esc->sc_datain ? ESPDCTL_DMARD : 0));
    532       1.37  christos 					doze(0x32);
    533       1.20       dbj 					NCR_WRITE_REG(sc, ESP_DCTL,
    534       1.37  christos 						      ESPDCTL_16MHZ | ESPDCTL_INTENB | ESPDCTL_DMAMOD |
    535       1.37  christos 						      (esc->sc_datain ? ESPDCTL_DMARD : 0));
    536       1.37  christos 					doze(0x32);
    537       1.37  christos 					s = spldma();
    538       1.37  christos 				}
    539       1.38   mycroft 				NDTRACEIF (*ndtracep++ = '0' + flushcount);
    540       1.37  christos 				if (flushcount > 4) {
    541       1.37  christos 					int next;
    542       1.37  christos 					int onext = 0;
    543       1.37  christos 					splx(s);
    544       1.37  christos 					DPRINTF (("DMA reset\n"));
    545       1.38   mycroft 					while (((next = nd_bsr4 (DD_NEXT)) !=
    546       1.38   mycroft 						(nd_bsr4 (DD_LIMIT) & 0x7FFFFFFF)) &&
    547       1.37  christos 					       onext != next) {
    548       1.37  christos 						onext = next;
    549       1.37  christos 						DELAY(50);
    550       1.37  christos 					}
    551       1.38   mycroft 					NDTRACEIF (*ndtracep++ = 'R');
    552       1.37  christos 					NCR_WRITE_REG(sc, ESP_DCTL, ESPDCTL_16MHZ | ESPDCTL_INTENB);
    553       1.38   mycroft 					NDTRACEIF (
    554       1.38   mycroft 						sprintf (ndtracep, "ff:%d tcm:%d tcl:%d ",
    555       1.37  christos 							 NCR_READ_REG(sc, NCR_FFLAG) & NCRFIFO_FF,
    556       1.37  christos 							 NCR_READ_REG((sc), NCR_TCM), NCR_READ_REG((sc), NCR_TCL));
    557       1.38   mycroft 						ndtracep += strlen (ndtracep);
    558       1.38   mycroft 						);
    559       1.37  christos 					s = spldma();
    560       1.38   mycroft 					nextdma_reset (nsc);
    561       1.37  christos 					splx(s);
    562       1.37  christos 					goto out;
    563       1.20       dbj 				}
    564       1.37  christos 				splx(s);
    565       1.20       dbj 
    566       1.23       dbj #ifdef DIAGNOSTIC
    567       1.37  christos 				if (flushcount > 4) {
    568       1.38   mycroft 					NDTRACEIF (*ndtracep++ = '+');
    569       1.37  christos 					printf("%s: unexpected flushcount %d on %s\n",sc->sc_dev.dv_xname,
    570       1.37  christos 					       flushcount, esc->sc_datain ? "read" : "write");
    571       1.37  christos 				}
    572       1.23       dbj #endif
    573       1.23       dbj 
    574       1.38   mycroft 				if (!nextdma_finished(nsc)) { /* esp_dma_isactive(sc)) { */
    575       1.38   mycroft 					NDTRACEIF (*ndtracep++ = '1');
    576       1.16       dbj 				}
    577       1.37  christos 				flushcount = 0;
    578       1.37  christos 				s = spldma();
    579       1.38   mycroft 				ndmap = stat->nd_map;
    580       1.38   mycroft 				ndidx = stat->nd_idx;
    581       1.37  christos 				splx(s);
    582       1.37  christos 
    583       1.16       dbj 			}
    584       1.46        cl 		out: ;
    585       1.20       dbj 
    586       1.22       dbj #ifdef ESP_DEBUG
    587       1.37  christos /* 			esp_dma_nest--; */
    588       1.22       dbj #endif
    589       1.22       dbj 
    590       1.13       dbj 		}
    591       1.13       dbj 
    592       1.37  christos 		doze (0x32);
    593       1.37  christos 		NCR_WRITE_REG(sc, ESP_DCTL, ESPDCTL_16MHZ | ESPDCTL_INTENB | (esc->sc_datain ? ESPDCTL_DMARD : 0));
    594       1.38   mycroft 		NDTRACEIF (*ndtracep++ = 'b');
    595       1.37  christos 
    596       1.37  christos 		while (esc->sc_datain != -1) DELAY(50);
    597       1.37  christos 
    598       1.37  christos 		if (esc->sc_dmaaddr) {
    599       1.37  christos 			bus_size_t xfer_len = 0;
    600       1.37  christos 			int resid;
    601       1.37  christos 
    602       1.37  christos 			NCR_WRITE_REG(sc, ESP_DCTL, ESPDCTL_16MHZ | ESPDCTL_INTENB);
    603       1.38   mycroft 			if (stat->nd_exception == 0) {
    604       1.37  christos 				resid = NCR_READ_REG((sc), NCR_TCL) + (NCR_READ_REG((sc), NCR_TCM) << 8);
    605       1.37  christos 				if (resid) {
    606       1.37  christos 					resid += (NCR_READ_REG(sc, NCR_FFLAG) & NCRFIFO_FF);
    607       1.38   mycroft #ifdef ESP_DEBUG
    608       1.37  christos 					if (NCR_READ_REG(sc, NCR_FFLAG) & NCRFIFO_FF)
    609       1.37  christos 						if ((NCR_READ_REG(sc, NCR_FFLAG) & NCRFIFO_FF) != 16 || NCR_READ_REG((sc), NCR_TCL) != 240)
    610       1.38   mycroft 							ndtraceshow++;
    611       1.38   mycroft #endif
    612       1.37  christos 				}
    613       1.37  christos 				xfer_len = esc->sc_dmasize - resid;
    614       1.37  christos 			} else {
    615       1.37  christos /*static*/ void	ncr53c9x_abort(struct ncr53c9x_softc *, struct ncr53c9x_ecb *);
    616       1.37  christos #define ncr53c9x_sched_msgout(m) \
    617       1.37  christos 	do {							\
    618       1.37  christos 		NCR_MISC(("ncr53c9x_sched_msgout %x %d", m, __LINE__));	\
    619       1.37  christos 		NCRCMD(sc, NCRCMD_SETATN);			\
    620       1.37  christos 		sc->sc_flags |= NCR_ATN;			\
    621       1.37  christos 		sc->sc_msgpriq |= (m);				\
    622       1.37  christos 	} while (0)
    623       1.37  christos 				int i;
    624       1.38   mycroft 				xfer_len = 0;
    625       1.38   mycroft 				if (esc->sc_begin)
    626       1.38   mycroft 					xfer_len += esc->sc_begin_size;
    627       1.38   mycroft 				if (esc->sc_main_dmamap)
    628       1.38   mycroft 					xfer_len += esc->sc_main_dmamap->dm_xfer_len;
    629       1.38   mycroft 				if (esc->sc_tail_dmamap)
    630       1.38   mycroft 					xfer_len += esc->sc_tail_dmamap->dm_xfer_len;
    631       1.37  christos 				resid = 0;
    632       1.37  christos 				printf ("X\n");
    633       1.37  christos 				for (i = 0; i < 16; i++) {
    634       1.37  christos 					NCR_WRITE_REG(sc, ESP_DCTL, ESPDCTL_FLUSH |
    635       1.37  christos 						      ESPDCTL_16MHZ | ESPDCTL_INTENB |
    636       1.37  christos 						      (esc->sc_datain ? ESPDCTL_DMARD : 0));
    637       1.37  christos 					NCR_WRITE_REG(sc, ESP_DCTL,
    638       1.37  christos 						      ESPDCTL_16MHZ | ESPDCTL_INTENB |
    639       1.37  christos 						      (esc->sc_datain ? ESPDCTL_DMARD : 0));
    640       1.37  christos 				}
    641       1.37  christos #if 0
    642       1.37  christos 				printf ("ff:%02x tcm:%d tcl:%d esp_dstat:%02x stat:%02x step: %02x intr:%02x new stat:%02X\n",
    643       1.37  christos 					NCR_READ_REG(sc, NCR_FFLAG),
    644       1.37  christos 					NCR_READ_REG((sc), NCR_TCM), NCR_READ_REG((sc), NCR_TCL),
    645       1.37  christos 					NCR_READ_REG(sc, ESP_DSTAT),
    646       1.37  christos 					sc->sc_espstat, sc->sc_espstep,
    647       1.37  christos 					sc->sc_espintr, NCR_READ_REG(sc, NCR_STAT));
    648       1.37  christos 				printf ("sc->sc_state: %x sc->sc_phase: %x sc->sc_espstep:%x sc->sc_prevphase:%x sc->sc_flags:%x\n",
    649       1.37  christos 					sc->sc_state, sc->sc_phase, sc->sc_espstep, sc->sc_prevphase, sc->sc_flags);
    650       1.37  christos #endif
    651       1.37  christos 				/* sc->sc_flags &= ~NCR_ICCS; */
    652       1.37  christos 				sc->sc_nexus->flags |= ECB_ABORT;
    653       1.37  christos 				if (sc->sc_phase == MESSAGE_IN_PHASE) {
    654       1.37  christos 					/* ncr53c9x_sched_msgout(SEND_ABORT); */
    655       1.37  christos 					ncr53c9x_abort(sc, sc->sc_nexus);
    656       1.37  christos 				} else if (sc->sc_phase != STATUS_PHASE) {
    657       1.37  christos 					printf ("ATTENTION!!!  not message/status phase: %d\n", sc->sc_phase);
    658       1.37  christos 				}
    659       1.37  christos 			}
    660       1.37  christos 
    661       1.38   mycroft 			NDTRACEIF (
    662       1.38   mycroft 				sprintf (ndtracep, "f%dm%dl%ds%dx%dr%dS", NCR_READ_REG(sc, NCR_FFLAG) & NCRFIFO_FF, NCR_READ_REG((sc), NCR_TCM),
    663       1.37  christos 					 NCR_READ_REG((sc), NCR_TCL), esc->sc_dmasize, (int)xfer_len, resid);
    664       1.38   mycroft 				ndtracep += strlen (ndtracep);
    665       1.38   mycroft 				);
    666       1.20       dbj 
    667       1.37  christos 			*(esc->sc_dmaaddr) += xfer_len;
    668       1.37  christos 			*(esc->sc_dmalen)  -= xfer_len;
    669       1.37  christos 			esc->sc_dmaaddr = 0;
    670       1.37  christos 			esc->sc_dmalen  = 0;
    671       1.37  christos 			esc->sc_dmasize = 0;
    672       1.13       dbj 		}
    673       1.37  christos 
    674       1.38   mycroft 		NDTRACEIF (*ndtracep++ = 'B');
    675       1.37  christos 		sc->sc_espstat = NCR_READ_REG(sc, NCR_STAT) | (sc->sc_espstat & NCRSTAT_INT);
    676       1.37  christos 
    677       1.22       dbj 		DPRINTF(("esp dctl is 0x%02x\n",NCR_READ_REG(sc,ESP_DCTL)));
    678       1.37  christos 		/* printf ("esp_dma_isintr DONE\n"); */
    679       1.13       dbj 
    680        1.4       dbj 	}
    681        1.4       dbj 
    682        1.4       dbj 	return (r);
    683        1.1       dbj }
    684        1.1       dbj 
    685        1.1       dbj void
    686       1.49       chs esp_dma_reset(struct ncr53c9x_softc *sc)
    687        1.1       dbj {
    688        1.1       dbj 	struct esp_softc *esc = (struct esp_softc *)sc;
    689        1.3       dbj 
    690       1.44       wiz 	DPRINTF(("esp DMA reset\n"));
    691       1.13       dbj 
    692       1.13       dbj #ifdef ESP_DEBUG
    693       1.13       dbj 	if (esp_debug) {
    694       1.28        tv 		char sbuf[256];
    695       1.28        tv 
    696       1.28        tv 		bitmask_snprintf((*(volatile u_long *)IIOV(NEXT_P_INTRSTAT)),
    697       1.28        tv 				 NEXT_INTR_BITS, sbuf, sizeof(sbuf));
    698       1.28        tv 		printf("  *intrstat = 0x%s\n", sbuf);
    699       1.28        tv 
    700       1.28        tv 		bitmask_snprintf((*(volatile u_long *)IIOV(NEXT_P_INTRMASK)),
    701       1.28        tv 				 NEXT_INTR_BITS, sbuf, sizeof(sbuf));
    702       1.28        tv 		printf("  *intrmask = 0x%s\n", sbuf);
    703       1.13       dbj 	}
    704       1.13       dbj #endif
    705       1.13       dbj 
    706       1.38   mycroft #if 0
    707       1.13       dbj 	/* Clear the DMAMOD bit in the DCTL register: */
    708       1.18       dbj 	NCR_WRITE_REG(sc, ESP_DCTL,
    709       1.37  christos 			ESPDCTL_16MHZ | ESPDCTL_INTENB);
    710       1.22       dbj 	DPRINTF(("esp dctl is 0x%02x\n",NCR_READ_REG(sc,ESP_DCTL)));
    711       1.38   mycroft #endif
    712       1.13       dbj 
    713       1.38   mycroft 	nextdma_reset(esc->sc_dma);
    714       1.38   mycroft 	nextdma_init(esc->sc_dma);
    715        1.4       dbj 
    716       1.18       dbj 	esc->sc_datain = -1;
    717       1.18       dbj 	esc->sc_dmaaddr = 0;
    718       1.18       dbj 	esc->sc_dmalen  = 0;
    719       1.20       dbj 	esc->sc_dmasize = 0;
    720       1.18       dbj 
    721       1.18       dbj 	esc->sc_loaded = 0;
    722       1.18       dbj 
    723       1.18       dbj 	esc->sc_begin = 0;
    724       1.18       dbj 	esc->sc_begin_size = 0;
    725       1.13       dbj 
    726       1.18       dbj 	if (esc->sc_main_dmamap->dm_mapsize) {
    727       1.38   mycroft 		bus_dmamap_unload(esc->sc_dma->sc_dmat, esc->sc_main_dmamap);
    728       1.13       dbj 	}
    729       1.18       dbj 	esc->sc_main = 0;
    730       1.18       dbj 	esc->sc_main_size = 0;
    731       1.13       dbj 
    732       1.18       dbj 	if (esc->sc_tail_dmamap->dm_mapsize) {
    733       1.38   mycroft 		bus_dmamap_unload(esc->sc_dma->sc_dmat, esc->sc_tail_dmamap);
    734       1.18       dbj 	}
    735       1.18       dbj 	esc->sc_tail = 0;
    736       1.18       dbj 	esc->sc_tail_size = 0;
    737        1.1       dbj }
    738        1.1       dbj 
    739       1.19       dbj /* it appears that:
    740       1.19       dbj  * addr and len arguments to this need to be kept up to date
    741       1.19       dbj  * with the status of the transfter.
    742       1.19       dbj  * the dmasize of this is the actual length of the transfer
    743       1.19       dbj  * request, which is guaranteed to be less than maxxfer.
    744       1.19       dbj  * (len may be > maxxfer)
    745       1.19       dbj  */
    746       1.19       dbj 
    747        1.1       dbj int
    748       1.49       chs esp_dma_setup(struct ncr53c9x_softc *sc, caddr_t *addr, size_t *len, int datain,
    749       1.49       chs     size_t *dmasize)
    750        1.1       dbj {
    751        1.1       dbj 	struct esp_softc *esc = (struct esp_softc *)sc;
    752        1.2       dbj 
    753       1.38   mycroft 	NDTRACEIF (*ndtracep++ = 'h');
    754       1.11       dbj #ifdef DIAGNOSTIC
    755       1.20       dbj #ifdef ESP_DEBUG
    756       1.11       dbj 	/* if this is a read DMA, pre-fill the buffer with 0xdeadbeef
    757       1.11       dbj 	 * to identify bogus reads
    758       1.11       dbj 	 */
    759       1.11       dbj 	if (datain) {
    760       1.14       dbj 		int *v = (int *)(*addr);
    761       1.11       dbj 		int i;
    762       1.14       dbj 		for(i=0;i<((*len)/4);i++) v[i] = 0xdeadbeef;
    763       1.18       dbj 		v = (int *)(&(esc->sc_tailbuf[0]));
    764       1.37  christos 		for(i=0;i<((sizeof(esc->sc_tailbuf)/4));i++) v[i] = 0xdeafbeef;
    765       1.23       dbj 	} else {
    766       1.23       dbj 		int *v;
    767       1.23       dbj 		int i;
    768       1.23       dbj 		v = (int *)(&(esc->sc_tailbuf[0]));
    769       1.23       dbj 		for(i=0;i<((sizeof(esc->sc_tailbuf)/4));i++) v[i] = 0xfeeb1eed;
    770       1.11       dbj 	}
    771       1.20       dbj #endif
    772       1.11       dbj #endif
    773       1.11       dbj 
    774       1.35       chs 	DPRINTF(("esp_dma_setup(%p,0x%08x,0x%08x)\n",*addr,*len,*dmasize));
    775       1.11       dbj 
    776       1.24       dbj #if 0
    777       1.12       dbj #ifdef DIAGNOSTIC /* @@@ this is ok sometimes. verify that we handle it ok
    778       1.37  christos 		   * and then remove this check
    779       1.37  christos 		   */
    780       1.14       dbj 	if (*len != *dmasize) {
    781       1.23       dbj 		panic("esp dmalen 0x%lx != size 0x%lx",*len,*dmasize);
    782       1.11       dbj 	}
    783       1.11       dbj #endif
    784       1.24       dbj #endif
    785        1.4       dbj 
    786        1.2       dbj #ifdef DIAGNOSTIC
    787        1.3       dbj 	if ((esc->sc_datain != -1) ||
    788       1.18       dbj 			(esc->sc_main_dmamap->dm_mapsize != 0) ||
    789       1.20       dbj 			(esc->sc_tail_dmamap->dm_mapsize != 0) ||
    790       1.20       dbj 			(esc->sc_dmasize != 0)) {
    791       1.40    provos 		panic("%s: map already loaded in esp_dma_setup"
    792       1.35       chs 				"\tdatain = %d\n\tmain_mapsize=%ld\n\tail_mapsize=%ld\n\tdmasize = %d",
    793       1.18       dbj 				sc->sc_dev.dv_xname, esc->sc_datain,
    794       1.20       dbj 				esc->sc_main_dmamap->dm_mapsize,
    795       1.20       dbj 				esc->sc_tail_dmamap->dm_mapsize,
    796       1.20       dbj 				esc->sc_dmasize);
    797        1.2       dbj 	}
    798        1.2       dbj #endif
    799        1.2       dbj 
    800       1.44       wiz 	/* we are sometimes asked to DMA zero  bytes, that's easy */
    801       1.24       dbj 	if (*dmasize <= 0) {
    802       1.20       dbj 		return(0);
    803       1.20       dbj 	}
    804       1.20       dbj 
    805       1.37  christos 	if (*dmasize > ESP_MAX_DMASIZE)
    806       1.37  christos 		*dmasize = ESP_MAX_DMASIZE;
    807       1.37  christos 
    808       1.14       dbj 	/* Save these in case we have to abort DMA */
    809       1.14       dbj 	esc->sc_datain   = datain;
    810       1.14       dbj 	esc->sc_dmaaddr  = addr;
    811       1.14       dbj 	esc->sc_dmalen   = len;
    812       1.14       dbj 	esc->sc_dmasize  = *dmasize;
    813       1.14       dbj 
    814       1.18       dbj 	esc->sc_loaded = 0;
    815       1.18       dbj 
    816       1.23       dbj #define DMA_SCSI_ALIGNMENT 16
    817       1.23       dbj #define DMA_SCSI_ALIGN(type, addr)	\
    818       1.23       dbj 	((type)(((unsigned)(addr)+DMA_SCSI_ALIGNMENT-1) \
    819       1.23       dbj 		&~(DMA_SCSI_ALIGNMENT-1)))
    820       1.23       dbj #define DMA_SCSI_ALIGNED(addr) \
    821       1.23       dbj 	(((unsigned)(addr)&(DMA_SCSI_ALIGNMENT-1))==0)
    822       1.23       dbj 
    823        1.2       dbj 	{
    824       1.18       dbj 		size_t slop_bgn_size; /* # bytes to be fifo'd at beginning */
    825       1.18       dbj 		size_t slop_end_size; /* # bytes to be transferred in tail buffer */
    826       1.18       dbj 
    827        1.3       dbj 		{
    828       1.13       dbj 			u_long bgn = (u_long)(*esc->sc_dmaaddr);
    829       1.13       dbj 			u_long end = (u_long)(*esc->sc_dmaaddr+esc->sc_dmasize);
    830        1.3       dbj 
    831       1.23       dbj 			slop_bgn_size = DMA_SCSI_ALIGNMENT-(bgn % DMA_SCSI_ALIGNMENT);
    832       1.23       dbj 			if (slop_bgn_size == DMA_SCSI_ALIGNMENT) slop_bgn_size = 0;
    833       1.19       dbj 			slop_end_size = (end % DMA_ENDALIGNMENT);
    834        1.3       dbj 		}
    835        1.3       dbj 
    836       1.23       dbj 		/* Force a minimum slop end size. This ensures that write
    837       1.23       dbj 		 * requests will overrun, as required to get completion interrupts.
    838       1.23       dbj 		 * In addition, since the tail buffer is guaranteed to be mapped
    839       1.44       wiz 		 * in a single DMA segment, the overrun won't accidentally
    840       1.23       dbj 		 * end up in its own segment.
    841       1.23       dbj 		 */
    842       1.23       dbj 		if (!esc->sc_datain) {
    843       1.24       dbj #if 0
    844       1.23       dbj 			slop_end_size += ESP_DMA_MAXTAIL;
    845       1.24       dbj #else
    846       1.24       dbj 			slop_end_size += 0x10;
    847       1.24       dbj #endif
    848       1.23       dbj 		}
    849       1.23       dbj 
    850       1.10       dbj 		/* Check to make sure we haven't counted extra slop
    851       1.44       wiz 		 * as would happen for a very short DMA buffer, also
    852       1.14       dbj 		 * for short buffers, just stuff the entire thing in the tail
    853       1.14       dbj 		 */
    854       1.18       dbj 		if ((slop_bgn_size+slop_end_size >= esc->sc_dmasize)
    855       1.20       dbj #if 0
    856       1.18       dbj 				|| (esc->sc_dmasize <= ESP_DMA_MAXTAIL)
    857       1.18       dbj #endif
    858       1.18       dbj 				)
    859       1.18       dbj 		{
    860       1.14       dbj  			slop_bgn_size = 0;
    861       1.14       dbj 			slop_end_size = esc->sc_dmasize;
    862       1.18       dbj 		}
    863       1.14       dbj 
    864       1.18       dbj 		/* initialize the fifo buffer */
    865       1.18       dbj 		if (slop_bgn_size) {
    866       1.18       dbj 			esc->sc_begin = *esc->sc_dmaaddr;
    867       1.18       dbj 			esc->sc_begin_size = slop_bgn_size;
    868       1.18       dbj 		} else {
    869       1.18       dbj 			esc->sc_begin = 0;
    870       1.18       dbj 			esc->sc_begin_size = 0;
    871       1.18       dbj 		}
    872       1.18       dbj 
    873       1.37  christos #if 01
    874       1.18       dbj 		/* Load the normal DMA map */
    875       1.18       dbj 		{
    876       1.18       dbj 			esc->sc_main      = *esc->sc_dmaaddr+slop_bgn_size;
    877       1.18       dbj 			esc->sc_main_size = (esc->sc_dmasize)-(slop_end_size+slop_bgn_size);
    878       1.18       dbj 
    879       1.18       dbj 			if (esc->sc_main_size) {
    880       1.18       dbj 				int error;
    881       1.37  christos 
    882       1.37  christos 				if (!esc->sc_datain || DMA_ENDALIGNED(esc->sc_main_size + slop_end_size)) {
    883       1.37  christos 					KASSERT(DMA_SCSI_ALIGNMENT == DMA_ENDALIGNMENT);
    884       1.37  christos 					KASSERT(DMA_BEGINALIGNMENT == DMA_ENDALIGNMENT);
    885       1.37  christos 					esc->sc_main_size += slop_end_size;
    886       1.37  christos 					slop_end_size = 0;
    887       1.37  christos 					if (!esc->sc_datain) {
    888       1.37  christos 						esc->sc_main_size = DMA_ENDALIGN(caddr_t,esc->sc_main+esc->sc_main_size)-esc->sc_main;
    889       1.37  christos 					}
    890       1.37  christos 				}
    891       1.37  christos 
    892       1.38   mycroft 				error = bus_dmamap_load(esc->sc_dma->sc_dmat,
    893       1.18       dbj 						esc->sc_main_dmamap,
    894       1.18       dbj 						esc->sc_main, esc->sc_main_size,
    895       1.18       dbj 						NULL, BUS_DMA_NOWAIT);
    896       1.18       dbj 				if (error) {
    897       1.34       dbj #ifdef ESP_DEBUG
    898       1.35       chs 					printf("%s: esc->sc_main_dmamap->_dm_size = %ld\n",
    899       1.34       dbj 							sc->sc_dev.dv_xname,esc->sc_main_dmamap->_dm_size);
    900       1.34       dbj 					printf("%s: esc->sc_main_dmamap->_dm_segcnt = %d\n",
    901       1.34       dbj 							sc->sc_dev.dv_xname,esc->sc_main_dmamap->_dm_segcnt);
    902       1.35       chs 					printf("%s: esc->sc_main_dmamap->_dm_maxsegsz = %ld\n",
    903       1.34       dbj 							sc->sc_dev.dv_xname,esc->sc_main_dmamap->_dm_maxsegsz);
    904       1.35       chs 					printf("%s: esc->sc_main_dmamap->_dm_boundary = %ld\n",
    905       1.34       dbj 							sc->sc_dev.dv_xname,esc->sc_main_dmamap->_dm_boundary);
    906       1.34       dbj 					esp_dma_print(sc);
    907       1.34       dbj #endif
    908       1.44       wiz 					panic("%s: can't load main DMA map. error = %d, addr=%p, size=0x%08x",
    909       1.18       dbj 							sc->sc_dev.dv_xname, error,esc->sc_main,esc->sc_main_size);
    910       1.18       dbj 				}
    911       1.44       wiz 				if (!esc->sc_datain) { /* patch the DMA map for write overrun */
    912       1.37  christos 					esc->sc_main_dmamap->dm_mapsize += ESP_DMA_OVERRUN;
    913       1.37  christos 					esc->sc_main_dmamap->dm_segs[esc->sc_main_dmamap->dm_nsegs - 1].ds_len +=
    914       1.37  christos 						ESP_DMA_OVERRUN;
    915       1.37  christos 				}
    916       1.23       dbj #if 0
    917       1.38   mycroft 				bus_dmamap_sync(esc->sc_dma->sc_dmat, esc->sc_main_dmamap,
    918       1.19       dbj 						0, esc->sc_main_dmamap->dm_mapsize,
    919       1.19       dbj 						(esc->sc_datain ? BUS_DMASYNC_PREREAD : BUS_DMASYNC_PREWRITE));
    920       1.34       dbj 				esc->sc_main_dmamap->dm_xfer_len = 0;
    921       1.23       dbj #endif
    922       1.18       dbj 			} else {
    923       1.18       dbj 				esc->sc_main = 0;
    924       1.18       dbj 			}
    925       1.14       dbj 		}
    926        1.3       dbj 
    927       1.18       dbj 		/* Load the tail DMA map */
    928       1.18       dbj 		if (slop_end_size) {
    929       1.18       dbj 			esc->sc_tail      = DMA_ENDALIGN(caddr_t,esc->sc_tailbuf+slop_end_size)-slop_end_size;
    930       1.18       dbj 			/* If the beginning of the tail is not correctly aligned,
    931       1.18       dbj 			 * we have no choice but to align the start, which might then unalign the end.
    932       1.18       dbj 			 */
    933       1.23       dbj 			esc->sc_tail      = DMA_SCSI_ALIGN(caddr_t,esc->sc_tail);
    934       1.18       dbj 			/* So therefore, we change the tail size to be end aligned again. */
    935       1.18       dbj 			esc->sc_tail_size = DMA_ENDALIGN(caddr_t,esc->sc_tail+slop_end_size)-esc->sc_tail;
    936       1.19       dbj 
    937       1.44       wiz 			/* @@@ next DMA overrun lossage */
    938       1.20       dbj 			if (!esc->sc_datain) {
    939       1.21       dbj 				esc->sc_tail_size += ESP_DMA_OVERRUN;
    940       1.20       dbj 			}
    941       1.20       dbj 
    942       1.18       dbj 			{
    943       1.18       dbj 				int error;
    944       1.38   mycroft 				error = bus_dmamap_load(esc->sc_dma->sc_dmat,
    945       1.18       dbj 						esc->sc_tail_dmamap,
    946       1.18       dbj 						esc->sc_tail, esc->sc_tail_size,
    947       1.18       dbj 						NULL, BUS_DMA_NOWAIT);
    948       1.18       dbj 				if (error) {
    949       1.44       wiz 					panic("%s: can't load tail DMA map. error = %d, addr=%p, size=0x%08x",
    950       1.18       dbj 							sc->sc_dev.dv_xname, error,esc->sc_tail,esc->sc_tail_size);
    951       1.18       dbj 				}
    952       1.23       dbj #if 0
    953       1.38   mycroft 				bus_dmamap_sync(esc->sc_dma->sc_dmat, esc->sc_tail_dmamap,
    954       1.19       dbj 						0, esc->sc_tail_dmamap->dm_mapsize,
    955       1.19       dbj 						(esc->sc_datain ? BUS_DMASYNC_PREREAD : BUS_DMASYNC_PREWRITE));
    956       1.34       dbj 				esc->sc_tail_dmamap->dm_xfer_len = 0;
    957       1.23       dbj #endif
    958        1.3       dbj 			}
    959        1.3       dbj 		}
    960       1.37  christos #else
    961       1.37  christos 
    962       1.37  christos 		esc->sc_begin = *esc->sc_dmaaddr;
    963       1.37  christos 		slop_bgn_size = DMA_SCSI_ALIGNMENT-((ulong)esc->sc_begin % DMA_SCSI_ALIGNMENT);
    964       1.37  christos 		if (slop_bgn_size == DMA_SCSI_ALIGNMENT) slop_bgn_size = 0;
    965       1.37  christos 		slop_end_size = esc->sc_dmasize - slop_bgn_size;
    966       1.37  christos 
    967       1.37  christos 		if (slop_bgn_size < esc->sc_dmasize) {
    968       1.37  christos 			int error;
    969       1.37  christos 
    970       1.37  christos 			esc->sc_tail = 0;
    971       1.37  christos 			esc->sc_tail_size = 0;
    972       1.37  christos 
    973       1.37  christos 			esc->sc_begin_size = slop_bgn_size;
    974       1.37  christos 			esc->sc_main = *esc->sc_dmaaddr+slop_bgn_size;
    975       1.37  christos 			esc->sc_main_size = DMA_ENDALIGN(caddr_t,esc->sc_main+esc->sc_dmasize-slop_bgn_size)-esc->sc_main;
    976       1.37  christos 
    977       1.37  christos 			if (!esc->sc_datain) {
    978       1.37  christos 				esc->sc_main_size += ESP_DMA_OVERRUN;
    979       1.37  christos 			}
    980       1.38   mycroft 			error = bus_dmamap_load(esc->sc_dma->sc_dmat,
    981       1.37  christos 						esc->sc_main_dmamap,
    982       1.37  christos 						esc->sc_main, esc->sc_main_size,
    983       1.37  christos 						NULL, BUS_DMA_NOWAIT);
    984       1.37  christos 			if (error) {
    985       1.44       wiz 				panic("%s: can't load main DMA map. error = %d, addr=%p, size=0x%08x",
    986       1.37  christos 				      sc->sc_dev.dv_xname, error,esc->sc_main,esc->sc_main_size);
    987       1.37  christos 			}
    988       1.37  christos 		} else {
    989       1.37  christos 			esc->sc_begin = 0;
    990       1.37  christos 			esc->sc_begin_size = 0;
    991       1.37  christos 			esc->sc_main = 0;
    992       1.37  christos 			esc->sc_main_size = 0;
    993       1.37  christos 
    994       1.37  christos #if 0
    995       1.37  christos 			esc->sc_tail      = DMA_ENDALIGN(caddr_t,esc->sc_tailbuf+slop_bgn_size)-slop_bgn_size;
    996       1.37  christos 			/* If the beginning of the tail is not correctly aligned,
    997       1.37  christos 			 * we have no choice but to align the start, which might then unalign the end.
    998       1.37  christos 			 */
    999       1.37  christos #endif
   1000       1.37  christos 			esc->sc_tail      = DMA_SCSI_ALIGN(caddr_t,esc->sc_tailbuf);
   1001       1.37  christos 			/* So therefore, we change the tail size to be end aligned again. */
   1002       1.37  christos 			esc->sc_tail_size = DMA_ENDALIGN(caddr_t,esc->sc_tail+esc->sc_dmasize)-esc->sc_tail;
   1003       1.37  christos 
   1004       1.44       wiz 			/* @@@ next DMA overrun lossage */
   1005       1.37  christos 			if (!esc->sc_datain) {
   1006       1.37  christos 				esc->sc_tail_size += ESP_DMA_OVERRUN;
   1007       1.37  christos 			}
   1008       1.37  christos 
   1009       1.37  christos 			{
   1010       1.37  christos 				int error;
   1011       1.38   mycroft 				error = bus_dmamap_load(esc->sc_dma->sc_dmat,
   1012       1.37  christos 						esc->sc_tail_dmamap,
   1013       1.37  christos 						esc->sc_tail, esc->sc_tail_size,
   1014       1.37  christos 						NULL, BUS_DMA_NOWAIT);
   1015       1.37  christos 				if (error) {
   1016       1.44       wiz 					panic("%s: can't load tail DMA map. error = %d, addr=%p, size=0x%08x",
   1017       1.37  christos 							sc->sc_dev.dv_xname, error,esc->sc_tail,esc->sc_tail_size);
   1018       1.37  christos 				}
   1019       1.37  christos 			}
   1020       1.37  christos 		}
   1021       1.37  christos #endif
   1022       1.37  christos 
   1023       1.37  christos 		DPRINTF(("%s: setup: %8p %d %8p %d %8p %d %8p %d\n", sc->sc_dev.dv_xname,
   1024       1.37  christos 			 *esc->sc_dmaaddr, esc->sc_dmasize, esc->sc_begin,
   1025       1.37  christos 			 esc->sc_begin_size, esc->sc_main, esc->sc_main_size, esc->sc_tail,
   1026       1.37  christos 			 esc->sc_tail_size));
   1027        1.2       dbj 	}
   1028        1.2       dbj 
   1029        1.1       dbj 	return (0);
   1030        1.1       dbj }
   1031        1.1       dbj 
   1032       1.20       dbj #ifdef ESP_DEBUG
   1033       1.20       dbj /* For debugging */
   1034        1.1       dbj void
   1035       1.49       chs esp_dma_store(struct ncr53c9x_softc *sc)
   1036        1.1       dbj {
   1037        1.1       dbj 	struct esp_softc *esc = (struct esp_softc *)sc;
   1038       1.20       dbj 	char *p = &esp_dma_dump[0];
   1039       1.20       dbj 
   1040       1.20       dbj 	p += sprintf(p,"%s: sc_datain=%d\n",sc->sc_dev.dv_xname,esc->sc_datain);
   1041       1.20       dbj 	p += sprintf(p,"%s: sc_loaded=0x%08x\n",sc->sc_dev.dv_xname,esc->sc_loaded);
   1042        1.3       dbj 
   1043       1.20       dbj 	if (esc->sc_dmaaddr) {
   1044       1.35       chs 		p += sprintf(p,"%s: sc_dmaaddr=%p\n",sc->sc_dev.dv_xname,*esc->sc_dmaaddr);
   1045       1.20       dbj 	} else {
   1046       1.20       dbj 		p += sprintf(p,"%s: sc_dmaaddr=NULL\n",sc->sc_dev.dv_xname);
   1047       1.20       dbj 	}
   1048       1.20       dbj 	if (esc->sc_dmalen) {
   1049       1.35       chs 		p += sprintf(p,"%s: sc_dmalen=0x%08x\n",sc->sc_dev.dv_xname,*esc->sc_dmalen);
   1050       1.20       dbj 	} else {
   1051       1.20       dbj 		p += sprintf(p,"%s: sc_dmalen=NULL\n",sc->sc_dev.dv_xname);
   1052       1.20       dbj 	}
   1053       1.20       dbj 	p += sprintf(p,"%s: sc_dmasize=0x%08x\n",sc->sc_dev.dv_xname,esc->sc_dmasize);
   1054       1.19       dbj 
   1055       1.35       chs 	p += sprintf(p,"%s: sc_begin = %p, sc_begin_size = 0x%08x\n",
   1056       1.20       dbj 			sc->sc_dev.dv_xname, esc->sc_begin, esc->sc_begin_size);
   1057       1.35       chs 	p += sprintf(p,"%s: sc_main = %p, sc_main_size = 0x%08x\n",
   1058       1.20       dbj 			sc->sc_dev.dv_xname, esc->sc_main, esc->sc_main_size);
   1059       1.37  christos 	/* if (esc->sc_main) */ {
   1060       1.19       dbj 		int i;
   1061       1.19       dbj 		bus_dmamap_t map = esc->sc_main_dmamap;
   1062       1.35       chs 		p += sprintf(p,"%s: sc_main_dmamap. mapsize = 0x%08lx, nsegs = %d\n",
   1063       1.20       dbj 				sc->sc_dev.dv_xname, map->dm_mapsize, map->dm_nsegs);
   1064       1.19       dbj 		for(i=0;i<map->dm_nsegs;i++) {
   1065       1.35       chs 			p += sprintf(p,"%s: map->dm_segs[%d].ds_addr = 0x%08lx, len = 0x%08lx\n",
   1066       1.20       dbj 			sc->sc_dev.dv_xname, i, map->dm_segs[i].ds_addr, map->dm_segs[i].ds_len);
   1067       1.19       dbj 		}
   1068       1.19       dbj 	}
   1069       1.35       chs 	p += sprintf(p,"%s: sc_tail = %p, sc_tail_size = 0x%08x\n",
   1070       1.20       dbj 			sc->sc_dev.dv_xname, esc->sc_tail, esc->sc_tail_size);
   1071       1.37  christos 	/* if (esc->sc_tail) */ {
   1072       1.19       dbj 		int i;
   1073       1.19       dbj 		bus_dmamap_t map = esc->sc_tail_dmamap;
   1074       1.35       chs 		p += sprintf(p,"%s: sc_tail_dmamap. mapsize = 0x%08lx, nsegs = %d\n",
   1075       1.20       dbj 				sc->sc_dev.dv_xname, map->dm_mapsize, map->dm_nsegs);
   1076       1.19       dbj 		for(i=0;i<map->dm_nsegs;i++) {
   1077       1.35       chs 			p += sprintf(p,"%s: map->dm_segs[%d].ds_addr = 0x%08lx, len = 0x%08lx\n",
   1078       1.20       dbj 			sc->sc_dev.dv_xname, i, map->dm_segs[i].ds_addr, map->dm_segs[i].ds_len);
   1079       1.19       dbj 		}
   1080       1.19       dbj 	}
   1081       1.20       dbj }
   1082       1.20       dbj 
   1083       1.20       dbj void
   1084       1.49       chs esp_dma_print(struct ncr53c9x_softc *sc)
   1085       1.20       dbj {
   1086       1.20       dbj 	esp_dma_store(sc);
   1087       1.20       dbj 	printf("%s",esp_dma_dump);
   1088       1.20       dbj }
   1089       1.20       dbj #endif
   1090       1.20       dbj 
   1091       1.20       dbj void
   1092       1.49       chs esp_dma_go(struct ncr53c9x_softc *sc)
   1093       1.20       dbj {
   1094       1.20       dbj 	struct esp_softc *esc = (struct esp_softc *)sc;
   1095       1.38   mycroft 	struct nextdma_softc *nsc = esc->sc_dma;
   1096       1.38   mycroft 	struct nextdma_status *stat = &nsc->sc_stat;
   1097       1.37  christos /* 	int s = spldma(); */
   1098       1.37  christos 
   1099       1.38   mycroft #ifdef ESP_DEBUG
   1100       1.38   mycroft 	if (ndtracep != ndtrace) {
   1101       1.38   mycroft 		if (ndtraceshow) {
   1102       1.38   mycroft 			*ndtracep = '\0';
   1103       1.38   mycroft 			printf ("esp ndtrace: %s\n", ndtrace);
   1104       1.38   mycroft 			ndtraceshow = 0;
   1105       1.37  christos 		} else {
   1106       1.37  christos 			DPRINTF (("X"));
   1107       1.37  christos 		}
   1108       1.38   mycroft 		ndtracep = ndtrace;
   1109       1.37  christos 	}
   1110       1.38   mycroft #endif
   1111       1.20       dbj 
   1112       1.20       dbj 	DPRINTF(("%s: esp_dma_go(datain = %d)\n",
   1113       1.20       dbj 			sc->sc_dev.dv_xname, esc->sc_datain));
   1114       1.20       dbj 
   1115       1.20       dbj #ifdef ESP_DEBUG
   1116       1.20       dbj 	if (esp_debug) esp_dma_print(sc);
   1117       1.20       dbj 	else esp_dma_store(sc);
   1118       1.19       dbj #endif
   1119        1.4       dbj 
   1120       1.20       dbj #ifdef ESP_DEBUG
   1121       1.11       dbj 	{
   1122       1.11       dbj 		int n = NCR_READ_REG(sc, NCR_FFLAG);
   1123       1.20       dbj 		DPRINTF(("%s: fifo size = %d, seq = 0x%x\n",
   1124       1.20       dbj 				sc->sc_dev.dv_xname,
   1125       1.20       dbj 				n & NCRFIFO_FF, (n & NCRFIFO_SS)>>5));
   1126        1.4       dbj 	}
   1127       1.11       dbj #endif
   1128        1.4       dbj 
   1129       1.44       wiz 	/* zero length DMA transfers are boring */
   1130       1.20       dbj 	if (esc->sc_dmasize == 0) {
   1131       1.37  christos /* 		splx(s); */
   1132       1.20       dbj 		return;
   1133       1.20       dbj 	}
   1134       1.20       dbj 
   1135       1.18       dbj #if defined(DIAGNOSTIC)
   1136       1.18       dbj   if ((esc->sc_begin_size == 0) &&
   1137       1.18       dbj 			(esc->sc_main_dmamap->dm_mapsize == 0) &&
   1138       1.18       dbj 			(esc->sc_tail_dmamap->dm_mapsize == 0)) {
   1139       1.38   mycroft #ifdef ESP_DEBUG
   1140       1.20       dbj 		esp_dma_print(sc);
   1141       1.38   mycroft #endif
   1142       1.18       dbj 		panic("%s: No DMA requested!",sc->sc_dev.dv_xname);
   1143       1.18       dbj 	}
   1144       1.18       dbj #endif
   1145       1.18       dbj 
   1146       1.18       dbj 	/* Stuff the fifo with the begin buffer */
   1147       1.18       dbj 	if (esc->sc_datain) {
   1148        1.4       dbj 		int i;
   1149       1.23       dbj 		DPRINTF(("%s: FIFO read of %d bytes:",
   1150       1.23       dbj 				sc->sc_dev.dv_xname,esc->sc_begin_size));
   1151       1.18       dbj 		for(i=0;i<esc->sc_begin_size;i++) {
   1152       1.24       dbj 			esc->sc_begin[i]=NCR_READ_REG(sc, NCR_FIFO);
   1153       1.24       dbj 			DPRINTF((" %02x",esc->sc_begin[i]&0xff));
   1154        1.4       dbj 		}
   1155       1.23       dbj 		DPRINTF(("\n"));
   1156        1.4       dbj 	} else {
   1157        1.4       dbj 		int i;
   1158       1.23       dbj 		DPRINTF(("%s: FIFO write of %d bytes:",
   1159       1.23       dbj 				sc->sc_dev.dv_xname,esc->sc_begin_size));
   1160       1.18       dbj 		for(i=0;i<esc->sc_begin_size;i++) {
   1161       1.18       dbj 			NCR_WRITE_REG(sc, NCR_FIFO, esc->sc_begin[i]);
   1162       1.24       dbj 			DPRINTF((" %02x",esc->sc_begin[i]&0xff));
   1163        1.4       dbj 		}
   1164       1.23       dbj 		DPRINTF(("\n"));
   1165       1.11       dbj 	}
   1166        1.4       dbj 
   1167       1.23       dbj 	if (esc->sc_main_dmamap->dm_mapsize) {
   1168       1.38   mycroft 		bus_dmamap_sync(esc->sc_dma->sc_dmat, esc->sc_main_dmamap,
   1169       1.23       dbj 				0, esc->sc_main_dmamap->dm_mapsize,
   1170       1.23       dbj 				(esc->sc_datain ? BUS_DMASYNC_PREREAD : BUS_DMASYNC_PREWRITE));
   1171       1.34       dbj 		esc->sc_main_dmamap->dm_xfer_len = 0;
   1172       1.23       dbj 	}
   1173       1.23       dbj 
   1174       1.23       dbj 	if (esc->sc_tail_dmamap->dm_mapsize) {
   1175       1.44       wiz 		/* if we are a DMA write cycle, copy the end slop */
   1176       1.37  christos 		if (!esc->sc_datain) {
   1177       1.37  christos 			memcpy(esc->sc_tail, *esc->sc_dmaaddr+esc->sc_begin_size+esc->sc_main_size,
   1178       1.37  christos 			       esc->sc_dmasize-(esc->sc_begin_size+esc->sc_main_size));
   1179       1.37  christos 		}
   1180       1.38   mycroft 		bus_dmamap_sync(esc->sc_dma->sc_dmat, esc->sc_tail_dmamap,
   1181       1.23       dbj 				0, esc->sc_tail_dmamap->dm_mapsize,
   1182       1.23       dbj 				(esc->sc_datain ? BUS_DMASYNC_PREREAD : BUS_DMASYNC_PREWRITE));
   1183       1.34       dbj 		esc->sc_tail_dmamap->dm_xfer_len = 0;
   1184       1.23       dbj 	}
   1185       1.23       dbj 
   1186       1.38   mycroft 	stat->nd_exception = 0;
   1187       1.38   mycroft 	nextdma_start(nsc, (esc->sc_datain ? DMACSR_SETREAD : DMACSR_SETWRITE));
   1188       1.12       dbj 
   1189       1.14       dbj 	if (esc->sc_datain) {
   1190       1.14       dbj 		NCR_WRITE_REG(sc, ESP_DCTL,
   1191       1.37  christos 				ESPDCTL_16MHZ | ESPDCTL_INTENB | ESPDCTL_DMAMOD | ESPDCTL_DMARD);
   1192        1.3       dbj 	} else {
   1193       1.14       dbj 		NCR_WRITE_REG(sc, ESP_DCTL,
   1194       1.37  christos 				ESPDCTL_16MHZ | ESPDCTL_INTENB | ESPDCTL_DMAMOD);
   1195        1.3       dbj 	}
   1196       1.22       dbj 	DPRINTF(("esp dctl is 0x%02x\n",NCR_READ_REG(sc,ESP_DCTL)));
   1197       1.37  christos 
   1198       1.38   mycroft 	NDTRACEIF (if (esc->sc_begin_size) { *ndtracep++ = '1'; *ndtracep++ = 'A' + esc->sc_begin_size; });
   1199       1.38   mycroft 	NDTRACEIF (if (esc->sc_main_size) { *ndtracep++ = '2'; *ndtracep++ = '0' + esc->sc_main_dmamap->dm_nsegs; });
   1200       1.38   mycroft 	NDTRACEIF (if (esc->sc_tail_size) { *ndtracep++ = '3'; *ndtracep++ = 'A' + esc->sc_tail_size; });
   1201       1.37  christos 
   1202       1.37  christos /* 	splx(s); */
   1203        1.1       dbj }
   1204        1.1       dbj 
   1205        1.1       dbj void
   1206       1.49       chs esp_dma_stop(struct ncr53c9x_softc *sc)
   1207        1.1       dbj {
   1208       1.34       dbj 	struct esp_softc *esc = (struct esp_softc *)sc;
   1209       1.38   mycroft 	nextdma_print(esc->sc_dma);
   1210       1.38   mycroft #ifdef ESP_DEBUG
   1211       1.34       dbj 	esp_dma_print(sc);
   1212       1.38   mycroft #endif
   1213       1.37  christos #if 1
   1214       1.40    provos 	panic("%s: stop not yet implemented",sc->sc_dev.dv_xname);
   1215       1.37  christos #endif
   1216        1.1       dbj }
   1217        1.1       dbj 
   1218        1.1       dbj int
   1219       1.49       chs esp_dma_isactive(struct ncr53c9x_softc *sc)
   1220        1.1       dbj {
   1221        1.1       dbj 	struct esp_softc *esc = (struct esp_softc *)sc;
   1222       1.38   mycroft 	int r = (esc->sc_dmaaddr != NULL);   /* !nextdma_finished(esc->sc_dma); */
   1223       1.11       dbj 	DPRINTF(("esp_dma_isactive = %d\n",r));
   1224       1.11       dbj 	return(r);
   1225        1.2       dbj }
   1226        1.2       dbj 
   1227        1.2       dbj /****************************************************************/
   1228        1.2       dbj 
   1229       1.49       chs int esp_dma_int(void *);
   1230       1.49       chs int esp_dma_int(void *arg)
   1231       1.37  christos {
   1232       1.49       chs 	void nextdma_rotate(struct nextdma_softc *);
   1233       1.49       chs 	void nextdma_setup_curr_regs(struct nextdma_softc *);
   1234       1.49       chs 	void nextdma_setup_cont_regs(struct nextdma_softc *);
   1235       1.37  christos 
   1236       1.37  christos 	struct ncr53c9x_softc *sc = (struct ncr53c9x_softc *)arg;
   1237       1.37  christos 	struct esp_softc *esc = (struct esp_softc *)sc;
   1238       1.38   mycroft 	struct nextdma_softc *nsc = esc->sc_dma;
   1239       1.38   mycroft 	struct nextdma_status *stat = &nsc->sc_stat;
   1240       1.37  christos 	unsigned int state;
   1241       1.37  christos 
   1242       1.38   mycroft 	NDTRACEIF (*ndtracep++ = 'E');
   1243       1.37  christos 
   1244       1.38   mycroft 	state = nd_bsr4 (DD_CSR);
   1245       1.37  christos 
   1246       1.37  christos #if 1
   1247       1.38   mycroft 	NDTRACEIF (
   1248       1.38   mycroft 		if (state & DMACSR_COMPLETE) *ndtracep++ = 'c';
   1249       1.38   mycroft 		if (state & DMACSR_ENABLE) *ndtracep++ = 'e';
   1250       1.38   mycroft 		if (state & DMACSR_BUSEXC) *ndtracep++ = 'b';
   1251       1.38   mycroft 		if (state & DMACSR_READ) *ndtracep++ = 'r';
   1252       1.38   mycroft 		if (state & DMACSR_SUPDATE) *ndtracep++ = 's';
   1253       1.38   mycroft 		);
   1254       1.37  christos 
   1255       1.38   mycroft 	NDTRACEIF (*ndtracep++ = 'E');
   1256       1.37  christos 
   1257       1.38   mycroft #ifdef ESP_DEBUG
   1258       1.38   mycroft 	if (0) if ((state & DMACSR_BUSEXC) && (state & DMACSR_ENABLE)) ndtraceshow++;
   1259       1.38   mycroft 	if (0) if ((state & DMACSR_SUPDATE)) ndtraceshow++;
   1260       1.38   mycroft #endif
   1261       1.37  christos #endif
   1262       1.37  christos 
   1263       1.38   mycroft 	if ((stat->nd_exception == 0) && (state & DMACSR_COMPLETE) && (state & DMACSR_ENABLE)) {
   1264       1.38   mycroft 		stat->nd_map->dm_xfer_len += stat->nd_map->dm_segs[stat->nd_idx].ds_len;
   1265       1.38   mycroft 	}
   1266       1.37  christos 
   1267       1.38   mycroft 	if ((stat->nd_idx+1) == stat->nd_map->dm_nsegs) {
   1268       1.38   mycroft 		if (nsc->sc_conf.nd_completed_cb)
   1269       1.38   mycroft 			(*nsc->sc_conf.nd_completed_cb)(stat->nd_map, nsc->sc_conf.nd_cb_arg);
   1270       1.37  christos 	}
   1271       1.38   mycroft 	nextdma_rotate(nsc);
   1272       1.37  christos 
   1273       1.37  christos 	if ((state & DMACSR_COMPLETE) && (state & DMACSR_ENABLE)) {
   1274       1.37  christos #if 0
   1275       1.38   mycroft 		int l = nd_bsr4 (DD_LIMIT) & 0x7FFFFFFF;
   1276       1.38   mycroft 		int s = nd_bsr4 (DD_STOP);
   1277       1.37  christos #endif
   1278       1.38   mycroft /* 		nextdma_setup_cont_regs(nsc); */
   1279       1.38   mycroft 		if (stat->nd_map_cont) {
   1280       1.38   mycroft 			nd_bsw4 (DD_START, stat->nd_map_cont->dm_segs[stat->nd_idx_cont].ds_addr);
   1281       1.38   mycroft 			nd_bsw4 (DD_STOP, (stat->nd_map_cont->dm_segs[stat->nd_idx_cont].ds_addr +
   1282       1.38   mycroft 					   stat->nd_map_cont->dm_segs[stat->nd_idx_cont].ds_len));
   1283       1.37  christos 		}
   1284       1.37  christos 
   1285       1.38   mycroft 		nd_bsw4 (DD_CSR, DMACSR_CLRCOMPLETE | (state & DMACSR_READ ? DMACSR_SETREAD : DMACSR_SETWRITE) |
   1286       1.38   mycroft 			 (stat->nd_map_cont ? DMACSR_SETSUPDATE : 0));
   1287       1.37  christos 
   1288       1.37  christos #if 0
   1289       1.38   mycroft #ifdef ESP_DEBUG
   1290       1.37  christos 		if (state & DMACSR_BUSEXC) {
   1291       1.38   mycroft 			sprintf (ndtracep, "CE/BUSEXC: %08lX %08X %08X\n",
   1292       1.38   mycroft 				 (stat->nd_map->dm_segs[stat->nd_idx].ds_addr + stat->nd_map->dm_segs[stat->nd_idx].ds_len),
   1293       1.37  christos 				 l, s);
   1294       1.38   mycroft 			ndtracep += strlen (ndtracep);
   1295       1.37  christos 		}
   1296       1.37  christos #endif
   1297       1.38   mycroft #endif
   1298       1.37  christos 	} else {
   1299       1.37  christos #if 0
   1300       1.37  christos 		if (state & DMACSR_BUSEXC) {
   1301       1.38   mycroft 			while (nd_bsr4 (DD_NEXT) !=
   1302       1.38   mycroft 			       (nd_bsr4 (DD_LIMIT) & 0x7FFFFFFF))
   1303       1.37  christos 				printf ("Y"); /* DELAY(50); */
   1304       1.38   mycroft 			state = nd_bsr4 (DD_CSR);
   1305       1.37  christos 		}
   1306       1.37  christos #endif
   1307       1.37  christos 
   1308       1.37  christos 		if (!(state & DMACSR_SUPDATE)) {
   1309       1.38   mycroft 			nextdma_rotate(nsc);
   1310       1.37  christos 		} else {
   1311       1.38   mycroft 			nd_bsw4 (DD_CSR, DMACSR_CLRCOMPLETE |
   1312       1.38   mycroft 				 DMACSR_INITBUF | DMACSR_RESET |
   1313       1.38   mycroft 				 (state & DMACSR_READ ? DMACSR_SETREAD : DMACSR_SETWRITE));
   1314       1.38   mycroft 
   1315       1.38   mycroft 			nd_bsw4 (DD_NEXT, stat->nd_map->dm_segs[stat->nd_idx].ds_addr);
   1316       1.38   mycroft 			nd_bsw4 (DD_LIMIT,
   1317       1.38   mycroft 				 (stat->nd_map->dm_segs[stat->nd_idx].ds_addr +
   1318       1.38   mycroft 				  stat->nd_map->dm_segs[stat->nd_idx].ds_len) | 0/* x80000000 */);
   1319       1.38   mycroft 			if (stat->nd_map_cont) {
   1320       1.38   mycroft 				nd_bsw4 (DD_START,
   1321       1.38   mycroft 					 stat->nd_map_cont->dm_segs[stat->nd_idx_cont].ds_addr);
   1322       1.38   mycroft 				nd_bsw4 (DD_STOP,
   1323       1.38   mycroft 					 (stat->nd_map_cont->dm_segs[stat->nd_idx_cont].ds_addr +
   1324       1.38   mycroft 					  stat->nd_map_cont->dm_segs[stat->nd_idx_cont].ds_len) | 0/* x80000000 */);
   1325       1.37  christos 			}
   1326       1.38   mycroft 			nd_bsw4 (DD_CSR, DMACSR_SETENABLE |
   1327       1.38   mycroft 				 DMACSR_CLRCOMPLETE | (state & DMACSR_READ ? DMACSR_SETREAD : DMACSR_SETWRITE) |
   1328       1.38   mycroft 				 (stat->nd_map_cont ? DMACSR_SETSUPDATE : 0));
   1329       1.37  christos #if 1
   1330       1.38   mycroft #ifdef ESP_DEBUG
   1331       1.38   mycroft 				sprintf (ndtracep, "supdate ");
   1332       1.38   mycroft 				ndtracep += strlen (ndtracep);
   1333       1.38   mycroft 				sprintf (ndtracep, "%08X %08X %08X %08X ",
   1334       1.38   mycroft 					 nd_bsr4 (DD_NEXT),
   1335       1.38   mycroft 					 nd_bsr4 (DD_LIMIT) & 0x7FFFFFFF,
   1336       1.38   mycroft 					 nd_bsr4 (DD_START),
   1337       1.38   mycroft 					 nd_bsr4 (DD_STOP) & 0x7FFFFFFF);
   1338       1.38   mycroft 				ndtracep += strlen (ndtracep);
   1339       1.38   mycroft #endif
   1340       1.37  christos #endif
   1341       1.38   mycroft 			stat->nd_exception++;
   1342       1.37  christos 			return(1);
   1343       1.37  christos 			/* NCR_WRITE_REG(sc, ESP_DCTL, ctl); */
   1344       1.37  christos 			goto restart;
   1345       1.37  christos 		}
   1346       1.37  christos 
   1347       1.38   mycroft 		if (stat->nd_map) {
   1348       1.37  christos #if 1
   1349       1.38   mycroft #ifdef ESP_DEBUG
   1350       1.38   mycroft 				sprintf (ndtracep, "%08X %08X %08X %08X ",
   1351       1.38   mycroft 					 nd_bsr4 (DD_NEXT),
   1352       1.38   mycroft 					 nd_bsr4 (DD_LIMIT) & 0x7FFFFFFF,
   1353       1.38   mycroft 					 nd_bsr4 (DD_START),
   1354       1.38   mycroft 					 nd_bsr4 (DD_STOP) & 0x7FFFFFFF);
   1355       1.38   mycroft 				ndtracep += strlen (ndtracep);
   1356       1.38   mycroft #endif
   1357       1.37  christos #endif
   1358       1.37  christos 
   1359       1.37  christos #if 0
   1360       1.38   mycroft 			nd_bsw4 (DD_CSR, DMACSR_CLRCOMPLETE | DMACSR_RESET);
   1361       1.37  christos 
   1362       1.38   mycroft 			nd_bsw4 (DD_CSR, 0);
   1363       1.37  christos #endif
   1364       1.37  christos #if 1
   1365       1.37  christos  /* 6/2 */
   1366       1.38   mycroft 			nd_bsw4 (DD_CSR, DMACSR_CLRCOMPLETE |
   1367       1.38   mycroft 				 DMACSR_INITBUF | DMACSR_RESET |
   1368       1.38   mycroft 				 (state & DMACSR_READ ? DMACSR_SETREAD : DMACSR_SETWRITE));
   1369       1.37  christos 
   1370       1.38   mycroft 			/* 			nextdma_setup_curr_regs(nsc); */
   1371       1.38   mycroft 			nd_bsw4 (DD_NEXT, stat->nd_map->dm_segs[stat->nd_idx].ds_addr);
   1372       1.38   mycroft 			nd_bsw4 (DD_LIMIT,
   1373       1.38   mycroft 				 (stat->nd_map->dm_segs[stat->nd_idx].ds_addr +
   1374       1.38   mycroft 				  stat->nd_map->dm_segs[stat->nd_idx].ds_len) | 0/* x80000000 */);
   1375       1.38   mycroft 			/* 			nextdma_setup_cont_regs(nsc); */
   1376       1.38   mycroft 			if (stat->nd_map_cont) {
   1377       1.38   mycroft 				nd_bsw4 (DD_START,
   1378       1.38   mycroft 					 stat->nd_map_cont->dm_segs[stat->nd_idx_cont].ds_addr);
   1379       1.38   mycroft 				nd_bsw4 (DD_STOP,
   1380       1.38   mycroft 					 (stat->nd_map_cont->dm_segs[stat->nd_idx_cont].ds_addr +
   1381       1.38   mycroft 					  stat->nd_map_cont->dm_segs[stat->nd_idx_cont].ds_len) | 0/* x80000000 */);
   1382       1.37  christos 			}
   1383       1.37  christos 
   1384       1.38   mycroft 			nd_bsw4 (DD_CSR,
   1385       1.38   mycroft 				 DMACSR_SETENABLE | (stat->nd_map_cont ? DMACSR_SETSUPDATE : 0) |
   1386       1.38   mycroft 				 (state & DMACSR_READ ? DMACSR_SETREAD : DMACSR_SETWRITE));
   1387       1.38   mycroft #ifdef ESP_DEBUG
   1388       1.38   mycroft 			/* ndtraceshow++; */
   1389       1.38   mycroft #endif
   1390       1.38   mycroft 			stat->nd_exception++;
   1391       1.37  christos 			return(1);
   1392       1.37  christos #endif
   1393       1.37  christos 			/* NCR_WRITE_REG(sc, ESP_DCTL, ctl); */
   1394       1.37  christos 			goto restart;
   1395       1.37  christos 		restart:
   1396       1.37  christos #if 1
   1397       1.38   mycroft #ifdef ESP_DEBUG
   1398       1.38   mycroft 			sprintf (ndtracep, "restart %08lX %08lX\n",
   1399       1.38   mycroft 				 stat->nd_map->dm_segs[stat->nd_idx].ds_addr,
   1400       1.38   mycroft 				 stat->nd_map->dm_segs[stat->nd_idx].ds_addr +
   1401       1.38   mycroft 				 stat->nd_map->dm_segs[stat->nd_idx].ds_len);
   1402       1.38   mycroft 			if (stat->nd_map_cont) {
   1403       1.38   mycroft 				sprintf (ndtracep + strlen(ndtracep) - 1, " %08lX %08lX\n",
   1404       1.38   mycroft 					 stat->nd_map_cont->dm_segs[stat->nd_idx_cont].ds_addr,
   1405       1.38   mycroft 					 stat->nd_map_cont->dm_segs[stat->nd_idx_cont].ds_addr +
   1406       1.38   mycroft 					 stat->nd_map_cont->dm_segs[stat->nd_idx_cont].ds_len);
   1407       1.37  christos 			}
   1408       1.38   mycroft 			ndtracep += strlen (ndtracep);
   1409       1.38   mycroft #endif
   1410       1.37  christos #endif
   1411       1.38   mycroft 			nextdma_print(nsc);
   1412       1.37  christos 			NCR_WRITE_REG(sc, ESP_DCTL, ESPDCTL_16MHZ | ESPDCTL_INTENB);
   1413       1.37  christos 			printf ("ff:%02x tcm:%d tcl:%d esp_dstat:%02x state:%02x step: %02x intr:%02x state:%08X\n",
   1414       1.37  christos 				NCR_READ_REG(sc, NCR_FFLAG),
   1415       1.37  christos 				NCR_READ_REG((sc), NCR_TCM), NCR_READ_REG((sc), NCR_TCL),
   1416       1.37  christos 				NCR_READ_REG(sc, ESP_DSTAT),
   1417       1.37  christos 				NCR_READ_REG(sc, NCR_STAT), NCR_READ_REG(sc, NCR_STEP),
   1418       1.37  christos 				NCR_READ_REG(sc, NCR_INTR), state);
   1419       1.38   mycroft #ifdef ESP_DEBUG
   1420       1.38   mycroft 			*ndtracep = '\0';
   1421       1.38   mycroft 			printf ("ndtrace: %s\n", ndtrace);
   1422       1.38   mycroft #endif
   1423       1.48       wiz 			panic("%s: busexc/supdate occurred.  Please email this output to chris (at) pin.lu.",
   1424       1.37  christos 			      sc->sc_dev.dv_xname);
   1425       1.38   mycroft #ifdef ESP_DEBUG
   1426       1.38   mycroft 			ndtraceshow++;
   1427       1.38   mycroft #endif
   1428       1.37  christos 		} else {
   1429       1.38   mycroft 			nd_bsw4 (DD_CSR, DMACSR_CLRCOMPLETE | DMACSR_RESET);
   1430       1.38   mycroft 			if (nsc->sc_conf.nd_shutdown_cb)
   1431       1.38   mycroft 				(*nsc->sc_conf.nd_shutdown_cb)(nsc->sc_conf.nd_cb_arg);
   1432       1.37  christos 		}
   1433       1.37  christos 	}
   1434       1.37  christos 	return (1);
   1435       1.37  christos }
   1436       1.37  christos 
   1437       1.44       wiz /* Internal DMA callback routines */
   1438        1.2       dbj bus_dmamap_t
   1439       1.49       chs esp_dmacb_continue(void *arg)
   1440        1.2       dbj {
   1441        1.2       dbj 	struct ncr53c9x_softc *sc = (struct ncr53c9x_softc *)arg;
   1442        1.2       dbj 	struct esp_softc *esc = (struct esp_softc *)sc;
   1443        1.2       dbj 
   1444       1.38   mycroft 	NDTRACEIF (*ndtracep++ = 'x');
   1445       1.44       wiz 	DPRINTF(("%s: DMA continue\n",sc->sc_dev.dv_xname));
   1446        1.4       dbj 
   1447        1.2       dbj #ifdef DIAGNOSTIC
   1448        1.2       dbj 	if ((esc->sc_datain < 0) || (esc->sc_datain > 1)) {
   1449       1.44       wiz 		panic("%s: map not loaded in DMA continue callback, datain = %d",
   1450        1.2       dbj 				sc->sc_dev.dv_xname,esc->sc_datain);
   1451        1.2       dbj 	}
   1452        1.2       dbj #endif
   1453       1.18       dbj 
   1454       1.18       dbj 	if ((!(esc->sc_loaded & ESP_LOADED_MAIN)) &&
   1455       1.18       dbj 			(esc->sc_main_dmamap->dm_mapsize)) {
   1456       1.18       dbj 			DPRINTF(("%s: Loading main map\n",sc->sc_dev.dv_xname));
   1457       1.19       dbj #if 0
   1458       1.38   mycroft 			bus_dmamap_sync(esc->sc_dma->sc_dmat, esc->sc_main_dmamap,
   1459       1.18       dbj 					0, esc->sc_main_dmamap->dm_mapsize,
   1460       1.14       dbj 					(esc->sc_datain ? BUS_DMASYNC_PREREAD : BUS_DMASYNC_PREWRITE));
   1461       1.34       dbj 			esc->sc_main_dmamap->dm_xfer_len = 0;
   1462       1.19       dbj #endif
   1463       1.18       dbj 			esc->sc_loaded |= ESP_LOADED_MAIN;
   1464       1.18       dbj 			return(esc->sc_main_dmamap);
   1465       1.18       dbj 	}
   1466       1.18       dbj 
   1467       1.18       dbj 	if ((!(esc->sc_loaded & ESP_LOADED_TAIL)) &&
   1468       1.18       dbj 			(esc->sc_tail_dmamap->dm_mapsize)) {
   1469       1.18       dbj 			DPRINTF(("%s: Loading tail map\n",sc->sc_dev.dv_xname));
   1470       1.19       dbj #if 0
   1471       1.38   mycroft 			bus_dmamap_sync(esc->sc_dma->sc_dmat, esc->sc_tail_dmamap,
   1472       1.14       dbj 					0, esc->sc_tail_dmamap->dm_mapsize,
   1473       1.14       dbj 					(esc->sc_datain ? BUS_DMASYNC_PREREAD : BUS_DMASYNC_PREWRITE));
   1474       1.34       dbj 			esc->sc_tail_dmamap->dm_xfer_len = 0;
   1475       1.19       dbj #endif
   1476       1.18       dbj 			esc->sc_loaded |= ESP_LOADED_TAIL;
   1477       1.14       dbj 			return(esc->sc_tail_dmamap);
   1478       1.10       dbj 	}
   1479       1.18       dbj 
   1480       1.18       dbj 	DPRINTF(("%s: not loading map\n",sc->sc_dev.dv_xname));
   1481       1.18       dbj 	return(0);
   1482        1.2       dbj }
   1483        1.2       dbj 
   1484       1.14       dbj 
   1485        1.2       dbj void
   1486       1.49       chs esp_dmacb_completed(bus_dmamap_t map, void *arg)
   1487        1.2       dbj {
   1488        1.2       dbj 	struct ncr53c9x_softc *sc = (struct ncr53c9x_softc *)arg;
   1489        1.2       dbj 	struct esp_softc *esc = (struct esp_softc *)sc;
   1490        1.2       dbj 
   1491       1.38   mycroft 	NDTRACEIF (*ndtracep++ = 'X');
   1492       1.44       wiz 	DPRINTF(("%s: DMA completed\n",sc->sc_dev.dv_xname));
   1493        1.4       dbj 
   1494        1.2       dbj #ifdef DIAGNOSTIC
   1495       1.14       dbj 	if ((esc->sc_datain < 0) || (esc->sc_datain > 1)) {
   1496       1.44       wiz 		panic("%s: invalid DMA direction in completed callback, datain = %d",
   1497       1.18       dbj 				sc->sc_dev.dv_xname,esc->sc_datain);
   1498       1.32       dbj 	}
   1499       1.32       dbj #endif
   1500       1.32       dbj 
   1501       1.34       dbj #if defined(DIAGNOSTIC) && 0
   1502       1.32       dbj 	{
   1503       1.32       dbj 		int i;
   1504       1.32       dbj 		for(i=0;i<map->dm_nsegs;i++) {
   1505       1.33       dbj 			if (map->dm_xfer_len != map->dm_mapsize) {
   1506       1.32       dbj 				printf("%s: map->dm_mapsize = %d\n", sc->sc_dev.dv_xname,map->dm_mapsize);
   1507       1.32       dbj 				printf("%s: map->dm_nsegs = %d\n", sc->sc_dev.dv_xname,map->dm_nsegs);
   1508       1.33       dbj 				printf("%s: map->dm_xfer_len = %d\n", sc->sc_dev.dv_xname,map->dm_xfer_len);
   1509       1.32       dbj 				for(i=0;i<map->dm_nsegs;i++) {
   1510       1.32       dbj 					printf("%s: map->dm_segs[%d].ds_addr = 0x%08lx\n",
   1511       1.32       dbj 							sc->sc_dev.dv_xname,i,map->dm_segs[i].ds_addr);
   1512       1.32       dbj 					printf("%s: map->dm_segs[%d].ds_len = %d\n",
   1513       1.32       dbj 							sc->sc_dev.dv_xname,i,map->dm_segs[i].ds_len);
   1514       1.32       dbj 				}
   1515       1.44       wiz 				panic("%s: incomplete DMA transfer",sc->sc_dev.dv_xname);
   1516       1.32       dbj 			}
   1517       1.32       dbj 		}
   1518        1.2       dbj 	}
   1519       1.23       dbj #endif
   1520       1.23       dbj 
   1521       1.23       dbj 	if (map == esc->sc_main_dmamap) {
   1522       1.23       dbj #ifdef DIAGNOSTIC
   1523       1.23       dbj 		if ((esc->sc_loaded & ESP_UNLOADED_MAIN) ||
   1524       1.23       dbj 				!(esc->sc_loaded & ESP_LOADED_MAIN)) {
   1525       1.40    provos 			panic("%s: unexpected completed call for main map",sc->sc_dev.dv_xname);
   1526       1.23       dbj 		}
   1527       1.23       dbj #endif
   1528       1.23       dbj 		esc->sc_loaded |= ESP_UNLOADED_MAIN;
   1529       1.23       dbj 	} else if (map == esc->sc_tail_dmamap) {
   1530       1.23       dbj #ifdef DIAGNOSTIC
   1531       1.23       dbj 		if ((esc->sc_loaded & ESP_UNLOADED_TAIL) ||
   1532       1.23       dbj 				!(esc->sc_loaded & ESP_LOADED_TAIL)) {
   1533       1.40    provos 			panic("%s: unexpected completed call for tail map",sc->sc_dev.dv_xname);
   1534       1.23       dbj 		}
   1535       1.23       dbj #endif
   1536       1.23       dbj 		esc->sc_loaded |= ESP_UNLOADED_TAIL;
   1537       1.23       dbj 	}
   1538       1.23       dbj #ifdef DIAGNOSTIC
   1539       1.23       dbj 	 else {
   1540       1.14       dbj 		panic("%s: unexpected completed map", sc->sc_dev.dv_xname);
   1541        1.2       dbj 	}
   1542        1.2       dbj #endif
   1543        1.2       dbj 
   1544       1.23       dbj #ifdef ESP_DEBUG
   1545       1.23       dbj 	if (esp_debug) {
   1546       1.23       dbj 		if (map == esc->sc_main_dmamap) {
   1547       1.23       dbj 			printf("%s: completed main map\n",sc->sc_dev.dv_xname);
   1548       1.23       dbj 		} else if (map == esc->sc_tail_dmamap) {
   1549       1.23       dbj 			printf("%s: completed tail map\n",sc->sc_dev.dv_xname);
   1550       1.23       dbj 		}
   1551       1.23       dbj 	}
   1552       1.23       dbj #endif
   1553       1.22       dbj 
   1554       1.22       dbj #if 0
   1555       1.22       dbj 	if ((map == esc->sc_tail_dmamap) ||
   1556       1.22       dbj 			((esc->sc_tail_size == 0) && (map == esc->sc_main_dmamap))) {
   1557       1.22       dbj 
   1558       1.22       dbj 		/* Clear the DMAMOD bit in the DCTL register to give control
   1559       1.22       dbj 		 * back to the scsi chip.
   1560       1.22       dbj 		 */
   1561       1.22       dbj 		if (esc->sc_datain) {
   1562       1.22       dbj 			NCR_WRITE_REG(sc, ESP_DCTL,
   1563       1.37  christos 					ESPDCTL_16MHZ | ESPDCTL_INTENB | ESPDCTL_DMARD);
   1564       1.22       dbj 		} else {
   1565       1.22       dbj 			NCR_WRITE_REG(sc, ESP_DCTL,
   1566       1.37  christos 					ESPDCTL_16MHZ | ESPDCTL_INTENB);
   1567       1.22       dbj 		}
   1568       1.22       dbj 		DPRINTF(("esp dctl is 0x%02x\n",NCR_READ_REG(sc,ESP_DCTL)));
   1569       1.22       dbj 	}
   1570       1.22       dbj #endif
   1571       1.22       dbj 
   1572       1.22       dbj 
   1573       1.19       dbj #if 0
   1574       1.38   mycroft 	bus_dmamap_sync(esc->sc_dma->sc_dmat, map,
   1575       1.14       dbj 			0, map->dm_mapsize,
   1576        1.2       dbj 			(esc->sc_datain ? BUS_DMASYNC_POSTREAD : BUS_DMASYNC_POSTWRITE));
   1577       1.19       dbj #endif
   1578       1.13       dbj 
   1579        1.2       dbj }
   1580        1.2       dbj 
   1581        1.2       dbj void
   1582       1.49       chs esp_dmacb_shutdown(void *arg)
   1583        1.2       dbj {
   1584        1.2       dbj 	struct ncr53c9x_softc *sc = (struct ncr53c9x_softc *)arg;
   1585        1.2       dbj 	struct esp_softc *esc = (struct esp_softc *)sc;
   1586        1.2       dbj 
   1587       1.38   mycroft 	NDTRACEIF (*ndtracep++ = 'S');
   1588       1.44       wiz 	DPRINTF(("%s: DMA shutdown\n",sc->sc_dev.dv_xname));
   1589        1.4       dbj 
   1590       1.37  christos 	if (esc->sc_loaded == 0)
   1591       1.37  christos 		return;
   1592       1.37  christos 
   1593       1.22       dbj #if 0
   1594       1.22       dbj 	{
   1595       1.22       dbj 		/* Clear the DMAMOD bit in the DCTL register to give control
   1596       1.22       dbj 		 * back to the scsi chip.
   1597       1.22       dbj 		 */
   1598       1.22       dbj 		if (esc->sc_datain) {
   1599       1.22       dbj 			NCR_WRITE_REG(sc, ESP_DCTL,
   1600       1.37  christos 					ESPDCTL_16MHZ | ESPDCTL_INTENB | ESPDCTL_DMARD);
   1601       1.22       dbj 		} else {
   1602       1.22       dbj 			NCR_WRITE_REG(sc, ESP_DCTL,
   1603       1.37  christos 					ESPDCTL_16MHZ | ESPDCTL_INTENB);
   1604       1.22       dbj 		}
   1605       1.22       dbj 		DPRINTF(("esp dctl is 0x%02x\n",NCR_READ_REG(sc,ESP_DCTL)));
   1606       1.22       dbj 	}
   1607       1.22       dbj #endif
   1608       1.22       dbj 
   1609       1.22       dbj 	DPRINTF(("%s: esp_dma_nest == %d\n",sc->sc_dev.dv_xname,esp_dma_nest));
   1610       1.22       dbj 
   1611       1.13       dbj 	/* Stuff the end slop into fifo */
   1612        1.3       dbj 
   1613       1.14       dbj #ifdef ESP_DEBUG
   1614       1.14       dbj 	if (esp_debug) {
   1615       1.14       dbj 
   1616       1.13       dbj 		int n = NCR_READ_REG(sc, NCR_FFLAG);
   1617       1.20       dbj 		DPRINTF(("%s: fifo size = %d, seq = 0x%x\n",
   1618       1.20       dbj 				sc->sc_dev.dv_xname,n & NCRFIFO_FF, (n & NCRFIFO_SS)>>5));
   1619       1.13       dbj 	}
   1620       1.13       dbj #endif
   1621       1.12       dbj 
   1622       1.22       dbj 	if (esc->sc_main_dmamap->dm_mapsize) {
   1623       1.44       wiz 		if (!esc->sc_datain) { /* unpatch the DMA map for write overrun */
   1624       1.37  christos 			esc->sc_main_dmamap->dm_mapsize -= ESP_DMA_OVERRUN;
   1625       1.37  christos 			esc->sc_main_dmamap->dm_segs[esc->sc_main_dmamap->dm_nsegs - 1].ds_len -=
   1626       1.37  christos 				ESP_DMA_OVERRUN;
   1627       1.37  christos 		}
   1628       1.38   mycroft 		bus_dmamap_sync(esc->sc_dma->sc_dmat, esc->sc_main_dmamap,
   1629       1.22       dbj 			0, esc->sc_main_dmamap->dm_mapsize,
   1630       1.22       dbj 				(esc->sc_datain ? BUS_DMASYNC_POSTREAD : BUS_DMASYNC_POSTWRITE));
   1631       1.38   mycroft 		bus_dmamap_unload(esc->sc_dma->sc_dmat, esc->sc_main_dmamap);
   1632       1.38   mycroft 		NDTRACEIF (
   1633       1.38   mycroft 			sprintf (ndtracep, "m%ld", esc->sc_main_dmamap->dm_xfer_len);
   1634       1.38   mycroft 			ndtracep += strlen (ndtracep);
   1635       1.38   mycroft 			);
   1636       1.22       dbj 	}
   1637       1.22       dbj 
   1638       1.22       dbj 	if (esc->sc_tail_dmamap->dm_mapsize) {
   1639       1.38   mycroft 		bus_dmamap_sync(esc->sc_dma->sc_dmat, esc->sc_tail_dmamap,
   1640       1.22       dbj 			0, esc->sc_tail_dmamap->dm_mapsize,
   1641       1.22       dbj 				(esc->sc_datain ? BUS_DMASYNC_POSTREAD : BUS_DMASYNC_POSTWRITE));
   1642       1.38   mycroft 		bus_dmamap_unload(esc->sc_dma->sc_dmat, esc->sc_tail_dmamap);
   1643       1.44       wiz 		/* copy the tail DMA buffer data for read transfers */
   1644       1.37  christos 		if (esc->sc_datain) {
   1645       1.37  christos 			memcpy(*esc->sc_dmaaddr+esc->sc_begin_size+esc->sc_main_size,
   1646       1.37  christos 			       esc->sc_tail, esc->sc_dmasize-(esc->sc_begin_size+esc->sc_main_size));
   1647       1.37  christos 		}
   1648       1.38   mycroft 		NDTRACEIF (
   1649       1.38   mycroft 			sprintf (ndtracep, "t%ld", esc->sc_tail_dmamap->dm_xfer_len);
   1650       1.38   mycroft 			ndtracep += strlen (ndtracep);
   1651       1.38   mycroft 			);
   1652        1.4       dbj 	}
   1653       1.13       dbj 
   1654       1.18       dbj #ifdef ESP_DEBUG
   1655       1.18       dbj 	if (esp_debug) {
   1656       1.35       chs 		printf("%s: dma_shutdown: addr=%p,len=0x%08x,size=0x%08x\n",
   1657       1.18       dbj 				sc->sc_dev.dv_xname,
   1658       1.18       dbj 				*esc->sc_dmaaddr, *esc->sc_dmalen, esc->sc_dmasize);
   1659       1.24       dbj 		if (esp_debug > 10) {
   1660       1.24       dbj 			esp_hex_dump(*(esc->sc_dmaaddr),esc->sc_dmasize);
   1661       1.35       chs 			printf("%s: tail=%p,tailbuf=%p,tail_size=0x%08x\n",
   1662       1.24       dbj 					sc->sc_dev.dv_xname,
   1663       1.24       dbj 					esc->sc_tail, &(esc->sc_tailbuf[0]), esc->sc_tail_size);
   1664       1.24       dbj 			esp_hex_dump(&(esc->sc_tailbuf[0]),sizeof(esc->sc_tailbuf));
   1665       1.24       dbj 		}
   1666       1.13       dbj 	}
   1667       1.11       dbj #endif
   1668        1.3       dbj 
   1669       1.18       dbj 	esc->sc_main = 0;
   1670       1.18       dbj 	esc->sc_main_size = 0;
   1671       1.14       dbj 	esc->sc_tail = 0;
   1672       1.14       dbj 	esc->sc_tail_size = 0;
   1673       1.19       dbj 
   1674       1.19       dbj 	esc->sc_datain = -1;
   1675       1.37  christos /* 	esc->sc_dmaaddr = 0; */
   1676       1.37  christos /* 	esc->sc_dmalen  = 0; */
   1677       1.37  christos /* 	esc->sc_dmasize = 0; */
   1678       1.19       dbj 
   1679       1.19       dbj 	esc->sc_loaded = 0;
   1680       1.19       dbj 
   1681       1.19       dbj 	esc->sc_begin = 0;
   1682       1.19       dbj 	esc->sc_begin_size = 0;
   1683       1.20       dbj 
   1684       1.20       dbj #ifdef ESP_DEBUG
   1685       1.20       dbj 	if (esp_debug) {
   1686       1.28        tv 		char sbuf[256];
   1687       1.28        tv 
   1688       1.28        tv 		bitmask_snprintf((*(volatile u_long *)IIOV(NEXT_P_INTRSTAT)),
   1689       1.28        tv 				 NEXT_INTR_BITS, sbuf, sizeof(sbuf));
   1690       1.28        tv 		printf("  *intrstat = 0x%s\n", sbuf);
   1691       1.28        tv 
   1692       1.28        tv 		bitmask_snprintf((*(volatile u_long *)IIOV(NEXT_P_INTRMASK)),
   1693       1.28        tv 				 NEXT_INTR_BITS, sbuf, sizeof(sbuf));
   1694       1.28        tv 		printf("  *intrmask = 0x%s\n", sbuf);
   1695       1.20       dbj 	}
   1696       1.20       dbj #endif
   1697        1.1       dbj }
   1698