src/surf/LinkImpl.cpp

   1 /* Copyright (c) 2013-2021. The SimGrid Team. All rights reserved.          */
   2
   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. */
   5
   6 #include "src/surf/LinkImpl.hpp"
   7 #include "simgrid/s4u/Engine.hpp"
   8 #include "surf/surf.hpp"
   9
  10 #include <numeric>
  11
  12 XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(res_network);
  13
  14 /*********
  15  * Model *
  16  *********/
  17
  18 namespace simgrid {
  19 namespace kernel {
  20 namespace resource {
  21
  22 LinkImpl::LinkImpl(const std::string& name) : LinkImplIntf(name), piface_(this)
  23 {
  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());
  26
  27   s4u::Engine::get_instance()->link_register(name, &piface_);
  28   XBT_DEBUG("Create link '%s'", name.c_str());
  29 }
  30
  31 /** @brief Fire the required callbacks and destroy the object
  32  *
  33  * Don't delete directly a Link, call l->destroy() instead.
  34  */
  35 void LinkImpl::destroy()
  36 {
  37   s4u::Link::on_destruction(this->piface_);
  38   delete this;
  39 }
  40
  41 bool LinkImpl::is_used() const
  42 {
  43   return get_model()->get_maxmin_system()->constraint_used(get_constraint());
  44 }
  45
  46 constexpr kernel::lmm::Constraint::SharingPolicy to_maxmin_policy(s4u::Link::SharingPolicy policy)
  47 {
  48   switch (policy) {
  49     case s4u::Link::SharingPolicy::NONLINEAR:
  50       return kernel::lmm::Constraint::SharingPolicy::NONLINEAR;
  51     case s4u::Link::SharingPolicy::FATPIPE:
  52       return kernel::lmm::Constraint::SharingPolicy::FATPIPE;
  53     default:
  54       return kernel::lmm::Constraint::SharingPolicy::SHARED;
  55   }
  56 }
  57
  58 void LinkImpl::set_sharing_policy(s4u::Link::SharingPolicy policy, const s4u::NonLinearResourceCb& cb)
  59 {
  60   get_constraint()->set_sharing_policy(to_maxmin_policy(policy), cb);
  61   sharing_policy_ = policy;
  62 }
  63
  64 s4u::Link::SharingPolicy LinkImpl::get_sharing_policy() const
  65 {
  66   return sharing_policy_;
  67 }
  68
  69 void LinkImpl::latency_check(double latency) const
  70 {
  71   static double last_warned_latency = sg_surf_precision;
  72   if (latency != 0.0 && latency < last_warned_latency) {
  73     XBT_WARN("Latency for link %s is smaller than surf/precision (%g < %g)."
  74              " For more accuracy, consider setting \"--cfg=surf/precision:%g\".",
  75              get_cname(), latency, sg_surf_precision, latency);
  76     last_warned_latency = latency;
  77   }
  78 }
  79
  80 void LinkImpl::turn_on()
  81 {
  82   if (not is_on()) {
  83     Resource::turn_on();
  84     s4u::Link::on_state_change(piface_);
  85   }
  86 }
  87
  88 void LinkImpl::turn_off()
  89 {
  90   if (is_on()) {
  91     Resource::turn_off();
  92     s4u::Link::on_state_change(piface_);
  93
  94     const kernel::lmm::Element* elem = nullptr;
  95     double now                       = surf_get_clock();
  96     while (const auto* var = get_constraint()->get_variable(&elem)) {
  97       Action* action = var->get_id();
  98       if (action->get_state() == Action::State::INITED || action->get_state() == Action::State::STARTED) {
  99         action->set_finish_time(now);
 100         action->set_state(Action::State::FAILED);
 101       }
 102     }
 103   }
 104 }
 105
 106 void LinkImpl::seal()
 107 {
 108   if (is_sealed())
 109     return;
 110
 111   xbt_assert(this->get_model(), "Cannot seal Link(%s) without setting the Network model first", this->get_cname());
 112   Resource::seal();
 113   s4u::Link::on_creation(piface_);
 114 }
 115
 116 void LinkImpl::on_bandwidth_change() const
 117 {
 118   s4u::Link::on_bandwidth_change(piface_);
 119 }
 120
 121 void LinkImpl::set_bandwidth_profile(profile::Profile* profile)
 122 {
 123   if (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);
 126   }
 127 }
 128
 129 void LinkImpl::set_latency_profile(profile::Profile* profile)
 130 {
 131   if (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);
 134   }
 135 }
 136
 137 void LinkImpl::set_concurrency_limit(int limit) const
 138 {
 139   if (limit != -1) {
 140     get_constraint()->reset_concurrency_maximum();
 141   }
 142   get_constraint()->set_concurrency_limit(limit);
 143 }
 144
 145 } // namespace resource
 146 } // namespace kernel
 147 } // namespace simgrid