target/riscv: support for 128-bit bitwise instructions
[qemu/ar7.git] / softmmu / cpus.c
blob23bca46b07f442b8e79eb964368d5a2c98878762
1 /*
2 * QEMU System Emulator
4 * Copyright (c) 2003-2008 Fabrice Bellard
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:
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
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.
25 #include "qemu/osdep.h"
26 #include "qemu-common.h"
27 #include "monitor/monitor.h"
28 #include "qapi/error.h"
29 #include "qapi/qapi-commands-machine.h"
30 #include "qapi/qapi-commands-misc.h"
31 #include "qapi/qapi-events-run-state.h"
32 #include "qapi/qmp/qerror.h"
33 #include "exec/gdbstub.h"
34 #include "sysemu/hw_accel.h"
35 #include "exec/exec-all.h"
36 #include "qemu/thread.h"
37 #include "qemu/plugin.h"
38 #include "sysemu/cpus.h"
39 #include "qemu/guest-random.h"
40 #include "hw/nmi.h"
41 #include "sysemu/replay.h"
42 #include "sysemu/runstate.h"
43 #include "sysemu/cpu-timers.h"
44 #include "sysemu/whpx.h"
45 #include "hw/boards.h"
46 #include "hw/hw.h"
47 #include "trace.h"
49 #ifdef CONFIG_LINUX
51 #include <sys/prctl.h>
53 #ifndef PR_MCE_KILL
54 #define PR_MCE_KILL 33
55 #endif
57 #ifndef PR_MCE_KILL_SET
58 #define PR_MCE_KILL_SET 1
59 #endif
61 #ifndef PR_MCE_KILL_EARLY
62 #define PR_MCE_KILL_EARLY 1
63 #endif
65 #endif /* CONFIG_LINUX */
67 static QemuMutex qemu_global_mutex;
69 bool cpu_is_stopped(CPUState *cpu)
71 return cpu->stopped || !runstate_is_running();
74 bool cpu_work_list_empty(CPUState *cpu)
76 bool ret;
78 qemu_mutex_lock(&cpu->work_mutex);
79 ret = QSIMPLEQ_EMPTY(&cpu->work_list);
80 qemu_mutex_unlock(&cpu->work_mutex);
81 return ret;
84 bool cpu_thread_is_idle(CPUState *cpu)
86 if (cpu->stop || !cpu_work_list_empty(cpu)) {
87 return false;
89 if (cpu_is_stopped(cpu)) {
90 return true;
92 if (!cpu->halted || cpu_has_work(cpu) ||
93 kvm_halt_in_kernel() || whpx_apic_in_platform()) {
94 return false;
96 return true;
99 bool all_cpu_threads_idle(void)
101 CPUState *cpu;
103 CPU_FOREACH(cpu) {
104 if (!cpu_thread_is_idle(cpu)) {
105 return false;
108 return true;
111 /***********************************************************/
112 void hw_error(const char *fmt, ...)
114 va_list ap;
115 CPUState *cpu;
117 va_start(ap, fmt);
118 fprintf(stderr, "qemu: hardware error: ");
119 vfprintf(stderr, fmt, ap);
120 fprintf(stderr, "\n");
121 CPU_FOREACH(cpu) {
122 fprintf(stderr, "CPU #%d:\n", cpu->cpu_index);
123 cpu_dump_state(cpu, stderr, CPU_DUMP_FPU);
125 va_end(ap);
126 abort();
130 * The chosen accelerator is supposed to register this.
132 static const AccelOpsClass *cpus_accel;
134 void cpu_synchronize_all_states(void)
136 CPUState *cpu;
138 CPU_FOREACH(cpu) {
139 cpu_synchronize_state(cpu);
143 void cpu_synchronize_all_post_reset(void)
145 CPUState *cpu;
147 CPU_FOREACH(cpu) {
148 cpu_synchronize_post_reset(cpu);
152 void cpu_synchronize_all_post_init(void)
154 CPUState *cpu;
156 CPU_FOREACH(cpu) {
157 cpu_synchronize_post_init(cpu);
161 void cpu_synchronize_all_pre_loadvm(void)
163 CPUState *cpu;
165 CPU_FOREACH(cpu) {
166 cpu_synchronize_pre_loadvm(cpu);
170 void cpu_synchronize_state(CPUState *cpu)
172 if (cpus_accel->synchronize_state) {
173 cpus_accel->synchronize_state(cpu);
177 void cpu_synchronize_post_reset(CPUState *cpu)
179 if (cpus_accel->synchronize_post_reset) {
180 cpus_accel->synchronize_post_reset(cpu);
184 void cpu_synchronize_post_init(CPUState *cpu)
186 if (cpus_accel->synchronize_post_init) {
187 cpus_accel->synchronize_post_init(cpu);
191 void cpu_synchronize_pre_loadvm(CPUState *cpu)
193 if (cpus_accel->synchronize_pre_loadvm) {
194 cpus_accel->synchronize_pre_loadvm(cpu);
198 bool cpus_are_resettable(void)
200 return cpu_check_are_resettable();
203 int64_t cpus_get_virtual_clock(void)
206 * XXX
208 * need to check that cpus_accel is not NULL, because qcow2 calls
209 * qemu_get_clock_ns(CLOCK_VIRTUAL) without any accel initialized and
210 * with ticks disabled in some io-tests:
211 * 030 040 041 060 099 120 127 140 156 161 172 181 191 192 195 203 229 249 256 267
213 * is this expected?
215 * XXX
217 if (cpus_accel && cpus_accel->get_virtual_clock) {
218 return cpus_accel->get_virtual_clock();
220 return cpu_get_clock();
224 * return the time elapsed in VM between vm_start and vm_stop. Unless
225 * icount is active, cpus_get_elapsed_ticks() uses units of the host CPU cycle
226 * counter.
228 int64_t cpus_get_elapsed_ticks(void)
230 if (cpus_accel->get_elapsed_ticks) {
231 return cpus_accel->get_elapsed_ticks();
233 return cpu_get_ticks();
236 static void generic_handle_interrupt(CPUState *cpu, int mask)
238 cpu->interrupt_request |= mask;
240 if (!qemu_cpu_is_self(cpu)) {
241 qemu_cpu_kick(cpu);
245 void cpu_interrupt(CPUState *cpu, int mask)
247 if (cpus_accel->handle_interrupt) {
248 cpus_accel->handle_interrupt(cpu, mask);
249 } else {
250 generic_handle_interrupt(cpu, mask);
254 static int do_vm_stop(RunState state, bool send_stop)
256 int ret = 0;
258 if (runstate_is_running()) {
259 runstate_set(state);
260 cpu_disable_ticks();
261 pause_all_vcpus();
262 vm_state_notify(0, state);
263 if (send_stop) {
264 qapi_event_send_stop();
268 bdrv_drain_all();
269 ret = bdrv_flush_all();
270 trace_vm_stop_flush_all(ret);
272 return ret;
275 /* Special vm_stop() variant for terminating the process. Historically clients
276 * did not expect a QMP STOP event and so we need to retain compatibility.
278 int vm_shutdown(void)
280 return do_vm_stop(RUN_STATE_SHUTDOWN, false);
283 bool cpu_can_run(CPUState *cpu)
285 if (cpu->stop) {
286 return false;
288 if (cpu_is_stopped(cpu)) {
289 return false;
291 return true;
294 void cpu_handle_guest_debug(CPUState *cpu)
296 if (replay_running_debug()) {
297 if (!cpu->singlestep_enabled) {
299 * Report about the breakpoint and
300 * make a single step to skip it
302 replay_breakpoint();
303 cpu_single_step(cpu, SSTEP_ENABLE);
304 } else {
305 cpu_single_step(cpu, 0);
307 } else {
308 gdb_set_stop_cpu(cpu);
309 qemu_system_debug_request();
310 cpu->stopped = true;
314 #ifdef CONFIG_LINUX
315 static void sigbus_reraise(void)
317 sigset_t set;
318 struct sigaction action;
320 memset(&action, 0, sizeof(action));
321 action.sa_handler = SIG_DFL;
322 if (!sigaction(SIGBUS, &action, NULL)) {
323 raise(SIGBUS);
324 sigemptyset(&set);
325 sigaddset(&set, SIGBUS);
326 pthread_sigmask(SIG_UNBLOCK, &set, NULL);
328 perror("Failed to re-raise SIGBUS!");
329 abort();
332 static void sigbus_handler(int n, siginfo_t *siginfo, void *ctx)
334 if (siginfo->si_code != BUS_MCEERR_AO && siginfo->si_code != BUS_MCEERR_AR) {
335 sigbus_reraise();
338 if (current_cpu) {
339 /* Called asynchronously in VCPU thread. */
340 if (kvm_on_sigbus_vcpu(current_cpu, siginfo->si_code, siginfo->si_addr)) {
341 sigbus_reraise();
343 } else {
344 /* Called synchronously (via signalfd) in main thread. */
345 if (kvm_on_sigbus(siginfo->si_code, siginfo->si_addr)) {
346 sigbus_reraise();
351 static void qemu_init_sigbus(void)
353 struct sigaction action;
356 * ALERT: when modifying this, take care that SIGBUS forwarding in
357 * os_mem_prealloc() will continue working as expected.
359 memset(&action, 0, sizeof(action));
360 action.sa_flags = SA_SIGINFO;
361 action.sa_sigaction = sigbus_handler;
362 sigaction(SIGBUS, &action, NULL);
364 prctl(PR_MCE_KILL, PR_MCE_KILL_SET, PR_MCE_KILL_EARLY, 0, 0);
366 #else /* !CONFIG_LINUX */
367 static void qemu_init_sigbus(void)
370 #endif /* !CONFIG_LINUX */
372 static QemuThread io_thread;
374 /* cpu creation */
375 static QemuCond qemu_cpu_cond;
376 /* system init */
377 static QemuCond qemu_pause_cond;
379 void qemu_init_cpu_loop(void)
381 qemu_init_sigbus();
382 qemu_cond_init(&qemu_cpu_cond);
383 qemu_cond_init(&qemu_pause_cond);
384 qemu_mutex_init(&qemu_global_mutex);
386 qemu_thread_get_self(&io_thread);
389 void run_on_cpu(CPUState *cpu, run_on_cpu_func func, run_on_cpu_data data)
391 do_run_on_cpu(cpu, func, data, &qemu_global_mutex);
394 static void qemu_cpu_stop(CPUState *cpu, bool exit)
396 g_assert(qemu_cpu_is_self(cpu));
397 cpu->stop = false;
398 cpu->stopped = true;
399 if (exit) {
400 cpu_exit(cpu);
402 qemu_cond_broadcast(&qemu_pause_cond);
405 void qemu_wait_io_event_common(CPUState *cpu)
407 qatomic_mb_set(&cpu->thread_kicked, false);
408 if (cpu->stop) {
409 qemu_cpu_stop(cpu, false);
411 process_queued_cpu_work(cpu);
414 void qemu_wait_io_event(CPUState *cpu)
416 bool slept = false;
418 while (cpu_thread_is_idle(cpu)) {
419 if (!slept) {
420 slept = true;
421 qemu_plugin_vcpu_idle_cb(cpu);
423 qemu_cond_wait(cpu->halt_cond, &qemu_global_mutex);
425 if (slept) {
426 qemu_plugin_vcpu_resume_cb(cpu);
429 #ifdef _WIN32
430 /* Eat dummy APC queued by cpus_kick_thread. */
431 if (hax_enabled()) {
432 SleepEx(0, TRUE);
434 #endif
435 qemu_wait_io_event_common(cpu);
438 void cpus_kick_thread(CPUState *cpu)
440 #ifndef _WIN32
441 int err;
443 if (cpu->thread_kicked) {
444 return;
446 cpu->thread_kicked = true;
447 err = pthread_kill(cpu->thread->thread, SIG_IPI);
448 if (err && err != ESRCH) {
449 fprintf(stderr, "qemu:%s: %s", __func__, strerror(err));
450 exit(1);
452 #endif
455 void qemu_cpu_kick(CPUState *cpu)
457 qemu_cond_broadcast(cpu->halt_cond);
458 if (cpus_accel->kick_vcpu_thread) {
459 cpus_accel->kick_vcpu_thread(cpu);
460 } else { /* default */
461 cpus_kick_thread(cpu);
465 void qemu_cpu_kick_self(void)
467 assert(current_cpu);
468 cpus_kick_thread(current_cpu);
471 bool qemu_cpu_is_self(CPUState *cpu)
473 return qemu_thread_is_self(cpu->thread);
476 bool qemu_in_vcpu_thread(void)
478 return current_cpu && qemu_cpu_is_self(current_cpu);
481 static __thread bool iothread_locked = false;
483 bool qemu_mutex_iothread_locked(void)
485 return iothread_locked;
489 * The BQL is taken from so many places that it is worth profiling the
490 * callers directly, instead of funneling them all through a single function.
492 void qemu_mutex_lock_iothread_impl(const char *file, int line)
494 QemuMutexLockFunc bql_lock = qatomic_read(&qemu_bql_mutex_lock_func);
496 g_assert(!qemu_mutex_iothread_locked());
497 bql_lock(&qemu_global_mutex, file, line);
498 iothread_locked = true;
501 void qemu_mutex_unlock_iothread(void)
503 g_assert(qemu_mutex_iothread_locked());
504 iothread_locked = false;
505 qemu_mutex_unlock(&qemu_global_mutex);
508 void qemu_cond_wait_iothread(QemuCond *cond)
510 qemu_cond_wait(cond, &qemu_global_mutex);
513 void qemu_cond_timedwait_iothread(QemuCond *cond, int ms)
515 qemu_cond_timedwait(cond, &qemu_global_mutex, ms);
518 /* signal CPU creation */
519 void cpu_thread_signal_created(CPUState *cpu)
521 cpu->created = true;
522 qemu_cond_signal(&qemu_cpu_cond);
525 /* signal CPU destruction */
526 void cpu_thread_signal_destroyed(CPUState *cpu)
528 cpu->created = false;
529 qemu_cond_signal(&qemu_cpu_cond);
533 static bool all_vcpus_paused(void)
535 CPUState *cpu;
537 CPU_FOREACH(cpu) {
538 if (!cpu->stopped) {
539 return false;
543 return true;
546 void pause_all_vcpus(void)
548 CPUState *cpu;
550 qemu_clock_enable(QEMU_CLOCK_VIRTUAL, false);
551 CPU_FOREACH(cpu) {
552 if (qemu_cpu_is_self(cpu)) {
553 qemu_cpu_stop(cpu, true);
554 } else {
555 cpu->stop = true;
556 qemu_cpu_kick(cpu);
560 /* We need to drop the replay_lock so any vCPU threads woken up
561 * can finish their replay tasks
563 replay_mutex_unlock();
565 while (!all_vcpus_paused()) {
566 qemu_cond_wait(&qemu_pause_cond, &qemu_global_mutex);
567 CPU_FOREACH(cpu) {
568 qemu_cpu_kick(cpu);
572 qemu_mutex_unlock_iothread();
573 replay_mutex_lock();
574 qemu_mutex_lock_iothread();
577 void cpu_resume(CPUState *cpu)
579 cpu->stop = false;
580 cpu->stopped = false;
581 qemu_cpu_kick(cpu);
584 void resume_all_vcpus(void)
586 CPUState *cpu;
588 if (!runstate_is_running()) {
589 return;
592 qemu_clock_enable(QEMU_CLOCK_VIRTUAL, true);
593 CPU_FOREACH(cpu) {
594 cpu_resume(cpu);
598 void cpu_remove_sync(CPUState *cpu)
600 cpu->stop = true;
601 cpu->unplug = true;
602 qemu_cpu_kick(cpu);
603 qemu_mutex_unlock_iothread();
604 qemu_thread_join(cpu->thread);
605 qemu_mutex_lock_iothread();
608 void cpus_register_accel(const AccelOpsClass *ops)
610 assert(ops != NULL);
611 assert(ops->create_vcpu_thread != NULL); /* mandatory */
612 cpus_accel = ops;
615 void qemu_init_vcpu(CPUState *cpu)
617 MachineState *ms = MACHINE(qdev_get_machine());
619 cpu->nr_cores = ms->smp.cores;
620 cpu->nr_threads = ms->smp.threads;
621 cpu->stopped = true;
622 cpu->random_seed = qemu_guest_random_seed_thread_part1();
624 if (!cpu->as) {
625 /* If the target cpu hasn't set up any address spaces itself,
626 * give it the default one.
628 cpu->num_ases = 1;
629 cpu_address_space_init(cpu, 0, "cpu-memory", cpu->memory);
632 /* accelerators all implement the AccelOpsClass */
633 g_assert(cpus_accel != NULL && cpus_accel->create_vcpu_thread != NULL);
634 cpus_accel->create_vcpu_thread(cpu);
636 while (!cpu->created) {
637 qemu_cond_wait(&qemu_cpu_cond, &qemu_global_mutex);
641 void cpu_stop_current(void)
643 if (current_cpu) {
644 current_cpu->stop = true;
645 cpu_exit(current_cpu);
649 int vm_stop(RunState state)
651 if (qemu_in_vcpu_thread()) {
652 qemu_system_vmstop_request_prepare();
653 qemu_system_vmstop_request(state);
655 * FIXME: should not return to device code in case
656 * vm_stop() has been requested.
658 cpu_stop_current();
659 return 0;
662 return do_vm_stop(state, true);
666 * Prepare for (re)starting the VM.
667 * Returns -1 if the vCPUs are not to be restarted (e.g. if they are already
668 * running or in case of an error condition), 0 otherwise.
670 int vm_prepare_start(void)
672 RunState requested;
674 qemu_vmstop_requested(&requested);
675 if (runstate_is_running() && requested == RUN_STATE__MAX) {
676 return -1;
679 /* Ensure that a STOP/RESUME pair of events is emitted if a
680 * vmstop request was pending. The BLOCK_IO_ERROR event, for
681 * example, according to documentation is always followed by
682 * the STOP event.
684 if (runstate_is_running()) {
685 qapi_event_send_stop();
686 qapi_event_send_resume();
687 return -1;
690 /* We are sending this now, but the CPUs will be resumed shortly later */
691 qapi_event_send_resume();
693 cpu_enable_ticks();
694 runstate_set(RUN_STATE_RUNNING);
695 vm_state_notify(1, RUN_STATE_RUNNING);
696 return 0;
699 void vm_start(void)
701 if (!vm_prepare_start()) {
702 resume_all_vcpus();
706 /* does a state transition even if the VM is already stopped,
707 current state is forgotten forever */
708 int vm_stop_force_state(RunState state)
710 if (runstate_is_running()) {
711 return vm_stop(state);
712 } else {
713 int ret;
714 runstate_set(state);
716 bdrv_drain_all();
717 /* Make sure to return an error if the flush in a previous vm_stop()
718 * failed. */
719 ret = bdrv_flush_all();
720 trace_vm_stop_flush_all(ret);
721 return ret;
725 void list_cpus(const char *optarg)
727 /* XXX: implement xxx_cpu_list for targets that still miss it */
728 #if defined(cpu_list)
729 cpu_list();
730 #endif
733 void qmp_memsave(int64_t addr, int64_t size, const char *filename,
734 bool has_cpu, int64_t cpu_index, Error **errp)
736 FILE *f;
737 uint32_t l;
738 CPUState *cpu;
739 uint8_t buf[1024];
740 int64_t orig_addr = addr, orig_size = size;
742 if (!has_cpu) {
743 cpu_index = 0;
746 cpu = qemu_get_cpu(cpu_index);
747 if (cpu == NULL) {
748 error_setg(errp, QERR_INVALID_PARAMETER_VALUE, "cpu-index",
749 "a CPU number");
750 return;
753 f = fopen(filename, "wb");
754 if (!f) {
755 error_setg_file_open(errp, errno, filename);
756 return;
759 while (size != 0) {
760 l = sizeof(buf);
761 if (l > size)
762 l = size;
763 if (cpu_memory_rw_debug(cpu, addr, buf, l, 0) != 0) {
764 error_setg(errp, "Invalid addr 0x%016" PRIx64 "/size %" PRId64
765 " specified", orig_addr, orig_size);
766 goto exit;
768 if (fwrite(buf, 1, l, f) != l) {
769 error_setg(errp, QERR_IO_ERROR);
770 goto exit;
772 addr += l;
773 size -= l;
776 exit:
777 fclose(f);
780 void qmp_pmemsave(int64_t addr, int64_t size, const char *filename,
781 Error **errp)
783 FILE *f;
784 uint32_t l;
785 uint8_t buf[1024];
787 f = fopen(filename, "wb");
788 if (!f) {
789 error_setg_file_open(errp, errno, filename);
790 return;
793 while (size != 0) {
794 l = sizeof(buf);
795 if (l > size)
796 l = size;
797 cpu_physical_memory_read(addr, buf, l);
798 if (fwrite(buf, 1, l, f) != l) {
799 error_setg(errp, QERR_IO_ERROR);
800 goto exit;
802 addr += l;
803 size -= l;
806 exit:
807 fclose(f);
810 void qmp_inject_nmi(Error **errp)
812 nmi_monitor_handle(monitor_get_cpu_index(monitor_cur()), errp);