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 };
  85
  86 const std::vector<surf_model_description_t> surf_optimization_mode_description = {
  87     {"Lazy", "Lazy action management (partial invalidation in lmm + heap in action remaining).", nullptr},
  88     {"TI",
  89      "Trace integration. Highly optimized mode when using availability traces (only available for the Cas01 CPU "
  90      "model for now).",
  91      nullptr},
  92     {"Full", "Full update of remaining and variables. Slow but may be useful when debugging.", nullptr},
  93 };
  94
  95 const std::vector<surf_model_description_t> surf_disk_model_description = {
  96     {"default", "Simplistic disk model.", &surf_disk_model_init_default},
  97 };
  98
  99 /* returns whether #file_path is an absolute file path. Surprising, isn't it ? */
 100 static bool is_absolute_file_path(const std::string& file_path)
 101 {
 102 #ifdef _WIN32
 103   WIN32_FIND_DATA wfd = {0};
 104   HANDLE hFile        = FindFirstFile(file_path.c_str(), &wfd);
 105
 106   if (INVALID_HANDLE_VALUE == hFile)
 107     return false;
 108
 109   FindClose(hFile);
 110   return true;
 111 #else
 112   return (file_path.c_str()[0] == '/');
 113 #endif
 114 }
 115
 116 std::ifstream* surf_ifsopen(const std::string& name)
 117 {
 118   xbt_assert(not name.empty());
 119
 120   auto* fs = new std::ifstream();
 121   if (is_absolute_file_path(name)) { /* don't mess with absolute file names */
 122     fs->open(name.c_str(), std::ifstream::in);
 123   }
 124
 125   /* search relative files in the path */
 126   for (auto const& path_elm : surf_path) {
 127     std::string buff = path_elm + "/" + name;
 128     fs->open(buff.c_str(), std::ifstream::in);
 129
 130     if (not fs->fail()) {
 131       XBT_DEBUG("Found file at %s", buff.c_str());
 132       return fs;
 133     }
 134   }
 135
 136   return fs;
 137 }
 138
 139 FILE* surf_fopen(const std::string& name, const char* mode)
 140 {
 141   FILE* file = nullptr;
 142
 143   if (is_absolute_file_path(name)) /* don't mess with absolute file names */
 144     return fopen(name.c_str(), mode);
 145
 146   /* search relative files in the path */
 147   for (auto const& path_elm : surf_path) {
 148     std::string buff = path_elm + "/" + name;
 149     file             = fopen(buff.c_str(), mode);
 150
 151     if (file)
 152       return file;
 153   }
 154   return nullptr;
 155 }
 156
 157 /** Displays the long description of all registered models, and quit */
 158 void model_help(const char* category, const std::vector<surf_model_description_t>& table)
 159 {
 160   XBT_HELP("Long description of the %s models accepted by this simulator:", category);
 161   for (auto const& item : table)
 162     XBT_HELP("  %s: %s", item.name, item.description);
 163 }
 164
 165 const surf_model_description_t* find_model_description(const std::vector<surf_model_description_t>& table,
 166                                                        const std::string& name)
 167 {
 168   auto pos = std::find_if(table.begin(), table.end(),
 169                           [&name](const surf_model_description_t& item) { return item.name == name; });
 170   if (pos != table.end())
 171     return &*pos;
 172
 173   std::string sep;
 174   std::string name_list;
 175   for (auto const& item : table) {
 176     name_list += sep + item.name;
 177     sep = ", ";
 178   }
 179   xbt_die("Model '%s' is invalid! Valid models are: %s.", name.c_str(), name_list.c_str());
 180 }