mirror of
https://github.com/HDFGroup/hdf5.git
synced 2025-02-17 16:10:24 +08:00
[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:
parent
9f45ec7671
commit
1c53181756
@ -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)
|
||||
{
|
||||
|
Loading…
Reference in New Issue
Block a user