2 * QEMU model of the LatticeMico32 UART block.
4 * Copyright (c) 2010 Michael Walle <michael@walle.cc>
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, see <http://www.gnu.org/licenses/>.
20 * Specification available at:
21 * http://www.latticesemi.com/documents/mico32uart.pdf
25 #include "qemu/osdep.h"
27 #include "hw/sysbus.h"
29 #include "chardev/char-fe.h"
30 #include "qemu/error-report.h"
31 #include "qemu/module.h"
94 #define TYPE_LM32_UART "lm32-uart"
95 #define LM32_UART(obj) OBJECT_CHECK(LM32UartState, (obj), TYPE_LM32_UART)
97 struct LM32UartState
{
98 SysBusDevice parent_obj
;
104 uint32_t regs
[R_MAX
];
106 typedef struct LM32UartState LM32UartState
;
108 static void uart_update_irq(LM32UartState
*s
)
112 if ((s
->regs
[R_LSR
] & (LSR_OE
| LSR_PE
| LSR_FE
| LSR_BI
))
113 && (s
->regs
[R_IER
] & IER_RLSI
)) {
115 s
->regs
[R_IIR
] = IIR_ID1
| IIR_ID0
;
116 } else if ((s
->regs
[R_LSR
] & LSR_DR
) && (s
->regs
[R_IER
] & IER_RBRI
)) {
118 s
->regs
[R_IIR
] = IIR_ID1
;
119 } else if ((s
->regs
[R_LSR
] & LSR_THRE
) && (s
->regs
[R_IER
] & IER_THRI
)) {
121 s
->regs
[R_IIR
] = IIR_ID0
;
122 } else if ((s
->regs
[R_MSR
] & 0x0f) && (s
->regs
[R_IER
] & IER_MSI
)) {
127 s
->regs
[R_IIR
] = IIR_STAT
;
130 trace_lm32_uart_irq_state(irq
);
131 qemu_set_irq(s
->irq
, irq
);
134 static uint64_t uart_read(void *opaque
, hwaddr addr
,
137 LM32UartState
*s
= opaque
;
144 s
->regs
[R_LSR
] &= ~LSR_DR
;
146 qemu_chr_fe_accept_input(&s
->chr
);
157 error_report("lm32_uart: read access to write only register 0x"
158 TARGET_FMT_plx
, addr
<< 2);
161 error_report("lm32_uart: read access to unknown register 0x"
162 TARGET_FMT_plx
, addr
<< 2);
166 trace_lm32_uart_memory_read(addr
<< 2, r
);
170 static void uart_write(void *opaque
, hwaddr addr
,
171 uint64_t value
, unsigned size
)
173 LM32UartState
*s
= opaque
;
174 unsigned char ch
= value
;
176 trace_lm32_uart_memory_write(addr
, value
);
181 /* XXX this blocks entire thread. Rewrite to use
182 * qemu_chr_fe_write and background I/O callbacks */
183 qemu_chr_fe_write_all(&s
->chr
, &ch
, 1);
189 s
->regs
[addr
] = value
;
194 error_report("lm32_uart: write access to read only register 0x"
195 TARGET_FMT_plx
, addr
<< 2);
198 error_report("lm32_uart: write access to unknown register 0x"
199 TARGET_FMT_plx
, addr
<< 2);
205 static const MemoryRegionOps uart_ops
= {
208 .endianness
= DEVICE_NATIVE_ENDIAN
,
210 .min_access_size
= 4,
211 .max_access_size
= 4,
215 static void uart_rx(void *opaque
, const uint8_t *buf
, int size
)
217 LM32UartState
*s
= opaque
;
219 if (s
->regs
[R_LSR
] & LSR_DR
) {
220 s
->regs
[R_LSR
] |= LSR_OE
;
223 s
->regs
[R_LSR
] |= LSR_DR
;
224 s
->regs
[R_RXTX
] = *buf
;
229 static int uart_can_rx(void *opaque
)
231 LM32UartState
*s
= opaque
;
233 return !(s
->regs
[R_LSR
] & LSR_DR
);
236 static void uart_event(void *opaque
, int event
)
240 static void uart_reset(DeviceState
*d
)
242 LM32UartState
*s
= LM32_UART(d
);
245 for (i
= 0; i
< R_MAX
; i
++) {
250 s
->regs
[R_LSR
] = LSR_THRE
| LSR_TEMT
;
253 static void lm32_uart_init(Object
*obj
)
255 LM32UartState
*s
= LM32_UART(obj
);
256 SysBusDevice
*dev
= SYS_BUS_DEVICE(obj
);
258 sysbus_init_irq(dev
, &s
->irq
);
260 memory_region_init_io(&s
->iomem
, obj
, &uart_ops
, s
,
262 sysbus_init_mmio(dev
, &s
->iomem
);
265 static void lm32_uart_realize(DeviceState
*dev
, Error
**errp
)
267 LM32UartState
*s
= LM32_UART(dev
);
269 qemu_chr_fe_set_handlers(&s
->chr
, uart_can_rx
, uart_rx
,
270 uart_event
, NULL
, s
, NULL
, true);
273 static const VMStateDescription vmstate_lm32_uart
= {
276 .minimum_version_id
= 1,
277 .fields
= (VMStateField
[]) {
278 VMSTATE_UINT32_ARRAY(regs
, LM32UartState
, R_MAX
),
279 VMSTATE_END_OF_LIST()
283 static Property lm32_uart_properties
[] = {
284 DEFINE_PROP_CHR("chardev", LM32UartState
, chr
),
285 DEFINE_PROP_END_OF_LIST(),
288 static void lm32_uart_class_init(ObjectClass
*klass
, void *data
)
290 DeviceClass
*dc
= DEVICE_CLASS(klass
);
292 dc
->reset
= uart_reset
;
293 dc
->vmsd
= &vmstate_lm32_uart
;
294 dc
->props
= lm32_uart_properties
;
295 dc
->realize
= lm32_uart_realize
;
298 static const TypeInfo lm32_uart_info
= {
299 .name
= TYPE_LM32_UART
,
300 .parent
= TYPE_SYS_BUS_DEVICE
,
301 .instance_size
= sizeof(LM32UartState
),
302 .instance_init
= lm32_uart_init
,
303 .class_init
= lm32_uart_class_init
,
306 static void lm32_uart_register_types(void)
308 type_register_static(&lm32_uart_info
);
311 type_init(lm32_uart_register_types
)