Home | History | Annotate | Line # | Download | only in isa
isadma.c revision 1.36
      1  1.36   thorpej /*	$NetBSD: isadma.c,v 1.36 1998/06/25 19:18:06 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.36   thorpej int
    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.36   thorpej 		return (EINVAL);
    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.36   thorpej 		return (EAGAIN);
    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.36   thorpej 	return (0);
    220  1.26   thorpej }
    221  1.26   thorpej 
    222  1.26   thorpej int
    223  1.34   thorpej _isa_dmamap_create(ids, chan, size, flags)
    224  1.34   thorpej 	struct isa_dma_state *ids;
    225  1.26   thorpej 	int chan;
    226  1.26   thorpej 	bus_size_t size;
    227  1.26   thorpej 	int flags;
    228  1.26   thorpej {
    229  1.26   thorpej 	bus_size_t maxsize;
    230  1.26   thorpej 
    231  1.26   thorpej 	if (chan < 0 || chan > 7) {
    232  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    233  1.36   thorpej 		return (EINVAL);
    234  1.26   thorpej 	}
    235  1.26   thorpej 
    236  1.26   thorpej 	if (chan & 4)
    237  1.26   thorpej 		maxsize = (1 << 17);
    238  1.23   mycroft 	else
    239  1.26   thorpej 		maxsize = (1 << 16);
    240  1.26   thorpej 
    241  1.26   thorpej 	if (size > maxsize)
    242  1.26   thorpej 		return (EINVAL);
    243  1.26   thorpej 
    244  1.34   thorpej 	if (ISA_DMA_DRQ_ISFREE(ids, chan) == 0) {
    245  1.34   thorpej 		printf("%s: drq %d is not free\n", ids->ids_dev->dv_xname,
    246  1.34   thorpej 		    chan);
    247  1.36   thorpej 		return (EAGAIN);
    248  1.26   thorpej 	}
    249  1.15   mycroft 
    250  1.34   thorpej 	ISA_DMA_DRQ_ALLOC(ids, chan);
    251  1.26   thorpej 
    252  1.34   thorpej 	return (bus_dmamap_create(ids->ids_dmat, size, 1, size, maxsize,
    253  1.34   thorpej 	    flags, &ids->ids_dmamaps[chan]));
    254  1.26   thorpej }
    255  1.26   thorpej 
    256  1.26   thorpej void
    257  1.34   thorpej _isa_dmamap_destroy(ids, chan)
    258  1.34   thorpej 	struct isa_dma_state *ids;
    259  1.26   thorpej 	int chan;
    260  1.26   thorpej {
    261  1.26   thorpej 
    262  1.26   thorpej 	if (chan < 0 || chan > 7) {
    263  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    264  1.26   thorpej 		goto lose;
    265  1.26   thorpej 	}
    266  1.26   thorpej 
    267  1.34   thorpej 	if (ISA_DMA_DRQ_ISFREE(ids, chan)) {
    268  1.26   thorpej 		printf("%s: drq %d is already free\n",
    269  1.34   thorpej 		    ids->ids_dev->dv_xname, chan);
    270  1.26   thorpej 		goto lose;
    271  1.26   thorpej 	}
    272  1.26   thorpej 
    273  1.34   thorpej 	ISA_DMA_DRQ_FREE(ids, chan);
    274  1.26   thorpej 
    275  1.34   thorpej 	bus_dmamap_destroy(ids->ids_dmat, ids->ids_dmamaps[chan]);
    276  1.26   thorpej 	return;
    277  1.26   thorpej 
    278  1.26   thorpej  lose:
    279  1.34   thorpej 	panic("_isa_dmamap_destroy");
    280   1.1   mycroft }
    281   1.1   mycroft 
    282   1.1   mycroft /*
    283  1.34   thorpej  * _isa_dmastart(): program 8237 DMA controller channel and set it
    284  1.26   thorpej  * in motion.
    285   1.1   mycroft  */
    286  1.26   thorpej int
    287  1.34   thorpej _isa_dmastart(ids, chan, addr, nbytes, p, flags, busdmaflags)
    288  1.34   thorpej 	struct isa_dma_state *ids;
    289  1.26   thorpej 	int chan;
    290  1.26   thorpej 	void *addr;
    291  1.26   thorpej 	bus_size_t nbytes;
    292  1.26   thorpej 	struct proc *p;
    293   1.5   mycroft 	int flags;
    294  1.26   thorpej 	int busdmaflags;
    295   1.1   mycroft {
    296  1.26   thorpej 	bus_dmamap_t dmam;
    297  1.26   thorpej 	bus_addr_t dmaaddr;
    298   1.1   mycroft 	int waport;
    299  1.23   mycroft 	int ochan = chan & 3;
    300  1.26   thorpej 	int error;
    301  1.26   thorpej 
    302  1.26   thorpej 	if (chan < 0 || chan > 7) {
    303  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    304  1.26   thorpej 		goto lose;
    305  1.26   thorpej 	}
    306  1.26   thorpej 
    307  1.26   thorpej #ifdef ISADMA_DEBUG
    308  1.34   thorpej 	printf("_isa_dmastart: drq %d, addr %p, nbytes 0x%lx, p %p, "
    309  1.26   thorpej 	    "flags 0x%x, dmaflags 0x%x\n",
    310  1.26   thorpej 	    chan, addr, nbytes, p, flags, busdmaflags);
    311  1.26   thorpej #endif
    312  1.26   thorpej 
    313  1.26   thorpej 	if (chan & 4) {
    314  1.26   thorpej 		if (nbytes > (1 << 17) || nbytes & 1 || (u_long)addr & 1) {
    315  1.26   thorpej 			printf("%s: drq %d, nbytes 0x%lx, addr %p\n",
    316  1.34   thorpej 			    ids->ids_dev->dv_xname, chan, nbytes, addr);
    317  1.26   thorpej 			goto lose;
    318  1.26   thorpej 		}
    319  1.26   thorpej 	} else {
    320  1.26   thorpej 		if (nbytes > (1 << 16)) {
    321  1.26   thorpej 			printf("%s: drq %d, nbytes 0x%lx\n",
    322  1.34   thorpej 			    ids->ids_dev->dv_xname, chan, nbytes);
    323  1.26   thorpej 			goto lose;
    324  1.26   thorpej 		}
    325  1.26   thorpej 	}
    326  1.26   thorpej 
    327  1.34   thorpej 	dmam = ids->ids_dmamaps[chan];
    328  1.31  augustss 	if (dmam == NULL)
    329  1.34   thorpej 		panic("_isa_dmastart: no DMA map for chan %d\n", chan);
    330  1.26   thorpej 
    331  1.34   thorpej 	error = bus_dmamap_load(ids->ids_dmat, dmam, addr, nbytes,
    332  1.26   thorpej 	    p, busdmaflags);
    333  1.26   thorpej 	if (error)
    334  1.26   thorpej 		return (error);
    335   1.1   mycroft 
    336  1.13   mycroft #ifdef ISADMA_DEBUG
    337  1.26   thorpej 	__asm(".globl isa_dmastart_afterload ; isa_dmastart_afterload:");
    338   1.4   mycroft #endif
    339   1.1   mycroft 
    340  1.26   thorpej 	if (flags & DMAMODE_READ) {
    341  1.34   thorpej 		bus_dmamap_sync(ids->ids_dmat, dmam, 0, dmam->dm_mapsize,
    342  1.33   thorpej 		    BUS_DMASYNC_PREREAD);
    343  1.34   thorpej 		ids->ids_dmareads |= (1 << chan);
    344  1.26   thorpej 	} else {
    345  1.34   thorpej 		bus_dmamap_sync(ids->ids_dmat, dmam, 0, dmam->dm_mapsize,
    346  1.33   thorpej 		    BUS_DMASYNC_PREWRITE);
    347  1.34   thorpej 		ids->ids_dmareads &= ~(1 << chan);
    348   1.1   mycroft 	}
    349   1.1   mycroft 
    350  1.26   thorpej 	dmaaddr = dmam->dm_segs[0].ds_addr;
    351  1.26   thorpej 
    352  1.26   thorpej #ifdef ISADMA_DEBUG
    353  1.26   thorpej 	printf("     dmaaddr 0x%lx\n", dmaaddr);
    354  1.26   thorpej 
    355  1.26   thorpej 	__asm(".globl isa_dmastart_aftersync ; isa_dmastart_aftersync:");
    356  1.26   thorpej #endif
    357  1.24   mycroft 
    358  1.34   thorpej 	ids->ids_dmalength[chan] = nbytes;
    359   1.1   mycroft 
    360  1.34   thorpej 	_isa_dmamask(ids, chan);
    361  1.34   thorpej 	ids->ids_dmafinished &= ~(1 << chan);
    362  1.14   mycroft 
    363   1.1   mycroft 	if ((chan & 4) == 0) {
    364  1.23   mycroft 		/* set dma channel mode */
    365  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h, DMA1_MODE,
    366  1.26   thorpej 		    ochan | dmamode[flags]);
    367   1.1   mycroft 
    368   1.1   mycroft 		/* send start address */
    369  1.23   mycroft 		waport = DMA1_CHN(ochan);
    370  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dmapgh,
    371  1.26   thorpej 		    dmapageport[0][ochan], (dmaaddr >> 16) & 0xff);
    372  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h, waport,
    373  1.26   thorpej 		    dmaaddr & 0xff);
    374  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h, waport,
    375  1.26   thorpej 		    (dmaaddr >> 8) & 0xff);
    376   1.1   mycroft 
    377   1.1   mycroft 		/* send count */
    378  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h, waport + 1,
    379  1.26   thorpej 		    (--nbytes) & 0xff);
    380  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h, waport + 1,
    381  1.26   thorpej 		    (nbytes >> 8) & 0xff);
    382   1.1   mycroft 	} else {
    383  1.23   mycroft 		/* set dma channel mode */
    384  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h, DMA2_MODE,
    385  1.26   thorpej 		    ochan | dmamode[flags]);
    386   1.1   mycroft 
    387   1.1   mycroft 		/* send start address */
    388  1.23   mycroft 		waport = DMA2_CHN(ochan);
    389  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dmapgh,
    390  1.26   thorpej 		    dmapageport[1][ochan], (dmaaddr >> 16) & 0xff);
    391  1.26   thorpej 		dmaaddr >>= 1;
    392  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h, waport,
    393  1.26   thorpej 		    dmaaddr & 0xff);
    394  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h, waport,
    395  1.26   thorpej 		    (dmaaddr >> 8) & 0xff);
    396   1.1   mycroft 
    397   1.1   mycroft 		/* send count */
    398   1.1   mycroft 		nbytes >>= 1;
    399  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h, waport + 2,
    400  1.26   thorpej 		    (--nbytes) & 0xff);
    401  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h, waport + 2,
    402  1.26   thorpej 		    (nbytes >> 8) & 0xff);
    403  1.23   mycroft 	}
    404   1.1   mycroft 
    405  1.34   thorpej 	_isa_dmaunmask(ids, chan);
    406  1.26   thorpej 	return (0);
    407  1.26   thorpej 
    408  1.26   thorpej  lose:
    409  1.34   thorpej 	panic("_isa_dmastart");
    410   1.1   mycroft }
    411   1.1   mycroft 
    412   1.1   mycroft void
    413  1.34   thorpej _isa_dmaabort(ids, chan)
    414  1.34   thorpej 	struct isa_dma_state *ids;
    415   1.4   mycroft 	int chan;
    416   1.1   mycroft {
    417   1.1   mycroft 
    418  1.26   thorpej 	if (chan < 0 || chan > 7) {
    419  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    420  1.34   thorpej 		panic("_isa_dmaabort");
    421  1.26   thorpej 	}
    422   1.1   mycroft 
    423  1.34   thorpej 	_isa_dmamask(ids, chan);
    424  1.34   thorpej 	bus_dmamap_unload(ids->ids_dmat, ids->ids_dmamaps[chan]);
    425  1.34   thorpej 	ids->ids_dmareads &= ~(1 << chan);
    426  1.22   mycroft }
    427  1.22   mycroft 
    428  1.26   thorpej bus_size_t
    429  1.34   thorpej _isa_dmacount(ids, chan)
    430  1.34   thorpej 	struct isa_dma_state *ids;
    431  1.22   mycroft 	int chan;
    432  1.22   mycroft {
    433  1.22   mycroft 	int waport;
    434  1.26   thorpej 	bus_size_t nbytes;
    435  1.23   mycroft 	int ochan = chan & 3;
    436  1.22   mycroft 
    437  1.26   thorpej 	if (chan < 0 || chan > 7) {
    438  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    439  1.26   thorpej 		panic("isa_dmacount");
    440  1.26   thorpej 	}
    441  1.22   mycroft 
    442  1.34   thorpej 	_isa_dmamask(ids, chan);
    443  1.23   mycroft 
    444  1.24   mycroft 	/*
    445  1.24   mycroft 	 * We have to shift the byte count by 1.  If we're in auto-initialize
    446  1.24   mycroft 	 * mode, the count may have wrapped around to the initial value.  We
    447  1.24   mycroft 	 * can't use the TC bit to check for this case, so instead we compare
    448  1.24   mycroft 	 * against the original byte count.
    449  1.24   mycroft 	 * If we're not in auto-initialize mode, then the count will wrap to
    450  1.24   mycroft 	 * -1, so we also handle that case.
    451  1.24   mycroft 	 */
    452  1.24   mycroft 	if ((chan & 4) == 0) {
    453  1.24   mycroft 		waport = DMA1_CHN(ochan);
    454  1.34   thorpej 		nbytes = bus_space_read_1(ids->ids_bst, ids->ids_dma1h,
    455  1.26   thorpej 		    waport + 1) + 1;
    456  1.34   thorpej 		nbytes += bus_space_read_1(ids->ids_bst, ids->ids_dma1h,
    457  1.26   thorpej 		    waport + 1) << 8;
    458  1.24   mycroft 		nbytes &= 0xffff;
    459  1.24   mycroft 	} else {
    460  1.24   mycroft 		waport = DMA2_CHN(ochan);
    461  1.34   thorpej 		nbytes = bus_space_read_1(ids->ids_bst, ids->ids_dma2h,
    462  1.26   thorpej 		    waport + 2) + 1;
    463  1.34   thorpej 		nbytes += bus_space_read_1(ids->ids_bst, ids->ids_dma2h,
    464  1.26   thorpej 		    waport + 2) << 8;
    465  1.24   mycroft 		nbytes <<= 1;
    466  1.24   mycroft 		nbytes &= 0x1ffff;
    467  1.24   mycroft 	}
    468  1.24   mycroft 
    469  1.34   thorpej 	if (nbytes == ids->ids_dmalength[chan])
    470  1.23   mycroft 		nbytes = 0;
    471  1.22   mycroft 
    472  1.34   thorpej 	_isa_dmaunmask(ids, chan);
    473  1.22   mycroft 	return (nbytes);
    474   1.1   mycroft }
    475   1.1   mycroft 
    476  1.13   mycroft int
    477  1.34   thorpej _isa_dmafinished(ids, chan)
    478  1.34   thorpej 	struct isa_dma_state *ids;
    479   1.5   mycroft 	int chan;
    480   1.1   mycroft {
    481   1.1   mycroft 
    482  1.26   thorpej 	if (chan < 0 || chan > 7) {
    483  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    484  1.34   thorpej 		panic("_isa_dmafinished");
    485  1.26   thorpej 	}
    486   1.1   mycroft 
    487   1.1   mycroft 	/* check that the terminal count was reached */
    488   1.1   mycroft 	if ((chan & 4) == 0)
    489  1.34   thorpej 		ids->ids_dmafinished |= bus_space_read_1(ids->ids_bst,
    490  1.34   thorpej 		    ids->ids_dma1h, DMA1_SR) & 0x0f;
    491   1.1   mycroft 	else
    492  1.34   thorpej 		ids->ids_dmafinished |= (bus_space_read_1(ids->ids_bst,
    493  1.34   thorpej 		    ids->ids_dma2h, DMA2_SR) & 0x0f) << 4;
    494  1.14   mycroft 
    495  1.34   thorpej 	return ((ids->ids_dmafinished & (1 << chan)) != 0);
    496  1.13   mycroft }
    497  1.13   mycroft 
    498  1.13   mycroft void
    499  1.34   thorpej _isa_dmadone(ids, chan)
    500  1.34   thorpej 	struct isa_dma_state *ids;
    501  1.13   mycroft 	int chan;
    502  1.13   mycroft {
    503  1.26   thorpej 	bus_dmamap_t dmam;
    504  1.13   mycroft 
    505  1.26   thorpej 	if (chan < 0 || chan > 7) {
    506  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    507  1.34   thorpej 		panic("_isa_dmadone");
    508  1.26   thorpej 	}
    509  1.26   thorpej 
    510  1.34   thorpej 	dmam = ids->ids_dmamaps[chan];
    511  1.26   thorpej 
    512  1.34   thorpej 	_isa_dmamask(ids, chan);
    513  1.14   mycroft 
    514  1.34   thorpej 	if (_isa_dmafinished(ids, chan) == 0)
    515  1.34   thorpej 		printf("%s: _isa_dmadone: channel %d not finished\n",
    516  1.34   thorpej 		    ids->ids_dev->dv_xname, chan);
    517  1.23   mycroft 
    518  1.34   thorpej 	bus_dmamap_sync(ids->ids_dmat, dmam, 0, dmam->dm_mapsize,
    519  1.34   thorpej 	    (ids->ids_dmareads & (1 << chan)) ? BUS_DMASYNC_POSTREAD :
    520  1.26   thorpej 	    BUS_DMASYNC_POSTWRITE);
    521   1.9   mycroft 
    522  1.34   thorpej 	bus_dmamap_unload(ids->ids_dmat, dmam);
    523  1.34   thorpej 	ids->ids_dmareads &= ~(1 << chan);
    524  1.35   thorpej }
    525  1.35   thorpej 
    526  1.35   thorpej void
    527  1.35   thorpej _isa_dmafreeze(ids)
    528  1.35   thorpej 	struct isa_dma_state *ids;
    529  1.35   thorpej {
    530  1.35   thorpej 	int s;
    531  1.35   thorpej 
    532  1.35   thorpej 	s = splhigh();
    533  1.35   thorpej 
    534  1.35   thorpej 	if (ids->ids_frozen == 0) {
    535  1.35   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
    536  1.35   thorpej 		    DMA1_MASK, 0x0f);
    537  1.35   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
    538  1.35   thorpej 		    DMA2_MASK, 0x0f);
    539  1.35   thorpej 	}
    540  1.35   thorpej 
    541  1.35   thorpej 	ids->ids_frozen++;
    542  1.35   thorpej 	if (ids->ids_frozen < 1)
    543  1.35   thorpej 		panic("_isa_dmafreeze: overflow");
    544  1.35   thorpej 
    545  1.35   thorpej 	splx(s);
    546  1.35   thorpej }
    547  1.35   thorpej 
    548  1.35   thorpej void
    549  1.35   thorpej _isa_dmathaw(ids)
    550  1.35   thorpej 	struct isa_dma_state *ids;
    551  1.35   thorpej {
    552  1.35   thorpej 	int s;
    553  1.35   thorpej 
    554  1.35   thorpej 	s = splhigh();
    555  1.35   thorpej 
    556  1.35   thorpej 	ids->ids_frozen--;
    557  1.35   thorpej 	if (ids->ids_frozen < 0)
    558  1.35   thorpej 		panic("_isa_dmathaw: underflow");
    559  1.35   thorpej 
    560  1.35   thorpej 	if (ids->ids_frozen == 0) {
    561  1.35   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
    562  1.35   thorpej 		    DMA1_MASK, ids->ids_masked & 0x0f);
    563  1.35   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
    564  1.35   thorpej 		    DMA2_MASK, (ids->ids_masked >> 4) & 0x0f);
    565  1.35   thorpej 	}
    566  1.35   thorpej 
    567  1.35   thorpej 	splx(s);
    568   1.1   mycroft }
    569   1.1   mycroft 
    570   1.1   mycroft int
    571  1.34   thorpej _isa_dmamem_alloc(ids, chan, size, addrp, flags)
    572  1.34   thorpej 	struct isa_dma_state *ids;
    573  1.26   thorpej 	int chan;
    574  1.26   thorpej 	bus_size_t size;
    575  1.26   thorpej 	bus_addr_t *addrp;
    576  1.26   thorpej 	int flags;
    577  1.26   thorpej {
    578  1.26   thorpej 	bus_dma_segment_t seg;
    579  1.26   thorpej 	int error, boundary, rsegs;
    580  1.26   thorpej 
    581  1.26   thorpej 	if (chan < 0 || chan > 7) {
    582  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    583  1.34   thorpej 		panic("_isa_dmamem_alloc");
    584   1.1   mycroft 	}
    585  1.26   thorpej 
    586  1.26   thorpej 	boundary = (chan & 4) ? (1 << 17) : (1 << 16);
    587  1.26   thorpej 
    588  1.26   thorpej 	size = round_page(size);
    589  1.26   thorpej 
    590  1.34   thorpej 	error = bus_dmamem_alloc(ids->ids_dmat, size, NBPG, boundary,
    591  1.26   thorpej 	    &seg, 1, &rsegs, flags);
    592  1.26   thorpej 	if (error)
    593  1.26   thorpej 		return (error);
    594  1.26   thorpej 
    595  1.26   thorpej 	*addrp = seg.ds_addr;
    596  1.26   thorpej 	return (0);
    597   1.5   mycroft }
    598   1.5   mycroft 
    599  1.26   thorpej void
    600  1.34   thorpej _isa_dmamem_free(ids, chan, addr, size)
    601  1.34   thorpej 	struct isa_dma_state *ids;
    602  1.26   thorpej 	int chan;
    603  1.26   thorpej 	bus_addr_t addr;
    604  1.26   thorpej 	bus_size_t size;
    605  1.26   thorpej {
    606  1.26   thorpej 	bus_dma_segment_t seg;
    607  1.26   thorpej 
    608  1.26   thorpej 	if (chan < 0 || chan > 7) {
    609  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    610  1.34   thorpej 		panic("_isa_dmamem_free");
    611  1.26   thorpej 	}
    612  1.26   thorpej 
    613  1.26   thorpej 	seg.ds_addr = addr;
    614  1.26   thorpej 	seg.ds_len = size;
    615   1.5   mycroft 
    616  1.34   thorpej 	bus_dmamem_free(ids->ids_dmat, &seg, 1);
    617  1.26   thorpej }
    618   1.5   mycroft 
    619  1.26   thorpej int
    620  1.34   thorpej _isa_dmamem_map(ids, chan, addr, size, kvap, flags)
    621  1.34   thorpej 	struct isa_dma_state *ids;
    622  1.26   thorpej 	int chan;
    623  1.26   thorpej 	bus_addr_t addr;
    624  1.26   thorpej 	bus_size_t size;
    625  1.26   thorpej 	caddr_t *kvap;
    626  1.26   thorpej 	int flags;
    627  1.26   thorpej {
    628  1.26   thorpej 	bus_dma_segment_t seg;
    629  1.26   thorpej 
    630  1.26   thorpej 	if (chan < 0 || chan > 7) {
    631  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    632  1.34   thorpej 		panic("_isa_dmamem_map");
    633   1.5   mycroft 	}
    634   1.5   mycroft 
    635  1.26   thorpej 	seg.ds_addr = addr;
    636  1.26   thorpej 	seg.ds_len = size;
    637  1.26   thorpej 
    638  1.34   thorpej 	return (bus_dmamem_map(ids->ids_dmat, &seg, 1, size, kvap, flags));
    639   1.5   mycroft }
    640   1.5   mycroft 
    641   1.5   mycroft void
    642  1.34   thorpej _isa_dmamem_unmap(ids, chan, kva, size)
    643  1.34   thorpej 	struct isa_dma_state *ids;
    644  1.26   thorpej 	int chan;
    645  1.26   thorpej 	caddr_t kva;
    646  1.26   thorpej 	size_t size;
    647  1.19  christos {
    648   1.5   mycroft 
    649  1.26   thorpej 	if (chan < 0 || chan > 7) {
    650  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    651  1.34   thorpej 		panic("_isa_dmamem_unmap");
    652   1.5   mycroft 	}
    653  1.26   thorpej 
    654  1.34   thorpej 	bus_dmamem_unmap(ids->ids_dmat, kva, size);
    655  1.26   thorpej }
    656  1.26   thorpej 
    657  1.26   thorpej int
    658  1.34   thorpej _isa_dmamem_mmap(ids, chan, addr, size, off, prot, flags)
    659  1.34   thorpej 	struct isa_dma_state *ids;
    660  1.26   thorpej 	int chan;
    661  1.26   thorpej 	bus_addr_t addr;
    662  1.26   thorpej 	bus_size_t size;
    663  1.26   thorpej 	int off, prot, flags;
    664  1.26   thorpej {
    665  1.26   thorpej 	bus_dma_segment_t seg;
    666  1.26   thorpej 
    667  1.26   thorpej 	if (chan < 0 || chan > 7) {
    668  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    669  1.34   thorpej 		panic("_isa_dmamem_mmap");
    670  1.26   thorpej 	}
    671  1.26   thorpej 
    672  1.26   thorpej 	seg.ds_addr = addr;
    673  1.26   thorpej 	seg.ds_len = size;
    674  1.26   thorpej 
    675  1.34   thorpej 	return (bus_dmamem_mmap(ids->ids_dmat, &seg, 1, off, prot, flags));
    676  1.30  augustss }
    677  1.30  augustss 
    678  1.30  augustss int
    679  1.34   thorpej _isa_drq_isfree(ids, chan)
    680  1.34   thorpej 	struct isa_dma_state *ids;
    681  1.30  augustss 	int chan;
    682  1.30  augustss {
    683  1.34   thorpej 
    684  1.30  augustss 	if (chan < 0 || chan > 7) {
    685  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    686  1.34   thorpej 		panic("_isa_drq_isfree");
    687  1.30  augustss 	}
    688  1.34   thorpej 
    689  1.34   thorpej 	return ISA_DMA_DRQ_ISFREE(ids, chan);
    690  1.27  augustss }
    691  1.27  augustss 
    692  1.27  augustss void *
    693  1.34   thorpej _isa_malloc(ids, chan, size, pool, flags)
    694  1.34   thorpej 	struct isa_dma_state *ids;
    695  1.27  augustss 	int chan;
    696  1.27  augustss 	size_t size;
    697  1.27  augustss 	int pool;
    698  1.27  augustss 	int flags;
    699  1.27  augustss {
    700  1.27  augustss 	bus_addr_t addr;
    701  1.27  augustss 	caddr_t kva;
    702  1.27  augustss 	int bflags;
    703  1.27  augustss 	struct isa_mem *m;
    704  1.27  augustss 
    705  1.27  augustss 	bflags = flags & M_WAITOK ? BUS_DMA_WAITOK : BUS_DMA_NOWAIT;
    706  1.27  augustss 
    707  1.34   thorpej 	if (_isa_dmamem_alloc(ids, chan, size, &addr, bflags))
    708  1.27  augustss 		return 0;
    709  1.34   thorpej 	if (_isa_dmamem_map(ids, chan, addr, size, &kva, bflags)) {
    710  1.34   thorpej 		_isa_dmamem_free(ids, chan, addr, size);
    711  1.27  augustss 		return 0;
    712  1.27  augustss 	}
    713  1.27  augustss 	m = malloc(sizeof(*m), pool, flags);
    714  1.27  augustss 	if (m == 0) {
    715  1.34   thorpej 		_isa_dmamem_unmap(ids, chan, kva, size);
    716  1.34   thorpej 		_isa_dmamem_free(ids, chan, addr, size);
    717  1.27  augustss 		return 0;
    718  1.27  augustss 	}
    719  1.34   thorpej 	m->ids = ids;
    720  1.27  augustss 	m->chan = chan;
    721  1.27  augustss 	m->size = size;
    722  1.27  augustss 	m->addr = addr;
    723  1.27  augustss 	m->kva = kva;
    724  1.27  augustss 	m->next = isa_mem_head;
    725  1.27  augustss 	isa_mem_head = m;
    726  1.27  augustss 	return (void *)kva;
    727  1.27  augustss }
    728  1.27  augustss 
    729  1.27  augustss void
    730  1.34   thorpej _isa_free(addr, pool)
    731  1.27  augustss 	void *addr;
    732  1.27  augustss 	int pool;
    733  1.27  augustss {
    734  1.27  augustss 	struct isa_mem **mp, *m;
    735  1.27  augustss 	caddr_t kva = (caddr_t)addr;
    736  1.27  augustss 
    737  1.34   thorpej 	for(mp = &isa_mem_head; *mp && (*mp)->kva != kva;
    738  1.34   thorpej 	    mp = &(*mp)->next)
    739  1.27  augustss 		;
    740  1.27  augustss 	m = *mp;
    741  1.27  augustss 	if (!m) {
    742  1.34   thorpej 		printf("_isa_free: freeing unallocted memory\n");
    743  1.27  augustss 		return;
    744  1.27  augustss 	}
    745  1.27  augustss 	*mp = m->next;
    746  1.34   thorpej 	_isa_dmamem_unmap(m->ids, m->chan, kva, m->size);
    747  1.34   thorpej 	_isa_dmamem_free(m->ids, m->chan, m->addr, m->size);
    748  1.27  augustss 	free(m, pool);
    749  1.28  augustss }
    750  1.28  augustss 
    751  1.28  augustss int
    752  1.34   thorpej _isa_mappage(mem, off, prot)
    753  1.28  augustss 	void *mem;
    754  1.28  augustss 	int off;
    755  1.28  augustss 	int prot;
    756  1.28  augustss {
    757  1.28  augustss 	struct isa_mem *m;
    758  1.28  augustss 
    759  1.28  augustss 	for(m = isa_mem_head; m && m->kva != (caddr_t)mem; m = m->next)
    760  1.28  augustss 		;
    761  1.28  augustss 	if (!m) {
    762  1.34   thorpej 		printf("_isa_mappage: mapping unallocted memory\n");
    763  1.28  augustss 		return -1;
    764  1.28  augustss 	}
    765  1.34   thorpej 	return _isa_dmamem_mmap(m->ids, m->chan, m->addr,
    766  1.34   thorpej 	    m->size, off, prot, BUS_DMA_WAITOK);
    767   1.1   mycroft }
    768