X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/55eb4a6777966d160968eb4bfeac1ffa9028ec24..cadaf14d02d7d926cd339088dacff03077ba004f:/src/smpi/private.h diff --git a/src/smpi/private.h b/src/smpi/private.h index b02770769c..0ea0f2534d 100644 --- a/src/smpi/private.h +++ b/src/smpi/private.h @@ -58,6 +58,7 @@ typedef struct s_smpi_mpi_datatype{ MPI_Aint lb; MPI_Aint ub; int flags; + xbt_dict_t attributes; /* this let us know how to serialize and unserialize*/ void *substruct; int in_use; @@ -101,7 +102,7 @@ typedef struct s_smpi_mpi_request { int truncated; size_t real_size; MPI_Comm comm; - smx_action_t action; + smx_synchro_t action; unsigned flags; int detached; MPI_Request detached_sender; @@ -113,6 +114,22 @@ typedef struct s_smpi_mpi_request { #endif } s_smpi_mpi_request_t; +typedef struct s_smpi_mpi_comm_key_elem { + MPI_Comm_copy_attr_function* copy_fn; + MPI_Comm_delete_attr_function* delete_fn; +} s_smpi_mpi_comm_key_elem_t; +typedef struct s_smpi_mpi_comm_key_elem *smpi_comm_key_elem; + +typedef struct s_smpi_mpi_type_key_elem { + MPI_Type_copy_attr_function* copy_fn; + MPI_Type_delete_attr_function* delete_fn; +} s_smpi_mpi_type_key_elem_t; +typedef struct s_smpi_mpi_type_key_elem *smpi_type_key_elem; + +typedef struct s_smpi_mpi_info { + xbt_dict_t info_dict; +} s_smpi_mpi_info_t; + void smpi_process_destroy(void); void smpi_process_finalize(void); @@ -173,10 +190,10 @@ int smpi_process_get_replaying(void); void smpi_deployment_register_process(const char* instance_id, int rank, int index, MPI_Comm**, xbt_bar_t*); void smpi_deployment_cleanup_instances(void); -void smpi_comm_copy_buffer_callback(smx_action_t comm, +void smpi_comm_copy_buffer_callback(smx_synchro_t comm, void *buff, size_t buff_size); -void smpi_comm_null_copy_buffer_callback(smx_action_t comm, +void smpi_comm_null_copy_buffer_callback(smx_synchro_t comm, void *buff, size_t buff_size); void print_request(const char *message, MPI_Request request); @@ -191,7 +208,7 @@ int is_datatype_valid(MPI_Datatype datatype); size_t smpi_datatype_size(MPI_Datatype datatype); MPI_Aint smpi_datatype_lb(MPI_Datatype datatype); MPI_Aint smpi_datatype_ub(MPI_Datatype datatype); -MPI_Datatype smpi_datatype_dup(MPI_Datatype datatype); +int smpi_datatype_dup(MPI_Datatype datatype, MPI_Datatype* new_t); int smpi_datatype_extent(MPI_Datatype datatype, MPI_Aint * lb, MPI_Aint * extent); MPI_Aint smpi_datatype_get_extent(MPI_Datatype datatype); @@ -251,6 +268,7 @@ int smpi_comm_size(MPI_Comm comm); void smpi_comm_get_name(MPI_Comm comm, char* name, int* len); int smpi_comm_rank(MPI_Comm comm); MPI_Comm smpi_comm_split(MPI_Comm comm, int color, int key); +int smpi_comm_dup(MPI_Comm comm, MPI_Comm* newcomm); void smpi_comm_use(MPI_Comm comm); void smpi_comm_unuse(MPI_Comm comm); void smpi_comm_set_leaders_comm(MPI_Comm comm, MPI_Comm leaders); @@ -403,7 +421,17 @@ int smpi_coll_basic_alltoallv(void *sendbuf, int *sendcounts, void *recvbuf, int *recvcounts, int *recvdisps, MPI_Datatype recvtype, MPI_Comm comm); - + +int smpi_comm_keyval_create(MPI_Comm_copy_attr_function* copy_fn, MPI_Comm_delete_attr_function* delete_fn, int* keyval, void* extra_state); +int smpi_comm_keyval_free(int* keyval); +int smpi_comm_attr_delete(MPI_Comm comm, int keyval); +int smpi_comm_attr_get(MPI_Comm comm, int keyval, void* attr_value, int* flag); +int smpi_comm_attr_put(MPI_Comm comm, int keyval, void* attr_value); +int smpi_type_attr_delete(MPI_Datatype type, int keyval); +int smpi_type_attr_get(MPI_Datatype type, int keyval, void* attr_value, int* flag); +int smpi_type_attr_put(MPI_Datatype type, int keyval, void* attr_value); +int smpi_type_keyval_create(MPI_Type_copy_attr_function* copy_fn, MPI_Type_delete_attr_function* delete_fn, int* keyval, void* extra_state); +int smpi_type_keyval_free(int* keyval); // utilities extern double smpi_cpu_threshold; extern double smpi_running_power; @@ -412,7 +440,9 @@ extern char* start_data_exe; //start of the data+bss segment of the executable extern int size_data_exe; //size of the data+bss segment of the executable -void smpi_switch_data_segment(int); +void smpi_switch_data_segment(int dest); +void smpi_really_switch_data_segment(int dest); + void smpi_get_executable_global_size(void); void smpi_initialize_global_memory_segments(void); void smpi_destroy_global_memory_segments(void); @@ -424,6 +454,10 @@ void* smpi_get_tmp_sendbuffer(int size); void* smpi_get_tmp_recvbuffer(int size); void smpi_free_tmp_buffer(void* buf); +int smpi_comm_attr_delete(MPI_Comm comm, int keyval); +int smpi_comm_attr_get(MPI_Comm comm, int keyval, void* attr_value, int* flag); +int smpi_comm_attr_put(MPI_Comm comm, int keyval, void* attr_value); + // f77 wrappers