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