Re: [OMPI users] runtime warnings with MPI_File_write_ordered

[Edgar Gabriel]

here is a patch that we use on our development version to silence that 
warning, you have to apply it to.

ompi/ompi/mca/io/romio/romio/mpi-io/io_romio_close.c
I would not like to commit that to the repository since I can not 
oversee whether it causes problems in some other settings/scenario/file 
systems. However, it fixed for us the problems when experimenting with 
shared file pointers (e.g. MPI_File_write_ordered) and did not create 
any issues so far.

Application of that patch at your own risk:-)

Thanks
Edgar


Brian Austin wrote:
Hi,

Sorry about my previous message, it was sent before I'd finished 
composing it.

Whenever I use MPI_File_write_ordered(), all but one process send the 
following message to stderr.
ADIOI_GEN_DELETE (line 22): **io No such file or directory

I have read
http://www.open-mpi.org/community/lists/users/2008/01/4936.php
which suggests that this message appears because my program is trying 
to delete a file that does not exist, but my program does not 
explicitly delete any files. I've included a test program to 
demonstrate the message.

Is there anything I can do to avoid or suppress this message?
The message I referred to before says that I could "ignore errors from 
MPI_File_delete".  How do I do that?

Thanks,
Brian

int
main( int argc, char *argv[]){

  char buff[2] = "a";
  MPI_File fh;
  MPI_Status status;

  MPI_Init( &argc, &argv );

  MPI_File_open( MPI_COMM_WORLD, "foo.txt",
         MPI_MODE_CREATE | MPI_MODE_WRONLY,
         MPI_INFO_NULL, &fh );

  MPI_File_write_ordered( fh, buff, 1, MPI_BYTE, &status );

  MPI_File_close( &fh );

  MPI_Finalize();

  return 0;
}//main

------------------------------------------------------------------------

_______________________________________________
users mailing list
us...@open-mpi.org
http://www.open-mpi.org/mailman/listinfo.cgi/users

42d41
< 
66,73c65
< 	    int rank;
< 	    MPI_Comm_rank ( (fh)->comm, &rank );
< 	    if ( rank == 0 ) {
< 		ADIO_Close((fh)->shared_fp_fd, &error_code);
< 	    }
< 	    else {
< 		error_code = MPI_SUCCESS;
< 	    }
---
> 	    ADIO_Close((fh)->shared_fp_fd, &error_code);