1 /* Copyright (c) 2013-2021. The SimGrid Team. All rights reserved. */
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. */
6 #include "src/surf/LinkImpl.hpp"
7 #include "simgrid/s4u/Engine.hpp"
8 #include "surf/surf.hpp"
12 XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(res_network);
22 LinkImpl::LinkImpl(const std::string& name) : LinkImplIntf(name), piface_(this)
24 if (name != "__loopback__")
25 xbt_assert(not s4u::Link::by_name_or_null(name), "Link '%s' declared several times in the platform.", name.c_str());
27 s4u::Engine::get_instance()->link_register(name, &piface_);
28 XBT_DEBUG("Create link '%s'", name.c_str());
31 /** @brief Fire the required callbacks and destroy the object
33 * Don't delete directly a Link, call l->destroy() instead.
35 void LinkImpl::destroy()
37 s4u::Link::on_destruction(piface_);
38 s4u::Engine::get_instance()->link_unregister(get_name());
42 bool LinkImpl::is_used() const
44 return get_model()->get_maxmin_system()->constraint_used(get_constraint());
47 constexpr kernel::lmm::Constraint::SharingPolicy to_maxmin_policy(s4u::Link::SharingPolicy policy)
50 case s4u::Link::SharingPolicy::NONLINEAR:
51 return kernel::lmm::Constraint::SharingPolicy::NONLINEAR;
52 case s4u::Link::SharingPolicy::FATPIPE:
53 return kernel::lmm::Constraint::SharingPolicy::FATPIPE;
55 return kernel::lmm::Constraint::SharingPolicy::SHARED;
59 void LinkImpl::set_sharing_policy(s4u::Link::SharingPolicy policy, const s4u::NonLinearResourceCb& cb)
61 get_constraint()->set_sharing_policy(to_maxmin_policy(policy), cb);
62 sharing_policy_ = policy;
65 s4u::Link::SharingPolicy LinkImpl::get_sharing_policy() const
67 return sharing_policy_;
70 void LinkImpl::latency_check(double latency) const
72 static double last_warned_latency = sg_surf_precision;
73 if (latency != 0.0 && latency < last_warned_latency) {
74 XBT_WARN("Latency for link %s is smaller than surf/precision (%g < %g)."
75 " For more accuracy, consider setting \"--cfg=surf/precision:%g\".",
76 get_cname(), latency, sg_surf_precision, latency);
77 last_warned_latency = latency;
81 void LinkImpl::turn_on()
85 s4u::Link::on_state_change(piface_);
89 void LinkImpl::turn_off()
93 s4u::Link::on_state_change(piface_);
95 const kernel::lmm::Element* elem = nullptr;
96 double now = surf_get_clock();
97 while (const auto* var = get_constraint()->get_variable(&elem)) {
98 Action* action = var->get_id();
99 if (action->get_state() == Action::State::INITED || action->get_state() == Action::State::STARTED) {
100 action->set_finish_time(now);
101 action->set_state(Action::State::FAILED);
107 void LinkImpl::seal()
112 xbt_assert(this->get_model(), "Cannot seal Link(%s) without setting the Network model first", this->get_cname());
116 void LinkImpl::on_bandwidth_change() const
118 s4u::Link::on_bandwidth_change(piface_);
121 void LinkImpl::set_bandwidth_profile(profile::Profile* profile)
124 xbt_assert(bandwidth_.event == nullptr, "Cannot set a second bandwidth profile to Link %s", get_cname());
125 bandwidth_.event = profile->schedule(&profile::future_evt_set, this);
129 void LinkImpl::set_latency_profile(profile::Profile* profile)
132 xbt_assert(latency_.event == nullptr, "Cannot set a second latency profile to Link %s", get_cname());
133 latency_.event = profile->schedule(&profile::future_evt_set, this);
137 void LinkImpl::set_concurrency_limit(int limit) const
140 get_constraint()->reset_concurrency_maximum();
142 get_constraint()->set_concurrency_limit(limit);
145 } // namespace resource
146 } // namespace kernel
147 } // namespace simgrid