Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Merge branch 'master' of git+ssh://scm.gforge.inria.fr//gitroot/simgrid/simgrid
[simgrid.git] / src / surf / network_interface.cpp
1 /* Copyright (c) 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 <algorithm>
8
9 #include "network_interface.hpp"
10 #include "simgrid/sg_config.h"
11
12 #ifndef NETWORK_INTERFACE_CPP_
13 #define NETWORK_INTERFACE_CPP_
14
15 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(surf_network, surf,
16     "Logging specific to the SURF network module");
17
18 /*********
19  * C API *
20  *********/
21
22 extern "C" {
23
24   const char* sg_link_name(Link *link) {
25     return link->getName();
26   }
27   Link * sg_link_by_name(const char* name) {
28     return Link::byName(name);
29   }
30
31   int sg_link_is_shared(Link *link){
32     return link->sharingPolicy();
33   }
34   double sg_link_bandwidth(Link *link){
35     return link->getBandwidth();
36   }
37   double sg_link_latency(Link *link){
38     return link->getLatency();
39   }
40   void* sg_link_data(Link *link) {
41     return link->getData();
42   }
43   void sg_link_data_set(Link *link,void *data) {
44     link->setData(data);
45   }
46   int sg_link_count(void) {
47     return Link::linksCount();
48   }
49   Link** sg_link_list(void) {
50     return Link::linksList();
51   }
52   void sg_link_exit(void) {
53     Link::linksExit();
54   }
55
56 }
57
58 /*****************
59  * List of links *
60  *****************/
61
62 namespace simgrid {
63   namespace surf {
64
65     boost::unordered_map<std::string,Link *> *Link::links = new boost::unordered_map<std::string,Link *>();
66     Link *Link::byName(const char* name) {
67       Link * res = NULL;
68       try {
69         res = links->at(name);
70       } catch (std::out_of_range& e) {}
71
72       return res;
73     }
74     /** @brief Returns the amount of links in the platform */
75     int Link::linksCount() {
76       return links->size();
77     }
78     /** @brief Returns a list of all existing links */
79     Link **Link::linksList() {
80       Link **res = xbt_new(Link*, (int)links->size());
81       int i=0;
82       for (auto kv : *links) {
83         res[i++] = kv.second;
84       }
85       return res;
86     }
87     /** @brief destructor of the static data */
88     void Link::linksExit() {
89       for (auto kv : *links)
90         (kv.second)->destroy();
91       delete links;
92     }
93
94     /*************
95      * Callbacks *
96      *************/
97
98     simgrid::xbt::signal<void(simgrid::surf::Link*)> Link::onCreation;
99     simgrid::xbt::signal<void(simgrid::surf::Link*)> Link::onDestruction;
100     simgrid::xbt::signal<void(simgrid::surf::Link*)> Link::onStateChange;
101
102     simgrid::xbt::signal<void(simgrid::surf::NetworkAction*, e_surf_action_state_t, e_surf_action_state_t)> networkActionStateChangedCallbacks;
103     simgrid::xbt::signal<void(simgrid::surf::NetworkAction*, simgrid::surf::NetCard *src, simgrid::surf::NetCard *dst, double size, double rate)> networkCommunicateCallbacks;
104
105   }
106 }
107
108 void netlink_parse_init(sg_platf_link_cbarg_t link){
109   if (link->policy == SURF_LINK_FULLDUPLEX) {
110     char *link_id;
111     link_id = bprintf("%s_UP", link->id);
112     surf_network_model->createLink(link_id,
113         link->bandwidth,
114         link->bandwidth_trace,
115         link->latency,
116         link->latency_trace,
117         link->state_trace, link->policy, link->properties);
118     xbt_free(link_id);
119     link_id = bprintf("%s_DOWN", link->id);
120     surf_network_model->createLink(link_id,
121         link->bandwidth,
122         link->bandwidth_trace,
123         link->latency,
124         link->latency_trace,
125         link->state_trace, link->policy, link->properties);
126     xbt_free(link_id);
127   } else {
128     surf_network_model->createLink(link->id,
129         link->bandwidth,
130         link->bandwidth_trace,
131         link->latency,
132         link->latency_trace,
133         link->state_trace, link->policy, link->properties);
134   }
135 }
136
137 /*********
138  * Model *
139  *********/
140
141 simgrid::surf::NetworkModel *surf_network_model = NULL;
142
143 namespace simgrid {
144   namespace surf {
145
146     double NetworkModel::latencyFactor(double /*size*/) {
147       return sg_latency_factor;
148     }
149
150     double NetworkModel::bandwidthFactor(double /*size*/) {
151       return sg_bandwidth_factor;
152     }
153
154     double NetworkModel::bandwidthConstraint(double rate, double /*bound*/, double /*size*/) {
155       return rate;
156     }
157
158     double NetworkModel::next_occuring_event_full(double now)
159     {
160       NetworkAction *action = NULL;
161       ActionList *runningActions = surf_network_model->getRunningActionSet();
162       double minRes;
163
164       minRes = shareResourcesMaxMin(runningActions, surf_network_model->p_maxminSystem, surf_network_model->f_networkSolve);
165
166       for(ActionList::iterator it(runningActions->begin()), itend(runningActions->end())
167           ; it != itend ; ++it) {
168         action = static_cast<NetworkAction*>(&*it);
169         if (action->m_latency > 0) {
170           minRes = (minRes < 0) ? action->m_latency : std::min(minRes, action->m_latency);
171         }
172       }
173
174       XBT_DEBUG("Min of share resources %f", minRes);
175
176       return minRes;
177     }
178
179     /************
180      * Resource *
181      ************/
182
183     Link::Link(simgrid::surf::NetworkModel *model, const char *name, xbt_dict_t props)
184     : Resource(model, name),
185       PropertyHolder(props)
186     {
187       links->insert({name, this});
188
189       m_latency.scale = 1;
190       m_bandwidth.scale = 1;
191       XBT_DEBUG("Create link '%s'",name);
192     }
193
194     Link::Link(simgrid::surf::NetworkModel *model, const char *name, xbt_dict_t props,
195         lmm_constraint_t constraint,
196         tmgr_trace_t state_trace)
197     : Resource(model, name, constraint),
198       PropertyHolder(props)
199     {
200       m_latency.scale = 1;
201       m_bandwidth.scale = 1;
202       if (state_trace)
203         m_stateEvent = future_evt_set->add_trace(state_trace, 0.0, this);
204
205       links->insert({name, this});
206       XBT_DEBUG("Create link '%s'",name);
207
208     }
209
210     /** @brief use destroy() instead of this destructor */
211     Link::~Link() {
212       xbt_assert(currentlyDestroying_, "Don't delete Links directly. Call destroy() instead.");
213     }
214     /** @brief Fire the require callbacks and destroy the object
215      *
216      * Don't delete directly an Link, call l->destroy() instead.
217      */
218     void Link::destroy()
219     {
220       if (!currentlyDestroying_) {
221         currentlyDestroying_ = true;
222         onDestruction(this);
223         delete this;
224       }
225     }
226
227     bool Link::isUsed()
228     {
229       return lmm_constraint_used(getModel()->getMaxminSystem(), getConstraint());
230     }
231
232     double Link::getLatency()
233     {
234       return m_latency.peak * m_latency.scale;
235     }
236
237     double Link::getBandwidth()
238     {
239       return m_bandwidth.peak * m_bandwidth.scale;
240     }
241
242     int Link::sharingPolicy()
243     {
244       return lmm_constraint_sharing_policy(getConstraint());
245     }
246
247     void Link::turnOn(){
248       if (isOff()) {
249         Resource::turnOn();
250         onStateChange(this);
251       }
252     }
253     void Link::turnOff(){
254       if (isOn()) {
255         Resource::turnOff();
256         onStateChange(this);
257       }
258     }
259     void Link::set_state_trace(tmgr_trace_t trace)
260     {
261       xbt_assert(m_stateEvent==NULL,"Cannot set a second state trace to Link %s", getName());
262
263       m_stateEvent = future_evt_set->add_trace(trace, 0.0, this);
264     }
265     void Link::set_bandwidth_trace(tmgr_trace_t trace)
266     {
267       xbt_assert(m_bandwidth.event==NULL,"Cannot set a second bandwidth trace to Link %s", getName());
268
269       m_bandwidth.event = future_evt_set->add_trace(trace, 0.0, this);
270     }
271     void Link::set_latency_trace(tmgr_trace_t trace)
272     {
273       xbt_assert(m_latency.event==NULL,"Cannot set a second latency trace to Link %s", getName());
274
275       m_latency.event = future_evt_set->add_trace(trace, 0.0, this);
276     }
277
278
279     /**********
280      * Action *
281      **********/
282
283     void NetworkAction::setState(e_surf_action_state_t state){
284       e_surf_action_state_t old = getState();
285       Action::setState(state);
286       networkActionStateChangedCallbacks(this, old, state);
287     }
288
289   }
290 }
291
292 #endif /* NETWORK_INTERFACE_CPP_ */