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