xref: /qemu/system/runstate.c (revision 02326733)
1 /*
2  * QEMU main system emulation loop
3  *
4  * Copyright (c) 2003-2020 QEMU contributors
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  */
24 
25 #include "qemu/osdep.h"
26 #include "audio/audio.h"
27 #include "block/block.h"
28 #include "block/export.h"
29 #include "chardev/char.h"
30 #include "crypto/cipher.h"
31 #include "crypto/init.h"
32 #include "exec/cpu-common.h"
33 #include "gdbstub/syscalls.h"
34 #include "hw/boards.h"
35 #include "migration/misc.h"
36 #include "migration/postcopy-ram.h"
37 #include "monitor/monitor.h"
38 #include "net/net.h"
39 #include "net/vhost_net.h"
40 #include "qapi/error.h"
41 #include "qapi/qapi-commands-run-state.h"
42 #include "qapi/qapi-events-run-state.h"
43 #include "qemu/accel.h"
44 #include "qemu/error-report.h"
45 #include "qemu/job.h"
46 #include "qemu/log.h"
47 #include "qemu/module.h"
48 #include "qemu/plugin.h"
49 #include "qemu/sockets.h"
50 #include "qemu/timer.h"
51 #include "qemu/thread.h"
52 #include "qom/object.h"
53 #include "qom/object_interfaces.h"
54 #include "sysemu/cpus.h"
55 #include "sysemu/qtest.h"
56 #include "sysemu/replay.h"
57 #include "sysemu/reset.h"
58 #include "sysemu/runstate.h"
59 #include "sysemu/runstate-action.h"
60 #include "sysemu/sysemu.h"
61 #include "sysemu/tpm.h"
62 #include "trace.h"
63 
64 static NotifierList exit_notifiers =
65     NOTIFIER_LIST_INITIALIZER(exit_notifiers);
66 
67 static RunState current_run_state = RUN_STATE_PRELAUNCH;
68 
69 /* We use RUN_STATE__MAX but any invalid value will do */
70 static RunState vmstop_requested = RUN_STATE__MAX;
71 static QemuMutex vmstop_lock;
72 
73 typedef struct {
74     RunState from;
75     RunState to;
76 } RunStateTransition;
77 
78 static const RunStateTransition runstate_transitions_def[] = {
79     { RUN_STATE_PRELAUNCH, RUN_STATE_INMIGRATE },
80     { RUN_STATE_PRELAUNCH, RUN_STATE_SUSPENDED },
81 
82     { RUN_STATE_DEBUG, RUN_STATE_RUNNING },
83     { RUN_STATE_DEBUG, RUN_STATE_FINISH_MIGRATE },
84     { RUN_STATE_DEBUG, RUN_STATE_PRELAUNCH },
85 
86     { RUN_STATE_INMIGRATE, RUN_STATE_INTERNAL_ERROR },
87     { RUN_STATE_INMIGRATE, RUN_STATE_IO_ERROR },
88     { RUN_STATE_INMIGRATE, RUN_STATE_PAUSED },
89     { RUN_STATE_INMIGRATE, RUN_STATE_RUNNING },
90     { RUN_STATE_INMIGRATE, RUN_STATE_SHUTDOWN },
91     { RUN_STATE_INMIGRATE, RUN_STATE_SUSPENDED },
92     { RUN_STATE_INMIGRATE, RUN_STATE_WATCHDOG },
93     { RUN_STATE_INMIGRATE, RUN_STATE_GUEST_PANICKED },
94     { RUN_STATE_INMIGRATE, RUN_STATE_FINISH_MIGRATE },
95     { RUN_STATE_INMIGRATE, RUN_STATE_PRELAUNCH },
96     { RUN_STATE_INMIGRATE, RUN_STATE_POSTMIGRATE },
97     { RUN_STATE_INMIGRATE, RUN_STATE_COLO },
98 
99     { RUN_STATE_INTERNAL_ERROR, RUN_STATE_PAUSED },
100     { RUN_STATE_INTERNAL_ERROR, RUN_STATE_FINISH_MIGRATE },
101     { RUN_STATE_INTERNAL_ERROR, RUN_STATE_PRELAUNCH },
102 
103     { RUN_STATE_IO_ERROR, RUN_STATE_RUNNING },
104     { RUN_STATE_IO_ERROR, RUN_STATE_FINISH_MIGRATE },
105     { RUN_STATE_IO_ERROR, RUN_STATE_PRELAUNCH },
106 
107     { RUN_STATE_PAUSED, RUN_STATE_RUNNING },
108     { RUN_STATE_PAUSED, RUN_STATE_FINISH_MIGRATE },
109     { RUN_STATE_PAUSED, RUN_STATE_POSTMIGRATE },
110     { RUN_STATE_PAUSED, RUN_STATE_PRELAUNCH },
111     { RUN_STATE_PAUSED, RUN_STATE_COLO},
112     { RUN_STATE_PAUSED, RUN_STATE_SUSPENDED},
113 
114     { RUN_STATE_POSTMIGRATE, RUN_STATE_RUNNING },
115     { RUN_STATE_POSTMIGRATE, RUN_STATE_FINISH_MIGRATE },
116     { RUN_STATE_POSTMIGRATE, RUN_STATE_PRELAUNCH },
117 
118     { RUN_STATE_PRELAUNCH, RUN_STATE_RUNNING },
119     { RUN_STATE_PRELAUNCH, RUN_STATE_FINISH_MIGRATE },
120     { RUN_STATE_PRELAUNCH, RUN_STATE_INMIGRATE },
121 
122     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_RUNNING },
123     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_PAUSED },
124     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_POSTMIGRATE },
125     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_PRELAUNCH },
126     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_COLO },
127     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_INTERNAL_ERROR },
128     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_IO_ERROR },
129     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_SHUTDOWN },
130     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_SUSPENDED },
131     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_WATCHDOG },
132     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_GUEST_PANICKED },
133 
134     { RUN_STATE_RESTORE_VM, RUN_STATE_RUNNING },
135     { RUN_STATE_RESTORE_VM, RUN_STATE_PRELAUNCH },
136     { RUN_STATE_RESTORE_VM, RUN_STATE_SUSPENDED },
137 
138     { RUN_STATE_COLO, RUN_STATE_RUNNING },
139     { RUN_STATE_COLO, RUN_STATE_PRELAUNCH },
140     { RUN_STATE_COLO, RUN_STATE_SHUTDOWN},
141 
142     { RUN_STATE_RUNNING, RUN_STATE_DEBUG },
143     { RUN_STATE_RUNNING, RUN_STATE_INTERNAL_ERROR },
144     { RUN_STATE_RUNNING, RUN_STATE_IO_ERROR },
145     { RUN_STATE_RUNNING, RUN_STATE_PAUSED },
146     { RUN_STATE_RUNNING, RUN_STATE_FINISH_MIGRATE },
147     { RUN_STATE_RUNNING, RUN_STATE_RESTORE_VM },
148     { RUN_STATE_RUNNING, RUN_STATE_SAVE_VM },
149     { RUN_STATE_RUNNING, RUN_STATE_SHUTDOWN },
150     { RUN_STATE_RUNNING, RUN_STATE_WATCHDOG },
151     { RUN_STATE_RUNNING, RUN_STATE_GUEST_PANICKED },
152     { RUN_STATE_RUNNING, RUN_STATE_COLO},
153 
154     { RUN_STATE_SAVE_VM, RUN_STATE_RUNNING },
155     { RUN_STATE_SAVE_VM, RUN_STATE_SUSPENDED },
156 
157     { RUN_STATE_SHUTDOWN, RUN_STATE_PAUSED },
158     { RUN_STATE_SHUTDOWN, RUN_STATE_FINISH_MIGRATE },
159     { RUN_STATE_SHUTDOWN, RUN_STATE_PRELAUNCH },
160     { RUN_STATE_SHUTDOWN, RUN_STATE_COLO },
161 
162     { RUN_STATE_DEBUG, RUN_STATE_SUSPENDED },
163     { RUN_STATE_RUNNING, RUN_STATE_SUSPENDED },
164     { RUN_STATE_SUSPENDED, RUN_STATE_RUNNING },
165     { RUN_STATE_SUSPENDED, RUN_STATE_FINISH_MIGRATE },
166     { RUN_STATE_SUSPENDED, RUN_STATE_PRELAUNCH },
167     { RUN_STATE_SUSPENDED, RUN_STATE_COLO},
168     { RUN_STATE_SUSPENDED, RUN_STATE_PAUSED},
169     { RUN_STATE_SUSPENDED, RUN_STATE_SAVE_VM },
170     { RUN_STATE_SUSPENDED, RUN_STATE_RESTORE_VM },
171     { RUN_STATE_SUSPENDED, RUN_STATE_SHUTDOWN },
172 
173     { RUN_STATE_WATCHDOG, RUN_STATE_RUNNING },
174     { RUN_STATE_WATCHDOG, RUN_STATE_FINISH_MIGRATE },
175     { RUN_STATE_WATCHDOG, RUN_STATE_PRELAUNCH },
176     { RUN_STATE_WATCHDOG, RUN_STATE_COLO},
177 
178     { RUN_STATE_GUEST_PANICKED, RUN_STATE_RUNNING },
179     { RUN_STATE_GUEST_PANICKED, RUN_STATE_FINISH_MIGRATE },
180     { RUN_STATE_GUEST_PANICKED, RUN_STATE_PRELAUNCH },
181 
182     { RUN_STATE__MAX, RUN_STATE__MAX },
183 };
184 
185 static bool runstate_valid_transitions[RUN_STATE__MAX][RUN_STATE__MAX];
186 
187 bool runstate_check(RunState state)
188 {
189     return current_run_state == state;
190 }
191 
192 static void runstate_init(void)
193 {
194     const RunStateTransition *p;
195 
196     memset(&runstate_valid_transitions, 0, sizeof(runstate_valid_transitions));
197     for (p = &runstate_transitions_def[0]; p->from != RUN_STATE__MAX; p++) {
198         runstate_valid_transitions[p->from][p->to] = true;
199     }
200 
201     qemu_mutex_init(&vmstop_lock);
202 }
203 
204 /* This function will abort() on invalid state transitions */
205 void runstate_set(RunState new_state)
206 {
207     assert(new_state < RUN_STATE__MAX);
208 
209     trace_runstate_set(current_run_state, RunState_str(current_run_state),
210                        new_state, RunState_str(new_state));
211 
212     if (current_run_state == new_state) {
213         return;
214     }
215 
216     if (!runstate_valid_transitions[current_run_state][new_state]) {
217         error_report("invalid runstate transition: '%s' -> '%s'",
218                      RunState_str(current_run_state),
219                      RunState_str(new_state));
220         abort();
221     }
222 
223     current_run_state = new_state;
224 }
225 
226 RunState runstate_get(void)
227 {
228     return current_run_state;
229 }
230 
231 bool runstate_is_running(void)
232 {
233     return runstate_check(RUN_STATE_RUNNING);
234 }
235 
236 bool runstate_needs_reset(void)
237 {
238     return runstate_check(RUN_STATE_INTERNAL_ERROR) ||
239         runstate_check(RUN_STATE_SHUTDOWN);
240 }
241 
242 StatusInfo *qmp_query_status(Error **errp)
243 {
244     StatusInfo *info = g_malloc0(sizeof(*info));
245 
246     info->running = runstate_is_running();
247     info->status = current_run_state;
248 
249     return info;
250 }
251 
252 bool qemu_vmstop_requested(RunState *r)
253 {
254     qemu_mutex_lock(&vmstop_lock);
255     *r = vmstop_requested;
256     vmstop_requested = RUN_STATE__MAX;
257     qemu_mutex_unlock(&vmstop_lock);
258     return *r < RUN_STATE__MAX;
259 }
260 
261 void qemu_system_vmstop_request_prepare(void)
262 {
263     qemu_mutex_lock(&vmstop_lock);
264 }
265 
266 void qemu_system_vmstop_request(RunState state)
267 {
268     vmstop_requested = state;
269     qemu_mutex_unlock(&vmstop_lock);
270     qemu_notify_event();
271 }
272 struct VMChangeStateEntry {
273     VMChangeStateHandler *cb;
274     VMChangeStateHandler *prepare_cb;
275     void *opaque;
276     QTAILQ_ENTRY(VMChangeStateEntry) entries;
277     int priority;
278 };
279 
280 static QTAILQ_HEAD(, VMChangeStateEntry) vm_change_state_head =
281     QTAILQ_HEAD_INITIALIZER(vm_change_state_head);
282 
283 /**
284  * qemu_add_vm_change_state_handler_prio:
285  * @cb: the callback to invoke
286  * @opaque: user data passed to the callback
287  * @priority: low priorities execute first when the vm runs and the reverse is
288  *            true when the vm stops
289  *
290  * Register a callback function that is invoked when the vm starts or stops
291  * running.
292  *
293  * Returns: an entry to be freed using qemu_del_vm_change_state_handler()
294  */
295 VMChangeStateEntry *qemu_add_vm_change_state_handler_prio(
296         VMChangeStateHandler *cb, void *opaque, int priority)
297 {
298     return qemu_add_vm_change_state_handler_prio_full(cb, NULL, opaque,
299                                                       priority);
300 }
301 
302 /**
303  * qemu_add_vm_change_state_handler_prio_full:
304  * @cb: the main callback to invoke
305  * @prepare_cb: a callback to invoke before the main callback
306  * @opaque: user data passed to the callbacks
307  * @priority: low priorities execute first when the vm runs and the reverse is
308  *            true when the vm stops
309  *
310  * Register a main callback function and an optional prepare callback function
311  * that are invoked when the vm starts or stops running. The main callback and
312  * the prepare callback are called in two separate phases: First all prepare
313  * callbacks are called and only then all main callbacks are called. As its
314  * name suggests, the prepare callback can be used to do some preparatory work
315  * before invoking the main callback.
316  *
317  * Returns: an entry to be freed using qemu_del_vm_change_state_handler()
318  */
319 VMChangeStateEntry *
320 qemu_add_vm_change_state_handler_prio_full(VMChangeStateHandler *cb,
321                                            VMChangeStateHandler *prepare_cb,
322                                            void *opaque, int priority)
323 {
324     VMChangeStateEntry *e;
325     VMChangeStateEntry *other;
326 
327     e = g_malloc0(sizeof(*e));
328     e->cb = cb;
329     e->prepare_cb = prepare_cb;
330     e->opaque = opaque;
331     e->priority = priority;
332 
333     /* Keep list sorted in ascending priority order */
334     QTAILQ_FOREACH(other, &vm_change_state_head, entries) {
335         if (priority < other->priority) {
336             QTAILQ_INSERT_BEFORE(other, e, entries);
337             return e;
338         }
339     }
340 
341     QTAILQ_INSERT_TAIL(&vm_change_state_head, e, entries);
342     return e;
343 }
344 
345 VMChangeStateEntry *qemu_add_vm_change_state_handler(VMChangeStateHandler *cb,
346                                                      void *opaque)
347 {
348     return qemu_add_vm_change_state_handler_prio(cb, opaque, 0);
349 }
350 
351 void qemu_del_vm_change_state_handler(VMChangeStateEntry *e)
352 {
353     QTAILQ_REMOVE(&vm_change_state_head, e, entries);
354     g_free(e);
355 }
356 
357 void vm_state_notify(bool running, RunState state)
358 {
359     VMChangeStateEntry *e, *next;
360 
361     trace_vm_state_notify(running, state, RunState_str(state));
362 
363     if (running) {
364         QTAILQ_FOREACH_SAFE(e, &vm_change_state_head, entries, next) {
365             if (e->prepare_cb) {
366                 e->prepare_cb(e->opaque, running, state);
367             }
368         }
369 
370         QTAILQ_FOREACH_SAFE(e, &vm_change_state_head, entries, next) {
371             e->cb(e->opaque, running, state);
372         }
373     } else {
374         QTAILQ_FOREACH_REVERSE_SAFE(e, &vm_change_state_head, entries, next) {
375             if (e->prepare_cb) {
376                 e->prepare_cb(e->opaque, running, state);
377             }
378         }
379 
380         QTAILQ_FOREACH_REVERSE_SAFE(e, &vm_change_state_head, entries, next) {
381             e->cb(e->opaque, running, state);
382         }
383     }
384 }
385 
386 static ShutdownCause reset_requested;
387 static ShutdownCause shutdown_requested;
388 static int shutdown_exit_code = EXIT_SUCCESS;
389 static int shutdown_signal;
390 static pid_t shutdown_pid;
391 static int powerdown_requested;
392 static int debug_requested;
393 static int suspend_requested;
394 static WakeupReason wakeup_reason;
395 static NotifierList powerdown_notifiers =
396     NOTIFIER_LIST_INITIALIZER(powerdown_notifiers);
397 static NotifierList suspend_notifiers =
398     NOTIFIER_LIST_INITIALIZER(suspend_notifiers);
399 static NotifierList wakeup_notifiers =
400     NOTIFIER_LIST_INITIALIZER(wakeup_notifiers);
401 static NotifierList shutdown_notifiers =
402     NOTIFIER_LIST_INITIALIZER(shutdown_notifiers);
403 static uint32_t wakeup_reason_mask = ~(1 << QEMU_WAKEUP_REASON_NONE);
404 
405 ShutdownCause qemu_shutdown_requested_get(void)
406 {
407     return shutdown_requested;
408 }
409 
410 ShutdownCause qemu_reset_requested_get(void)
411 {
412     return reset_requested;
413 }
414 
415 static int qemu_shutdown_requested(void)
416 {
417     return qatomic_xchg(&shutdown_requested, SHUTDOWN_CAUSE_NONE);
418 }
419 
420 static void qemu_kill_report(void)
421 {
422     if (!qtest_driver() && shutdown_signal) {
423         if (shutdown_pid == 0) {
424             /* This happens for eg ^C at the terminal, so it's worth
425              * avoiding printing an odd message in that case.
426              */
427             error_report("terminating on signal %d", shutdown_signal);
428         } else {
429             char *shutdown_cmd = qemu_get_pid_name(shutdown_pid);
430 
431             error_report("terminating on signal %d from pid " FMT_pid " (%s)",
432                          shutdown_signal, shutdown_pid,
433                          shutdown_cmd ? shutdown_cmd : "<unknown process>");
434             g_free(shutdown_cmd);
435         }
436         shutdown_signal = 0;
437     }
438 }
439 
440 static ShutdownCause qemu_reset_requested(void)
441 {
442     ShutdownCause r = reset_requested;
443 
444     if (r && replay_checkpoint(CHECKPOINT_RESET_REQUESTED)) {
445         reset_requested = SHUTDOWN_CAUSE_NONE;
446         return r;
447     }
448     return SHUTDOWN_CAUSE_NONE;
449 }
450 
451 static int qemu_suspend_requested(void)
452 {
453     int r = suspend_requested;
454     if (r && replay_checkpoint(CHECKPOINT_SUSPEND_REQUESTED)) {
455         suspend_requested = 0;
456         return r;
457     }
458     return false;
459 }
460 
461 static WakeupReason qemu_wakeup_requested(void)
462 {
463     return wakeup_reason;
464 }
465 
466 static int qemu_powerdown_requested(void)
467 {
468     int r = powerdown_requested;
469     powerdown_requested = 0;
470     return r;
471 }
472 
473 static int qemu_debug_requested(void)
474 {
475     int r = debug_requested;
476     debug_requested = 0;
477     return r;
478 }
479 
480 /*
481  * Reset the VM. Issue an event unless @reason is SHUTDOWN_CAUSE_NONE.
482  */
483 void qemu_system_reset(ShutdownCause reason)
484 {
485     MachineClass *mc;
486 
487     mc = current_machine ? MACHINE_GET_CLASS(current_machine) : NULL;
488 
489     cpu_synchronize_all_states();
490 
491     if (mc && mc->reset) {
492         mc->reset(current_machine, reason);
493     } else {
494         qemu_devices_reset(reason);
495     }
496     switch (reason) {
497     case SHUTDOWN_CAUSE_NONE:
498     case SHUTDOWN_CAUSE_SUBSYSTEM_RESET:
499     case SHUTDOWN_CAUSE_SNAPSHOT_LOAD:
500         break;
501     default:
502         qapi_event_send_reset(shutdown_caused_by_guest(reason), reason);
503     }
504 
505     /*
506      * Some boards use the machine reset callback to point CPUs to the firmware
507      * entry point.  Assume that this is not the case for boards that support
508      * non-resettable CPUs (currently used only for confidential guests), in
509      * which case cpu_synchronize_all_post_init() is enough because
510      * it does _more_  than cpu_synchronize_all_post_reset().
511      */
512     if (cpus_are_resettable()) {
513         cpu_synchronize_all_post_reset();
514     } else {
515         assert(runstate_check(RUN_STATE_PRELAUNCH));
516     }
517 
518     vm_set_suspended(false);
519 }
520 
521 /*
522  * Wake the VM after suspend.
523  */
524 static void qemu_system_wakeup(void)
525 {
526     MachineClass *mc;
527 
528     mc = current_machine ? MACHINE_GET_CLASS(current_machine) : NULL;
529 
530     if (mc && mc->wakeup) {
531         mc->wakeup(current_machine);
532     }
533 }
534 
535 void qemu_system_guest_panicked(GuestPanicInformation *info)
536 {
537     qemu_log_mask(LOG_GUEST_ERROR, "Guest crashed");
538 
539     if (current_cpu) {
540         current_cpu->crash_occurred = true;
541     }
542     /*
543      * TODO:  Currently the available panic actions are: none, pause, and
544      * shutdown, but in principle debug and reset could be supported as well.
545      * Investigate any potential use cases for the unimplemented actions.
546      */
547     if (panic_action == PANIC_ACTION_PAUSE
548         || (panic_action == PANIC_ACTION_SHUTDOWN && shutdown_action == SHUTDOWN_ACTION_PAUSE)) {
549         qapi_event_send_guest_panicked(GUEST_PANIC_ACTION_PAUSE, info);
550         vm_stop(RUN_STATE_GUEST_PANICKED);
551     } else if (panic_action == PANIC_ACTION_SHUTDOWN ||
552                panic_action == PANIC_ACTION_EXIT_FAILURE) {
553         qapi_event_send_guest_panicked(GUEST_PANIC_ACTION_POWEROFF, info);
554         vm_stop(RUN_STATE_GUEST_PANICKED);
555         qemu_system_shutdown_request(SHUTDOWN_CAUSE_GUEST_PANIC);
556     } else {
557         qapi_event_send_guest_panicked(GUEST_PANIC_ACTION_RUN, info);
558     }
559 
560     if (info) {
561         if (info->type == GUEST_PANIC_INFORMATION_TYPE_HYPER_V) {
562             qemu_log_mask(LOG_GUEST_ERROR, "\nHV crash parameters: (%#"PRIx64
563                           " %#"PRIx64" %#"PRIx64" %#"PRIx64" %#"PRIx64")\n",
564                           info->u.hyper_v.arg1,
565                           info->u.hyper_v.arg2,
566                           info->u.hyper_v.arg3,
567                           info->u.hyper_v.arg4,
568                           info->u.hyper_v.arg5);
569         } else if (info->type == GUEST_PANIC_INFORMATION_TYPE_S390) {
570             qemu_log_mask(LOG_GUEST_ERROR, " on cpu %d: %s\n"
571                           "PSW: 0x%016" PRIx64 " 0x%016" PRIx64"\n",
572                           info->u.s390.core,
573                           S390CrashReason_str(info->u.s390.reason),
574                           info->u.s390.psw_mask,
575                           info->u.s390.psw_addr);
576         }
577         qapi_free_GuestPanicInformation(info);
578     }
579 }
580 
581 void qemu_system_guest_crashloaded(GuestPanicInformation *info)
582 {
583     qemu_log_mask(LOG_GUEST_ERROR, "Guest crash loaded");
584     qapi_event_send_guest_crashloaded(GUEST_PANIC_ACTION_RUN, info);
585     qapi_free_GuestPanicInformation(info);
586 }
587 
588 void qemu_system_reset_request(ShutdownCause reason)
589 {
590     if (reboot_action == REBOOT_ACTION_SHUTDOWN &&
591         reason != SHUTDOWN_CAUSE_SUBSYSTEM_RESET) {
592         shutdown_requested = reason;
593     } else if (!cpus_are_resettable()) {
594         error_report("cpus are not resettable, terminating");
595         shutdown_requested = reason;
596     } else {
597         reset_requested = reason;
598     }
599     cpu_stop_current();
600     qemu_notify_event();
601 }
602 
603 static void qemu_system_suspend(void)
604 {
605     pause_all_vcpus();
606     notifier_list_notify(&suspend_notifiers, NULL);
607     runstate_set(RUN_STATE_SUSPENDED);
608     qapi_event_send_suspend();
609 }
610 
611 void qemu_system_suspend_request(void)
612 {
613     if (runstate_check(RUN_STATE_SUSPENDED)) {
614         return;
615     }
616     suspend_requested = 1;
617     cpu_stop_current();
618     qemu_notify_event();
619 }
620 
621 void qemu_register_suspend_notifier(Notifier *notifier)
622 {
623     notifier_list_add(&suspend_notifiers, notifier);
624 }
625 
626 void qemu_system_wakeup_request(WakeupReason reason, Error **errp)
627 {
628     trace_system_wakeup_request(reason);
629 
630     if (!runstate_check(RUN_STATE_SUSPENDED)) {
631         error_setg(errp,
632                    "Unable to wake up: guest is not in suspended state");
633         return;
634     }
635     if (!(wakeup_reason_mask & (1 << reason))) {
636         return;
637     }
638     runstate_set(RUN_STATE_RUNNING);
639     wakeup_reason = reason;
640     qemu_notify_event();
641 }
642 
643 void qemu_system_wakeup_enable(WakeupReason reason, bool enabled)
644 {
645     if (enabled) {
646         wakeup_reason_mask |= (1 << reason);
647     } else {
648         wakeup_reason_mask &= ~(1 << reason);
649     }
650 }
651 
652 void qemu_register_wakeup_notifier(Notifier *notifier)
653 {
654     notifier_list_add(&wakeup_notifiers, notifier);
655 }
656 
657 static bool wakeup_suspend_enabled;
658 
659 void qemu_register_wakeup_support(void)
660 {
661     wakeup_suspend_enabled = true;
662 }
663 
664 bool qemu_wakeup_suspend_enabled(void)
665 {
666     return wakeup_suspend_enabled;
667 }
668 
669 void qemu_system_killed(int signal, pid_t pid)
670 {
671     shutdown_signal = signal;
672     shutdown_pid = pid;
673     shutdown_action = SHUTDOWN_ACTION_POWEROFF;
674 
675     /* Cannot call qemu_system_shutdown_request directly because
676      * we are in a signal handler.
677      */
678     shutdown_requested = SHUTDOWN_CAUSE_HOST_SIGNAL;
679     qemu_notify_event();
680 }
681 
682 void qemu_system_shutdown_request_with_code(ShutdownCause reason,
683                                             int exit_code)
684 {
685     shutdown_exit_code = exit_code;
686     qemu_system_shutdown_request(reason);
687 }
688 
689 void qemu_system_shutdown_request(ShutdownCause reason)
690 {
691     trace_qemu_system_shutdown_request(reason);
692     replay_shutdown_request(reason);
693     shutdown_requested = reason;
694     qemu_notify_event();
695 }
696 
697 static void qemu_system_powerdown(void)
698 {
699     qapi_event_send_powerdown();
700     notifier_list_notify(&powerdown_notifiers, NULL);
701 }
702 
703 static void qemu_system_shutdown(ShutdownCause cause)
704 {
705     qapi_event_send_shutdown(shutdown_caused_by_guest(cause), cause);
706     notifier_list_notify(&shutdown_notifiers, &cause);
707 }
708 
709 void qemu_system_powerdown_request(void)
710 {
711     trace_qemu_system_powerdown_request();
712     powerdown_requested = 1;
713     qemu_notify_event();
714 }
715 
716 void qemu_register_powerdown_notifier(Notifier *notifier)
717 {
718     notifier_list_add(&powerdown_notifiers, notifier);
719 }
720 
721 void qemu_register_shutdown_notifier(Notifier *notifier)
722 {
723     notifier_list_add(&shutdown_notifiers, notifier);
724 }
725 
726 void qemu_system_debug_request(void)
727 {
728     debug_requested = 1;
729     qemu_notify_event();
730 }
731 
732 static bool main_loop_should_exit(int *status)
733 {
734     RunState r;
735     ShutdownCause request;
736 
737     if (qemu_debug_requested()) {
738         vm_stop(RUN_STATE_DEBUG);
739     }
740     if (qemu_suspend_requested()) {
741         qemu_system_suspend();
742     }
743     request = qemu_shutdown_requested();
744     if (request) {
745         qemu_kill_report();
746         qemu_system_shutdown(request);
747         if (shutdown_action == SHUTDOWN_ACTION_PAUSE) {
748             vm_stop(RUN_STATE_SHUTDOWN);
749         } else {
750             if (shutdown_exit_code != EXIT_SUCCESS) {
751                 *status = shutdown_exit_code;
752             } else if (request == SHUTDOWN_CAUSE_GUEST_PANIC &&
753                 panic_action == PANIC_ACTION_EXIT_FAILURE) {
754                 *status = EXIT_FAILURE;
755             }
756             return true;
757         }
758     }
759     request = qemu_reset_requested();
760     if (request) {
761         pause_all_vcpus();
762         qemu_system_reset(request);
763         resume_all_vcpus();
764         /*
765          * runstate can change in pause_all_vcpus()
766          * as iothread mutex is unlocked
767          */
768         if (!runstate_check(RUN_STATE_RUNNING) &&
769                 !runstate_check(RUN_STATE_INMIGRATE) &&
770                 !runstate_check(RUN_STATE_FINISH_MIGRATE)) {
771             runstate_set(RUN_STATE_PRELAUNCH);
772         }
773     }
774     if (qemu_wakeup_requested()) {
775         pause_all_vcpus();
776         qemu_system_wakeup();
777         notifier_list_notify(&wakeup_notifiers, &wakeup_reason);
778         wakeup_reason = QEMU_WAKEUP_REASON_NONE;
779         resume_all_vcpus();
780         qapi_event_send_wakeup();
781     }
782     if (qemu_powerdown_requested()) {
783         qemu_system_powerdown();
784     }
785     if (qemu_vmstop_requested(&r)) {
786         vm_stop(r);
787     }
788     return false;
789 }
790 
791 int qemu_main_loop(void)
792 {
793     int status = EXIT_SUCCESS;
794 
795     while (!main_loop_should_exit(&status)) {
796         main_loop_wait(false);
797     }
798 
799     return status;
800 }
801 
802 void qemu_add_exit_notifier(Notifier *notify)
803 {
804     notifier_list_add(&exit_notifiers, notify);
805 }
806 
807 void qemu_remove_exit_notifier(Notifier *notify)
808 {
809     notifier_remove(notify);
810 }
811 
812 static void qemu_run_exit_notifiers(void)
813 {
814     notifier_list_notify(&exit_notifiers, NULL);
815 }
816 
817 void qemu_init_subsystems(void)
818 {
819     Error *err = NULL;
820 
821     os_set_line_buffering();
822 
823     module_call_init(MODULE_INIT_TRACE);
824 
825     qemu_init_cpu_list();
826     qemu_init_cpu_loop();
827     bql_lock();
828 
829     atexit(qemu_run_exit_notifiers);
830 
831     module_call_init(MODULE_INIT_QOM);
832     module_call_init(MODULE_INIT_MIGRATION);
833 
834     runstate_init();
835     precopy_infrastructure_init();
836     postcopy_infrastructure_init();
837     monitor_init_globals();
838 
839     if (qcrypto_init(&err) < 0) {
840         error_reportf_err(err, "cannot initialize crypto: ");
841         exit(1);
842     }
843 
844     os_setup_early_signal_handling();
845 
846     bdrv_init_with_whitelist();
847     socket_init();
848 }
849 
850 
851 void qemu_cleanup(int status)
852 {
853     gdb_exit(status);
854 
855     /*
856      * cleaning up the migration object cancels any existing migration
857      * try to do this early so that it also stops using devices.
858      */
859     migration_shutdown();
860 
861     /*
862      * Close the exports before draining the block layer. The export
863      * drivers may have coroutines yielding on it, so we need to clean
864      * them up before the drain, as otherwise they may be get stuck in
865      * blk_wait_while_drained().
866      */
867     blk_exp_close_all();
868 
869 
870     /* No more vcpu or device emulation activity beyond this point */
871     vm_shutdown();
872     replay_finish();
873 
874     /*
875      * We must cancel all block jobs while the block layer is drained,
876      * or cancelling will be affected by throttling and thus may block
877      * for an extended period of time.
878      * Begin the drained section after vm_shutdown() to avoid requests being
879      * stuck in the BlockBackend's request queue.
880      * We do not need to end this section, because we do not want any
881      * requests happening from here on anyway.
882      */
883     bdrv_drain_all_begin();
884     job_cancel_sync_all();
885     bdrv_close_all();
886 
887     /* vhost-user must be cleaned up before chardevs.  */
888     tpm_cleanup();
889     net_cleanup();
890     audio_cleanup();
891     monitor_cleanup();
892     qemu_chr_cleanup();
893     user_creatable_cleanup();
894     /* TODO: unref root container, check all devices are ok */
895 }
896