#include "simgrid/s4u/Engine.hpp"
#include "src/kernel/EngineImpl.hpp"
#include "src/kernel/lmm/maxmin.hpp"
+#include "src/kernel/resource/profile/Profile.hpp"
-XBT_LOG_NEW_DEFAULT_SUBCATEGORY(res_disk, ker_resource, "Disk resources, fuelling I/O activities");
-
-simgrid::kernel::resource::DiskModel* surf_disk_model = nullptr;
+XBT_LOG_NEW_DEFAULT_SUBCATEGORY(res_disk, ker_resource, "Disk resources, that fuel I/O activities");
namespace simgrid {
namespace kernel {
namespace resource {
+xbt::signal<void(DiskAction const&, Action::State, Action::State)> DiskAction::on_state_change;
+
/*********
* Model *
*********/
-DiskModel::DiskModel() : Model(Model::UpdateAlgo::FULL)
-{
- set_maxmin_system(new simgrid::kernel::lmm::System(true /* selective update */));
-}
-
-DiskModel::~DiskModel()
+DiskModel::DiskModel(const std::string& name) : Model(name)
{
- surf_disk_model = nullptr;
+ set_maxmin_system(new lmm::System(true /* selective update */));
}
/************
* Resource *
************/
-DiskImpl* DiskImpl::set_host(s4u::Host* host)
-{
- host_ = host;
- return this;
-}
-
-DiskImpl* DiskImpl::set_read_bandwidth(double read_bw)
+DiskImpl::DiskImpl(const std::string& name, double read_bandwidth, double write_bandwidth)
+ : Resource_T(name), piface_(this)
{
- read_bw_ = read_bw;
- return this;
+ read_bw_.peak = read_bandwidth;
+ read_bw_.scale = 1.0;
+ write_bw_.peak = write_bandwidth;
+ write_bw_.scale = 1.0;
}
-DiskImpl* DiskImpl::set_write_bandwidth(double write_bw)
+DiskImpl* DiskImpl::set_host(s4u::Host* host)
{
- write_bw_ = write_bw;
+ xbt_assert(host, "Cannot set host, none given");
+ host_ = host;
return this;
}
DiskImpl* DiskImpl::set_read_constraint(lmm::Constraint* constraint_read)
{
- constraint_read_ = constraint_read;
+ constraint_read_ = constraint_read;
return this;
}
DiskImpl* DiskImpl::set_write_constraint(lmm::Constraint* constraint_write)
{
- constraint_write_ = constraint_write;
+ constraint_write_ = constraint_write;
return this;
}
*/
void DiskImpl::destroy()
{
- s4u::Disk::on_destruction(this->piface_);
+ s4u::Disk::on_destruction(piface_);
delete this;
}
bool DiskImpl::is_used() const
{
- THROW_UNIMPLEMENTED;
-}
-
-void DiskImpl::apply_event(kernel::profile::Event* /*event*/, double /*value*/)
-{
- THROW_UNIMPLEMENTED;
+ return get_model()->get_maxmin_system()->constraint_used(get_constraint());
}
void DiskImpl::turn_on()
{
if (not is_on()) {
Resource::turn_on();
- s4u::Disk::on_state_change(this->piface_);
+ s4u::Disk::on_state_change(piface_);
}
}
void DiskImpl::turn_off()
{
if (is_on()) {
Resource::turn_off();
- s4u::Disk::on_state_change(this->piface_);
+ s4u::Disk::on_state_change(piface_);
+ }
+}
+
+DiskImpl* DiskImpl::set_read_bandwidth_profile(profile::Profile* profile)
+{
+ if (profile) {
+ xbt_assert(read_bw_.event == nullptr, "Cannot set a second read bandwidth profile to Disk %s", get_cname());
+ read_bw_.event = profile->schedule(&profile::future_evt_set, this);
}
+ return this;
+}
+
+DiskImpl* DiskImpl::set_write_bandwidth_profile(profile::Profile* profile)
+{
+ if (profile) {
+ xbt_assert(write_bw_.event == nullptr, "Cannot set a second read bandwidth profile to Disk %s", get_cname());
+ write_bw_.event = profile->schedule(&profile::future_evt_set, this);
+ }
+ return this;
}
void DiskImpl::seal()
{
+ if (is_sealed())
+ return;
+
+ xbt_assert(this->get_model(), "Cannot seal Disk (%s) without setting the model first", get_cname());
lmm::System* maxmin_system = get_model()->get_maxmin_system();
- this->set_read_constraint(maxmin_system->constraint_new(this, read_bw_))
- ->set_write_constraint(maxmin_system->constraint_new(this, write_bw_))
- ->set_constraint(maxmin_system->constraint_new(this, std::max(read_bw_, write_bw_)));
- XBT_DEBUG("Create resource with read_bw '%f' write_bw '%f'", read_bw_, write_bw_);
+ this->set_read_constraint(maxmin_system->constraint_new(this, read_bw_.peak * read_bw_.scale))
+ ->set_write_constraint(maxmin_system->constraint_new(this, write_bw_.peak * write_bw_.scale))
+ ->set_constraint(maxmin_system->constraint_new(this, std::max(read_bw_.peak, write_bw_.peak)));
+ XBT_DEBUG("Create resource with read_bw '%f' write_bw '%f'", read_bw_.peak, write_bw_.peak);
+ Resource::seal();
turn_on();
}
-xbt::signal<void(DiskAction const&, Action::State, Action::State)> DiskAction::on_state_change;
/**********
* Action *
**********/
-void DiskAction::set_state(Action::State state)
+void DiskAction::set_state(Action::State new_state)
{
- Action::State old = get_state();
- Action::set_state(state);
- on_state_change(*this, old, state);
+ Action::State previous_state = get_state();
+ if (new_state != previous_state) { // Trigger only if the state changed
+ Action::set_state(new_state);
+ on_state_change(*this, previous_state, new_state);
+ }
}
} // namespace resource
} // namespace kernel