src/surf/surf_interface.cpp

   1 /* Copyright (c) 2004-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/Engine.hpp>
   7 #include <xbt/module.h>
   8
   9 #include "mc/mc.h"
  10 #include "simgrid/sg_config.hpp"
  11 #include "src/kernel/resource/profile/FutureEvtSet.hpp"
  12 #include "src/kernel/resource/profile/Profile.hpp"
  13 #include "src/surf/HostImpl.hpp"
  14 #include "src/surf/surf_interface.hpp"
  15
  16 #include <fstream>
  17 #include <string>
  18
  19 #ifdef _WIN32
  20 #include <windows.h>
  21 #endif
  22
  23 XBT_LOG_NEW_CATEGORY(surf, "All SURF categories");
  24 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_kernel, surf, "Logging specific to SURF (kernel)");
  25
  26 /*********
  27  * Utils *
  28  *********/
  29
  30 simgrid::kernel::profile::FutureEvtSet future_evt_set;
  31 std::vector<std::string> surf_path;
  32
  33 const std::vector<surf_model_description_t> surf_network_model_description = {
  34     {"LV08",
  35      "Realistic network analytic model (slow-start modeled by multiplying latency by 13.01, bandwidth by .97; "
  36      "bottleneck sharing uses a payload of S=20537 for evaluating RTT). ",
  37      &surf_network_model_init_LegrandVelho},
  38     {"Constant",
  39      "Simplistic network model where all communication take a constant time (one second). This model "
  40      "provides the lowest realism, but is (marginally) faster.",
  41      &surf_network_model_init_Constant},
  42     {"SMPI",
  43      "Realistic network model specifically tailored for HPC settings (accurate modeling of slow start with "
  44      "correction factors on three intervals: < 1KiB, < 64 KiB, >= 64 KiB)",
  45      &surf_network_model_init_SMPI},
  46     {"IB", "Realistic network model specifically tailored for HPC settings, with Infiniband contention model",
  47      &surf_network_model_init_IB},
  48     {"CM02",
  49      "Legacy network analytic model (Very similar to LV08, but without corrective factors. The timings of "
  50      "small messages are thus poorly modeled).",
  51      &surf_network_model_init_CM02},
  52     {"ns-3", "Network pseudo-model using the ns-3 tcp model instead of an analytic model",
  53      &surf_network_model_init_NS3},
  54 };
  55
  56 #if !HAVE_SMPI
  57 void surf_network_model_init_SMPI()
  58 {
  59   xbt_die("Please activate SMPI support in cmake to use the SMPI network model.");
  60 }
  61 void surf_network_model_init_IB()
  62 {
  63   xbt_die("Please activate SMPI support in cmake to use the IB network model.");
  64 }
  65 #endif
  66 #if !SIMGRID_HAVE_NS3
  67 void surf_network_model_init_NS3()
  68 {
  69   xbt_die("Please activate ns-3 support in cmake and install the dependencies to use the NS3 network model.");
  70 }
  71 #endif
  72
  73 const std::vector<surf_model_description_t> surf_cpu_model_description = {
  74     {"Cas01", "Simplistic CPU model (time=size/speed).", &surf_cpu_model_init_Cas01},
  75 };
  76
  77 const std::vector<surf_model_description_t> surf_host_model_description = {
  78     {"default", "Default host model. Currently, CPU:Cas01 and network:LV08 (with cross traffic enabled)",
  79      &surf_host_model_init_current_default},
  80     {"compound", "Host model that is automatically chosen if you change the network and CPU models",
  81      &surf_host_model_init_compound},
  82     {"ptask_L07", "Host model somehow similar to Cas01+CM02 but allowing parallel tasks",
  83      &surf_host_model_init_ptask_L07},
  84     {"ptask_BMF", "Host model which implements BMF resource allocation and allows parallel tasks",
  85      &surf_host_model_init_ptask_BMF},
  86 };
  87
  88 const std::vector<surf_model_description_t> surf_optimization_mode_description = {
  89     {"Lazy", "Lazy action management (partial invalidation in lmm + heap in action remaining).", nullptr},
  90     {"TI",
  91      "Trace integration. Highly optimized mode when using availability traces (only available for the Cas01 CPU "
  92      "model for now).",
  93      nullptr},
  94     {"Full", "Full update of remaining and variables. Slow but may be useful when debugging.", nullptr},
  95 };
  96
  97 const std::vector<surf_model_description_t> surf_disk_model_description = {
  98     {"default", "Simplistic disk model.", &surf_disk_model_init_default},
  99 };
 100
 101 /* returns whether #file_path is an absolute file path. Surprising, isn't it ? */
 102 static bool is_absolute_file_path(const std::string& file_path)
 103 {
 104 #ifdef _WIN32
 105   WIN32_FIND_DATA wfd = {0};
 106   HANDLE hFile        = FindFirstFile(file_path.c_str(), &wfd);
 107
 108   if (INVALID_HANDLE_VALUE == hFile)
 109     return false;
 110
 111   FindClose(hFile);
 112   return true;
 113 #else
 114   return (file_path.c_str()[0] == '/');
 115 #endif
 116 }
 117
 118 std::ifstream* surf_ifsopen(const std::string& name)
 119 {
 120   xbt_assert(not name.empty());
 121
 122   auto* fs = new std::ifstream();
 123   if (is_absolute_file_path(name)) { /* don't mess with absolute file names */
 124     fs->open(name.c_str(), std::ifstream::in);
 125   }
 126
 127   /* search relative files in the path */
 128   for (auto const& path_elm : surf_path) {
 129     std::string buff = path_elm + "/" + name;
 130     fs->open(buff.c_str(), std::ifstream::in);
 131
 132     if (not fs->fail()) {
 133       XBT_DEBUG("Found file at %s", buff.c_str());
 134       return fs;
 135     }
 136   }
 137
 138   return fs;
 139 }
 140
 141 FILE* surf_fopen(const std::string& name, const char* mode)
 142 {
 143   FILE* file = nullptr;
 144
 145   if (is_absolute_file_path(name)) /* don't mess with absolute file names */
 146     return fopen(name.c_str(), mode);
 147
 148   /* search relative files in the path */
 149   for (auto const& path_elm : surf_path) {
 150     std::string buff = path_elm + "/" + name;
 151     file             = fopen(buff.c_str(), mode);
 152
 153     if (file)
 154       return file;
 155   }
 156   return nullptr;
 157 }
 158
 159 /** Displays the long description of all registered models, and quit */
 160 void model_help(const char* category, const std::vector<surf_model_description_t>& table)
 161 {
 162   XBT_HELP("Long description of the %s models accepted by this simulator:", category);
 163   for (auto const& item : table)
 164     XBT_HELP("  %s: %s", item.name, item.description);
 165 }
 166
 167 const surf_model_description_t* find_model_description(const std::vector<surf_model_description_t>& table,
 168                                                        const std::string& name)
 169 {
 170   auto pos = std::find_if(table.begin(), table.end(),
 171                           [&name](const surf_model_description_t& item) { return item.name == name; });
 172   if (pos != table.end())
 173     return &*pos;
 174
 175   std::string sep;
 176   std::string name_list;
 177   for (auto const& item : table) {
 178     name_list += sep + item.name;
 179     sep = ", ";
 180   }
 181   xbt_die("Model '%s' is invalid! Valid models are: %s.", name.c_str(), name_list.c_str());
 182 }