Home | History | Annotate | Line # | Download | only in isa
isadma.c revision 1.35
      1  1.35   thorpej /*	$NetBSD: isadma.c,v 1.35 1998/06/09 01:04:18 thorpej Exp $	*/
      2  1.26   thorpej 
      3  1.26   thorpej /*-
      4  1.33   thorpej  * Copyright (c) 1997, 1998 The NetBSD Foundation, Inc.
      5  1.26   thorpej  * All rights reserved.
      6  1.26   thorpej  *
      7  1.26   thorpej  * This code is derived from software contributed to The NetBSD Foundation
      8  1.26   thorpej  * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
      9  1.26   thorpej  * NASA Ames Research Center.
     10  1.26   thorpej  *
     11  1.26   thorpej  * Redistribution and use in source and binary forms, with or without
     12  1.26   thorpej  * modification, are permitted provided that the following conditions
     13  1.26   thorpej  * are met:
     14  1.26   thorpej  * 1. Redistributions of source code must retain the above copyright
     15  1.26   thorpej  *    notice, this list of conditions and the following disclaimer.
     16  1.26   thorpej  * 2. Redistributions in binary form must reproduce the above copyright
     17  1.26   thorpej  *    notice, this list of conditions and the following disclaimer in the
     18  1.26   thorpej  *    documentation and/or other materials provided with the distribution.
     19  1.26   thorpej  * 3. All advertising materials mentioning features or use of this software
     20  1.26   thorpej  *    must display the following acknowledgement:
     21  1.26   thorpej  *	This product includes software developed by the NetBSD
     22  1.26   thorpej  *	Foundation, Inc. and its contributors.
     23  1.26   thorpej  * 4. Neither the name of The NetBSD Foundation nor the names of its
     24  1.26   thorpej  *    contributors may be used to endorse or promote products derived
     25  1.26   thorpej  *    from this software without specific prior written permission.
     26  1.26   thorpej  *
     27  1.26   thorpej  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     28  1.26   thorpej  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     29  1.26   thorpej  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     30  1.26   thorpej  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     31  1.26   thorpej  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     32  1.26   thorpej  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     33  1.26   thorpej  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     34  1.26   thorpej  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     35  1.26   thorpej  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     36  1.26   thorpej  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     37  1.26   thorpej  * POSSIBILITY OF SUCH DAMAGE.
     38  1.26   thorpej  */
     39  1.26   thorpej 
     40  1.26   thorpej /*
     41  1.26   thorpej  * Device driver for the ISA on-board DMA controller.
     42  1.26   thorpej  */
     43   1.8       cgd 
     44   1.3   mycroft #include <sys/param.h>
     45   1.3   mycroft #include <sys/systm.h>
     46  1.19  christos #include <sys/proc.h>
     47  1.26   thorpej #include <sys/device.h>
     48  1.34   thorpej #include <sys/malloc.h>
     49   1.5   mycroft 
     50   1.3   mycroft #include <vm/vm.h>
     51   1.3   mycroft 
     52  1.26   thorpej #include <machine/bus.h>
     53   1.3   mycroft 
     54  1.12       cgd #include <dev/isa/isareg.h>
     55  1.26   thorpej #include <dev/isa/isavar.h>
     56  1.12       cgd #include <dev/isa/isadmavar.h>
     57  1.12       cgd #include <dev/isa/isadmareg.h>
     58   1.1   mycroft 
     59  1.34   thorpej struct isa_mem *isa_mem_head;
     60  1.27  augustss 
     61  1.26   thorpej /*
     62  1.26   thorpej  * High byte of DMA address is stored in this DMAPG register for
     63  1.26   thorpej  * the Nth DMA channel.
     64  1.26   thorpej  */
     65  1.18   mycroft static int dmapageport[2][4] = {
     66  1.26   thorpej 	{0x7, 0x3, 0x1, 0x2},
     67  1.26   thorpej 	{0xf, 0xb, 0x9, 0xa}
     68  1.15   mycroft };
     69  1.15   mycroft 
     70  1.15   mycroft static u_int8_t dmamode[4] = {
     71  1.17   mycroft 	DMA37MD_READ | DMA37MD_SINGLE,
     72  1.15   mycroft 	DMA37MD_WRITE | DMA37MD_SINGLE,
     73  1.25   mycroft 	DMA37MD_READ | DMA37MD_SINGLE | DMA37MD_LOOP,
     74  1.25   mycroft 	DMA37MD_WRITE | DMA37MD_SINGLE | DMA37MD_LOOP
     75  1.15   mycroft };
     76   1.1   mycroft 
     77  1.34   thorpej static inline void _isa_dmaunmask __P((struct isa_dma_state *, int));
     78  1.34   thorpej static inline void _isa_dmamask __P((struct isa_dma_state *, int));
     79  1.19  christos 
     80  1.26   thorpej static inline void
     81  1.34   thorpej _isa_dmaunmask(ids, chan)
     82  1.34   thorpej 	struct isa_dma_state *ids;
     83  1.23   mycroft 	int chan;
     84  1.23   mycroft {
     85  1.23   mycroft 	int ochan = chan & 3;
     86  1.23   mycroft 
     87  1.35   thorpej 	ISA_DMA_MASK_CLR(ids, chan);
     88  1.35   thorpej 
     89  1.35   thorpej 	/*
     90  1.35   thorpej 	 * If DMA is frozen, don't unmask it now.  It will be
     91  1.35   thorpej 	 * unmasked when DMA is thawed again.
     92  1.35   thorpej 	 */
     93  1.35   thorpej 	if (ids->ids_frozen)
     94  1.35   thorpej 		return;
     95  1.35   thorpej 
     96  1.23   mycroft 	/* set dma channel mode, and set dma channel mode */
     97  1.23   mycroft 	if ((chan & 4) == 0)
     98  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
     99  1.26   thorpej 		    DMA1_SMSK, ochan | DMA37SM_CLEAR);
    100  1.23   mycroft 	else
    101  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
    102  1.26   thorpej 		    DMA2_SMSK, ochan | DMA37SM_CLEAR);
    103  1.23   mycroft }
    104  1.23   mycroft 
    105  1.26   thorpej static inline void
    106  1.34   thorpej _isa_dmamask(ids, chan)
    107  1.34   thorpej 	struct isa_dma_state *ids;
    108  1.23   mycroft 	int chan;
    109  1.23   mycroft {
    110  1.23   mycroft 	int ochan = chan & 3;
    111  1.23   mycroft 
    112  1.35   thorpej 	ISA_DMA_MASK_SET(ids, chan);
    113  1.35   thorpej 
    114  1.35   thorpej 	/*
    115  1.35   thorpej 	 * XXX Should we avoid masking the channel if DMA is
    116  1.35   thorpej 	 * XXX frozen?  It seems like what we're doing should
    117  1.35   thorpej 	 * XXX be safe, and we do need to reset FFC...
    118  1.35   thorpej 	 */
    119  1.35   thorpej 
    120  1.23   mycroft 	/* set dma channel mode, and set dma channel mode */
    121  1.23   mycroft 	if ((chan & 4) == 0) {
    122  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
    123  1.26   thorpej 		    DMA1_SMSK, ochan | DMA37SM_SET);
    124  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
    125  1.26   thorpej 		    DMA1_FFC, 0);
    126  1.23   mycroft 	} else {
    127  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
    128  1.26   thorpej 		    DMA2_SMSK, ochan | DMA37SM_SET);
    129  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
    130  1.26   thorpej 		    DMA2_FFC, 0);
    131  1.23   mycroft 	}
    132  1.23   mycroft }
    133  1.23   mycroft 
    134   1.1   mycroft /*
    135  1.34   thorpej  * _isa_dmainit(): Initialize the isa_dma_state for this chipset.
    136  1.34   thorpej  */
    137  1.34   thorpej void
    138  1.34   thorpej _isa_dmainit(ids, bst, dmat, dev)
    139  1.34   thorpej 	struct isa_dma_state *ids;
    140  1.34   thorpej 	bus_space_tag_t bst;
    141  1.34   thorpej 	bus_dma_tag_t dmat;
    142  1.34   thorpej 	struct device *dev;
    143  1.34   thorpej {
    144  1.34   thorpej 
    145  1.34   thorpej 	ids->ids_dev = dev;
    146  1.34   thorpej 
    147  1.34   thorpej 	if (ids->ids_initialized) {
    148  1.34   thorpej 		/*
    149  1.34   thorpej 		 * Some systems may have e.g. `ofisa' (OpenFirmware
    150  1.34   thorpej 		 * configuration of ISA bus) and a regular `isa'.
    151  1.34   thorpej 		 * We allow both to call the initialization function,
    152  1.34   thorpej 		 * and take the device name from the last caller
    153  1.34   thorpej 		 * (assuming it will be the indirect ISA bus).  Since
    154  1.34   thorpej 		 * `ofisa' and `isa' are the same bus with different
    155  1.34   thorpej 		 * configuration mechanisms, the space and dma tags
    156  1.34   thorpej 		 * must be the same!
    157  1.34   thorpej 		 */
    158  1.34   thorpej 		if (ids->ids_bst != bst || ids->ids_dmat != dmat)
    159  1.34   thorpej 			panic("_isa_dmainit: inconsistent ISA tags");
    160  1.34   thorpej 	} else {
    161  1.34   thorpej 		ids->ids_bst = bst;
    162  1.34   thorpej 		ids->ids_dmat = dmat;
    163  1.34   thorpej 
    164  1.34   thorpej 		/*
    165  1.34   thorpej 		 * Map the registers used by the ISA DMA controller.
    166  1.34   thorpej 		 */
    167  1.34   thorpej 		if (bus_space_map(ids->ids_bst, IO_DMA1, DMA1_IOSIZE, 0,
    168  1.34   thorpej 		    &ids->ids_dma1h))
    169  1.34   thorpej 			panic("_isa_dmainit: unable to map DMA controller #1");
    170  1.34   thorpej 		if (bus_space_map(ids->ids_bst, IO_DMA2, DMA2_IOSIZE, 0,
    171  1.34   thorpej 		    &ids->ids_dma2h))
    172  1.34   thorpej 			panic("_isa_dmainit: unable to map DMA controller #2");
    173  1.34   thorpej 		if (bus_space_map(ids->ids_bst, IO_DMAPG, 0xf, 0,
    174  1.34   thorpej 		    &ids->ids_dmapgh))
    175  1.34   thorpej 			panic("_isa_dmainit: unable to map DMA page registers");
    176  1.34   thorpej 
    177  1.35   thorpej 		/*
    178  1.35   thorpej 		 * All 8 DMA channels start out "masked".
    179  1.35   thorpej 		 */
    180  1.35   thorpej 		ids->ids_masked = 0xff;
    181  1.35   thorpej 
    182  1.34   thorpej 		ids->ids_initialized = 1;
    183  1.34   thorpej 	}
    184  1.34   thorpej }
    185  1.34   thorpej 
    186  1.34   thorpej /*
    187  1.34   thorpej  * _isa_dmacascade(): program 8237 DMA controller channel to accept
    188   1.1   mycroft  * external dma control by a board.
    189   1.1   mycroft  */
    190   1.1   mycroft void
    191  1.34   thorpej _isa_dmacascade(ids, chan)
    192  1.34   thorpej 	struct isa_dma_state *ids;
    193   1.4   mycroft 	int chan;
    194   1.1   mycroft {
    195  1.23   mycroft 	int ochan = chan & 3;
    196   1.4   mycroft 
    197  1.26   thorpej 	if (chan < 0 || chan > 7) {
    198  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    199  1.26   thorpej 		goto lose;
    200  1.26   thorpej 	}
    201  1.26   thorpej 
    202  1.34   thorpej 	if (ISA_DMA_DRQ_ISFREE(ids, chan) == 0) {
    203  1.34   thorpej 		printf("%s: DRQ %d is not free\n", ids->ids_dev->dv_xname,
    204  1.34   thorpej 		    chan);
    205  1.26   thorpej 		goto lose;
    206  1.26   thorpej 	}
    207  1.26   thorpej 
    208  1.34   thorpej 	ISA_DMA_DRQ_ALLOC(ids, chan);
    209   1.1   mycroft 
    210   1.1   mycroft 	/* set dma channel mode, and set dma channel mode */
    211  1.23   mycroft 	if ((chan & 4) == 0)
    212  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
    213  1.26   thorpej 		    DMA1_MODE, ochan | DMA37MD_CASCADE);
    214  1.26   thorpej 	else
    215  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
    216  1.26   thorpej 		    DMA2_MODE, ochan | DMA37MD_CASCADE);
    217  1.26   thorpej 
    218  1.34   thorpej 	_isa_dmaunmask(ids, chan);
    219  1.26   thorpej 	return;
    220  1.26   thorpej 
    221  1.26   thorpej  lose:
    222  1.34   thorpej 	panic("_isa_dmacascade");
    223  1.26   thorpej }
    224  1.26   thorpej 
    225  1.26   thorpej int
    226  1.34   thorpej _isa_dmamap_create(ids, chan, size, flags)
    227  1.34   thorpej 	struct isa_dma_state *ids;
    228  1.26   thorpej 	int chan;
    229  1.26   thorpej 	bus_size_t size;
    230  1.26   thorpej 	int flags;
    231  1.26   thorpej {
    232  1.26   thorpej 	bus_size_t maxsize;
    233  1.26   thorpej 
    234  1.26   thorpej 	if (chan < 0 || chan > 7) {
    235  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    236  1.26   thorpej 		goto lose;
    237  1.26   thorpej 	}
    238  1.26   thorpej 
    239  1.26   thorpej 	if (chan & 4)
    240  1.26   thorpej 		maxsize = (1 << 17);
    241  1.23   mycroft 	else
    242  1.26   thorpej 		maxsize = (1 << 16);
    243  1.26   thorpej 
    244  1.26   thorpej 	if (size > maxsize)
    245  1.26   thorpej 		return (EINVAL);
    246  1.26   thorpej 
    247  1.34   thorpej 	if (ISA_DMA_DRQ_ISFREE(ids, chan) == 0) {
    248  1.34   thorpej 		printf("%s: drq %d is not free\n", ids->ids_dev->dv_xname,
    249  1.34   thorpej 		    chan);
    250  1.30  augustss 		goto lose;
    251  1.26   thorpej 	}
    252  1.15   mycroft 
    253  1.34   thorpej 	ISA_DMA_DRQ_ALLOC(ids, chan);
    254  1.26   thorpej 
    255  1.34   thorpej 	return (bus_dmamap_create(ids->ids_dmat, size, 1, size, maxsize,
    256  1.34   thorpej 	    flags, &ids->ids_dmamaps[chan]));
    257  1.26   thorpej 
    258  1.26   thorpej  lose:
    259  1.34   thorpej 	panic("_isa_dmamap_create");
    260  1.26   thorpej }
    261  1.26   thorpej 
    262  1.26   thorpej void
    263  1.34   thorpej _isa_dmamap_destroy(ids, chan)
    264  1.34   thorpej 	struct isa_dma_state *ids;
    265  1.26   thorpej 	int chan;
    266  1.26   thorpej {
    267  1.26   thorpej 
    268  1.26   thorpej 	if (chan < 0 || chan > 7) {
    269  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    270  1.26   thorpej 		goto lose;
    271  1.26   thorpej 	}
    272  1.26   thorpej 
    273  1.34   thorpej 	if (ISA_DMA_DRQ_ISFREE(ids, chan)) {
    274  1.26   thorpej 		printf("%s: drq %d is already free\n",
    275  1.34   thorpej 		    ids->ids_dev->dv_xname, chan);
    276  1.26   thorpej 		goto lose;
    277  1.26   thorpej 	}
    278  1.26   thorpej 
    279  1.34   thorpej 	ISA_DMA_DRQ_FREE(ids, chan);
    280  1.26   thorpej 
    281  1.34   thorpej 	bus_dmamap_destroy(ids->ids_dmat, ids->ids_dmamaps[chan]);
    282  1.26   thorpej 	return;
    283  1.26   thorpej 
    284  1.26   thorpej  lose:
    285  1.34   thorpej 	panic("_isa_dmamap_destroy");
    286   1.1   mycroft }
    287   1.1   mycroft 
    288   1.1   mycroft /*
    289  1.34   thorpej  * _isa_dmastart(): program 8237 DMA controller channel and set it
    290  1.26   thorpej  * in motion.
    291   1.1   mycroft  */
    292  1.26   thorpej int
    293  1.34   thorpej _isa_dmastart(ids, chan, addr, nbytes, p, flags, busdmaflags)
    294  1.34   thorpej 	struct isa_dma_state *ids;
    295  1.26   thorpej 	int chan;
    296  1.26   thorpej 	void *addr;
    297  1.26   thorpej 	bus_size_t nbytes;
    298  1.26   thorpej 	struct proc *p;
    299   1.5   mycroft 	int flags;
    300  1.26   thorpej 	int busdmaflags;
    301   1.1   mycroft {
    302  1.26   thorpej 	bus_dmamap_t dmam;
    303  1.26   thorpej 	bus_addr_t dmaaddr;
    304   1.1   mycroft 	int waport;
    305  1.23   mycroft 	int ochan = chan & 3;
    306  1.26   thorpej 	int error;
    307  1.26   thorpej 
    308  1.26   thorpej 	if (chan < 0 || chan > 7) {
    309  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    310  1.26   thorpej 		goto lose;
    311  1.26   thorpej 	}
    312  1.26   thorpej 
    313  1.26   thorpej #ifdef ISADMA_DEBUG
    314  1.34   thorpej 	printf("_isa_dmastart: drq %d, addr %p, nbytes 0x%lx, p %p, "
    315  1.26   thorpej 	    "flags 0x%x, dmaflags 0x%x\n",
    316  1.26   thorpej 	    chan, addr, nbytes, p, flags, busdmaflags);
    317  1.26   thorpej #endif
    318  1.26   thorpej 
    319  1.26   thorpej 	if (chan & 4) {
    320  1.26   thorpej 		if (nbytes > (1 << 17) || nbytes & 1 || (u_long)addr & 1) {
    321  1.26   thorpej 			printf("%s: drq %d, nbytes 0x%lx, addr %p\n",
    322  1.34   thorpej 			    ids->ids_dev->dv_xname, chan, nbytes, addr);
    323  1.26   thorpej 			goto lose;
    324  1.26   thorpej 		}
    325  1.26   thorpej 	} else {
    326  1.26   thorpej 		if (nbytes > (1 << 16)) {
    327  1.26   thorpej 			printf("%s: drq %d, nbytes 0x%lx\n",
    328  1.34   thorpej 			    ids->ids_dev->dv_xname, chan, nbytes);
    329  1.26   thorpej 			goto lose;
    330  1.26   thorpej 		}
    331  1.26   thorpej 	}
    332  1.26   thorpej 
    333  1.34   thorpej 	dmam = ids->ids_dmamaps[chan];
    334  1.31  augustss 	if (dmam == NULL)
    335  1.34   thorpej 		panic("_isa_dmastart: no DMA map for chan %d\n", chan);
    336  1.26   thorpej 
    337  1.34   thorpej 	error = bus_dmamap_load(ids->ids_dmat, dmam, addr, nbytes,
    338  1.26   thorpej 	    p, busdmaflags);
    339  1.26   thorpej 	if (error)
    340  1.26   thorpej 		return (error);
    341   1.1   mycroft 
    342  1.13   mycroft #ifdef ISADMA_DEBUG
    343  1.26   thorpej 	__asm(".globl isa_dmastart_afterload ; isa_dmastart_afterload:");
    344   1.4   mycroft #endif
    345   1.1   mycroft 
    346  1.26   thorpej 	if (flags & DMAMODE_READ) {
    347  1.34   thorpej 		bus_dmamap_sync(ids->ids_dmat, dmam, 0, dmam->dm_mapsize,
    348  1.33   thorpej 		    BUS_DMASYNC_PREREAD);
    349  1.34   thorpej 		ids->ids_dmareads |= (1 << chan);
    350  1.26   thorpej 	} else {
    351  1.34   thorpej 		bus_dmamap_sync(ids->ids_dmat, dmam, 0, dmam->dm_mapsize,
    352  1.33   thorpej 		    BUS_DMASYNC_PREWRITE);
    353  1.34   thorpej 		ids->ids_dmareads &= ~(1 << chan);
    354   1.1   mycroft 	}
    355   1.1   mycroft 
    356  1.26   thorpej 	dmaaddr = dmam->dm_segs[0].ds_addr;
    357  1.26   thorpej 
    358  1.26   thorpej #ifdef ISADMA_DEBUG
    359  1.26   thorpej 	printf("     dmaaddr 0x%lx\n", dmaaddr);
    360  1.26   thorpej 
    361  1.26   thorpej 	__asm(".globl isa_dmastart_aftersync ; isa_dmastart_aftersync:");
    362  1.26   thorpej #endif
    363  1.24   mycroft 
    364  1.34   thorpej 	ids->ids_dmalength[chan] = nbytes;
    365   1.1   mycroft 
    366  1.34   thorpej 	_isa_dmamask(ids, chan);
    367  1.34   thorpej 	ids->ids_dmafinished &= ~(1 << chan);
    368  1.14   mycroft 
    369   1.1   mycroft 	if ((chan & 4) == 0) {
    370  1.23   mycroft 		/* set dma channel mode */
    371  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h, DMA1_MODE,
    372  1.26   thorpej 		    ochan | dmamode[flags]);
    373   1.1   mycroft 
    374   1.1   mycroft 		/* send start address */
    375  1.23   mycroft 		waport = DMA1_CHN(ochan);
    376  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dmapgh,
    377  1.26   thorpej 		    dmapageport[0][ochan], (dmaaddr >> 16) & 0xff);
    378  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h, waport,
    379  1.26   thorpej 		    dmaaddr & 0xff);
    380  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h, waport,
    381  1.26   thorpej 		    (dmaaddr >> 8) & 0xff);
    382   1.1   mycroft 
    383   1.1   mycroft 		/* send count */
    384  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h, waport + 1,
    385  1.26   thorpej 		    (--nbytes) & 0xff);
    386  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h, waport + 1,
    387  1.26   thorpej 		    (nbytes >> 8) & 0xff);
    388   1.1   mycroft 	} else {
    389  1.23   mycroft 		/* set dma channel mode */
    390  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h, DMA2_MODE,
    391  1.26   thorpej 		    ochan | dmamode[flags]);
    392   1.1   mycroft 
    393   1.1   mycroft 		/* send start address */
    394  1.23   mycroft 		waport = DMA2_CHN(ochan);
    395  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dmapgh,
    396  1.26   thorpej 		    dmapageport[1][ochan], (dmaaddr >> 16) & 0xff);
    397  1.26   thorpej 		dmaaddr >>= 1;
    398  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h, waport,
    399  1.26   thorpej 		    dmaaddr & 0xff);
    400  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h, waport,
    401  1.26   thorpej 		    (dmaaddr >> 8) & 0xff);
    402   1.1   mycroft 
    403   1.1   mycroft 		/* send count */
    404   1.1   mycroft 		nbytes >>= 1;
    405  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h, waport + 2,
    406  1.26   thorpej 		    (--nbytes) & 0xff);
    407  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h, waport + 2,
    408  1.26   thorpej 		    (nbytes >> 8) & 0xff);
    409  1.23   mycroft 	}
    410   1.1   mycroft 
    411  1.34   thorpej 	_isa_dmaunmask(ids, chan);
    412  1.26   thorpej 	return (0);
    413  1.26   thorpej 
    414  1.26   thorpej  lose:
    415  1.34   thorpej 	panic("_isa_dmastart");
    416   1.1   mycroft }
    417   1.1   mycroft 
    418   1.1   mycroft void
    419  1.34   thorpej _isa_dmaabort(ids, chan)
    420  1.34   thorpej 	struct isa_dma_state *ids;
    421   1.4   mycroft 	int chan;
    422   1.1   mycroft {
    423   1.1   mycroft 
    424  1.26   thorpej 	if (chan < 0 || chan > 7) {
    425  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    426  1.34   thorpej 		panic("_isa_dmaabort");
    427  1.26   thorpej 	}
    428   1.1   mycroft 
    429  1.34   thorpej 	_isa_dmamask(ids, chan);
    430  1.34   thorpej 	bus_dmamap_unload(ids->ids_dmat, ids->ids_dmamaps[chan]);
    431  1.34   thorpej 	ids->ids_dmareads &= ~(1 << chan);
    432  1.22   mycroft }
    433  1.22   mycroft 
    434  1.26   thorpej bus_size_t
    435  1.34   thorpej _isa_dmacount(ids, chan)
    436  1.34   thorpej 	struct isa_dma_state *ids;
    437  1.22   mycroft 	int chan;
    438  1.22   mycroft {
    439  1.22   mycroft 	int waport;
    440  1.26   thorpej 	bus_size_t nbytes;
    441  1.23   mycroft 	int ochan = chan & 3;
    442  1.22   mycroft 
    443  1.26   thorpej 	if (chan < 0 || chan > 7) {
    444  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    445  1.26   thorpej 		panic("isa_dmacount");
    446  1.26   thorpej 	}
    447  1.22   mycroft 
    448  1.34   thorpej 	_isa_dmamask(ids, chan);
    449  1.23   mycroft 
    450  1.24   mycroft 	/*
    451  1.24   mycroft 	 * We have to shift the byte count by 1.  If we're in auto-initialize
    452  1.24   mycroft 	 * mode, the count may have wrapped around to the initial value.  We
    453  1.24   mycroft 	 * can't use the TC bit to check for this case, so instead we compare
    454  1.24   mycroft 	 * against the original byte count.
    455  1.24   mycroft 	 * If we're not in auto-initialize mode, then the count will wrap to
    456  1.24   mycroft 	 * -1, so we also handle that case.
    457  1.24   mycroft 	 */
    458  1.24   mycroft 	if ((chan & 4) == 0) {
    459  1.24   mycroft 		waport = DMA1_CHN(ochan);
    460  1.34   thorpej 		nbytes = bus_space_read_1(ids->ids_bst, ids->ids_dma1h,
    461  1.26   thorpej 		    waport + 1) + 1;
    462  1.34   thorpej 		nbytes += bus_space_read_1(ids->ids_bst, ids->ids_dma1h,
    463  1.26   thorpej 		    waport + 1) << 8;
    464  1.24   mycroft 		nbytes &= 0xffff;
    465  1.24   mycroft 	} else {
    466  1.24   mycroft 		waport = DMA2_CHN(ochan);
    467  1.34   thorpej 		nbytes = bus_space_read_1(ids->ids_bst, ids->ids_dma2h,
    468  1.26   thorpej 		    waport + 2) + 1;
    469  1.34   thorpej 		nbytes += bus_space_read_1(ids->ids_bst, ids->ids_dma2h,
    470  1.26   thorpej 		    waport + 2) << 8;
    471  1.24   mycroft 		nbytes <<= 1;
    472  1.24   mycroft 		nbytes &= 0x1ffff;
    473  1.24   mycroft 	}
    474  1.24   mycroft 
    475  1.34   thorpej 	if (nbytes == ids->ids_dmalength[chan])
    476  1.23   mycroft 		nbytes = 0;
    477  1.22   mycroft 
    478  1.34   thorpej 	_isa_dmaunmask(ids, chan);
    479  1.22   mycroft 	return (nbytes);
    480   1.1   mycroft }
    481   1.1   mycroft 
    482  1.13   mycroft int
    483  1.34   thorpej _isa_dmafinished(ids, chan)
    484  1.34   thorpej 	struct isa_dma_state *ids;
    485   1.5   mycroft 	int chan;
    486   1.1   mycroft {
    487   1.1   mycroft 
    488  1.26   thorpej 	if (chan < 0 || chan > 7) {
    489  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    490  1.34   thorpej 		panic("_isa_dmafinished");
    491  1.26   thorpej 	}
    492   1.1   mycroft 
    493   1.1   mycroft 	/* check that the terminal count was reached */
    494   1.1   mycroft 	if ((chan & 4) == 0)
    495  1.34   thorpej 		ids->ids_dmafinished |= bus_space_read_1(ids->ids_bst,
    496  1.34   thorpej 		    ids->ids_dma1h, DMA1_SR) & 0x0f;
    497   1.1   mycroft 	else
    498  1.34   thorpej 		ids->ids_dmafinished |= (bus_space_read_1(ids->ids_bst,
    499  1.34   thorpej 		    ids->ids_dma2h, DMA2_SR) & 0x0f) << 4;
    500  1.14   mycroft 
    501  1.34   thorpej 	return ((ids->ids_dmafinished & (1 << chan)) != 0);
    502  1.13   mycroft }
    503  1.13   mycroft 
    504  1.13   mycroft void
    505  1.34   thorpej _isa_dmadone(ids, chan)
    506  1.34   thorpej 	struct isa_dma_state *ids;
    507  1.13   mycroft 	int chan;
    508  1.13   mycroft {
    509  1.26   thorpej 	bus_dmamap_t dmam;
    510  1.13   mycroft 
    511  1.26   thorpej 	if (chan < 0 || chan > 7) {
    512  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    513  1.34   thorpej 		panic("_isa_dmadone");
    514  1.26   thorpej 	}
    515  1.26   thorpej 
    516  1.34   thorpej 	dmam = ids->ids_dmamaps[chan];
    517  1.26   thorpej 
    518  1.34   thorpej 	_isa_dmamask(ids, chan);
    519  1.14   mycroft 
    520  1.34   thorpej 	if (_isa_dmafinished(ids, chan) == 0)
    521  1.34   thorpej 		printf("%s: _isa_dmadone: channel %d not finished\n",
    522  1.34   thorpej 		    ids->ids_dev->dv_xname, chan);
    523  1.23   mycroft 
    524  1.34   thorpej 	bus_dmamap_sync(ids->ids_dmat, dmam, 0, dmam->dm_mapsize,
    525  1.34   thorpej 	    (ids->ids_dmareads & (1 << chan)) ? BUS_DMASYNC_POSTREAD :
    526  1.26   thorpej 	    BUS_DMASYNC_POSTWRITE);
    527   1.9   mycroft 
    528  1.34   thorpej 	bus_dmamap_unload(ids->ids_dmat, dmam);
    529  1.34   thorpej 	ids->ids_dmareads &= ~(1 << chan);
    530  1.35   thorpej }
    531  1.35   thorpej 
    532  1.35   thorpej void
    533  1.35   thorpej _isa_dmafreeze(ids)
    534  1.35   thorpej 	struct isa_dma_state *ids;
    535  1.35   thorpej {
    536  1.35   thorpej 	int s;
    537  1.35   thorpej 
    538  1.35   thorpej 	s = splhigh();
    539  1.35   thorpej 
    540  1.35   thorpej 	if (ids->ids_frozen == 0) {
    541  1.35   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
    542  1.35   thorpej 		    DMA1_MASK, 0x0f);
    543  1.35   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
    544  1.35   thorpej 		    DMA2_MASK, 0x0f);
    545  1.35   thorpej 	}
    546  1.35   thorpej 
    547  1.35   thorpej 	ids->ids_frozen++;
    548  1.35   thorpej 	if (ids->ids_frozen < 1)
    549  1.35   thorpej 		panic("_isa_dmafreeze: overflow");
    550  1.35   thorpej 
    551  1.35   thorpej 	splx(s);
    552  1.35   thorpej }
    553  1.35   thorpej 
    554  1.35   thorpej void
    555  1.35   thorpej _isa_dmathaw(ids)
    556  1.35   thorpej 	struct isa_dma_state *ids;
    557  1.35   thorpej {
    558  1.35   thorpej 	int s;
    559  1.35   thorpej 
    560  1.35   thorpej 	s = splhigh();
    561  1.35   thorpej 
    562  1.35   thorpej 	ids->ids_frozen--;
    563  1.35   thorpej 	if (ids->ids_frozen < 0)
    564  1.35   thorpej 		panic("_isa_dmathaw: underflow");
    565  1.35   thorpej 
    566  1.35   thorpej 	if (ids->ids_frozen == 0) {
    567  1.35   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
    568  1.35   thorpej 		    DMA1_MASK, ids->ids_masked & 0x0f);
    569  1.35   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
    570  1.35   thorpej 		    DMA2_MASK, (ids->ids_masked >> 4) & 0x0f);
    571  1.35   thorpej 	}
    572  1.35   thorpej 
    573  1.35   thorpej 	splx(s);
    574   1.1   mycroft }
    575   1.1   mycroft 
    576   1.1   mycroft int
    577  1.34   thorpej _isa_dmamem_alloc(ids, chan, size, addrp, flags)
    578  1.34   thorpej 	struct isa_dma_state *ids;
    579  1.26   thorpej 	int chan;
    580  1.26   thorpej 	bus_size_t size;
    581  1.26   thorpej 	bus_addr_t *addrp;
    582  1.26   thorpej 	int flags;
    583  1.26   thorpej {
    584  1.26   thorpej 	bus_dma_segment_t seg;
    585  1.26   thorpej 	int error, boundary, rsegs;
    586  1.26   thorpej 
    587  1.26   thorpej 	if (chan < 0 || chan > 7) {
    588  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    589  1.34   thorpej 		panic("_isa_dmamem_alloc");
    590   1.1   mycroft 	}
    591  1.26   thorpej 
    592  1.26   thorpej 	boundary = (chan & 4) ? (1 << 17) : (1 << 16);
    593  1.26   thorpej 
    594  1.26   thorpej 	size = round_page(size);
    595  1.26   thorpej 
    596  1.34   thorpej 	error = bus_dmamem_alloc(ids->ids_dmat, size, NBPG, boundary,
    597  1.26   thorpej 	    &seg, 1, &rsegs, flags);
    598  1.26   thorpej 	if (error)
    599  1.26   thorpej 		return (error);
    600  1.26   thorpej 
    601  1.26   thorpej 	*addrp = seg.ds_addr;
    602  1.26   thorpej 	return (0);
    603   1.5   mycroft }
    604   1.5   mycroft 
    605  1.26   thorpej void
    606  1.34   thorpej _isa_dmamem_free(ids, chan, addr, size)
    607  1.34   thorpej 	struct isa_dma_state *ids;
    608  1.26   thorpej 	int chan;
    609  1.26   thorpej 	bus_addr_t addr;
    610  1.26   thorpej 	bus_size_t size;
    611  1.26   thorpej {
    612  1.26   thorpej 	bus_dma_segment_t seg;
    613  1.26   thorpej 
    614  1.26   thorpej 	if (chan < 0 || chan > 7) {
    615  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    616  1.34   thorpej 		panic("_isa_dmamem_free");
    617  1.26   thorpej 	}
    618  1.26   thorpej 
    619  1.26   thorpej 	seg.ds_addr = addr;
    620  1.26   thorpej 	seg.ds_len = size;
    621   1.5   mycroft 
    622  1.34   thorpej 	bus_dmamem_free(ids->ids_dmat, &seg, 1);
    623  1.26   thorpej }
    624   1.5   mycroft 
    625  1.26   thorpej int
    626  1.34   thorpej _isa_dmamem_map(ids, chan, addr, size, kvap, flags)
    627  1.34   thorpej 	struct isa_dma_state *ids;
    628  1.26   thorpej 	int chan;
    629  1.26   thorpej 	bus_addr_t addr;
    630  1.26   thorpej 	bus_size_t size;
    631  1.26   thorpej 	caddr_t *kvap;
    632  1.26   thorpej 	int flags;
    633  1.26   thorpej {
    634  1.26   thorpej 	bus_dma_segment_t seg;
    635  1.26   thorpej 
    636  1.26   thorpej 	if (chan < 0 || chan > 7) {
    637  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    638  1.34   thorpej 		panic("_isa_dmamem_map");
    639   1.5   mycroft 	}
    640   1.5   mycroft 
    641  1.26   thorpej 	seg.ds_addr = addr;
    642  1.26   thorpej 	seg.ds_len = size;
    643  1.26   thorpej 
    644  1.34   thorpej 	return (bus_dmamem_map(ids->ids_dmat, &seg, 1, size, kvap, flags));
    645   1.5   mycroft }
    646   1.5   mycroft 
    647   1.5   mycroft void
    648  1.34   thorpej _isa_dmamem_unmap(ids, chan, kva, size)
    649  1.34   thorpej 	struct isa_dma_state *ids;
    650  1.26   thorpej 	int chan;
    651  1.26   thorpej 	caddr_t kva;
    652  1.26   thorpej 	size_t size;
    653  1.19  christos {
    654   1.5   mycroft 
    655  1.26   thorpej 	if (chan < 0 || chan > 7) {
    656  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    657  1.34   thorpej 		panic("_isa_dmamem_unmap");
    658   1.5   mycroft 	}
    659  1.26   thorpej 
    660  1.34   thorpej 	bus_dmamem_unmap(ids->ids_dmat, kva, size);
    661  1.26   thorpej }
    662  1.26   thorpej 
    663  1.26   thorpej int
    664  1.34   thorpej _isa_dmamem_mmap(ids, chan, addr, size, off, prot, flags)
    665  1.34   thorpej 	struct isa_dma_state *ids;
    666  1.26   thorpej 	int chan;
    667  1.26   thorpej 	bus_addr_t addr;
    668  1.26   thorpej 	bus_size_t size;
    669  1.26   thorpej 	int off, prot, flags;
    670  1.26   thorpej {
    671  1.26   thorpej 	bus_dma_segment_t seg;
    672  1.26   thorpej 
    673  1.26   thorpej 	if (chan < 0 || chan > 7) {
    674  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    675  1.34   thorpej 		panic("_isa_dmamem_mmap");
    676  1.26   thorpej 	}
    677  1.26   thorpej 
    678  1.26   thorpej 	seg.ds_addr = addr;
    679  1.26   thorpej 	seg.ds_len = size;
    680  1.26   thorpej 
    681  1.34   thorpej 	return (bus_dmamem_mmap(ids->ids_dmat, &seg, 1, off, prot, flags));
    682  1.30  augustss }
    683  1.30  augustss 
    684  1.30  augustss int
    685  1.34   thorpej _isa_drq_isfree(ids, chan)
    686  1.34   thorpej 	struct isa_dma_state *ids;
    687  1.30  augustss 	int chan;
    688  1.30  augustss {
    689  1.34   thorpej 
    690  1.30  augustss 	if (chan < 0 || chan > 7) {
    691  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    692  1.34   thorpej 		panic("_isa_drq_isfree");
    693  1.30  augustss 	}
    694  1.34   thorpej 
    695  1.34   thorpej 	return ISA_DMA_DRQ_ISFREE(ids, chan);
    696  1.27  augustss }
    697  1.27  augustss 
    698  1.27  augustss void *
    699  1.34   thorpej _isa_malloc(ids, chan, size, pool, flags)
    700  1.34   thorpej 	struct isa_dma_state *ids;
    701  1.27  augustss 	int chan;
    702  1.27  augustss 	size_t size;
    703  1.27  augustss 	int pool;
    704  1.27  augustss 	int flags;
    705  1.27  augustss {
    706  1.27  augustss 	bus_addr_t addr;
    707  1.27  augustss 	caddr_t kva;
    708  1.27  augustss 	int bflags;
    709  1.27  augustss 	struct isa_mem *m;
    710  1.27  augustss 
    711  1.27  augustss 	bflags = flags & M_WAITOK ? BUS_DMA_WAITOK : BUS_DMA_NOWAIT;
    712  1.27  augustss 
    713  1.34   thorpej 	if (_isa_dmamem_alloc(ids, chan, size, &addr, bflags))
    714  1.27  augustss 		return 0;
    715  1.34   thorpej 	if (_isa_dmamem_map(ids, chan, addr, size, &kva, bflags)) {
    716  1.34   thorpej 		_isa_dmamem_free(ids, chan, addr, size);
    717  1.27  augustss 		return 0;
    718  1.27  augustss 	}
    719  1.27  augustss 	m = malloc(sizeof(*m), pool, flags);
    720  1.27  augustss 	if (m == 0) {
    721  1.34   thorpej 		_isa_dmamem_unmap(ids, chan, kva, size);
    722  1.34   thorpej 		_isa_dmamem_free(ids, chan, addr, size);
    723  1.27  augustss 		return 0;
    724  1.27  augustss 	}
    725  1.34   thorpej 	m->ids = ids;
    726  1.27  augustss 	m->chan = chan;
    727  1.27  augustss 	m->size = size;
    728  1.27  augustss 	m->addr = addr;
    729  1.27  augustss 	m->kva = kva;
    730  1.27  augustss 	m->next = isa_mem_head;
    731  1.27  augustss 	isa_mem_head = m;
    732  1.27  augustss 	return (void *)kva;
    733  1.27  augustss }
    734  1.27  augustss 
    735  1.27  augustss void
    736  1.34   thorpej _isa_free(addr, pool)
    737  1.27  augustss 	void *addr;
    738  1.27  augustss 	int pool;
    739  1.27  augustss {
    740  1.27  augustss 	struct isa_mem **mp, *m;
    741  1.27  augustss 	caddr_t kva = (caddr_t)addr;
    742  1.27  augustss 
    743  1.34   thorpej 	for(mp = &isa_mem_head; *mp && (*mp)->kva != kva;
    744  1.34   thorpej 	    mp = &(*mp)->next)
    745  1.27  augustss 		;
    746  1.27  augustss 	m = *mp;
    747  1.27  augustss 	if (!m) {
    748  1.34   thorpej 		printf("_isa_free: freeing unallocted memory\n");
    749  1.27  augustss 		return;
    750  1.27  augustss 	}
    751  1.27  augustss 	*mp = m->next;
    752  1.34   thorpej 	_isa_dmamem_unmap(m->ids, m->chan, kva, m->size);
    753  1.34   thorpej 	_isa_dmamem_free(m->ids, m->chan, m->addr, m->size);
    754  1.27  augustss 	free(m, pool);
    755  1.28  augustss }
    756  1.28  augustss 
    757  1.28  augustss int
    758  1.34   thorpej _isa_mappage(mem, off, prot)
    759  1.28  augustss 	void *mem;
    760  1.28  augustss 	int off;
    761  1.28  augustss 	int prot;
    762  1.28  augustss {
    763  1.28  augustss 	struct isa_mem *m;
    764  1.28  augustss 
    765  1.28  augustss 	for(m = isa_mem_head; m && m->kva != (caddr_t)mem; m = m->next)
    766  1.28  augustss 		;
    767  1.28  augustss 	if (!m) {
    768  1.34   thorpej 		printf("_isa_mappage: mapping unallocted memory\n");
    769  1.28  augustss 		return -1;
    770  1.28  augustss 	}
    771  1.34   thorpej 	return _isa_dmamem_mmap(m->ids, m->chan, m->addr,
    772  1.34   thorpej 	    m->size, off, prot, BUS_DMA_WAITOK);
    773   1.1   mycroft }
    774