1 /* Copyright (c) 2009-2011, 2013-2016. The SimGrid Team.
2 * All rights reserved. */
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. */
9 #include <xbt/signal.hpp>
11 #include <simgrid/s4u/host.hpp>
13 #include "surf_routing.hpp"
15 #include "simgrid/sg_config.h"
16 #include "storage_interface.hpp"
18 #include "src/kernel/routing/AsImpl.hpp"
19 #include "src/surf/xml/platf.hpp" // FIXME: move that back to the parsing area
21 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_route, surf, "Routing part of surf");
28 simgrid::xbt::signal<void(NetCard*)> netcardCreatedCallbacks;
29 simgrid::xbt::signal<void(s4u::As*)> asCreatedCallbacks;
31 }}} // namespace simgrid::kernel::routing
34 * @ingroup SURF_build_api
35 * @brief A library containing all known hosts
38 int COORD_HOST_LEVEL = -1; //Coordinates level
40 int MSG_FILE_LEVEL = -1; //Msg file level
42 int SIMIX_STORAGE_LEVEL = -1; //Simix storage level
43 int MSG_STORAGE_LEVEL = -1; //Msg storage level
45 xbt_lib_t as_router_lib;
46 int ROUTING_ASR_LEVEL = -1; //Routing level
47 int COORD_ASR_LEVEL = -1; //Coordinates level
48 int NS3_ASR_LEVEL = -1; //host node for ns3
49 int ROUTING_PROP_ASR_LEVEL = -1; //Where the properties are stored
51 /** @brief Retrieve a netcard from its name
53 * Netcards are the thing that connect host or routers to the network
55 simgrid::kernel::routing::NetCard *sg_netcard_by_name_or_null(const char *name)
57 sg_host_t h = sg_host_by_name(name);
58 simgrid::kernel::routing::NetCard *netcard = h==nullptr ? nullptr: h->pimpl_netcard;
60 netcard = (simgrid::kernel::routing::NetCard*) xbt_lib_get_or_null(as_router_lib, name, ROUTING_ASR_LEVEL);
65 simgrid::kernel::routing::RoutingPlatf *routing_platf = nullptr;
68 void sg_platf_new_trace(sg_platf_trace_cbarg_t trace)
70 tmgr_trace_t tmgr_trace;
71 if (trace->file && strcmp(trace->file, "") != 0) {
72 tmgr_trace = tmgr_trace_new_from_file(trace->file);
74 xbt_assert(strcmp(trace->pc_data, ""),
75 "Trace '%s' must have either a content, or point to a file on disk.",trace->id);
76 tmgr_trace = tmgr_trace_new_from_string(trace->id, trace->pc_data, trace->periodicity);
78 xbt_dict_set(traces_set_list, trace->id, (void *) tmgr_trace, nullptr);
86 * \brief Find a route between hosts
88 * \param src the network_element_t for src host
89 * \param dst the network_element_t for dst host
90 * \param route where to store the list of links.
91 * If *route=nullptr, create a short lived dynar. Else, fill the provided dynar
92 * \param latency where to store the latency experienced on the path (or nullptr if not interested)
93 * It is the caller responsibility to initialize latency to 0 (we add to provided route)
96 * walk through the routing components tree and find a route between hosts
97 * by calling each "get_route" function in each routing component.
99 void RoutingPlatf::getRouteAndLatency(NetCard *src, NetCard *dst, std::vector<Link*> * route, double *latency)
101 XBT_DEBUG("getRouteAndLatency from %s to %s", src->name(), dst->name());
103 AsImpl::getRouteRecursive(src, dst, route, latency);
106 static xbt_dynar_t _recursiveGetOneLinkRoutes(AsImpl *as)
108 xbt_dynar_t ret = xbt_dynar_new(sizeof(Onelink*), xbt_free_f);
110 //adding my one link routes
111 xbt_dynar_t onelink_mine = as->getOneLinkRoutes();
113 xbt_dynar_merge(&ret,&onelink_mine);
117 xbt_dict_cursor_t cursor = nullptr;
119 xbt_dict_foreach(as->children(), cursor, key, rc_child) {
120 xbt_dynar_t onelink_child = _recursiveGetOneLinkRoutes(rc_child);
122 xbt_dynar_merge(&ret,&onelink_child);
127 xbt_dynar_t RoutingPlatf::getOneLinkRoutes(){
128 return _recursiveGetOneLinkRoutes(root_);
133 /** @brief create the root AS */
134 void routing_model_create(Link *loopback)
136 routing_platf = new simgrid::kernel::routing::RoutingPlatf(loopback);
139 /* ************************************************************************** */
140 /* ************************* GENERIC PARSE FUNCTIONS ************************ */
142 static void check_disk_attachment()
144 xbt_lib_cursor_t cursor;
147 simgrid::kernel::routing::NetCard *host_elm;
148 xbt_lib_foreach(storage_lib, cursor, key, data) {
149 if(xbt_lib_get_level(xbt_lib_get_elm_or_null(storage_lib, key), SURF_STORAGE_LEVEL) != nullptr) {
150 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));
151 host_elm = sg_netcard_by_name_or_null(storage->attach_);
153 surf_parse_error("Unable to attach storage %s: host %s doesn't exist.", storage->getName(), storage->attach_);
158 void routing_register_callbacks()
160 simgrid::surf::on_postparse.connect(check_disk_attachment);
162 instr_routing_define_callbacks();
165 /** \brief Frees all memory allocated by the routing module */
166 void routing_exit() {
167 delete routing_platf;
170 simgrid::kernel::routing::RoutingPlatf::RoutingPlatf(simgrid::surf::Link *loopback)
171 : loopback_(loopback)
174 simgrid::kernel::routing::RoutingPlatf::~RoutingPlatf()