X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/5be17ba45c34a0f49c0394c3713f3836ec110f5e..239a6c2b5cf6df25b93d95b5df30fb5fbacbfbcd:/src/simix/ActorImpl.cpp diff --git a/src/simix/ActorImpl.cpp b/src/simix/ActorImpl.cpp index 4ee0c20f64..3b42e4c566 100644 --- a/src/simix/ActorImpl.cpp +++ b/src/simix/ActorImpl.cpp @@ -1,10 +1,12 @@ -/* Copyright (c) 2007-2018. 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 "simgrid/s4u/Actor.hpp" +#include "simgrid/s4u/Exec.hpp" #include "smx_private.hpp" #include "src/kernel/activity/CommImpl.hpp" #include "src/kernel/activity/ExecImpl.hpp" @@ -14,20 +16,15 @@ #include "src/mc/mc_replay.hpp" #include "src/mc/remote/Client.hpp" #include "src/simix/smx_host_private.hpp" -#include "src/simix/smx_io_private.hpp" #include "src/simix/smx_synchro_private.hpp" #include "src/surf/HostImpl.hpp" #include "src/surf/cpu_interface.hpp" -#ifdef HAVE_SMPI -#include "src/smpi/include/private.hpp" -#endif - #include XBT_LOG_NEW_DEFAULT_SUBCATEGORY(simix_process, simix, "Logging specific to SIMIX (process)"); -unsigned long simix_process_maxpid = 0; +static unsigned long simix_process_maxpid = 0; /** * @brief Returns the current agent. @@ -38,9 +35,9 @@ unsigned long simix_process_maxpid = 0; */ smx_actor_t SIMIX_process_self() { - smx_context_t self_context = SIMIX_context_self(); + smx_context_t self_context = simgrid::kernel::context::Context::self(); - return (self_context != nullptr) ? self_context->process() : nullptr; + return (self_context != nullptr) ? self_context->get_actor() : nullptr; } /** @@ -52,96 +49,135 @@ int SIMIX_process_has_pending_comms(smx_actor_t process) { return process->comms.size() > 0; } -/** - * @brief Moves a process to the list of processes to destroy. - */ -void SIMIX_process_cleanup(smx_actor_t process) +namespace simgrid { +namespace kernel { +namespace actor { + +ActorImpl::ActorImpl(simgrid::xbt::string name, s4u::Host* host) : host_(host), name_(name), piface_(this) { - XBT_DEBUG("Cleanup process %s (%p), waiting synchro %p", process->get_cname(), process, - process->waiting_synchro.get()); + pid_ = simix_process_maxpid++; + simcall.issuer = this; +} - process->finished_ = true; - SIMIX_process_on_exit_runall(process); +ActorImpl::~ActorImpl() +{ + delete this->context_; +} - /* Unregister from the kill timer if any */ - if (process->kill_timer != nullptr) { - SIMIX_timer_remove(process->kill_timer); - process->kill_timer = nullptr; - } +void ActorImpl::cleanup() +{ + if (this == simix_global->maestro_process) /* Do not cleanup maestro */ + return; + + XBT_DEBUG("Cleanup actor %s (%p), waiting synchro %p", get_cname(), this, waiting_synchro.get()); simix_global->mutex.lock(); - /* cancel non-blocking communications */ - while (not process->comms.empty()) { - smx_activity_t synchro = process->comms.front(); - process->comms.pop_front(); - simgrid::kernel::activity::CommImplPtr comm = - boost::static_pointer_cast(synchro); + simix_global->process_list.erase(pid_); + if (host_ && host_process_list_hook.is_linked()) + simgrid::xbt::intrusive_erase(host_->pimpl_->process_list_, *this); + if (not smx_destroy_list_hook.is_linked()) { +#if SIMGRID_HAVE_MC + xbt_dynar_push_as(simix_global->dead_actors_vector, smx_actor_t, this); +#endif + simix_global->actors_to_destroy.push_back(*this); + } + context_->iwannadie = false; - /* make sure no one will finish the comm after this process is destroyed, - * because src_proc or dst_proc would be an invalid pointer */ + simix_global->mutex.unlock(); +} - if (comm->src_proc == process) { - XBT_DEBUG("Found an unfinished send comm %p (detached = %d), state %d, src = %p, dst = %p", comm.get(), - comm->detached, (int)comm->state_, comm->src_proc, comm->dst_proc); - comm->src_proc = nullptr; +void ActorImpl::exit() +{ + context_->iwannadie = true; + blocked_ = false; + suspended_ = false; + exception_ = nullptr; - } else if (comm->dst_proc == process) { - XBT_DEBUG("Found an unfinished recv comm %p, state %d, src = %p, dst = %p", comm.get(), (int)comm->state_, - comm->src_proc, comm->dst_proc); - comm->dst_proc = nullptr; + // Forcefully kill the actor if its host is turned off. Not a HostFailureException because you should not survive that + if (not host_->is_on()) + this->throw_exception(std::make_exception_ptr(simgrid::kernel::context::StopRequest("host failed"))); - if (comm->detached && comm->src_proc != nullptr) { - /* the comm will be freed right now, remove it from the sender */ - comm->src_proc->comms.remove(comm); - } + /* destroy the blocking synchro if any */ + if (waiting_synchro != nullptr) { + + activity::ExecImplPtr exec = boost::dynamic_pointer_cast(waiting_synchro); + activity::CommImplPtr comm = boost::dynamic_pointer_cast(waiting_synchro); + activity::SleepImplPtr sleep = boost::dynamic_pointer_cast(waiting_synchro); + activity::RawImplPtr raw = boost::dynamic_pointer_cast(waiting_synchro); + activity::IoImplPtr io = boost::dynamic_pointer_cast(waiting_synchro); + + if (exec != nullptr && exec->surf_action_) { + exec->cancel(); + exec->surf_action_->unref(); + exec->surf_action_ = nullptr; + } else if (comm != nullptr) { + comms.remove(waiting_synchro); + comm->cancel(); + // Remove first occurrence of &actor->simcall: + auto i = boost::range::find(waiting_synchro->simcalls_, &simcall); + if (i != waiting_synchro->simcalls_.end()) + waiting_synchro->simcalls_.remove(&simcall); + } else if (sleep != nullptr) { + if (sleep->surf_action_) + sleep->surf_action_->cancel(); + sleep->post(); + } else if (raw != nullptr) { + SIMIX_synchro_stop_waiting(this, &simcall); + } else if (io != nullptr) { + io->cancel(); } else { - xbt_die("Communication synchro %p is in my list but I'm not the sender nor the receiver", synchro.get()); + simgrid::kernel::activity::ActivityImplPtr activity = waiting_synchro; + xbt_die("Activity %s is of unknown type %s", activity->get_cname(), + simgrid::xbt::demangle(typeid(activity).name()).get()); } - comm->cancel(); - } - XBT_DEBUG("%p should not be run anymore",process); - simix_global->process_list.erase(process->pid_); - if (process->host_ && process->host_process_list_hook.is_linked()) - simgrid::xbt::intrusive_erase(process->host_->pimpl_->process_list_, *process); - if (not process->smx_destroy_list_hook.is_linked()) { -#if SIMGRID_HAVE_MC - xbt_dynar_push_as(simix_global->dead_actors_vector, smx_actor_t, process); -#endif - simix_global->process_to_destroy.push_back(*process); + waiting_synchro = nullptr; } - process->context_->iwannadie = false; - - simix_global->mutex.unlock(); } -/** - * Garbage collection - * - * Should be called some time to time to free the memory allocated for processes that have finished (or killed). - */ -void SIMIX_process_empty_trash() +void ActorImpl::kill(ActorImpl* actor) { - while (not simix_global->process_to_destroy.empty()) { - smx_actor_t process = &simix_global->process_to_destroy.front(); - simix_global->process_to_destroy.pop_front(); - XBT_DEBUG("Getting rid of %p",process); - intrusive_ptr_release(process); + if (actor->finished_) { + XBT_DEBUG("Ignoring request to kill actor %s@%s that is already dead", actor->get_cname(), + actor->host_->get_cname()); + return; + } + + XBT_DEBUG("Actor '%s'@%s is killing actor '%s'@%s", get_cname(), host_->get_cname(), actor->get_cname(), + actor->host_->get_cname()); + + actor->exit(); + + if (std::find(begin(simix_global->actors_to_run), end(simix_global->actors_to_run), actor) == + end(simix_global->actors_to_run) && + actor != this) { + XBT_DEBUG("Inserting %s in the to_run list", actor->get_cname()); + simix_global->actors_to_run.push_back(actor); } -#if SIMGRID_HAVE_MC - xbt_dynar_reset(simix_global->dead_actors_vector); -#endif } -namespace simgrid { +void ActorImpl::kill_all() +{ + for (auto const& kv : simix_global->process_list) + if (kv.second != this) + this->kill(kv.second); +} -namespace kernel { -namespace actor { +void ActorImpl::set_kill_time(double kill_time) +{ + if (kill_time <= SIMIX_get_clock()) + return; + XBT_DEBUG("Set kill time %f for actor %s@%s", kill_time, get_cname(), host_->get_cname()); + kill_timer = simix::Timer::set(kill_time, [this] { + this->exit(); + kill_timer = nullptr; + }); +} -ActorImpl::~ActorImpl() +double ActorImpl::get_kill_time() { - delete this->context_; + return kill_timer ? kill_timer->get_date() : 0; } static void dying_daemon(int /*exit_status*/, void* data) @@ -156,7 +192,44 @@ static void dying_daemon(int /*exit_status*/, void* data) vect->pop_back(); } -/** This process will be terminated automatically when the last non-daemon process finishes */ +void ActorImpl::yield() +{ + XBT_DEBUG("Yield actor '%s'", get_cname()); + + /* Go into sleep and return control to maestro */ + context_->suspend(); + + /* Ok, maestro returned control to us */ + XBT_DEBUG("Control returned to me: '%s'", get_cname()); + + if (context_->iwannadie) { + + XBT_DEBUG("Actor %s@%s is dead", get_cname(), host_->get_cname()); + // throw simgrid::kernel::context::StopRequest(); Does not seem to properly kill the actor + context_->stop(); + THROW_IMPOSSIBLE; + } + + if (suspended_) { + XBT_DEBUG("Hey! I'm suspended."); + xbt_assert(exception_ != nullptr, "Gasp! This exception may be lost by subsequent calls."); + suspended_ = false; + suspend(this); + } + + if (exception_ != nullptr) { + XBT_DEBUG("Wait, maestro left me an exception"); + std::exception_ptr exception = std::move(exception_); + exception_ = nullptr; + std::rethrow_exception(std::move(exception)); + } + + if (SMPI_switch_data_segment && not finished_) { + SMPI_switch_data_segment(iface()); + } +} + +/** This actor will be terminated automatically when the last non-daemon actor finishes */ void ActorImpl::daemonize() { if (not daemon_) { @@ -166,26 +239,26 @@ void ActorImpl::daemonize() } } -simgrid::s4u::Actor* ActorImpl::restart() +s4u::Actor* ActorImpl::restart() { - XBT_DEBUG("Restarting process %s on %s", get_cname(), host_->get_cname()); + XBT_DEBUG("Restarting actor %s on %s", get_cname(), host_->get_cname()); - // retrieve the arguments of the old process - simgrid::kernel::actor::ProcessArg arg = ProcessArg(host_, this); + // retrieve the arguments of the old actor + ProcessArg arg = ProcessArg(host_, this); - // kill the old process - SIMIX_process_kill(this, (this == simix_global->maestro_process) ? this : SIMIX_process_self()); + // kill the old actor + (this == simix_global->maestro_process) ? this->exit() : SIMIX_process_self()->kill(this); - // start the new process - ActorImpl* actor = simix_global->create_process_function(arg.name.c_str(), std::move(arg.code), arg.data, arg.host, - arg.properties.get(), nullptr); - simcall_process_set_kill_time(actor, arg.kill_time); + // start the new actor + ActorImplPtr actor = + ActorImpl::create(arg.name, std::move(arg.code), arg.data, arg.host, arg.properties.get(), nullptr); + actor->set_kill_time(arg.kill_time); actor->set_auto_restart(arg.auto_restart); return actor->ciface(); } -smx_activity_t ActorImpl::suspend(ActorImpl* issuer) +activity::ActivityImplPtr ActorImpl::suspend(ActorImpl* issuer) { if (suspended_) { XBT_DEBUG("Actor '%s' is already suspended", get_cname()); @@ -202,13 +275,13 @@ smx_activity_t ActorImpl::suspend(ActorImpl* issuer) return nullptr; } else { - return SIMIX_execution_start("suspend", "", 0.0, 1.0, 0.0, this->host_); + return activity::ExecImplPtr(new activity::ExecImpl("suspend", "", nullptr, this->host_))->start(0.0, 1.0, 0.0); } } void ActorImpl::resume() { - XBT_IN("process = %p", this); + XBT_IN("actor = %p", this); if (context_->iwannadie) { XBT_VERB("Ignoring request to suspend an actor that is currently dying."); @@ -226,24 +299,34 @@ void ActorImpl::resume() XBT_OUT(); } -smx_activity_t ActorImpl::sleep(double duration) +activity::ActivityImplPtr ActorImpl::join(smx_actor_t actor, double timeout) { - if (host_->is_off()) - throw_exception(std::make_exception_ptr(simgrid::HostFailureException( - XBT_THROW_POINT, std::string("Host ") + std::string(host_->get_cname()) + " failed, you cannot sleep there."))); + activity::ActivityImplPtr res = this->sleep(timeout); + intrusive_ptr_add_ref(res.get()); + SIMIX_process_on_exit(actor, + [](int, void* arg) { + auto sleep = static_cast(arg); + if (sleep->surf_action_) + sleep->surf_action_->finish(simgrid::kernel::resource::Action::State::FINISHED); + intrusive_ptr_release(sleep); + }, + res.get()); + return res; +} - simgrid::kernel::activity::SleepImpl* synchro = new simgrid::kernel::activity::SleepImpl(); - synchro->host = host_; - synchro->surf_sleep = host_->pimpl_cpu->sleep(duration); - synchro->surf_sleep->set_data(synchro); - XBT_DEBUG("Create sleep synchronization %p", synchro); +activity::ActivityImplPtr ActorImpl::sleep(double duration) +{ + if (not host_->is_on()) + throw_exception(std::make_exception_ptr(simgrid::HostFailureException( + XBT_THROW_POINT, std::string("Host ") + host_->get_cname() + " failed, you cannot sleep there."))); - return synchro; + return simgrid::kernel::activity::SleepImplPtr(new simgrid::kernel::activity::SleepImpl("sleep", host_)) + ->start(duration); } void ActorImpl::throw_exception(std::exception_ptr e) { - exception = e; + exception_ = e; if (suspended_) resume(); @@ -251,136 +334,110 @@ void ActorImpl::throw_exception(std::exception_ptr e) /* cancel the blocking synchro if any */ if (waiting_synchro) { - simgrid::kernel::activity::ExecImplPtr exec = - boost::dynamic_pointer_cast(waiting_synchro); - if (exec != nullptr && exec->surf_action_) - exec->surf_action_->cancel(); + activity::ExecImplPtr exec = boost::dynamic_pointer_cast(waiting_synchro); + if (exec != nullptr) + exec->cancel(); - simgrid::kernel::activity::CommImplPtr comm = - boost::dynamic_pointer_cast(waiting_synchro); + activity::CommImplPtr comm = boost::dynamic_pointer_cast(waiting_synchro); if (comm != nullptr) { comms.remove(comm); comm->cancel(); } - simgrid::kernel::activity::SleepImplPtr sleep = - boost::dynamic_pointer_cast(waiting_synchro); + activity::SleepImplPtr sleep = boost::dynamic_pointer_cast(waiting_synchro); if (sleep != nullptr) { SIMIX_process_sleep_destroy(waiting_synchro); - if (std::find(begin(simix_global->process_to_run), end(simix_global->process_to_run), this) == - end(simix_global->process_to_run) && + if (std::find(begin(simix_global->actors_to_run), end(simix_global->actors_to_run), this) == + end(simix_global->actors_to_run) && this != SIMIX_process_self()) { - XBT_DEBUG("Inserting %s in the to_run list", get_cname()); - simix_global->process_to_run.push_back(this); + XBT_DEBUG("Inserting [%p] %s in the to_run list", this, get_cname()); + simix_global->actors_to_run.push_back(this); } } - simgrid::kernel::activity::RawImplPtr raw = - boost::dynamic_pointer_cast(waiting_synchro); + activity::RawImplPtr raw = boost::dynamic_pointer_cast(waiting_synchro); if (raw != nullptr) { SIMIX_synchro_stop_waiting(this, &simcall); } - simgrid::kernel::activity::IoImplPtr io = - boost::dynamic_pointer_cast(waiting_synchro); + activity::IoImplPtr io = boost::dynamic_pointer_cast(waiting_synchro); if (io != nullptr) { - delete io.get(); + io->cancel(); } } waiting_synchro = nullptr; } -void create_maestro(simgrid::simix::ActorCode code) -{ - smx_actor_t maestro = nullptr; - /* Create maestro process and initialize it */ - maestro = new simgrid::kernel::actor::ActorImpl(); - maestro->pid_ = simix_process_maxpid++; - maestro->name_ = ""; - maestro->set_user_data(nullptr); - - if (not code) { - maestro->context_ = SIMIX_context_new(simgrid::simix::ActorCode(), nullptr, maestro); - } else { - if (not simix_global) - xbt_die("simix is not initialized, please call MSG_init first"); - maestro->context_ = simix_global->context_factory->create_maestro(code, maestro); - } - - maestro->simcall.issuer = maestro; - simix_global->maestro_process = maestro; -} - -} // namespace actor -} -} - -/** @brief Creates and runs the maestro process */ -void SIMIX_maestro_create(void (*code)(void*), void* data) +void ActorImpl::set_host(s4u::Host* dest) { - simgrid::kernel::actor::create_maestro(std::bind(code, data)); + simgrid::xbt::intrusive_erase(host_->pimpl_->process_list_, *this); + host_ = dest; + dest->pimpl_->process_list_.push_back(*this); } -/** - * @brief Internal function to create a process. - * - * This function actually creates the process. - * It may be called when a SIMCALL_PROCESS_CREATE simcall occurs, - * or directly for SIMIX internal purposes. The sure thing is that it's called from maestro context. - * - * @return the process created - */ -smx_actor_t SIMIX_process_create(std::string name, simgrid::simix::ActorCode code, void* data, simgrid::s4u::Host* host, - std::unordered_map* properties, smx_actor_t parent_process) +ActorImplPtr ActorImpl::create(std::string name, simix::ActorCode code, void* data, s4u::Host* host, + std::unordered_map* properties, ActorImpl* parent_actor) { - XBT_DEBUG("Start process %s on host '%s'", name.c_str(), host->get_cname()); + XBT_DEBUG("Start actor %s@'%s'", name.c_str(), host->get_cname()); - if (host->is_off()) { - XBT_WARN("Cannot launch process '%s' on failed host '%s'", name.c_str(), host->get_cname()); + if (not host->is_on()) { + XBT_WARN("Cannot launch actor '%s' on failed host '%s'", name.c_str(), host->get_cname()); return nullptr; } - smx_actor_t process = new simgrid::kernel::actor::ActorImpl(); + ActorImpl* actor = new ActorImpl(simgrid::xbt::string(name), host); xbt_assert(code && host != nullptr, "Invalid parameters"); - /* Process data */ - process->pid_ = simix_process_maxpid++; - process->name_ = simgrid::xbt::string(name); - process->host_ = host; - process->set_user_data(data); - process->simcall.issuer = process; - - if (parent_process != nullptr) { - process->ppid_ = parent_process->pid_; - } + /* actor data */ + actor->set_user_data(data); + actor->code = code; - process->code = code; + if (parent_actor != nullptr) + actor->set_ppid(parent_actor->get_pid()); - XBT_VERB("Create context %s", process->get_cname()); - process->context_ = SIMIX_context_new(std::move(code), simix_global->cleanup_process_function, process); + XBT_VERB("Create context %s", actor->get_cname()); + actor->context_ = simix_global->context_factory->create_context(std::move(code), actor); /* Add properties */ if (properties != nullptr) for (auto const& kv : *properties) - process->set_property(kv.first, kv.second); + actor->set_property(kv.first, kv.second); - /* Add the process to its host's process list */ - host->pimpl_->process_list_.push_back(*process); + /* Add the actor to its host's actor list */ + host->pimpl_->process_list_.push_back(*actor); - XBT_DEBUG("Start context '%s'", process->get_cname()); + XBT_DEBUG("Start context '%s'", actor->get_cname()); - /* Now insert it in the global process list and in the process to run list */ - simix_global->process_list[process->pid_] = process; - XBT_DEBUG("Inserting %s(%s) in the to_run list", process->get_cname(), host->get_cname()); - simix_global->process_to_run.push_back(process); - intrusive_ptr_add_ref(process); + /* Now insert it in the global actor list and in the actor to run list */ + simix_global->process_list[actor->get_pid()] = actor; + XBT_DEBUG("Inserting [%p] %s(%s) in the to_run list", actor, actor->get_cname(), host->get_cname()); + simix_global->actors_to_run.push_back(actor); + intrusive_ptr_add_ref(actor); - /* The onCreation() signal must be delayed until there, where the pid and everything is set */ - simgrid::s4u::ActorPtr tmp = process->iface(); // Passing this directly to onCreation will lead to crashes - simgrid::s4u::Actor::on_creation(tmp); + /* The on_creation() signal must be delayed until there, where the pid and everything is set */ + s4u::Actor::on_creation(actor->iface()); + + return ActorImplPtr(actor); +} + +void create_maestro(simix::ActorCode code) +{ + /* Create maestro actor and initialize it */ + ActorImpl* maestro = new ActorImpl(xbt::string(""), /*host*/ nullptr); + + if (not code) { + maestro->context_ = simix_global->context_factory->create_context(simix::ActorCode(), maestro); + } else { + maestro->context_ = simix_global->context_factory->create_maestro(code, maestro); + } - return process; + maestro->simcall.issuer = maestro; + simix_global->maestro_process = maestro; +} + +} // namespace actor +} // namespace kernel } smx_actor_t SIMIX_process_attach(const char* name, void* data, const char* hostname, @@ -392,243 +449,120 @@ smx_actor_t SIMIX_process_attach(const char* name, void* data, const char* hostn sg_host_t host = sg_host_by_name(hostname); XBT_DEBUG("Attach process %s on host '%s'", name, hostname); - if (host->is_off()) { + if (not host->is_on()) { XBT_WARN("Cannot launch process '%s' on failed host '%s'", name, hostname); return nullptr; } - smx_actor_t process = new simgrid::kernel::actor::ActorImpl(); - /* Process data */ - process->pid_ = simix_process_maxpid++; - process->name_ = std::string(name); - process->host_ = host; - process->set_user_data(data); - process->simcall.issuer = process; - - if (parent_process != nullptr) { - process->ppid_ = parent_process->pid_; - } + smx_actor_t actor = new simgrid::kernel::actor::ActorImpl(simgrid::xbt::string(name), host); + /* Actor data */ + actor->set_user_data(data); + actor->code = nullptr; - /* Process data for auto-restart */ - process->code = nullptr; + if (parent_process != nullptr) + actor->set_ppid(parent_process->get_pid()); - XBT_VERB("Create context %s", process->get_cname()); - if (not simix_global) - xbt_die("simix is not initialized, please call MSG_init first"); - process->context_ = simix_global->context_factory->attach(simix_global->cleanup_process_function, process); + XBT_VERB("Create context %s", actor->get_cname()); + xbt_assert(simix_global != nullptr, "simix is not initialized, please call MSG_init first"); + actor->context_ = simix_global->context_factory->attach(actor); /* Add properties */ if (properties != nullptr) for (auto const& kv : *properties) - process->set_property(kv.first, kv.second); + actor->set_property(kv.first, kv.second); /* Add the process to it's host process list */ - host->pimpl_->process_list_.push_back(*process); + host->pimpl_->process_list_.push_back(*actor); /* Now insert it in the global process list and in the process to run list */ - simix_global->process_list[process->pid_] = process; - XBT_DEBUG("Inserting %s(%s) in the to_run list", process->get_cname(), host->get_cname()); - simix_global->process_to_run.push_back(process); - intrusive_ptr_add_ref(process); - - auto* context = dynamic_cast(process->context_); - if (not context) - xbt_die("Not a suitable context"); + simix_global->process_list[actor->get_pid()] = actor; + XBT_DEBUG("Inserting [%p] %s(%s) in the to_run list", actor, actor->get_cname(), host->get_cname()); + simix_global->actors_to_run.push_back(actor); + intrusive_ptr_add_ref(actor); + auto* context = dynamic_cast(actor->context_); + xbt_assert(nullptr != context, "Not a suitable context"); context->attach_start(); - /* The onCreation() signal must be delayed until there, where the pid and everything is set */ - simgrid::s4u::ActorPtr tmp = process->iface(); // Passing this directly to onCreation will lead to crashes + /* The on_creation() signal must be delayed until there, where the pid and everything is set */ + simgrid::s4u::ActorPtr tmp = actor->iface(); // Passing this directly to on_creation will lead to crashes simgrid::s4u::Actor::on_creation(tmp); - return process; + return actor; } void SIMIX_process_detach() { - auto* context = dynamic_cast(SIMIX_context_self()); - if (not context) + auto* context = dynamic_cast(simgrid::kernel::context::Context::self()); + if (context == nullptr) xbt_die("Not a suitable context"); - auto process = context->process(); - simix_global->cleanup_process_function(process); + context->get_actor()->cleanup(); context->attach_stop(); } -/** - * @brief Executes the processes from simix_global->process_to_run. - * - * The processes of simix_global->process_to_run are run (in parallel if - * possible). On exit, simix_global->process_to_run is empty, and - * simix_global->process_that_ran contains the list of processes that just ran. - * The two lists are swapped so, be careful when using them before and after a - * call to this function. - */ -void SIMIX_process_runall() -{ - SIMIX_context_runall(); - - simix_global->process_to_run.swap(simix_global->process_that_ran); - simix_global->process_to_run.clear(); -} - -/** - * @brief Internal function to kill a SIMIX process. - * - * This function may be called when a SIMCALL_PROCESS_KILL simcall occurs, - * or directly for SIMIX internal purposes. - * - * @param process poor victim - * @param issuer the process which has sent the PROCESS_KILL. Important to not schedule twice the same process. - */ -void SIMIX_process_kill(smx_actor_t process, smx_actor_t issuer) { - - if (process->finished_) { - XBT_DEBUG("Ignoring request to kill process %s@%s that is already dead", process->get_cname(), - process->host_->get_cname()); - return; - } - - XBT_DEBUG("Actor '%s'@%s is killing actor '%s'@%s", issuer->get_cname(), - (issuer->host_ == nullptr ? "(null)" : issuer->host_->get_cname()), process->get_cname(), - process->host_->get_cname()); - - process->context_->iwannadie = true; - process->blocked_ = false; - process->suspended_ = false; - process->exception = nullptr; - - /* destroy the blocking synchro if any */ - if (process->waiting_synchro != nullptr) { - if (process->host_->is_off()) - process->throw_exception(std::make_exception_ptr(simgrid::HostFailureException(XBT_THROW_POINT, "Host failed"))); - simgrid::kernel::activity::ExecImplPtr exec = - boost::dynamic_pointer_cast(process->waiting_synchro); - simgrid::kernel::activity::CommImplPtr comm = - boost::dynamic_pointer_cast(process->waiting_synchro); - simgrid::kernel::activity::SleepImplPtr sleep = - boost::dynamic_pointer_cast(process->waiting_synchro); - simgrid::kernel::activity::RawImplPtr raw = - boost::dynamic_pointer_cast(process->waiting_synchro); - simgrid::kernel::activity::IoImplPtr io = - boost::dynamic_pointer_cast(process->waiting_synchro); - - if (exec != nullptr) { - if (exec->surf_action_) { - exec->surf_action_->cancel(); - exec->surf_action_->unref(); - exec->surf_action_ = nullptr; - } - } else if (comm != nullptr) { - process->comms.remove(process->waiting_synchro); - comm->cancel(); - // Remove first occurrence of &process->simcall: - auto i = boost::range::find(process->waiting_synchro->simcalls_, &process->simcall); - if (i != process->waiting_synchro->simcalls_.end()) - process->waiting_synchro->simcalls_.remove(&process->simcall); - } else if (sleep != nullptr) { - if (sleep->surf_sleep) - sleep->surf_sleep->cancel(); - sleep->post(); - } else if (raw != nullptr) { - SIMIX_synchro_stop_waiting(process, &process->simcall); - - } else if (io != nullptr) { - delete io.get(); - } else { - xbt_die("Unknown type of activity"); - } - - process->waiting_synchro = nullptr; - } - if (std::find(begin(simix_global->process_to_run), end(simix_global->process_to_run), process) == - end(simix_global->process_to_run) && - process != issuer) { - XBT_DEBUG("Inserting %s in the to_run list", process->get_cname()); - simix_global->process_to_run.push_back(process); - } -} /** @deprecated When this function gets removed, also remove the xbt_ex class, that is only there to help users to * transition */ -void SIMIX_process_throw(smx_actor_t process, xbt_errcat_t cat, int value, const char *msg) { - SMX_EXCEPTION(process, cat, value, msg); +void SIMIX_process_throw(smx_actor_t actor, xbt_errcat_t cat, int value, const char* msg) +{ + SMX_EXCEPTION(actor, cat, value, msg); - if (process->suspended_) - process->resume(); + if (actor->is_suspended()) + actor->resume(); /* cancel the blocking synchro if any */ - if (process->waiting_synchro) { + if (actor->waiting_synchro) { simgrid::kernel::activity::ExecImplPtr exec = - boost::dynamic_pointer_cast(process->waiting_synchro); - if (exec != nullptr && exec->surf_action_) - exec->surf_action_->cancel(); + boost::dynamic_pointer_cast(actor->waiting_synchro); + if (exec != nullptr) + exec->cancel(); simgrid::kernel::activity::CommImplPtr comm = - boost::dynamic_pointer_cast(process->waiting_synchro); + boost::dynamic_pointer_cast(actor->waiting_synchro); if (comm != nullptr) { - process->comms.remove(comm); + actor->comms.remove(comm); comm->cancel(); } simgrid::kernel::activity::SleepImplPtr sleep = - boost::dynamic_pointer_cast(process->waiting_synchro); + boost::dynamic_pointer_cast(actor->waiting_synchro); if (sleep != nullptr) { - SIMIX_process_sleep_destroy(process->waiting_synchro); - if (std::find(begin(simix_global->process_to_run), end(simix_global->process_to_run), process) == - end(simix_global->process_to_run) && - process != SIMIX_process_self()) { - XBT_DEBUG("Inserting %s in the to_run list", process->get_cname()); - simix_global->process_to_run.push_back(process); + SIMIX_process_sleep_destroy(actor->waiting_synchro); + if (std::find(begin(simix_global->actors_to_run), end(simix_global->actors_to_run), actor) == + end(simix_global->actors_to_run) && + actor != SIMIX_process_self()) { + XBT_DEBUG("Inserting [%p] %s in the to_run list", actor, actor->get_cname()); + simix_global->actors_to_run.push_back(actor); } } simgrid::kernel::activity::RawImplPtr raw = - boost::dynamic_pointer_cast(process->waiting_synchro); + boost::dynamic_pointer_cast(actor->waiting_synchro); if (raw != nullptr) { - SIMIX_synchro_stop_waiting(process, &process->simcall); + SIMIX_synchro_stop_waiting(actor, &actor->simcall); } simgrid::kernel::activity::IoImplPtr io = - boost::dynamic_pointer_cast(process->waiting_synchro); + boost::dynamic_pointer_cast(actor->waiting_synchro); if (io != nullptr) { - delete io.get(); + io->cancel(); } } - process->waiting_synchro = nullptr; - -} - -/** - * @brief Kills all running processes. - * @param issuer this one will not be killed - */ -void SIMIX_process_killall(smx_actor_t issuer) -{ - for (auto const& kv : simix_global->process_list) - if (kv.second != issuer) - SIMIX_process_kill(kv.second, issuer); -} - -void SIMIX_process_change_host(smx_actor_t actor, sg_host_t dest) -{ - xbt_assert((actor != nullptr), "Invalid parameters"); - simgrid::xbt::intrusive_erase(actor->host_->pimpl_->process_list_, *actor); - actor->host_ = dest; - dest->pimpl_->process_list_.push_back(*actor); + actor->waiting_synchro = nullptr; } -void simcall_HANDLER_process_suspend(smx_simcall_t simcall, smx_actor_t process) +void simcall_HANDLER_process_suspend(smx_simcall_t simcall, smx_actor_t actor) { - smx_activity_t sync_suspend = process->suspend(simcall->issuer); + smx_activity_t sync_suspend = actor->suspend(simcall->issuer); - if (process != simcall->issuer) { + if (actor != simcall->issuer) { SIMIX_simcall_answer(simcall); } else { sync_suspend->simcalls_.push_back(simcall); - process->waiting_synchro = sync_suspend; - process->waiting_synchro->suspend(); + actor->waiting_synchro = sync_suspend; + actor->waiting_synchro->suspend(); } /* If we are suspending ourselves, then just do not finish the simcall now */ } @@ -646,7 +580,7 @@ void* SIMIX_process_self_get_data() { smx_actor_t self = SIMIX_process_self(); - if (not self) { + if (self == nullptr) { return nullptr; } return self->get_user_data(); @@ -677,26 +611,11 @@ void simcall_HANDLER_process_join(smx_simcall_t simcall, smx_actor_t process, do SIMIX_simcall_answer(simcall); return; } - smx_activity_t sync = SIMIX_process_join(simcall->issuer, process, timeout); + smx_activity_t sync = simcall->issuer->join(process, timeout); sync->simcalls_.push_back(simcall); simcall->issuer->waiting_synchro = sync; } -smx_activity_t SIMIX_process_join(smx_actor_t issuer, smx_actor_t process, double timeout) -{ - smx_activity_t res = issuer->sleep(timeout); - intrusive_ptr_add_ref(res.get()); - SIMIX_process_on_exit(process, - [](int, void* arg) { - auto sleep = static_cast(arg); - if (sleep->surf_sleep) - sleep->surf_sleep->finish(simgrid::kernel::resource::Action::State::FINISHED); - intrusive_ptr_release(sleep); - }, - res.get()); - return res; -} - void simcall_HANDLER_process_sleep(smx_simcall_t simcall, double duration) { if (MC_is_active() || MC_record_replay_is_active()) { @@ -714,11 +633,11 @@ void SIMIX_process_sleep_destroy(smx_activity_t synchro) { XBT_DEBUG("Destroy sleep synchro %p", synchro.get()); simgrid::kernel::activity::SleepImplPtr sleep = - boost::dynamic_pointer_cast(synchro); + boost::static_pointer_cast(synchro); - if (sleep->surf_sleep) { - sleep->surf_sleep->unref(); - sleep->surf_sleep = nullptr; + if (sleep->surf_action_) { + sleep->surf_action_->unref(); + sleep->surf_action_ = nullptr; } } @@ -729,85 +648,32 @@ void SIMIX_process_sleep_destroy(smx_activity_t synchro) * * @param self the current process */ -void SIMIX_process_yield(smx_actor_t self) -{ - XBT_DEBUG("Yield actor '%s'", self->get_cname()); - - /* Go into sleep and return control to maestro */ - self->context_->suspend(); - - /* Ok, maestro returned control to us */ - XBT_DEBUG("Control returned to me: '%s'", self->get_cname()); - - if (self->context_->iwannadie) { - XBT_DEBUG("I wanna die!"); - self->finished_ = true; - /* execute the on_exit functions */ - SIMIX_process_on_exit_runall(self); - - if (self->auto_restart_ && self->host_->is_off() && - watched_hosts.find(self->host_->get_cname()) == watched_hosts.end()) { - XBT_DEBUG("Push host %s to watched_hosts because it's off and %s needs to restart", self->host_->get_cname(), - self->get_cname()); - watched_hosts.insert(self->host_->get_cname()); - } - - XBT_DEBUG("Process %s@%s is dead", self->get_cname(), self->host_->get_cname()); - self->context_->stop(); - } - - if (self->suspended_) { - XBT_DEBUG("Hey! I'm suspended."); - xbt_assert(self->exception != nullptr, "Gasp! This exception may be lost by subsequent calls."); - self->suspended_ = false; - self->suspend(self); - } - - if (self->exception != nullptr) { - XBT_DEBUG("Wait, maestro left me an exception"); - std::exception_ptr exception = std::move(self->exception); - self->exception = nullptr; - std::rethrow_exception(std::move(exception)); - } - - if (SMPI_switch_data_segment && not self->finished_) { - SMPI_switch_data_segment(self->iface()); - } -} -/** @brief Returns the list of processes to run. */ +/** @brief Returns the list of processes to run. + * @deprecated + */ const std::vector& simgrid::simix::process_get_runnable() { - return simix_global->process_to_run; + return simix_global->actors_to_run; } /** @brief Returns the process from PID. */ smx_actor_t SIMIX_process_from_PID(aid_t PID) { - auto process = simix_global->process_list.find(PID); - return process == simix_global->process_list.end() ? nullptr : process->second; -} - -void SIMIX_process_on_exit_runall(smx_actor_t process) { - simgrid::s4u::Actor::on_destruction(process->iface()); - smx_process_exit_status_t exit_status = (process->context_->iwannadie) ? SMX_EXIT_FAILURE : SMX_EXIT_SUCCESS; - while (not process->on_exit.empty()) { - s_smx_process_exit_fun_t exit_fun = process->on_exit.back(); - process->on_exit.pop_back(); - (exit_fun.fun)(exit_status, exit_fun.arg); - } + auto actor = simix_global->process_list.find(PID); + return actor == simix_global->process_list.end() ? nullptr : actor->second; } -void SIMIX_process_on_exit(smx_actor_t process, int_f_pvoid_pvoid_t fun, void* data) +void SIMIX_process_on_exit(smx_actor_t actor, int_f_pvoid_pvoid_t fun, void* data) { - SIMIX_process_on_exit(process, [fun](int a, void* b) { fun((void*)(intptr_t)a, b); }, data); + SIMIX_process_on_exit(actor, [fun](int a, void* b) { fun((void*)(intptr_t)a, b); }, data); } -void SIMIX_process_on_exit(smx_actor_t process, std::function fun, void* data) +void SIMIX_process_on_exit(smx_actor_t actor, std::function fun, void* data) { - xbt_assert(process, "current process not found: are you in maestro context ?"); + xbt_assert(actor, "current process not found: are you in maestro context ?"); - process->on_exit.emplace_back(s_smx_process_exit_fun_t{fun, data}); + actor->on_exit.emplace_back(s_smx_process_exit_fun_t{fun, data}); } /** @brief Restart a process, starting it again from the beginning. */ @@ -823,26 +689,19 @@ void SIMIX_process_on_exit(smx_actor_t process, std::function * be nullptr. * It can be retrieved with the method ActorImpl::getUserData(). * @param host where the new agent is executed. - * @param argc first argument passed to @a code - * @param argv second argument passed to @a code * @param properties the properties of the process */ -smx_actor_t simcall_process_create(std::string name, xbt_main_func_t code, void* data, sg_host_t host, int argc, - char** argv, std::unordered_map* properties) -{ - auto wrapped_code = simgrid::xbt::wrap_main(code, argc, argv); - for (int i = 0; i != argc; ++i) - xbt_free(argv[i]); - xbt_free(argv); - smx_actor_t res = simcall_process_create(name, std::move(wrapped_code), data, host, properties); - return res; -} - smx_actor_t simcall_process_create(std::string name, simgrid::simix::ActorCode code, void* data, sg_host_t host, std::unordered_map* properties) { smx_actor_t self = SIMIX_process_self(); return simgrid::simix::simcall([name, code, data, host, properties, self] { - return SIMIX_process_create(name, std::move(code), data, host, properties, self); + return simgrid::kernel::actor::ActorImpl::create(std::move(name), std::move(code), data, host, properties, self) + .get(); }); } + +void simcall_process_set_data(smx_actor_t process, void* data) +{ + simgrid::simix::simcall([process, data] { process->set_user_data(data); }); +}