Add MPI_Cart_sub

Author: wangvsa

include/recorder-log-format.h

@@ -127,7 +127,7 @@ static const char* func_list[] = {
     "fseeko",       "ftello",
 
 
-    // MPI 85 functions
+    // MPI 86 functions
     "PMPI_File_close",              "PMPI_File_set_size",       "PMPI_File_iread_at",
     "PMPI_File_iread",              "PMPI_File_iread_shared",   "PMPI_File_iwrite_at",
     "PMPI_File_iwrite",             "PMPI_File_iwrite_shared",  "PMPI_File_open",
@@ -170,7 +170,7 @@ static const char* func_list[] = {
     "PMPI_Testany",                 "PMPI_Ireduce",             "PMPI_Iscatter",
     "PMPI_Igather",                 "PMPI_Ialltoall",
     // Added 2021/01/25
-    "PMPI_Comm_free",
+    "PMPI_Comm_free",               "PMPI_Cart_sub",
 
     // HDF5 I/O - 74 functions
     "H5Fcreate",            "H5Fopen",              "H5Fclose",     "H5Fflush", // File interface
@@ -228,7 +228,7 @@ static char filename_arg_pos[] = {
     0b00000001,  0b00000001,  0b00000001,  0b00000001,  0b00000000, // remove
     0b00000001,  0b00000001,
 
-    // MPI 85 functions
+    // MPI 86 functions
     // Only MPI_File_open has the filename argument
     0b00000000,  0b00000000,  0b00000000,
     0b00000000,  0b00000000,  0b00000000,
@@ -270,7 +270,7 @@ static char filename_arg_pos[] = {
     0b00000000,  0b00000000,  0b00000000,
     0b00000000,  0b00000000,
     // Added 2020/01/25
-    0b00000000,
+    0b00000000,  0b00000000,
 
 
     // HDF5 I/O - 74 functions

include/recorder.h

@@ -365,8 +365,9 @@ RECORDER_FORWARD_DECL(PMPI_Ireduce, int, (const void *sendbuf, void *recvbuf, in
 RECORDER_FORWARD_DECL(PMPI_Igather, int, (const void *sendbuf, int sendcount, MPI_Datatype sendtype, void *recvbuf, int recvcount, MPI_Datatype recvtype, int root, MPI_Comm comm, MPI_Request *request));
 RECORDER_FORWARD_DECL(PMPI_Iscatter, int, (const void *sendbuf, int sendcount, MPI_Datatype sendtype, void *recvbuf, int recvcount, MPI_Datatype recvtype, int root, MPI_Comm comm, MPI_Request *request));
 RECORDER_FORWARD_DECL(PMPI_Ialltoall, int, (const void *sendbuf, int sendcount, MPI_Datatype sendtype, void *recvbuf, int recvcount, MPI_Datatype recvtype, MPI_Comm comm, MPI_Request * request));
-// Add MPI_Comm_free on 2021/01/25
+// Add on 2021/01/25
 RECORDER_FORWARD_DECL(PMPI_Comm_free, int, (MPI_Comm *comm));
+RECORDER_FORWARD_DECL(PMPI_Cart_sub, int, (MPI_Comm comm, const int remain_dims[], MPI_Comm *newcomm));
 
 
 

lib/recorder-mpi.c

@@ -720,3 +720,11 @@ int RECORDER_MPI_DECL(MPI_Comm_free) (MPI_Comm *comm) {
     char **args = assemble_args_list(1, comm_name);
     RECORDER_INTERCEPTOR(1, args);
 }
+
+int RECORDER_MPI_DECL(MPI_Cart_sub) (MPI_Comm comm, const int remain_dims[], MPI_Comm *newcomm) {
+    RECORDER_INTERCEPTOR_NOIO(int, PMPI_Cart_sub, (comm, remain_dims, newcomm));
+    add_mpi_comm(newcomm);
+    char **args = assemble_args_list(3, comm2name(&comm), ptoa(remain_dims), comm2name(newcomm));
+    RECORDER_INTERCEPTOR(3, args);
+}
+