Home | History | Annotate | Line # | Download | only in isa
isadma.c revision 1.42
      1  1.42   mycroft /*	$NetBSD: isadma.c,v 1.42 1999/03/22 07:06:09 mycroft 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.37   thorpej static u_int8_t dmamode[] = {
     71  1.37   thorpej 	/* write to device/read from device */
     72  1.17   mycroft 	DMA37MD_READ | DMA37MD_SINGLE,
     73  1.15   mycroft 	DMA37MD_WRITE | DMA37MD_SINGLE,
     74  1.40   mycroft 
     75  1.40   mycroft 	/* write to device/read from device */
     76  1.40   mycroft 	DMA37MD_READ | DMA37MD_DEMAND,
     77  1.40   mycroft 	DMA37MD_WRITE | DMA37MD_DEMAND,
     78  1.37   thorpej 
     79  1.37   thorpej 	/* write to device/read from device - DMAMODE_LOOP */
     80  1.25   mycroft 	DMA37MD_READ | DMA37MD_SINGLE | DMA37MD_LOOP,
     81  1.37   thorpej 	DMA37MD_WRITE | DMA37MD_SINGLE | DMA37MD_LOOP,
     82  1.37   thorpej 
     83  1.37   thorpej 	/* write to device/read from device - DMAMODE_LOOPDEMAND */
     84  1.37   thorpej 	DMA37MD_READ | DMA37MD_DEMAND | DMA37MD_LOOP,
     85  1.37   thorpej 	DMA37MD_WRITE | DMA37MD_DEMAND | DMA37MD_LOOP,
     86  1.15   mycroft };
     87   1.1   mycroft 
     88  1.34   thorpej static inline void _isa_dmaunmask __P((struct isa_dma_state *, int));
     89  1.34   thorpej static inline void _isa_dmamask __P((struct isa_dma_state *, int));
     90  1.19  christos 
     91  1.26   thorpej static inline void
     92  1.34   thorpej _isa_dmaunmask(ids, chan)
     93  1.34   thorpej 	struct isa_dma_state *ids;
     94  1.23   mycroft 	int chan;
     95  1.23   mycroft {
     96  1.23   mycroft 	int ochan = chan & 3;
     97  1.23   mycroft 
     98  1.35   thorpej 	ISA_DMA_MASK_CLR(ids, chan);
     99  1.35   thorpej 
    100  1.35   thorpej 	/*
    101  1.35   thorpej 	 * If DMA is frozen, don't unmask it now.  It will be
    102  1.35   thorpej 	 * unmasked when DMA is thawed again.
    103  1.35   thorpej 	 */
    104  1.35   thorpej 	if (ids->ids_frozen)
    105  1.35   thorpej 		return;
    106  1.35   thorpej 
    107  1.23   mycroft 	/* set dma channel mode, and set dma channel mode */
    108  1.23   mycroft 	if ((chan & 4) == 0)
    109  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
    110  1.26   thorpej 		    DMA1_SMSK, ochan | DMA37SM_CLEAR);
    111  1.23   mycroft 	else
    112  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
    113  1.26   thorpej 		    DMA2_SMSK, ochan | DMA37SM_CLEAR);
    114  1.23   mycroft }
    115  1.23   mycroft 
    116  1.26   thorpej static inline void
    117  1.34   thorpej _isa_dmamask(ids, chan)
    118  1.34   thorpej 	struct isa_dma_state *ids;
    119  1.23   mycroft 	int chan;
    120  1.23   mycroft {
    121  1.23   mycroft 	int ochan = chan & 3;
    122  1.23   mycroft 
    123  1.35   thorpej 	ISA_DMA_MASK_SET(ids, chan);
    124  1.35   thorpej 
    125  1.35   thorpej 	/*
    126  1.35   thorpej 	 * XXX Should we avoid masking the channel if DMA is
    127  1.35   thorpej 	 * XXX frozen?  It seems like what we're doing should
    128  1.35   thorpej 	 * XXX be safe, and we do need to reset FFC...
    129  1.35   thorpej 	 */
    130  1.35   thorpej 
    131  1.23   mycroft 	/* set dma channel mode, and set dma channel mode */
    132  1.23   mycroft 	if ((chan & 4) == 0) {
    133  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
    134  1.26   thorpej 		    DMA1_SMSK, ochan | DMA37SM_SET);
    135  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
    136  1.26   thorpej 		    DMA1_FFC, 0);
    137  1.23   mycroft 	} else {
    138  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
    139  1.26   thorpej 		    DMA2_SMSK, ochan | DMA37SM_SET);
    140  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
    141  1.26   thorpej 		    DMA2_FFC, 0);
    142  1.23   mycroft 	}
    143  1.23   mycroft }
    144  1.23   mycroft 
    145   1.1   mycroft /*
    146  1.34   thorpej  * _isa_dmainit(): Initialize the isa_dma_state for this chipset.
    147  1.34   thorpej  */
    148  1.34   thorpej void
    149  1.34   thorpej _isa_dmainit(ids, bst, dmat, dev)
    150  1.34   thorpej 	struct isa_dma_state *ids;
    151  1.34   thorpej 	bus_space_tag_t bst;
    152  1.34   thorpej 	bus_dma_tag_t dmat;
    153  1.34   thorpej 	struct device *dev;
    154  1.34   thorpej {
    155  1.34   thorpej 
    156  1.34   thorpej 	ids->ids_dev = dev;
    157  1.34   thorpej 
    158  1.34   thorpej 	if (ids->ids_initialized) {
    159  1.34   thorpej 		/*
    160  1.34   thorpej 		 * Some systems may have e.g. `ofisa' (OpenFirmware
    161  1.34   thorpej 		 * configuration of ISA bus) and a regular `isa'.
    162  1.34   thorpej 		 * We allow both to call the initialization function,
    163  1.34   thorpej 		 * and take the device name from the last caller
    164  1.34   thorpej 		 * (assuming it will be the indirect ISA bus).  Since
    165  1.34   thorpej 		 * `ofisa' and `isa' are the same bus with different
    166  1.34   thorpej 		 * configuration mechanisms, the space and dma tags
    167  1.34   thorpej 		 * must be the same!
    168  1.34   thorpej 		 */
    169  1.34   thorpej 		if (ids->ids_bst != bst || ids->ids_dmat != dmat)
    170  1.34   thorpej 			panic("_isa_dmainit: inconsistent ISA tags");
    171  1.34   thorpej 	} else {
    172  1.34   thorpej 		ids->ids_bst = bst;
    173  1.34   thorpej 		ids->ids_dmat = dmat;
    174  1.34   thorpej 
    175  1.34   thorpej 		/*
    176  1.34   thorpej 		 * Map the registers used by the ISA DMA controller.
    177  1.34   thorpej 		 */
    178  1.34   thorpej 		if (bus_space_map(ids->ids_bst, IO_DMA1, DMA1_IOSIZE, 0,
    179  1.34   thorpej 		    &ids->ids_dma1h))
    180  1.34   thorpej 			panic("_isa_dmainit: unable to map DMA controller #1");
    181  1.34   thorpej 		if (bus_space_map(ids->ids_bst, IO_DMA2, DMA2_IOSIZE, 0,
    182  1.34   thorpej 		    &ids->ids_dma2h))
    183  1.34   thorpej 			panic("_isa_dmainit: unable to map DMA controller #2");
    184  1.34   thorpej 		if (bus_space_map(ids->ids_bst, IO_DMAPG, 0xf, 0,
    185  1.34   thorpej 		    &ids->ids_dmapgh))
    186  1.34   thorpej 			panic("_isa_dmainit: unable to map DMA page registers");
    187  1.34   thorpej 
    188  1.35   thorpej 		/*
    189  1.35   thorpej 		 * All 8 DMA channels start out "masked".
    190  1.35   thorpej 		 */
    191  1.35   thorpej 		ids->ids_masked = 0xff;
    192  1.35   thorpej 
    193  1.34   thorpej 		ids->ids_initialized = 1;
    194  1.38   thorpej 
    195  1.38   thorpej 		/*
    196  1.38   thorpej 		 * DRQ 4 is used to chain the two 8237s together; make
    197  1.38   thorpej 		 * sure it's always cascaded, and that it will be unmasked
    198  1.38   thorpej 		 * when DMA is thawed.
    199  1.38   thorpej 		 */
    200  1.38   thorpej 		_isa_dmacascade(ids, 4);
    201  1.34   thorpej 	}
    202  1.34   thorpej }
    203  1.34   thorpej 
    204  1.34   thorpej /*
    205  1.34   thorpej  * _isa_dmacascade(): program 8237 DMA controller channel to accept
    206   1.1   mycroft  * external dma control by a board.
    207   1.1   mycroft  */
    208  1.36   thorpej int
    209  1.34   thorpej _isa_dmacascade(ids, chan)
    210  1.34   thorpej 	struct isa_dma_state *ids;
    211   1.4   mycroft 	int chan;
    212   1.1   mycroft {
    213  1.23   mycroft 	int ochan = chan & 3;
    214   1.4   mycroft 
    215  1.26   thorpej 	if (chan < 0 || chan > 7) {
    216  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    217  1.36   thorpej 		return (EINVAL);
    218  1.26   thorpej 	}
    219  1.26   thorpej 
    220  1.34   thorpej 	if (ISA_DMA_DRQ_ISFREE(ids, chan) == 0) {
    221  1.34   thorpej 		printf("%s: DRQ %d is not free\n", ids->ids_dev->dv_xname,
    222  1.34   thorpej 		    chan);
    223  1.36   thorpej 		return (EAGAIN);
    224  1.26   thorpej 	}
    225  1.26   thorpej 
    226  1.34   thorpej 	ISA_DMA_DRQ_ALLOC(ids, chan);
    227   1.1   mycroft 
    228   1.1   mycroft 	/* set dma channel mode, and set dma channel mode */
    229  1.23   mycroft 	if ((chan & 4) == 0)
    230  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
    231  1.26   thorpej 		    DMA1_MODE, ochan | DMA37MD_CASCADE);
    232  1.26   thorpej 	else
    233  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
    234  1.26   thorpej 		    DMA2_MODE, ochan | DMA37MD_CASCADE);
    235  1.26   thorpej 
    236  1.34   thorpej 	_isa_dmaunmask(ids, chan);
    237  1.36   thorpej 	return (0);
    238  1.26   thorpej }
    239  1.26   thorpej 
    240  1.26   thorpej int
    241  1.34   thorpej _isa_dmamap_create(ids, chan, size, flags)
    242  1.34   thorpej 	struct isa_dma_state *ids;
    243  1.26   thorpej 	int chan;
    244  1.26   thorpej 	bus_size_t size;
    245  1.26   thorpej 	int flags;
    246  1.26   thorpej {
    247  1.26   thorpej 	bus_size_t maxsize;
    248  1.42   mycroft 	int error;
    249  1.26   thorpej 
    250  1.26   thorpej 	if (chan < 0 || chan > 7) {
    251  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    252  1.36   thorpej 		return (EINVAL);
    253  1.26   thorpej 	}
    254  1.26   thorpej 
    255  1.26   thorpej 	if (chan & 4)
    256  1.26   thorpej 		maxsize = (1 << 17);
    257  1.23   mycroft 	else
    258  1.26   thorpej 		maxsize = (1 << 16);
    259  1.26   thorpej 
    260  1.26   thorpej 	if (size > maxsize)
    261  1.26   thorpej 		return (EINVAL);
    262  1.26   thorpej 
    263  1.34   thorpej 	if (ISA_DMA_DRQ_ISFREE(ids, chan) == 0) {
    264  1.34   thorpej 		printf("%s: drq %d is not free\n", ids->ids_dev->dv_xname,
    265  1.34   thorpej 		    chan);
    266  1.36   thorpej 		return (EAGAIN);
    267  1.26   thorpej 	}
    268  1.15   mycroft 
    269  1.34   thorpej 	ISA_DMA_DRQ_ALLOC(ids, chan);
    270  1.26   thorpej 
    271  1.42   mycroft 	error = bus_dmamap_create(ids->ids_dmat, size, 1, size, maxsize,
    272  1.42   mycroft 	    flags, &ids->ids_dmamaps[chan]);
    273  1.42   mycroft 
    274  1.42   mycroft 	if (error)
    275  1.42   mycroft 		ISA_DMA_DRQ_FREE(ids, chan);
    276  1.42   mycroft 
    277  1.42   mycroft 	return (error);
    278  1.26   thorpej }
    279  1.26   thorpej 
    280  1.26   thorpej void
    281  1.34   thorpej _isa_dmamap_destroy(ids, chan)
    282  1.34   thorpej 	struct isa_dma_state *ids;
    283  1.26   thorpej 	int chan;
    284  1.26   thorpej {
    285  1.26   thorpej 
    286  1.26   thorpej 	if (chan < 0 || chan > 7) {
    287  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    288  1.26   thorpej 		goto lose;
    289  1.26   thorpej 	}
    290  1.26   thorpej 
    291  1.34   thorpej 	if (ISA_DMA_DRQ_ISFREE(ids, chan)) {
    292  1.26   thorpej 		printf("%s: drq %d is already free\n",
    293  1.34   thorpej 		    ids->ids_dev->dv_xname, chan);
    294  1.26   thorpej 		goto lose;
    295  1.26   thorpej 	}
    296  1.26   thorpej 
    297  1.34   thorpej 	ISA_DMA_DRQ_FREE(ids, chan);
    298  1.26   thorpej 
    299  1.34   thorpej 	bus_dmamap_destroy(ids->ids_dmat, ids->ids_dmamaps[chan]);
    300  1.26   thorpej 	return;
    301  1.26   thorpej 
    302  1.26   thorpej  lose:
    303  1.34   thorpej 	panic("_isa_dmamap_destroy");
    304   1.1   mycroft }
    305   1.1   mycroft 
    306   1.1   mycroft /*
    307  1.34   thorpej  * _isa_dmastart(): program 8237 DMA controller channel and set it
    308  1.26   thorpej  * in motion.
    309   1.1   mycroft  */
    310  1.26   thorpej int
    311  1.34   thorpej _isa_dmastart(ids, chan, addr, nbytes, p, flags, busdmaflags)
    312  1.34   thorpej 	struct isa_dma_state *ids;
    313  1.26   thorpej 	int chan;
    314  1.26   thorpej 	void *addr;
    315  1.26   thorpej 	bus_size_t nbytes;
    316  1.26   thorpej 	struct proc *p;
    317   1.5   mycroft 	int flags;
    318  1.26   thorpej 	int busdmaflags;
    319   1.1   mycroft {
    320  1.26   thorpej 	bus_dmamap_t dmam;
    321  1.26   thorpej 	bus_addr_t dmaaddr;
    322   1.1   mycroft 	int waport;
    323  1.23   mycroft 	int ochan = chan & 3;
    324  1.26   thorpej 	int error;
    325  1.26   thorpej 
    326  1.26   thorpej 	if (chan < 0 || chan > 7) {
    327  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    328  1.26   thorpej 		goto lose;
    329  1.26   thorpej 	}
    330  1.26   thorpej 
    331  1.26   thorpej #ifdef ISADMA_DEBUG
    332  1.34   thorpej 	printf("_isa_dmastart: drq %d, addr %p, nbytes 0x%lx, p %p, "
    333  1.26   thorpej 	    "flags 0x%x, dmaflags 0x%x\n",
    334  1.26   thorpej 	    chan, addr, nbytes, p, flags, busdmaflags);
    335  1.26   thorpej #endif
    336  1.26   thorpej 
    337  1.26   thorpej 	if (chan & 4) {
    338  1.26   thorpej 		if (nbytes > (1 << 17) || nbytes & 1 || (u_long)addr & 1) {
    339  1.26   thorpej 			printf("%s: drq %d, nbytes 0x%lx, addr %p\n",
    340  1.34   thorpej 			    ids->ids_dev->dv_xname, chan, nbytes, addr);
    341  1.26   thorpej 			goto lose;
    342  1.26   thorpej 		}
    343  1.26   thorpej 	} else {
    344  1.26   thorpej 		if (nbytes > (1 << 16)) {
    345  1.26   thorpej 			printf("%s: drq %d, nbytes 0x%lx\n",
    346  1.34   thorpej 			    ids->ids_dev->dv_xname, chan, nbytes);
    347  1.26   thorpej 			goto lose;
    348  1.26   thorpej 		}
    349  1.26   thorpej 	}
    350  1.26   thorpej 
    351  1.34   thorpej 	dmam = ids->ids_dmamaps[chan];
    352  1.31  augustss 	if (dmam == NULL)
    353  1.34   thorpej 		panic("_isa_dmastart: no DMA map for chan %d\n", chan);
    354  1.26   thorpej 
    355  1.34   thorpej 	error = bus_dmamap_load(ids->ids_dmat, dmam, addr, nbytes,
    356  1.26   thorpej 	    p, busdmaflags);
    357  1.26   thorpej 	if (error)
    358  1.26   thorpej 		return (error);
    359   1.1   mycroft 
    360  1.13   mycroft #ifdef ISADMA_DEBUG
    361  1.26   thorpej 	__asm(".globl isa_dmastart_afterload ; isa_dmastart_afterload:");
    362   1.4   mycroft #endif
    363   1.1   mycroft 
    364  1.26   thorpej 	if (flags & DMAMODE_READ) {
    365  1.34   thorpej 		bus_dmamap_sync(ids->ids_dmat, dmam, 0, dmam->dm_mapsize,
    366  1.33   thorpej 		    BUS_DMASYNC_PREREAD);
    367  1.34   thorpej 		ids->ids_dmareads |= (1 << chan);
    368  1.26   thorpej 	} else {
    369  1.34   thorpej 		bus_dmamap_sync(ids->ids_dmat, dmam, 0, dmam->dm_mapsize,
    370  1.33   thorpej 		    BUS_DMASYNC_PREWRITE);
    371  1.34   thorpej 		ids->ids_dmareads &= ~(1 << chan);
    372   1.1   mycroft 	}
    373   1.1   mycroft 
    374  1.26   thorpej 	dmaaddr = dmam->dm_segs[0].ds_addr;
    375  1.26   thorpej 
    376  1.26   thorpej #ifdef ISADMA_DEBUG
    377  1.26   thorpej 	printf("     dmaaddr 0x%lx\n", dmaaddr);
    378  1.26   thorpej 
    379  1.26   thorpej 	__asm(".globl isa_dmastart_aftersync ; isa_dmastart_aftersync:");
    380  1.26   thorpej #endif
    381  1.24   mycroft 
    382  1.34   thorpej 	ids->ids_dmalength[chan] = nbytes;
    383   1.1   mycroft 
    384  1.34   thorpej 	_isa_dmamask(ids, chan);
    385  1.34   thorpej 	ids->ids_dmafinished &= ~(1 << chan);
    386  1.14   mycroft 
    387   1.1   mycroft 	if ((chan & 4) == 0) {
    388  1.23   mycroft 		/* set dma channel mode */
    389  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h, DMA1_MODE,
    390  1.26   thorpej 		    ochan | dmamode[flags]);
    391   1.1   mycroft 
    392   1.1   mycroft 		/* send start address */
    393  1.23   mycroft 		waport = DMA1_CHN(ochan);
    394  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dmapgh,
    395  1.26   thorpej 		    dmapageport[0][ochan], (dmaaddr >> 16) & 0xff);
    396  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h, waport,
    397  1.26   thorpej 		    dmaaddr & 0xff);
    398  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h, waport,
    399  1.26   thorpej 		    (dmaaddr >> 8) & 0xff);
    400   1.1   mycroft 
    401   1.1   mycroft 		/* send count */
    402  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h, waport + 1,
    403  1.26   thorpej 		    (--nbytes) & 0xff);
    404  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h, waport + 1,
    405  1.26   thorpej 		    (nbytes >> 8) & 0xff);
    406   1.1   mycroft 	} else {
    407  1.23   mycroft 		/* set dma channel mode */
    408  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h, DMA2_MODE,
    409  1.26   thorpej 		    ochan | dmamode[flags]);
    410   1.1   mycroft 
    411   1.1   mycroft 		/* send start address */
    412  1.23   mycroft 		waport = DMA2_CHN(ochan);
    413  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dmapgh,
    414  1.26   thorpej 		    dmapageport[1][ochan], (dmaaddr >> 16) & 0xff);
    415  1.26   thorpej 		dmaaddr >>= 1;
    416  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h, waport,
    417  1.26   thorpej 		    dmaaddr & 0xff);
    418  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h, waport,
    419  1.26   thorpej 		    (dmaaddr >> 8) & 0xff);
    420   1.1   mycroft 
    421   1.1   mycroft 		/* send count */
    422   1.1   mycroft 		nbytes >>= 1;
    423  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h, waport + 2,
    424  1.26   thorpej 		    (--nbytes) & 0xff);
    425  1.34   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h, waport + 2,
    426  1.26   thorpej 		    (nbytes >> 8) & 0xff);
    427  1.23   mycroft 	}
    428   1.1   mycroft 
    429  1.34   thorpej 	_isa_dmaunmask(ids, chan);
    430  1.26   thorpej 	return (0);
    431  1.26   thorpej 
    432  1.26   thorpej  lose:
    433  1.34   thorpej 	panic("_isa_dmastart");
    434   1.1   mycroft }
    435   1.1   mycroft 
    436   1.1   mycroft void
    437  1.34   thorpej _isa_dmaabort(ids, chan)
    438  1.34   thorpej 	struct isa_dma_state *ids;
    439   1.4   mycroft 	int chan;
    440   1.1   mycroft {
    441   1.1   mycroft 
    442  1.26   thorpej 	if (chan < 0 || chan > 7) {
    443  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    444  1.34   thorpej 		panic("_isa_dmaabort");
    445  1.26   thorpej 	}
    446   1.1   mycroft 
    447  1.34   thorpej 	_isa_dmamask(ids, chan);
    448  1.34   thorpej 	bus_dmamap_unload(ids->ids_dmat, ids->ids_dmamaps[chan]);
    449  1.34   thorpej 	ids->ids_dmareads &= ~(1 << chan);
    450  1.22   mycroft }
    451  1.22   mycroft 
    452  1.26   thorpej bus_size_t
    453  1.34   thorpej _isa_dmacount(ids, chan)
    454  1.34   thorpej 	struct isa_dma_state *ids;
    455  1.22   mycroft 	int chan;
    456  1.22   mycroft {
    457  1.22   mycroft 	int waport;
    458  1.26   thorpej 	bus_size_t nbytes;
    459  1.23   mycroft 	int ochan = chan & 3;
    460  1.22   mycroft 
    461  1.26   thorpej 	if (chan < 0 || chan > 7) {
    462  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    463  1.26   thorpej 		panic("isa_dmacount");
    464  1.26   thorpej 	}
    465  1.22   mycroft 
    466  1.34   thorpej 	_isa_dmamask(ids, chan);
    467  1.23   mycroft 
    468  1.24   mycroft 	/*
    469  1.24   mycroft 	 * We have to shift the byte count by 1.  If we're in auto-initialize
    470  1.24   mycroft 	 * mode, the count may have wrapped around to the initial value.  We
    471  1.24   mycroft 	 * can't use the TC bit to check for this case, so instead we compare
    472  1.24   mycroft 	 * against the original byte count.
    473  1.24   mycroft 	 * If we're not in auto-initialize mode, then the count will wrap to
    474  1.24   mycroft 	 * -1, so we also handle that case.
    475  1.24   mycroft 	 */
    476  1.24   mycroft 	if ((chan & 4) == 0) {
    477  1.24   mycroft 		waport = DMA1_CHN(ochan);
    478  1.34   thorpej 		nbytes = bus_space_read_1(ids->ids_bst, ids->ids_dma1h,
    479  1.26   thorpej 		    waport + 1) + 1;
    480  1.34   thorpej 		nbytes += bus_space_read_1(ids->ids_bst, ids->ids_dma1h,
    481  1.26   thorpej 		    waport + 1) << 8;
    482  1.24   mycroft 		nbytes &= 0xffff;
    483  1.24   mycroft 	} else {
    484  1.24   mycroft 		waport = DMA2_CHN(ochan);
    485  1.34   thorpej 		nbytes = bus_space_read_1(ids->ids_bst, ids->ids_dma2h,
    486  1.26   thorpej 		    waport + 2) + 1;
    487  1.34   thorpej 		nbytes += bus_space_read_1(ids->ids_bst, ids->ids_dma2h,
    488  1.26   thorpej 		    waport + 2) << 8;
    489  1.24   mycroft 		nbytes <<= 1;
    490  1.24   mycroft 		nbytes &= 0x1ffff;
    491  1.24   mycroft 	}
    492  1.24   mycroft 
    493  1.34   thorpej 	if (nbytes == ids->ids_dmalength[chan])
    494  1.23   mycroft 		nbytes = 0;
    495  1.22   mycroft 
    496  1.34   thorpej 	_isa_dmaunmask(ids, chan);
    497  1.22   mycroft 	return (nbytes);
    498   1.1   mycroft }
    499   1.1   mycroft 
    500  1.13   mycroft int
    501  1.34   thorpej _isa_dmafinished(ids, chan)
    502  1.34   thorpej 	struct isa_dma_state *ids;
    503   1.5   mycroft 	int chan;
    504   1.1   mycroft {
    505   1.1   mycroft 
    506  1.26   thorpej 	if (chan < 0 || chan > 7) {
    507  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    508  1.34   thorpej 		panic("_isa_dmafinished");
    509  1.26   thorpej 	}
    510   1.1   mycroft 
    511   1.1   mycroft 	/* check that the terminal count was reached */
    512   1.1   mycroft 	if ((chan & 4) == 0)
    513  1.34   thorpej 		ids->ids_dmafinished |= bus_space_read_1(ids->ids_bst,
    514  1.34   thorpej 		    ids->ids_dma1h, DMA1_SR) & 0x0f;
    515   1.1   mycroft 	else
    516  1.34   thorpej 		ids->ids_dmafinished |= (bus_space_read_1(ids->ids_bst,
    517  1.34   thorpej 		    ids->ids_dma2h, DMA2_SR) & 0x0f) << 4;
    518  1.14   mycroft 
    519  1.34   thorpej 	return ((ids->ids_dmafinished & (1 << chan)) != 0);
    520  1.13   mycroft }
    521  1.13   mycroft 
    522  1.13   mycroft void
    523  1.34   thorpej _isa_dmadone(ids, chan)
    524  1.34   thorpej 	struct isa_dma_state *ids;
    525  1.13   mycroft 	int chan;
    526  1.13   mycroft {
    527  1.26   thorpej 	bus_dmamap_t dmam;
    528  1.13   mycroft 
    529  1.26   thorpej 	if (chan < 0 || chan > 7) {
    530  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    531  1.34   thorpej 		panic("_isa_dmadone");
    532  1.26   thorpej 	}
    533  1.26   thorpej 
    534  1.34   thorpej 	dmam = ids->ids_dmamaps[chan];
    535  1.26   thorpej 
    536  1.34   thorpej 	_isa_dmamask(ids, chan);
    537  1.14   mycroft 
    538  1.34   thorpej 	if (_isa_dmafinished(ids, chan) == 0)
    539  1.34   thorpej 		printf("%s: _isa_dmadone: channel %d not finished\n",
    540  1.34   thorpej 		    ids->ids_dev->dv_xname, chan);
    541  1.23   mycroft 
    542  1.34   thorpej 	bus_dmamap_sync(ids->ids_dmat, dmam, 0, dmam->dm_mapsize,
    543  1.34   thorpej 	    (ids->ids_dmareads & (1 << chan)) ? BUS_DMASYNC_POSTREAD :
    544  1.26   thorpej 	    BUS_DMASYNC_POSTWRITE);
    545   1.9   mycroft 
    546  1.34   thorpej 	bus_dmamap_unload(ids->ids_dmat, dmam);
    547  1.34   thorpej 	ids->ids_dmareads &= ~(1 << chan);
    548  1.35   thorpej }
    549  1.35   thorpej 
    550  1.35   thorpej void
    551  1.35   thorpej _isa_dmafreeze(ids)
    552  1.35   thorpej 	struct isa_dma_state *ids;
    553  1.35   thorpej {
    554  1.35   thorpej 	int s;
    555  1.35   thorpej 
    556  1.35   thorpej 	s = splhigh();
    557  1.35   thorpej 
    558  1.35   thorpej 	if (ids->ids_frozen == 0) {
    559  1.35   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
    560  1.35   thorpej 		    DMA1_MASK, 0x0f);
    561  1.35   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
    562  1.35   thorpej 		    DMA2_MASK, 0x0f);
    563  1.35   thorpej 	}
    564  1.35   thorpej 
    565  1.35   thorpej 	ids->ids_frozen++;
    566  1.35   thorpej 	if (ids->ids_frozen < 1)
    567  1.35   thorpej 		panic("_isa_dmafreeze: overflow");
    568  1.35   thorpej 
    569  1.35   thorpej 	splx(s);
    570  1.35   thorpej }
    571  1.35   thorpej 
    572  1.35   thorpej void
    573  1.35   thorpej _isa_dmathaw(ids)
    574  1.35   thorpej 	struct isa_dma_state *ids;
    575  1.35   thorpej {
    576  1.35   thorpej 	int s;
    577  1.35   thorpej 
    578  1.35   thorpej 	s = splhigh();
    579  1.35   thorpej 
    580  1.35   thorpej 	ids->ids_frozen--;
    581  1.35   thorpej 	if (ids->ids_frozen < 0)
    582  1.35   thorpej 		panic("_isa_dmathaw: underflow");
    583  1.35   thorpej 
    584  1.35   thorpej 	if (ids->ids_frozen == 0) {
    585  1.35   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
    586  1.35   thorpej 		    DMA1_MASK, ids->ids_masked & 0x0f);
    587  1.35   thorpej 		bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
    588  1.35   thorpej 		    DMA2_MASK, (ids->ids_masked >> 4) & 0x0f);
    589  1.35   thorpej 	}
    590  1.35   thorpej 
    591  1.35   thorpej 	splx(s);
    592   1.1   mycroft }
    593   1.1   mycroft 
    594   1.1   mycroft int
    595  1.34   thorpej _isa_dmamem_alloc(ids, chan, size, addrp, flags)
    596  1.34   thorpej 	struct isa_dma_state *ids;
    597  1.26   thorpej 	int chan;
    598  1.26   thorpej 	bus_size_t size;
    599  1.26   thorpej 	bus_addr_t *addrp;
    600  1.26   thorpej 	int flags;
    601  1.26   thorpej {
    602  1.26   thorpej 	bus_dma_segment_t seg;
    603  1.26   thorpej 	int error, boundary, rsegs;
    604  1.26   thorpej 
    605  1.26   thorpej 	if (chan < 0 || chan > 7) {
    606  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    607  1.34   thorpej 		panic("_isa_dmamem_alloc");
    608   1.1   mycroft 	}
    609  1.26   thorpej 
    610  1.26   thorpej 	boundary = (chan & 4) ? (1 << 17) : (1 << 16);
    611  1.26   thorpej 
    612  1.26   thorpej 	size = round_page(size);
    613  1.26   thorpej 
    614  1.34   thorpej 	error = bus_dmamem_alloc(ids->ids_dmat, size, NBPG, boundary,
    615  1.26   thorpej 	    &seg, 1, &rsegs, flags);
    616  1.26   thorpej 	if (error)
    617  1.26   thorpej 		return (error);
    618  1.26   thorpej 
    619  1.26   thorpej 	*addrp = seg.ds_addr;
    620  1.26   thorpej 	return (0);
    621   1.5   mycroft }
    622   1.5   mycroft 
    623  1.26   thorpej void
    624  1.34   thorpej _isa_dmamem_free(ids, chan, addr, size)
    625  1.34   thorpej 	struct isa_dma_state *ids;
    626  1.26   thorpej 	int chan;
    627  1.26   thorpej 	bus_addr_t addr;
    628  1.26   thorpej 	bus_size_t size;
    629  1.26   thorpej {
    630  1.26   thorpej 	bus_dma_segment_t seg;
    631  1.26   thorpej 
    632  1.26   thorpej 	if (chan < 0 || chan > 7) {
    633  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    634  1.34   thorpej 		panic("_isa_dmamem_free");
    635  1.26   thorpej 	}
    636  1.26   thorpej 
    637  1.26   thorpej 	seg.ds_addr = addr;
    638  1.26   thorpej 	seg.ds_len = size;
    639   1.5   mycroft 
    640  1.34   thorpej 	bus_dmamem_free(ids->ids_dmat, &seg, 1);
    641  1.26   thorpej }
    642   1.5   mycroft 
    643  1.26   thorpej int
    644  1.34   thorpej _isa_dmamem_map(ids, chan, addr, size, kvap, flags)
    645  1.34   thorpej 	struct isa_dma_state *ids;
    646  1.26   thorpej 	int chan;
    647  1.26   thorpej 	bus_addr_t addr;
    648  1.26   thorpej 	bus_size_t size;
    649  1.26   thorpej 	caddr_t *kvap;
    650  1.26   thorpej 	int flags;
    651  1.26   thorpej {
    652  1.26   thorpej 	bus_dma_segment_t seg;
    653  1.26   thorpej 
    654  1.26   thorpej 	if (chan < 0 || chan > 7) {
    655  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    656  1.34   thorpej 		panic("_isa_dmamem_map");
    657   1.5   mycroft 	}
    658   1.5   mycroft 
    659  1.26   thorpej 	seg.ds_addr = addr;
    660  1.26   thorpej 	seg.ds_len = size;
    661  1.26   thorpej 
    662  1.34   thorpej 	return (bus_dmamem_map(ids->ids_dmat, &seg, 1, size, kvap, flags));
    663   1.5   mycroft }
    664   1.5   mycroft 
    665   1.5   mycroft void
    666  1.34   thorpej _isa_dmamem_unmap(ids, chan, kva, size)
    667  1.34   thorpej 	struct isa_dma_state *ids;
    668  1.26   thorpej 	int chan;
    669  1.26   thorpej 	caddr_t kva;
    670  1.26   thorpej 	size_t size;
    671  1.19  christos {
    672   1.5   mycroft 
    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_unmap");
    676   1.5   mycroft 	}
    677  1.26   thorpej 
    678  1.34   thorpej 	bus_dmamem_unmap(ids->ids_dmat, kva, size);
    679  1.26   thorpej }
    680  1.26   thorpej 
    681  1.26   thorpej int
    682  1.34   thorpej _isa_dmamem_mmap(ids, chan, addr, size, off, prot, flags)
    683  1.34   thorpej 	struct isa_dma_state *ids;
    684  1.26   thorpej 	int chan;
    685  1.26   thorpej 	bus_addr_t addr;
    686  1.26   thorpej 	bus_size_t size;
    687  1.26   thorpej 	int off, prot, flags;
    688  1.26   thorpej {
    689  1.26   thorpej 	bus_dma_segment_t seg;
    690  1.26   thorpej 
    691  1.26   thorpej 	if (chan < 0 || chan > 7) {
    692  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    693  1.34   thorpej 		panic("_isa_dmamem_mmap");
    694  1.26   thorpej 	}
    695  1.39       mrg 
    696  1.39       mrg 	if (off < 0)
    697  1.39       mrg 		return (-1);
    698  1.26   thorpej 
    699  1.26   thorpej 	seg.ds_addr = addr;
    700  1.26   thorpej 	seg.ds_len = size;
    701  1.26   thorpej 
    702  1.34   thorpej 	return (bus_dmamem_mmap(ids->ids_dmat, &seg, 1, off, prot, flags));
    703  1.30  augustss }
    704  1.30  augustss 
    705  1.30  augustss int
    706  1.34   thorpej _isa_drq_isfree(ids, chan)
    707  1.34   thorpej 	struct isa_dma_state *ids;
    708  1.30  augustss 	int chan;
    709  1.30  augustss {
    710  1.34   thorpej 
    711  1.30  augustss 	if (chan < 0 || chan > 7) {
    712  1.34   thorpej 		printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
    713  1.34   thorpej 		panic("_isa_drq_isfree");
    714  1.30  augustss 	}
    715  1.34   thorpej 
    716  1.34   thorpej 	return ISA_DMA_DRQ_ISFREE(ids, chan);
    717  1.27  augustss }
    718  1.27  augustss 
    719  1.27  augustss void *
    720  1.34   thorpej _isa_malloc(ids, chan, size, pool, flags)
    721  1.34   thorpej 	struct isa_dma_state *ids;
    722  1.27  augustss 	int chan;
    723  1.27  augustss 	size_t size;
    724  1.27  augustss 	int pool;
    725  1.27  augustss 	int flags;
    726  1.27  augustss {
    727  1.27  augustss 	bus_addr_t addr;
    728  1.27  augustss 	caddr_t kva;
    729  1.27  augustss 	int bflags;
    730  1.27  augustss 	struct isa_mem *m;
    731  1.27  augustss 
    732  1.27  augustss 	bflags = flags & M_WAITOK ? BUS_DMA_WAITOK : BUS_DMA_NOWAIT;
    733  1.27  augustss 
    734  1.34   thorpej 	if (_isa_dmamem_alloc(ids, chan, size, &addr, bflags))
    735  1.27  augustss 		return 0;
    736  1.34   thorpej 	if (_isa_dmamem_map(ids, chan, addr, size, &kva, bflags)) {
    737  1.34   thorpej 		_isa_dmamem_free(ids, chan, addr, size);
    738  1.27  augustss 		return 0;
    739  1.27  augustss 	}
    740  1.27  augustss 	m = malloc(sizeof(*m), pool, flags);
    741  1.27  augustss 	if (m == 0) {
    742  1.34   thorpej 		_isa_dmamem_unmap(ids, chan, kva, size);
    743  1.34   thorpej 		_isa_dmamem_free(ids, chan, addr, size);
    744  1.27  augustss 		return 0;
    745  1.27  augustss 	}
    746  1.34   thorpej 	m->ids = ids;
    747  1.27  augustss 	m->chan = chan;
    748  1.27  augustss 	m->size = size;
    749  1.27  augustss 	m->addr = addr;
    750  1.27  augustss 	m->kva = kva;
    751  1.27  augustss 	m->next = isa_mem_head;
    752  1.27  augustss 	isa_mem_head = m;
    753  1.27  augustss 	return (void *)kva;
    754  1.27  augustss }
    755  1.27  augustss 
    756  1.27  augustss void
    757  1.34   thorpej _isa_free(addr, pool)
    758  1.27  augustss 	void *addr;
    759  1.27  augustss 	int pool;
    760  1.27  augustss {
    761  1.27  augustss 	struct isa_mem **mp, *m;
    762  1.27  augustss 	caddr_t kva = (caddr_t)addr;
    763  1.27  augustss 
    764  1.34   thorpej 	for(mp = &isa_mem_head; *mp && (*mp)->kva != kva;
    765  1.34   thorpej 	    mp = &(*mp)->next)
    766  1.27  augustss 		;
    767  1.27  augustss 	m = *mp;
    768  1.27  augustss 	if (!m) {
    769  1.34   thorpej 		printf("_isa_free: freeing unallocted memory\n");
    770  1.27  augustss 		return;
    771  1.27  augustss 	}
    772  1.27  augustss 	*mp = m->next;
    773  1.34   thorpej 	_isa_dmamem_unmap(m->ids, m->chan, kva, m->size);
    774  1.34   thorpej 	_isa_dmamem_free(m->ids, m->chan, m->addr, m->size);
    775  1.27  augustss 	free(m, pool);
    776  1.28  augustss }
    777  1.28  augustss 
    778  1.28  augustss int
    779  1.34   thorpej _isa_mappage(mem, off, prot)
    780  1.28  augustss 	void *mem;
    781  1.28  augustss 	int off;
    782  1.28  augustss 	int prot;
    783  1.28  augustss {
    784  1.28  augustss 	struct isa_mem *m;
    785  1.28  augustss 
    786  1.28  augustss 	for(m = isa_mem_head; m && m->kva != (caddr_t)mem; m = m->next)
    787  1.28  augustss 		;
    788  1.28  augustss 	if (!m) {
    789  1.34   thorpej 		printf("_isa_mappage: mapping unallocted memory\n");
    790  1.28  augustss 		return -1;
    791  1.28  augustss 	}
    792  1.34   thorpej 	return _isa_dmamem_mmap(m->ids, m->chan, m->addr,
    793  1.34   thorpej 	    m->size, off, prot, BUS_DMA_WAITOK);
    794   1.1   mycroft }
    795