src/surf/surf_routing.cpp

   1 /* Copyright (c) 2009-2011, 2013-2016. 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 <vector>
   8
   9 #include <xbt/signal.hpp>
  10
  11 #include <simgrid/s4u/host.hpp>
  12
  13 #include "surf_routing.hpp"
  14
  15 #include "simgrid/sg_config.h"
  16 #include "storage_interface.hpp"
  17
  18 #include "src/kernel/routing/AsImpl.hpp"
  19 #include "src/surf/xml/platf.hpp" // FIXME: move that back to the parsing area
  20
  21 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_route, surf, "Routing part of surf");
  22
  23 namespace simgrid {
  24 namespace kernel {
  25 namespace routing {
  26
  27   /* Callbacks */
  28   simgrid::xbt::signal<void(NetCard*)> netcardCreatedCallbacks;
  29   simgrid::xbt::signal<void(s4u::As*)> asCreatedCallbacks;
  30
  31 }}} // namespace simgrid::kernel::routing
  32
  33 /**
  34  * @ingroup SURF_build_api
  35  * @brief A library containing all known hosts
  36  */
  37 xbt_dict_t host_list = nullptr;
  38
  39 int COORD_HOST_LEVEL = -1;         //Coordinates level
  40
  41 int MSG_FILE_LEVEL = -1;             //Msg file level
  42
  43 int SIMIX_STORAGE_LEVEL = -1;        //Simix storage level
  44 int MSG_STORAGE_LEVEL = -1;          //Msg storage level
  45
  46 xbt_lib_t as_router_lib;
  47 int ROUTING_ASR_LEVEL = -1;          //Routing level
  48 int COORD_ASR_LEVEL = -1;            //Coordinates level
  49 int NS3_ASR_LEVEL = -1;              //host node for ns3
  50 int ROUTING_PROP_ASR_LEVEL = -1;     //Where the properties are stored
  51
  52 /** @brief Retrieve a netcard from its name
  53  *
  54  * Netcards are the thing that connect host or routers to the network
  55  */
  56 simgrid::kernel::routing::NetCard *sg_netcard_by_name_or_null(const char *name)
  57 {
  58   sg_host_t h = sg_host_by_name(name);
  59   simgrid::kernel::routing::NetCard *netcard = h==nullptr ? nullptr: h->pimpl_netcard;
  60   if (!netcard)
  61     netcard = (simgrid::kernel::routing::NetCard*) xbt_lib_get_or_null(as_router_lib, name, ROUTING_ASR_LEVEL);
  62   return netcard;
  63 }
  64
  65 /* Global vars */
  66 simgrid::kernel::routing::RoutingPlatf *routing_platf = nullptr;
  67
  68
  69 void sg_platf_new_trace(sg_platf_trace_cbarg_t trace)
  70 {
  71   tmgr_trace_t tmgr_trace;
  72   if (trace->file && strcmp(trace->file, "") != 0) {
  73     tmgr_trace = tmgr_trace_new_from_file(trace->file);
  74   } else {
  75     xbt_assert(strcmp(trace->pc_data, ""),
  76         "Trace '%s' must have either a content, or point to a file on disk.",trace->id);
  77     tmgr_trace = tmgr_trace_new_from_string(trace->id, trace->pc_data, trace->periodicity);
  78   }
  79   xbt_dict_set(traces_set_list, trace->id, (void *) tmgr_trace, nullptr);
  80 }
  81
  82 namespace simgrid {
  83 namespace kernel {
  84 namespace routing {
  85
  86 /**
  87  * \brief Find a route between hosts
  88  *
  89  * \param src the network_element_t for src host
  90  * \param dst the network_element_t for dst host
  91  * \param route where to store the list of links.
  92  *              If *route=nullptr, create a short lived dynar. Else, fill the provided dynar
  93  * \param latency where to store the latency experienced on the path (or nullptr if not interested)
  94  *                It is the caller responsibility to initialize latency to 0 (we add to provided route)
  95  * \pre route!=nullptr
  96  *
  97  * walk through the routing components tree and find a route between hosts
  98  * by calling each "get_route" function in each routing component.
  99  */
 100 void RoutingPlatf::getRouteAndLatency(NetCard *src, NetCard *dst, std::vector<Link*> * route, double *latency)
 101 {
 102   XBT_DEBUG("getRouteAndLatency from %s to %s", src->name(), dst->name());
 103
 104   AsImpl::getRouteRecursive(src, dst, route, latency);
 105 }
 106
 107 static xbt_dynar_t _recursiveGetOneLinkRoutes(AsImpl *as)
 108 {
 109   xbt_dynar_t ret = xbt_dynar_new(sizeof(Onelink*), xbt_free_f);
 110
 111   //adding my one link routes
 112   xbt_dynar_t onelink_mine = as->getOneLinkRoutes();
 113   if (onelink_mine)
 114     xbt_dynar_merge(&ret,&onelink_mine);
 115
 116   //recursing
 117   char *key;
 118   xbt_dict_cursor_t cursor = nullptr;
 119   AsImpl *rc_child;
 120   xbt_dict_foreach(as->children(), cursor, key, rc_child) {
 121     xbt_dynar_t onelink_child = _recursiveGetOneLinkRoutes(rc_child);
 122     if (onelink_child)
 123       xbt_dynar_merge(&ret,&onelink_child);
 124   }
 125   return ret;
 126 }
 127
 128 xbt_dynar_t RoutingPlatf::getOneLinkRoutes(){
 129   return _recursiveGetOneLinkRoutes(root_);
 130 }
 131
 132 }}}
 133
 134 /** @brief create the root AS */
 135 void routing_model_create(Link *loopback)
 136 {
 137   routing_platf = new simgrid::kernel::routing::RoutingPlatf(loopback);
 138 }
 139
 140 /* ************************************************************************** */
 141 /* ************************* GENERIC PARSE FUNCTIONS ************************ */
 142
 143 static void check_disk_attachment()
 144 {
 145   xbt_lib_cursor_t cursor;
 146   char *key;
 147   void **data;
 148   simgrid::kernel::routing::NetCard *host_elm;
 149   xbt_lib_foreach(storage_lib, cursor, key, data) {
 150     if(xbt_lib_get_level(xbt_lib_get_elm_or_null(storage_lib, key), SURF_STORAGE_LEVEL) != nullptr) {
 151     simgrid::surf::Storage *storage = static_cast<simgrid::surf::Storage*>(xbt_lib_get_level(xbt_lib_get_elm_or_null(storage_lib, key), SURF_STORAGE_LEVEL));
 152     host_elm = sg_netcard_by_name_or_null(storage->p_attach);
 153     if(!host_elm)
 154       surf_parse_error("Unable to attach storage %s: host %s doesn't exist.", storage->getName(), storage->p_attach);
 155     }
 156   }
 157 }
 158
 159 void routing_register_callbacks()
 160 {
 161   simgrid::surf::on_postparse.connect(check_disk_attachment);
 162
 163   instr_routing_define_callbacks();
 164 }
 165
 166 /** \brief Frees all memory allocated by the routing module */
 167 void routing_exit() {
 168   delete routing_platf;
 169 }
 170
 171 simgrid::kernel::routing::RoutingPlatf::RoutingPlatf(simgrid::surf::Link *loopback)
 172 : loopback_(loopback)
 173 {
 174 }
 175 simgrid::kernel::routing::RoutingPlatf::~RoutingPlatf()
 176 {
 177   delete root_;
 178 }