summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorElena Pourmal <epourmal@hdfgroup.org>2007-04-25 18:39:41 (GMT)
committerElena Pourmal <epourmal@hdfgroup.org>2007-04-25 18:39:41 (GMT)
commit71c29a007fb7ee0cb9218255cdf4e393c1d22a6b (patch)
treef918b91c65863b297c80513c8896dd67560e8bc8
parent3fd6b91f1ba2d718b6578066005503b234d5fce4 (diff)
downloadhdf5-71c29a007fb7ee0cb9218255cdf4e393c1d22a6b.zip
hdf5-71c29a007fb7ee0cb9218255cdf4e393c1d22a6b.tar.gz
hdf5-71c29a007fb7ee0cb9218255cdf4e393c1d22a6b.tar.bz2
[svn-r13702] Added new example that uses H5Gcreate2 and H5Lexists calls
Platforms tested: Linux 2.6 RedHat in Chicago; no access to other machines
-rw-r--r--MANIFEST1
-rw-r--r--examples/h5_interm_group.c113
2 files changed, 114 insertions, 0 deletions
diff --git a/MANIFEST b/MANIFEST
index 5a01ff9..eed1752 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -132,6 +132,7 @@
./examples/h5_extend_write.c
./examples/h5_extlink.c
./examples/h5_group.c
+./examples/h5_interm_group.c
./examples/h5_read.c
./examples/h5_write.c
./examples/h5_select.c
diff --git a/examples/h5_interm_group.c b/examples/h5_interm_group.c
new file mode 100644
index 0000000..7889abf
--- /dev/null
+++ b/examples/h5_interm_group.c
@@ -0,0 +1,113 @@
+/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
+ * Copyright by The HDF Group. *
+ * Copyright by the Board of Trustees of the University of Illinois. *
+ * All rights reserved. *
+ * *
+ * This file is part of HDF5. The full HDF5 copyright notice, including *
+ * terms governing use, modification, and redistribution, is contained in *
+ * the files COPYING and Copyright.html. COPYING can be found at the root *
+ * of the source code distribution tree; Copyright.html can be found at the *
+ * root level of an installed copy of the electronic HDF5 document set and *
+ * is linked from the top-level documents page. It can also be found at *
+ * http://hdfgroup.org/HDF5/doc/Copyright.html. If you do not have *
+ * access to either file, you may request a copy from help@hdfgroup.org. *
+ * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
+
+/*
+ * This program checks if group exists in a file and creates it including
+ * all intermediate groups.
+ */
+
+
+#include "hdf5.h"
+
+
+#define H5FILE_NAME "interm_group.h5"
+#define TRUE 1
+#define FALSE 0
+
+int
+main(void)
+{
+
+ hid_t file;
+ hid_t g1_id, g2_id, g3_id;
+ hid_t grp_crt_plist;
+ H5G_info_t g2_info;
+ char name[3];
+
+ herr_t status;
+ int i;
+
+
+ /*
+ * Create a file using the default properties.
+ */
+ file = H5Fcreate(H5FILE_NAME, H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT);
+
+ /*
+ * Create a group in the file.
+ */
+ g1_id = H5Gcreate(file, "/G1", 0);
+
+ H5Gclose(g1_id);
+ H5Fclose(file);
+
+ /*
+ * Now reopen the file and group in the file.
+ */
+ file = H5Fopen(H5FILE_NAME, H5F_ACC_RDWR, H5P_DEFAULT);
+
+ /*
+ * Check if group /G1 exists in the file.
+ */
+ if(H5Lexists(file, "/G1", H5P_DEFAULT) !=FALSE)
+ printf("Group /G1 exists in the file\n");
+
+ /*
+ * Check that group G2/G3 exists in /G1 and if not create it using
+ * intermediate group creation property.
+ */
+ g1_id = H5Gopen(file, "/G1");
+/* Next commented call causes error stack to be printed out; the next one
+ * works fine; is it a bug or a feature? EIP 04-25-07
+*/
+/* if (H5Lexists(g1_id, "G2/G3", H5P_DEFAULT) !=TRUE) { */
+ if (H5Lexists(g1_id, "G2", H5P_DEFAULT) !=TRUE) {
+
+ grp_crt_plist = H5Pcreate(H5P_LINK_CREATE);
+
+ /* Set flag for intermediate group creation */
+ status = H5Pset_create_intermediate_group(grp_crt_plist, TRUE);
+ g3_id = H5Gcreate2(g1_id, "G2/G3", grp_crt_plist, H5P_DEFAULT, H5P_DEFAULT);
+ H5Gclose(g3_id);
+ }
+ H5Gclose(g1_id);
+
+
+ /* Now check if group /G1/G2 exists in the file, then open it and print
+ * its members names
+ */
+ if (H5Lexists(file, "/G1/G2", H5P_DEFAULT)) {
+
+ g2_id = H5Gopen(file, "/G1/G2");
+ status = H5Gget_info(g2_id, ".", &g2_info, H5P_DEFAULT);
+ printf("Group /G1/G2 has %d member(s)\n", (int)g2_info.nlinks);
+
+ for (i=0; i < (int)g2_info.nlinks; i++) {
+ H5Lget_name_by_idx(g2_id, ".", H5_INDEX_NAME, H5_ITER_NATIVE, (hsize_t)i,
+ name, 3, H5P_DEFAULT);
+ printf("Object's name is %s\n", name);
+
+ }
+ H5Gclose(g2_id);
+ }
+ H5Fclose(file);
+ return 0;
+}
+
+
+
+
+
+