Add MPI_File* bindings to SMPI, even if they are unimplemented.

[simgrid.git] / src / smpi / smpi_pmpi.cpp

diff --git a/src/smpi/smpi_pmpi.cpp b/src/smpi/smpi_pmpi.cpp
index d1f4945..65389eb 100644 (file)
--- a/src/smpi/smpi_pmpi.cpp
+++ b/src/smpi/smpi_pmpi.cpp
@@ -1352,7 +1352,7 @@ int PMPI_Test(MPI_Request * request, int *flag, MPI_Status * status)
   if (request == NULL || flag == NULL) {
     retval = MPI_ERR_ARG;
   } else if (*request == MPI_REQUEST_NULL) {
-    *flag= TRUE;
+    *flag= true;
     smpi_empty_status(status);
     retval = MPI_SUCCESS;
   } else {
@@ -1432,7 +1432,7 @@ int PMPI_Iprobe(int source, int tag, MPI_Comm comm, int* flag, MPI_Status* statu
   } else if (comm == MPI_COMM_NULL) {
     retval = MPI_ERR_COMM;
   } else if (source == MPI_PROC_NULL) {
-    *flag=TRUE;
+    *flag=true;
     smpi_empty_status(status);
     status->MPI_SOURCE = MPI_PROC_NULL;
     retval = MPI_SUCCESS;
@@ -3156,7 +3156,7 @@ int PMPI_Info_free( MPI_Info *info){
 }
 
 int PMPI_Info_get(MPI_Info info,char *key,int valuelen, char *value, int *flag){
-  *flag=FALSE;
+  *flag=false;
   if (info == NULL || key == NULL || valuelen <0)
     return MPI_ERR_ARG;
   if (value == NULL)
@@ -3164,7 +3164,7 @@ int PMPI_Info_get(MPI_Info info,char *key,int valuelen, char *value, int *flag){
   char* tmpvalue=(char*)xbt_dict_get_or_null(info->info_dict, key);
   if(tmpvalue){
     memcpy(value,tmpvalue, (strlen(tmpvalue) + 1 < static_cast<size_t>(valuelen)) ? strlen(tmpvalue) + 1 : valuelen);
-    *flag=TRUE;
+    *flag=true;
   }
   return MPI_SUCCESS;
 }
@@ -3222,13 +3222,13 @@ int PMPI_Info_get_nthkey( MPI_Info info, int n, char *key){
 }
 
 int PMPI_Info_get_valuelen( MPI_Info info, char *key, int *valuelen, int *flag){
-  *flag=FALSE;
+  *flag=false;
   if (info == NULL || key == NULL || valuelen==NULL || *valuelen <0)
     return MPI_ERR_ARG;
   char* tmpvalue=(char*)xbt_dict_get_or_null(info->info_dict, key);
   if(tmpvalue){
     *valuelen=strlen(tmpvalue);
-    *flag=TRUE;
+    *flag=true;
   }
   return MPI_SUCCESS;
 }
@@ -3582,3 +3582,120 @@ int PMPI_Win_test(MPI_Win win, int *flag){
 int PMPI_Win_unlock(int rank, MPI_Win win){
   NOT_YET_IMPLEMENTED
 }
+
+int PMPI_File_get_errhandler (MPI_File file, MPI_Errhandler *errhandler){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_set_errhandler(MPI_File file, MPI_Errhandler errhandler){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_open(MPI_Comm comm, const char *filename, int amode, MPI_Info info, MPI_File *fh){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_close(MPI_File *fh){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_delete(const char *filename, MPI_Info info){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_set_size(MPI_File fh, MPI_Offset size){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_get_size(MPI_File fh, MPI_Offset *size){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_set_view(MPI_File fh, MPI_Offset disp, MPI_Datatype etype, MPI_Datatype filetype, const char *datarep, MPI_Info info){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_get_view(MPI_File fh, MPI_Offset *disp, MPI_Datatype *etype, MPI_Datatype *filetype, char *datarep){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_read_at(MPI_File fh, MPI_Offset offset, void *buf, int count, MPI_Datatype datatype, MPI_Status *status){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_read_at_all(MPI_File fh, MPI_Offset offset, void * buf, int count,
+                         MPI_Datatype datatype, MPI_Status *status){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_write_at(MPI_File fh, MPI_Offset offset, const void * buf, int count,
+                      MPI_Datatype datatype, MPI_Status *status){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_write_at_all(MPI_File fh, MPI_Offset offset, const void *buf, int count, MPI_Datatype datatype, MPI_Status *status){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_set_atomicity(MPI_File fh, int flag){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_get_atomicity(MPI_File fh, int *flag){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_sync(MPI_File fh){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_read_at_all_begin(MPI_File fh, MPI_Offset offset, void *buf, int count,
+                               MPI_Datatype datatype){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_read_at_all_end(MPI_File fh, void *buf, MPI_Status *status){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_write_at_all_begin(MPI_File fh, MPI_Offset offset, const void *buf, int count,MPI_Datatype datatype){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_write_at_all_end(MPI_File fh, const void *buf, MPI_Status *status){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_read_all_begin(MPI_File fh, void *buf, int count, MPI_Datatype datatype){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_read_all_end(MPI_File fh, void *buf, MPI_Status *status){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_write_all_begin(MPI_File fh, const void *buf, int count, MPI_Datatype datatype){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_write_all_end(MPI_File fh, const void *buf, MPI_Status *status){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_read_ordered_begin(MPI_File fh, void *buf, int count, MPI_Datatype datatype){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_read_ordered_end(MPI_File fh, void *buf, MPI_Status *status){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_write_ordered_begin(MPI_File fh, const void *buf, int count, MPI_Datatype datatype){
+  NOT_YET_IMPLEMENTED
+}
+
+int PMPI_File_write_ordered_end(MPI_File fh, const void *buf, MPI_Status *status){
+  NOT_YET_IMPLEMENTED
+}
+
+