src/smpi/include/smpi_actor.hpp

   1 /* Copyright (c) 2009-2019. The SimGrid Team. All rights reserved.          */
   2
   3 /* This program is free software; you can redistribute it and/or modify it
   4  * under the terms of the license (GNU LGPL) which comes with this package. */
   5
   6 #ifndef SMPI_ACTOR_HPP
   7 #define SMPI_ACTOR_HPP
   8
   9 #include "private.hpp"
  10 #include "simgrid/s4u/Mailbox.hpp"
  11 #include "src/instr/instr_smpi.hpp"
  12 #include "xbt/synchro.h"
  13
  14 namespace simgrid {
  15 namespace smpi {
  16
  17 class ActorExt {
  18 private:
  19   double simulated_ = 0 /* Used to time with simulated_start/elapsed */;
  20   s4u::MailboxPtr mailbox_;
  21   s4u::MailboxPtr mailbox_small_;
  22   s4u::MutexPtr mailboxes_mutex_;
  23   xbt_os_timer_t timer_;
  24   MPI_Comm comm_self_   = MPI_COMM_NULL;
  25   MPI_Comm comm_intra_  = MPI_COMM_NULL;
  26   MPI_Comm* comm_world_ = nullptr;
  27   SmpiProcessState state_;
  28   int sampling_ = 0; /* inside an SMPI_SAMPLE_ block? */
  29   std::string instance_id_;
  30   bool replaying_ = false; /* is the process replaying a trace */
  31   s4u::Barrier* finalization_barrier_;
  32   smpi_trace_call_location_t trace_call_loc_;
  33   s4u::ActorPtr actor_                           = nullptr;
  34   smpi_privatization_region_t privatized_region_ = nullptr;
  35   int optind                                     = 0; /*for getopt replacement */
  36 #if HAVE_PAPI
  37   /** Contains hardware data as read by PAPI **/
  38   int papi_event_set_;
  39   papi_counter_t papi_counter_data_;
  40 #endif
  41 public:
  42   explicit ActorExt(simgrid::s4u::ActorPtr actor, simgrid::s4u::Barrier* barrier);
  43   ActorExt(const ActorExt&) = delete;
  44   ActorExt& operator=(const ActorExt&) = delete;
  45   ~ActorExt();
  46   void set_data(const char* instance_id);
  47   void finalize();
  48   int finalized();
  49   int initializing();
  50   int initialized();
  51   void mark_as_initialized();
  52   void set_replaying(bool value);
  53   bool replaying();
  54   smpi_trace_call_location_t* call_location();
  55   void set_privatized_region(smpi_privatization_region_t region);
  56   smpi_privatization_region_t privatized_region();
  57   s4u::MailboxPtr mailbox() { return mailbox_; }
  58   s4u::MailboxPtr mailbox_small() { return mailbox_small_; }
  59   s4u::MutexPtr mailboxes_mutex();
  60 #if HAVE_PAPI
  61   int papi_event_set();
  62   papi_counter_t& papi_counters();
  63 #endif
  64   xbt_os_timer_t timer();
  65   void simulated_start();
  66   double simulated_elapsed();
  67   MPI_Comm comm_world();
  68   MPI_Comm comm_self();
  69   MPI_Comm comm_intra();
  70   void set_comm_intra(MPI_Comm comm);
  71   void set_sampling(int s);
  72   int sampling();
  73   static void init();
  74   simgrid::s4u::ActorPtr get_actor();
  75   int get_optind();
  76   void set_optind(int optind);
  77 };
  78
  79 } // namespace smpi
  80 } // namespace simgrid
  81
  82 #endif