src/kernel/resource/DiskImpl.cpp

   1 /* Copyright (c) 2019-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 "DiskImpl.hpp"
   7
   8 #include "simgrid/s4u/Engine.hpp"
   9 #include "src/kernel/EngineImpl.hpp"
  10 #include "src/kernel/lmm/maxmin.hpp"
  11 #include "src/kernel/resource/profile/Profile.hpp"
  12
  13 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(res_disk, ker_resource, "Disk resources, that fuel I/O activities");
  14
  15 namespace simgrid {
  16 namespace kernel {
  17 namespace resource {
  18
  19 xbt::signal<void(DiskAction const&, Action::State, Action::State)> DiskAction::on_state_change;
  20
  21 /*********
  22  * Model *
  23  *********/
  24
  25 DiskModel::DiskModel(const std::string& name) : Model(name)
  26 {
  27   set_maxmin_system(new lmm::System(true /* selective update */));
  28 }
  29
  30 /************
  31  * Resource *
  32  ************/
  33 DiskImpl::DiskImpl(const std::string& name, double read_bandwidth, double write_bandwidth)
  34     : Resource_T(name), piface_(this)
  35 {
  36   read_bw_.peak   = read_bandwidth;
  37   read_bw_.scale  = 1.0;
  38   write_bw_.peak  = write_bandwidth;
  39   write_bw_.scale = 1.0;
  40 }
  41
  42 DiskImpl* DiskImpl::set_host(s4u::Host* host)
  43 {
  44   xbt_assert(host, "Cannot set host, none given");
  45   host_ = host;
  46   return this;
  47 }
  48
  49 DiskImpl* DiskImpl::set_read_constraint(lmm::Constraint* constraint_read)
  50 {
  51   constraint_read_ = constraint_read;
  52   return this;
  53 }
  54
  55 DiskImpl* DiskImpl::set_write_constraint(lmm::Constraint* constraint_write)
  56 {
  57   constraint_write_ = constraint_write;
  58   return this;
  59 }
  60
  61 /** @brief Fire the required callbacks and destroy the object
  62  *
  63  * Don't delete directly a Disk, call d->destroy() instead.
  64  */
  65 void DiskImpl::destroy()
  66 {
  67   s4u::Disk::on_destruction(piface_);
  68   delete this;
  69 }
  70
  71 bool DiskImpl::is_used() const
  72 {
  73   return get_model()->get_maxmin_system()->constraint_used(get_constraint());
  74 }
  75
  76 void DiskImpl::turn_on()
  77 {
  78   if (not is_on()) {
  79     Resource::turn_on();
  80     s4u::Disk::on_state_change(piface_);
  81   }
  82 }
  83 void DiskImpl::turn_off()
  84 {
  85   if (is_on()) {
  86     Resource::turn_off();
  87     s4u::Disk::on_state_change(piface_);
  88   }
  89 }
  90
  91 DiskImpl* DiskImpl::set_read_bandwidth_profile(profile::Profile* profile)
  92 {
  93   if (profile) {
  94     xbt_assert(read_bw_.event == nullptr, "Cannot set a second read bandwidth profile to Disk %s", get_cname());
  95     read_bw_.event = profile->schedule(&profile::future_evt_set, this);
  96   }
  97   return this;
  98 }
  99
 100 DiskImpl* DiskImpl::set_write_bandwidth_profile(profile::Profile* profile)
 101 {
 102   if (profile) {
 103     xbt_assert(write_bw_.event == nullptr, "Cannot set a second read bandwidth profile to Disk %s", get_cname());
 104     write_bw_.event = profile->schedule(&profile::future_evt_set, this);
 105   }
 106   return this;
 107 }
 108
 109 void DiskImpl::seal()
 110 {
 111   if (is_sealed())
 112     return;
 113
 114   xbt_assert(this->get_model(), "Cannot seal Disk (%s) without setting the model first", get_cname());
 115   lmm::System* maxmin_system = get_model()->get_maxmin_system();
 116   this->set_read_constraint(maxmin_system->constraint_new(this, read_bw_.peak * read_bw_.scale))
 117       ->set_write_constraint(maxmin_system->constraint_new(this, write_bw_.peak * write_bw_.scale))
 118       ->set_constraint(maxmin_system->constraint_new(this, std::max(read_bw_.peak, write_bw_.peak)));
 119   XBT_DEBUG("Create resource with read_bw '%f' write_bw '%f'", read_bw_.peak, write_bw_.peak);
 120   Resource::seal();
 121   turn_on();
 122 }
 123
 124 /**********
 125  * Action *
 126  **********/
 127 void DiskAction::set_state(Action::State new_state)
 128 {
 129   Action::State previous_state = get_state();
 130   if (new_state != previous_state) { // Trigger only if the state changed
 131     Action::set_state(new_state);
 132     on_state_change(*this, previous_state, new_state);
 133   }
 134 }
 135 } // namespace resource
 136 } // namespace kernel
 137 } // namespace simgrid