root / hw / sh_timer.c @ cd1a3f68
History | View | Annotate | Download (8.2 kB)
1 | cd1a3f68 | ths | /*
|
---|---|---|---|
2 | cd1a3f68 | ths | * SuperH Timer modules.
|
3 | cd1a3f68 | ths | *
|
4 | cd1a3f68 | ths | * Copyright (c) 2007 Magnus Damm
|
5 | cd1a3f68 | ths | * Based on arm_timer.c by Paul Brook
|
6 | cd1a3f68 | ths | * Copyright (c) 2005-2006 CodeSourcery.
|
7 | cd1a3f68 | ths | *
|
8 | cd1a3f68 | ths | * This code is licenced under the GPL.
|
9 | cd1a3f68 | ths | */
|
10 | cd1a3f68 | ths | |
11 | cd1a3f68 | ths | #include "vl.h" |
12 | cd1a3f68 | ths | |
13 | cd1a3f68 | ths | //#define DEBUG_TIMER
|
14 | cd1a3f68 | ths | |
15 | cd1a3f68 | ths | #define TIMER_TCR_TPSC (7 << 0) |
16 | cd1a3f68 | ths | #define TIMER_TCR_CKEG (3 << 3) |
17 | cd1a3f68 | ths | #define TIMER_TCR_UNIE (1 << 5) |
18 | cd1a3f68 | ths | #define TIMER_TCR_ICPE (3 << 6) |
19 | cd1a3f68 | ths | #define TIMER_TCR_UNF (1 << 8) |
20 | cd1a3f68 | ths | #define TIMER_TCR_ICPF (1 << 9) |
21 | cd1a3f68 | ths | #define TIMER_TCR_RESERVED (0x3f << 10) |
22 | cd1a3f68 | ths | |
23 | cd1a3f68 | ths | #define TIMER_FEAT_CAPT (1 << 0) |
24 | cd1a3f68 | ths | #define TIMER_FEAT_EXTCLK (1 << 1) |
25 | cd1a3f68 | ths | |
26 | cd1a3f68 | ths | typedef struct { |
27 | cd1a3f68 | ths | ptimer_state *timer; |
28 | cd1a3f68 | ths | uint32_t tcnt; |
29 | cd1a3f68 | ths | uint32_t tcor; |
30 | cd1a3f68 | ths | uint32_t tcr; |
31 | cd1a3f68 | ths | uint32_t tcpr; |
32 | cd1a3f68 | ths | int freq;
|
33 | cd1a3f68 | ths | int int_level;
|
34 | cd1a3f68 | ths | int feat;
|
35 | cd1a3f68 | ths | int enabled;
|
36 | cd1a3f68 | ths | qemu_irq irq; |
37 | cd1a3f68 | ths | } sh_timer_state; |
38 | cd1a3f68 | ths | |
39 | cd1a3f68 | ths | /* Check all active timers, and schedule the next timer interrupt. */
|
40 | cd1a3f68 | ths | |
41 | cd1a3f68 | ths | static void sh_timer_update(sh_timer_state *s) |
42 | cd1a3f68 | ths | { |
43 | cd1a3f68 | ths | #if 0 /* not yet */
|
44 | cd1a3f68 | ths | /* Update interrupts. */
|
45 | cd1a3f68 | ths | if (s->int_level && (s->tcr & TIMER_TCR_UNIE)) {
|
46 | cd1a3f68 | ths | qemu_irq_raise(s->irq);
|
47 | cd1a3f68 | ths | } else {
|
48 | cd1a3f68 | ths | qemu_irq_lower(s->irq);
|
49 | cd1a3f68 | ths | }
|
50 | cd1a3f68 | ths | #endif
|
51 | cd1a3f68 | ths | } |
52 | cd1a3f68 | ths | |
53 | cd1a3f68 | ths | uint32_t sh_timer_read(void *opaque, target_phys_addr_t offset)
|
54 | cd1a3f68 | ths | { |
55 | cd1a3f68 | ths | sh_timer_state *s = (sh_timer_state *)opaque; |
56 | cd1a3f68 | ths | |
57 | cd1a3f68 | ths | switch (offset >> 2) { |
58 | cd1a3f68 | ths | case 0: |
59 | cd1a3f68 | ths | return s->tcor;
|
60 | cd1a3f68 | ths | case 1: |
61 | cd1a3f68 | ths | return ptimer_get_count(s->timer);
|
62 | cd1a3f68 | ths | case 2: |
63 | cd1a3f68 | ths | return s->tcr | (s->int_level ? TIMER_TCR_UNF : 0); |
64 | cd1a3f68 | ths | case 3: |
65 | cd1a3f68 | ths | if (s->feat & TIMER_FEAT_CAPT)
|
66 | cd1a3f68 | ths | return s->tcpr;
|
67 | cd1a3f68 | ths | default:
|
68 | cd1a3f68 | ths | cpu_abort (cpu_single_env, "sh_timer_read: Bad offset %x\n",
|
69 | cd1a3f68 | ths | (int)offset);
|
70 | cd1a3f68 | ths | return 0; |
71 | cd1a3f68 | ths | } |
72 | cd1a3f68 | ths | } |
73 | cd1a3f68 | ths | |
74 | cd1a3f68 | ths | static void sh_timer_write(void *opaque, target_phys_addr_t offset, |
75 | cd1a3f68 | ths | uint32_t value) |
76 | cd1a3f68 | ths | { |
77 | cd1a3f68 | ths | sh_timer_state *s = (sh_timer_state *)opaque; |
78 | cd1a3f68 | ths | int freq;
|
79 | cd1a3f68 | ths | |
80 | cd1a3f68 | ths | switch (offset >> 2) { |
81 | cd1a3f68 | ths | case 0: |
82 | cd1a3f68 | ths | s->tcor = value; |
83 | cd1a3f68 | ths | ptimer_set_limit(s->timer, s->tcor, 0);
|
84 | cd1a3f68 | ths | break;
|
85 | cd1a3f68 | ths | case 1: |
86 | cd1a3f68 | ths | s->tcnt = value; |
87 | cd1a3f68 | ths | ptimer_set_count(s->timer, s->tcnt); |
88 | cd1a3f68 | ths | break;
|
89 | cd1a3f68 | ths | case 2: |
90 | cd1a3f68 | ths | if (s->enabled) {
|
91 | cd1a3f68 | ths | /* Pause the timer if it is running. This may cause some
|
92 | cd1a3f68 | ths | inaccuracy dure to rounding, but avoids a whole lot of other
|
93 | cd1a3f68 | ths | messyness. */
|
94 | cd1a3f68 | ths | ptimer_stop(s->timer); |
95 | cd1a3f68 | ths | } |
96 | cd1a3f68 | ths | freq = s->freq; |
97 | cd1a3f68 | ths | /* ??? Need to recalculate expiry time after changing divisor. */
|
98 | cd1a3f68 | ths | switch (value & TIMER_TCR_TPSC) {
|
99 | cd1a3f68 | ths | case 0: freq >>= 2; break; |
100 | cd1a3f68 | ths | case 1: freq >>= 4; break; |
101 | cd1a3f68 | ths | case 2: freq >>= 6; break; |
102 | cd1a3f68 | ths | case 3: freq >>= 8; break; |
103 | cd1a3f68 | ths | case 4: freq >>= 10; break; |
104 | cd1a3f68 | ths | case 6: |
105 | cd1a3f68 | ths | case 7: if (s->feat & TIMER_FEAT_EXTCLK) break; |
106 | cd1a3f68 | ths | default: cpu_abort (cpu_single_env,
|
107 | cd1a3f68 | ths | "sh_timer_write: Reserved TPSC value\n"); break; |
108 | cd1a3f68 | ths | } |
109 | cd1a3f68 | ths | switch ((value & TIMER_TCR_CKEG) >> 3) { |
110 | cd1a3f68 | ths | case 0: break; |
111 | cd1a3f68 | ths | case 1: |
112 | cd1a3f68 | ths | case 2: |
113 | cd1a3f68 | ths | case 3: if (s->feat & TIMER_FEAT_EXTCLK) break; |
114 | cd1a3f68 | ths | default: cpu_abort (cpu_single_env,
|
115 | cd1a3f68 | ths | "sh_timer_write: Reserved CKEG value\n"); break; |
116 | cd1a3f68 | ths | } |
117 | cd1a3f68 | ths | switch ((value & TIMER_TCR_ICPE) >> 6) { |
118 | cd1a3f68 | ths | case 0: break; |
119 | cd1a3f68 | ths | case 2: |
120 | cd1a3f68 | ths | case 3: if (s->feat & TIMER_FEAT_CAPT) break; |
121 | cd1a3f68 | ths | default: cpu_abort (cpu_single_env,
|
122 | cd1a3f68 | ths | "sh_timer_write: Reserved ICPE value\n"); break; |
123 | cd1a3f68 | ths | } |
124 | cd1a3f68 | ths | if ((value & TIMER_TCR_UNF) == 0) |
125 | cd1a3f68 | ths | s->int_level = 0;
|
126 | cd1a3f68 | ths | |
127 | cd1a3f68 | ths | value &= ~TIMER_TCR_UNF; |
128 | cd1a3f68 | ths | |
129 | cd1a3f68 | ths | if ((value & TIMER_TCR_ICPF) && (!(s->feat & TIMER_FEAT_CAPT)))
|
130 | cd1a3f68 | ths | cpu_abort (cpu_single_env, |
131 | cd1a3f68 | ths | "sh_timer_write: Reserved ICPF value\n");
|
132 | cd1a3f68 | ths | |
133 | cd1a3f68 | ths | value &= ~TIMER_TCR_ICPF; /* capture not supported */
|
134 | cd1a3f68 | ths | |
135 | cd1a3f68 | ths | if (value & TIMER_TCR_RESERVED)
|
136 | cd1a3f68 | ths | cpu_abort (cpu_single_env, |
137 | cd1a3f68 | ths | "sh_timer_write: Reserved TCR bits set\n");
|
138 | cd1a3f68 | ths | s->tcr = value; |
139 | cd1a3f68 | ths | ptimer_set_limit(s->timer, s->tcor, 0);
|
140 | cd1a3f68 | ths | ptimer_set_freq(s->timer, freq); |
141 | cd1a3f68 | ths | if (s->enabled) {
|
142 | cd1a3f68 | ths | /* Restart the timer if still enabled. */
|
143 | cd1a3f68 | ths | ptimer_run(s->timer, 0);
|
144 | cd1a3f68 | ths | } |
145 | cd1a3f68 | ths | break;
|
146 | cd1a3f68 | ths | case 3: |
147 | cd1a3f68 | ths | if (s->feat & TIMER_FEAT_CAPT) {
|
148 | cd1a3f68 | ths | s->tcpr = value; |
149 | cd1a3f68 | ths | break;
|
150 | cd1a3f68 | ths | } |
151 | cd1a3f68 | ths | default:
|
152 | cd1a3f68 | ths | cpu_abort (cpu_single_env, "sh_timer_write: Bad offset %x\n",
|
153 | cd1a3f68 | ths | (int)offset);
|
154 | cd1a3f68 | ths | } |
155 | cd1a3f68 | ths | sh_timer_update(s); |
156 | cd1a3f68 | ths | } |
157 | cd1a3f68 | ths | |
158 | cd1a3f68 | ths | static void sh_timer_start_stop(void *opaque, int enable) |
159 | cd1a3f68 | ths | { |
160 | cd1a3f68 | ths | sh_timer_state *s = (sh_timer_state *)opaque; |
161 | cd1a3f68 | ths | |
162 | cd1a3f68 | ths | #ifdef DEBUG_TIMER
|
163 | cd1a3f68 | ths | printf("sh_timer_start_stop %d (%d)\n", enable, s->enabled);
|
164 | cd1a3f68 | ths | #endif
|
165 | cd1a3f68 | ths | |
166 | cd1a3f68 | ths | if (s->enabled && !enable) {
|
167 | cd1a3f68 | ths | ptimer_stop(s->timer); |
168 | cd1a3f68 | ths | } |
169 | cd1a3f68 | ths | if (!s->enabled && enable) {
|
170 | cd1a3f68 | ths | ptimer_run(s->timer, 0);
|
171 | cd1a3f68 | ths | } |
172 | cd1a3f68 | ths | s->enabled = !!enable; |
173 | cd1a3f68 | ths | |
174 | cd1a3f68 | ths | #ifdef DEBUG_TIMER
|
175 | cd1a3f68 | ths | printf("sh_timer_start_stop done %d\n", s->enabled);
|
176 | cd1a3f68 | ths | #endif
|
177 | cd1a3f68 | ths | } |
178 | cd1a3f68 | ths | |
179 | cd1a3f68 | ths | static void sh_timer_tick(void *opaque) |
180 | cd1a3f68 | ths | { |
181 | cd1a3f68 | ths | sh_timer_state *s = (sh_timer_state *)opaque; |
182 | cd1a3f68 | ths | s->int_level = s->enabled; |
183 | cd1a3f68 | ths | sh_timer_update(s); |
184 | cd1a3f68 | ths | } |
185 | cd1a3f68 | ths | |
186 | cd1a3f68 | ths | static void *sh_timer_init(uint32_t freq, int feat) |
187 | cd1a3f68 | ths | { |
188 | cd1a3f68 | ths | sh_timer_state *s; |
189 | cd1a3f68 | ths | QEMUBH *bh; |
190 | cd1a3f68 | ths | |
191 | cd1a3f68 | ths | s = (sh_timer_state *)qemu_mallocz(sizeof(sh_timer_state));
|
192 | cd1a3f68 | ths | s->freq = freq; |
193 | cd1a3f68 | ths | s->feat = feat; |
194 | cd1a3f68 | ths | s->tcor = 0xffffffff;
|
195 | cd1a3f68 | ths | s->tcnt = 0xffffffff;
|
196 | cd1a3f68 | ths | s->tcpr = 0xdeadbeef;
|
197 | cd1a3f68 | ths | s->tcor = 0;
|
198 | cd1a3f68 | ths | s->enabled = 0;
|
199 | cd1a3f68 | ths | |
200 | cd1a3f68 | ths | bh = qemu_bh_new(sh_timer_tick, s); |
201 | cd1a3f68 | ths | s->timer = ptimer_init(bh); |
202 | cd1a3f68 | ths | /* ??? Save/restore. */
|
203 | cd1a3f68 | ths | return s;
|
204 | cd1a3f68 | ths | } |
205 | cd1a3f68 | ths | |
206 | cd1a3f68 | ths | typedef struct { |
207 | cd1a3f68 | ths | void *timer[3]; |
208 | cd1a3f68 | ths | int level[3]; |
209 | cd1a3f68 | ths | uint32_t tocr; |
210 | cd1a3f68 | ths | uint32_t tstr; |
211 | cd1a3f68 | ths | target_phys_addr_t base; |
212 | cd1a3f68 | ths | int feat;
|
213 | cd1a3f68 | ths | } tmu012_state; |
214 | cd1a3f68 | ths | |
215 | cd1a3f68 | ths | static uint32_t tmu012_read(void *opaque, target_phys_addr_t offset) |
216 | cd1a3f68 | ths | { |
217 | cd1a3f68 | ths | tmu012_state *s = (tmu012_state *)opaque; |
218 | cd1a3f68 | ths | |
219 | cd1a3f68 | ths | #ifdef DEBUG_TIMER
|
220 | cd1a3f68 | ths | printf("tmu012_read 0x%lx\n", (unsigned long) offset); |
221 | cd1a3f68 | ths | #endif
|
222 | cd1a3f68 | ths | offset -= s->base; |
223 | cd1a3f68 | ths | |
224 | cd1a3f68 | ths | if (offset >= 0x20) { |
225 | cd1a3f68 | ths | if (!(s->feat & TMU012_FEAT_3CHAN))
|
226 | cd1a3f68 | ths | cpu_abort (cpu_single_env, "tmu012_write: Bad channel offset %x\n",
|
227 | cd1a3f68 | ths | (int)offset);
|
228 | cd1a3f68 | ths | return sh_timer_read(s->timer[2], offset - 0x20); |
229 | cd1a3f68 | ths | } |
230 | cd1a3f68 | ths | |
231 | cd1a3f68 | ths | if (offset >= 0x14) |
232 | cd1a3f68 | ths | return sh_timer_read(s->timer[1], offset - 0x14); |
233 | cd1a3f68 | ths | |
234 | cd1a3f68 | ths | if (offset >= 0x08) |
235 | cd1a3f68 | ths | return sh_timer_read(s->timer[0], offset - 0x08); |
236 | cd1a3f68 | ths | |
237 | cd1a3f68 | ths | if (offset == 4) |
238 | cd1a3f68 | ths | return s->tstr;
|
239 | cd1a3f68 | ths | |
240 | cd1a3f68 | ths | if ((s->feat & TMU012_FEAT_TOCR) && offset == 0) |
241 | cd1a3f68 | ths | return s->tocr;
|
242 | cd1a3f68 | ths | |
243 | cd1a3f68 | ths | cpu_abort (cpu_single_env, "tmu012_write: Bad offset %x\n",
|
244 | cd1a3f68 | ths | (int)offset);
|
245 | cd1a3f68 | ths | return 0; |
246 | cd1a3f68 | ths | } |
247 | cd1a3f68 | ths | |
248 | cd1a3f68 | ths | static void tmu012_write(void *opaque, target_phys_addr_t offset, |
249 | cd1a3f68 | ths | uint32_t value) |
250 | cd1a3f68 | ths | { |
251 | cd1a3f68 | ths | tmu012_state *s = (tmu012_state *)opaque; |
252 | cd1a3f68 | ths | |
253 | cd1a3f68 | ths | #ifdef DEBUG_TIMER
|
254 | cd1a3f68 | ths | printf("tmu012_write 0x%lx 0x%08x\n", (unsigned long) offset, value); |
255 | cd1a3f68 | ths | #endif
|
256 | cd1a3f68 | ths | offset -= s->base; |
257 | cd1a3f68 | ths | |
258 | cd1a3f68 | ths | if (offset >= 0x20) { |
259 | cd1a3f68 | ths | if (!(s->feat & TMU012_FEAT_3CHAN))
|
260 | cd1a3f68 | ths | cpu_abort (cpu_single_env, "tmu012_write: Bad channel offset %x\n",
|
261 | cd1a3f68 | ths | (int)offset);
|
262 | cd1a3f68 | ths | sh_timer_write(s->timer[2], offset - 0x20, value); |
263 | cd1a3f68 | ths | return;
|
264 | cd1a3f68 | ths | } |
265 | cd1a3f68 | ths | |
266 | cd1a3f68 | ths | if (offset >= 0x14) { |
267 | cd1a3f68 | ths | sh_timer_write(s->timer[1], offset - 0x14, value); |
268 | cd1a3f68 | ths | return;
|
269 | cd1a3f68 | ths | } |
270 | cd1a3f68 | ths | |
271 | cd1a3f68 | ths | if (offset >= 0x08) { |
272 | cd1a3f68 | ths | sh_timer_write(s->timer[0], offset - 0x08, value); |
273 | cd1a3f68 | ths | return;
|
274 | cd1a3f68 | ths | } |
275 | cd1a3f68 | ths | |
276 | cd1a3f68 | ths | if (offset == 4) { |
277 | cd1a3f68 | ths | sh_timer_start_stop(s->timer[0], value & (1 << 0)); |
278 | cd1a3f68 | ths | sh_timer_start_stop(s->timer[1], value & (1 << 1)); |
279 | cd1a3f68 | ths | if (s->feat & TMU012_FEAT_3CHAN)
|
280 | cd1a3f68 | ths | sh_timer_start_stop(s->timer[2], value & (1 << 2)); |
281 | cd1a3f68 | ths | else
|
282 | cd1a3f68 | ths | if (value & (1 << 2)) |
283 | cd1a3f68 | ths | cpu_abort (cpu_single_env, "tmu012_write: Bad channel\n");
|
284 | cd1a3f68 | ths | |
285 | cd1a3f68 | ths | s->tstr = value; |
286 | cd1a3f68 | ths | return;
|
287 | cd1a3f68 | ths | } |
288 | cd1a3f68 | ths | |
289 | cd1a3f68 | ths | if ((s->feat & TMU012_FEAT_TOCR) && offset == 0) { |
290 | cd1a3f68 | ths | s->tocr = value & (1 << 0); |
291 | cd1a3f68 | ths | } |
292 | cd1a3f68 | ths | } |
293 | cd1a3f68 | ths | |
294 | cd1a3f68 | ths | static CPUReadMemoryFunc *tmu012_readfn[] = {
|
295 | cd1a3f68 | ths | tmu012_read, |
296 | cd1a3f68 | ths | tmu012_read, |
297 | cd1a3f68 | ths | tmu012_read |
298 | cd1a3f68 | ths | }; |
299 | cd1a3f68 | ths | |
300 | cd1a3f68 | ths | static CPUWriteMemoryFunc *tmu012_writefn[] = {
|
301 | cd1a3f68 | ths | tmu012_write, |
302 | cd1a3f68 | ths | tmu012_write, |
303 | cd1a3f68 | ths | tmu012_write |
304 | cd1a3f68 | ths | }; |
305 | cd1a3f68 | ths | |
306 | cd1a3f68 | ths | void tmu012_init(uint32_t base, int feat, uint32_t freq) |
307 | cd1a3f68 | ths | { |
308 | cd1a3f68 | ths | int iomemtype;
|
309 | cd1a3f68 | ths | tmu012_state *s; |
310 | cd1a3f68 | ths | int timer_feat = (feat & TMU012_FEAT_EXTCLK) ? TIMER_FEAT_EXTCLK : 0; |
311 | cd1a3f68 | ths | |
312 | cd1a3f68 | ths | s = (tmu012_state *)qemu_mallocz(sizeof(tmu012_state));
|
313 | cd1a3f68 | ths | s->base = base; |
314 | cd1a3f68 | ths | s->feat = feat; |
315 | cd1a3f68 | ths | s->timer[0] = sh_timer_init(freq, timer_feat);
|
316 | cd1a3f68 | ths | s->timer[1] = sh_timer_init(freq, timer_feat);
|
317 | cd1a3f68 | ths | if (feat & TMU012_FEAT_3CHAN)
|
318 | cd1a3f68 | ths | s->timer[2] = sh_timer_init(freq, timer_feat | TIMER_FEAT_CAPT);
|
319 | cd1a3f68 | ths | iomemtype = cpu_register_io_memory(0, tmu012_readfn,
|
320 | cd1a3f68 | ths | tmu012_writefn, s); |
321 | cd1a3f68 | ths | cpu_register_physical_memory(base, 0x00001000, iomemtype);
|
322 | cd1a3f68 | ths | /* ??? Save/restore. */
|
323 | cd1a3f68 | ths | } |