Logo AND Algorithmique Numérique Distribuée

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