Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
dynar to std::vector
[simgrid.git] / src / surf / surf_interface.cpp
index 05b3c8b..8a7caad 100644 (file)
@@ -16,6 +16,7 @@
 #include "mc/mc.h"
 #include "virtual_machine.hpp"
 #include "src/instr/instr_private.h" // TRACE_is_enabled(). FIXME: remove by subscribing tracing to the surf signals
+#include "simgrid/s4u/engine.hpp"
 
 XBT_LOG_NEW_CATEGORY(surf, "All SURF categories");
 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_kernel, surf, "Logging specific to SURF (kernel)");
@@ -26,12 +27,12 @@ XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_kernel, surf, "Logging specific to SURF (ke
 
 /* model_list_invoke contains only surf_host and surf_vm.
  * The callback functions of cpu_model and network_model will be called from those of these host models. */
-xbt_dynar_t all_existing_models = NULL; /* to destroy models correctly */
-xbt_dynar_t model_list_invoke = NULL;  /* to invoke callbacks */
+std::vector<surf_model_t> * all_existing_models = nullptr; /* to destroy models correctly */
+xbt_dynar_t model_list_invoke = nullptr;  /* to invoke callbacks */
 
 simgrid::trace_mgr::future_evt_set *future_evt_set = nullptr;
-xbt_dynar_t surf_path = NULL;
-xbt_dynar_t host_that_restart = xbt_dynar_new(sizeof(char*), NULL);
+xbt_dynar_t surf_path = nullptr;
+xbt_dynar_t host_that_restart = xbt_dynar_new(sizeof(char*), nullptr);
 xbt_dict_t watched_hosts_lib;
 
 namespace simgrid {
@@ -46,7 +47,7 @@ simgrid::xbt::signal<void(void)> surfExitCallbacks;
 
 s_surf_model_description_t surf_plugin_description[] = {
     {"Energy", "Cpu energy consumption.", sg_energy_plugin_init},
-     {NULL, NULL,  NULL}      /* this array must be NULL terminated */
+     {nullptr, nullptr,  nullptr}      /* this array must be nullptr terminated */
 };
 
 /* Don't forget to update the option description in smx_config when you change this */
@@ -71,45 +72,45 @@ s_surf_model_description_t surf_network_model_description[] = {
    surf_network_model_init_Reno2},
   {"Vegas", "Model from Steven H. Low using lagrange_solve instead of lmm_solve (experts only; check the code for more info).",
    surf_network_model_init_Vegas},
-  {NULL, NULL, NULL}      /* this array must be NULL terminated */
+  {nullptr, nullptr, nullptr}      /* this array must be nullptr terminated */
 };
 
 s_surf_model_description_t surf_cpu_model_description[] = {
   {"Cas01", "Simplistic CPU model (time=size/power).", surf_cpu_model_init_Cas01},
-  {NULL, NULL,  NULL}      /* this array must be NULL terminated */
+  {nullptr, nullptr,  nullptr}      /* this array must be nullptr terminated */
 };
 
 s_surf_model_description_t surf_host_model_description[] = {
   {"default",   "Default host model. Currently, CPU:Cas01 and network:LV08 (with cross traffic enabled)", surf_host_model_init_current_default},
   {"compound",  "Host model that is automatically chosen if you change the network and CPU models", surf_host_model_init_compound},
   {"ptask_L07", "Host model somehow similar to Cas01+CM02 but allowing parallel tasks", surf_host_model_init_ptask_L07},
-  {NULL, NULL, NULL}      /* this array must be NULL terminated */
+  {nullptr, nullptr, nullptr}      /* this array must be nullptr terminated */
 };
 
 s_surf_model_description_t surf_vm_model_description[] = {
   {"default", "Default vm model.", surf_vm_model_init_HL13},
-  {NULL, NULL, NULL}      /* this array must be NULL terminated */
+  {nullptr, nullptr, nullptr}      /* this array must be nullptr terminated */
 };
 
 s_surf_model_description_t surf_optimization_mode_description[] = {
-  {"Lazy", "Lazy action management (partial invalidation in lmm + heap in action remaining).", NULL},
-  {"TI",   "Trace integration. Highly optimized mode when using availability traces (only available for the Cas01 CPU model for now).", NULL},
-  {"Full", "Full update of remaining and variables. Slow but may be useful when debugging.", NULL},
-  {NULL, NULL, NULL}      /* this array must be NULL terminated */
+  {"Lazy", "Lazy action management (partial invalidation in lmm + heap in action remaining).", nullptr},
+  {"TI",   "Trace integration. Highly optimized mode when using availability traces (only available for the Cas01 CPU model for now).", nullptr},
+  {"Full", "Full update of remaining and variables. Slow but may be useful when debugging.", nullptr},
+  {nullptr, nullptr, nullptr}      /* this array must be nullptr terminated */
 };
 
 s_surf_model_description_t surf_storage_model_description[] = {
   {"default", "Simplistic storage model.", surf_storage_model_init_default},
-  {NULL, NULL,  NULL}      /* this array must be NULL terminated */
+  {nullptr, nullptr,  nullptr}      /* this array must be nullptr terminated */
 };
 
 #if HAVE_THREAD_CONTEXTS
-static xbt_parmap_t surf_parmap = NULL; /* parallel map on models */
+static xbt_parmap_t surf_parmap = nullptr; /* parallel map on models */
 #endif
 
 double NOW = 0;
 
-double surf_get_clock(void)
+double surf_get_clock()
 {
   return NOW;
 }
@@ -123,9 +124,9 @@ double surf_get_clock(void)
 FILE *surf_fopen(const char *name, const char *mode)
 {
   unsigned int cpt;
-  char *path_elm = NULL;
+  char *path_elm = nullptr;
   char *buff;
-  FILE *file = NULL;
+  FILE *file = nullptr;
 
   xbt_assert(name);
 
@@ -141,7 +142,7 @@ FILE *surf_fopen(const char *name, const char *mode)
     if (file)
       return file;
   }
-  return NULL;
+  return nullptr;
 }
 
 #ifdef _WIN32
@@ -160,7 +161,7 @@ static const char *disk_drives_letter_table[MAX_DRIVE] = {
  * directory on Unix/Linux platforms.
  */
 
-const char *__surf_get_initial_path(void)
+const char *__surf_get_initial_path()
 {
 
 #ifdef _WIN32
@@ -170,7 +171,7 @@ const char *__surf_get_initial_path(void)
   char root[4] = { 0 };
 
   if (!len)
-    return NULL;
+    return nullptr;
 
   strncpy(root, current_directory, 3);
 
@@ -179,7 +180,7 @@ const char *__surf_get_initial_path(void)
       return disk_drives_letter_table[i];
   }
 
-  return NULL;
+  return nullptr;
 #else
   return "./";
 #endif
@@ -217,7 +218,7 @@ int find_model_description(s_surf_model_description_t * table,
                            const char *name)
 {
   int i;
-  char *name_list = NULL;
+  char *name_list = nullptr;
 
   for (i = 0; table[i].name; i++)
     if (!strcmp(name, table[i].name)) {
@@ -228,8 +229,8 @@ int find_model_description(s_surf_model_description_t * table,
   name_list = xbt_strdup(table[0].name);
   for (i = 1; table[i].name; i++) {
     name_list = (char *) xbt_realloc(name_list, strlen(name_list) + strlen(table[i].name) + 3);
-    strcat(name_list, ", ");
-    strcat(name_list, table[i].name);
+    strncat(name_list, ", ", 2);
+    strncat(name_list, table[i].name, strlen(table[i].name));
   }
   xbt_die("Model '%s' is invalid! Valid models are: %s.", name, name_list);
   return -1;
@@ -245,16 +246,25 @@ void sg_version_check(int lib_version_major,int lib_version_minor,int lib_versio
       fprintf(stderr,
           "FATAL ERROR: Your program was compiled with SimGrid version %d.%d.%d, "
           "and then linked against SimGrid %d.%d.%d. Please fix this.\n",
-              SIMGRID_VERSION_MAJOR,SIMGRID_VERSION_MINOR,SIMGRID_VERSION_PATCH,
-        lib_version_major,lib_version_minor,lib_version_patch);
+          lib_version_major,lib_version_minor,lib_version_patch,
+          SIMGRID_VERSION_MAJOR,SIMGRID_VERSION_MINOR,SIMGRID_VERSION_PATCH);
       abort();
     }
     if (lib_version_patch != SIMGRID_VERSION_PATCH) {
+      if(SIMGRID_VERSION_PATCH >= 90 || lib_version_patch >=90){
+        fprintf(stderr,
+        "FATAL ERROR: Your program was compiled with SimGrid version %d.%d.%d, "
+        "and then linked against SimGrid %d.%d.%d. \n"
+        "One of them is a development version, and should not be mixed with the stable release. Please fix this.\n",
+        lib_version_major,lib_version_minor,lib_version_patch,
+        SIMGRID_VERSION_MAJOR,SIMGRID_VERSION_MINOR,SIMGRID_VERSION_PATCH);
+        abort();
+      }
         fprintf(stderr,
             "Warning: Your program was compiled with SimGrid version %d.%d.%d, "
             "and then linked against SimGrid %d.%d.%d. Proceeding anyway.\n",
-                SIMGRID_VERSION_MAJOR,SIMGRID_VERSION_MINOR,SIMGRID_VERSION_PATCH,
-          lib_version_major,lib_version_minor,lib_version_patch);
+            lib_version_major,lib_version_minor,lib_version_patch,
+            SIMGRID_VERSION_MAJOR,SIMGRID_VERSION_MINOR,SIMGRID_VERSION_PATCH);
     }
 }
 
@@ -275,17 +285,19 @@ void surf_init(int *argc, char **argv)
     simgrid::s4u::Host::onDestruction(*host);
     delete host;
   });
-  USER_HOST_LEVEL = simgrid::s4u::Host::extension_create(NULL);
+  USER_HOST_LEVEL = simgrid::s4u::Host::extension_create(nullptr);
 
   as_router_lib = xbt_lib_new();
   storage_lib = xbt_lib_new();
   storage_type_lib = xbt_lib_new();
   file_lib = xbt_lib_new();
-  watched_hosts_lib = xbt_dict_new_homogeneous(NULL);
-
+  watched_hosts_lib = xbt_dict_new_homogeneous(nullptr);
 
   XBT_DEBUG("Add routing levels");
-  ROUTING_PROP_ASR_LEVEL = xbt_lib_add_level(as_router_lib, NULL);
+  ROUTING_PROP_ASR_LEVEL = xbt_lib_add_level(as_router_lib, nullptr);
+  ROUTING_ASR_LEVEL = xbt_lib_add_level(as_router_lib, [](void* p) {
+    delete static_cast<simgrid::kernel::routing::NetCard*>(p);
+  });
 
   XBT_DEBUG("Add SURF levels");
   simgrid::surf::HostImpl::classInit();
@@ -293,9 +305,9 @@ void surf_init(int *argc, char **argv)
 
   xbt_init(argc, argv);
   if (!all_existing_models)
-    all_existing_models = xbt_dynar_new(sizeof(simgrid::surf::Model*), NULL);
+    all_existing_models = new std::vector<simgrid::surf::Model*>();
   if (!model_list_invoke)
-    model_list_invoke = xbt_dynar_new(sizeof(simgrid::surf::Model*), NULL);
+    model_list_invoke = xbt_dynar_new(sizeof(simgrid::surf::Model*), nullptr);
   if (!future_evt_set)
     future_evt_set = new simgrid::trace_mgr::future_evt_set();
 
@@ -308,13 +320,9 @@ void surf_init(int *argc, char **argv)
     MC_memory_init();
 }
 
-void surf_exit(void)
+void surf_exit()
 {
-  unsigned int iter;
-  simgrid::surf::Model *model = NULL;
-
-  TRACE_end();                  /* Just in case it was not called by the upper
-                                 * layer (or there is no upper layer) */
+  TRACE_end();                  /* Just in case it was not called by the upper layer (or there is no upper layer) */
 
   sg_config_finalize();
 
@@ -329,9 +337,9 @@ void surf_exit(void)
   xbt_lib_free(&file_lib);
   xbt_dict_free(&watched_hosts_lib);
 
-  xbt_dynar_foreach(all_existing_models, iter, model)
+  for (auto model : *all_existing_models)
     delete model;
-  xbt_dynar_free(&all_existing_models);
+  delete all_existing_models;
   xbt_dynar_free(&model_list_invoke);
   routing_exit();
 
@@ -348,6 +356,7 @@ void surf_exit(void)
 
   tmgr_finalize();
   sg_platf_exit();
+  simgrid::s4u::Engine::shutdown();
 
   NOW = 0;                      /* Just in case the user plans to restart the simulation afterward */
 }
@@ -360,15 +369,15 @@ namespace simgrid {
 namespace surf {
 
 Model::Model()
-  : maxminSystem_(NULL)
+  : maxminSystem_(nullptr)
 {
   readyActionSet_ = new ActionList();
   runningActionSet_ = new ActionList();
   failedActionSet_ = new ActionList();
   doneActionSet_ = new ActionList();
 
-  modifiedSet_ = NULL;
-  actionHeap_ = NULL;
+  modifiedSet_ = nullptr;
+  actionHeap_ = nullptr;
   updateMechanism_ = UM_UNDEFINED;
   selectiveUpdate_ = 0;
 }
@@ -393,7 +402,7 @@ double Model::next_occuring_event(double now)
 
 double Model::next_occuring_event_lazy(double now)
 {
-  Action *action = NULL;
+  Action *action = nullptr;
   double min = -1;
   double share;
 
@@ -470,13 +479,14 @@ double Model::next_occuring_event_lazy(double now)
 
 double Model::next_occuring_event_full(double /*now*/) {
   THROW_UNIMPLEMENTED;
+  return 0.0;
 }
 
 double Model::shareResourcesMaxMin(ActionList *running_actions,
                           lmm_system_t sys,
                           void (*solve) (lmm_system_t))
 {
-  Action *action = NULL;
+  Action *action = nullptr;
   double min = -1;
   double value = -1;
 
@@ -693,7 +703,7 @@ void Action::setState(Action::State state)
     stateSet_ = getModel()->getDoneActionSet();
     break;
   default:
-    stateSet_ = NULL;
+    stateSet_ = nullptr;
     break;
   }
   if (stateSet_)
@@ -883,12 +893,8 @@ void Action::updateRemainingLazy(double now)
   }
   else
   {
-    xbt_assert(stateSet_ == getModel()->getRunningActionSet(),
-        "You're updating an action that is not running.");
-
-      /* bogus priority, skip it */
-    xbt_assert(priority_ > 0,
-        "You're updating an action that seems suspended.");
+    xbt_assert(stateSet_ == getModel()->getRunningActionSet(), "You're updating an action that is not running.");
+    xbt_assert(priority_ > 0, "You're updating an action that seems suspended.");
   }
 
   delta = now - lastUpdate_;