xref: /openbmc/qemu/hw/dma/rc4030.c (revision 2993683b)
1 /*
2  * QEMU JAZZ RC4030 chipset
3  *
4  * Copyright (c) 2007-2009 Herve Poussineau
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  */
24 
25 #include "hw/hw.h"
26 #include "hw/mips/mips.h"
27 #include "qemu/timer.h"
28 
29 /********************************************************/
30 /* debug rc4030 */
31 
32 //#define DEBUG_RC4030
33 //#define DEBUG_RC4030_DMA
34 
35 #ifdef DEBUG_RC4030
36 #define DPRINTF(fmt, ...) \
37 do { printf("rc4030: " fmt , ## __VA_ARGS__); } while (0)
38 static const char* irq_names[] = { "parallel", "floppy", "sound", "video",
39             "network", "scsi", "keyboard", "mouse", "serial0", "serial1" };
40 #else
41 #define DPRINTF(fmt, ...)
42 #endif
43 
44 #define RC4030_ERROR(fmt, ...) \
45 do { fprintf(stderr, "rc4030 ERROR: %s: " fmt, __func__ , ## __VA_ARGS__); } while (0)
46 
47 /********************************************************/
48 /* rc4030 emulation                                     */
49 
50 typedef struct dma_pagetable_entry {
51     int32_t frame;
52     int32_t owner;
53 } QEMU_PACKED dma_pagetable_entry;
54 
55 #define DMA_PAGESIZE    4096
56 #define DMA_REG_ENABLE  1
57 #define DMA_REG_COUNT   2
58 #define DMA_REG_ADDRESS 3
59 
60 #define DMA_FLAG_ENABLE     0x0001
61 #define DMA_FLAG_MEM_TO_DEV 0x0002
62 #define DMA_FLAG_TC_INTR    0x0100
63 #define DMA_FLAG_MEM_INTR   0x0200
64 #define DMA_FLAG_ADDR_INTR  0x0400
65 
66 typedef struct rc4030State
67 {
68     uint32_t config; /* 0x0000: RC4030 config register */
69     uint32_t revision; /* 0x0008: RC4030 Revision register */
70     uint32_t invalid_address_register; /* 0x0010: Invalid Address register */
71 
72     /* DMA */
73     uint32_t dma_regs[8][4];
74     uint32_t dma_tl_base; /* 0x0018: DMA transl. table base */
75     uint32_t dma_tl_limit; /* 0x0020: DMA transl. table limit */
76 
77     /* cache */
78     uint32_t cache_maint; /* 0x0030: Cache Maintenance */
79     uint32_t remote_failed_address; /* 0x0038: Remote Failed Address */
80     uint32_t memory_failed_address; /* 0x0040: Memory Failed Address */
81     uint32_t cache_ptag; /* 0x0048: I/O Cache Physical Tag */
82     uint32_t cache_ltag; /* 0x0050: I/O Cache Logical Tag */
83     uint32_t cache_bmask; /* 0x0058: I/O Cache Byte Mask */
84 
85     uint32_t nmi_interrupt; /* 0x0200: interrupt source */
86     uint32_t offset210;
87     uint32_t nvram_protect; /* 0x0220: NV ram protect register */
88     uint32_t rem_speed[16];
89     uint32_t imr_jazz; /* Local bus int enable mask */
90     uint32_t isr_jazz; /* Local bus int source */
91 
92     /* timer */
93     QEMUTimer *periodic_timer;
94     uint32_t itr; /* Interval timer reload */
95 
96     qemu_irq timer_irq;
97     qemu_irq jazz_bus_irq;
98 
99     MemoryRegion iomem_chipset;
100     MemoryRegion iomem_jazzio;
101 } rc4030State;
102 
103 static void set_next_tick(rc4030State *s)
104 {
105     qemu_irq_lower(s->timer_irq);
106     uint32_t tm_hz;
107 
108     tm_hz = 1000 / (s->itr + 1);
109 
110     qemu_mod_timer(s->periodic_timer, qemu_get_clock_ns(vm_clock) +
111                    get_ticks_per_sec() / tm_hz);
112 }
113 
114 /* called for accesses to rc4030 */
115 static uint32_t rc4030_readl(void *opaque, hwaddr addr)
116 {
117     rc4030State *s = opaque;
118     uint32_t val;
119 
120     addr &= 0x3fff;
121     switch (addr & ~0x3) {
122     /* Global config register */
123     case 0x0000:
124         val = s->config;
125         break;
126     /* Revision register */
127     case 0x0008:
128         val = s->revision;
129         break;
130     /* Invalid Address register */
131     case 0x0010:
132         val = s->invalid_address_register;
133         break;
134     /* DMA transl. table base */
135     case 0x0018:
136         val = s->dma_tl_base;
137         break;
138     /* DMA transl. table limit */
139     case 0x0020:
140         val = s->dma_tl_limit;
141         break;
142     /* Remote Failed Address */
143     case 0x0038:
144         val = s->remote_failed_address;
145         break;
146     /* Memory Failed Address */
147     case 0x0040:
148         val = s->memory_failed_address;
149         break;
150     /* I/O Cache Byte Mask */
151     case 0x0058:
152         val = s->cache_bmask;
153         /* HACK */
154         if (s->cache_bmask == (uint32_t)-1)
155             s->cache_bmask = 0;
156         break;
157     /* Remote Speed Registers */
158     case 0x0070:
159     case 0x0078:
160     case 0x0080:
161     case 0x0088:
162     case 0x0090:
163     case 0x0098:
164     case 0x00a0:
165     case 0x00a8:
166     case 0x00b0:
167     case 0x00b8:
168     case 0x00c0:
169     case 0x00c8:
170     case 0x00d0:
171     case 0x00d8:
172     case 0x00e0:
173     case 0x00e8:
174         val = s->rem_speed[(addr - 0x0070) >> 3];
175         break;
176     /* DMA channel base address */
177     case 0x0100:
178     case 0x0108:
179     case 0x0110:
180     case 0x0118:
181     case 0x0120:
182     case 0x0128:
183     case 0x0130:
184     case 0x0138:
185     case 0x0140:
186     case 0x0148:
187     case 0x0150:
188     case 0x0158:
189     case 0x0160:
190     case 0x0168:
191     case 0x0170:
192     case 0x0178:
193     case 0x0180:
194     case 0x0188:
195     case 0x0190:
196     case 0x0198:
197     case 0x01a0:
198     case 0x01a8:
199     case 0x01b0:
200     case 0x01b8:
201     case 0x01c0:
202     case 0x01c8:
203     case 0x01d0:
204     case 0x01d8:
205     case 0x01e0:
206     case 0x01e8:
207     case 0x01f0:
208     case 0x01f8:
209         {
210             int entry = (addr - 0x0100) >> 5;
211             int idx = (addr & 0x1f) >> 3;
212             val = s->dma_regs[entry][idx];
213         }
214         break;
215     /* Interrupt source */
216     case 0x0200:
217         val = s->nmi_interrupt;
218         break;
219     /* Error type */
220     case 0x0208:
221         val = 0;
222         break;
223     /* Offset 0x0210 */
224     case 0x0210:
225         val = s->offset210;
226         break;
227     /* NV ram protect register */
228     case 0x0220:
229         val = s->nvram_protect;
230         break;
231     /* Interval timer count */
232     case 0x0230:
233         val = 0;
234         qemu_irq_lower(s->timer_irq);
235         break;
236     /* EISA interrupt */
237     case 0x0238:
238         val = 7; /* FIXME: should be read from EISA controller */
239         break;
240     default:
241         RC4030_ERROR("invalid read [" TARGET_FMT_plx "]\n", addr);
242         val = 0;
243         break;
244     }
245 
246     if ((addr & ~3) != 0x230) {
247         DPRINTF("read 0x%02x at " TARGET_FMT_plx "\n", val, addr);
248     }
249 
250     return val;
251 }
252 
253 static uint32_t rc4030_readw(void *opaque, hwaddr addr)
254 {
255     uint32_t v = rc4030_readl(opaque, addr & ~0x3);
256     if (addr & 0x2)
257         return v >> 16;
258     else
259         return v & 0xffff;
260 }
261 
262 static uint32_t rc4030_readb(void *opaque, hwaddr addr)
263 {
264     uint32_t v = rc4030_readl(opaque, addr & ~0x3);
265     return (v >> (8 * (addr & 0x3))) & 0xff;
266 }
267 
268 static void rc4030_writel(void *opaque, hwaddr addr, uint32_t val)
269 {
270     rc4030State *s = opaque;
271     addr &= 0x3fff;
272 
273     DPRINTF("write 0x%02x at " TARGET_FMT_plx "\n", val, addr);
274 
275     switch (addr & ~0x3) {
276     /* Global config register */
277     case 0x0000:
278         s->config = val;
279         break;
280     /* DMA transl. table base */
281     case 0x0018:
282         s->dma_tl_base = val;
283         break;
284     /* DMA transl. table limit */
285     case 0x0020:
286         s->dma_tl_limit = val;
287         break;
288     /* DMA transl. table invalidated */
289     case 0x0028:
290         break;
291     /* Cache Maintenance */
292     case 0x0030:
293         s->cache_maint = val;
294         break;
295     /* I/O Cache Physical Tag */
296     case 0x0048:
297         s->cache_ptag = val;
298         break;
299     /* I/O Cache Logical Tag */
300     case 0x0050:
301         s->cache_ltag = val;
302         break;
303     /* I/O Cache Byte Mask */
304     case 0x0058:
305         s->cache_bmask |= val; /* HACK */
306         break;
307     /* I/O Cache Buffer Window */
308     case 0x0060:
309         /* HACK */
310         if (s->cache_ltag == 0x80000001 && s->cache_bmask == 0xf0f0f0f) {
311             hwaddr dest = s->cache_ptag & ~0x1;
312             dest += (s->cache_maint & 0x3) << 3;
313             cpu_physical_memory_write(dest, &val, 4);
314         }
315         break;
316     /* Remote Speed Registers */
317     case 0x0070:
318     case 0x0078:
319     case 0x0080:
320     case 0x0088:
321     case 0x0090:
322     case 0x0098:
323     case 0x00a0:
324     case 0x00a8:
325     case 0x00b0:
326     case 0x00b8:
327     case 0x00c0:
328     case 0x00c8:
329     case 0x00d0:
330     case 0x00d8:
331     case 0x00e0:
332     case 0x00e8:
333         s->rem_speed[(addr - 0x0070) >> 3] = val;
334         break;
335     /* DMA channel base address */
336     case 0x0100:
337     case 0x0108:
338     case 0x0110:
339     case 0x0118:
340     case 0x0120:
341     case 0x0128:
342     case 0x0130:
343     case 0x0138:
344     case 0x0140:
345     case 0x0148:
346     case 0x0150:
347     case 0x0158:
348     case 0x0160:
349     case 0x0168:
350     case 0x0170:
351     case 0x0178:
352     case 0x0180:
353     case 0x0188:
354     case 0x0190:
355     case 0x0198:
356     case 0x01a0:
357     case 0x01a8:
358     case 0x01b0:
359     case 0x01b8:
360     case 0x01c0:
361     case 0x01c8:
362     case 0x01d0:
363     case 0x01d8:
364     case 0x01e0:
365     case 0x01e8:
366     case 0x01f0:
367     case 0x01f8:
368         {
369             int entry = (addr - 0x0100) >> 5;
370             int idx = (addr & 0x1f) >> 3;
371             s->dma_regs[entry][idx] = val;
372         }
373         break;
374     /* Offset 0x0210 */
375     case 0x0210:
376         s->offset210 = val;
377         break;
378     /* Interval timer reload */
379     case 0x0228:
380         s->itr = val;
381         qemu_irq_lower(s->timer_irq);
382         set_next_tick(s);
383         break;
384     /* EISA interrupt */
385     case 0x0238:
386         break;
387     default:
388         RC4030_ERROR("invalid write of 0x%02x at [" TARGET_FMT_plx "]\n", val, addr);
389         break;
390     }
391 }
392 
393 static void rc4030_writew(void *opaque, hwaddr addr, uint32_t val)
394 {
395     uint32_t old_val = rc4030_readl(opaque, addr & ~0x3);
396 
397     if (addr & 0x2)
398         val = (val << 16) | (old_val & 0x0000ffff);
399     else
400         val = val | (old_val & 0xffff0000);
401     rc4030_writel(opaque, addr & ~0x3, val);
402 }
403 
404 static void rc4030_writeb(void *opaque, hwaddr addr, uint32_t val)
405 {
406     uint32_t old_val = rc4030_readl(opaque, addr & ~0x3);
407 
408     switch (addr & 3) {
409     case 0:
410         val = val | (old_val & 0xffffff00);
411         break;
412     case 1:
413         val = (val << 8) | (old_val & 0xffff00ff);
414         break;
415     case 2:
416         val = (val << 16) | (old_val & 0xff00ffff);
417         break;
418     case 3:
419         val = (val << 24) | (old_val & 0x00ffffff);
420         break;
421     }
422     rc4030_writel(opaque, addr & ~0x3, val);
423 }
424 
425 static const MemoryRegionOps rc4030_ops = {
426     .old_mmio = {
427         .read = { rc4030_readb, rc4030_readw, rc4030_readl, },
428         .write = { rc4030_writeb, rc4030_writew, rc4030_writel, },
429     },
430     .endianness = DEVICE_NATIVE_ENDIAN,
431 };
432 
433 static void update_jazz_irq(rc4030State *s)
434 {
435     uint16_t pending;
436 
437     pending = s->isr_jazz & s->imr_jazz;
438 
439 #ifdef DEBUG_RC4030
440     if (s->isr_jazz != 0) {
441         uint32_t irq = 0;
442         DPRINTF("pending irqs:");
443         for (irq = 0; irq < ARRAY_SIZE(irq_names); irq++) {
444             if (s->isr_jazz & (1 << irq)) {
445                 printf(" %s", irq_names[irq]);
446                 if (!(s->imr_jazz & (1 << irq))) {
447                     printf("(ignored)");
448                 }
449             }
450         }
451         printf("\n");
452     }
453 #endif
454 
455     if (pending != 0)
456         qemu_irq_raise(s->jazz_bus_irq);
457     else
458         qemu_irq_lower(s->jazz_bus_irq);
459 }
460 
461 static void rc4030_irq_jazz_request(void *opaque, int irq, int level)
462 {
463     rc4030State *s = opaque;
464 
465     if (level) {
466         s->isr_jazz |= 1 << irq;
467     } else {
468         s->isr_jazz &= ~(1 << irq);
469     }
470 
471     update_jazz_irq(s);
472 }
473 
474 static void rc4030_periodic_timer(void *opaque)
475 {
476     rc4030State *s = opaque;
477 
478     set_next_tick(s);
479     qemu_irq_raise(s->timer_irq);
480 }
481 
482 static uint32_t jazzio_readw(void *opaque, hwaddr addr)
483 {
484     rc4030State *s = opaque;
485     uint32_t val;
486     uint32_t irq;
487     addr &= 0xfff;
488 
489     switch (addr) {
490     /* Local bus int source */
491     case 0x00: {
492         uint32_t pending = s->isr_jazz & s->imr_jazz;
493         val = 0;
494         irq = 0;
495         while (pending) {
496             if (pending & 1) {
497                 DPRINTF("returning irq %s\n", irq_names[irq]);
498                 val = (irq + 1) << 2;
499                 break;
500             }
501             irq++;
502             pending >>= 1;
503         }
504         break;
505     }
506     /* Local bus int enable mask */
507     case 0x02:
508         val = s->imr_jazz;
509         break;
510     default:
511         RC4030_ERROR("(jazz io controller) invalid read [" TARGET_FMT_plx "]\n", addr);
512         val = 0;
513     }
514 
515     DPRINTF("(jazz io controller) read 0x%04x at " TARGET_FMT_plx "\n", val, addr);
516 
517     return val;
518 }
519 
520 static uint32_t jazzio_readb(void *opaque, hwaddr addr)
521 {
522     uint32_t v;
523     v = jazzio_readw(opaque, addr & ~0x1);
524     return (v >> (8 * (addr & 0x1))) & 0xff;
525 }
526 
527 static uint32_t jazzio_readl(void *opaque, hwaddr addr)
528 {
529     uint32_t v;
530     v = jazzio_readw(opaque, addr);
531     v |= jazzio_readw(opaque, addr + 2) << 16;
532     return v;
533 }
534 
535 static void jazzio_writew(void *opaque, hwaddr addr, uint32_t val)
536 {
537     rc4030State *s = opaque;
538     addr &= 0xfff;
539 
540     DPRINTF("(jazz io controller) write 0x%04x at " TARGET_FMT_plx "\n", val, addr);
541 
542     switch (addr) {
543     /* Local bus int enable mask */
544     case 0x02:
545         s->imr_jazz = val;
546         update_jazz_irq(s);
547         break;
548     default:
549         RC4030_ERROR("(jazz io controller) invalid write of 0x%04x at [" TARGET_FMT_plx "]\n", val, addr);
550         break;
551     }
552 }
553 
554 static void jazzio_writeb(void *opaque, hwaddr addr, uint32_t val)
555 {
556     uint32_t old_val = jazzio_readw(opaque, addr & ~0x1);
557 
558     switch (addr & 1) {
559     case 0:
560         val = val | (old_val & 0xff00);
561         break;
562     case 1:
563         val = (val << 8) | (old_val & 0x00ff);
564         break;
565     }
566     jazzio_writew(opaque, addr & ~0x1, val);
567 }
568 
569 static void jazzio_writel(void *opaque, hwaddr addr, uint32_t val)
570 {
571     jazzio_writew(opaque, addr, val & 0xffff);
572     jazzio_writew(opaque, addr + 2, (val >> 16) & 0xffff);
573 }
574 
575 static const MemoryRegionOps jazzio_ops = {
576     .old_mmio = {
577         .read = { jazzio_readb, jazzio_readw, jazzio_readl, },
578         .write = { jazzio_writeb, jazzio_writew, jazzio_writel, },
579     },
580     .endianness = DEVICE_NATIVE_ENDIAN,
581 };
582 
583 static void rc4030_reset(void *opaque)
584 {
585     rc4030State *s = opaque;
586     int i;
587 
588     s->config = 0x410; /* some boards seem to accept 0x104 too */
589     s->revision = 1;
590     s->invalid_address_register = 0;
591 
592     memset(s->dma_regs, 0, sizeof(s->dma_regs));
593     s->dma_tl_base = s->dma_tl_limit = 0;
594 
595     s->remote_failed_address = s->memory_failed_address = 0;
596     s->cache_maint = 0;
597     s->cache_ptag = s->cache_ltag = 0;
598     s->cache_bmask = 0;
599 
600     s->offset210 = 0x18186;
601     s->nvram_protect = 7;
602     for (i = 0; i < 15; i++)
603         s->rem_speed[i] = 7;
604     s->imr_jazz = 0x10; /* XXX: required by firmware, but why? */
605     s->isr_jazz = 0;
606 
607     s->itr = 0;
608 
609     qemu_irq_lower(s->timer_irq);
610     qemu_irq_lower(s->jazz_bus_irq);
611 }
612 
613 static int rc4030_load(QEMUFile *f, void *opaque, int version_id)
614 {
615     rc4030State* s = opaque;
616     int i, j;
617 
618     if (version_id != 2)
619         return -EINVAL;
620 
621     s->config = qemu_get_be32(f);
622     s->invalid_address_register = qemu_get_be32(f);
623     for (i = 0; i < 8; i++)
624         for (j = 0; j < 4; j++)
625             s->dma_regs[i][j] = qemu_get_be32(f);
626     s->dma_tl_base = qemu_get_be32(f);
627     s->dma_tl_limit = qemu_get_be32(f);
628     s->cache_maint = qemu_get_be32(f);
629     s->remote_failed_address = qemu_get_be32(f);
630     s->memory_failed_address = qemu_get_be32(f);
631     s->cache_ptag = qemu_get_be32(f);
632     s->cache_ltag = qemu_get_be32(f);
633     s->cache_bmask = qemu_get_be32(f);
634     s->offset210 = qemu_get_be32(f);
635     s->nvram_protect = qemu_get_be32(f);
636     for (i = 0; i < 15; i++)
637         s->rem_speed[i] = qemu_get_be32(f);
638     s->imr_jazz = qemu_get_be32(f);
639     s->isr_jazz = qemu_get_be32(f);
640     s->itr = qemu_get_be32(f);
641 
642     set_next_tick(s);
643     update_jazz_irq(s);
644 
645     return 0;
646 }
647 
648 static void rc4030_save(QEMUFile *f, void *opaque)
649 {
650     rc4030State* s = opaque;
651     int i, j;
652 
653     qemu_put_be32(f, s->config);
654     qemu_put_be32(f, s->invalid_address_register);
655     for (i = 0; i < 8; i++)
656         for (j = 0; j < 4; j++)
657             qemu_put_be32(f, s->dma_regs[i][j]);
658     qemu_put_be32(f, s->dma_tl_base);
659     qemu_put_be32(f, s->dma_tl_limit);
660     qemu_put_be32(f, s->cache_maint);
661     qemu_put_be32(f, s->remote_failed_address);
662     qemu_put_be32(f, s->memory_failed_address);
663     qemu_put_be32(f, s->cache_ptag);
664     qemu_put_be32(f, s->cache_ltag);
665     qemu_put_be32(f, s->cache_bmask);
666     qemu_put_be32(f, s->offset210);
667     qemu_put_be32(f, s->nvram_protect);
668     for (i = 0; i < 15; i++)
669         qemu_put_be32(f, s->rem_speed[i]);
670     qemu_put_be32(f, s->imr_jazz);
671     qemu_put_be32(f, s->isr_jazz);
672     qemu_put_be32(f, s->itr);
673 }
674 
675 void rc4030_dma_memory_rw(void *opaque, hwaddr addr, uint8_t *buf, int len, int is_write)
676 {
677     rc4030State *s = opaque;
678     hwaddr entry_addr;
679     hwaddr phys_addr;
680     dma_pagetable_entry entry;
681     int index;
682     int ncpy, i;
683 
684     i = 0;
685     for (;;) {
686         if (i == len) {
687             break;
688         }
689 
690         ncpy = DMA_PAGESIZE - (addr & (DMA_PAGESIZE - 1));
691         if (ncpy > len - i)
692             ncpy = len - i;
693 
694         /* Get DMA translation table entry */
695         index = addr / DMA_PAGESIZE;
696         if (index >= s->dma_tl_limit / sizeof(dma_pagetable_entry)) {
697             break;
698         }
699         entry_addr = s->dma_tl_base + index * sizeof(dma_pagetable_entry);
700         /* XXX: not sure. should we really use only lowest bits? */
701         entry_addr &= 0x7fffffff;
702         cpu_physical_memory_read(entry_addr, &entry, sizeof(entry));
703 
704         /* Read/write data at right place */
705         phys_addr = entry.frame + (addr & (DMA_PAGESIZE - 1));
706         cpu_physical_memory_rw(phys_addr, &buf[i], ncpy, is_write);
707 
708         i += ncpy;
709         addr += ncpy;
710     }
711 }
712 
713 static void rc4030_do_dma(void *opaque, int n, uint8_t *buf, int len, int is_write)
714 {
715     rc4030State *s = opaque;
716     hwaddr dma_addr;
717     int dev_to_mem;
718 
719     s->dma_regs[n][DMA_REG_ENABLE] &= ~(DMA_FLAG_TC_INTR | DMA_FLAG_MEM_INTR | DMA_FLAG_ADDR_INTR);
720 
721     /* Check DMA channel consistency */
722     dev_to_mem = (s->dma_regs[n][DMA_REG_ENABLE] & DMA_FLAG_MEM_TO_DEV) ? 0 : 1;
723     if (!(s->dma_regs[n][DMA_REG_ENABLE] & DMA_FLAG_ENABLE) ||
724         (is_write != dev_to_mem)) {
725         s->dma_regs[n][DMA_REG_ENABLE] |= DMA_FLAG_MEM_INTR;
726         s->nmi_interrupt |= 1 << n;
727         return;
728     }
729 
730     /* Get start address and len */
731     if (len > s->dma_regs[n][DMA_REG_COUNT])
732         len = s->dma_regs[n][DMA_REG_COUNT];
733     dma_addr = s->dma_regs[n][DMA_REG_ADDRESS];
734 
735     /* Read/write data at right place */
736     rc4030_dma_memory_rw(opaque, dma_addr, buf, len, is_write);
737 
738     s->dma_regs[n][DMA_REG_ENABLE] |= DMA_FLAG_TC_INTR;
739     s->dma_regs[n][DMA_REG_COUNT] -= len;
740 
741 #ifdef DEBUG_RC4030_DMA
742     {
743         int i, j;
744         printf("rc4030 dma: Copying %d bytes %s host %p\n",
745             len, is_write ? "from" : "to", buf);
746         for (i = 0; i < len; i += 16) {
747             int n = 16;
748             if (n > len - i) {
749                 n = len - i;
750             }
751             for (j = 0; j < n; j++)
752                 printf("%02x ", buf[i + j]);
753             while (j++ < 16)
754                 printf("   ");
755             printf("| ");
756             for (j = 0; j < n; j++)
757                 printf("%c", isprint(buf[i + j]) ? buf[i + j] : '.');
758             printf("\n");
759         }
760     }
761 #endif
762 }
763 
764 struct rc4030DMAState {
765     void *opaque;
766     int n;
767 };
768 
769 void rc4030_dma_read(void *dma, uint8_t *buf, int len)
770 {
771     rc4030_dma s = dma;
772     rc4030_do_dma(s->opaque, s->n, buf, len, 0);
773 }
774 
775 void rc4030_dma_write(void *dma, uint8_t *buf, int len)
776 {
777     rc4030_dma s = dma;
778     rc4030_do_dma(s->opaque, s->n, buf, len, 1);
779 }
780 
781 static rc4030_dma *rc4030_allocate_dmas(void *opaque, int n)
782 {
783     rc4030_dma *s;
784     struct rc4030DMAState *p;
785     int i;
786 
787     s = (rc4030_dma *)g_malloc0(sizeof(rc4030_dma) * n);
788     p = (struct rc4030DMAState *)g_malloc0(sizeof(struct rc4030DMAState) * n);
789     for (i = 0; i < n; i++) {
790         p->opaque = opaque;
791         p->n = i;
792         s[i] = p;
793         p++;
794     }
795     return s;
796 }
797 
798 void *rc4030_init(qemu_irq timer, qemu_irq jazz_bus,
799                   qemu_irq **irqs, rc4030_dma **dmas,
800                   MemoryRegion *sysmem)
801 {
802     rc4030State *s;
803 
804     s = g_malloc0(sizeof(rc4030State));
805 
806     *irqs = qemu_allocate_irqs(rc4030_irq_jazz_request, s, 16);
807     *dmas = rc4030_allocate_dmas(s, 4);
808 
809     s->periodic_timer = qemu_new_timer_ns(vm_clock, rc4030_periodic_timer, s);
810     s->timer_irq = timer;
811     s->jazz_bus_irq = jazz_bus;
812 
813     qemu_register_reset(rc4030_reset, s);
814     register_savevm(NULL, "rc4030", 0, 2, rc4030_save, rc4030_load, s);
815     rc4030_reset(s);
816 
817     memory_region_init_io(&s->iomem_chipset, &rc4030_ops, s,
818                           "rc4030.chipset", 0x300);
819     memory_region_add_subregion(sysmem, 0x80000000, &s->iomem_chipset);
820     memory_region_init_io(&s->iomem_jazzio, &jazzio_ops, s,
821                           "rc4030.jazzio", 0x00001000);
822     memory_region_add_subregion(sysmem, 0xf0000000, &s->iomem_jazzio);
823 
824     return s;
825 }
826