- return 0;
-}
-
-/** @brief Migrate the VM to the given host.
- * @ingroup msg_VMs
- *
- * FIXME: No migration cost occurs. If you want to simulate this too, you want to use a MSG_task_send() before or after,
- * depending on whether you want to do cold or hot migration.
- */
-void MSG_vm_migrate(msg_vm_t vm, msg_host_t new_pm)
-{
- /* some thoughts:
- * - One approach is ...
- * We first create a new VM (i.e., destination VM) on the destination physical host. The destination VM will
- * receive the state of the source
- * VM over network. We will finally destroy the source VM.
- * - This behavior is similar to the way of migration in the real world.
- * Even before a migration is completed, we will see a destination VM, consuming resources.
- * - We have to relocate all processes. The existing process migration code will work for this?
- * - The name of the VM is a somewhat unique ID in the code. It is tricky for the destination VM?
- *
- * - Another one is ...
- * We update the information of the given VM to place it to the destination physical host.
- *
- * The second one would be easier.
- */
-
- simgrid::surf::VirtualMachineImpl* pimpl = static_cast<simgrid::s4u::VirtualMachine*>(vm)->pimpl_vm_;
- msg_host_t old_pm = pimpl->getPm();
-
- if (old_pm->isOff())
- THROWF(vm_error, 0, "Cannot start a migration from host '%s', which is offline.", sg_host_get_name(old_pm));
-
- if (new_pm->isOff())
- THROWF(vm_error, 0, "Cannot start a migration to host '%s', which is offline.", sg_host_get_name(new_pm));
-
- if (!MSG_vm_is_running(vm))
- THROWF(vm_error, 0, "VM(%s) is not running", sg_host_get_name(vm));
-
- if (MSG_vm_is_migrating(vm))
- THROWF(vm_error, 0, "VM(%s) is already migrating", sg_host_get_name(vm));
-
- pimpl->isMigrating = 1;
-
- int ret = do_migration(vm, old_pm, new_pm);
- if (ret == -1) {
- pimpl->isMigrating = 0;
- THROWF(host_error, 0, "SRC host failed during migration");
- } else if (ret == -2) {
- pimpl->isMigrating = 0;
- THROWF(host_error, 0, "DST host failed during migration");
- }