|
|
1.1 root 1: /*
2: * QEMU DMA emulation
3: *
4: * Copyright (c) 2003-2004 Vassili Karpov (malc)
5: *
6: * Permission is hereby granted, free of charge, to any person obtaining a copy
7: * of this software and associated documentation files (the "Software"), to deal
8: * in the Software without restriction, including without limitation the rights
9: * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10: * copies of the Software, and to permit persons to whom the Software is
11: * furnished to do so, subject to the following conditions:
12: *
13: * The above copyright notice and this permission notice shall be included in
14: * all copies or substantial portions of the Software.
15: *
16: * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17: * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18: * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19: * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20: * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21: * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22: * THE SOFTWARE.
23: */
1.1.1.3 root 24: #include "hw.h"
25: #include "isa.h"
1.1 root 26:
27: /* #define DEBUG_DMA */
28:
29: #define dolog(...) fprintf (stderr, "dma: " __VA_ARGS__)
30: #ifdef DEBUG_DMA
31: #define linfo(...) fprintf (stderr, "dma: " __VA_ARGS__)
32: #define ldebug(...) fprintf (stderr, "dma: " __VA_ARGS__)
33: #else
34: #define linfo(...)
35: #define ldebug(...)
36: #endif
37:
38: struct dma_regs {
39: int now[2];
40: uint16_t base[2];
41: uint8_t mode;
42: uint8_t page;
43: uint8_t pageh;
44: uint8_t dack;
45: uint8_t eop;
46: DMA_transfer_handler transfer_handler;
47: void *opaque;
48: };
49:
50: #define ADDR 0
51: #define COUNT 1
52:
53: static struct dma_cont {
54: uint8_t status;
55: uint8_t command;
56: uint8_t mask;
57: uint8_t flip_flop;
58: int dshift;
59: struct dma_regs regs[4];
1.1.1.7 root 60: qemu_irq *cpu_request_exit;
1.1 root 61: } dma_controllers[2];
62:
63: enum {
64: CMD_MEMORY_TO_MEMORY = 0x01,
65: CMD_FIXED_ADDRESS = 0x02,
66: CMD_BLOCK_CONTROLLER = 0x04,
67: CMD_COMPRESSED_TIME = 0x08,
68: CMD_CYCLIC_PRIORITY = 0x10,
69: CMD_EXTENDED_WRITE = 0x20,
70: CMD_LOW_DREQ = 0x40,
71: CMD_LOW_DACK = 0x80,
72: CMD_NOT_SUPPORTED = CMD_MEMORY_TO_MEMORY | CMD_FIXED_ADDRESS
73: | CMD_COMPRESSED_TIME | CMD_CYCLIC_PRIORITY | CMD_EXTENDED_WRITE
74: | CMD_LOW_DREQ | CMD_LOW_DACK
75:
76: };
77:
1.1.1.4 root 78: static void DMA_run (void);
79:
1.1 root 80: static int channels[8] = {-1, 2, 3, 1, -1, -1, -1, 0};
81:
82: static void write_page (void *opaque, uint32_t nport, uint32_t data)
83: {
84: struct dma_cont *d = opaque;
85: int ichan;
86:
87: ichan = channels[nport & 7];
88: if (-1 == ichan) {
89: dolog ("invalid channel %#x %#x\n", nport, data);
90: return;
91: }
92: d->regs[ichan].page = data;
93: }
94:
95: static void write_pageh (void *opaque, uint32_t nport, uint32_t data)
96: {
97: struct dma_cont *d = opaque;
98: int ichan;
99:
100: ichan = channels[nport & 7];
101: if (-1 == ichan) {
102: dolog ("invalid channel %#x %#x\n", nport, data);
103: return;
104: }
105: d->regs[ichan].pageh = data;
106: }
107:
108: static uint32_t read_page (void *opaque, uint32_t nport)
109: {
110: struct dma_cont *d = opaque;
111: int ichan;
112:
113: ichan = channels[nport & 7];
114: if (-1 == ichan) {
115: dolog ("invalid channel read %#x\n", nport);
116: return 0;
117: }
118: return d->regs[ichan].page;
119: }
120:
121: static uint32_t read_pageh (void *opaque, uint32_t nport)
122: {
123: struct dma_cont *d = opaque;
124: int ichan;
125:
126: ichan = channels[nport & 7];
127: if (-1 == ichan) {
128: dolog ("invalid channel read %#x\n", nport);
129: return 0;
130: }
131: return d->regs[ichan].pageh;
132: }
133:
134: static inline void init_chan (struct dma_cont *d, int ichan)
135: {
136: struct dma_regs *r;
137:
138: r = d->regs + ichan;
139: r->now[ADDR] = r->base[ADDR] << d->dshift;
140: r->now[COUNT] = 0;
141: }
142:
143: static inline int getff (struct dma_cont *d)
144: {
145: int ff;
146:
147: ff = d->flip_flop;
148: d->flip_flop = !ff;
149: return ff;
150: }
151:
152: static uint32_t read_chan (void *opaque, uint32_t nport)
153: {
154: struct dma_cont *d = opaque;
155: int ichan, nreg, iport, ff, val, dir;
156: struct dma_regs *r;
157:
158: iport = (nport >> d->dshift) & 0x0f;
159: ichan = iport >> 1;
160: nreg = iport & 1;
161: r = d->regs + ichan;
162:
163: dir = ((r->mode >> 5) & 1) ? -1 : 1;
164: ff = getff (d);
165: if (nreg)
166: val = (r->base[COUNT] << d->dshift) - r->now[COUNT];
167: else
168: val = r->now[ADDR] + r->now[COUNT] * dir;
169:
170: ldebug ("read_chan %#x -> %d\n", iport, val);
171: return (val >> (d->dshift + (ff << 3))) & 0xff;
172: }
173:
174: static void write_chan (void *opaque, uint32_t nport, uint32_t data)
175: {
176: struct dma_cont *d = opaque;
177: int iport, ichan, nreg;
178: struct dma_regs *r;
179:
180: iport = (nport >> d->dshift) & 0x0f;
181: ichan = iport >> 1;
182: nreg = iport & 1;
183: r = d->regs + ichan;
184: if (getff (d)) {
185: r->base[nreg] = (r->base[nreg] & 0xff) | ((data << 8) & 0xff00);
186: init_chan (d, ichan);
187: } else {
188: r->base[nreg] = (r->base[nreg] & 0xff00) | (data & 0xff);
189: }
190: }
191:
192: static void write_cont (void *opaque, uint32_t nport, uint32_t data)
193: {
194: struct dma_cont *d = opaque;
195: int iport, ichan = 0;
196:
197: iport = (nport >> d->dshift) & 0x0f;
198: switch (iport) {
199: case 0x08: /* command */
200: if ((data != 0) && (data & CMD_NOT_SUPPORTED)) {
201: dolog ("command %#x not supported\n", data);
202: return;
203: }
204: d->command = data;
205: break;
206:
207: case 0x09:
208: ichan = data & 3;
209: if (data & 4) {
210: d->status |= 1 << (ichan + 4);
211: }
212: else {
213: d->status &= ~(1 << (ichan + 4));
214: }
215: d->status &= ~(1 << ichan);
1.1.1.4 root 216: DMA_run();
1.1 root 217: break;
218:
219: case 0x0a: /* single mask */
220: if (data & 4)
221: d->mask |= 1 << (data & 3);
222: else
223: d->mask &= ~(1 << (data & 3));
1.1.1.4 root 224: DMA_run();
1.1 root 225: break;
226:
227: case 0x0b: /* mode */
228: {
229: ichan = data & 3;
230: #ifdef DEBUG_DMA
231: {
232: int op, ai, dir, opmode;
233: op = (data >> 2) & 3;
234: ai = (data >> 4) & 1;
235: dir = (data >> 5) & 1;
236: opmode = (data >> 6) & 3;
237:
238: linfo ("ichan %d, op %d, ai %d, dir %d, opmode %d\n",
239: ichan, op, ai, dir, opmode);
240: }
241: #endif
242: d->regs[ichan].mode = data;
243: break;
244: }
245:
246: case 0x0c: /* clear flip flop */
247: d->flip_flop = 0;
248: break;
249:
250: case 0x0d: /* reset */
251: d->flip_flop = 0;
252: d->mask = ~0;
253: d->status = 0;
254: d->command = 0;
255: break;
256:
257: case 0x0e: /* clear mask for all channels */
258: d->mask = 0;
1.1.1.4 root 259: DMA_run();
1.1 root 260: break;
261:
262: case 0x0f: /* write mask for all channels */
263: d->mask = data;
1.1.1.4 root 264: DMA_run();
1.1 root 265: break;
266:
267: default:
268: dolog ("unknown iport %#x\n", iport);
269: break;
270: }
271:
272: #ifdef DEBUG_DMA
273: if (0xc != iport) {
274: linfo ("write_cont: nport %#06x, ichan % 2d, val %#06x\n",
275: nport, ichan, data);
276: }
277: #endif
278: }
279:
280: static uint32_t read_cont (void *opaque, uint32_t nport)
281: {
282: struct dma_cont *d = opaque;
283: int iport, val;
284:
285: iport = (nport >> d->dshift) & 0x0f;
286: switch (iport) {
287: case 0x08: /* status */
288: val = d->status;
289: d->status &= 0xf0;
290: break;
291: case 0x0f: /* mask */
292: val = d->mask;
293: break;
294: default:
295: val = 0;
296: break;
297: }
298:
299: ldebug ("read_cont: nport %#06x, iport %#04x val %#x\n", nport, iport, val);
300: return val;
301: }
302:
303: int DMA_get_channel_mode (int nchan)
304: {
305: return dma_controllers[nchan > 3].regs[nchan & 3].mode;
306: }
307:
308: void DMA_hold_DREQ (int nchan)
309: {
310: int ncont, ichan;
311:
312: ncont = nchan > 3;
313: ichan = nchan & 3;
314: linfo ("held cont=%d chan=%d\n", ncont, ichan);
315: dma_controllers[ncont].status |= 1 << (ichan + 4);
1.1.1.4 root 316: DMA_run();
1.1 root 317: }
318:
319: void DMA_release_DREQ (int nchan)
320: {
321: int ncont, ichan;
322:
323: ncont = nchan > 3;
324: ichan = nchan & 3;
325: linfo ("released cont=%d chan=%d\n", ncont, ichan);
326: dma_controllers[ncont].status &= ~(1 << (ichan + 4));
1.1.1.4 root 327: DMA_run();
1.1 root 328: }
329:
330: static void channel_run (int ncont, int ichan)
331: {
332: int n;
333: struct dma_regs *r = &dma_controllers[ncont].regs[ichan];
334: #ifdef DEBUG_DMA
335: int dir, opmode;
336:
337: dir = (r->mode >> 5) & 1;
338: opmode = (r->mode >> 6) & 3;
339:
340: if (dir) {
341: dolog ("DMA in address decrement mode\n");
342: }
343: if (opmode != 1) {
344: dolog ("DMA not in single mode select %#x\n", opmode);
345: }
346: #endif
347:
348: n = r->transfer_handler (r->opaque, ichan + (ncont << 2),
349: r->now[COUNT], (r->base[COUNT] + 1) << ncont);
350: r->now[COUNT] = n;
351: ldebug ("dma_pos %d size %d\n", n, (r->base[COUNT] + 1) << ncont);
352: }
353:
1.1.1.4 root 354: static QEMUBH *dma_bh;
355:
356: static void DMA_run (void)
1.1 root 357: {
358: struct dma_cont *d;
359: int icont, ichan;
1.1.1.4 root 360: int rearm = 0;
1.1.1.8 ! root 361: static int running = 0;
! 362:
! 363: if (running) {
! 364: rearm = 1;
! 365: goto out;
! 366: } else {
! 367: running = 1;
! 368: }
1.1 root 369:
370: d = dma_controllers;
371:
372: for (icont = 0; icont < 2; icont++, d++) {
373: for (ichan = 0; ichan < 4; ichan++) {
374: int mask;
375:
376: mask = 1 << ichan;
377:
1.1.1.4 root 378: if ((0 == (d->mask & mask)) && (0 != (d->status & (mask << 4)))) {
1.1 root 379: channel_run (icont, ichan);
1.1.1.4 root 380: rearm = 1;
381: }
1.1 root 382: }
383: }
1.1.1.4 root 384:
1.1.1.8 ! root 385: running = 0;
! 386: out:
1.1.1.4 root 387: if (rearm)
388: qemu_bh_schedule_idle(dma_bh);
389: }
390:
391: static void DMA_run_bh(void *unused)
392: {
393: DMA_run();
1.1 root 394: }
395:
396: void DMA_register_channel (int nchan,
397: DMA_transfer_handler transfer_handler,
398: void *opaque)
399: {
400: struct dma_regs *r;
401: int ichan, ncont;
402:
403: ncont = nchan > 3;
404: ichan = nchan & 3;
405:
406: r = dma_controllers[ncont].regs + ichan;
407: r->transfer_handler = transfer_handler;
408: r->opaque = opaque;
409: }
410:
411: int DMA_read_memory (int nchan, void *buf, int pos, int len)
412: {
413: struct dma_regs *r = &dma_controllers[nchan > 3].regs[nchan & 3];
1.1.1.3 root 414: target_phys_addr_t addr = ((r->pageh & 0x7f) << 24) | (r->page << 16) | r->now[ADDR];
1.1 root 415:
416: if (r->mode & 0x20) {
417: int i;
418: uint8_t *p = buf;
419:
420: cpu_physical_memory_read (addr - pos - len, buf, len);
421: /* What about 16bit transfers? */
422: for (i = 0; i < len >> 1; i++) {
423: uint8_t b = p[len - i - 1];
424: p[i] = b;
425: }
426: }
427: else
428: cpu_physical_memory_read (addr + pos, buf, len);
429:
430: return len;
431: }
432:
433: int DMA_write_memory (int nchan, void *buf, int pos, int len)
434: {
435: struct dma_regs *r = &dma_controllers[nchan > 3].regs[nchan & 3];
1.1.1.3 root 436: target_phys_addr_t addr = ((r->pageh & 0x7f) << 24) | (r->page << 16) | r->now[ADDR];
1.1 root 437:
438: if (r->mode & 0x20) {
439: int i;
440: uint8_t *p = buf;
441:
442: cpu_physical_memory_write (addr - pos - len, buf, len);
443: /* What about 16bit transfers? */
444: for (i = 0; i < len; i++) {
445: uint8_t b = p[len - i - 1];
446: p[i] = b;
447: }
448: }
449: else
450: cpu_physical_memory_write (addr + pos, buf, len);
451:
452: return len;
453: }
454:
455: /* request the emulator to transfer a new DMA memory block ASAP */
456: void DMA_schedule(int nchan)
457: {
1.1.1.7 root 458: struct dma_cont *d = &dma_controllers[nchan > 3];
459:
460: qemu_irq_pulse(*d->cpu_request_exit);
1.1 root 461: }
462:
463: static void dma_reset(void *opaque)
464: {
465: struct dma_cont *d = opaque;
466: write_cont (d, (0x0d << d->dshift), 0);
467: }
468:
1.1.1.4 root 469: static int dma_phony_handler (void *opaque, int nchan, int dma_pos, int dma_len)
470: {
471: dolog ("unregistered DMA channel used nchan=%d dma_pos=%d dma_len=%d\n",
472: nchan, dma_pos, dma_len);
473: return dma_pos;
474: }
475:
1.1 root 476: /* dshift = 0: 8 bit DMA, 1 = 16 bit DMA */
477: static void dma_init2(struct dma_cont *d, int base, int dshift,
1.1.1.7 root 478: int page_base, int pageh_base,
479: qemu_irq *cpu_request_exit)
1.1 root 480: {
1.1.1.4 root 481: static const int page_port_list[] = { 0x1, 0x2, 0x3, 0x7 };
1.1 root 482: int i;
483:
484: d->dshift = dshift;
1.1.1.7 root 485: d->cpu_request_exit = cpu_request_exit;
1.1 root 486: for (i = 0; i < 8; i++) {
487: register_ioport_write (base + (i << dshift), 1, 1, write_chan, d);
488: register_ioport_read (base + (i << dshift), 1, 1, read_chan, d);
489: }
1.1.1.4 root 490: for (i = 0; i < ARRAY_SIZE (page_port_list); i++) {
1.1 root 491: register_ioport_write (page_base + page_port_list[i], 1, 1,
492: write_page, d);
493: register_ioport_read (page_base + page_port_list[i], 1, 1,
494: read_page, d);
495: if (pageh_base >= 0) {
496: register_ioport_write (pageh_base + page_port_list[i], 1, 1,
497: write_pageh, d);
498: register_ioport_read (pageh_base + page_port_list[i], 1, 1,
499: read_pageh, d);
500: }
501: }
502: for (i = 0; i < 8; i++) {
503: register_ioport_write (base + ((i + 8) << dshift), 1, 1,
504: write_cont, d);
505: register_ioport_read (base + ((i + 8) << dshift), 1, 1,
506: read_cont, d);
507: }
508: qemu_register_reset(dma_reset, d);
509: dma_reset(d);
1.1.1.4 root 510: for (i = 0; i < ARRAY_SIZE (d->regs); ++i) {
511: d->regs[i].transfer_handler = dma_phony_handler;
512: }
1.1 root 513: }
514:
1.1.1.6 root 515: static const VMStateDescription vmstate_dma_regs = {
516: .name = "dma_regs",
517: .version_id = 1,
518: .minimum_version_id = 1,
519: .minimum_version_id_old = 1,
520: .fields = (VMStateField []) {
521: VMSTATE_INT32_ARRAY(now, struct dma_regs, 2),
522: VMSTATE_UINT16_ARRAY(base, struct dma_regs, 2),
523: VMSTATE_UINT8(mode, struct dma_regs),
524: VMSTATE_UINT8(page, struct dma_regs),
525: VMSTATE_UINT8(pageh, struct dma_regs),
526: VMSTATE_UINT8(dack, struct dma_regs),
527: VMSTATE_UINT8(eop, struct dma_regs),
528: VMSTATE_END_OF_LIST()
1.1 root 529: }
1.1.1.6 root 530: };
1.1 root 531:
1.1.1.6 root 532: static int dma_post_load(void *opaque, int version_id)
1.1 root 533: {
1.1.1.4 root 534: DMA_run();
535:
1.1 root 536: return 0;
537: }
538:
1.1.1.6 root 539: static const VMStateDescription vmstate_dma = {
540: .name = "dma",
541: .version_id = 1,
542: .minimum_version_id = 1,
543: .minimum_version_id_old = 1,
544: .post_load = dma_post_load,
545: .fields = (VMStateField []) {
546: VMSTATE_UINT8(command, struct dma_cont),
547: VMSTATE_UINT8(mask, struct dma_cont),
548: VMSTATE_UINT8(flip_flop, struct dma_cont),
549: VMSTATE_INT32(dshift, struct dma_cont),
550: VMSTATE_STRUCT_ARRAY(regs, struct dma_cont, 4, 1, vmstate_dma_regs, struct dma_regs),
551: VMSTATE_END_OF_LIST()
552: }
553: };
554:
1.1.1.7 root 555: void DMA_init(int high_page_enable, qemu_irq *cpu_request_exit)
1.1 root 556: {
557: dma_init2(&dma_controllers[0], 0x00, 0, 0x80,
1.1.1.7 root 558: high_page_enable ? 0x480 : -1, cpu_request_exit);
1.1 root 559: dma_init2(&dma_controllers[1], 0xc0, 1, 0x88,
1.1.1.7 root 560: high_page_enable ? 0x488 : -1, cpu_request_exit);
561: vmstate_register (NULL, 0, &vmstate_dma, &dma_controllers[0]);
562: vmstate_register (NULL, 1, &vmstate_dma, &dma_controllers[1]);
1.1.1.4 root 563:
564: dma_bh = qemu_bh_new(DMA_run_bh, NULL);
1.1 root 565: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.