root / hw / lm32_uart.c @ 65ff544b
History | View | Annotate | Download (6.2 kB)
1 | 770ae571 | Michael Walle | /*
|
---|---|---|---|
2 | 770ae571 | Michael Walle | * QEMU model of the LatticeMico32 UART block.
|
3 | 770ae571 | Michael Walle | *
|
4 | 770ae571 | Michael Walle | * Copyright (c) 2010 Michael Walle <michael@walle.cc>
|
5 | 770ae571 | Michael Walle | *
|
6 | 770ae571 | Michael Walle | * This library is free software; you can redistribute it and/or
|
7 | 770ae571 | Michael Walle | * modify it under the terms of the GNU Lesser General Public
|
8 | 770ae571 | Michael Walle | * License as published by the Free Software Foundation; either
|
9 | 770ae571 | Michael Walle | * version 2 of the License, or (at your option) any later version.
|
10 | 770ae571 | Michael Walle | *
|
11 | 770ae571 | Michael Walle | * This library is distributed in the hope that it will be useful,
|
12 | 770ae571 | Michael Walle | * but WITHOUT ANY WARRANTY; without even the implied warranty of
|
13 | 770ae571 | Michael Walle | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
14 | 770ae571 | Michael Walle | * Lesser General Public License for more details.
|
15 | 770ae571 | Michael Walle | *
|
16 | 770ae571 | Michael Walle | * You should have received a copy of the GNU Lesser General Public
|
17 | 770ae571 | Michael Walle | * License along with this library; if not, see <http://www.gnu.org/licenses/>.
|
18 | 770ae571 | Michael Walle | *
|
19 | 770ae571 | Michael Walle | *
|
20 | 770ae571 | Michael Walle | * Specification available at:
|
21 | 770ae571 | Michael Walle | * http://www.latticesemi.com/documents/mico32uart.pdf
|
22 | 770ae571 | Michael Walle | */
|
23 | 770ae571 | Michael Walle | |
24 | 770ae571 | Michael Walle | |
25 | 770ae571 | Michael Walle | #include "hw.h" |
26 | 770ae571 | Michael Walle | #include "sysbus.h" |
27 | 770ae571 | Michael Walle | #include "trace.h" |
28 | 770ae571 | Michael Walle | #include "qemu-char.h" |
29 | 770ae571 | Michael Walle | #include "qemu-error.h" |
30 | 770ae571 | Michael Walle | |
31 | 770ae571 | Michael Walle | enum {
|
32 | 770ae571 | Michael Walle | R_RXTX = 0,
|
33 | 770ae571 | Michael Walle | R_IER, |
34 | 770ae571 | Michael Walle | R_IIR, |
35 | 770ae571 | Michael Walle | R_LCR, |
36 | 770ae571 | Michael Walle | R_MCR, |
37 | 770ae571 | Michael Walle | R_LSR, |
38 | 770ae571 | Michael Walle | R_MSR, |
39 | 770ae571 | Michael Walle | R_DIV, |
40 | 770ae571 | Michael Walle | R_MAX |
41 | 770ae571 | Michael Walle | }; |
42 | 770ae571 | Michael Walle | |
43 | 770ae571 | Michael Walle | enum {
|
44 | 770ae571 | Michael Walle | IER_RBRI = (1<<0), |
45 | 770ae571 | Michael Walle | IER_THRI = (1<<1), |
46 | 770ae571 | Michael Walle | IER_RLSI = (1<<2), |
47 | 770ae571 | Michael Walle | IER_MSI = (1<<3), |
48 | 770ae571 | Michael Walle | }; |
49 | 770ae571 | Michael Walle | |
50 | 770ae571 | Michael Walle | enum {
|
51 | 770ae571 | Michael Walle | IIR_STAT = (1<<0), |
52 | 770ae571 | Michael Walle | IIR_ID0 = (1<<1), |
53 | 770ae571 | Michael Walle | IIR_ID1 = (1<<2), |
54 | 770ae571 | Michael Walle | }; |
55 | 770ae571 | Michael Walle | |
56 | 770ae571 | Michael Walle | enum {
|
57 | 770ae571 | Michael Walle | LCR_WLS0 = (1<<0), |
58 | 770ae571 | Michael Walle | LCR_WLS1 = (1<<1), |
59 | 770ae571 | Michael Walle | LCR_STB = (1<<2), |
60 | 770ae571 | Michael Walle | LCR_PEN = (1<<3), |
61 | 770ae571 | Michael Walle | LCR_EPS = (1<<4), |
62 | 770ae571 | Michael Walle | LCR_SP = (1<<5), |
63 | 770ae571 | Michael Walle | LCR_SB = (1<<6), |
64 | 770ae571 | Michael Walle | }; |
65 | 770ae571 | Michael Walle | |
66 | 770ae571 | Michael Walle | enum {
|
67 | 770ae571 | Michael Walle | MCR_DTR = (1<<0), |
68 | 770ae571 | Michael Walle | MCR_RTS = (1<<1), |
69 | 770ae571 | Michael Walle | }; |
70 | 770ae571 | Michael Walle | |
71 | 770ae571 | Michael Walle | enum {
|
72 | 770ae571 | Michael Walle | LSR_DR = (1<<0), |
73 | 770ae571 | Michael Walle | LSR_OE = (1<<1), |
74 | 770ae571 | Michael Walle | LSR_PE = (1<<2), |
75 | 770ae571 | Michael Walle | LSR_FE = (1<<3), |
76 | 770ae571 | Michael Walle | LSR_BI = (1<<4), |
77 | 770ae571 | Michael Walle | LSR_THRE = (1<<5), |
78 | 770ae571 | Michael Walle | LSR_TEMT = (1<<6), |
79 | 770ae571 | Michael Walle | }; |
80 | 770ae571 | Michael Walle | |
81 | 770ae571 | Michael Walle | enum {
|
82 | 770ae571 | Michael Walle | MSR_DCTS = (1<<0), |
83 | 770ae571 | Michael Walle | MSR_DDSR = (1<<1), |
84 | 770ae571 | Michael Walle | MSR_TERI = (1<<2), |
85 | 770ae571 | Michael Walle | MSR_DDCD = (1<<3), |
86 | 770ae571 | Michael Walle | MSR_CTS = (1<<4), |
87 | 770ae571 | Michael Walle | MSR_DSR = (1<<5), |
88 | 770ae571 | Michael Walle | MSR_RI = (1<<6), |
89 | 770ae571 | Michael Walle | MSR_DCD = (1<<7), |
90 | 770ae571 | Michael Walle | }; |
91 | 770ae571 | Michael Walle | |
92 | 770ae571 | Michael Walle | struct LM32UartState {
|
93 | 770ae571 | Michael Walle | SysBusDevice busdev; |
94 | 770ae571 | Michael Walle | CharDriverState *chr; |
95 | 770ae571 | Michael Walle | qemu_irq irq; |
96 | 770ae571 | Michael Walle | |
97 | 770ae571 | Michael Walle | uint32_t regs[R_MAX]; |
98 | 770ae571 | Michael Walle | }; |
99 | 770ae571 | Michael Walle | typedef struct LM32UartState LM32UartState; |
100 | 770ae571 | Michael Walle | |
101 | 770ae571 | Michael Walle | static void uart_update_irq(LM32UartState *s) |
102 | 770ae571 | Michael Walle | { |
103 | 770ae571 | Michael Walle | unsigned int irq; |
104 | 770ae571 | Michael Walle | |
105 | 770ae571 | Michael Walle | if ((s->regs[R_LSR] & (LSR_OE | LSR_PE | LSR_FE | LSR_BI))
|
106 | 770ae571 | Michael Walle | && (s->regs[R_IER] & IER_RLSI)) { |
107 | 770ae571 | Michael Walle | irq = 1;
|
108 | 770ae571 | Michael Walle | s->regs[R_IIR] = IIR_ID1 | IIR_ID0; |
109 | 770ae571 | Michael Walle | } else if ((s->regs[R_LSR] & LSR_DR) && (s->regs[R_IER] & IER_RBRI)) { |
110 | 770ae571 | Michael Walle | irq = 1;
|
111 | 770ae571 | Michael Walle | s->regs[R_IIR] = IIR_ID1; |
112 | 770ae571 | Michael Walle | } else if ((s->regs[R_LSR] & LSR_THRE) && (s->regs[R_IER] & IER_THRI)) { |
113 | 770ae571 | Michael Walle | irq = 1;
|
114 | 770ae571 | Michael Walle | s->regs[R_IIR] = IIR_ID0; |
115 | 770ae571 | Michael Walle | } else if ((s->regs[R_MSR] & 0x0f) && (s->regs[R_IER] & IER_MSI)) { |
116 | 770ae571 | Michael Walle | irq = 1;
|
117 | 770ae571 | Michael Walle | s->regs[R_IIR] = 0;
|
118 | 770ae571 | Michael Walle | } else {
|
119 | 770ae571 | Michael Walle | irq = 0;
|
120 | 770ae571 | Michael Walle | s->regs[R_IIR] = IIR_STAT; |
121 | 770ae571 | Michael Walle | } |
122 | 770ae571 | Michael Walle | |
123 | 770ae571 | Michael Walle | trace_lm32_uart_irq_state(irq); |
124 | 770ae571 | Michael Walle | qemu_set_irq(s->irq, irq); |
125 | 770ae571 | Michael Walle | } |
126 | 770ae571 | Michael Walle | |
127 | 770ae571 | Michael Walle | static uint32_t uart_read(void *opaque, target_phys_addr_t addr) |
128 | 770ae571 | Michael Walle | { |
129 | 770ae571 | Michael Walle | LM32UartState *s = opaque; |
130 | 770ae571 | Michael Walle | uint32_t r = 0;
|
131 | 770ae571 | Michael Walle | |
132 | 770ae571 | Michael Walle | addr >>= 2;
|
133 | 770ae571 | Michael Walle | switch (addr) {
|
134 | 770ae571 | Michael Walle | case R_RXTX:
|
135 | 770ae571 | Michael Walle | r = s->regs[R_RXTX]; |
136 | 770ae571 | Michael Walle | s->regs[R_LSR] &= ~LSR_DR; |
137 | 770ae571 | Michael Walle | uart_update_irq(s); |
138 | 770ae571 | Michael Walle | break;
|
139 | 770ae571 | Michael Walle | case R_IIR:
|
140 | 770ae571 | Michael Walle | case R_LSR:
|
141 | 770ae571 | Michael Walle | case R_MSR:
|
142 | 770ae571 | Michael Walle | r = s->regs[addr]; |
143 | 770ae571 | Michael Walle | break;
|
144 | 770ae571 | Michael Walle | case R_IER:
|
145 | 770ae571 | Michael Walle | case R_LCR:
|
146 | 770ae571 | Michael Walle | case R_MCR:
|
147 | 770ae571 | Michael Walle | case R_DIV:
|
148 | 770ae571 | Michael Walle | error_report("lm32_uart: read access to write only register 0x"
|
149 | 770ae571 | Michael Walle | TARGET_FMT_plx, addr << 2);
|
150 | 770ae571 | Michael Walle | break;
|
151 | 770ae571 | Michael Walle | default:
|
152 | 770ae571 | Michael Walle | error_report("lm32_uart: read access to unkown register 0x"
|
153 | 770ae571 | Michael Walle | TARGET_FMT_plx, addr << 2);
|
154 | 770ae571 | Michael Walle | break;
|
155 | 770ae571 | Michael Walle | } |
156 | 770ae571 | Michael Walle | |
157 | 770ae571 | Michael Walle | trace_lm32_uart_memory_read(addr << 2, r);
|
158 | 770ae571 | Michael Walle | return r;
|
159 | 770ae571 | Michael Walle | } |
160 | 770ae571 | Michael Walle | |
161 | 770ae571 | Michael Walle | static void uart_write(void *opaque, target_phys_addr_t addr, uint32_t value) |
162 | 770ae571 | Michael Walle | { |
163 | 770ae571 | Michael Walle | LM32UartState *s = opaque; |
164 | 770ae571 | Michael Walle | unsigned char ch = value; |
165 | 770ae571 | Michael Walle | |
166 | 770ae571 | Michael Walle | trace_lm32_uart_memory_write(addr, value); |
167 | 770ae571 | Michael Walle | |
168 | 770ae571 | Michael Walle | addr >>= 2;
|
169 | 770ae571 | Michael Walle | switch (addr) {
|
170 | 770ae571 | Michael Walle | case R_RXTX:
|
171 | 770ae571 | Michael Walle | if (s->chr) {
|
172 | 770ae571 | Michael Walle | qemu_chr_write(s->chr, &ch, 1);
|
173 | 770ae571 | Michael Walle | } |
174 | 770ae571 | Michael Walle | break;
|
175 | 770ae571 | Michael Walle | case R_IER:
|
176 | 770ae571 | Michael Walle | case R_LCR:
|
177 | 770ae571 | Michael Walle | case R_MCR:
|
178 | 770ae571 | Michael Walle | case R_DIV:
|
179 | 770ae571 | Michael Walle | s->regs[addr] = value; |
180 | 770ae571 | Michael Walle | break;
|
181 | 770ae571 | Michael Walle | case R_IIR:
|
182 | 770ae571 | Michael Walle | case R_LSR:
|
183 | 770ae571 | Michael Walle | case R_MSR:
|
184 | 770ae571 | Michael Walle | error_report("lm32_uart: write access to read only register 0x"
|
185 | 770ae571 | Michael Walle | TARGET_FMT_plx, addr << 2);
|
186 | 770ae571 | Michael Walle | break;
|
187 | 770ae571 | Michael Walle | default:
|
188 | 770ae571 | Michael Walle | error_report("lm32_uart: write access to unkown register 0x"
|
189 | 770ae571 | Michael Walle | TARGET_FMT_plx, addr << 2);
|
190 | 770ae571 | Michael Walle | break;
|
191 | 770ae571 | Michael Walle | } |
192 | 770ae571 | Michael Walle | uart_update_irq(s); |
193 | 770ae571 | Michael Walle | } |
194 | 770ae571 | Michael Walle | |
195 | 770ae571 | Michael Walle | static CPUReadMemoryFunc * const uart_read_fn[] = { |
196 | 770ae571 | Michael Walle | NULL,
|
197 | 770ae571 | Michael Walle | NULL,
|
198 | 770ae571 | Michael Walle | &uart_read, |
199 | 770ae571 | Michael Walle | }; |
200 | 770ae571 | Michael Walle | |
201 | 770ae571 | Michael Walle | static CPUWriteMemoryFunc * const uart_write_fn[] = { |
202 | 770ae571 | Michael Walle | NULL,
|
203 | 770ae571 | Michael Walle | NULL,
|
204 | 770ae571 | Michael Walle | &uart_write, |
205 | 770ae571 | Michael Walle | }; |
206 | 770ae571 | Michael Walle | |
207 | 770ae571 | Michael Walle | static void uart_rx(void *opaque, const uint8_t *buf, int size) |
208 | 770ae571 | Michael Walle | { |
209 | 770ae571 | Michael Walle | LM32UartState *s = opaque; |
210 | 770ae571 | Michael Walle | |
211 | 770ae571 | Michael Walle | if (s->regs[R_LSR] & LSR_DR) {
|
212 | 770ae571 | Michael Walle | s->regs[R_LSR] |= LSR_OE; |
213 | 770ae571 | Michael Walle | } |
214 | 770ae571 | Michael Walle | |
215 | 770ae571 | Michael Walle | s->regs[R_LSR] |= LSR_DR; |
216 | 770ae571 | Michael Walle | s->regs[R_RXTX] = *buf; |
217 | 770ae571 | Michael Walle | |
218 | 770ae571 | Michael Walle | uart_update_irq(s); |
219 | 770ae571 | Michael Walle | } |
220 | 770ae571 | Michael Walle | |
221 | 770ae571 | Michael Walle | static int uart_can_rx(void *opaque) |
222 | 770ae571 | Michael Walle | { |
223 | 770ae571 | Michael Walle | LM32UartState *s = opaque; |
224 | 770ae571 | Michael Walle | |
225 | 770ae571 | Michael Walle | return !(s->regs[R_LSR] & LSR_DR);
|
226 | 770ae571 | Michael Walle | } |
227 | 770ae571 | Michael Walle | |
228 | 770ae571 | Michael Walle | static void uart_event(void *opaque, int event) |
229 | 770ae571 | Michael Walle | { |
230 | 770ae571 | Michael Walle | } |
231 | 770ae571 | Michael Walle | |
232 | 770ae571 | Michael Walle | static void uart_reset(DeviceState *d) |
233 | 770ae571 | Michael Walle | { |
234 | 770ae571 | Michael Walle | LM32UartState *s = container_of(d, LM32UartState, busdev.qdev); |
235 | 770ae571 | Michael Walle | int i;
|
236 | 770ae571 | Michael Walle | |
237 | 770ae571 | Michael Walle | for (i = 0; i < R_MAX; i++) { |
238 | 770ae571 | Michael Walle | s->regs[i] = 0;
|
239 | 770ae571 | Michael Walle | } |
240 | 770ae571 | Michael Walle | |
241 | 770ae571 | Michael Walle | /* defaults */
|
242 | 770ae571 | Michael Walle | s->regs[R_LSR] = LSR_THRE | LSR_TEMT; |
243 | 770ae571 | Michael Walle | } |
244 | 770ae571 | Michael Walle | |
245 | 770ae571 | Michael Walle | static int lm32_uart_init(SysBusDevice *dev) |
246 | 770ae571 | Michael Walle | { |
247 | 770ae571 | Michael Walle | LM32UartState *s = FROM_SYSBUS(typeof(*s), dev); |
248 | 770ae571 | Michael Walle | int uart_regs;
|
249 | 770ae571 | Michael Walle | |
250 | 770ae571 | Michael Walle | sysbus_init_irq(dev, &s->irq); |
251 | 770ae571 | Michael Walle | |
252 | 770ae571 | Michael Walle | uart_regs = cpu_register_io_memory(uart_read_fn, uart_write_fn, s, |
253 | 770ae571 | Michael Walle | DEVICE_NATIVE_ENDIAN); |
254 | 770ae571 | Michael Walle | sysbus_init_mmio(dev, R_MAX * 4, uart_regs);
|
255 | 770ae571 | Michael Walle | |
256 | 770ae571 | Michael Walle | s->chr = qdev_init_chardev(&dev->qdev); |
257 | 770ae571 | Michael Walle | if (s->chr) {
|
258 | 770ae571 | Michael Walle | qemu_chr_add_handlers(s->chr, uart_can_rx, uart_rx, uart_event, s); |
259 | 770ae571 | Michael Walle | } |
260 | 770ae571 | Michael Walle | |
261 | 770ae571 | Michael Walle | return 0; |
262 | 770ae571 | Michael Walle | } |
263 | 770ae571 | Michael Walle | |
264 | 770ae571 | Michael Walle | static const VMStateDescription vmstate_lm32_uart = { |
265 | 770ae571 | Michael Walle | .name = "lm32-uart",
|
266 | 770ae571 | Michael Walle | .version_id = 1,
|
267 | 770ae571 | Michael Walle | .minimum_version_id = 1,
|
268 | 770ae571 | Michael Walle | .minimum_version_id_old = 1,
|
269 | 770ae571 | Michael Walle | .fields = (VMStateField[]) { |
270 | 770ae571 | Michael Walle | VMSTATE_UINT32_ARRAY(regs, LM32UartState, R_MAX), |
271 | 770ae571 | Michael Walle | VMSTATE_END_OF_LIST() |
272 | 770ae571 | Michael Walle | } |
273 | 770ae571 | Michael Walle | }; |
274 | 770ae571 | Michael Walle | |
275 | 770ae571 | Michael Walle | static SysBusDeviceInfo lm32_uart_info = {
|
276 | 770ae571 | Michael Walle | .init = lm32_uart_init, |
277 | 770ae571 | Michael Walle | .qdev.name = "lm32-uart",
|
278 | 770ae571 | Michael Walle | .qdev.size = sizeof(LM32UartState),
|
279 | 770ae571 | Michael Walle | .qdev.vmsd = &vmstate_lm32_uart, |
280 | 770ae571 | Michael Walle | .qdev.reset = uart_reset, |
281 | 770ae571 | Michael Walle | }; |
282 | 770ae571 | Michael Walle | |
283 | 770ae571 | Michael Walle | static void lm32_uart_register(void) |
284 | 770ae571 | Michael Walle | { |
285 | 770ae571 | Michael Walle | sysbus_register_withprop(&lm32_uart_info); |
286 | 770ae571 | Michael Walle | } |
287 | 770ae571 | Michael Walle | |
288 | 770ae571 | Michael Walle | device_init(lm32_uart_register) |