Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Update copyright lines for 2022.
[simgrid.git] / teshsuite / smpi / io-shared / io-shared.c
index e4b90d2..1f7dba9 100644 (file)
@@ -1,3 +1,8 @@
+/* Copyright (c) 2019-2022. The SimGrid Team. All rights reserved.          */
+
+/* This program is free software; you can redistribute it and/or modify it
+ * under the terms of the license (GNU LGPL) which comes with this package. */
+
 #include "mpi.h"
 #include <stdio.h>
 #include <stdlib.h>
@@ -16,9 +21,9 @@ int main( int argc, char *argv[] )
     MPI_File fh;
     MPI_Comm comm;
     MPI_Status status;
+
     MPI_Init( &argc, &argv );
+
     comm = MPI_COMM_WORLD;
     MPI_File_open( comm, (char*)"/scratch/testfile", MPI_MODE_RDWR | MPI_MODE_CREATE | MPI_MODE_DELETE_ON_CLOSE, MPI_INFO_NULL, &fh );
     MPI_Comm_size( comm, &size );
@@ -28,7 +33,7 @@ int main( int argc, char *argv[] )
 
     MPI_File_seek_shared( fh, 0, MPI_SEEK_SET );
     MPI_Barrier(comm);
-    
+
     memset( &status, 0xff, sizeof(MPI_Status) );
     MPI_File_write_shared( fh, buf, 1, MPI_INT, &status );
     MPI_Get_count( &status, MPI_INT, &count );
@@ -46,9 +51,10 @@ int main( int argc, char *argv[] )
         fprintf( stderr, "Count not zero (%d) on write\n", count );fflush(stderr);
     }
 
+    MPI_Barrier(comm);
     MPI_File_seek_shared( fh, 0, MPI_SEEK_SET );
     MPI_Barrier(comm);
-    
+
     memset( &status, 0xff, sizeof(MPI_Status) );
     MPI_File_read_shared( fh, buf, 1, MPI_INT, &status );
     MPI_Get_count( &status, MPI_INT, &count );
@@ -59,7 +65,7 @@ int main( int argc, char *argv[] )
 
     free( buf );
     MPI_File_close( &fh );
+
     MPI_Finalize();
     return errs;
 }