1 /* Copyright (c) 2009-2022. The SimGrid Team. All rights reserved. */
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. */
10 #include "simgrid/s4u/Mailbox.hpp"
11 #include "src/instr/instr_smpi.hpp"
17 double simulated_ = 0 /* Used to time with simulated_start/elapsed */;
18 s4u::Mailbox* mailbox_;
19 s4u::Mailbox* mailbox_small_;
20 s4u::MutexPtr mailboxes_mutex_;
21 xbt_os_timer_t timer_;
22 MPI_Comm comm_self_ = MPI_COMM_NULL;
23 MPI_Comm comm_intra_ = MPI_COMM_NULL;
24 MPI_Comm* comm_world_ = nullptr;
25 SmpiProcessState state_;
26 int sampling_ = 0; /* inside an SMPI_SAMPLE_ block? */
27 std::string instance_id_;
28 bool replaying_ = false; /* is the process replaying a trace */
29 smpi_trace_call_location_t trace_call_loc_;
30 s4u::Actor* actor_ = nullptr;
31 smpi_privatization_region_t privatized_region_ = nullptr;
33 int optind_ = 0; /*for getopt replacement */
35 int optind_ = 1; /*for getopt replacement */
37 std::string tracing_category_ = "";
39 void* bsend_buffer_ = nullptr;
40 int bsend_buffer_size_ = 0;
43 /** Contains hardware data as read by PAPI **/
45 papi_counter_t papi_counter_data_;
49 static simgrid::xbt::Extension<simgrid::s4u::Actor, ActorExt> EXTENSION_ID;
51 explicit ActorExt(s4u::Actor* actor);
52 ActorExt(const ActorExt&) = delete;
53 ActorExt& operator=(const ActorExt&) = delete;
56 int finalized() const;
57 int initializing() const;
58 int initialized() const;
59 int finalizing() const;
60 void mark_as_initialized();
61 void mark_as_finalizing();
62 void set_replaying(bool value);
63 bool replaying() const;
64 std::string get_instance_id() const { return instance_id_;}
65 void set_tracing_category(const std::string& category) { tracing_category_ = category; }
66 const std::string& get_tracing_category() const { return tracing_category_; }
67 smpi_trace_call_location_t* call_location();
68 void set_privatized_region(smpi_privatization_region_t region);
69 smpi_privatization_region_t privatized_region() const;
70 s4u::Mailbox* mailbox() const { return mailbox_; }
71 s4u::Mailbox* mailbox_small() const { return mailbox_small_; }
72 s4u::MutexPtr mailboxes_mutex() const;
74 int papi_event_set() const;
75 papi_counter_t& papi_counters();
77 xbt_os_timer_t timer();
78 void simulated_start();
79 double simulated_elapsed() const;
80 MPI_Comm comm_world() const;
81 bool comm_self_is_set() const { return (comm_self_ != MPI_COMM_NULL); };
83 MPI_Comm comm_intra();
84 void set_comm_intra(MPI_Comm comm);
85 void set_sampling(int s);
88 s4u::ActorPtr get_actor();
89 int get_optind() const;
90 void set_optind(int optind);
92 void bsend_buffer(void** buf, int* size);
93 int set_bsend_buffer(void* buf, int size);
97 } // namespace simgrid