X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/119aa62dc665f930d8789df44c4a12da471837ed..5c9583c94b9cef3f02ffec69b6cc245b1739f97e:/src/smpi/internals/smpi_actor.cpp diff --git a/src/smpi/internals/smpi_actor.cpp b/src/smpi/internals/smpi_actor.cpp index 3b91956a86..0b8ff88a22 100644 --- a/src/smpi/internals/smpi_actor.cpp +++ b/src/smpi/internals/smpi_actor.cpp @@ -19,8 +19,7 @@ XBT_LOG_NEW_DEFAULT_SUBCATEGORY(smpi_process, smpi, "Logging specific to SMPI (k namespace simgrid { namespace smpi { -ActorExt::ActorExt(s4u::ActorPtr actor, s4u::Barrier* finalization_barrier) - : finalization_barrier_(finalization_barrier), actor_(actor) +ActorExt::ActorExt(s4u::ActorPtr actor) : actor_(actor) { mailbox_ = s4u::Mailbox::by_name("SMPI-" + std::to_string(actor_->get_pid())); mailbox_small_ = s4u::Mailbox::by_name("small-" + std::to_string(actor_->get_pid())); @@ -58,19 +57,6 @@ ActorExt::~ActorExt() xbt_os_timer_free(timer_); } -void ActorExt::set_data(const std::string& instance_id) -{ - instance_id_ = instance_id; - comm_world_ = smpi_deployment_comm_world(instance_id_); - simgrid::s4u::Barrier* barrier = smpi_deployment_finalization_barrier(instance_id_); - if (barrier != nullptr) // don't overwrite the current one if the instance has none - finalization_barrier_ = barrier; - - // set the process attached to the mailbox - mailbox_small_->set_receiver(actor_); - XBT_DEBUG("<%ld> SMPI process has been initialized: %p", actor_->get_pid(), actor_.get()); -} - /** @brief Prepares the current process for termination. */ void ActorExt::finalize() { @@ -227,7 +213,7 @@ void ActorExt::init() simgrid::s4u::ActorPtr self = simgrid::s4u::Actor::self(); // cheinrich: I'm not sure what the impact of the SMPI_switch_data_segment on this call is. I moved // this up here so that I can set the privatized region before the switch. - ActorExt* ext = smpi_process_remote(self); + ActorExt* ext = smpi_process(); // if we are in MPI_Init and argc handling has already been done. if (ext->initialized()) return; @@ -245,7 +231,15 @@ void ActorExt::init() ext->state_ = SmpiProcessState::INITIALIZING; smpi_deployment_register_process(instance_id, rank, self); - ext->set_data(instance_id); + ext->instance_id_ = instance_id; + ext->comm_world_ = smpi_deployment_comm_world(instance_id); + simgrid::s4u::Barrier* barrier = smpi_deployment_finalization_barrier(instance_id); + if (barrier != nullptr) // don't overwrite the current one if the instance has none + ext->finalization_barrier_ = barrier; + + // set the process attached to the mailbox + ext->mailbox_small_->set_receiver(ext->actor_); + XBT_DEBUG("<%ld> SMPI process has been initialized: %p", ext->actor_->get_pid(), ext->actor_.get()); } int ActorExt::get_optind()