X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/88f516f55bc49095f754361920a9f2f6e418c484..c7cad16a187e10f78f94c63a490f474676702424:/src/smpi/colls/smpi_mvapich2_selector_stampede.h diff --git a/src/smpi/colls/smpi_mvapich2_selector_stampede.h b/src/smpi/colls/smpi_mvapich2_selector_stampede.h index a2296bfb7f..ca81613bf4 100644 --- a/src/smpi/colls/smpi_mvapich2_selector_stampede.h +++ b/src/smpi/colls/smpi_mvapich2_selector_stampede.h @@ -10,7 +10,6 @@ #define MV2_MAX_NB_THRESHOLDS 32 -using namespace simgrid::smpi; XBT_PUBLIC(void) smpi_coll_cleanup_mvapich2(void); @@ -39,11 +38,11 @@ int *mv2_size_alltoall_tuning_table = NULL; mv2_alltoall_tuning_table **mv2_alltoall_thresholds_table = NULL; -#define MPIR_Alltoall_bruck_MV2 Coll_alltoall_bruck::alltoall -#define MPIR_Alltoall_RD_MV2 Coll_alltoall_rdb::alltoall -#define MPIR_Alltoall_Scatter_dest_MV2 Coll_alltoall_mvapich2_scatter_dest::alltoall -#define MPIR_Alltoall_pairwise_MV2 Coll_alltoall_pair::alltoall -#define MPIR_Alltoall_inplace_MV2 Coll_alltoall_ring::alltoall +#define MPIR_Alltoall_bruck_MV2 simgrid::smpi::Coll_alltoall_bruck::alltoall +#define MPIR_Alltoall_RD_MV2 simgrid::smpi::Coll_alltoall_rdb::alltoall +#define MPIR_Alltoall_Scatter_dest_MV2 simgrid::smpi::Coll_alltoall_mvapich2_scatter_dest::alltoall +#define MPIR_Alltoall_pairwise_MV2 simgrid::smpi::Coll_alltoall_pair::alltoall +#define MPIR_Alltoall_inplace_MV2 simgrid::smpi::Coll_alltoall_ring::alltoall static void init_mv2_alltoall_tables_stampede(){ @@ -51,8 +50,8 @@ static void init_mv2_alltoall_tables_stampede(){ int agg_table_sum = 0; mv2_alltoall_tuning_table **table_ptrs = NULL; mv2_alltoall_num_ppn_conf = 3; - if(Colls::smpi_coll_cleanup_callback==NULL) - Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; + if(simgrid::smpi::Colls::smpi_coll_cleanup_callback==NULL) + simgrid::smpi::Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; mv2_alltoall_thresholds_table = static_cast(xbt_malloc(sizeof(mv2_alltoall_tuning_table *) * mv2_alltoall_num_ppn_conf)); table_ptrs = static_cast(xbt_malloc(sizeof(mv2_alltoall_tuning_table *) @@ -334,17 +333,17 @@ static int MPIR_Allgather_RD_Allgather_Comm_MV2( void *sendbuf, return 0; } -#define MPIR_Allgather_Bruck_MV2 Coll_allgather_bruck::allgather -#define MPIR_Allgather_RD_MV2 Coll_allgather_rdb::allgather -#define MPIR_Allgather_Ring_MV2 Coll_allgather_ring::allgather -#define MPIR_2lvl_Allgather_MV2 Coll_allgather_mvapich2_smp::allgather +#define MPIR_Allgather_Bruck_MV2 simgrid::smpi::Coll_allgather_bruck::allgather +#define MPIR_Allgather_RD_MV2 simgrid::smpi::Coll_allgather_rdb::allgather +#define MPIR_Allgather_Ring_MV2 simgrid::smpi::Coll_allgather_ring::allgather +#define MPIR_2lvl_Allgather_MV2 simgrid::smpi::Coll_allgather_mvapich2_smp::allgather static void init_mv2_allgather_tables_stampede(){ int i; int agg_table_sum = 0; - if(Colls::smpi_coll_cleanup_callback==NULL) - Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; + if(simgrid::smpi::Colls::smpi_coll_cleanup_callback==NULL) + simgrid::smpi::Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; mv2_allgather_tuning_table **table_ptrs = NULL; mv2_allgather_num_ppn_conf = 3; mv2_allgather_thresholds_table @@ -579,7 +578,7 @@ typedef struct { } mv2_gather_tuning_table; int mv2_size_gather_tuning_table=7; -mv2_gather_tuning_table * mv2_gather_thresholds_table=NULL; +mv2_gather_tuning_table * mv2_gather_thresholds_table=NULL; typedef int (*MV2_Gather_function_ptr) (void *sendbuf, int sendcnt, @@ -594,15 +593,15 @@ MV2_Gather_function_ptr MV2_Gather_intra_node_function = NULL; -#define MPIR_Gather_MV2_Direct Coll_gather_ompi_basic_linear::gather -#define MPIR_Gather_MV2_two_level_Direct Coll_gather_mvapich2_two_level::gather -#define MPIR_Gather_intra Coll_gather_mpich::gather +#define MPIR_Gather_MV2_Direct simgrid::smpi::Coll_gather_ompi_basic_linear::gather +#define MPIR_Gather_MV2_two_level_Direct simgrid::smpi::Coll_gather_mvapich2_two_level::gather +#define MPIR_Gather_intra simgrid::smpi::Coll_gather_mpich::gather static void init_mv2_gather_tables_stampede(){ - if(Colls::smpi_coll_cleanup_callback==NULL) - Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; + if(simgrid::smpi::Colls::smpi_coll_cleanup_callback==NULL) + simgrid::smpi::Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; mv2_size_gather_tuning_table=7; mv2_gather_thresholds_table = static_cast(xbt_malloc(mv2_size_gather_tuning_table* sizeof (mv2_gather_tuning_table))); @@ -682,14 +681,14 @@ int (*MV2_Allgatherv_function)(void *sendbuf, int mv2_size_allgatherv_tuning_table = 0; mv2_allgatherv_tuning_table *mv2_allgatherv_thresholds_table = NULL; -#define MPIR_Allgatherv_Rec_Doubling_MV2 Coll_allgatherv_mpich_rdb::allgatherv -#define MPIR_Allgatherv_Bruck_MV2 Coll_allgatherv_ompi_bruck::allgatherv -#define MPIR_Allgatherv_Ring_MV2 Coll_allgatherv_mpich_ring::allgatherv +#define MPIR_Allgatherv_Rec_Doubling_MV2 simgrid::smpi::Coll_allgatherv_mpich_rdb::allgatherv +#define MPIR_Allgatherv_Bruck_MV2 simgrid::smpi::Coll_allgatherv_ompi_bruck::allgatherv +#define MPIR_Allgatherv_Ring_MV2 simgrid::smpi::Coll_allgatherv_mpich_ring::allgatherv static void init_mv2_allgatherv_tables_stampede(){ - if(Colls::smpi_coll_cleanup_callback==NULL) - Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; + if(simgrid::smpi::Colls::smpi_coll_cleanup_callback==NULL) + simgrid::smpi::Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; mv2_size_allgatherv_tuning_table = 6; mv2_allgatherv_thresholds_table = static_cast(xbt_malloc(mv2_size_allgatherv_tuning_table * sizeof (mv2_allgatherv_tuning_table))); @@ -797,7 +796,7 @@ static int MPIR_Allreduce_mcst_reduce_two_level_helper_MV2( void *sendbuf, int count, MPI_Datatype datatype, MPI_Op op, MPI_Comm comm) -{ +{ return 0; } @@ -816,7 +815,7 @@ static int MPIR_Allreduce_reduce_p2p_MV2( void *sendbuf, MPI_Datatype datatype, MPI_Op op, MPI_Comm comm) { - Colls::reduce(sendbuf,recvbuf,count,datatype,op,0,comm); + simgrid::smpi::Colls::reduce(sendbuf,recvbuf,count,datatype,op,0,comm); return MPI_SUCCESS; } @@ -826,18 +825,18 @@ static int MPIR_Allreduce_reduce_shmem_MV2( void *sendbuf, MPI_Datatype datatype, MPI_Op op, MPI_Comm comm) { - Colls::reduce(sendbuf,recvbuf,count,datatype,op,0,comm); + simgrid::smpi::Colls::reduce(sendbuf,recvbuf,count,datatype,op,0,comm); return MPI_SUCCESS; } -#define MPIR_Allreduce_pt2pt_rd_MV2 Coll_allreduce_rdb::allreduce -#define MPIR_Allreduce_pt2pt_rs_MV2 Coll_allreduce_mvapich2_rs::allreduce -#define MPIR_Allreduce_two_level_MV2 Coll_allreduce_mvapich2_two_level::allreduce +#define MPIR_Allreduce_pt2pt_rd_MV2 simgrid::smpi::Coll_allreduce_rdb::allreduce +#define MPIR_Allreduce_pt2pt_rs_MV2 simgrid::smpi::Coll_allreduce_mvapich2_rs::allreduce +#define MPIR_Allreduce_two_level_MV2 simgrid::smpi::Coll_allreduce_mvapich2_two_level::allreduce static void init_mv2_allreduce_tables_stampede(){ - if(Colls::smpi_coll_cleanup_callback==NULL) - Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; + if(simgrid::smpi::Colls::smpi_coll_cleanup_callback==NULL) + simgrid::smpi::Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; mv2_size_allreduce_tuning_table = 8; mv2_allreduce_thresholds_table = static_cast(xbt_malloc(mv2_size_allreduce_tuning_table * sizeof (mv2_allreduce_tuning_table))); @@ -1022,22 +1021,22 @@ int mv2_intra_node_knomial_factor = 4; #define INTRA_NODE_ROOT 0 -#define MPIR_Pipelined_Bcast_Zcpy_MV2 Coll_bcast_mpich::bcast -#define MPIR_Pipelined_Bcast_MV2 Coll_bcast_mpich::bcast -#define MPIR_Bcast_binomial_MV2 Coll_bcast_binomial_tree::bcast -#define MPIR_Bcast_scatter_ring_allgather_shm_MV2 Coll_bcast_scatter_LR_allgather::bcast -#define MPIR_Bcast_scatter_doubling_allgather_MV2 Coll_bcast_scatter_rdb_allgather::bcast -#define MPIR_Bcast_scatter_ring_allgather_MV2 Coll_bcast_scatter_LR_allgather::bcast -#define MPIR_Shmem_Bcast_MV2 Coll_bcast_mpich::bcast -#define MPIR_Bcast_tune_inter_node_helper_MV2 Coll_bcast_mvapich2_inter_node::bcast -#define MPIR_Bcast_inter_node_helper_MV2 Coll_bcast_mvapich2_inter_node::bcast -#define MPIR_Knomial_Bcast_intra_node_MV2 Coll_bcast_mvapich2_knomial_intra_node::bcast -#define MPIR_Bcast_intra_MV2 Coll_bcast_mvapich2_intra_node::bcast +#define MPIR_Pipelined_Bcast_Zcpy_MV2 simgrid::smpi::Coll_bcast_mpich::bcast +#define MPIR_Pipelined_Bcast_MV2 simgrid::smpi::Coll_bcast_mpich::bcast +#define MPIR_Bcast_binomial_MV2 simgrid::smpi::Coll_bcast_binomial_tree::bcast +#define MPIR_Bcast_scatter_ring_allgather_shm_MV2 simgrid::smpi::Coll_bcast_scatter_LR_allgather::bcast +#define MPIR_Bcast_scatter_doubling_allgather_MV2 simgrid::smpi::Coll_bcast_scatter_rdb_allgather::bcast +#define MPIR_Bcast_scatter_ring_allgather_MV2 simgrid::smpi::Coll_bcast_scatter_LR_allgather::bcast +#define MPIR_Shmem_Bcast_MV2 simgrid::smpi::Coll_bcast_mpich::bcast +#define MPIR_Bcast_tune_inter_node_helper_MV2 simgrid::smpi::Coll_bcast_mvapich2_inter_node::bcast +#define MPIR_Bcast_inter_node_helper_MV2 simgrid::smpi::Coll_bcast_mvapich2_inter_node::bcast +#define MPIR_Knomial_Bcast_intra_node_MV2 simgrid::smpi::Coll_bcast_mvapich2_knomial_intra_node::bcast +#define MPIR_Bcast_intra_MV2 simgrid::smpi::Coll_bcast_mvapich2_intra_node::bcast static void init_mv2_bcast_tables_stampede(){ //Stampede, - if(Colls::smpi_coll_cleanup_callback==NULL) - Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; + if(simgrid::smpi::Colls::smpi_coll_cleanup_callback==NULL) + simgrid::smpi::Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; mv2_size_bcast_tuning_table=8; mv2_bcast_thresholds_table = static_cast(xbt_malloc(mv2_size_bcast_tuning_table * sizeof (mv2_bcast_tuning_table))); @@ -1295,17 +1294,17 @@ int (*MV2_Reduce_intra_function)( void *sendbuf, MPI_Comm comm_ptr)=NULL; -#define MPIR_Reduce_inter_knomial_wrapper_MV2 Coll_reduce_mvapich2_knomial::reduce -#define MPIR_Reduce_intra_knomial_wrapper_MV2 Coll_reduce_mvapich2_knomial::reduce -#define MPIR_Reduce_binomial_MV2 Coll_reduce_binomial::reduce -#define MPIR_Reduce_redscat_gather_MV2 Coll_reduce_scatter_gather::reduce -#define MPIR_Reduce_shmem_MV2 Coll_reduce_ompi_basic_linear::reduce -#define MPIR_Reduce_two_level_helper_MV2 Coll_reduce_mvapich2_two_level::reduce +#define MPIR_Reduce_inter_knomial_wrapper_MV2 simgrid::smpi::Coll_reduce_mvapich2_knomial::reduce +#define MPIR_Reduce_intra_knomial_wrapper_MV2 simgrid::smpi::Coll_reduce_mvapich2_knomial::reduce +#define MPIR_Reduce_binomial_MV2 simgrid::smpi::Coll_reduce_binomial::reduce +#define MPIR_Reduce_redscat_gather_MV2 simgrid::smpi::Coll_reduce_scatter_gather::reduce +#define MPIR_Reduce_shmem_MV2 simgrid::smpi::Coll_reduce_ompi_basic_linear::reduce +#define MPIR_Reduce_two_level_helper_MV2 simgrid::smpi::Coll_reduce_mvapich2_two_level::reduce static void init_mv2_reduce_tables_stampede(){ - if(Colls::smpi_coll_cleanup_callback==NULL) - Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; + if(simgrid::smpi::Colls::smpi_coll_cleanup_callback==NULL) + simgrid::smpi::Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; /*Stampede*/ mv2_size_reduce_tuning_table = 8; mv2_reduce_thresholds_table = static_cast(xbt_malloc(mv2_size_reduce_tuning_table * @@ -1537,19 +1536,19 @@ static int MPIR_Reduce_Scatter_Basic_MV2(void *sendbuf, MPI_Op op, MPI_Comm comm) { - Coll_reduce_scatter_default::reduce_scatter(sendbuf,recvbuf,recvcnts,datatype,op,comm); + simgrid::smpi::Coll_reduce_scatter_default::reduce_scatter(sendbuf,recvbuf,recvcnts,datatype,op,comm); return MPI_SUCCESS; } -#define MPIR_Reduce_scatter_non_comm_MV2 Coll_reduce_scatter_mpich_noncomm::reduce_scatter -#define MPIR_Reduce_scatter_Rec_Halving_MV2 Coll_reduce_scatter_ompi_basic_recursivehalving::reduce_scatter -#define MPIR_Reduce_scatter_Pair_Wise_MV2 Coll_reduce_scatter_mpich_pair::reduce_scatter +#define MPIR_Reduce_scatter_non_comm_MV2 simgrid::smpi::Coll_reduce_scatter_mpich_noncomm::reduce_scatter +#define MPIR_Reduce_scatter_Rec_Halving_MV2 simgrid::smpi::Coll_reduce_scatter_ompi_basic_recursivehalving::reduce_scatter +#define MPIR_Reduce_scatter_Pair_Wise_MV2 simgrid::smpi::Coll_reduce_scatter_mpich_pair::reduce_scatter static void init_mv2_reduce_scatter_tables_stampede(){ - if(Colls::smpi_coll_cleanup_callback==NULL) - Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; + if(simgrid::smpi::Colls::smpi_coll_cleanup_callback==NULL) + simgrid::smpi::Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; mv2_size_red_scat_tuning_table = 6; mv2_red_scat_thresholds_table = static_cast(xbt_malloc(mv2_size_red_scat_tuning_table * sizeof (mv2_red_scat_tuning_table))); @@ -1665,17 +1664,17 @@ int MPIR_Scatter_mcst_wrap_MV2(void *sendbuf, return 0; } -#define MPIR_Scatter_MV2_Binomial Coll_scatter_ompi_binomial::scatter -#define MPIR_Scatter_MV2_Direct Coll_scatter_ompi_basic_linear::scatter -#define MPIR_Scatter_MV2_two_level_Binomial Coll_scatter_mvapich2_two_level_binomial::scatter -#define MPIR_Scatter_MV2_two_level_Direct Coll_scatter_mvapich2_two_level_direct::scatter +#define MPIR_Scatter_MV2_Binomial simgrid::smpi::Coll_scatter_ompi_binomial::scatter +#define MPIR_Scatter_MV2_Direct simgrid::smpi::Coll_scatter_ompi_basic_linear::scatter +#define MPIR_Scatter_MV2_two_level_Binomial simgrid::smpi::Coll_scatter_mvapich2_two_level_binomial::scatter +#define MPIR_Scatter_MV2_two_level_Direct simgrid::smpi::Coll_scatter_mvapich2_two_level_direct::scatter static void init_mv2_scatter_tables_stampede(){ - if(Colls::smpi_coll_cleanup_callback==NULL) - Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; + if(simgrid::smpi::Colls::smpi_coll_cleanup_callback==NULL) + simgrid::smpi::Colls::smpi_coll_cleanup_callback=&smpi_coll_cleanup_mvapich2; int agg_table_sum = 0; int i; @@ -1983,6 +1982,6 @@ static void init_mv2_scatter_tables_stampede(){ * mv2_size_scatter_tuning_table[i])); } xbt_free(table_ptrs); - + }