[svn-r12967] Cleanup.

The h5_mpi_get_file_size() is no longer used.  The unused code caused some
compiling warning messages.  Removed the whole routine.

Tested in heping pp mode.
This commit is contained in:
Albert Cheng 2006-11-21 23:21:02 -05:00
parent 9f45ec7671
commit 1c53181756

View File

@ -308,49 +308,6 @@ create_faccess_plist(MPI_Comm comm, MPI_Info info, int l_facc_type,
return (ret_pl);
}
/*
* Check the size of a file using MPI routines
* Temporary hack: SGI Altix MPI_File_get_size() does not work correctly
* for size >= 2GB. Use stat for now.
* If stat() does not work for other systems, need to make it conditional
* compile for Altix only.
*/
MPI_Offset
h5_mpi_get_file_size(const char *filename, MPI_Comm comm, MPI_Info info)
{
#if 0
MPI_File fh; /* MPI file handle */
MPI_Offset size=0; /* File size to return */
if (MPI_SUCCESS != MPI_File_open(comm, (char*)filename, MPI_MODE_RDONLY, info, &fh))
goto done;
if (MPI_SUCCESS != (MPI_File_get_size(fh, &size)))
goto done;
if (MPI_SUCCESS != MPI_File_close(&fh))
size=0;
#else
MPI_Offset size=0; /* File size to return */
#ifdef H5_HAVE_STAT64
/* use stat64 if available */
struct stat64 mystat;
#else
struct stat mystat;
#endif
#ifdef H5_HAVE_STAT64
stat(filename, &mystat);
#else
stat(filename, &mystat);
#endif
size = mystat.st_size;
#endif
done:
return(size);
}
int main(int argc, char **argv)
{