blob: ca22da196ad107325ebbc580b2ad4f7b0dee076e [file] [log] [blame]
Fabien Chouteauddd10552011-09-13 04:00:32 +00001/*
2 * QEMU PowerPC Booke hardware System Emulator
3 *
4 * Copyright (c) 2011 AdaCore
5 *
6 * Permission is hereby granted, free of charge, to any person obtaining a copy
7 * of this software and associated documentation files (the "Software"), to deal
8 * in the Software without restriction, including without limitation the rights
9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10 * copies of the Software, and to permit persons to whom the Software is
11 * furnished to do so, subject to the following conditions:
12 *
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
15 *
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22 * THE SOFTWARE.
23 */
Markus Armbruster71e8a912019-08-12 07:23:38 +020024
Peter Maydell0d755902016-01-26 18:16:58 +000025#include "qemu/osdep.h"
Paolo Bonzini4771d752016-01-19 21:51:44 +010026#include "cpu.h"
Paolo Bonzini0d09e412013-02-05 17:06:20 +010027#include "hw/ppc/ppc.h"
Paolo Bonzini1de7afc2012-12-17 18:20:00 +010028#include "qemu/timer.h"
Markus Armbruster71e8a912019-08-12 07:23:38 +020029#include "sysemu/reset.h"
Markus Armbruster54d31232019-08-12 07:23:59 +020030#include "sysemu/runstate.h"
Paolo Bonzini83c9f4c2013-02-04 15:40:22 +010031#include "hw/loader.h"
Bharat Bhushan31f2cb82013-02-24 18:16:21 +000032#include "kvm_ppc.h"
Fabien Chouteauddd10552011-09-13 04:00:32 +000033
34
35/* Timer Control Register */
36
37#define TCR_WP_SHIFT 30 /* Watchdog Timer Period */
Peter Maydella1f7f972014-03-17 16:00:37 +000038#define TCR_WP_MASK (0x3U << TCR_WP_SHIFT)
Fabien Chouteauddd10552011-09-13 04:00:32 +000039#define TCR_WRC_SHIFT 28 /* Watchdog Timer Reset Control */
Peter Maydella1f7f972014-03-17 16:00:37 +000040#define TCR_WRC_MASK (0x3U << TCR_WRC_SHIFT)
41#define TCR_WIE (1U << 27) /* Watchdog Timer Interrupt Enable */
42#define TCR_DIE (1U << 26) /* Decrementer Interrupt Enable */
Fabien Chouteauddd10552011-09-13 04:00:32 +000043#define TCR_FP_SHIFT 24 /* Fixed-Interval Timer Period */
Peter Maydella1f7f972014-03-17 16:00:37 +000044#define TCR_FP_MASK (0x3U << TCR_FP_SHIFT)
45#define TCR_FIE (1U << 23) /* Fixed-Interval Timer Interrupt Enable */
46#define TCR_ARE (1U << 22) /* Auto-Reload Enable */
Fabien Chouteauddd10552011-09-13 04:00:32 +000047
48/* Timer Control Register (e500 specific fields) */
49
50#define TCR_E500_FPEXT_SHIFT 13 /* Fixed-Interval Timer Period Extension */
51#define TCR_E500_FPEXT_MASK (0xf << TCR_E500_FPEXT_SHIFT)
52#define TCR_E500_WPEXT_SHIFT 17 /* Watchdog Timer Period Extension */
53#define TCR_E500_WPEXT_MASK (0xf << TCR_E500_WPEXT_SHIFT)
54
55/* Timer Status Register */
56
Peter Maydella1f7f972014-03-17 16:00:37 +000057#define TSR_FIS (1U << 26) /* Fixed-Interval Timer Interrupt Status */
58#define TSR_DIS (1U << 27) /* Decrementer Interrupt Status */
Fabien Chouteauddd10552011-09-13 04:00:32 +000059#define TSR_WRS_SHIFT 28 /* Watchdog Timer Reset Status */
Peter Maydella1f7f972014-03-17 16:00:37 +000060#define TSR_WRS_MASK (0x3U << TSR_WRS_SHIFT)
61#define TSR_WIS (1U << 30) /* Watchdog Timer Interrupt Status */
62#define TSR_ENW (1U << 31) /* Enable Next Watchdog Timer */
Fabien Chouteauddd10552011-09-13 04:00:32 +000063
64typedef struct booke_timer_t booke_timer_t;
65struct booke_timer_t {
66
67 uint64_t fit_next;
Stefan Weil1246b252013-12-01 08:49:47 +010068 QEMUTimer *fit_timer;
Fabien Chouteauddd10552011-09-13 04:00:32 +000069
70 uint64_t wdt_next;
Stefan Weil1246b252013-12-01 08:49:47 +010071 QEMUTimer *wdt_timer;
Fabien Chouteauddd10552011-09-13 04:00:32 +000072
73 uint32_t flags;
74};
75
Andreas Färber70585812012-12-01 03:55:58 +010076static void booke_update_irq(PowerPCCPU *cpu)
Fabien Chouteauddd10552011-09-13 04:00:32 +000077{
Andreas Färber70585812012-12-01 03:55:58 +010078 CPUPPCState *env = &cpu->env;
79
80 ppc_set_irq(cpu, PPC_INTERRUPT_DECR,
Fabien Chouteauddd10552011-09-13 04:00:32 +000081 (env->spr[SPR_BOOKE_TSR] & TSR_DIS
82 && env->spr[SPR_BOOKE_TCR] & TCR_DIE));
83
Andreas Färber70585812012-12-01 03:55:58 +010084 ppc_set_irq(cpu, PPC_INTERRUPT_WDT,
Fabien Chouteauddd10552011-09-13 04:00:32 +000085 (env->spr[SPR_BOOKE_TSR] & TSR_WIS
86 && env->spr[SPR_BOOKE_TCR] & TCR_WIE));
87
Andreas Färber70585812012-12-01 03:55:58 +010088 ppc_set_irq(cpu, PPC_INTERRUPT_FIT,
Fabien Chouteauddd10552011-09-13 04:00:32 +000089 (env->spr[SPR_BOOKE_TSR] & TSR_FIS
90 && env->spr[SPR_BOOKE_TCR] & TCR_FIE));
91}
92
93/* Return the location of the bit of time base at which the FIT will raise an
94 interrupt */
Andreas Färbere2684c02012-03-14 01:38:23 +010095static uint8_t booke_get_fit_target(CPUPPCState *env, ppc_tb_t *tb_env)
Fabien Chouteauddd10552011-09-13 04:00:32 +000096{
97 uint8_t fp = (env->spr[SPR_BOOKE_TCR] & TCR_FP_MASK) >> TCR_FP_SHIFT;
98
99 if (tb_env->flags & PPC_TIMER_E500) {
100 /* e500 Fixed-interval timer period extension */
101 uint32_t fpext = (env->spr[SPR_BOOKE_TCR] & TCR_E500_FPEXT_MASK)
102 >> TCR_E500_FPEXT_SHIFT;
103 fp = 63 - (fp | fpext << 2);
104 } else {
105 fp = env->fit_period[fp];
106 }
107
108 return fp;
109}
110
111/* Return the location of the bit of time base at which the WDT will raise an
112 interrupt */
Andreas Färbere2684c02012-03-14 01:38:23 +0100113static uint8_t booke_get_wdt_target(CPUPPCState *env, ppc_tb_t *tb_env)
Fabien Chouteauddd10552011-09-13 04:00:32 +0000114{
115 uint8_t wp = (env->spr[SPR_BOOKE_TCR] & TCR_WP_MASK) >> TCR_WP_SHIFT;
116
117 if (tb_env->flags & PPC_TIMER_E500) {
118 /* e500 Watchdog timer period extension */
119 uint32_t wpext = (env->spr[SPR_BOOKE_TCR] & TCR_E500_WPEXT_MASK)
120 >> TCR_E500_WPEXT_SHIFT;
121 wp = 63 - (wp | wpext << 2);
122 } else {
123 wp = env->wdt_period[wp];
124 }
125
126 return wp;
127}
128
Andreas Färbere2684c02012-03-14 01:38:23 +0100129static void booke_update_fixed_timer(CPUPPCState *env,
Fabien Chouteauddd10552011-09-13 04:00:32 +0000130 uint8_t target_bit,
131 uint64_t *next,
Alexander Graf455df3f2013-11-25 22:46:54 +0100132 QEMUTimer *timer,
133 int tsr_bit)
Fabien Chouteauddd10552011-09-13 04:00:32 +0000134{
135 ppc_tb_t *tb_env = env->tb_env;
Bharat Bhushanab8131a2013-06-12 18:00:50 +0530136 uint64_t delta_tick, ticks = 0;
Fabien Chouteauddd10552011-09-13 04:00:32 +0000137 uint64_t tb;
Bharat Bhushanab8131a2013-06-12 18:00:50 +0530138 uint64_t period;
Fabien Chouteauddd10552011-09-13 04:00:32 +0000139 uint64_t now;
140
Alexander Graf455df3f2013-11-25 22:46:54 +0100141 if (!(env->spr[SPR_BOOKE_TSR] & tsr_bit)) {
142 /*
143 * Don't arm the timer again when the guest has the current
144 * interrupt still pending. Wait for it to ack it.
145 */
146 return;
147 }
148
Alex Blighbc72ad62013-08-21 16:03:08 +0100149 now = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000150 tb = cpu_ppc_get_tb(tb_env, now, tb_env->tb_offset);
Bharat Bhushanab8131a2013-06-12 18:00:50 +0530151 period = 1ULL << target_bit;
152 delta_tick = period - (tb & (period - 1));
Fabien Chouteauddd10552011-09-13 04:00:32 +0000153
Bharat Bhushanab8131a2013-06-12 18:00:50 +0530154 /* the timer triggers only when the selected bit toggles from 0 to 1 */
155 if (tb & period) {
156 ticks = period;
157 }
Fabien Chouteauddd10552011-09-13 04:00:32 +0000158
Bharat Bhushanab8131a2013-06-12 18:00:50 +0530159 if (ticks + delta_tick < ticks) {
160 /* Overflow, so assume the biggest number we can express. */
161 ticks = UINT64_MAX;
162 } else {
163 ticks += delta_tick;
164 }
165
Rutuja Shah73bcb242016-03-21 21:32:30 +0530166 *next = now + muldiv64(ticks, NANOSECONDS_PER_SECOND, tb_env->tb_freq);
Bharat Bhushanab8131a2013-06-12 18:00:50 +0530167 if ((*next < now) || (*next > INT64_MAX)) {
168 /* Overflow, so assume the biggest number the qemu timer supports. */
169 *next = INT64_MAX;
170 }
Fabien Chouteauddd10552011-09-13 04:00:32 +0000171
172 /* XXX: If expire time is now. We can't run the callback because we don't
173 * have access to it. So we just set the timer one nanosecond later.
174 */
175
176 if (*next == now) {
177 (*next)++;
Alexander Graf84dc96e2013-11-25 22:46:55 +0100178 } else {
179 /*
180 * There's no point to fake any granularity that's more fine grained
181 * than milliseconds. Anything beyond that just overloads the system.
182 */
183 *next = MAX(*next, now + SCALE_MS);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000184 }
185
Alexander Graf455df3f2013-11-25 22:46:54 +0100186 /* Fire the next timer */
Alex Blighbc72ad62013-08-21 16:03:08 +0100187 timer_mod(timer, *next);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000188}
189
190static void booke_decr_cb(void *opaque)
191{
Andreas Färberee0c98e2012-12-01 04:35:15 +0100192 PowerPCCPU *cpu = opaque;
193 CPUPPCState *env = &cpu->env;
Fabien Chouteauddd10552011-09-13 04:00:32 +0000194
Fabien Chouteauddd10552011-09-13 04:00:32 +0000195 env->spr[SPR_BOOKE_TSR] |= TSR_DIS;
Andreas Färber70585812012-12-01 03:55:58 +0100196 booke_update_irq(cpu);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000197
198 if (env->spr[SPR_BOOKE_TCR] & TCR_ARE) {
Roman Kapl0dfe9522017-01-09 12:23:38 +0100199 /* Do not reload 0, it is already there. It would just trigger
200 * the timer again and lead to infinite loop */
201 if (env->spr[SPR_BOOKE_DECAR] != 0) {
202 /* Auto Reload */
203 cpu_ppc_store_decr(env, env->spr[SPR_BOOKE_DECAR]);
204 }
Fabien Chouteauddd10552011-09-13 04:00:32 +0000205 }
206}
207
208static void booke_fit_cb(void *opaque)
209{
Andreas Färberee0c98e2012-12-01 04:35:15 +0100210 PowerPCCPU *cpu = opaque;
211 CPUPPCState *env = &cpu->env;
Fabien Chouteauddd10552011-09-13 04:00:32 +0000212 ppc_tb_t *tb_env;
213 booke_timer_t *booke_timer;
214
Fabien Chouteauddd10552011-09-13 04:00:32 +0000215 tb_env = env->tb_env;
216 booke_timer = tb_env->opaque;
217 env->spr[SPR_BOOKE_TSR] |= TSR_FIS;
218
Andreas Färber70585812012-12-01 03:55:58 +0100219 booke_update_irq(cpu);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000220
221 booke_update_fixed_timer(env,
222 booke_get_fit_target(env, tb_env),
223 &booke_timer->fit_next,
Alexander Graf455df3f2013-11-25 22:46:54 +0100224 booke_timer->fit_timer,
225 TSR_FIS);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000226}
227
228static void booke_wdt_cb(void *opaque)
229{
Andreas Färberee0c98e2012-12-01 04:35:15 +0100230 PowerPCCPU *cpu = opaque;
231 CPUPPCState *env = &cpu->env;
Fabien Chouteauddd10552011-09-13 04:00:32 +0000232 ppc_tb_t *tb_env;
233 booke_timer_t *booke_timer;
234
Fabien Chouteauddd10552011-09-13 04:00:32 +0000235 tb_env = env->tb_env;
236 booke_timer = tb_env->opaque;
237
238 /* TODO: There's lots of complicated stuff to do here */
239
Andreas Färber70585812012-12-01 03:55:58 +0100240 booke_update_irq(cpu);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000241
242 booke_update_fixed_timer(env,
243 booke_get_wdt_target(env, tb_env),
244 &booke_timer->wdt_next,
Alexander Graf455df3f2013-11-25 22:46:54 +0100245 booke_timer->wdt_timer,
246 TSR_WIS);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000247}
248
Andreas Färbere2684c02012-03-14 01:38:23 +0100249void store_booke_tsr(CPUPPCState *env, target_ulong val)
Fabien Chouteauddd10552011-09-13 04:00:32 +0000250{
Richard Hendersondb70b312019-03-22 19:07:57 -0700251 PowerPCCPU *cpu = env_archcpu(env);
Alexander Graf455df3f2013-11-25 22:46:54 +0100252 ppc_tb_t *tb_env = env->tb_env;
253 booke_timer_t *booke_timer = tb_env->opaque;
Andreas Färber70585812012-12-01 03:55:58 +0100254
Fabien Chouteauddd10552011-09-13 04:00:32 +0000255 env->spr[SPR_BOOKE_TSR] &= ~val;
Bharat Bhushan31f2cb82013-02-24 18:16:21 +0000256 kvmppc_clear_tsr_bits(cpu, val);
Alexander Graf455df3f2013-11-25 22:46:54 +0100257
258 if (val & TSR_FIS) {
259 booke_update_fixed_timer(env,
260 booke_get_fit_target(env, tb_env),
261 &booke_timer->fit_next,
262 booke_timer->fit_timer,
263 TSR_FIS);
264 }
265
266 if (val & TSR_WIS) {
267 booke_update_fixed_timer(env,
268 booke_get_wdt_target(env, tb_env),
269 &booke_timer->wdt_next,
270 booke_timer->wdt_timer,
271 TSR_WIS);
272 }
273
Andreas Färber70585812012-12-01 03:55:58 +0100274 booke_update_irq(cpu);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000275}
276
Andreas Färbere2684c02012-03-14 01:38:23 +0100277void store_booke_tcr(CPUPPCState *env, target_ulong val)
Fabien Chouteauddd10552011-09-13 04:00:32 +0000278{
Richard Hendersondb70b312019-03-22 19:07:57 -0700279 PowerPCCPU *cpu = env_archcpu(env);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000280 ppc_tb_t *tb_env = env->tb_env;
281 booke_timer_t *booke_timer = tb_env->opaque;
282
Fabien Chouteauddd10552011-09-13 04:00:32 +0000283 env->spr[SPR_BOOKE_TCR] = val;
Bharat Bhushan31f2cb82013-02-24 18:16:21 +0000284 kvmppc_set_tcr(cpu);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000285
Andreas Färber70585812012-12-01 03:55:58 +0100286 booke_update_irq(cpu);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000287
288 booke_update_fixed_timer(env,
289 booke_get_fit_target(env, tb_env),
290 &booke_timer->fit_next,
Alexander Graf455df3f2013-11-25 22:46:54 +0100291 booke_timer->fit_timer,
292 TSR_FIS);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000293
294 booke_update_fixed_timer(env,
295 booke_get_wdt_target(env, tb_env),
296 &booke_timer->wdt_next,
Alexander Graf455df3f2013-11-25 22:46:54 +0100297 booke_timer->wdt_timer,
298 TSR_WIS);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000299}
300
Bharat Bhushan88a78d92012-12-27 19:16:51 +0000301static void ppc_booke_timer_reset_handle(void *opaque)
302{
303 PowerPCCPU *cpu = opaque;
304 CPUPPCState *env = &cpu->env;
305
Bharat Bhushan31f2cb82013-02-24 18:16:21 +0000306 store_booke_tcr(env, 0);
307 store_booke_tsr(env, -1);
308}
Bharat Bhushan88a78d92012-12-27 19:16:51 +0000309
Bharat Bhushan31f2cb82013-02-24 18:16:21 +0000310/*
311 * This function will be called whenever the CPU state changes.
312 * CPU states are defined "typedef enum RunState".
313 * Regarding timer, When CPU state changes to running after debug halt
314 * or similar cases which takes time then in between final watchdog
315 * expiry happenes. This will cause exit to QEMU and configured watchdog
316 * action will be taken. To avoid this we always clear the watchdog state when
317 * state changes to running.
318 */
Philippe Mathieu-Daudé538f0492021-01-11 16:20:20 +0100319static void cpu_state_change_handler(void *opaque, bool running, RunState state)
Bharat Bhushan31f2cb82013-02-24 18:16:21 +0000320{
321 PowerPCCPU *cpu = opaque;
322 CPUPPCState *env = &cpu->env;
323
324 if (!running) {
325 return;
326 }
327
328 /*
329 * Clear watchdog interrupt condition by clearing TSR.
330 */
331 store_booke_tsr(env, TSR_ENW | TSR_WIS | TSR_WRS_MASK);
Bharat Bhushan88a78d92012-12-27 19:16:51 +0000332}
333
Andreas Färbera34a92b2012-12-01 04:43:18 +0100334void ppc_booke_timers_init(PowerPCCPU *cpu, uint32_t freq, uint32_t flags)
Fabien Chouteauddd10552011-09-13 04:00:32 +0000335{
336 ppc_tb_t *tb_env;
337 booke_timer_t *booke_timer;
Bharat Bhushan31f2cb82013-02-24 18:16:21 +0000338 int ret = 0;
Fabien Chouteauddd10552011-09-13 04:00:32 +0000339
Markus Armbrusterb21e2382022-03-15 15:41:56 +0100340 tb_env = g_new0(ppc_tb_t, 1);
341 booke_timer = g_new0(booke_timer_t, 1);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000342
Andreas Färbera34a92b2012-12-01 04:43:18 +0100343 cpu->env.tb_env = tb_env;
Fabien Chouteauddd10552011-09-13 04:00:32 +0000344 tb_env->flags = flags | PPC_TIMER_BOOKE | PPC_DECR_ZERO_TRIGGERED;
345
346 tb_env->tb_freq = freq;
347 tb_env->decr_freq = freq;
348 tb_env->opaque = booke_timer;
Alex Blighbc72ad62013-08-21 16:03:08 +0100349 tb_env->decr_timer = timer_new_ns(QEMU_CLOCK_VIRTUAL, &booke_decr_cb, cpu);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000350
351 booke_timer->fit_timer =
Alex Blighbc72ad62013-08-21 16:03:08 +0100352 timer_new_ns(QEMU_CLOCK_VIRTUAL, &booke_fit_cb, cpu);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000353 booke_timer->wdt_timer =
Alex Blighbc72ad62013-08-21 16:03:08 +0100354 timer_new_ns(QEMU_CLOCK_VIRTUAL, &booke_wdt_cb, cpu);
Bharat Bhushan88a78d92012-12-27 19:16:51 +0000355
Bharat Bhushan31f2cb82013-02-24 18:16:21 +0000356 ret = kvmppc_booke_watchdog_enable(cpu);
357
358 if (ret) {
359 /* TODO: Start the QEMU emulated watchdog if not running on KVM.
360 * Also start the QEMU emulated watchdog if KVM does not support
361 * emulated watchdog or somehow it is not enabled (supported but
362 * not enabled is though some bug and requires debugging :)).
363 */
364 }
365
366 qemu_add_vm_change_state_handler(cpu_state_change_handler, cpu);
367
Bharat Bhushan88a78d92012-12-27 19:16:51 +0000368 qemu_register_reset(ppc_booke_timer_reset_handle, cpu);
Fabien Chouteauddd10552011-09-13 04:00:32 +0000369}