2 * Motorola ColdFire MCF5206 SoC embedded peripheral emulation.
4 * Copyright (c) 2007 CodeSourcery.
6 * This code is licensed under the GPL
9 #include "qemu/osdep.h"
10 #include "qemu/error-report.h"
14 #include "hw/m68k/mcf.h"
15 #include "qemu/timer.h"
16 #include "hw/ptimer.h"
17 #include "sysemu/sysemu.h"
18 #include "hw/sysbus.h"
20 /* General purpose timer module. */
41 static void m5206_timer_update(m5206_timer_state
*s
)
43 if ((s
->tmr
& TMR_ORI
) != 0 && (s
->ter
& TER_REF
))
44 qemu_irq_raise(s
->irq
);
46 qemu_irq_lower(s
->irq
);
49 static void m5206_timer_reset(m5206_timer_state
*s
)
55 static void m5206_timer_recalibrate(m5206_timer_state
*s
)
60 ptimer_transaction_begin(s
->timer
);
61 ptimer_stop(s
->timer
);
63 if ((s
->tmr
& TMR_RST
) == 0) {
67 prescale
= (s
->tmr
>> 8) + 1;
68 mode
= (s
->tmr
>> 1) & 3;
72 if (mode
== 3 || mode
== 0) {
73 qemu_log_mask(LOG_UNIMP
, "m5206_timer: mode %d not implemented\n",
77 if ((s
->tmr
& TMR_FRR
) == 0) {
78 qemu_log_mask(LOG_UNIMP
,
79 "m5206_timer: free running mode not implemented\n");
83 /* Assume 66MHz system clock. */
84 ptimer_set_freq(s
->timer
, 66000000 / prescale
);
86 ptimer_set_limit(s
->timer
, s
->trr
, 0);
88 ptimer_run(s
->timer
, 0);
90 ptimer_transaction_commit(s
->timer
);
93 static void m5206_timer_trigger(void *opaque
)
95 m5206_timer_state
*s
= (m5206_timer_state
*)opaque
;
97 m5206_timer_update(s
);
100 static uint32_t m5206_timer_read(m5206_timer_state
*s
, uint32_t addr
)
110 return s
->trr
- ptimer_get_count(s
->timer
);
118 static void m5206_timer_write(m5206_timer_state
*s
, uint32_t addr
, uint32_t val
)
122 if ((s
->tmr
& TMR_RST
) != 0 && (val
& TMR_RST
) == 0) {
123 m5206_timer_reset(s
);
126 m5206_timer_recalibrate(s
);
130 m5206_timer_recalibrate(s
);
136 ptimer_transaction_begin(s
->timer
);
137 ptimer_set_count(s
->timer
, val
);
138 ptimer_transaction_commit(s
->timer
);
146 m5206_timer_update(s
);
149 static m5206_timer_state
*m5206_timer_init(qemu_irq irq
)
151 m5206_timer_state
*s
;
153 s
= g_new0(m5206_timer_state
, 1);
154 s
->timer
= ptimer_init(m5206_timer_trigger
, s
, PTIMER_POLICY_DEFAULT
);
156 m5206_timer_reset(s
);
160 /* System Integration Module. */
163 SysBusDevice parent_obj
;
168 m5206_timer_state
*timer
[2];
172 uint16_t imr
; /* 1 == interrupt is masked. */
177 /* Include the UART vector registers here. */
181 #define MCF5206_MBAR(obj) OBJECT_CHECK(m5206_mbar_state, (obj), TYPE_MCF5206_MBAR)
183 /* Interrupt controller. */
185 static int m5206_find_pending_irq(m5206_mbar_state
*s
)
194 active
= s
->ipr
& ~s
->imr
;
198 for (i
= 1; i
< 14; i
++) {
199 if (active
& (1 << i
)) {
200 if ((s
->icr
[i
] & 0x1f) > level
) {
201 level
= s
->icr
[i
] & 0x1f;
213 static void m5206_mbar_update(m5206_mbar_state
*s
)
219 irq
= m5206_find_pending_irq(s
);
223 level
= (tmp
>> 2) & 7;
239 /* Unknown vector. */
240 qemu_log_mask(LOG_UNIMP
, "%s: Unhandled vector for IRQ %d\n",
250 m68k_set_irq_level(s
->cpu
, level
, vector
);
253 static void m5206_mbar_set_irq(void *opaque
, int irq
, int level
)
255 m5206_mbar_state
*s
= (m5206_mbar_state
*)opaque
;
259 s
->ipr
&= ~(1 << irq
);
261 m5206_mbar_update(s
);
264 /* System Integration Module. */
266 static void m5206_mbar_reset(DeviceState
*dev
)
268 m5206_mbar_state
*s
= MCF5206_MBAR(dev
);
290 static uint64_t m5206_mbar_read(m5206_mbar_state
*s
,
291 uint16_t offset
, unsigned size
)
293 if (offset
>= 0x100 && offset
< 0x120) {
294 return m5206_timer_read(s
->timer
[0], offset
- 0x100);
295 } else if (offset
>= 0x120 && offset
< 0x140) {
296 return m5206_timer_read(s
->timer
[1], offset
- 0x120);
297 } else if (offset
>= 0x140 && offset
< 0x160) {
298 return mcf_uart_read(s
->uart
[0], offset
- 0x140, size
);
299 } else if (offset
>= 0x180 && offset
< 0x1a0) {
300 return mcf_uart_read(s
->uart
[1], offset
- 0x180, size
);
303 case 0x03: return s
->scr
;
304 case 0x14 ... 0x20: return s
->icr
[offset
- 0x13];
305 case 0x36: return s
->imr
;
306 case 0x3a: return s
->ipr
;
307 case 0x40: return s
->rsr
;
309 case 0x42: return s
->swivr
;
311 /* DRAM mask register. */
312 /* FIXME: currently hardcoded to 128Mb. */
315 while (mask
> ram_size
)
317 return mask
& 0x0ffe0000;
319 case 0x5c: return 1; /* DRAM bank 1 empty. */
320 case 0xcb: return s
->par
;
321 case 0x170: return s
->uivr
[0];
322 case 0x1b0: return s
->uivr
[1];
324 qemu_log_mask(LOG_GUEST_ERROR
, "%s: Bad MBAR offset 0x%"PRIx16
"\n",
329 static void m5206_mbar_write(m5206_mbar_state
*s
, uint16_t offset
,
330 uint64_t value
, unsigned size
)
332 if (offset
>= 0x100 && offset
< 0x120) {
333 m5206_timer_write(s
->timer
[0], offset
- 0x100, value
);
335 } else if (offset
>= 0x120 && offset
< 0x140) {
336 m5206_timer_write(s
->timer
[1], offset
- 0x120, value
);
338 } else if (offset
>= 0x140 && offset
< 0x160) {
339 mcf_uart_write(s
->uart
[0], offset
- 0x140, value
, size
);
341 } else if (offset
>= 0x180 && offset
< 0x1a0) {
342 mcf_uart_write(s
->uart
[1], offset
- 0x180, value
, size
);
350 s
->icr
[offset
- 0x13] = value
;
351 m5206_mbar_update(s
);
355 m5206_mbar_update(s
);
361 /* TODO: implement watchdog. */
372 case 0x178: case 0x17c: case 0x1c8: case 0x1bc:
373 /* Not implemented: UART Output port bits. */
379 qemu_log_mask(LOG_GUEST_ERROR
, "%s: Bad MBAR offset 0x%"PRIx16
"\n",
385 /* Internal peripherals use a variety of register widths.
386 This lookup table allows a single routine to handle all of them. */
387 static const uint8_t m5206_mbar_width
[] =
389 /* 000-040 */ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2,
390 /* 040-080 */ 1, 2, 2, 2, 4, 1, 2, 4, 1, 2, 4, 2, 2, 4, 2, 2,
391 /* 080-0c0 */ 4, 2, 2, 4, 2, 2, 4, 2, 2, 4, 2, 2, 4, 2, 2, 4,
392 /* 0c0-100 */ 2, 2, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
393 /* 100-140 */ 2, 2, 2, 2, 1, 0, 0, 0, 2, 2, 2, 2, 1, 0, 0, 0,
394 /* 140-180 */ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
395 /* 180-1c0 */ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
396 /* 1c0-200 */ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
399 static uint32_t m5206_mbar_readw(void *opaque
, hwaddr offset
);
400 static uint32_t m5206_mbar_readl(void *opaque
, hwaddr offset
);
402 static uint32_t m5206_mbar_readb(void *opaque
, hwaddr offset
)
404 m5206_mbar_state
*s
= (m5206_mbar_state
*)opaque
;
406 if (offset
>= 0x200) {
407 qemu_log_mask(LOG_GUEST_ERROR
, "Bad MBAR read offset 0x%" HWADDR_PRIX
,
411 if (m5206_mbar_width
[offset
>> 2] > 1) {
413 val
= m5206_mbar_readw(opaque
, offset
& ~1);
414 if ((offset
& 1) == 0) {
419 return m5206_mbar_read(s
, offset
, 1);
422 static uint32_t m5206_mbar_readw(void *opaque
, hwaddr offset
)
424 m5206_mbar_state
*s
= (m5206_mbar_state
*)opaque
;
427 if (offset
>= 0x200) {
428 qemu_log_mask(LOG_GUEST_ERROR
, "Bad MBAR read offset 0x%" HWADDR_PRIX
,
432 width
= m5206_mbar_width
[offset
>> 2];
435 val
= m5206_mbar_readl(opaque
, offset
& ~3);
436 if ((offset
& 3) == 0)
439 } else if (width
< 2) {
441 val
= m5206_mbar_readb(opaque
, offset
) << 8;
442 val
|= m5206_mbar_readb(opaque
, offset
+ 1);
445 return m5206_mbar_read(s
, offset
, 2);
448 static uint32_t m5206_mbar_readl(void *opaque
, hwaddr offset
)
450 m5206_mbar_state
*s
= (m5206_mbar_state
*)opaque
;
453 if (offset
>= 0x200) {
454 qemu_log_mask(LOG_GUEST_ERROR
, "Bad MBAR read offset 0x%" HWADDR_PRIX
,
458 width
= m5206_mbar_width
[offset
>> 2];
461 val
= m5206_mbar_readw(opaque
, offset
) << 16;
462 val
|= m5206_mbar_readw(opaque
, offset
+ 2);
465 return m5206_mbar_read(s
, offset
, 4);
468 static void m5206_mbar_writew(void *opaque
, hwaddr offset
,
470 static void m5206_mbar_writel(void *opaque
, hwaddr offset
,
473 static void m5206_mbar_writeb(void *opaque
, hwaddr offset
,
476 m5206_mbar_state
*s
= (m5206_mbar_state
*)opaque
;
479 if (offset
>= 0x200) {
480 qemu_log_mask(LOG_GUEST_ERROR
, "Bad MBAR write offset 0x%" HWADDR_PRIX
,
484 width
= m5206_mbar_width
[offset
>> 2];
487 tmp
= m5206_mbar_readw(opaque
, offset
& ~1);
489 tmp
= (tmp
& 0xff00) | value
;
491 tmp
= (tmp
& 0x00ff) | (value
<< 8);
493 m5206_mbar_writew(opaque
, offset
& ~1, tmp
);
496 m5206_mbar_write(s
, offset
, value
, 1);
499 static void m5206_mbar_writew(void *opaque
, hwaddr offset
,
502 m5206_mbar_state
*s
= (m5206_mbar_state
*)opaque
;
505 if (offset
>= 0x200) {
506 qemu_log_mask(LOG_GUEST_ERROR
, "Bad MBAR write offset 0x%" HWADDR_PRIX
,
510 width
= m5206_mbar_width
[offset
>> 2];
513 tmp
= m5206_mbar_readl(opaque
, offset
& ~3);
515 tmp
= (tmp
& 0xffff0000) | value
;
517 tmp
= (tmp
& 0x0000ffff) | (value
<< 16);
519 m5206_mbar_writel(opaque
, offset
& ~3, tmp
);
521 } else if (width
< 2) {
522 m5206_mbar_writeb(opaque
, offset
, value
>> 8);
523 m5206_mbar_writeb(opaque
, offset
+ 1, value
& 0xff);
526 m5206_mbar_write(s
, offset
, value
, 2);
529 static void m5206_mbar_writel(void *opaque
, hwaddr offset
,
532 m5206_mbar_state
*s
= (m5206_mbar_state
*)opaque
;
535 if (offset
>= 0x200) {
536 qemu_log_mask(LOG_GUEST_ERROR
, "Bad MBAR write offset 0x%" HWADDR_PRIX
,
540 width
= m5206_mbar_width
[offset
>> 2];
542 m5206_mbar_writew(opaque
, offset
, value
>> 16);
543 m5206_mbar_writew(opaque
, offset
+ 2, value
& 0xffff);
546 m5206_mbar_write(s
, offset
, value
, 4);
549 static uint64_t m5206_mbar_readfn(void *opaque
, hwaddr addr
, unsigned size
)
553 return m5206_mbar_readb(opaque
, addr
);
555 return m5206_mbar_readw(opaque
, addr
);
557 return m5206_mbar_readl(opaque
, addr
);
559 g_assert_not_reached();
563 static void m5206_mbar_writefn(void *opaque
, hwaddr addr
,
564 uint64_t value
, unsigned size
)
568 m5206_mbar_writeb(opaque
, addr
, value
);
571 m5206_mbar_writew(opaque
, addr
, value
);
574 m5206_mbar_writel(opaque
, addr
, value
);
577 g_assert_not_reached();
581 static const MemoryRegionOps m5206_mbar_ops
= {
582 .read
= m5206_mbar_readfn
,
583 .write
= m5206_mbar_writefn
,
584 .valid
.min_access_size
= 1,
585 .valid
.max_access_size
= 4,
586 .endianness
= DEVICE_NATIVE_ENDIAN
,
589 static void mcf5206_mbar_realize(DeviceState
*dev
, Error
**errp
)
591 m5206_mbar_state
*s
= MCF5206_MBAR(dev
);
593 memory_region_init_io(&s
->iomem
, NULL
, &m5206_mbar_ops
, s
,
595 sysbus_init_mmio(SYS_BUS_DEVICE(dev
), &s
->iomem
);
597 s
->pic
= qemu_allocate_irqs(m5206_mbar_set_irq
, s
, 14);
598 s
->timer
[0] = m5206_timer_init(s
->pic
[9]);
599 s
->timer
[1] = m5206_timer_init(s
->pic
[10]);
600 s
->uart
[0] = mcf_uart_init(s
->pic
[12], serial_hd(0));
601 s
->uart
[1] = mcf_uart_init(s
->pic
[13], serial_hd(1));
602 s
->cpu
= M68K_CPU(qemu_get_cpu(0));
605 static void mcf5206_mbar_class_init(ObjectClass
*oc
, void *data
)
607 DeviceClass
*dc
= DEVICE_CLASS(oc
);
609 set_bit(DEVICE_CATEGORY_MISC
, dc
->categories
);
610 dc
->desc
= "MCF5206 system integration module";
611 dc
->realize
= mcf5206_mbar_realize
;
612 dc
->reset
= m5206_mbar_reset
;
615 static const TypeInfo mcf5206_mbar_info
= {
616 .name
= TYPE_MCF5206_MBAR
,
617 .parent
= TYPE_SYS_BUS_DEVICE
,
618 .instance_size
= sizeof(m5206_mbar_state
),
619 .class_init
= mcf5206_mbar_class_init
,
622 static void mcf5206_mbar_register_types(void)
624 type_register_static(&mcf5206_mbar_info
);
627 type_init(mcf5206_mbar_register_types
)