Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
introduce sg_actor_create and use it in C examples
[simgrid.git] / examples / c / cloud-migration / cloud-migration.c
1 /* Copyright (c) 2007-2020. The SimGrid Team.
2  * All rights reserved.                                                     */
3
4 /* This program is free software; you can redistribute it and/or modify it
5  * under the terms of the license (GNU LGPL) which comes with this package. */
6
7 #include "simgrid/actor.h"
8 #include "simgrid/engine.h"
9 #include "simgrid/host.h"
10 #include "simgrid/mailbox.h"
11 #include "simgrid/plugins/live_migration.h"
12 #include "simgrid/vm.h"
13 #include "xbt/log.h"
14 #include "xbt/str.h"
15 #include "xbt/sysdep.h"
16
17 XBT_LOG_NEW_DEFAULT_CATEGORY(cloud_migration, "Messages specific for this example");
18
19 static void vm_migrate(sg_vm_t vm, sg_host_t dst_pm)
20 {
21   const_sg_host_t src_pm = sg_vm_get_pm(vm);
22   double mig_sta         = simgrid_get_clock();
23   sg_vm_migrate(vm, dst_pm);
24   double mig_end = simgrid_get_clock();
25
26   XBT_INFO("%s migrated: %s->%s in %g s", sg_vm_get_name(vm), sg_host_get_name(src_pm), sg_host_get_name(dst_pm),
27            mig_end - mig_sta);
28 }
29
30 static void migration_worker_main(int argc, char* argv[])
31 {
32   xbt_assert(argc == 3);
33   const char* vm_name     = argv[1];
34   const char* dst_pm_name = argv[2];
35
36   sg_vm_t vm       = (sg_vm_t)sg_host_by_name(vm_name);
37   sg_host_t dst_pm = sg_host_by_name(dst_pm_name);
38
39   vm_migrate(vm, dst_pm);
40 }
41
42 static void vm_migrate_async(const_sg_vm_t vm, const_sg_host_t dst_pm)
43 {
44   const char* vm_name     = sg_vm_get_name(vm);
45   const char* dst_pm_name = sg_host_get_name(dst_pm);
46
47   const char* argv[] = {"mig_work", vm_name, dst_pm_name, NULL};
48   sg_actor_create("mig_wrk", sg_host_self(), migration_worker_main, 3, argv);
49 }
50
51 static void master_main(XBT_ATTRIB_UNUSED int argc, XBT_ATTRIB_UNUSED char* argv[])
52 {
53   sg_host_t pm0       = sg_host_by_name("Fafard");
54   sg_host_t pm1       = sg_host_by_name("Tremblay");
55   const_sg_host_t pm2 = sg_host_by_name("Bourassa");
56
57   sg_vm_t vm0 = sg_vm_create_core(pm0, "VM0");
58   sg_vm_set_ramsize(vm0, 1e9); // 1Gbytes
59   sg_vm_start(vm0);
60
61   XBT_INFO("Test: Migrate a VM with %zu Mbytes RAM", sg_vm_get_ramsize(vm0) / 1000 / 1000);
62   vm_migrate(vm0, pm1);
63
64   sg_vm_destroy(vm0);
65
66   vm0 = sg_vm_create_core(pm0, "VM0");
67   sg_vm_set_ramsize(vm0, 1e8); // 100Mbytes
68   sg_vm_start(vm0);
69
70   XBT_INFO("Test: Migrate a VM with %zu Mbytes RAM", sg_vm_get_ramsize(vm0) / 1000 / 1000);
71   vm_migrate(vm0, pm1);
72
73   sg_vm_destroy(vm0);
74
75   vm0         = sg_vm_create_core(pm0, "VM0");
76   sg_vm_t vm1 = sg_vm_create_core(pm0, "VM1");
77
78   sg_vm_set_ramsize(vm0, 1e9); // 1Gbytes
79   sg_vm_set_ramsize(vm1, 1e9); // 1Gbytes
80   sg_vm_start(vm0);
81   sg_vm_start(vm1);
82
83   XBT_INFO("Test: Migrate two VMs at once from PM0 to PM1");
84   vm_migrate_async(vm0, pm1);
85   vm_migrate_async(vm1, pm1);
86   sg_actor_sleep_for(10000);
87
88   sg_vm_destroy(vm0);
89   sg_vm_destroy(vm1);
90
91   vm0 = sg_vm_create_core(pm0, "VM0");
92   vm1 = sg_vm_create_core(pm0, "VM1");
93
94   sg_vm_set_ramsize(vm0, 1e9); // 1Gbytes
95   sg_vm_set_ramsize(vm1, 1e9); // 1Gbytes
96   sg_vm_start(vm0);
97   sg_vm_start(vm1);
98
99   XBT_INFO("Test: Migrate two VMs at once to different PMs");
100   vm_migrate_async(vm0, pm1);
101   vm_migrate_async(vm1, pm2);
102   sg_actor_sleep_for(10000);
103
104   sg_vm_destroy(vm0);
105   sg_vm_destroy(vm1);
106 }
107
108 int main(int argc, char* argv[])
109 {
110   /* Get the arguments */
111   simgrid_init(&argc, argv);
112   sg_vm_live_migration_plugin_init();
113
114   /* load the platform file */
115   simgrid_load_platform(argv[1]);
116
117   sg_actor_create("master_", sg_host_by_name("Fafard"), master_main, 0, NULL);
118
119   simgrid_run();
120   XBT_INFO("Bye (simulation time %g)", simgrid_get_clock());
121
122   return 0;
123 }