X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/9ba3bfdef0f13d77474c16059ca813b75ade43ab..ceedfe1f3f14e6cae48ee7684f98c7e4ab1fd2be:/src/surf/host_interface.cpp?ds=inline diff --git a/src/surf/host_interface.cpp b/src/surf/host_interface.cpp index 0dcf34b568..b2a6700ad9 100644 --- a/src/surf/host_interface.cpp +++ b/src/surf/host_interface.cpp @@ -31,16 +31,22 @@ void host_add_traces(){ namespace simgrid { namespace surf { -simgrid::xbt::Extension Host::EXTENSION_ID; - -simgrid::surf::signal hostCreatedCallbacks; -simgrid::surf::signal hostDestructedCallbacks; -simgrid::surf::signal hostStateChangedCallbacks; -simgrid::surf::signal hostActionStateChangedCallbacks; +simgrid::xbt::Extension Host::EXTENSION_ID = + simgrid::Host::extension_create([](void *h) { + static_cast(h)->destroy(); + }); /********* * Model * *********/ +Host *HostModel::createHost(const char *name,NetCard *netElm, Cpu *cpu, xbt_dict_t props){ + xbt_dynar_t storageList = (xbt_dynar_t)xbt_lib_get_or_null(storage_lib, name, ROUTING_STORAGE_HOST_LEVEL); + + Host *host = new simgrid::surf::Host(surf_host_model, name, props, + storageList, netElm, cpu); + XBT_DEBUG("Create host %s with %ld mounted disks", name, xbt_dynar_length(host->p_storage)); + return host; +} /* Each VM has a dummy CPU action on the PM layer. This CPU action works as the * constraint (capacity) of the VM in the PM layer. If the VM does not have any @@ -80,17 +86,12 @@ void HostModel::adjustWeightOfDummyCpuActions() /************ * Resource * ************/ - -void Host::init() -{ - if (!EXTENSION_ID.valid()) { - EXTENSION_ID = simgrid::Host::extension_create(); - SURF_HOST_LEVEL = EXTENSION_ID.id(); // FIXME: KILLME - } -} +simgrid::surf::signal Host::onCreation; +simgrid::surf::signal Host::onDestruction; +simgrid::surf::signal Host::onStateChange; Host::Host(simgrid::surf::Model *model, const char *name, xbt_dict_t props, - xbt_dynar_t storage, RoutingEdge *netElm, Cpu *cpu) + xbt_dynar_t storage, NetCard *netElm, Cpu *cpu) : Resource(model, name) , PropertyHolder(props) , p_storage(storage), p_netElm(netElm), p_cpu(cpu) @@ -99,39 +100,62 @@ Host::Host(simgrid::surf::Model *model, const char *name, xbt_dict_t props, } Host::Host(simgrid::surf::Model *model, const char *name, xbt_dict_t props, lmm_constraint_t constraint, - xbt_dynar_t storage, RoutingEdge *netElm, Cpu *cpu) + xbt_dynar_t storage, NetCard *netElm, Cpu *cpu) : Resource(model, name, constraint) -, PropertyHolder(props) + , PropertyHolder(props) , p_storage(storage), p_netElm(netElm), p_cpu(cpu) { p_params.ramsize = 0; } -void Host::onDie() +/** @brief use destroy() instead of this destructor */ +Host::~Host() { - hostDestructedCallbacks(this); - Resource::onDie(); + xbt_assert(currentlyDestroying_, "Don't delete Hosts directly. Call destroy() instead."); + delete p_cpu; + // FIXME: VM plays strange games, leading to segfaults if I do the expected thing of next line + // delete p_netElm; + // delete p_storage; } - -Host::~Host() +/** @brief Fire the require callbacks and destroy the object + * + * Don't delete directly an Host, call h->destroy() instead. + */ +void Host::destroy() { - this->die(); + if (!currentlyDestroying_) { + currentlyDestroying_ = true; + onDestruction(this); + delete this; + } } void Host::attach(simgrid::Host* host) { if (p_host != nullptr) - xbt_die("Already attached to host %s", host->id().c_str()); + xbt_die("Already attached to host %s", host->getName().c_str()); host->extension_set(this); p_host = host; - hostCreatedCallbacks(this); + onCreation(this); } -void Host::setState(e_surf_resource_state_t state){ - e_surf_resource_state_t old = Resource::getState(); - Resource::setState(state); - hostStateChangedCallbacks(this, old, state); - p_cpu->setState(state); +bool Host::isOn() { + return p_cpu->isOn(); +} +bool Host::isOff() { + return p_cpu->isOff(); +} +void Host::turnOn(){ + if (isOff()) { + p_cpu->turnOn(); + onStateChange(this); + } +} +void Host::turnOff(){ + if (isOn()) { + p_cpu->turnOff(); + onStateChange(this); + } } simgrid::surf::Storage *Host::findStorageOnMountList(const char* mount) @@ -353,7 +377,7 @@ xbt_dynar_t Host::getVms() iter != simgrid::surf::VMModel::ws_vms.end(); ++iter) { simgrid::surf::VirtualMachine *ws_vm = &*iter; - if (this == ws_vm->p_subWs) + if (this == ws_vm->p_hostPM->extension(simgrid::surf::Host::EXTENSION_ID)) xbt_dynar_push(dyn, &ws_vm); } @@ -371,15 +395,5 @@ void Host::setParams(vm_params_t params) p_params = *params; } -/********** - * Action * - **********/ - -void HostAction::setState(e_surf_action_state_t state){ - e_surf_action_state_t old = getState(); - Action::setState(state); - hostActionStateChangedCallbacks(this, old, state); -} - } }