diff options
Diffstat (limited to 'tools/src')
-rw-r--r-- | tools/src/misc/h5clear.c | 58 |
1 files changed, 30 insertions, 28 deletions
diff --git a/tools/src/misc/h5clear.c b/tools/src/misc/h5clear.c index 0be4f8f..89dd4bd 100644 --- a/tools/src/misc/h5clear.c +++ b/tools/src/misc/h5clear.c @@ -14,9 +14,9 @@ * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */ /* - * Programmer: + * Programmer: * - * Purpose: + * Purpose: */ #include "hdf5.h" @@ -25,7 +25,7 @@ #include "h5tools_utils.h" /* Name of tool */ -#define PROGRAMNAME "h5clear" +#define PROGRAMNAME "h5clear" /* Make this private property (defined in H5Fprivate.h) available to h5clear. */ #define H5F_ACS_CLEAR_STATUS_FLAGS_NAME "clear_status_flags" @@ -35,7 +35,7 @@ * * Purpose: Close the tools library and exit * - * Return: Does not return + * Return: Does not return * *------------------------------------------------------------------------- */ @@ -48,11 +48,11 @@ leave(int ret) } /* leave() */ /*------------------------------------------------------------------------- - * Function: usage + * Function: usage * - * Purpose: Prints a usage message + * Purpose: Prints a usage message * - * Return: void + * Return: void * *------------------------------------------------------------------------- */ @@ -66,28 +66,28 @@ usage(void) /*------------------------------------------------------------------------- - * Function: main + * Function: main * - * Purpose: + * Purpose: * - * Return: Success: - * Failure: + * Return: Success: + * Failure: * - * Programmer: + * Programmer: * *------------------------------------------------------------------------- */ int main (int argc, char *argv[]) { - char *fname; /* File name */ - hbool_t clear = TRUE; /* To clear the status_flags in the file's superblock */ - hid_t fapl = -1; /* File access property list */ - hid_t fid = -1; /* File ID */ + char *fname; /* File name */ + hbool_t clear = TRUE; /* To clear the status_flags in the file's superblock */ + hid_t fapl = -1; /* File access property list */ + hid_t fid = -1; /* File ID */ h5tools_setprogname(PROGRAMNAME); h5tools_setstatus(EXIT_SUCCESS); - + /* Disable the HDF5 library's error reporting */ H5Eset_auto2(H5E_DEFAULT, NULL, NULL); @@ -100,9 +100,6 @@ main (int argc, char *argv[]) leave(EXIT_FAILURE); } - /* Duplicate the file name */ - fname = HDstrdup(argv[opt_ind]); - /* Get a copy of the file access property list */ if((fapl = H5Pcreate(H5P_FILE_ACCESS)) < 0) { error_msg("H5Pcreate\n"); @@ -112,25 +109,30 @@ main (int argc, char *argv[]) /* Set to clear the status_flags in the file's superblock */ /* This is a private property used by h5clear only */ if(H5Pset(fapl, H5F_ACS_CLEAR_STATUS_FLAGS_NAME, &clear) < 0) { - error_msg("H5Pset\n"); - exit(EXIT_FAILURE); + error_msg("H5Pset\n"); + exit(EXIT_FAILURE); } + /* Duplicate the file name */ + fname = HDstrdup(argv[opt_ind]); + if((fid = h5tools_fopen(fname, H5F_ACC_RDWR, fapl, NULL, NULL, (size_t)0)) < 0) { - error_msg("h5tools_fopen\n"); - exit(EXIT_FAILURE); + error_msg("h5tools_fopen\n"); + HDfree(fname); + exit(EXIT_FAILURE); } + HDfree(fname); /* Close the file */ if(H5Fclose(fid) < 0) { - error_msg("H5Fclose\n"); - exit(EXIT_FAILURE); + error_msg("H5Fclose\n"); + exit(EXIT_FAILURE); } /* CLose the property list */ if(H5Pclose(fapl) < 0) { - error_msg("H5Pclose\n"); - exit(EXIT_FAILURE); + error_msg("H5Pclose\n"); + exit(EXIT_FAILURE); } return EXIT_SUCCESS; |