diff options
author | Neil Fortner <nfortne2@hdfgroup.org> | 2017-05-01 22:25:02 (GMT) |
---|---|---|
committer | Neil Fortner <nfortne2@hdfgroup.org> | 2017-05-01 22:25:02 (GMT) |
commit | 58c4806cd961e30d9b5658ca449bcb695e7fcb56 (patch) | |
tree | 14cf3d453e5824ef88532cb04ea8fdb94590dfbe /examples/h5dsm_obj_open.c | |
parent | 72b57518eb02e1df92d0e3ae7b29f09bbafe937c (diff) | |
download | hdf5-58c4806cd961e30d9b5658ca449bcb695e7fcb56.zip hdf5-58c4806cd961e30d9b5658ca449bcb695e7fcb56.tar.gz hdf5-58c4806cd961e30d9b5658ca449bcb695e7fcb56.tar.bz2 |
Implement H5Oopen, H5Oopen_by_addr, H5Acreate_by_name, H5Aopen_by_name,
and H5Aiterate_by_name. Add h5dsm_obj_open.c example. Fix memory leak on dataset open. Other minor
fixes/cleanup.
Diffstat (limited to 'examples/h5dsm_obj_open.c')
-rw-r--r-- | examples/h5dsm_obj_open.c | 88 |
1 files changed, 88 insertions, 0 deletions
diff --git a/examples/h5dsm_obj_open.c b/examples/h5dsm_obj_open.c new file mode 100644 index 0000000..05716d4 --- /dev/null +++ b/examples/h5dsm_obj_open.c @@ -0,0 +1,88 @@ +#include "h5dsm_example.h" + +int main(int argc, char *argv[]) { + uuid_t pool_uuid; + char *pool_grp = NULL; + hid_t file = -1, obj = -1, fapl = -1; + H5I_type_t obj_type; + char *obj_str = NULL; + hsize_t dims[1] = {1}; + H5VL_daosm_snap_id_t snap_id; + + (void)MPI_Init(&argc, &argv); + + if(argc < 4 || argc > 5) + PRINTF_ERROR("argc must be 4 or 5\n"); + + /* Parse UUID */ + if(0 != uuid_parse(argv[1], pool_uuid)) + ERROR; + + /* Initialize VOL */ + if(H5VLdaosm_init(MPI_COMM_WORLD, pool_uuid, pool_grp) < 0) + ERROR; + + /* Set up FAPL */ + if((fapl = H5Pcreate(H5P_FILE_ACCESS)) < 0) + ERROR; + if(H5Pset_fapl_daosm(fapl, MPI_COMM_WORLD, MPI_INFO_NULL) < 0) + ERROR; + if(H5Pset_all_coll_metadata_ops(fapl, true) < 0) + ERROR; + + /* Open snapshot if specified */ + if(argc == 5) { + snap_id = (H5VL_daosm_snap_id_t)atoi(argv[4]); + printf("Opening snapshot %llu\n", (long long unsigned)snap_id); + if(H5Pset_daosm_snap_open(fapl, snap_id) < 0) + ERROR; + } /* end if */ + + /* Open file */ + if((file = H5Fopen(argv[2], H5F_ACC_RDONLY, fapl)) < 0) + ERROR; + + printf("Opening object\n"); + + /* Open object */ + if((obj = H5Oopen(file, argv[3], H5P_DEFAULT)) < 0) + ERROR; + + /* Get object type */ + if(H5I_BADID == (obj_type = H5Iget_type(obj))) + ERROR; + + if(obj_type == H5I_GROUP) + obj_str = "group"; + else if(obj_type == H5I_DATASET) + obj_str = "dataset"; + else if(obj_type == H5I_DATATYPE) + obj_str = "datatype"; + else + obj_str = "unknown"; + printf("Object type is %s\n", obj_str); + + /* Close */ + if(H5Oclose(obj) < 0) + ERROR; + if(H5Fclose(file) < 0) + ERROR; + if(H5Pclose(fapl) < 0) + ERROR; + + printf("Success\n"); + + (void)MPI_Finalize(); + return 0; + +error: + H5E_BEGIN_TRY { + H5Oclose(obj); + H5Fclose(file); + H5Pclose(fapl); + } H5E_END_TRY; + + (void)MPI_Finalize(); + return 1; +} + |