source: XIOS/dev/branch_yushan/extern/src_ep_dev/ep_lib_intercomm.hpp @ 1037

Last change on this file since 1037 was 1037, checked in by yushan, 7 years ago

initialize the branch

File size: 2.1 KB
Line 
1#ifndef EP_LIB_INTERCOMM_HPP_INCLUDED
2#define EP_LIB_INTERCOMM_HPP_INCLUDED
3
4namespace ep_lib
5{
6  #ifdef _intelmpi
7  typedef int MPI_Datatype;
8  typedef int MPI_Op;
9  #elif _openmpi
10  typedef void* MPI_Datatype;
11  typedef void* MPI_Op;
12  #endif
13
14  int Message_Check_intercomm(MPI_Comm comm);
15
16  int MPI_Isend_intercomm(const void *buf, int count, MPI_Datatype datatype, int dest, int tag, MPI_Comm comm, MPI_Request *request);
17  int MPI_Issend_intercomm(const void *buf, int count, MPI_Datatype datatype, int dest, int tag, MPI_Comm comm, MPI_Request *request);
18
19
20  int MPI_Iprobe_intercomm(int source, int tag, MPI_Comm comm, int *flag, MPI_Status *status);
21  int MPI_Iprobe_any_source(int tag, MPI_Comm comm, int *flag, MPI_Status *status);
22  int MPI_Improbe_intercomm(int source, int tag, MPI_Comm comm, int *flag, MPI_Message *message, MPI_Status *status);
23  int MPI_Improbe_any_source(int tag, MPI_Comm comm, int *flag, MPI_Message *message, MPI_Status *status);
24
25  int MPI_Comm_split(MPI_Comm comm, int color, int key, MPI_Comm *newcomm);
26
27  int MPI_Intercomm_create(MPI_Comm local_comm, int local_leader, MPI_Comm peer_comm, int remote_leader, int tag, MPI_Comm *newintercomm);
28
29  int MPI_Intercomm_create_kernel(MPI_Comm local_comm, int local_leader, MPI_Comm peer_comm, int remote_leader, int tag, MPI_Comm *newintercomm);
30 
31  #ifdef _intelmpi
32  int MPI_Intercomm_create_from_world(MPI_Comm local_comm, int local_leader, int peer_comm_ptr, int mpi_remote_leader, int tag, MPI_Comm *newintercomm);
33  #elif _openmpi
34  int MPI_Intercomm_create_from_world(MPI_Comm local_comm, int local_leader, void* peer_comm_ptr, int mpi_remote_leader, int tag, MPI_Comm *newintercomm);
35  #endif
36 
37  int MPI_Intercomm_create_unique_leader(MPI_Comm local_comm, int local_leader, MPI_Comm peer_comm, int remote_leader, int tag, MPI_Comm *newintercomm);
38
39  int MPI_Intercomm_merge(MPI_Comm intercomm, bool high, MPI_Comm *newintracomm);
40
41  int MPI_Intercomm_merge_unique_leader(MPI_Comm intercomm, bool high, MPI_Comm *newintracomm);
42
43  int MPI_Comm_remote_size(MPI_Comm comm, int *size);
44
45  int MPI_Comm_test_inter(MPI_Comm comm, int *flag);
46}
47
48
49#endif // EP_LIB_INTERCOMM_HPP_INCLUDED
Note: See TracBrowser for help on using the repository browser.