]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blob - sim/bfin/dv-bfin_uart2.c
Update years in copyright notice for the GDB files.
[thirdparty/binutils-gdb.git] / sim / bfin / dv-bfin_uart2.c
1 /* Blackfin Universal Asynchronous Receiver/Transmitter (UART) model.
2 For "new style" UARTs on BF50x/BF54x parts.
3
4 Copyright (C) 2010-2013 Free Software Foundation, Inc.
5 Contributed by Analog Devices, Inc.
6
7 This file is part of simulators.
8
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 3 of the License, or
12 (at your option) any later version.
13
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
18
19 You should have received a copy of the GNU General Public License
20 along with this program. If not, see <http://www.gnu.org/licenses/>. */
21
22 #include "config.h"
23
24 #include "sim-main.h"
25 #include "devices.h"
26 #include "dv-bfin_uart2.h"
27
28 /* XXX: Should we bother emulating the TX/RX FIFOs ? */
29
30 /* Internal state needs to be the same as bfin_uart. */
31 struct bfin_uart
32 {
33 /* This top portion matches common dv_bfin struct. */
34 bu32 base;
35 struct hw *dma_master;
36 bool acked;
37
38 struct hw_event *handler;
39 char saved_byte;
40 int saved_count;
41
42 /* Accessed indirectly by ier_{set,clear}. */
43 bu16 ier;
44
45 /* Order after here is important -- matches hardware MMR layout. */
46 bu16 BFIN_MMR_16(dll);
47 bu16 BFIN_MMR_16(dlh);
48 bu16 BFIN_MMR_16(gctl);
49 bu16 BFIN_MMR_16(lcr);
50 bu16 BFIN_MMR_16(mcr);
51 bu16 BFIN_MMR_16(lsr);
52 bu16 BFIN_MMR_16(msr);
53 bu16 BFIN_MMR_16(scr);
54 bu16 BFIN_MMR_16(ier_set);
55 bu16 BFIN_MMR_16(ier_clear);
56 bu16 BFIN_MMR_16(thr);
57 bu16 BFIN_MMR_16(rbr);
58 };
59 #define mmr_base() offsetof(struct bfin_uart, dll)
60 #define mmr_offset(mmr) (offsetof(struct bfin_uart, mmr) - mmr_base())
61
62 static const char * const mmr_names[] =
63 {
64 "UART_DLL", "UART_DLH", "UART_GCTL", "UART_LCR", "UART_MCR", "UART_LSR",
65 "UART_MSR", "UART_SCR", "UART_IER_SET", "UART_IER_CLEAR", "UART_THR",
66 "UART_RBR",
67 };
68 #define mmr_name(off) mmr_names[(off) / 4]
69
70 static unsigned
71 bfin_uart_io_write_buffer (struct hw *me, const void *source,
72 int space, address_word addr, unsigned nr_bytes)
73 {
74 struct bfin_uart *uart = hw_data (me);
75 bu32 mmr_off;
76 bu32 value;
77 bu16 *valuep;
78
79 value = dv_load_2 (source);
80 mmr_off = addr - uart->base;
81 valuep = (void *)((unsigned long)uart + mmr_base() + mmr_off);
82
83 HW_TRACE_WRITE ();
84
85 dv_bfin_mmr_require_16 (me, addr, nr_bytes, true);
86
87 /* XXX: All MMRs are "8bit" ... what happens to high 8bits ? */
88
89 switch (mmr_off)
90 {
91 case mmr_offset(thr):
92 uart->thr = bfin_uart_write_byte (me, value, uart->mcr);
93 if (uart->ier & ETBEI)
94 hw_port_event (me, DV_PORT_TX, 1);
95 break;
96 case mmr_offset(ier_set):
97 uart->ier |= value;
98 break;
99 case mmr_offset(ier_clear):
100 dv_w1c_2 (&uart->ier, value, -1);
101 break;
102 case mmr_offset(lsr):
103 dv_w1c_2 (valuep, value, TFI | BI | FE | PE | OE);
104 break;
105 case mmr_offset(rbr):
106 /* XXX: Writes are ignored ? */
107 break;
108 case mmr_offset(msr):
109 dv_w1c_2 (valuep, value, SCTS);
110 break;
111 case mmr_offset(dll):
112 case mmr_offset(dlh):
113 case mmr_offset(gctl):
114 case mmr_offset(lcr):
115 case mmr_offset(mcr):
116 case mmr_offset(scr):
117 *valuep = value;
118 break;
119 default:
120 dv_bfin_mmr_invalid (me, addr, nr_bytes, true);
121 break;
122 }
123
124 return nr_bytes;
125 }
126
127 static unsigned
128 bfin_uart_io_read_buffer (struct hw *me, void *dest,
129 int space, address_word addr, unsigned nr_bytes)
130 {
131 struct bfin_uart *uart = hw_data (me);
132 bu32 mmr_off;
133 bu16 *valuep;
134
135 mmr_off = addr - uart->base;
136 valuep = (void *)((unsigned long)uart + mmr_base() + mmr_off);
137
138 HW_TRACE_READ ();
139
140 dv_bfin_mmr_require_16 (me, addr, nr_bytes, false);
141
142 switch (mmr_off)
143 {
144 case mmr_offset(rbr):
145 uart->rbr = bfin_uart_get_next_byte (me, uart->rbr, uart->mcr, NULL);
146 dv_store_2 (dest, uart->rbr);
147 break;
148 case mmr_offset(ier_set):
149 case mmr_offset(ier_clear):
150 dv_store_2 (dest, uart->ier);
151 bfin_uart_reschedule (me);
152 break;
153 case mmr_offset(lsr):
154 uart->lsr &= ~(DR | THRE | TEMT);
155 uart->lsr |= bfin_uart_get_status (me);
156 case mmr_offset(thr):
157 case mmr_offset(msr):
158 case mmr_offset(dll):
159 case mmr_offset(dlh):
160 case mmr_offset(gctl):
161 case mmr_offset(lcr):
162 case mmr_offset(mcr):
163 case mmr_offset(scr):
164 dv_store_2 (dest, *valuep);
165 break;
166 default:
167 dv_bfin_mmr_invalid (me, addr, nr_bytes, false);
168 break;
169 }
170
171 return nr_bytes;
172 }
173
174 static unsigned
175 bfin_uart_dma_read_buffer (struct hw *me, void *dest, int space,
176 unsigned_word addr, unsigned nr_bytes)
177 {
178 HW_TRACE_DMA_READ ();
179 return bfin_uart_read_buffer (me, dest, nr_bytes);
180 }
181
182 static unsigned
183 bfin_uart_dma_write_buffer (struct hw *me, const void *source,
184 int space, unsigned_word addr,
185 unsigned nr_bytes,
186 int violate_read_only_section)
187 {
188 struct bfin_uart *uart = hw_data (me);
189 unsigned ret;
190
191 HW_TRACE_DMA_WRITE ();
192
193 ret = bfin_uart_write_buffer (me, source, nr_bytes);
194
195 if (ret == nr_bytes && (uart->ier & ETBEI))
196 hw_port_event (me, DV_PORT_TX, 1);
197
198 return ret;
199 }
200
201 static const struct hw_port_descriptor bfin_uart_ports[] =
202 {
203 { "tx", DV_PORT_TX, 0, output_port, },
204 { "rx", DV_PORT_RX, 0, output_port, },
205 { "stat", DV_PORT_STAT, 0, output_port, },
206 { NULL, 0, 0, 0, },
207 };
208
209 static void
210 attach_bfin_uart_regs (struct hw *me, struct bfin_uart *uart)
211 {
212 address_word attach_address;
213 int attach_space;
214 unsigned attach_size;
215 reg_property_spec reg;
216
217 if (hw_find_property (me, "reg") == NULL)
218 hw_abort (me, "Missing \"reg\" property");
219
220 if (!hw_find_reg_array_property (me, "reg", 0, &reg))
221 hw_abort (me, "\"reg\" property must contain three addr/size entries");
222
223 hw_unit_address_to_attach_address (hw_parent (me),
224 &reg.address,
225 &attach_space, &attach_address, me);
226 hw_unit_size_to_attach_size (hw_parent (me), &reg.size, &attach_size, me);
227
228 if (attach_size != BFIN_MMR_UART2_SIZE)
229 hw_abort (me, "\"reg\" size must be %#x", BFIN_MMR_UART2_SIZE);
230
231 hw_attach_address (hw_parent (me),
232 0, attach_space, attach_address, attach_size, me);
233
234 uart->base = attach_address;
235 }
236
237 static void
238 bfin_uart_finish (struct hw *me)
239 {
240 struct bfin_uart *uart;
241
242 uart = HW_ZALLOC (me, struct bfin_uart);
243
244 set_hw_data (me, uart);
245 set_hw_io_read_buffer (me, bfin_uart_io_read_buffer);
246 set_hw_io_write_buffer (me, bfin_uart_io_write_buffer);
247 set_hw_dma_read_buffer (me, bfin_uart_dma_read_buffer);
248 set_hw_dma_write_buffer (me, bfin_uart_dma_write_buffer);
249 set_hw_ports (me, bfin_uart_ports);
250
251 attach_bfin_uart_regs (me, uart);
252
253 /* Initialize the UART. */
254 uart->dll = 0x0001;
255 uart->lsr = 0x0060;
256 }
257
258 const struct hw_descriptor dv_bfin_uart2_descriptor[] =
259 {
260 {"bfin_uart2", bfin_uart_finish,},
261 {NULL, NULL},
262 };