X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/d656f9465e7b1c36319f86eeafdcec58fe9551a4..957eb3ca7ecd4f50e34490e609454de539ef290a:/src/smpi/include/private.hpp diff --git a/src/smpi/include/private.hpp b/src/smpi/include/private.hpp index 4f0ca5705b..5115f85456 100644 --- a/src/smpi/include/private.hpp +++ b/src/smpi/include/private.hpp @@ -1,4 +1,4 @@ -/* Copyright (c) 2007-2017. The SimGrid Team. All rights reserved. */ +/* Copyright (c) 2007-2018. 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. */ @@ -12,6 +12,10 @@ #include "src/internal_config.h" #include #include +#include +#if _POSIX_TIMERS +#include +#endif extern "C" { @@ -61,12 +65,13 @@ typedef SMPI_Graph_topology* MPIR_Graph_Topology; typedef SMPI_Dist_Graph_topology* MPIR_Dist_Graph_Topology; XBT_PRIVATE SMPI_Process* smpi_process(); -XBT_PRIVATE SMPI_Process* smpi_process_remote(int index); +XBT_PRIVATE SMPI_Process* smpi_process_remote(simgrid::s4u::ActorPtr actor); XBT_PRIVATE int smpi_process_count(); -XBT_PRIVATE void smpi_deployment_register_process(const char* instance_id, int rank, int index); -XBT_PRIVATE MPI_Comm* smpi_deployment_comm_world(const char* instance_id); -XBT_PRIVATE msg_bar_t smpi_deployment_finalization_barrier(const char* instance_id); +XBT_PRIVATE void smpi_deployment_register_process(const std::string instance_id, int rank, + simgrid::s4u::ActorPtr actor); +XBT_PRIVATE MPI_Comm* smpi_deployment_comm_world(const std::string instance_id); +XBT_PRIVATE msg_bar_t smpi_deployment_finalization_barrier(const std::string instance_id); XBT_PRIVATE void smpi_deployment_cleanup_instances(); XBT_PRIVATE void smpi_comm_copy_buffer_callback(smx_activity_t comm, void* buff, size_t buff_size); @@ -88,12 +93,12 @@ extern XBT_PRIVATE int smpi_data_exe_size; // size of the data+bss segment of enum shared_malloc_type { shmalloc_none, shmalloc_local, shmalloc_global }; extern XBT_PRIVATE shared_malloc_type smpi_cfg_shared_malloc; // Whether to activate shared malloc -XBT_PRIVATE void smpi_switch_data_segment(int dest); -XBT_PRIVATE void smpi_really_switch_data_segment(int dest); +XBT_PRIVATE void smpi_switch_data_segment(simgrid::s4u::ActorPtr actor); +XBT_PRIVATE void smpi_really_switch_data_segment(simgrid::s4u::ActorPtr actor); XBT_PRIVATE int smpi_is_privatization_file(char* file); -XBT_PRIVATE void smpi_get_executable_global_size(); -XBT_PRIVATE void smpi_initialize_global_memory_segments(); +XBT_PRIVATE void smpi_prepare_global_memory_segment(); +XBT_PRIVATE void smpi_backup_global_memory_segment(); XBT_PRIVATE void smpi_destroy_global_memory_segments(); XBT_PRIVATE void smpi_bench_destroy(); XBT_PRIVATE void smpi_bench_begin(); @@ -103,6 +108,7 @@ XBT_PRIVATE void smpi_shared_destroy(); XBT_PRIVATE void* smpi_get_tmp_sendbuffer(int size); XBT_PRIVATE void* smpi_get_tmp_recvbuffer(int size); XBT_PRIVATE void smpi_free_tmp_buffer(void* buf); +XBT_PRIVATE void smpi_free_replay_tmp_buffers(); // f77 wrappers void mpi_init_(int* ierr); @@ -402,7 +408,19 @@ void mpi_file_set_view_(int* fh, long long int* offset, int* etype, int* filetyp void mpi_file_read_(int* fh, void* buf, int* count, int* datatype, MPI_Status* status, int* ierr); void mpi_file_write_(int* fh, void* buf, int* count, int* datatype, MPI_Status* status, int* ierr); -// TODO, make this static and expose it more cleanly + +XBT_PUBLIC int smpi_usleep(useconds_t usecs); +#if _POSIX_TIMERS > 0 +XBT_PUBLIC int smpi_nanosleep(const struct timespec* tp, struct timespec* t); +XBT_PUBLIC int smpi_clock_gettime(clockid_t clk_id, struct timespec* tp); +#endif +XBT_PUBLIC unsigned int smpi_sleep(unsigned int secs); +XBT_PUBLIC int smpi_gettimeofday(struct timeval* tv, struct timezone* tz); + + +struct option; +XBT_PUBLIC int smpi_getopt_long (int argc, char *const *argv, const char *options, const struct option *long_options, int *opt_index); +XBT_PUBLIC int smpi_getopt (int argc, char *const *argv, const char *options); struct s_smpi_privatization_region_t { void* address; @@ -410,9 +428,9 @@ struct s_smpi_privatization_region_t { }; typedef s_smpi_privatization_region_t* smpi_privatization_region_t; -extern XBT_PRIVATE smpi_privatization_region_t smpi_privatization_regions; extern XBT_PRIVATE int smpi_loaded_page; extern XBT_PRIVATE int smpi_universe_size; +XBT_PRIVATE smpi_privatization_region_t smpi_init_global_memory_segment_process(); } /** @@ -425,25 +443,17 @@ extern XBT_PRIVATE int smpi_universe_size; #if HAVE_PAPI typedef std::vector> papi_counter_t; -XBT_PRIVATE papi_counter_t& smpi_process_papi_counters(); -XBT_PRIVATE int smpi_process_papi_event_set(); #endif extern std::unordered_map location2speedup; /** @brief Returns the last call location (filename, linenumber). Process-specific. */ extern "C" { -XBT_PUBLIC(smpi_trace_call_location_t*) smpi_process_get_call_location(); -XBT_PUBLIC(smpi_trace_call_location_t*) smpi_trace_get_call_location(); +XBT_PUBLIC smpi_trace_call_location_t* smpi_trace_get_call_location(); } -enum smpi_priv_strategies { - SMPI_PRIVATIZE_NONE = 0, - SMPI_PRIVATIZE_MMAP = 1, - SMPI_PRIVATIZE_DLOPEN = 2, - SMPI_PRIVATIZE_DEFAULT = SMPI_PRIVATIZE_MMAP -}; +enum class SmpiPrivStrategies { None = 0, Mmap = 1, Dlopen = 2, Default = Dlopen }; -extern XBT_PRIVATE int smpi_privatize_global_variables; +extern XBT_PRIVATE SmpiPrivStrategies smpi_privatize_global_variables; #endif