examples/cpp/cloud-migration/s4u-cloud-migration.cpp

   1 /* Copyright (c) 2007-2022. The SimGrid Team. All rights reserved.          */
   2
   3 /* This program is free software; you can redistribute it and/or modify it
   4  * under the terms of the license (GNU LGPL) which comes with this package. */
   5
   6 #include "simgrid/s4u.hpp"
   7 #include "simgrid/plugins/live_migration.h"
   8 #include "simgrid/s4u/VirtualMachine.hpp"
   9
  10 XBT_LOG_NEW_DEFAULT_CATEGORY(s4u_cloud_migration, "Messages specific for this example");
  11 namespace sg4 = simgrid::s4u;
  12
  13 static void vm_migrate(sg4::VirtualMachine* vm, sg4::Host* dst_pm)
  14 {
  15   const sg4::Host* src_pm = vm->get_pm();
  16   double mig_sta          = sg4::Engine::get_clock();
  17   sg_vm_migrate(vm, dst_pm);
  18   double mig_end = sg4::Engine::get_clock();
  19
  20   XBT_INFO("%s migrated: %s->%s in %g s", vm->get_cname(), src_pm->get_cname(), dst_pm->get_cname(), mig_end - mig_sta);
  21 }
  22
  23 static void vm_migrate_async(sg4::VirtualMachine* vm, sg4::Host* dst_pm)
  24 {
  25   sg4::Actor::create("mig_wrk", sg4::Host::current(), vm_migrate, vm, dst_pm);
  26 }
  27
  28 static void master_main()
  29 {
  30   sg4::Host* pm0 = sg4::Host::by_name("Fafard");
  31   sg4::Host* pm1 = sg4::Host::by_name("Tremblay");
  32   sg4::Host* pm2 = sg4::Host::by_name("Bourassa");
  33
  34   auto* vm0 = pm0->create_vm("VM0", 1);
  35   vm0->set_ramsize(1e9); // 1Gbytes
  36   vm0->start();
  37
  38   XBT_INFO("Test: Migrate a VM with %zu Mbytes RAM", vm0->get_ramsize() / 1000 / 1000);
  39   vm_migrate(vm0, pm1);
  40
  41   vm0->destroy();
  42
  43   vm0 = pm0->create_vm("VM0", 1);
  44   vm0->set_ramsize(1e8); // 100Mbytes
  45   vm0->start();
  46
  47   XBT_INFO("Test: Migrate a VM with %zu Mbytes RAM", vm0->get_ramsize() / 1000 / 1000);
  48   vm_migrate(vm0, pm1);
  49
  50   vm0->destroy();
  51
  52   vm0       = pm0->create_vm("VM0", 1);
  53   auto* vm1 = pm0->create_vm("VM1", 1);
  54
  55   vm0->set_ramsize(1e9); // 1Gbytes
  56   vm1->set_ramsize(1e9); // 1Gbytes
  57   vm0->start();
  58   vm1->start();
  59
  60   XBT_INFO("Test: Migrate two VMs at once from PM0 to PM1");
  61   vm_migrate_async(vm0, pm1);
  62   vm_migrate_async(vm1, pm1);
  63   sg4::this_actor::sleep_for(10000);
  64
  65   vm0->destroy();
  66   vm1->destroy();
  67
  68   vm0 = pm0->create_vm("VM0", 1);
  69   vm1 = pm0->create_vm("VM1", 1);
  70
  71   vm0->set_ramsize(1e9); // 1Gbytes
  72   vm1->set_ramsize(1e9); // 1Gbytes
  73   vm0->start();
  74   vm1->start();
  75
  76   XBT_INFO("Test: Migrate two VMs at once to different PMs");
  77   vm_migrate_async(vm0, pm1);
  78   vm_migrate_async(vm1, pm2);
  79   sg4::this_actor::sleep_for(10000);
  80
  81   vm0->destroy();
  82   vm1->destroy();
  83 }
  84
  85 int main(int argc, char* argv[])
  86 {
  87   /* Get the arguments */
  88   sg4::Engine e(&argc, argv);
  89   sg_vm_live_migration_plugin_init();
  90
  91   /* load the platform file */
  92   e.load_platform(argv[1]);
  93
  94   sg4::Actor::create("master_", sg4::Host::by_name("Fafard"), master_main);
  95
  96   e.run();
  97
  98   XBT_INFO("Bye (simulation time %g)", sg4::Engine::get_clock());
  99
 100   return 0;
 101 }