Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
[SMPI/LB] Add comment noting that an arg must not be 0
[simgrid.git] / src / smpi / plugins / sampi_loadbalancer.cpp
index f367ede..926ad87 100644 (file)
@@ -47,13 +47,18 @@ public:
   explicit MigrateAction() : ReplayAction("Migrate") {}
   void kernel(simgrid::xbt::ReplayAction& action)
   {
-    static std::map<simgrid::s4u::ActorPtr, int> migration_counter;
+    static std::map<simgrid::s4u::ActorPtr, int> migration_call_counter;
     static simgrid::s4u::Barrier smpilb_bar(smpi_process_count());
     simgrid::s4u::Host* cur_host = simgrid::s4u::this_actor::get_host();
     simgrid::s4u::Host* migrate_to_host;
 
     TRACE_migration_call(my_proc_id, NULL);
 
+    migration_call_counter[simgrid::s4u::Actor::self()]++;
+    if ((migration_call_counter[simgrid::s4u::Actor::self()] % simgrid::config::get_value<int>(cfg_migration_frequency.get_name())) != 0) {
+      return;
+    }
+
     // TODO cheinrich: Why do we need this barrier?
     smpilb_bar.wait();
 
@@ -69,18 +74,13 @@ public:
     // This barrier is required to ensure that the mapping has been computed and is available
     smpilb_bar.wait();
     was_executed = false; // Must stay behind this barrier so that all processes have passed the if clause
-    migration_counter[simgrid::s4u::Actor::self()]++;
-    if ((migration_counter[simgrid::s4u::Actor::self()] % simgrid::config::get_value<int>(cfg_migration_frequency.get_name())) != 0) {
-      return;
-    }
 
     migrate_to_host = lb.get_mapping();
-
     if (cur_host != migrate_to_host) { // Origin and dest are not the same -> migrate
       sg_host_t migration_hosts[2] = {cur_host, migrate_to_host};
       // Changing this to double[2] ... will cause trouble with parallel_execute, because that fct is trying to call free().
       double* comp_amount  = new double[2]{0, 0};
-      double* comm_amount  = new double[4]{0, std::max(args.memory_consumption, 1.0), 0, 0};
+      double* comm_amount  = new double[4]{0, /*must not be 0*/std::max(args.memory_consumption, 1.0), 0, 0};
 
       xbt_os_timer_t timer = smpi_process()->timer();
       xbt_os_threadtimer_start(timer);