system/runstate.c

   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
  81     { RUN_STATE_DEBUG, RUN_STATE_RUNNING },
  82     { RUN_STATE_DEBUG, RUN_STATE_FINISH_MIGRATE },
  83     { RUN_STATE_DEBUG, RUN_STATE_PRELAUNCH },
  84
  85     { RUN_STATE_INMIGRATE, RUN_STATE_INTERNAL_ERROR },
  86     { RUN_STATE_INMIGRATE, RUN_STATE_IO_ERROR },
  87     { RUN_STATE_INMIGRATE, RUN_STATE_PAUSED },
  88     { RUN_STATE_INMIGRATE, RUN_STATE_RUNNING },
  89     { RUN_STATE_INMIGRATE, RUN_STATE_SHUTDOWN },
  90     { RUN_STATE_INMIGRATE, RUN_STATE_SUSPENDED },
  91     { RUN_STATE_INMIGRATE, RUN_STATE_WATCHDOG },
  92     { RUN_STATE_INMIGRATE, RUN_STATE_GUEST_PANICKED },
  93     { RUN_STATE_INMIGRATE, RUN_STATE_FINISH_MIGRATE },
  94     { RUN_STATE_INMIGRATE, RUN_STATE_PRELAUNCH },
  95     { RUN_STATE_INMIGRATE, RUN_STATE_POSTMIGRATE },
  96     { RUN_STATE_INMIGRATE, RUN_STATE_COLO },
  97
  98     { RUN_STATE_INTERNAL_ERROR, RUN_STATE_PAUSED },
  99     { RUN_STATE_INTERNAL_ERROR, RUN_STATE_FINISH_MIGRATE },
 100     { RUN_STATE_INTERNAL_ERROR, RUN_STATE_PRELAUNCH },
 101
 102     { RUN_STATE_IO_ERROR, RUN_STATE_RUNNING },
 103     { RUN_STATE_IO_ERROR, RUN_STATE_FINISH_MIGRATE },
 104     { RUN_STATE_IO_ERROR, RUN_STATE_PRELAUNCH },
 105
 106     { RUN_STATE_PAUSED, RUN_STATE_RUNNING },
 107     { RUN_STATE_PAUSED, RUN_STATE_FINISH_MIGRATE },
 108     { RUN_STATE_PAUSED, RUN_STATE_POSTMIGRATE },
 109     { RUN_STATE_PAUSED, RUN_STATE_PRELAUNCH },
 110     { RUN_STATE_PAUSED, RUN_STATE_COLO},
 111
 112     { RUN_STATE_POSTMIGRATE, RUN_STATE_RUNNING },
 113     { RUN_STATE_POSTMIGRATE, RUN_STATE_FINISH_MIGRATE },
 114     { RUN_STATE_POSTMIGRATE, RUN_STATE_PRELAUNCH },
 115
 116     { RUN_STATE_PRELAUNCH, RUN_STATE_RUNNING },
 117     { RUN_STATE_PRELAUNCH, RUN_STATE_FINISH_MIGRATE },
 118     { RUN_STATE_PRELAUNCH, RUN_STATE_INMIGRATE },
 119
 120     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_RUNNING },
 121     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_PAUSED },
 122     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_POSTMIGRATE },
 123     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_PRELAUNCH },
 124     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_COLO },
 125     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_INTERNAL_ERROR },
 126     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_IO_ERROR },
 127     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_SHUTDOWN },
 128     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_SUSPENDED },
 129     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_WATCHDOG },
 130     { RUN_STATE_FINISH_MIGRATE, RUN_STATE_GUEST_PANICKED },
 131
 132     { RUN_STATE_RESTORE_VM, RUN_STATE_RUNNING },
 133     { RUN_STATE_RESTORE_VM, RUN_STATE_PRELAUNCH },
 134
 135     { RUN_STATE_COLO, RUN_STATE_RUNNING },
 136     { RUN_STATE_COLO, RUN_STATE_PRELAUNCH },
 137     { RUN_STATE_COLO, RUN_STATE_SHUTDOWN},
 138
 139     { RUN_STATE_RUNNING, RUN_STATE_DEBUG },
 140     { RUN_STATE_RUNNING, RUN_STATE_INTERNAL_ERROR },
 141     { RUN_STATE_RUNNING, RUN_STATE_IO_ERROR },
 142     { RUN_STATE_RUNNING, RUN_STATE_PAUSED },
 143     { RUN_STATE_RUNNING, RUN_STATE_FINISH_MIGRATE },
 144     { RUN_STATE_RUNNING, RUN_STATE_RESTORE_VM },
 145     { RUN_STATE_RUNNING, RUN_STATE_SAVE_VM },
 146     { RUN_STATE_RUNNING, RUN_STATE_SHUTDOWN },
 147     { RUN_STATE_RUNNING, RUN_STATE_WATCHDOG },
 148     { RUN_STATE_RUNNING, RUN_STATE_GUEST_PANICKED },
 149     { RUN_STATE_RUNNING, RUN_STATE_COLO},
 150
 151     { RUN_STATE_SAVE_VM, RUN_STATE_RUNNING },
 152
 153     { RUN_STATE_SHUTDOWN, RUN_STATE_PAUSED },
 154     { RUN_STATE_SHUTDOWN, RUN_STATE_FINISH_MIGRATE },
 155     { RUN_STATE_SHUTDOWN, RUN_STATE_PRELAUNCH },
 156     { RUN_STATE_SHUTDOWN, RUN_STATE_COLO },
 157
 158     { RUN_STATE_DEBUG, RUN_STATE_SUSPENDED },
 159     { RUN_STATE_RUNNING, RUN_STATE_SUSPENDED },
 160     { RUN_STATE_SUSPENDED, RUN_STATE_RUNNING },
 161     { RUN_STATE_SUSPENDED, RUN_STATE_FINISH_MIGRATE },
 162     { RUN_STATE_SUSPENDED, RUN_STATE_PRELAUNCH },
 163     { RUN_STATE_SUSPENDED, RUN_STATE_COLO},
 164
 165     { RUN_STATE_WATCHDOG, RUN_STATE_RUNNING },
 166     { RUN_STATE_WATCHDOG, RUN_STATE_FINISH_MIGRATE },
 167     { RUN_STATE_WATCHDOG, RUN_STATE_PRELAUNCH },
 168     { RUN_STATE_WATCHDOG, RUN_STATE_COLO},
 169
 170     { RUN_STATE_GUEST_PANICKED, RUN_STATE_RUNNING },
 171     { RUN_STATE_GUEST_PANICKED, RUN_STATE_FINISH_MIGRATE },
 172     { RUN_STATE_GUEST_PANICKED, RUN_STATE_PRELAUNCH },
 173
 174     { RUN_STATE__MAX, RUN_STATE__MAX },
 175 };
 176
 177 static bool runstate_valid_transitions[RUN_STATE__MAX][RUN_STATE__MAX];
 178
 179 bool runstate_check(RunState state)
 180 {
 181     return current_run_state == state;
 182 }
 183
 184 static void runstate_init(void)
 185 {
 186     const RunStateTransition *p;
 187
 188     memset(&runstate_valid_transitions, 0, sizeof(runstate_valid_transitions));
 189     for (p = &runstate_transitions_def[0]; p->from != RUN_STATE__MAX; p++) {
 190         runstate_valid_transitions[p->from][p->to] = true;
 191     }
 192
 193     qemu_mutex_init(&vmstop_lock);
 194 }
 195
 196 /* This function will abort() on invalid state transitions */
 197 void runstate_set(RunState new_state)
 198 {
 199     assert(new_state < RUN_STATE__MAX);
 200
 201     trace_runstate_set(current_run_state, RunState_str(current_run_state),
 202                        new_state, RunState_str(new_state));
 203
 204     if (current_run_state == new_state) {
 205         return;
 206     }
 207
 208     if (!runstate_valid_transitions[current_run_state][new_state]) {
 209         error_report("invalid runstate transition: '%s' -> '%s'",
 210                      RunState_str(current_run_state),
 211                      RunState_str(new_state));
 212         abort();
 213     }
 214
 215     current_run_state = new_state;
 216 }
 217
 218 RunState runstate_get(void)
 219 {
 220     return current_run_state;
 221 }
 222
 223 bool runstate_is_running(void)
 224 {
 225     return runstate_check(RUN_STATE_RUNNING);
 226 }
 227
 228 bool runstate_needs_reset(void)
 229 {
 230     return runstate_check(RUN_STATE_INTERNAL_ERROR) ||
 231         runstate_check(RUN_STATE_SHUTDOWN);
 232 }
 233
 234 StatusInfo *qmp_query_status(Error **errp)
 235 {
 236     StatusInfo *info = g_malloc0(sizeof(*info));
 237     AccelState *accel = current_accel();
 238
 239     /*
 240      * We ignore errors, which will happen if the accelerator
 241      * is not TCG. "singlestep" is meaningless for other accelerators,
 242      * so we will set the StatusInfo field to false for those.
 243      */
 244     info->singlestep = object_property_get_bool(OBJECT(accel),
 245                                                 "one-insn-per-tb", NULL);
 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     cpu_synchronize_all_post_reset();
 505 }
 506
 507 /*
 508  * Wake the VM after suspend.
 509  */
 510 static void qemu_system_wakeup(void)
 511 {
 512     MachineClass *mc;
 513
 514     mc = current_machine ? MACHINE_GET_CLASS(current_machine) : NULL;
 515
 516     if (mc && mc->wakeup) {
 517         mc->wakeup(current_machine);
 518     }
 519 }
 520
 521 void qemu_system_guest_panicked(GuestPanicInformation *info)
 522 {
 523     qemu_log_mask(LOG_GUEST_ERROR, "Guest crashed");
 524
 525     if (current_cpu) {
 526         current_cpu->crash_occurred = true;
 527     }
 528     /*
 529      * TODO:  Currently the available panic actions are: none, pause, and
 530      * shutdown, but in principle debug and reset could be supported as well.
 531      * Investigate any potential use cases for the unimplemented actions.
 532      */
 533     if (panic_action == PANIC_ACTION_PAUSE
 534         || (panic_action == PANIC_ACTION_SHUTDOWN && shutdown_action == SHUTDOWN_ACTION_PAUSE)) {
 535         qapi_event_send_guest_panicked(GUEST_PANIC_ACTION_PAUSE, info);
 536         vm_stop(RUN_STATE_GUEST_PANICKED);
 537     } else if (panic_action == PANIC_ACTION_SHUTDOWN ||
 538                panic_action == PANIC_ACTION_EXIT_FAILURE) {
 539         qapi_event_send_guest_panicked(GUEST_PANIC_ACTION_POWEROFF, info);
 540         vm_stop(RUN_STATE_GUEST_PANICKED);
 541         qemu_system_shutdown_request(SHUTDOWN_CAUSE_GUEST_PANIC);
 542     } else {
 543         qapi_event_send_guest_panicked(GUEST_PANIC_ACTION_RUN, info);
 544     }
 545
 546     if (info) {
 547         if (info->type == GUEST_PANIC_INFORMATION_TYPE_HYPER_V) {
 548             qemu_log_mask(LOG_GUEST_ERROR, "\nHV crash parameters: (%#"PRIx64
 549                           " %#"PRIx64" %#"PRIx64" %#"PRIx64" %#"PRIx64")\n",
 550                           info->u.hyper_v.arg1,
 551                           info->u.hyper_v.arg2,
 552                           info->u.hyper_v.arg3,
 553                           info->u.hyper_v.arg4,
 554                           info->u.hyper_v.arg5);
 555         } else if (info->type == GUEST_PANIC_INFORMATION_TYPE_S390) {
 556             qemu_log_mask(LOG_GUEST_ERROR, " on cpu %d: %s\n"
 557                           "PSW: 0x%016" PRIx64 " 0x%016" PRIx64"\n",
 558                           info->u.s390.core,
 559                           S390CrashReason_str(info->u.s390.reason),
 560                           info->u.s390.psw_mask,
 561                           info->u.s390.psw_addr);
 562         }
 563         qapi_free_GuestPanicInformation(info);
 564     }
 565 }
 566
 567 void qemu_system_guest_crashloaded(GuestPanicInformation *info)
 568 {
 569     qemu_log_mask(LOG_GUEST_ERROR, "Guest crash loaded");
 570     qapi_event_send_guest_crashloaded(GUEST_PANIC_ACTION_RUN, info);
 571     qapi_free_GuestPanicInformation(info);
 572 }
 573
 574 void qemu_system_reset_request(ShutdownCause reason)
 575 {
 576     if (reboot_action == REBOOT_ACTION_SHUTDOWN &&
 577         reason != SHUTDOWN_CAUSE_SUBSYSTEM_RESET) {
 578         shutdown_requested = reason;
 579     } else if (!cpus_are_resettable()) {
 580         error_report("cpus are not resettable, terminating");
 581         shutdown_requested = reason;
 582     } else {
 583         reset_requested = reason;
 584     }
 585     cpu_stop_current();
 586     qemu_notify_event();
 587 }
 588
 589 static void qemu_system_suspend(void)
 590 {
 591     pause_all_vcpus();
 592     notifier_list_notify(&suspend_notifiers, NULL);
 593     runstate_set(RUN_STATE_SUSPENDED);
 594     qapi_event_send_suspend();
 595 }
 596
 597 void qemu_system_suspend_request(void)
 598 {
 599     if (runstate_check(RUN_STATE_SUSPENDED)) {
 600         return;
 601     }
 602     suspend_requested = 1;
 603     cpu_stop_current();
 604     qemu_notify_event();
 605 }
 606
 607 void qemu_register_suspend_notifier(Notifier *notifier)
 608 {
 609     notifier_list_add(&suspend_notifiers, notifier);
 610 }
 611
 612 void qemu_system_wakeup_request(WakeupReason reason, Error **errp)
 613 {
 614     trace_system_wakeup_request(reason);
 615
 616     if (!runstate_check(RUN_STATE_SUSPENDED)) {
 617         error_setg(errp,
 618                    "Unable to wake up: guest is not in suspended state");
 619         return;
 620     }
 621     if (!(wakeup_reason_mask & (1 << reason))) {
 622         return;
 623     }
 624     runstate_set(RUN_STATE_RUNNING);
 625     wakeup_reason = reason;
 626     qemu_notify_event();
 627 }
 628
 629 void qemu_system_wakeup_enable(WakeupReason reason, bool enabled)
 630 {
 631     if (enabled) {
 632         wakeup_reason_mask |= (1 << reason);
 633     } else {
 634         wakeup_reason_mask &= ~(1 << reason);
 635     }
 636 }
 637
 638 void qemu_register_wakeup_notifier(Notifier *notifier)
 639 {
 640     notifier_list_add(&wakeup_notifiers, notifier);
 641 }
 642
 643 static bool wakeup_suspend_enabled;
 644
 645 void qemu_register_wakeup_support(void)
 646 {
 647     wakeup_suspend_enabled = true;
 648 }
 649
 650 bool qemu_wakeup_suspend_enabled(void)
 651 {
 652     return wakeup_suspend_enabled;
 653 }
 654
 655 void qemu_system_killed(int signal, pid_t pid)
 656 {
 657     shutdown_signal = signal;
 658     shutdown_pid = pid;
 659     shutdown_action = SHUTDOWN_ACTION_POWEROFF;
 660
 661     /* Cannot call qemu_system_shutdown_request directly because
 662      * we are in a signal handler.
 663      */
 664     shutdown_requested = SHUTDOWN_CAUSE_HOST_SIGNAL;
 665     qemu_notify_event();
 666 }
 667
 668 void qemu_system_shutdown_request_with_code(ShutdownCause reason,
 669                                             int exit_code)
 670 {
 671     shutdown_exit_code = exit_code;
 672     qemu_system_shutdown_request(reason);
 673 }
 674
 675 void qemu_system_shutdown_request(ShutdownCause reason)
 676 {
 677     trace_qemu_system_shutdown_request(reason);
 678     replay_shutdown_request(reason);
 679     shutdown_requested = reason;
 680     qemu_notify_event();
 681 }
 682
 683 static void qemu_system_powerdown(void)
 684 {
 685     qapi_event_send_powerdown();
 686     notifier_list_notify(&powerdown_notifiers, NULL);
 687 }
 688
 689 static void qemu_system_shutdown(ShutdownCause cause)
 690 {
 691     qapi_event_send_shutdown(shutdown_caused_by_guest(cause), cause);
 692     notifier_list_notify(&shutdown_notifiers, &cause);
 693 }
 694
 695 void qemu_system_powerdown_request(void)
 696 {
 697     trace_qemu_system_powerdown_request();
 698     powerdown_requested = 1;
 699     qemu_notify_event();
 700 }
 701
 702 void qemu_register_powerdown_notifier(Notifier *notifier)
 703 {
 704     notifier_list_add(&powerdown_notifiers, notifier);
 705 }
 706
 707 void qemu_register_shutdown_notifier(Notifier *notifier)
 708 {
 709     notifier_list_add(&shutdown_notifiers, notifier);
 710 }
 711
 712 void qemu_system_debug_request(void)
 713 {
 714     debug_requested = 1;
 715     qemu_notify_event();
 716 }
 717
 718 static bool main_loop_should_exit(int *status)
 719 {
 720     RunState r;
 721     ShutdownCause request;
 722
 723     if (qemu_debug_requested()) {
 724         vm_stop(RUN_STATE_DEBUG);
 725     }
 726     if (qemu_suspend_requested()) {
 727         qemu_system_suspend();
 728     }
 729     request = qemu_shutdown_requested();
 730     if (request) {
 731         qemu_kill_report();
 732         qemu_system_shutdown(request);
 733         if (shutdown_action == SHUTDOWN_ACTION_PAUSE) {
 734             vm_stop(RUN_STATE_SHUTDOWN);
 735         } else {
 736             if (shutdown_exit_code != EXIT_SUCCESS) {
 737                 *status = shutdown_exit_code;
 738             } else if (request == SHUTDOWN_CAUSE_GUEST_PANIC &&
 739                 panic_action == PANIC_ACTION_EXIT_FAILURE) {
 740                 *status = EXIT_FAILURE;
 741             }
 742             return true;
 743         }
 744     }
 745     request = qemu_reset_requested();
 746     if (request) {
 747         pause_all_vcpus();
 748         qemu_system_reset(request);
 749         resume_all_vcpus();
 750         /*
 751          * runstate can change in pause_all_vcpus()
 752          * as iothread mutex is unlocked
 753          */
 754         if (!runstate_check(RUN_STATE_RUNNING) &&
 755                 !runstate_check(RUN_STATE_INMIGRATE) &&
 756                 !runstate_check(RUN_STATE_FINISH_MIGRATE)) {
 757             runstate_set(RUN_STATE_PRELAUNCH);
 758         }
 759     }
 760     if (qemu_wakeup_requested()) {
 761         pause_all_vcpus();
 762         qemu_system_wakeup();
 763         notifier_list_notify(&wakeup_notifiers, &wakeup_reason);
 764         wakeup_reason = QEMU_WAKEUP_REASON_NONE;
 765         resume_all_vcpus();
 766         qapi_event_send_wakeup();
 767     }
 768     if (qemu_powerdown_requested()) {
 769         qemu_system_powerdown();
 770     }
 771     if (qemu_vmstop_requested(&r)) {
 772         vm_stop(r);
 773     }
 774     return false;
 775 }
 776
 777 int qemu_main_loop(void)
 778 {
 779     int status = EXIT_SUCCESS;
 780
 781     while (!main_loop_should_exit(&status)) {
 782         main_loop_wait(false);
 783     }
 784
 785     return status;
 786 }
 787
 788 void qemu_add_exit_notifier(Notifier *notify)
 789 {
 790     notifier_list_add(&exit_notifiers, notify);
 791 }
 792
 793 void qemu_remove_exit_notifier(Notifier *notify)
 794 {
 795     notifier_remove(notify);
 796 }
 797
 798 static void qemu_run_exit_notifiers(void)
 799 {
 800     notifier_list_notify(&exit_notifiers, NULL);
 801 }
 802
 803 void qemu_init_subsystems(void)
 804 {
 805     Error *err = NULL;
 806
 807     os_set_line_buffering();
 808
 809     module_call_init(MODULE_INIT_TRACE);
 810
 811     qemu_init_cpu_list();
 812     qemu_init_cpu_loop();
 813     qemu_mutex_lock_iothread();
 814
 815     atexit(qemu_run_exit_notifiers);
 816
 817     module_call_init(MODULE_INIT_QOM);
 818     module_call_init(MODULE_INIT_MIGRATION);
 819
 820     runstate_init();
 821     precopy_infrastructure_init();
 822     postcopy_infrastructure_init();
 823     monitor_init_globals();
 824
 825     if (qcrypto_init(&err) < 0) {
 826         error_reportf_err(err, "cannot initialize crypto: ");
 827         exit(1);
 828     }
 829
 830     os_setup_early_signal_handling();
 831
 832     bdrv_init_with_whitelist();
 833     socket_init();
 834 }
 835
 836
 837 void qemu_cleanup(int status)
 838 {
 839     gdb_exit(status);
 840
 841     /*
 842      * cleaning up the migration object cancels any existing migration
 843      * try to do this early so that it also stops using devices.
 844      */
 845     migration_shutdown();
 846
 847     /*
 848      * Close the exports before draining the block layer. The export
 849      * drivers may have coroutines yielding on it, so we need to clean
 850      * them up before the drain, as otherwise they may be get stuck in
 851      * blk_wait_while_drained().
 852      */
 853     blk_exp_close_all();
 854
 855
 856     /* No more vcpu or device emulation activity beyond this point */
 857     vm_shutdown();
 858     replay_finish();
 859
 860     /*
 861      * We must cancel all block jobs while the block layer is drained,
 862      * or cancelling will be affected by throttling and thus may block
 863      * for an extended period of time.
 864      * Begin the drained section after vm_shutdown() to avoid requests being
 865      * stuck in the BlockBackend's request queue.
 866      * We do not need to end this section, because we do not want any
 867      * requests happening from here on anyway.
 868      */
 869     bdrv_drain_all_begin();
 870     job_cancel_sync_all();
 871     bdrv_close_all();
 872
 873     /* vhost-user must be cleaned up before chardevs.  */
 874     tpm_cleanup();
 875     net_cleanup();
 876     audio_cleanup();
 877     monitor_cleanup();
 878     qemu_chr_cleanup();
 879     user_creatable_cleanup();
 880     /* TODO: unref root container, check all devices are ok */
 881 }