X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/77bbf3027c4240a2e833209a3a3f186589da8577..12e37132d1b9b141fa8497e17b0629cfd4173c36:/src/simix/smx_host.cpp diff --git a/src/simix/smx_host.cpp b/src/simix/smx_host.cpp index 393256fc27..7bd756a321 100644 --- a/src/simix/smx_host.cpp +++ b/src/simix/smx_host.cpp @@ -1,102 +1,19 @@ -/* Copyright (c) 2007-2017. The SimGrid Team. All rights reserved. */ +/* Copyright (c) 2007-2019. The SimGrid Team. All rights reserved. */ /* This program is free software; you can redistribute it and/or modify it * under the terms of the license (GNU LGPL) which comes with this package. */ #include "mc/mc.h" +#include "simgrid/Exception.hpp" #include "smx_private.hpp" #include "src/kernel/activity/CommImpl.hpp" +#include "src/kernel/activity/ExecImpl.hpp" #include "src/mc/mc_replay.hpp" #include "src/plugins/vm/VirtualMachineImpl.hpp" -#include "src/surf/surf_interface.hpp" -#include "xbt/ex.hpp" -#include +#include "src/simix/smx_host_private.hpp" XBT_LOG_NEW_DEFAULT_SUBCATEGORY(simix_host, simix, "SIMIX hosts"); -namespace simgrid { - namespace simix { - simgrid::xbt::Extension Host::EXTENSION_ID; - - Host::Host() - { - if (not Host::EXTENSION_ID.valid()) - Host::EXTENSION_ID = s4u::Host::extension_create(); - - simgrid::simix::ActorImpl act; - process_list = xbt_swag_new(xbt_swag_offset(act, host_proc_hookup)); - } - - Host::~Host() - { - /* All processes should be gone when the host is turned off (by the end of the simulation). */ - if (xbt_swag_size(process_list) != 0) { - std::string msg = std::string("Shutting down host, but it's not empty:"); - smx_actor_t process = nullptr; - - xbt_swag_foreach(process, process_list) msg = msg + "\n\t" + process->name.c_str(); - - SIMIX_display_process_status(); - THROWF(arg_error, 0, "%s", msg.c_str()); - } - for (auto const& arg : auto_restart_processes) - delete arg; - auto_restart_processes.clear(); - for (auto const& arg : boot_processes) - delete arg; - boot_processes.clear(); - xbt_swag_free(process_list); - } - - /** Re-starts all the actors that are marked as restartable. - * - * Weird things will happen if you turn on an host that is already on. S4U is fool-proof, not this. - */ - void Host::turnOn() - { - for (auto const& arg : boot_processes) { - XBT_DEBUG("Booting Process %s(%s) right now", arg->name.c_str(), arg->host->getCname()); - smx_actor_t actor = simix_global->create_process_function(arg->name.c_str(), arg->code, nullptr, arg->host, - arg->properties.get(), nullptr); - if (arg->kill_time >= 0) - simcall_process_set_kill_time(actor, arg->kill_time); - if (arg->auto_restart) - actor->auto_restart = arg->auto_restart; - } - } - -}} // namespaces - -/** @brief Stop the host if it is on */ -void SIMIX_host_off(sg_host_t h, smx_actor_t issuer) -{ - simgrid::simix::Host* host = h->extension(); - - xbt_assert((host != nullptr), "Invalid parameters"); - - if (h->isOn()) { - h->pimpl_cpu->turnOff(); - - /* Clean Simulator data */ - if (xbt_swag_size(host->process_list) != 0) { - smx_actor_t process = nullptr; - xbt_swag_foreach(process, host->process_list) { - SIMIX_process_kill(process, issuer); - XBT_DEBUG("Killing %s@%s on behalf of %s which turned off that host.", process->getCname(), - process->host->getCname(), issuer->getCname()); - } - } - } else { - XBT_INFO("Host %s is already off", h->getCname()); - } -} - -sg_host_t sg_host_self() -{ - smx_actor_t process = SIMIX_process_self(); - return (process == nullptr) ? nullptr : process->host; -} - /* needs to be public and without simcall for exceptions and logging events */ const char* sg_host_self_get_name() { @@ -104,93 +21,13 @@ const char* sg_host_self_get_name() if (host == nullptr || SIMIX_process_self() == simix_global->maestro_process) return ""; - return host->getCname(); + return host->get_cname(); } -/** - * \brief Add a process to the list of the processes that the host will restart when it comes back - * This function add a process to the list of the processes that will be restarted when the host comes - * back. It is expected that this function is called when the host is down. - * The processes will only be restarted once, meaning that you will have to register the process - * again to restart the process again. - */ -void SIMIX_host_add_auto_restart_process(sg_host_t host, const char* name, std::function code, void* data, - double kill_time, std::map* properties, - int auto_restart) -{ - smx_process_arg_t arg = new simgrid::simix::ProcessArg(); - arg->name = name; - arg->code = std::move(code); - arg->data = data; - arg->host = host; - arg->kill_time = kill_time; - arg->properties.reset(properties, [](decltype(properties)) {}); - arg->auto_restart = auto_restart; - - if (host->isOff() && watched_hosts.find(host->getCname()) == watched_hosts.end()) { - watched_hosts.insert(host->getCname()); - XBT_DEBUG("Push host %s to watched_hosts because state == SURF_RESOURCE_OFF", host->getCname()); - } - host->extension()->auto_restart_processes.push_back(arg); -} -/** @brief Restart the list of processes that have been registered to the host */ -void SIMIX_host_autorestart(sg_host_t host) +simgrid::kernel::activity::ExecImplPtr +SIMIX_execution_parallel_start(std::string name, int host_nb, const sg_host_t* host_list, const double* flops_amount, + const double* bytes_amount, double rate, double timeout) { - std::vector process_list = - host->extension()->auto_restart_processes; - - for (auto const& arg : process_list) { - XBT_DEBUG("Restarting Process %s@%s right now", arg->name.c_str(), arg->host->getCname()); - smx_actor_t actor = simix_global->create_process_function(arg->name.c_str(), arg->code, nullptr, arg->host, - arg->properties.get(), nullptr); - if (arg->kill_time >= 0) - simcall_process_set_kill_time(actor, arg->kill_time); - if (arg->auto_restart) - actor->auto_restart = arg->auto_restart; - } - process_list.clear(); -} - -boost::intrusive_ptr simcall_HANDLER_execution_start(smx_simcall_t simcall, - const char* name, - double flops_amount, - double priority, double bound) -{ - return SIMIX_execution_start(simcall->issuer, name,flops_amount,priority,bound); -} - -boost::intrusive_ptr -SIMIX_execution_start(smx_actor_t issuer, const char* name, double flops_amount, double priority, double bound) -{ - - /* alloc structures and initialize */ - simgrid::kernel::activity::ExecImplPtr exec = - simgrid::kernel::activity::ExecImplPtr(new simgrid::kernel::activity::ExecImpl(name, issuer->host)); - - /* set surf's action */ - if (not MC_is_active() && not MC_record_replay_is_active()) { - - exec->surf_exec = issuer->host->pimpl_cpu->execution_start(flops_amount); - exec->surf_exec->setData(exec.get()); - exec->surf_exec->setSharingWeight(priority); - - if (bound > 0) - static_cast(exec->surf_exec)->setBound(bound); - } - - XBT_DEBUG("Create execute synchro %p: %s", exec.get(), exec->name.c_str()); - - return exec; -} - -boost::intrusive_ptr -SIMIX_execution_parallel_start(const char* name, int host_nb, sg_host_t* host_list, double* flops_amount, - double* bytes_amount, double rate, double timeout) -{ - - /* alloc structures and initialize */ - simgrid::kernel::activity::ExecImplPtr exec = - simgrid::kernel::activity::ExecImplPtr(new simgrid::kernel::activity::ExecImpl(name, nullptr)); /* Check that we are not mixing VMs and PMs in the parallel task */ bool is_a_vm = (nullptr != dynamic_cast(host_list[0])); @@ -200,17 +37,21 @@ SIMIX_execution_parallel_start(const char* name, int host_nb, sg_host_t* host_li } /* set surf's synchro */ + simgrid::kernel::resource::Action* surf_action = nullptr; + simgrid::kernel::resource::Action* timeout_detector = nullptr; if (not MC_is_active() && not MC_record_replay_is_active()) { - /* set surf's synchro */ - sg_host_t* host_list_cpy = new sg_host_t[host_nb]; - std::copy_n(host_list, host_nb, host_list_cpy); - exec->surf_exec = surf_host_model->executeParallelTask(host_nb, host_list_cpy, flops_amount, bytes_amount, rate); - exec->surf_exec->setData(exec.get()); + surf_action = surf_host_model->execute_parallel(host_nb, host_list, flops_amount, bytes_amount, rate); if (timeout > 0) { - exec->timeoutDetector = host_list[0]->pimpl_cpu->sleep(timeout); - exec->timeoutDetector->setData(exec.get()); + timeout_detector = host_list[0]->pimpl_cpu->sleep(timeout); } } + + simgrid::kernel::activity::ExecImplPtr exec = simgrid::kernel::activity::ExecImplPtr( + new simgrid::kernel::activity::ExecImpl(name, "", timeout_detector, nullptr)); + if (surf_action != nullptr) { + exec->surf_action_ = surf_action; + exec->surf_action_->set_data(exec.get()); + } XBT_DEBUG("Create parallel execute synchro %p", exec.get()); return exec; @@ -218,30 +59,45 @@ SIMIX_execution_parallel_start(const char* name, int host_nb, sg_host_t* host_li void simcall_HANDLER_execution_wait(smx_simcall_t simcall, smx_activity_t synchro) { - simgrid::kernel::activity::ExecImplPtr exec = - boost::static_pointer_cast(synchro); - XBT_DEBUG("Wait for execution of synchro %p, state %d", synchro.get(), (int)synchro->state); + XBT_DEBUG("Wait for execution of synchro %p, state %d", synchro.get(), (int)synchro->state_); /* Associate this simcall to the synchro */ - synchro->simcalls.push_back(simcall); + synchro->simcalls_.push_back(simcall); simcall->issuer->waiting_synchro = synchro; /* set surf's synchro */ if (MC_is_active() || MC_record_replay_is_active()) { - synchro->state = SIMIX_DONE; - SIMIX_execution_finish(exec); + synchro->state_ = SIMIX_DONE; + SIMIX_execution_finish(synchro); return; } /* If the synchro is already finished then perform the error handling */ - if (synchro->state != SIMIX_RUNNING) - SIMIX_execution_finish(exec); + if (synchro->state_ != SIMIX_RUNNING) + SIMIX_execution_finish(synchro); } -void SIMIX_execution_finish(simgrid::kernel::activity::ExecImplPtr exec) +void simcall_HANDLER_execution_test(smx_simcall_t simcall, smx_activity_t synchro) { - for (smx_simcall_t const& simcall : exec->simcalls) { - switch (exec->state) { + int res = (synchro->state_ != SIMIX_WAITING && synchro->state_ != SIMIX_RUNNING); + if (res) { + synchro->simcalls_.push_back(simcall); + SIMIX_execution_finish(synchro); + } else { + SIMIX_simcall_answer(simcall); + } + simcall_execution_test__set__result(simcall, res); +} + +void SIMIX_execution_finish(smx_activity_t synchro) +{ + simgrid::kernel::activity::ExecImplPtr exec = + boost::static_pointer_cast(synchro); + + while (not synchro->simcalls_.empty()) { + smx_simcall_t simcall = synchro->simcalls_.front(); + synchro->simcalls_.pop_front(); + switch (exec->state_) { case SIMIX_DONE: /* do nothing, synchro done */ @@ -249,9 +105,10 @@ void SIMIX_execution_finish(simgrid::kernel::activity::ExecImplPtr exec) break; case SIMIX_FAILED: - XBT_DEBUG("SIMIX_execution_finished: host '%s' failed", simcall->issuer->host->getCname()); - simcall->issuer->context->iwannadie = 1; - SMX_EXCEPTION(simcall->issuer, host_error, 0, "Host failed"); + XBT_DEBUG("SIMIX_execution_finished: host '%s' failed", simcall->issuer->host_->get_cname()); + simcall->issuer->context_->iwannadie = true; + simcall->issuer->exception = + std::make_exception_ptr(simgrid::HostFailureException(XBT_THROW_POINT, "Host failed")); break; case SIMIX_CANCELED: @@ -261,38 +118,20 @@ void SIMIX_execution_finish(simgrid::kernel::activity::ExecImplPtr exec) case SIMIX_TIMEOUT: XBT_DEBUG("SIMIX_execution_finished: execution timeouted"); - SMX_EXCEPTION(simcall->issuer, timeout_error, 0, "Timeouted"); + simcall->issuer->exception = std::make_exception_ptr(simgrid::TimeoutError(XBT_THROW_POINT, "Timeouted")); break; default: - xbt_die("Internal error in SIMIX_execution_finish: unexpected synchro state %d", - (int)exec->state); + xbt_die("Internal error in SIMIX_execution_finish: unexpected synchro state %d", (int)exec->state_); } - /* Fail the process if the host is down */ - if (simcall->issuer->host->isOff()) - simcall->issuer->context->iwannadie = 1; simcall->issuer->waiting_synchro = nullptr; - simcall_execution_wait__set__result(simcall, exec->state); - SIMIX_simcall_answer(simcall); - } -} + simcall_execution_wait__set__result(simcall, exec->state_); -void SIMIX_set_category(smx_activity_t synchro, const char *category) -{ - if (synchro->state != SIMIX_RUNNING) - return; - - simgrid::kernel::activity::ExecImplPtr exec = - boost::dynamic_pointer_cast(synchro); - if (exec != nullptr) { - exec->surf_exec->setCategory(category); - return; - } - - simgrid::kernel::activity::CommImplPtr comm = - boost::dynamic_pointer_cast(synchro); - if (comm != nullptr) { - comm->surf_comm->setCategory(category); + /* Fail the process if the host is down */ + if (simcall->issuer->host_->is_on()) + SIMIX_simcall_answer(simcall); + else + simcall->issuer->context_->iwannadie = true; } }