- if (isMigrating)
- THROWF(vm_error, 0, "Cannot save VM %s: it is migrating.", piface_->cname());
-
- if (getState() != SURF_VM_STATE_RUNNING)
- THROWF(vm_error, 0, "Cannot save VM %s: it is not running.", piface_->cname());
-
- xbt_swag_t process_list = piface_->extension<simgrid::simix::Host>()->process_list;
- XBT_DEBUG("Save VM %s, where %d processes exist", piface_->cname(), xbt_swag_size(process_list));
-
- vmState_ = SURF_VM_STATE_SAVING;
- action_->suspend();
- vmState_ = SURF_VM_STATE_SAVED;
-
- smx_actor_t smx_process, smx_process_safe;
- xbt_swag_foreach_safe(smx_process, smx_process_safe, process_list) {
- XBT_DEBUG("suspend %s", smx_process->cname());
- SIMIX_process_suspend(smx_process, issuer);
+ if (getState() != SURF_VM_STATE_RUNNING) {
+ const char* stateName = "(unknown state)";
+ switch (getState()) {
+ case SURF_VM_STATE_CREATED:
+ stateName = "created, but not yet started";
+ break;
+ case SURF_VM_STATE_SUSPENDED:
+ stateName = "suspended";
+ break;
+ case SURF_VM_STATE_DESTROYED:
+ stateName = "destroyed";
+ break;
+ default: /* SURF_VM_STATE_RUNNING or unexpected values */
+ THROW_IMPOSSIBLE;
+ break;
+ }
+ XBT_VERB("Shutting down the VM %s even if it's not running but %s", piface_->get_cname(), stateName);