summaryrefslogtreecommitdiffstats
path: root/test/unlink.c
diff options
context:
space:
mode:
authorAllen Byrne <byrn@hdfgroup.org>2020-09-30 14:27:10 (GMT)
committerAllen Byrne <byrn@hdfgroup.org>2020-09-30 14:27:10 (GMT)
commitb2d661b508a7fc7a2592c13bc6bdc175551f075d (patch)
tree13baeb0d83a7c2a4c6299993c182b1227c2f6114 /test/unlink.c
parent29ab58b58dce556639ea3154e262895773a8a8df (diff)
downloadhdf5-b2d661b508a7fc7a2592c13bc6bdc175551f075d.zip
hdf5-b2d661b508a7fc7a2592c13bc6bdc175551f075d.tar.gz
hdf5-b2d661b508a7fc7a2592c13bc6bdc175551f075d.tar.bz2
Clang-format of source files
Diffstat (limited to 'test/unlink.c')
-rw-r--r--test/unlink.c2406
1 files changed, 1467 insertions, 939 deletions
diff --git a/test/unlink.c b/test/unlink.c
index f45d7d7..8129cc9 100644
--- a/test/unlink.c
+++ b/test/unlink.c
@@ -18,65 +18,53 @@
* Purpose: Test unlinking operations.
*/
-#define H5G_FRIEND /*suppress error about including H5Gpkg */
+#define H5G_FRIEND /*suppress error about including H5Gpkg */
/* Define this macro to indicate that the testing APIs should be available */
#define H5G_TESTING
#include "h5test.h"
-#include "H5Gpkg.h" /* Groups */
-
-const char *FILENAME[] = {
- "unlink",
- "new_move_a",
- "new_move_b",
- "lunlink",
- "filespace",
- "slashes",
- "resurrect_set",
- "resurrect_type",
- "resurrect_group",
- "unlink_chunked",
- "full_group",
- NULL
-};
+#include "H5Gpkg.h" /* Groups */
-/* Macros for test_create_unlink() & test_filespace */
-#define GROUPNAME "group"
-#define GROUP2NAME "group2"
-#define UNLINK_NGROUPS 1000
-#define DATASETNAME "dataset"
-#define DATASET2NAME "dataset2"
-#define ATTRNAME "attribute"
-#define TYPENAME "datatype"
-#define TYPE2NAME "datatype2"
-#define FILESPACE_NDIMS 3
-#define FILESPACE_DIM0 20
-#define FILESPACE_DIM1 20
-#define FILESPACE_DIM2 20
-#define FILESPACE_CHUNK0 10
-#define FILESPACE_CHUNK1 10
-#define FILESPACE_CHUNK2 10
-#define FILESPACE_DEFLATE_LEVEL 6
-#define FILESPACE_REWRITE 10
-#define FILESPACE_NATTR 100
-#define FILESPACE_ATTR_NDIMS 2
-#define FILESPACE_ATTR_DIM0 5
-#define FILESPACE_ATTR_DIM1 5
-#define FILESPACE_TOP_GROUPS 10
-#define FILESPACE_NESTED_GROUPS 50
-#define FILESPACE_NDATASETS 50
-#define SLASHES_GROUP_NAME "Group///"
-#define SLASHES_HARDLINK_NAME "Hard///"
-#define SLASHES_SOFTLINK_NAME "Soft///"
-#define SLASHES_SOFTLINK2_NAME "Soft2///"
-#define SLASHES_ROOTLINK_NAME "Root///"
-#define FULL_GROUP_NUM_KEEP 2
-#define FULL_GROUP_NUM_DELETE_COMPACT 2
-#define FULL_GROUP_NUM_DELETE_DENSE 16
-#define FULL_GROUP_EST_NUM_ENTRIES 8
-#define FULL_GROUP_EST_ENTRY_LEN 9
+const char *FILENAME[] = {"unlink", "new_move_a", "new_move_b", "lunlink",
+ "filespace", "slashes", "resurrect_set", "resurrect_type",
+ "resurrect_group", "unlink_chunked", "full_group", NULL};
+/* Macros for test_create_unlink() & test_filespace */
+#define GROUPNAME "group"
+#define GROUP2NAME "group2"
+#define UNLINK_NGROUPS 1000
+#define DATASETNAME "dataset"
+#define DATASET2NAME "dataset2"
+#define ATTRNAME "attribute"
+#define TYPENAME "datatype"
+#define TYPE2NAME "datatype2"
+#define FILESPACE_NDIMS 3
+#define FILESPACE_DIM0 20
+#define FILESPACE_DIM1 20
+#define FILESPACE_DIM2 20
+#define FILESPACE_CHUNK0 10
+#define FILESPACE_CHUNK1 10
+#define FILESPACE_CHUNK2 10
+#define FILESPACE_DEFLATE_LEVEL 6
+#define FILESPACE_REWRITE 10
+#define FILESPACE_NATTR 100
+#define FILESPACE_ATTR_NDIMS 2
+#define FILESPACE_ATTR_DIM0 5
+#define FILESPACE_ATTR_DIM1 5
+#define FILESPACE_TOP_GROUPS 10
+#define FILESPACE_NESTED_GROUPS 50
+#define FILESPACE_NDATASETS 50
+#define SLASHES_GROUP_NAME "Group///"
+#define SLASHES_HARDLINK_NAME "Hard///"
+#define SLASHES_SOFTLINK_NAME "Soft///"
+#define SLASHES_SOFTLINK2_NAME "Soft2///"
+#define SLASHES_ROOTLINK_NAME "Root///"
+#define FULL_GROUP_NUM_KEEP 2
+#define FULL_GROUP_NUM_DELETE_COMPACT 2
+#define FULL_GROUP_NUM_DELETE_DENSE 16
+#define FULL_GROUP_EST_NUM_ENTRIES 8
+#define FULL_GROUP_EST_ENTRY_LEN 9
/*-------------------------------------------------------------------------
* Function: test_one
@@ -98,51 +86,61 @@ const char *FILENAME[] = {
static int
test_one(hid_t file)
{
- hid_t work = -1, grp = -1;
- herr_t status;
+ hid_t work = -1, grp = -1;
+ herr_t status;
/* Create a test group */
- if((work = H5Gcreate2(file, "/test_one", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((work = H5Gcreate2(file, "/test_one", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Delete by absolute name */
TESTING("unlink by absolute name");
- if((grp = H5Gcreate2(work, "foo", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Gclose(grp) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(file, "/test_one/foo", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if ((grp = H5Gcreate2(work, "foo", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Gclose(grp) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(file, "/test_one/foo", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
PASSED();
/* Delete by local name */
TESTING("unlink by local name");
- if((grp = H5Gcreate2(work, "foo", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Gclose(grp) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(work, "foo", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if ((grp = H5Gcreate2(work, "foo", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Gclose(grp) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(work, "foo", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
PASSED();
/* Delete directly - should fail */
TESTING("unlink without a name");
- if((grp = H5Gcreate2(work, "foo", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- H5E_BEGIN_TRY {
- status = H5Ldelete(grp, ".", H5P_DEFAULT);
- } H5E_END_TRY;
- if(status>=0)
- FAIL_PUTS_ERROR(" Unlinking object w/o a name should have failed.")
- if(H5Gclose(grp) < 0) FAIL_STACK_ERROR
+ if ((grp = H5Gcreate2(work, "foo", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ H5E_BEGIN_TRY { status = H5Ldelete(grp, ".", H5P_DEFAULT); }
+ H5E_END_TRY;
+ if (status >= 0)
+ FAIL_PUTS_ERROR(" Unlinking object w/o a name should have failed.")
+ if (H5Gclose(grp) < 0)
+ FAIL_STACK_ERROR
/* Cleanup */
- if(H5Gclose(work) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(work) < 0)
+ FAIL_STACK_ERROR
PASSED();
return 0;
- error:
- H5E_BEGIN_TRY {
- H5Gclose(work);
- H5Gclose(grp);
- } H5E_END_TRY;
+error:
+ H5E_BEGIN_TRY
+ {
+ H5Gclose(work);
+ H5Gclose(grp);
+ }
+ H5E_END_TRY;
return 1;
} /* end test_one() */
-
/*-------------------------------------------------------------------------
* Function: test_many
*
@@ -162,84 +160,96 @@ test_one(hid_t file)
static int
test_many(hid_t file)
{
- hid_t work=-1, grp=-1;
- int i;
- const int how_many=500;
- char name[32];
+ hid_t work = -1, grp = -1;
+ int i;
+ const int how_many = 500;
+ char name[32];
/* Create a test group */
- if((work = H5Gcreate2(file, "/test_many", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) goto error;
- if((grp = H5Gcreate2(work, "/test_many_foo", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) goto error;
- if(H5Gclose(grp) < 0) goto error;
+ if ((work = H5Gcreate2(file, "/test_many", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ goto error;
+ if ((grp = H5Gcreate2(work, "/test_many_foo", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ goto error;
+ if (H5Gclose(grp) < 0)
+ goto error;
/* Create a bunch of names and unlink them in order */
TESTING("forward unlink");
- for(i = 0; i < how_many; i++) {
- HDsprintf(name, "obj_%05d", i);
- if(H5Lcreate_hard(work, "/test_many_foo", H5L_SAME_LOC, name, H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ for (i = 0; i < how_many; i++) {
+ HDsprintf(name, "obj_%05d", i);
+ if (H5Lcreate_hard(work, "/test_many_foo", H5L_SAME_LOC, name, H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
} /* end for */
- for(i = 0; i < how_many; i++) {
- HDsprintf(name, "obj_%05d", i);
- if(H5Ldelete(work, name, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ for (i = 0; i < how_many; i++) {
+ HDsprintf(name, "obj_%05d", i);
+ if (H5Ldelete(work, name, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
} /* end for */
PASSED();
/* Create a bunch of names and unlink them in reverse order */
TESTING("backward unlink");
- for(i = 0; i < how_many; i++) {
- HDsprintf(name, "obj_%05d", i);
- if(H5Lcreate_hard(work, "/test_many_foo", H5L_SAME_LOC, name, H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ for (i = 0; i < how_many; i++) {
+ HDsprintf(name, "obj_%05d", i);
+ if (H5Lcreate_hard(work, "/test_many_foo", H5L_SAME_LOC, name, H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
} /* end for */
- for(i = (how_many - 1); i >= 0; --i) {
- HDsprintf(name, "obj_%05d", i);
- if(H5Ldelete(work, name, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ for (i = (how_many - 1); i >= 0; --i) {
+ HDsprintf(name, "obj_%05d", i);
+ if (H5Ldelete(work, name, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
} /* end for */
PASSED();
/* Create a bunch of names and unlink them from both directions */
TESTING("inward unlink");
- for(i = 0; i < how_many; i++) {
- HDsprintf(name, "obj_%05d", i);
- if(H5Lcreate_hard(work, "/test_many_foo", H5L_SAME_LOC, name, H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ for (i = 0; i < how_many; i++) {
+ HDsprintf(name, "obj_%05d", i);
+ if (H5Lcreate_hard(work, "/test_many_foo", H5L_SAME_LOC, name, H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
} /* end for */
- for(i = 0; i < how_many; i++) {
- if(i % 2)
- HDsprintf(name, "obj_%05d", how_many - (1 + i / 2));
- else
- HDsprintf(name, "obj_%05d", i / 2);
- if(H5Ldelete(work, name, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ for (i = 0; i < how_many; i++) {
+ if (i % 2)
+ HDsprintf(name, "obj_%05d", how_many - (1 + i / 2));
+ else
+ HDsprintf(name, "obj_%05d", i / 2);
+ if (H5Ldelete(work, name, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
} /* end for */
PASSED();
/* Create a bunch of names and unlink them from the midle */
TESTING("outward unlink");
- for(i = 0; i < how_many; i++) {
- HDsprintf(name, "obj_%05d", i);
- if(H5Lcreate_hard(work, "/test_many_foo", H5L_SAME_LOC, name, H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ for (i = 0; i < how_many; i++) {
+ HDsprintf(name, "obj_%05d", i);
+ if (H5Lcreate_hard(work, "/test_many_foo", H5L_SAME_LOC, name, H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
} /* end for */
- for(i = (how_many - 1); i >= 0; --i) {
- if(i % 2)
- HDsprintf(name, "obj_%05d", how_many - (1 + i / 2));
- else
- HDsprintf(name, "obj_%05d", i / 2);
- if(H5Ldelete(work, name, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ for (i = (how_many - 1); i >= 0; --i) {
+ if (i % 2)
+ HDsprintf(name, "obj_%05d", how_many - (1 + i / 2));
+ else
+ HDsprintf(name, "obj_%05d", i / 2);
+ if (H5Ldelete(work, name, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
} /* end for */
PASSED();
-
/* Cleanup */
- if (H5Gclose(work) < 0) goto error;
+ if (H5Gclose(work) < 0)
+ goto error;
return 0;
- error:
- H5E_BEGIN_TRY {
- H5Gclose(work);
- H5Gclose(grp);
- } H5E_END_TRY;
+error:
+ H5E_BEGIN_TRY
+ {
+ H5Gclose(work);
+ H5Gclose(grp);
+ }
+ H5E_END_TRY;
return 1;
}
-
/*-------------------------------------------------------------------------
* Function: test_symlink
*
@@ -257,29 +267,31 @@ test_many(hid_t file)
static int
test_symlink(hid_t file)
{
- hid_t work=-1;
+ hid_t work = -1;
TESTING("symlink removal");
/* Create a test group and symlink */
- if((work = H5Gcreate2(file, "/test_symlink", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Lcreate_soft("link_value", work, "link", H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(work, "link", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if ((work = H5Gcreate2(file, "/test_symlink", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Lcreate_soft("link_value", work, "link", H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(work, "link", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Cleanup */
- if(H5Gclose(work) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(work) < 0)
+ FAIL_STACK_ERROR
PASSED();
return 0;
error:
- H5E_BEGIN_TRY {
- H5Gclose(work);
- } H5E_END_TRY;
+ H5E_BEGIN_TRY { H5Gclose(work); }
+ H5E_END_TRY;
return 1;
} /* end test_symlink() */
-
/*-------------------------------------------------------------------------
* Function: test_rename
*
@@ -299,41 +311,53 @@ error:
static int
test_rename(hid_t file)
{
- hid_t work=-1, foo=-1, inner=-1;
+ hid_t work = -1, foo = -1, inner = -1;
/* Create a test group and rename something */
TESTING("object renaming");
- if((work = H5Gcreate2(file, "/test_rename", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if((foo = H5Gcreate2(work, "foo", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Lmove(work, "foo", H5L_SAME_LOC, "bar", H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if((inner = H5Gcreate2(foo, "inner", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Gclose(inner) < 0) FAIL_STACK_ERROR
- if(H5Gclose(foo) < 0) FAIL_STACK_ERROR
- if((inner = H5Gopen2(work, "bar/inner", H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Gclose(inner) < 0) FAIL_STACK_ERROR
+ if ((work = H5Gcreate2(file, "/test_rename", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if ((foo = H5Gcreate2(work, "foo", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Lmove(work, "foo", H5L_SAME_LOC, "bar", H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if ((inner = H5Gcreate2(foo, "inner", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Gclose(inner) < 0)
+ FAIL_STACK_ERROR
+ if (H5Gclose(foo) < 0)
+ FAIL_STACK_ERROR
+ if ((inner = H5Gopen2(work, "bar/inner", H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Gclose(inner) < 0)
+ FAIL_STACK_ERROR
PASSED();
/* Try renaming a symlink */
TESTING("symlink renaming");
- if(H5Lcreate_soft("link_value", work, "link_one", H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Lmove(work, "link_one", H5L_SAME_LOC, "link_two", H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Lcreate_soft("link_value", work, "link_one", H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Lmove(work, "link_one", H5L_SAME_LOC, "link_two", H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Cleanup */
- if (H5Gclose(work) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(work) < 0)
+ FAIL_STACK_ERROR
PASSED();
return 0;
error:
- H5E_BEGIN_TRY {
- H5Gclose(work);
- H5Gclose(foo);
- H5Gclose(inner);
- } H5E_END_TRY;
+ H5E_BEGIN_TRY
+ {
+ H5Gclose(work);
+ H5Gclose(foo);
+ H5Gclose(inner);
+ }
+ H5E_END_TRY;
return 1;
} /* end test_rename() */
-
/*-------------------------------------------------------------------------
* Function: test_new_move
*
@@ -353,67 +377,90 @@ error:
static int
test_new_move(hid_t fapl)
{
- hid_t file_a, file_b=(-1);
- hid_t grp_1=(-1), grp_2=(-1), grp_move=(-1), moved_grp=(-1);
- char filename[1024];
+ hid_t file_a, file_b = (-1);
+ hid_t grp_1 = (-1), grp_2 = (-1), grp_move = (-1), moved_grp = (-1);
+ char filename[1024];
TESTING("new move");
/* Create a second file */
h5_fixname(FILENAME[1], fapl, filename, sizeof filename);
- if((file_a = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file_a = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
h5_fixname(FILENAME[2], fapl, filename, sizeof filename);
- if((file_b = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file_b = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create groups in first file */
- if((grp_1 = H5Gcreate2(file_a, "group1", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if((grp_2 = H5Gcreate2(file_a, "group2", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if((grp_move = H5Gcreate2(grp_1, "group_move", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((grp_1 = H5Gcreate2(file_a, "group1", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if ((grp_2 = H5Gcreate2(file_a, "group2", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if ((grp_move = H5Gcreate2(grp_1, "group_move", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Create hard and soft links. */
- if(H5Lcreate_hard(grp_1, "group_move", H5L_SAME_LOC, "hard", H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Lcreate_soft("/group1/group_move", grp_2, "soft", H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Lcreate_hard(grp_1, "group_move", H5L_SAME_LOC, "hard", H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Lcreate_soft("/group1/group_move", grp_2, "soft", H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Move a group within the file. Both of source and destination use
* H5L_SAME_LOC. Should fail. */
- H5E_BEGIN_TRY {
- if(H5Lmove(H5L_SAME_LOC, "group_move", H5L_SAME_LOC, "group_new_name", H5P_DEFAULT, H5P_DEFAULT) != FAIL) TEST_ERROR
- } H5E_END_TRY;
+ H5E_BEGIN_TRY
+ {
+ if (H5Lmove(H5L_SAME_LOC, "group_move", H5L_SAME_LOC, "group_new_name", H5P_DEFAULT, H5P_DEFAULT) !=
+ FAIL)
+ TEST_ERROR
+ }
+ H5E_END_TRY;
/* Move a group across files. Should fail. */
- H5E_BEGIN_TRY {
- if(H5Lmove(grp_1, "group_move", file_b, "group_new_name", H5P_DEFAULT, H5P_DEFAULT) != FAIL) TEST_ERROR
- } H5E_END_TRY;
+ H5E_BEGIN_TRY
+ {
+ if (H5Lmove(grp_1, "group_move", file_b, "group_new_name", H5P_DEFAULT, H5P_DEFAULT) != FAIL)
+ TEST_ERROR
+ }
+ H5E_END_TRY;
/* Move a group across groups in the same file. */
- if(H5Lmove(grp_1, "group_move", grp_2, "group_new_name", H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Lmove(grp_1, "group_move", grp_2, "group_new_name", H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Open the group just moved to the new location. */
- if((moved_grp = H5Gopen2(grp_2, "group_new_name", H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((moved_grp = H5Gopen2(grp_2, "group_new_name", H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
- if(H5Gclose(grp_1) < 0) FAIL_STACK_ERROR
- if(H5Gclose(grp_2) < 0) FAIL_STACK_ERROR
- if(H5Gclose(grp_move) < 0) FAIL_STACK_ERROR
- if(H5Gclose(moved_grp) < 0) FAIL_STACK_ERROR
- if(H5Fclose(file_a) < 0) FAIL_STACK_ERROR
- if(H5Fclose(file_b) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(grp_1) < 0)
+ FAIL_STACK_ERROR
+ if (H5Gclose(grp_2) < 0)
+ FAIL_STACK_ERROR
+ if (H5Gclose(grp_move) < 0)
+ FAIL_STACK_ERROR
+ if (H5Gclose(moved_grp) < 0)
+ FAIL_STACK_ERROR
+ if (H5Fclose(file_a) < 0)
+ FAIL_STACK_ERROR
+ if (H5Fclose(file_b) < 0)
+ FAIL_STACK_ERROR
PASSED();
return 0;
- error:
- H5E_BEGIN_TRY {
- H5Gclose(grp_1);
- H5Gclose(grp_2);
- H5Gclose(grp_move);
+error:
+ H5E_BEGIN_TRY
+ {
+ H5Gclose(grp_1);
+ H5Gclose(grp_2);
+ H5Gclose(grp_move);
H5Gclose(moved_grp);
- H5Fclose(file_a);
- H5Fclose(file_b);
- } H5E_END_TRY;
+ H5Fclose(file_a);
+ H5Fclose(file_b);
+ }
+ H5E_END_TRY;
return 1;
}
-
/*-------------------------------------------------------------------------
* Function: check_new_move
*
@@ -443,31 +490,32 @@ check_new_move(hid_t fapl)
/* Open file */
h5_fixname(FILENAME[1], fapl, filename, sizeof(filename));
- if((file = H5Fopen(filename, H5F_ACC_RDONLY, fapl)) < 0)
+ if ((file = H5Fopen(filename, H5F_ACC_RDONLY, fapl)) < 0)
FAIL_STACK_ERROR
/* Get hard link info */
- if(H5Oget_info_by_name3(file, "/group2/group_new_name", &oi_hard1, H5O_INFO_BASIC, H5P_DEFAULT) < 0)
+ if (H5Oget_info_by_name3(file, "/group2/group_new_name", &oi_hard1, H5O_INFO_BASIC, H5P_DEFAULT) < 0)
FAIL_STACK_ERROR
- if(H5Oget_info_by_name3(file, "/group1/hard", &oi_hard2, H5O_INFO_BASIC, H5P_DEFAULT) < 0)
+ if (H5Oget_info_by_name3(file, "/group1/hard", &oi_hard2, H5O_INFO_BASIC, H5P_DEFAULT) < 0)
FAIL_STACK_ERROR
/* Check hard links */
- if(H5O_TYPE_GROUP != oi_hard1.type || H5O_TYPE_GROUP != oi_hard2.type)
+ if (H5O_TYPE_GROUP != oi_hard1.type || H5O_TYPE_GROUP != oi_hard2.type)
FAIL_PUTS_ERROR(" Unexpected object type, should have been a group")
- if(H5Otoken_cmp(file, &oi_hard1.token, &oi_hard2.token, &token_cmp) < 0)
+ if (H5Otoken_cmp(file, &oi_hard1.token, &oi_hard2.token, &token_cmp) < 0)
FAIL_PUTS_ERROR(" H5Otoken_cmp failed")
- if(token_cmp)
+ if (token_cmp)
FAIL_PUTS_ERROR(" Hard link test failed. Link seems not to point to the expected file location.")
/* Check soft links */
- if(H5Lget_val(file, "group2/soft", linkval, sizeof(linkval), H5P_DEFAULT) < 0)
+ if (H5Lget_val(file, "group2/soft", linkval, sizeof(linkval), H5P_DEFAULT) < 0)
FAIL_STACK_ERROR
- if(HDstrcmp(linkval, "/group1/group_move"))
+ if (HDstrcmp(linkval, "/group1/group_move"))
FAIL_PUTS_ERROR(" Soft link test failed. Wrong link value")
/* Cleanup */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
PASSED();
return 0;
@@ -476,7 +524,6 @@ error:
return 1;
} /* end check_new_move() */
-
/*-------------------------------------------------------------------------
* Function: test_filespace
*
@@ -495,33 +542,35 @@ error:
static int
test_filespace(hid_t fapl)
{
- hid_t fapl_nocache; /* File access property list with raw data cache turned off */
- hid_t contig_dcpl; /* Dataset creation property list for contiguous dataset */
- hid_t early_chunk_dcpl; /* Dataset creation property list for chunked dataset & early allocation */
- hid_t late_chunk_dcpl; /* Dataset creation property list for chunked dataset & late allocation */
- hid_t comp_dcpl; /* Dataset creation property list for compressed, chunked dataset */
- hid_t compact_dcpl; /* Dataset creation property list for compact dataset */
- hid_t file; /* File ID */
- hid_t group, group2; /* Group IDs */
- hid_t dataset, dataset2; /* Dataset IDs */
- hid_t space; /* Dataspace ID */
- hid_t type; /* Datatype ID */
- hid_t attr_space; /* Dataspace ID for attributes */
- hid_t attr; /* Attribute ID */
- char filename[1024]; /* Name of file to create */
- char objname[128]; /* Name of object to create */
- hsize_t dims[FILESPACE_NDIMS]= {FILESPACE_DIM0, FILESPACE_DIM1, FILESPACE_DIM2}; /* Dataset dimensions */
- hsize_t chunk_dims[FILESPACE_NDIMS]= {FILESPACE_CHUNK0, FILESPACE_CHUNK1, FILESPACE_CHUNK2}; /* Chunk dimensions */
- hsize_t attr_dims[FILESPACE_ATTR_NDIMS]= {FILESPACE_ATTR_DIM0, FILESPACE_ATTR_DIM1}; /* Attribute dimensions */
- int *data = NULL; /* Pointer to dataset buffer */
- int *tmp_data; /* Temporary pointer to dataset buffer */
- h5_stat_size_t empty_size; /* Size of an empty file */
- h5_stat_size_t file_size; /* Size of each file created */
- herr_t status; /* Function status return value */
- unsigned u,v,w; /* Local index variables */
+ hid_t fapl_nocache; /* File access property list with raw data cache turned off */
+ hid_t contig_dcpl; /* Dataset creation property list for contiguous dataset */
+ hid_t early_chunk_dcpl; /* Dataset creation property list for chunked dataset & early allocation */
+ hid_t late_chunk_dcpl; /* Dataset creation property list for chunked dataset & late allocation */
+ hid_t comp_dcpl; /* Dataset creation property list for compressed, chunked dataset */
+ hid_t compact_dcpl; /* Dataset creation property list for compact dataset */
+ hid_t file; /* File ID */
+ hid_t group, group2; /* Group IDs */
+ hid_t dataset, dataset2; /* Dataset IDs */
+ hid_t space; /* Dataspace ID */
+ hid_t type; /* Datatype ID */
+ hid_t attr_space; /* Dataspace ID for attributes */
+ hid_t attr; /* Attribute ID */
+ char filename[1024]; /* Name of file to create */
+ char objname[128]; /* Name of object to create */
+ hsize_t dims[FILESPACE_NDIMS] = {FILESPACE_DIM0, FILESPACE_DIM1, FILESPACE_DIM2}; /* Dataset dimensions */
+ hsize_t chunk_dims[FILESPACE_NDIMS] = {FILESPACE_CHUNK0, FILESPACE_CHUNK1,
+ FILESPACE_CHUNK2}; /* Chunk dimensions */
+ hsize_t attr_dims[FILESPACE_ATTR_NDIMS] = {FILESPACE_ATTR_DIM0,
+ FILESPACE_ATTR_DIM1}; /* Attribute dimensions */
+ int * data = NULL; /* Pointer to dataset buffer */
+ int * tmp_data; /* Temporary pointer to dataset buffer */
+ h5_stat_size_t empty_size; /* Size of an empty file */
+ h5_stat_size_t file_size; /* Size of each file created */
+ herr_t status; /* Function status return value */
+ unsigned u, v, w; /* Local index variables */
/* Metadata cache parameters */
- int mdc_nelmts;
+ int mdc_nelmts;
size_t rdcc_nelmts;
size_t rdcc_nbytes;
double rdcc_w0;
@@ -531,697 +580,871 @@ test_filespace(hid_t fapl)
/* Open file */
h5_fixname(FILENAME[4], fapl, filename, sizeof filename);
-/* Create FAPL with raw data cache disabled */
+ /* Create FAPL with raw data cache disabled */
/* Create file access property list with raw data cache disabled */
- if ((fapl_nocache=H5Pcopy(fapl)) < 0) TEST_ERROR
+ if ((fapl_nocache = H5Pcopy(fapl)) < 0)
+ TEST_ERROR
/* Get the cache settings */
- if(H5Pget_cache(fapl_nocache,&mdc_nelmts,&rdcc_nelmts,&rdcc_nbytes,&rdcc_w0) < 0) TEST_ERROR
+ if (H5Pget_cache(fapl_nocache, &mdc_nelmts, &rdcc_nelmts, &rdcc_nbytes, &rdcc_w0) < 0)
+ TEST_ERROR
/* Disable the raw data cache */
- rdcc_nelmts=0;
- rdcc_nbytes=0;
- if(H5Pset_cache(fapl_nocache,mdc_nelmts,rdcc_nelmts,rdcc_nbytes,rdcc_w0) < 0) TEST_ERROR
+ rdcc_nelmts = 0;
+ rdcc_nbytes = 0;
+ if (H5Pset_cache(fapl_nocache, mdc_nelmts, rdcc_nelmts, rdcc_nbytes, rdcc_w0) < 0)
+ TEST_ERROR
-/* Create empty file for size comparisons later */
+ /* Create empty file for size comparisons later */
/* Create file */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) TEST_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ TEST_ERROR
/* Close file */
- if(H5Fclose(file) < 0) TEST_ERROR
+ if (H5Fclose(file) < 0)
+ TEST_ERROR
/* Get the size of an empty file */
- if((empty_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((empty_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
-/* Create common objects for datasets */
+ /* Create common objects for datasets */
/* Create dataset creation property list for contigous storage */
- if ((contig_dcpl=H5Pcreate(H5P_DATASET_CREATE)) < 0) TEST_ERROR
+ if ((contig_dcpl = H5Pcreate(H5P_DATASET_CREATE)) < 0)
+ TEST_ERROR
/* Make certain that space is allocated early */
- if(H5Pset_alloc_time(contig_dcpl, H5D_ALLOC_TIME_EARLY) < 0) TEST_ERROR
+ if (H5Pset_alloc_time(contig_dcpl, H5D_ALLOC_TIME_EARLY) < 0)
+ TEST_ERROR
/* Create dataset creation property list for chunked storage & early allocation */
- if ((early_chunk_dcpl=H5Pcopy(contig_dcpl)) < 0) TEST_ERROR
+ if ((early_chunk_dcpl = H5Pcopy(contig_dcpl)) < 0)
+ TEST_ERROR
/* Set chunk dimensions */
- if(H5Pset_chunk(early_chunk_dcpl, FILESPACE_NDIMS, chunk_dims) < 0) TEST_ERROR
+ if (H5Pset_chunk(early_chunk_dcpl, FILESPACE_NDIMS, chunk_dims) < 0)
+ TEST_ERROR
/* Create dataset creation property list for chunked storage & late allocation */
- if ((late_chunk_dcpl=H5Pcreate(H5P_DATASET_CREATE)) < 0) TEST_ERROR
+ if ((late_chunk_dcpl = H5Pcreate(H5P_DATASET_CREATE)) < 0)
+ TEST_ERROR
/* Set chunk dimensions */
- if(H5Pset_chunk(late_chunk_dcpl, FILESPACE_NDIMS, chunk_dims) < 0) TEST_ERROR
+ if (H5Pset_chunk(late_chunk_dcpl, FILESPACE_NDIMS, chunk_dims) < 0)
+ TEST_ERROR
/* Create dataset creation property list for compressed, chunked storage & early allocation */
- if ((comp_dcpl=H5Pcopy(early_chunk_dcpl)) < 0) TEST_ERROR
+ if ((comp_dcpl = H5Pcopy(early_chunk_dcpl)) < 0)
+ TEST_ERROR
/* Enable compression & set level */
- if(H5Pset_deflate(comp_dcpl, FILESPACE_DEFLATE_LEVEL) < 0) TEST_ERROR
+ if (H5Pset_deflate(comp_dcpl, FILESPACE_DEFLATE_LEVEL) < 0)
+ TEST_ERROR
/* Create dataset creation property list for compact storage */
- if ((compact_dcpl=H5Pcreate(H5P_DATASET_CREATE)) < 0) TEST_ERROR
+ if ((compact_dcpl = H5Pcreate(H5P_DATASET_CREATE)) < 0)
+ TEST_ERROR
/* Set to compact storage */
- if(H5Pset_layout(compact_dcpl, H5D_COMPACT) < 0) TEST_ERROR
+ if (H5Pset_layout(compact_dcpl, H5D_COMPACT) < 0)
+ TEST_ERROR
/* Create dataspace for datasets */
- if((space = H5Screate_simple(FILESPACE_NDIMS, dims, NULL)) < 0) TEST_ERROR
+ if ((space = H5Screate_simple(FILESPACE_NDIMS, dims, NULL)) < 0)
+ TEST_ERROR
/* Create buffer for writing dataset */
- if(NULL == (data = (int *)HDmalloc(sizeof(int) * FILESPACE_DIM0 * FILESPACE_DIM1 * FILESPACE_DIM2))) TEST_ERROR
-
+ if (NULL == (data = (int *)HDmalloc(sizeof(int) * FILESPACE_DIM0 * FILESPACE_DIM1 * FILESPACE_DIM2)))
+ TEST_ERROR
-/* Create single dataset (with contiguous storage & late allocation), remove it & verify file size */
+ /* Create single dataset (with contiguous storage & late allocation), remove it & verify file size */
TESTING(" contiguous dataset with late allocation");
/* Create file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create a single dataset to remove */
- if((dataset = H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Dclose(dataset) < 0) FAIL_STACK_ERROR
+ if ((dataset =
+ H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Dclose(dataset) < 0)
+ FAIL_STACK_ERROR
/* Remove the dataset */
- if(H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close file */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != empty_size) TEST_ERROR
+ if (file_size != empty_size)
+ TEST_ERROR
PASSED();
-
-/* Create single dataset (with contiguous storage & early allocation), remove it & verify file size */
+ /* Create single dataset (with contiguous storage & early allocation), remove it & verify file size */
TESTING(" contiguous dataset with early allocation");
/* Create file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create a single dataset to remove */
- if((dataset = H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, contig_dcpl, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Dclose(dataset) < 0) FAIL_STACK_ERROR
+ if ((dataset =
+ H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, contig_dcpl, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Dclose(dataset) < 0)
+ FAIL_STACK_ERROR
/* Remove the dataset */
- if(H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close file */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != empty_size) TEST_ERROR
+ if (file_size != empty_size)
+ TEST_ERROR
PASSED();
-
-/* Create single dataset (with chunked storage & late allocation), remove it & verify file size */
+ /* Create single dataset (with chunked storage & late allocation), remove it & verify file size */
TESTING(" chunked dataset with late allocation");
/* Create file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create a single dataset to remove */
- if((dataset = H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, late_chunk_dcpl, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Dclose(dataset) < 0) FAIL_STACK_ERROR
+ if ((dataset = H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, late_chunk_dcpl,
+ H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Dclose(dataset) < 0)
+ FAIL_STACK_ERROR
/* Remove the dataset */
- if(H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close file */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != empty_size) TEST_ERROR
+ if (file_size != empty_size)
+ TEST_ERROR
PASSED();
-
-/* Create single dataset (with chunked storage & early allocation), remove it & verify file size */
+ /* Create single dataset (with chunked storage & early allocation), remove it & verify file size */
TESTING(" chunked dataset with early allocation");
/* Create file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create a single dataset to remove */
- if((dataset = H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, early_chunk_dcpl, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Dclose(dataset) < 0) FAIL_STACK_ERROR
+ if ((dataset = H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, early_chunk_dcpl,
+ H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Dclose(dataset) < 0)
+ FAIL_STACK_ERROR
/* Remove the dataset */
- if(H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close file */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != empty_size) TEST_ERROR
+ if (file_size != empty_size)
+ TEST_ERROR
PASSED();
-
-/* Create single dataset (with compressed storage & early allocation), remove it & verify file size */
+ /* Create single dataset (with compressed storage & early allocation), remove it & verify file size */
TESTING(" compressed, chunked dataset");
/* Create file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create a single dataset to remove */
- if((dataset = H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, comp_dcpl, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Dclose(dataset) < 0) FAIL_STACK_ERROR
+ if ((dataset =
+ H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, comp_dcpl, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Dclose(dataset) < 0)
+ FAIL_STACK_ERROR
/* Remove the dataset */
- if(H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close file */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != empty_size) TEST_ERROR
+ if (file_size != empty_size)
+ TEST_ERROR
PASSED();
-
-/* Create single dataset (with compressed storage & early allocation), re-write it a bunch of
- * times (which should re-allocate blocks many times) and remove it & verify
- * file size.
- */
+ /* Create single dataset (with compressed storage & early allocation), re-write it a bunch of
+ * times (which should re-allocate blocks many times) and remove it & verify
+ * file size.
+ */
TESTING(" re-writing compressed, chunked dataset");
/* Create file (using FAPL with disabled raw data cache) */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl_nocache)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl_nocache)) < 0)
+ FAIL_STACK_ERROR
/* Create a single dataset to remove */
- if((dataset = H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, comp_dcpl, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((dataset =
+ H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, comp_dcpl, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Alternate re-writing dataset with compressible & random data */
- for(u = 0; u < FILESPACE_REWRITE; u++) {
+ for (u = 0; u < FILESPACE_REWRITE; u++) {
/* Set buffer to some compressible values */
- for(v = 0, tmp_data = data; v < (FILESPACE_DIM0 * FILESPACE_DIM1 * FILESPACE_DIM2); v++)
+ for (v = 0, tmp_data = data; v < (FILESPACE_DIM0 * FILESPACE_DIM1 * FILESPACE_DIM2); v++)
*tmp_data++ = (int)(v * u);
/* Write the buffer to the dataset */
- if(H5Dwrite(dataset, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, data) < 0) FAIL_STACK_ERROR
+ if (H5Dwrite(dataset, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, data) < 0)
+ FAIL_STACK_ERROR
/* Set buffer to different random numbers each time */
- for(v = 0, tmp_data = data; v < (FILESPACE_DIM0 * FILESPACE_DIM1 * FILESPACE_DIM2); v++)
+ for (v = 0, tmp_data = data; v < (FILESPACE_DIM0 * FILESPACE_DIM1 * FILESPACE_DIM2); v++)
*tmp_data++ = (int)HDrandom();
/* Write the buffer to the dataset */
- if(H5Dwrite(dataset, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, data) < 0) FAIL_STACK_ERROR
+ if (H5Dwrite(dataset, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, data) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Close dataset */
- if(H5Dclose(dataset) < 0) FAIL_STACK_ERROR
+ if (H5Dclose(dataset) < 0)
+ FAIL_STACK_ERROR
/* Remove the dataset */
- if(H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close file */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl_nocache)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl_nocache)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != empty_size) TEST_ERROR
+ if (file_size != empty_size)
+ TEST_ERROR
PASSED();
-
-/* Create single dataset (with compact storage), remove it & verify file size */
+ /* Create single dataset (with compact storage), remove it & verify file size */
TESTING(" compact dataset");
/* Create file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create a single dataset to remove */
- if((dataset = H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, compact_dcpl, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Dclose(dataset) < 0) FAIL_STACK_ERROR
+ if ((dataset = H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, compact_dcpl,
+ H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Dclose(dataset) < 0)
+ FAIL_STACK_ERROR
/* Remove the dataset */
- if(H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close file */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != empty_size) TEST_ERROR
+ if (file_size != empty_size)
+ TEST_ERROR
PASSED();
-
-/* Create two datasets (with contiguous storage), alternate adding attributes
- * to each one (which creates many object header continuations),
- * remove both & verify file size.
- */
+ /* Create two datasets (with contiguous storage), alternate adding attributes
+ * to each one (which creates many object header continuations),
+ * remove both & verify file size.
+ */
TESTING(" object header continuations");
/* Create file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create datasets to remove */
- if((dataset = H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, contig_dcpl, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if((dataset2 = H5Dcreate2(file, DATASET2NAME, H5T_NATIVE_INT, space, H5P_DEFAULT, contig_dcpl, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((dataset =
+ H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, contig_dcpl, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if ((dataset2 = H5Dcreate2(file, DATASET2NAME, H5T_NATIVE_INT, space, H5P_DEFAULT, contig_dcpl,
+ H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Create a dataspace for the attributes */
- if((attr_space = H5Screate_simple(FILESPACE_ATTR_NDIMS, attr_dims, NULL)) < 0) FAIL_STACK_ERROR
+ if ((attr_space = H5Screate_simple(FILESPACE_ATTR_NDIMS, attr_dims, NULL)) < 0)
+ FAIL_STACK_ERROR
/* Alternate adding attributes to each one */
- for(u = 0; u < FILESPACE_NATTR; u++) {
+ for (u = 0; u < FILESPACE_NATTR; u++) {
/* Set the name of the attribute to create */
- HDsprintf(objname,"%s %u",ATTRNAME,u);
+ HDsprintf(objname, "%s %u", ATTRNAME, u);
/* Create an attribute on the first dataset */
- if((attr = H5Acreate2(dataset, objname, H5T_NATIVE_INT, attr_space, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((attr = H5Acreate2(dataset, objname, H5T_NATIVE_INT, attr_space, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Don't worry about writing the attribute - it will have a fill value */
/* Close the attribute on the first dataset */
- if(H5Aclose(attr) < 0) FAIL_STACK_ERROR
+ if (H5Aclose(attr) < 0)
+ FAIL_STACK_ERROR
/* Create an attribute on the second dataset */
- if((attr = H5Acreate2(dataset2, objname, H5T_NATIVE_INT, attr_space, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((attr = H5Acreate2(dataset2, objname, H5T_NATIVE_INT, attr_space, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Don't worry about writing the attribute - it will have a fill value */
/* Close the attribute on the second dataset */
- if(H5Aclose(attr) < 0) FAIL_STACK_ERROR
+ if (H5Aclose(attr) < 0)
+ FAIL_STACK_ERROR
/* Flush the file (to fix the sizes of object header buffers, etc) */
- if(H5Fflush(file,H5F_SCOPE_GLOBAL) < 0) FAIL_STACK_ERROR
+ if (H5Fflush(file, H5F_SCOPE_GLOBAL) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Close the dataspace for the attributes */
- if(H5Sclose(attr_space) < 0) FAIL_STACK_ERROR
+ if (H5Sclose(attr_space) < 0)
+ FAIL_STACK_ERROR
/* Close datasets */
- if(H5Dclose(dataset) < 0) FAIL_STACK_ERROR
- if(H5Dclose(dataset2) < 0) FAIL_STACK_ERROR
+ if (H5Dclose(dataset) < 0)
+ FAIL_STACK_ERROR
+ if (H5Dclose(dataset2) < 0)
+ FAIL_STACK_ERROR
/* Remove the datasets */
- if(H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(file, DATASET2NAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(file, DATASET2NAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close file */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != empty_size) TEST_ERROR
+ if (file_size != empty_size)
+ TEST_ERROR
PASSED();
-
-/* Create single named datatype, remove it & verify file size */
+ /* Create single named datatype, remove it & verify file size */
TESTING(" named datatype");
/* Create file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create datatype to commit */
- if((type = H5Tcopy(H5T_NATIVE_INT)) < 0) FAIL_STACK_ERROR
+ if ((type = H5Tcopy(H5T_NATIVE_INT)) < 0)
+ FAIL_STACK_ERROR
/* Create a single named datatype to remove */
- if(H5Tcommit2(file, TYPENAME, type, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Tclose(type) < 0) FAIL_STACK_ERROR
+ if (H5Tcommit2(file, TYPENAME, type, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Tclose(type) < 0)
+ FAIL_STACK_ERROR
/* Remove the named datatype */
- if(H5Ldelete(file, TYPENAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, TYPENAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close file */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != empty_size) TEST_ERROR
+ if (file_size != empty_size)
+ TEST_ERROR
PASSED();
-
-/* Create single group, remove it & verify file size */
+ /* Create single group, remove it & verify file size */
TESTING(" single group");
/* Create file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create a single group to remove */
- if((group = H5Gcreate2(file, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Gclose(group) < 0) FAIL_STACK_ERROR
+ if ((group = H5Gcreate2(file, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Gclose(group) < 0)
+ FAIL_STACK_ERROR
/* Remove the group */
- if(H5Ldelete(file, GROUPNAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, GROUPNAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close file */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != empty_size) TEST_ERROR
+ if (file_size != empty_size)
+ TEST_ERROR
PASSED();
-
-/* Create many groups, remove them & verify file size */
+ /* Create many groups, remove them & verify file size */
TESTING(" multiple groups");
/* Create file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create a many groups to remove */
- for(u = 0; u < UNLINK_NGROUPS; u++) {
+ for (u = 0; u < UNLINK_NGROUPS; u++) {
HDsprintf(objname, "%s %u", GROUPNAME, u);
- if((group = H5Gcreate2(file, objname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Gclose(group) < 0) FAIL_STACK_ERROR
+ if ((group = H5Gcreate2(file, objname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Gclose(group) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Remove the all the groups */
/* (Remove them in reverse order just to make file size calculation easier -QAK) */
- for(u = UNLINK_NGROUPS; u > 0; u--) {
+ for (u = UNLINK_NGROUPS; u > 0; u--) {
HDsprintf(objname, "%s %u", GROUPNAME, (u - 1));
- if(H5Ldelete(file, objname, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, objname, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Close file */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != empty_size) TEST_ERROR
+ if (file_size != empty_size)
+ TEST_ERROR
PASSED();
-
-/* Create simple group hiearchy, remove it & verify file size */
+ /* Create simple group hiearchy, remove it & verify file size */
TESTING(" simple group hierarchy");
/* Create file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create a small group hierarchy to remove */
- if((group = H5Gcreate2(file, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if((group2 = H5Gcreate2(group, GROUP2NAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Gclose(group2) < 0) FAIL_STACK_ERROR
- if(H5Gclose(group) < 0) FAIL_STACK_ERROR
+ if ((group = H5Gcreate2(file, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if ((group2 = H5Gcreate2(group, GROUP2NAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Gclose(group2) < 0)
+ FAIL_STACK_ERROR
+ if (H5Gclose(group) < 0)
+ FAIL_STACK_ERROR
/* Remove the second group */
- if(H5Ldelete(file, GROUPNAME "/" GROUP2NAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, GROUPNAME "/" GROUP2NAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Remove the first group */
- if(H5Ldelete(file, GROUPNAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, GROUPNAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close file */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != empty_size) TEST_ERROR
+ if (file_size != empty_size)
+ TEST_ERROR
PASSED();
-
-/* Create complex group hiearchy, remove it & verify file size */
+ /* Create complex group hiearchy, remove it & verify file size */
TESTING(" complex group hierarchy");
/* Create file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create a complex group hierarchy to remove */
- for(u = 0; u < FILESPACE_TOP_GROUPS; u++) {
+ for (u = 0; u < FILESPACE_TOP_GROUPS; u++) {
/* Create group */
- HDsprintf(objname,"%s %u",GROUPNAME,u);
- if((group = H5Gcreate2(file, objname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ HDsprintf(objname, "%s %u", GROUPNAME, u);
+ if ((group = H5Gcreate2(file, objname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Create nested groups inside top groups */
- for(v = 0; v < FILESPACE_NESTED_GROUPS; v++) {
+ for (v = 0; v < FILESPACE_NESTED_GROUPS; v++) {
/* Create group */
HDsprintf(objname, "%s %u", GROUP2NAME, v);
- if((group2 = H5Gcreate2(group, objname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((group2 = H5Gcreate2(group, objname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Create datasets inside nested groups */
- for(w = 0; w < FILESPACE_NDATASETS; w++) {
+ for (w = 0; w < FILESPACE_NDATASETS; w++) {
/* Create & close a dataset */
HDsprintf(objname, "%s %u", DATASETNAME, w);
- if((dataset = H5Dcreate2(group2, objname, H5T_NATIVE_INT, space, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Dclose(dataset) < 0) FAIL_STACK_ERROR
+ if ((dataset = H5Dcreate2(group2, objname, H5T_NATIVE_INT, space, H5P_DEFAULT, H5P_DEFAULT,
+ H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Dclose(dataset) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Close nested group */
- if(H5Gclose(group2) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(group2) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Close top group */
- if(H5Gclose(group) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(group) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Remove complex group hierarchy */
/* (Remove them in reverse order just to make file size calculation easier -QAK) */
- for(u = FILESPACE_TOP_GROUPS; u > 0; u--) {
+ for (u = FILESPACE_TOP_GROUPS; u > 0; u--) {
/* Open group */
HDsprintf(objname, "%s %u", GROUPNAME, (u - 1));
- if((group = H5Gopen2(file, objname, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((group = H5Gopen2(file, objname, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Open nested groups inside top groups */
- for(v = 0; v < FILESPACE_NESTED_GROUPS; v++) {
+ for (v = 0; v < FILESPACE_NESTED_GROUPS; v++) {
/* Create group */
HDsprintf(objname, "%s %u", GROUP2NAME, v);
- if((group2 = H5Gopen2(group, objname, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((group2 = H5Gopen2(group, objname, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Remove datasets inside nested groups */
- for(w = 0; w < FILESPACE_NDATASETS; w++) {
+ for (w = 0; w < FILESPACE_NDATASETS; w++) {
/* Remove dataset */
HDsprintf(objname, "%s %u", DATASETNAME, w);
- if(H5Ldelete(group2, objname, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(group2, objname, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Close nested group */
- if(H5Gclose(group2) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(group2) < 0)
+ FAIL_STACK_ERROR
/* Remove nested group */
- HDsprintf(objname, "%s %u",GROUP2NAME, v);
- if(H5Ldelete(group, objname, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ HDsprintf(objname, "%s %u", GROUP2NAME, v);
+ if (H5Ldelete(group, objname, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Close top group */
- if(H5Gclose(group) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(group) < 0)
+ FAIL_STACK_ERROR
/* Remove top group */
HDsprintf(objname, "%s %u", GROUPNAME, (u - 1));
- if(H5Ldelete(file, objname, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, objname, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Close file */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != empty_size) TEST_ERROR
+ if (file_size != empty_size)
+ TEST_ERROR
PASSED();
-
-/* Create dataset and duplicate dataset, remove original & verify file size */
+ /* Create dataset and duplicate dataset, remove original & verify file size */
TESTING(" duplicate dataset");
/* Create file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create a single dataset to remove */
- if((dataset = H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Dclose(dataset) < 0) FAIL_STACK_ERROR
+ if ((dataset =
+ H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Dclose(dataset) < 0)
+ FAIL_STACK_ERROR
/* Create another dataset with same name */
- H5E_BEGIN_TRY {
+ H5E_BEGIN_TRY
+ {
dataset = H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT);
- } H5E_END_TRY;
- if(dataset >= 0) {
+ }
+ H5E_END_TRY;
+ if (dataset >= 0) {
H5Dclose(dataset);
TEST_ERROR
} /* end if */
/* Remove the dataset */
- if(H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close file */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != empty_size) TEST_ERROR
+ if (file_size != empty_size)
+ TEST_ERROR
PASSED();
-
-/* Create group and duplicate group, remove original & verify file size */
+ /* Create group and duplicate group, remove original & verify file size */
TESTING(" duplicate group");
/* Create file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create a single group to remove */
- if((group = H5Gcreate2(file, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Gclose(group) < 0) FAIL_STACK_ERROR
+ if ((group = H5Gcreate2(file, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Gclose(group) < 0)
+ FAIL_STACK_ERROR
/* Create another group with same name */
- H5E_BEGIN_TRY {
- group = H5Gcreate2(file, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT);
- } H5E_END_TRY;
- if(group >= 0) {
+ H5E_BEGIN_TRY { group = H5Gcreate2(file, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT); }
+ H5E_END_TRY;
+ if (group >= 0) {
H5Gclose(group);
TEST_ERROR
} /* end if */
/* Remove the group */
- if(H5Ldelete(file, GROUPNAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, GROUPNAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close file */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != empty_size) TEST_ERROR
+ if (file_size != empty_size)
+ TEST_ERROR
PASSED();
-
-/* Create named datatype and duplicate named datatype, remove original & verify file size */
+ /* Create named datatype and duplicate named datatype, remove original & verify file size */
TESTING(" duplicate named datatype");
/* Create file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create datatype to commit */
- if((type = H5Tcopy(H5T_NATIVE_INT)) < 0) FAIL_STACK_ERROR
+ if ((type = H5Tcopy(H5T_NATIVE_INT)) < 0)
+ FAIL_STACK_ERROR
/* Create a single named datatype to remove */
- if(H5Tcommit2(file, TYPENAME, type, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Tclose(type) < 0) FAIL_STACK_ERROR
+ if (H5Tcommit2(file, TYPENAME, type, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Tclose(type) < 0)
+ FAIL_STACK_ERROR
/* Create datatype to commit */
- if((type = H5Tcopy(H5T_NATIVE_INT)) < 0) FAIL_STACK_ERROR
+ if ((type = H5Tcopy(H5T_NATIVE_INT)) < 0)
+ FAIL_STACK_ERROR
/* Create another named datatype with same name */
- H5E_BEGIN_TRY {
- status = H5Tcommit2(file, TYPENAME, type, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT);
- } H5E_END_TRY;
- if(status >= 0) TEST_ERROR
- if(H5Tclose(type) < 0) FAIL_STACK_ERROR
+ H5E_BEGIN_TRY { status = H5Tcommit2(file, TYPENAME, type, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT); }
+ H5E_END_TRY;
+ if (status >= 0)
+ TEST_ERROR
+ if (H5Tclose(type) < 0)
+ FAIL_STACK_ERROR
/* Remove the named datatype */
- if(H5Ldelete(file, TYPENAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, TYPENAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close file */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != empty_size) TEST_ERROR
+ if (file_size != empty_size)
+ TEST_ERROR
PASSED();
-
-/* Create named datatype and duplicate named datatype, remove original & verify file size */
+ /* Create named datatype and duplicate named datatype, remove original & verify file size */
TESTING(" duplicate attribute");
/* Create file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create datasets to remove */
- if((dataset = H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, contig_dcpl, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((dataset =
+ H5Dcreate2(file, DATASETNAME, H5T_NATIVE_INT, space, H5P_DEFAULT, contig_dcpl, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Create a dataspace for the attributes */
- if((attr_space = H5Screate_simple(FILESPACE_ATTR_NDIMS, attr_dims, NULL)) < 0) FAIL_STACK_ERROR
+ if ((attr_space = H5Screate_simple(FILESPACE_ATTR_NDIMS, attr_dims, NULL)) < 0)
+ FAIL_STACK_ERROR
/* Create an attribute on the dataset */
- if((attr = H5Acreate2(dataset, ATTRNAME, H5T_NATIVE_INT, attr_space, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((attr = H5Acreate2(dataset, ATTRNAME, H5T_NATIVE_INT, attr_space, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Don't worry about writing the attribute - it will have a fill value */
/* Close the attribute on the dataset */
- if(H5Aclose(attr) < 0) FAIL_STACK_ERROR
+ if (H5Aclose(attr) < 0)
+ FAIL_STACK_ERROR
/* Create another attribute with same name */
- H5E_BEGIN_TRY {
+ H5E_BEGIN_TRY
+ {
attr = H5Acreate2(dataset, ATTRNAME, H5T_NATIVE_INT, attr_space, H5P_DEFAULT, H5P_DEFAULT);
- } H5E_END_TRY;
- if(attr >= 0) {
+ }
+ H5E_END_TRY;
+ if (attr >= 0) {
H5Aclose(attr);
TEST_ERROR
} /* end if */
/* Close the dataspace for the attributes */
- if(H5Sclose(attr_space) < 0) FAIL_STACK_ERROR
+ if (H5Sclose(attr_space) < 0)
+ FAIL_STACK_ERROR
/* Close dataset */
- if(H5Dclose(dataset) < 0) FAIL_STACK_ERROR
+ if (H5Dclose(dataset) < 0)
+ FAIL_STACK_ERROR
/* Remove the dataset */
- if(H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, DATASETNAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close file */
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != empty_size) TEST_ERROR
+ if (file_size != empty_size)
+ TEST_ERROR
PASSED();
-
-/* Cleanup common objects */
+ /* Cleanup common objects */
/* Release dataset buffer */
HDfree(data);
/* Close property lists */
- if(H5Pclose(fapl_nocache) < 0) FAIL_STACK_ERROR
- if(H5Pclose(contig_dcpl) < 0) FAIL_STACK_ERROR
- if(H5Pclose(early_chunk_dcpl) < 0) FAIL_STACK_ERROR
- if(H5Pclose(late_chunk_dcpl) < 0) FAIL_STACK_ERROR
- if(H5Pclose(comp_dcpl) < 0) FAIL_STACK_ERROR
- if(H5Pclose(compact_dcpl) < 0) FAIL_STACK_ERROR
+ if (H5Pclose(fapl_nocache) < 0)
+ FAIL_STACK_ERROR
+ if (H5Pclose(contig_dcpl) < 0)
+ FAIL_STACK_ERROR
+ if (H5Pclose(early_chunk_dcpl) < 0)
+ FAIL_STACK_ERROR
+ if (H5Pclose(late_chunk_dcpl) < 0)
+ FAIL_STACK_ERROR
+ if (H5Pclose(comp_dcpl) < 0)
+ FAIL_STACK_ERROR
+ if (H5Pclose(compact_dcpl) < 0)
+ FAIL_STACK_ERROR
/* Close dataspace */
- if(H5Sclose(space) < 0) FAIL_STACK_ERROR
+ if (H5Sclose(space) < 0)
+ FAIL_STACK_ERROR
/* Indicate success */
/* Don't print final "PASSED", since we aren't on the correct line anymore */
@@ -1229,13 +1452,12 @@ test_filespace(hid_t fapl)
error:
/* Release dataset buffer */
- if(data)
+ if (data)
HDfree(data);
return 1;
} /* end test_filespace() */
-
/*-------------------------------------------------------------------------
* Function: test_create_unlink
*
@@ -1254,45 +1476,45 @@ error:
static int
test_create_unlink(const char *msg, hid_t fapl)
{
- hid_t file, group;
+ hid_t file, group;
unsigned u;
char groupname[1024];
- char filename[1024];
+ char filename[1024];
TESTING(msg);
/* Create file */
h5_fixname(FILENAME[3], fapl, filename, sizeof filename);
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
FAIL_PUTS_ERROR(" Creating file failed")
/* Create a many groups to remove */
- for(u = 0; u < UNLINK_NGROUPS; u++) {
+ for (u = 0; u < UNLINK_NGROUPS; u++) {
HDsprintf(groupname, "%s %u", GROUPNAME, u);
- if((group = H5Gcreate2(file, groupname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) {
+ if ((group = H5Gcreate2(file, groupname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) {
H5_FAILED();
HDprintf("group %s creation failed\n", groupname);
goto error;
} /* end if */
- if(H5Gclose (group) < 0) {
+ if (H5Gclose(group) < 0) {
H5_FAILED();
HDprintf("closing group %s failed\n", groupname);
goto error;
} /* end if */
- } /* end for */
+ } /* end for */
/* Remove the all the groups */
- for(u = 0; u < UNLINK_NGROUPS; u++) {
+ for (u = 0; u < UNLINK_NGROUPS; u++) {
HDsprintf(groupname, "%s %u", GROUPNAME, u);
- if(H5Ldelete(file, groupname, H5P_DEFAULT) < 0) {
+ if (H5Ldelete(file, groupname, H5P_DEFAULT) < 0) {
H5_FAILED();
HDprintf("Unlinking group %s failed\n", groupname);
goto error;
} /* end if */
- } /* end for */
+ } /* end for */
/* Close file */
- if(H5Fclose(file) < 0)
+ if (H5Fclose(file) < 0)
FAIL_PUTS_ERROR("Closing file failed")
PASSED();
@@ -1302,7 +1524,6 @@ error:
return 1;
} /* end test_create_unlink() */
-
/*-------------------------------------------------------------------------
* Function: test_link_slashes
*
@@ -1321,9 +1542,9 @@ error:
static int
test_link_slashes(hid_t fapl)
{
- hid_t fid; /* File ID */
- hid_t gid, gid2; /* Group ID */
- char filename[1024];
+ hid_t fid; /* File ID */
+ hid_t gid, gid2; /* Group ID */
+ char filename[1024];
TESTING("creating links with multiple slashes");
@@ -1331,37 +1552,51 @@ test_link_slashes(hid_t fapl)
h5_fixname(FILENAME[5], fapl, filename, sizeof filename);
/* Create a file */
- if((fid = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((fid = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Create a group in the root group */
- if((gid = H5Gcreate2(fid, SLASHES_GROUP_NAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((gid = H5Gcreate2(fid, SLASHES_GROUP_NAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Create a nested group in the root group */
- if((gid2 = H5Gcreate2(gid, SLASHES_GROUP_NAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((gid2 = H5Gcreate2(gid, SLASHES_GROUP_NAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Close the nested group */
- if(H5Gclose(gid2) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(gid2) < 0)
+ FAIL_STACK_ERROR
/* Create a hard link to the nested group */
- if(H5Lcreate_hard(gid, SLASHES_GROUP_NAME, H5L_SAME_LOC, SLASHES_HARDLINK_NAME, H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Lcreate_hard(gid, SLASHES_GROUP_NAME, H5L_SAME_LOC, SLASHES_HARDLINK_NAME, H5P_DEFAULT,
+ H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Create a soft link with a relative path to the nested group */
- if(H5Lcreate_soft(SLASHES_GROUP_NAME, gid, SLASHES_SOFTLINK_NAME, H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Lcreate_soft(SLASHES_GROUP_NAME, gid, SLASHES_SOFTLINK_NAME, H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Create a soft link with the full path to the nested group */
- if(H5Lcreate_soft("////"SLASHES_GROUP_NAME""SLASHES_GROUP_NAME, gid, SLASHES_SOFTLINK2_NAME, H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Lcreate_soft("////" SLASHES_GROUP_NAME "" SLASHES_GROUP_NAME, gid, SLASHES_SOFTLINK2_NAME,
+ H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Create a soft link to the root group */
- if(H5Lcreate_soft("////", gid, SLASHES_ROOTLINK_NAME, H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Lcreate_soft("////", gid, SLASHES_ROOTLINK_NAME, H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close the group */
- if(H5Gclose(gid) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(gid) < 0)
+ FAIL_STACK_ERROR
/* Create a hard link to the existing group */
- if(H5Lcreate_hard(fid, SLASHES_GROUP_NAME, H5L_SAME_LOC, SLASHES_HARDLINK_NAME, H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Lcreate_hard(fid, SLASHES_GROUP_NAME, H5L_SAME_LOC, SLASHES_HARDLINK_NAME, H5P_DEFAULT,
+ H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close the file */
- if(H5Fclose(fid) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(fid) < 0)
+ FAIL_STACK_ERROR
PASSED();
return 0;
@@ -1370,7 +1605,6 @@ error:
return 1;
} /* end test_link_slashes() */
-
/*-------------------------------------------------------------------------
* Function: test_unlink_slashes
*
@@ -1389,9 +1623,9 @@ error:
static int
test_unlink_slashes(hid_t fapl)
{
- hid_t fid; /* File ID */
- hid_t gid; /* Group ID */
- char filename[1024];
+ hid_t fid; /* File ID */
+ hid_t gid; /* Group ID */
+ char filename[1024];
TESTING("deleting links with multiple slashes");
@@ -1399,37 +1633,48 @@ test_unlink_slashes(hid_t fapl)
h5_fixname(FILENAME[5], fapl, filename, sizeof filename);
/* Open the file */
- if((fid = H5Fopen(filename, H5F_ACC_RDWR, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((fid = H5Fopen(filename, H5F_ACC_RDWR, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Open the top level group */
- if((gid = H5Gopen2(fid, SLASHES_GROUP_NAME, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((gid = H5Gopen2(fid, SLASHES_GROUP_NAME, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Delete the root link */
- if(H5Ldelete(gid,SLASHES_ROOTLINK_NAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(gid, SLASHES_ROOTLINK_NAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Delete the soft link with the full path */
- if(H5Ldelete(gid,SLASHES_SOFTLINK2_NAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(gid, SLASHES_SOFTLINK2_NAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Delete the soft link with the relative path */
- if(H5Ldelete(gid,SLASHES_SOFTLINK_NAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(gid, SLASHES_SOFTLINK_NAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Delete the hard link */
- if(H5Ldelete(gid,SLASHES_HARDLINK_NAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(gid, SLASHES_HARDLINK_NAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Delete the group itself */
- if(H5Ldelete(gid,SLASHES_GROUP_NAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(gid, SLASHES_GROUP_NAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close the group */
- if(H5Gclose(gid) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(gid) < 0)
+ FAIL_STACK_ERROR
/* Delete the hard link */
- if(H5Ldelete(fid,SLASHES_HARDLINK_NAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(fid, SLASHES_HARDLINK_NAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Delete the group itself */
- if(H5Ldelete(fid,SLASHES_GROUP_NAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(fid, SLASHES_GROUP_NAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close the file */
- if(H5Fclose(fid) < 0) TEST_ERROR
+ if (H5Fclose(fid) < 0)
+ TEST_ERROR
PASSED();
return 0;
@@ -1444,30 +1689,34 @@ error:
static int
delete_node(hid_t pid, hid_t id)
{
- char name[256]; /* Name of object to close */
+ char name[256]; /* Name of object to close */
/* Get the name of the object to delete */
- if(H5Iget_name(id, name, sizeof(name)) < 0) return (-1);
+ if (H5Iget_name(id, name, sizeof(name)) < 0)
+ return (-1);
/* Close the object */
- if(H5Gclose(id) < 0) return(-1);
+ if (H5Gclose(id) < 0)
+ return (-1);
/* Unlink the object */
- if(H5Ldelete(pid, name, H5P_DEFAULT) < 0) return(-1);
+ if (H5Ldelete(pid, name, H5P_DEFAULT) < 0)
+ return (-1);
/* If this object is the right-most child, try opening the previous object */
- if(HDstrcmp(name,"/Zone81") == 0) {
+ if (HDstrcmp(name, "/Zone81") == 0) {
hid_t gid;
- if((gid = H5Gopen2(pid, "/Zone80", H5P_DEFAULT)) < 0) return(-1);
- if(H5Gclose(gid) < 0) return(-1);
+ if ((gid = H5Gopen2(pid, "/Zone80", H5P_DEFAULT)) < 0)
+ return (-1);
+ if (H5Gclose(gid) < 0)
+ return (-1);
} /* end if */
/* Indicate success */
- return(0);
+ return (0);
}
-
/*-------------------------------------------------------------------------
* Function: test_unlink_rightleaf
*
@@ -1487,40 +1736,47 @@ delete_node(hid_t pid, hid_t id)
static int
test_unlink_rightleaf(hid_t fid)
{
- hid_t rootid = -1, /* Group ID for root group */
- *gids = NULL; /* Array of IDs for groups created */
- int n, /* Local index variable */
- ngroups = 150; /* Number of groups to create */
- char name[256]; /* Name of object to create */
+ hid_t rootid = -1, /* Group ID for root group */
+ *gids = NULL; /* Array of IDs for groups created */
+ int n, /* Local index variable */
+ ngroups = 150; /* Number of groups to create */
+ char name[256]; /* Name of object to create */
TESTING("deleting right-most child in non-leaf B-tree node");
/* Allocate space for the group IDs */
- if(NULL == (gids = (hid_t *)HDcalloc((size_t)ngroups, sizeof(hid_t)))) TEST_ERROR
+ if (NULL == (gids = (hid_t *)HDcalloc((size_t)ngroups, sizeof(hid_t))))
+ TEST_ERROR
- if((rootid = H5Gopen2(fid, "/", H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((rootid = H5Gopen2(fid, "/", H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Create all the groups */
for (n = 0; n < ngroups; n++) {
HDsprintf(name, "Zone%d", n + 1);
- if((gids[n] = H5Gcreate2(rootid, name, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) TEST_ERROR
+ if ((gids[n] = H5Gcreate2(rootid, name, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ TEST_ERROR
} /* end for */
/* Unlink & re-create each group */
for (n = 0; n < ngroups; n++) {
- if(delete_node (rootid, gids[n]) < 0) TEST_ERROR
+ if (delete_node(rootid, gids[n]) < 0)
+ TEST_ERROR
HDsprintf(name, "Zone%d", n + 1);
- if((gids[n] = H5Gcreate2(rootid, name, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) TEST_ERROR
+ if ((gids[n] = H5Gcreate2(rootid, name, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ TEST_ERROR
} /* end for */
/* Close all the groups */
for (n = 0; n < ngroups; n++) {
- if(H5Gclose(gids[n]) < 0) TEST_ERROR
+ if (H5Gclose(gids[n]) < 0)
+ TEST_ERROR
gids[n] = 0;
} /* end for */
/* Close root group ID */
- if(H5Gclose(rootid) < 0) TEST_ERROR
+ if (H5Gclose(rootid) < 0)
+ TEST_ERROR
/* Free memory */
HDfree(gids);
@@ -1529,24 +1785,21 @@ test_unlink_rightleaf(hid_t fid)
return 0;
error:
- if(gids) {
+ if (gids) {
/* Close any open groups */
for (n = 0; n < ngroups; n++)
- if(gids[n]) {
- H5E_BEGIN_TRY {
- H5Gclose(gids[n]);
- } H5E_END_TRY;
+ if (gids[n]) {
+ H5E_BEGIN_TRY { H5Gclose(gids[n]); }
+ H5E_END_TRY;
} /* end if */
HDfree(gids);
} /* end if */
- H5E_BEGIN_TRY {
- H5Gclose(rootid);
- } H5E_END_TRY;
+ H5E_BEGIN_TRY { H5Gclose(rootid); }
+ H5E_END_TRY;
return 1;
} /* end test_unlink_rightleaf() */
-
/*-------------------------------------------------------------------------
* Function: test_unlink_rightnode
*
@@ -1566,40 +1819,50 @@ error:
static int
test_unlink_rightnode(hid_t fid)
{
- hid_t rootid = -1, /* Group ID for root group */
- *gids = NULL; /* Array of IDs for groups created */
- int n, /* Local index variable */
- ngroups = 150; /* Number of groups to create */
- char name[256]; /* Name of object to create */
+ hid_t rootid = -1, /* Group ID for root group */
+ *gids = NULL; /* Array of IDs for groups created */
+ int n, /* Local index variable */
+ ngroups = 150; /* Number of groups to create */
+ char name[256]; /* Name of object to create */
TESTING("deleting right-most child in non-leaf B-tree node");
/* Allocate space for the group IDs */
- if(NULL == (gids = (hid_t *)HDcalloc((size_t)ngroups, sizeof(hid_t)))) TEST_ERROR
+ if (NULL == (gids = (hid_t *)HDcalloc((size_t)ngroups, sizeof(hid_t))))
+ TEST_ERROR
- if((rootid = H5Gopen2(fid, "/", H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((rootid = H5Gopen2(fid, "/", H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Create all the groups */
for (n = 0; n < ngroups; n++) {
HDsprintf(name, "ZoneB%d", n + 1);
- if((gids[n] = H5Gcreate2(rootid, name, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((gids[n] = H5Gcreate2(rootid, name, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Close all the groups */
for (n = 0; n < ngroups; n++) {
- if(H5Gclose(gids[n]) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(gids[n]) < 0)
+ FAIL_STACK_ERROR
gids[n] = 0;
} /* end for */
/* Unlink specific objects to trigger deletion of right leaf in non-leaf node */
- if(H5Ldelete(fid, "/ZoneB77", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneB78", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneB79", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneB8", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneB80", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneB77", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneB78", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneB79", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneB8", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneB80", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close root group ID */
- if(H5Gclose(rootid) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(rootid) < 0)
+ FAIL_STACK_ERROR
/* Free memory */
HDfree(gids);
@@ -1608,24 +1871,21 @@ test_unlink_rightnode(hid_t fid)
return 0;
error:
- if(gids) {
+ if (gids) {
/* Close any open groups */
for (n = 0; n < ngroups; n++)
- if(gids[n]) {
- H5E_BEGIN_TRY {
- H5Gclose(gids[n]);
- } H5E_END_TRY;
+ if (gids[n]) {
+ H5E_BEGIN_TRY { H5Gclose(gids[n]); }
+ H5E_END_TRY;
} /* end if */
HDfree(gids);
} /* end if */
- H5E_BEGIN_TRY {
- H5Gclose(rootid);
- } H5E_END_TRY;
+ H5E_BEGIN_TRY { H5Gclose(rootid); }
+ H5E_END_TRY;
return 1;
} /* end test_unlink_rightnode() */
-
/*-------------------------------------------------------------------------
* Function: test_unlink_middlenode
*
@@ -1645,183 +1905,336 @@ error:
static int
test_unlink_middlenode(hid_t fid)
{
- hid_t rootid = -1, /* Group ID for root group */
- *gids = NULL; /* Array of IDs for groups created */
- int n, /* Local index variable */
- ngroups = 250; /* Number of groups to create */
- char name[256]; /* Name of object to create */
+ hid_t rootid = -1, /* Group ID for root group */
+ *gids = NULL; /* Array of IDs for groups created */
+ int n, /* Local index variable */
+ ngroups = 250; /* Number of groups to create */
+ char name[256]; /* Name of object to create */
TESTING("deleting right-most child in non-leaf B-tree node");
/* Allocate space for the group IDs */
- if(NULL == (gids = (hid_t *)HDcalloc((size_t)ngroups, sizeof(hid_t)))) TEST_ERROR
+ if (NULL == (gids = (hid_t *)HDcalloc((size_t)ngroups, sizeof(hid_t))))
+ TEST_ERROR
- if((rootid = H5Gopen2(fid, "/", H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((rootid = H5Gopen2(fid, "/", H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Create all the groups */
for (n = 0; n < ngroups; n++) {
HDsprintf(name, "ZoneC%d", n + 1);
- if((gids[n] = H5Gcreate2(rootid, name, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((gids[n] = H5Gcreate2(rootid, name, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Close all the groups */
for (n = 0; n < ngroups; n++) {
- if(H5Gclose(gids[n]) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(gids[n]) < 0)
+ FAIL_STACK_ERROR
gids[n] = 0;
} /* end for */
/* Unlink specific objects to trigger deletion of all leafs in "interior" non-leaf node */
- if(H5Ldelete(fid, "/ZoneC11", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC110", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC111", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC112", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC113", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC114", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC115", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC116", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC117", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC118", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC119", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC12", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC120", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC121", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC122", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC123", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC124", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC125", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC126", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC127", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC128", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC129", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC13", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC130", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC131", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC132", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC133", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC134", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC135", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC136", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC137", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC138", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC139", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC14", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC140", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC141", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC142", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC143", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC144", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC145", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC146", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC147", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC148", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC149", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC15", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC150", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC151", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC152", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC153", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC154", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC155", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC156", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC157", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC158", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC159", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC16", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC160", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC161", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC162", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC163", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC164", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC165", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC166", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC167", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC168", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC169", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC17", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC170", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC171", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC172", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC173", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC174", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC175", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC176", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC177", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC178", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC179", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC18", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC180", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC19", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC2", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC20", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC21", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC22", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC23", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC24", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC25", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC26", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC27", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC28", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC29", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC3", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC30", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC31", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC32", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC33", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC34", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC35", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC36", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC37", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC38", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC39", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC4", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC40", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC41", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC42", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC43", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC44", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC45", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC46", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC47", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC48", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC49", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC5", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC50", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC51", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC52", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC53", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC54", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC55", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC56", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC57", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC58", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC59", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC6", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC60", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC61", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC62", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC63", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC64", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC65", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC66", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC67", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC68", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC69", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC7", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC70", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC71", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC72", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC73", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC74", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC75", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC76", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC77", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC78", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC79", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC8", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(H5Ldelete(fid, "/ZoneC80", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC11", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC110", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC111", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC112", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC113", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC114", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC115", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC116", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC117", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC118", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC119", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC12", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC120", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC121", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC122", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC123", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC124", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC125", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC126", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC127", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC128", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC129", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC13", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC130", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC131", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC132", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC133", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC134", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC135", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC136", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC137", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC138", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC139", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC14", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC140", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC141", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC142", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC143", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC144", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC145", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC146", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC147", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC148", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC149", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC15", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC150", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC151", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC152", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC153", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC154", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC155", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC156", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC157", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC158", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC159", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC16", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC160", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC161", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC162", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC163", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC164", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC165", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC166", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC167", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC168", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC169", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC17", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC170", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC171", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC172", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC173", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC174", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC175", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC176", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC177", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC178", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC179", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC18", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC180", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC19", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC2", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC20", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC21", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC22", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC23", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC24", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC25", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC26", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC27", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC28", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC29", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC3", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC30", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC31", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC32", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC33", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC34", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC35", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC36", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC37", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC38", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC39", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC4", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC40", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC41", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC42", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC43", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC44", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC45", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC46", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC47", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC48", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC49", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC5", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC50", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC51", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC52", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC53", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC54", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC55", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC56", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC57", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC58", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC59", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC6", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC60", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC61", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC62", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC63", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC64", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC65", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC66", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC67", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC68", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC69", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC7", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC70", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC71", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC72", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC73", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC74", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC75", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC76", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC77", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC78", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC79", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC8", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (H5Ldelete(fid, "/ZoneC80", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close root group ID */
- if(H5Gclose(rootid) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(rootid) < 0)
+ FAIL_STACK_ERROR
/* Free memory */
HDfree(gids);
@@ -1830,24 +2243,21 @@ test_unlink_middlenode(hid_t fid)
return 0;
error:
- if(gids) {
+ if (gids) {
/* Close any open groups */
for (n = 0; n < ngroups; n++)
- if(gids[n]) {
- H5E_BEGIN_TRY {
- H5Gclose(gids[n]);
- } H5E_END_TRY;
+ if (gids[n]) {
+ H5E_BEGIN_TRY { H5Gclose(gids[n]); }
+ H5E_END_TRY;
} /* end if */
HDfree(gids);
} /* end if */
- H5E_BEGIN_TRY {
- H5Gclose(rootid);
- } H5E_END_TRY;
+ H5E_BEGIN_TRY { H5Gclose(rootid); }
+ H5E_END_TRY;
return 1;
} /* end test_unlink_middlenode() */
-
/*-------------------------------------------------------------------------
* Function: test_resurrect_dataset
*
@@ -1867,8 +2277,8 @@ error:
static int
test_resurrect_dataset(hid_t fapl)
{
- hid_t f = -1, s = -1, d = -1;
- char filename[1024];
+ hid_t f = -1, s = -1, d = -1;
+ char filename[1024];
TESTING("resurrecting dataset after deletion");
@@ -1876,49 +2286,63 @@ test_resurrect_dataset(hid_t fapl)
h5_fixname(FILENAME[6], fapl, filename, sizeof filename);
/* Create the file */
- if((f = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((f = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create a dataset in the file */
- if((s = H5Screate(H5S_SCALAR)) < 0) FAIL_STACK_ERROR
- if((d = H5Dcreate2(f, DATASETNAME, H5T_NATIVE_INT, s, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Sclose(s) < 0) FAIL_STACK_ERROR
+ if ((s = H5Screate(H5S_SCALAR)) < 0)
+ FAIL_STACK_ERROR
+ if ((d = H5Dcreate2(f, DATASETNAME, H5T_NATIVE_INT, s, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Sclose(s) < 0)
+ FAIL_STACK_ERROR
/* Unlink the dataset while it's open (will mark it for deletion when closed) */
- if(H5Ldelete(f, DATASETNAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(f, DATASETNAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Check that dataset name is NULL */
- if(H5Iget_name(d, NULL, (size_t)0) != 0) FAIL_STACK_ERROR
+ if (H5Iget_name(d, NULL, (size_t)0) != 0)
+ FAIL_STACK_ERROR
/* Re-link the dataset to the group hierarchy (shouldn't get deleted now) */
- if(H5Lcreate_hard(d, ".", f, DATASET2NAME, H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Lcreate_hard(d, ".", f, DATASET2NAME, H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close things */
- if(H5Dclose(d) < 0) FAIL_STACK_ERROR
- if(H5Fclose(f) < 0) FAIL_STACK_ERROR
+ if (H5Dclose(d) < 0)
+ FAIL_STACK_ERROR
+ if (H5Fclose(f) < 0)
+ FAIL_STACK_ERROR
/* Re-open the file */
- if((f = H5Fopen(filename, H5F_ACC_RDONLY, fapl)) < 0) FAIL_STACK_ERROR
+ if ((f = H5Fopen(filename, H5F_ACC_RDONLY, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Attempt to open the dataset under the new name */
- if((d = H5Dopen2(f, DATASET2NAME, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((d = H5Dopen2(f, DATASET2NAME, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Close things */
- if(H5Dclose(d) < 0) FAIL_STACK_ERROR
- if(H5Fclose(f) < 0) FAIL_STACK_ERROR
+ if (H5Dclose(d) < 0)
+ FAIL_STACK_ERROR
+ if (H5Fclose(f) < 0)
+ FAIL_STACK_ERROR
PASSED();
return 0;
error:
- H5E_BEGIN_TRY {
- H5Sclose(s);
- H5Dclose(d);
- H5Fclose(f);
- } H5E_END_TRY;
+ H5E_BEGIN_TRY
+ {
+ H5Sclose(s);
+ H5Dclose(d);
+ H5Fclose(f);
+ }
+ H5E_END_TRY;
return 1;
} /* end test_resurrect_dataset() */
-
/*-------------------------------------------------------------------------
* Function: test_resurrect_datatype
*
@@ -1938,8 +2362,8 @@ error:
static int
test_resurrect_datatype(hid_t fapl)
{
- hid_t file = -1, type = -1;
- char filename[1024];
+ hid_t file = -1, type = -1;
+ char filename[1024];
TESTING("resurrecting datatype after deletion");
@@ -1947,47 +2371,60 @@ test_resurrect_datatype(hid_t fapl)
h5_fixname(FILENAME[7], fapl, filename, sizeof filename);
/* Create the file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create a named datatype in the file */
- if((type = H5Tcopy (H5T_NATIVE_INT)) < 0) FAIL_STACK_ERROR
- if(H5Tcommit2(file, TYPENAME, type, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if ((type = H5Tcopy(H5T_NATIVE_INT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Tcommit2(file, TYPENAME, type, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Unlink the datatype while it's open (will mark it for deletion when closed) */
- if(H5Ldelete(file, TYPENAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, TYPENAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Check that datatype name is NULL */
- if(H5Iget_name(type, NULL, (size_t)0) != 0) FAIL_STACK_ERROR
+ if (H5Iget_name(type, NULL, (size_t)0) != 0)
+ FAIL_STACK_ERROR
/* Re-link the datatype to the group hierarchy (shouldn't get deleted now) */
- if(H5Lcreate_hard(type, ".", file, TYPE2NAME, H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Lcreate_hard(type, ".", file, TYPE2NAME, H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close things */
- if(H5Tclose(type) < 0) FAIL_STACK_ERROR
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Tclose(type) < 0)
+ FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Re-open the file */
- if((file = H5Fopen(filename, H5F_ACC_RDONLY, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fopen(filename, H5F_ACC_RDONLY, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Attempt to open the datatype under the new name */
- if((type = H5Topen2(file,TYPE2NAME, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((type = H5Topen2(file, TYPE2NAME, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Close things */
- if(H5Tclose(type) < 0) FAIL_STACK_ERROR
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Tclose(type) < 0)
+ FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
PASSED();
return 0;
error:
- H5E_BEGIN_TRY {
- H5Tclose(type);
- H5Fclose(file);
- } H5E_END_TRY;
+ H5E_BEGIN_TRY
+ {
+ H5Tclose(type);
+ H5Fclose(file);
+ }
+ H5E_END_TRY;
return 1;
} /* end test_resurrect_datatype() */
-
/*-------------------------------------------------------------------------
* Function: test_resurrect_group
*
@@ -2007,8 +2444,8 @@ error:
static int
test_resurrect_group(hid_t fapl)
{
- hid_t file = -1, group = -1;
- char filename[1024];
+ hid_t file = -1, group = -1;
+ char filename[1024];
TESTING("resurrecting group after deletion");
@@ -2016,46 +2453,58 @@ test_resurrect_group(hid_t fapl)
h5_fixname(FILENAME[8], fapl, filename, sizeof filename);
/* Create the file */
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create a group in the file */
- if((group = H5Gcreate2(file, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((group = H5Gcreate2(file, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Unlink the group while it's open (will mark it for deletion when closed) */
- if(H5Ldelete(file, GROUPNAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file, GROUPNAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Check that group's name is NULL */
- if(H5Iget_name(group, NULL, (size_t)0) != 0) FAIL_STACK_ERROR
+ if (H5Iget_name(group, NULL, (size_t)0) != 0)
+ FAIL_STACK_ERROR
/* Re-link the group into the group hierarchy (shouldn't get deleted now) */
- if(H5Lcreate_hard(group, ".", file, GROUP2NAME, H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Lcreate_hard(group, ".", file, GROUP2NAME, H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close things */
- if(H5Gclose(group) < 0) FAIL_STACK_ERROR
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(group) < 0)
+ FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
/* Re-open the file */
- if((file = H5Fopen(filename, H5F_ACC_RDONLY, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file = H5Fopen(filename, H5F_ACC_RDONLY, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Attempt to open the datatype under the new name */
- if((group = H5Gopen2(file, GROUP2NAME, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((group = H5Gopen2(file, GROUP2NAME, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Close things */
- if(H5Gclose(group) < 0) FAIL_STACK_ERROR
- if(H5Fclose(file) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(group) < 0)
+ FAIL_STACK_ERROR
+ if (H5Fclose(file) < 0)
+ FAIL_STACK_ERROR
PASSED();
return 0;
error:
- H5E_BEGIN_TRY {
- H5Gclose(group);
- H5Fclose(file);
- } H5E_END_TRY;
+ H5E_BEGIN_TRY
+ {
+ H5Gclose(group);
+ H5Fclose(file);
+ }
+ H5E_END_TRY;
return 1;
} /* end test_resurrect_group() */
-
/*-------------------------------------------------------------------------
* Function: test_unlink_chunked_dataset
*
@@ -2074,14 +2523,14 @@ error:
static int
test_unlink_chunked_dataset(hid_t fapl)
{
- hid_t file_id = -1;
- hid_t dset_id = -1;
- hid_t space_id = -1;
- hid_t dcpl_id = -1;
- hsize_t dims[FILESPACE_NDIMS] = {FILESPACE_DIM0, FILESPACE_DIM1, FILESPACE_DIM2};
- hsize_t max_dims[FILESPACE_NDIMS] = {H5S_UNLIMITED, H5S_UNLIMITED, H5S_UNLIMITED};
+ hid_t file_id = -1;
+ hid_t dset_id = -1;
+ hid_t space_id = -1;
+ hid_t dcpl_id = -1;
+ hsize_t dims[FILESPACE_NDIMS] = {FILESPACE_DIM0, FILESPACE_DIM1, FILESPACE_DIM2};
+ hsize_t max_dims[FILESPACE_NDIMS] = {H5S_UNLIMITED, H5S_UNLIMITED, H5S_UNLIMITED};
hsize_t chunk_dims[FILESPACE_NDIMS] = {FILESPACE_CHUNK0, FILESPACE_CHUNK1, FILESPACE_CHUNK2};
- char filename[1024];
+ char filename[1024];
TESTING("unlinking chunked dataset");
@@ -2089,58 +2538,73 @@ test_unlink_chunked_dataset(hid_t fapl)
h5_fixname(FILENAME[9], fapl, filename, sizeof filename);
/* Create the file */
- if((file_id = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file_id = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create the dataspace */
- if((space_id = H5Screate_simple(FILESPACE_NDIMS, dims, max_dims)) < 0) FAIL_STACK_ERROR
+ if ((space_id = H5Screate_simple(FILESPACE_NDIMS, dims, max_dims)) < 0)
+ FAIL_STACK_ERROR
/* Create the dataset creation filter */
- if((dcpl_id = H5Pcreate(H5P_DATASET_CREATE)) < 0) FAIL_STACK_ERROR
+ if ((dcpl_id = H5Pcreate(H5P_DATASET_CREATE)) < 0)
+ FAIL_STACK_ERROR
/* Set to chunked storage */
- if(H5Pset_chunk(dcpl_id, FILESPACE_NDIMS, chunk_dims) < 0) FAIL_STACK_ERROR
+ if (H5Pset_chunk(dcpl_id, FILESPACE_NDIMS, chunk_dims) < 0)
+ FAIL_STACK_ERROR
/* Set to early space allocation */
- if(H5Pset_alloc_time(dcpl_id, H5D_ALLOC_TIME_EARLY) < 0) FAIL_STACK_ERROR
+ if (H5Pset_alloc_time(dcpl_id, H5D_ALLOC_TIME_EARLY) < 0)
+ FAIL_STACK_ERROR
/* Create the dataset */
- if((dset_id = H5Dcreate2(file_id, DATASETNAME, H5T_NATIVE_INT, space_id, H5P_DEFAULT, dcpl_id, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((dset_id = H5Dcreate2(file_id, DATASETNAME, H5T_NATIVE_INT, space_id, H5P_DEFAULT, dcpl_id,
+ H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Close the dataspace */
- if(H5Sclose(space_id) < 0) FAIL_STACK_ERROR
+ if (H5Sclose(space_id) < 0)
+ FAIL_STACK_ERROR
/* Close the dataset creation property list */
- if(H5Pclose(dcpl_id) < 0) FAIL_STACK_ERROR
+ if (H5Pclose(dcpl_id) < 0)
+ FAIL_STACK_ERROR
/* Close the dataset */
- if(H5Dclose(dset_id) < 0) FAIL_STACK_ERROR
+ if (H5Dclose(dset_id) < 0)
+ FAIL_STACK_ERROR
/* Close the file */
- if(H5Fclose(file_id) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file_id) < 0)
+ FAIL_STACK_ERROR
/* Re-open the file */
- if((file_id = H5Fopen(filename, H5F_ACC_RDWR, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file_id = H5Fopen(filename, H5F_ACC_RDWR, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Delete the dataset */
- if(H5Ldelete(file_id, DATASETNAME, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file_id, DATASETNAME, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Close the file */
- if(H5Fclose(file_id) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file_id) < 0)
+ FAIL_STACK_ERROR
PASSED();
return 0;
error:
- H5E_BEGIN_TRY {
- H5Pclose(dcpl_id);
- H5Sclose(space_id);
- H5Dclose(dset_id);
- H5Fclose(file_id);
- } H5E_END_TRY;
+ H5E_BEGIN_TRY
+ {
+ H5Pclose(dcpl_id);
+ H5Sclose(space_id);
+ H5Dclose(dset_id);
+ H5Fclose(file_id);
+ }
+ H5E_END_TRY;
return 1;
} /* end test_unlink_chunked_dataset() */
-
/*-------------------------------------------------------------------------
* Function: test_full_group_compact
*
@@ -2157,15 +2621,15 @@ error:
static int
test_full_group_compact(hid_t fapl)
{
- hid_t file_id = -1;
- hid_t gid = -1, gid2 = -1; /* Group IDs */
- H5O_info2_t oi; /* Stat buffer for object */
- char objname[128]; /* Buffer for name of objects to create */
- char objname2[128]; /* Buffer for name of objects to create */
- char filename[1024]; /* Buffer for filename */
- h5_stat_size_t keep_size; /* Size of the file with objects to keep */
- h5_stat_size_t file_size; /* Size of each file created */
- unsigned u; /* Local index variable */
+ hid_t file_id = -1;
+ hid_t gid = -1, gid2 = -1; /* Group IDs */
+ H5O_info2_t oi; /* Stat buffer for object */
+ char objname[128]; /* Buffer for name of objects to create */
+ char objname2[128]; /* Buffer for name of objects to create */
+ char filename[1024]; /* Buffer for filename */
+ h5_stat_size_t keep_size; /* Size of the file with objects to keep */
+ h5_stat_size_t file_size; /* Size of each file created */
+ unsigned u; /* Local index variable */
TESTING("unlinking non-empty compact group");
@@ -2173,107 +2637,135 @@ test_full_group_compact(hid_t fapl)
h5_fixname(FILENAME[10], fapl, filename, sizeof filename);
/* Create the file */
- if((file_id = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file_id = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create group to link objects to */
- if((gid = H5Gcreate2(file_id, "/keep", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((gid = H5Gcreate2(file_id, "/keep", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Create several objects to link to */
- for(u = 0; u < FULL_GROUP_NUM_KEEP; u++) {
+ for (u = 0; u < FULL_GROUP_NUM_KEEP; u++) {
HDsprintf(objname, "keep %u\n", u);
- if((gid2 = H5Gcreate2(gid, objname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Gclose(gid2) < 0) FAIL_STACK_ERROR
+ if ((gid2 = H5Gcreate2(gid, objname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Gclose(gid2) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Close group with objects to keep */
- if(H5Gclose(gid) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(gid) < 0)
+ FAIL_STACK_ERROR
/* Close the file */
- if(H5Fclose(file_id) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file_id) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file with only the objects to keep */
- if((keep_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((keep_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Re-open the file */
- if((file_id = H5Fopen(filename, H5F_ACC_RDWR, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file_id = H5Fopen(filename, H5F_ACC_RDWR, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create group to delete */
- if((gid = H5Gcreate2(file_id, "/delete", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((gid = H5Gcreate2(file_id, "/delete", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Create external link (doesn't matter if it dangles) */
- if(H5Lcreate_external("foo.h5", "/dst", gid, "external", H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Lcreate_external("foo.h5", "/dst", gid, "external", H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Create soft link (doesn't matter if it dangles) */
- if(H5Lcreate_soft("/foo", gid, "soft", H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Lcreate_soft("/foo", gid, "soft", H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Create hard links to objects in group to keep */
- for(u = 0; u < FULL_GROUP_NUM_KEEP; u++) {
+ for (u = 0; u < FULL_GROUP_NUM_KEEP; u++) {
HDsprintf(objname, "/keep/keep %u\n", u);
HDsprintf(objname2, "keep %u\n", u);
- if(H5Lcreate_hard(file_id, objname, gid, objname2, H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Lcreate_hard(file_id, objname, gid, objname2, H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Create several objects to delete */
- for(u = 0; u < FULL_GROUP_NUM_DELETE_COMPACT; u++) {
+ for (u = 0; u < FULL_GROUP_NUM_DELETE_COMPACT; u++) {
HDsprintf(objname, "delete %u\n", u);
- if((gid2 = H5Gcreate2(gid, objname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Gclose(gid2) < 0) FAIL_STACK_ERROR
+ if ((gid2 = H5Gcreate2(gid, objname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Gclose(gid2) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Check on group's status */
- if(H5G__is_empty_test(gid) == TRUE) TEST_ERROR
- if(H5G__has_links_test(gid, NULL) != TRUE) TEST_ERROR
- if(H5G__has_stab_test(gid) == TRUE) TEST_ERROR
+ if (H5G__is_empty_test(gid) == TRUE)
+ TEST_ERROR
+ if (H5G__has_links_test(gid, NULL) != TRUE)
+ TEST_ERROR
+ if (H5G__has_stab_test(gid) == TRUE)
+ TEST_ERROR
/* Close group with objects to delete */
- if(H5Gclose(gid) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(gid) < 0)
+ FAIL_STACK_ERROR
/* Check reference count on objects to keep */
- for(u = 0; u < FULL_GROUP_NUM_KEEP; u++) {
+ for (u = 0; u < FULL_GROUP_NUM_KEEP; u++) {
HDsprintf(objname, "/keep/keep %u\n", u);
- if(H5Oget_info_by_name3(file_id, objname, &oi, H5O_INFO_BASIC, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(oi.rc != 2) TEST_ERROR
+ if (H5Oget_info_by_name3(file_id, objname, &oi, H5O_INFO_BASIC, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (oi.rc != 2)
+ TEST_ERROR
} /* end for */
/* Close the file */
- if(H5Fclose(file_id) < 0) FAIL_STACK_ERROR
-
+ if (H5Fclose(file_id) < 0)
+ FAIL_STACK_ERROR
/* Re-open the file */
- if((file_id = H5Fopen(filename, H5F_ACC_RDWR, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file_id = H5Fopen(filename, H5F_ACC_RDWR, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Delete the full group */
- if(H5Ldelete(file_id, "/delete", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file_id, "/delete", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Check reference count on objects to keep */
- for(u = 0; u < FULL_GROUP_NUM_KEEP; u++) {
+ for (u = 0; u < FULL_GROUP_NUM_KEEP; u++) {
HDsprintf(objname, "/keep/keep %u\n", u);
- if(H5Oget_info_by_name3(file_id, objname, &oi, H5O_INFO_BASIC, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(oi.rc != 1) TEST_ERROR
+ if (H5Oget_info_by_name3(file_id, objname, &oi, H5O_INFO_BASIC, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (oi.rc != 1)
+ TEST_ERROR
} /* end for */
/* Close the file */
- if(H5Fclose(file_id) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file_id) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != keep_size) TEST_ERROR
+ if (file_size != keep_size)
+ TEST_ERROR
PASSED();
return 0;
error:
- H5E_BEGIN_TRY {
- H5Gclose(gid2);
- H5Gclose(gid);
- H5Fclose(file_id);
- } H5E_END_TRY;
+ H5E_BEGIN_TRY
+ {
+ H5Gclose(gid2);
+ H5Gclose(gid);
+ H5Fclose(file_id);
+ }
+ H5E_END_TRY;
return 1;
} /* end test_full_group_compact() */
-
/*-------------------------------------------------------------------------
* Function: test_full_group_dense
*
@@ -2290,16 +2782,16 @@ error:
static int
test_full_group_dense(hid_t fapl)
{
- hid_t file_id = -1;
- hid_t gcpl = (-1); /* Group creation property list ID */
- hid_t gid = -1, gid2 = -1; /* Group IDs */
- H5O_info2_t oi; /* Stat buffer for object */
- char objname[128]; /* Buffer for name of objects to create */
- char objname2[128]; /* Buffer for name of objects to create */
- char filename[1024]; /* Buffer for filename */
- h5_stat_size_t keep_size; /* Size of the file with objects to keep */
- h5_stat_size_t file_size; /* Size of each file created */
- unsigned u; /* Local index variable */
+ hid_t file_id = -1;
+ hid_t gcpl = (-1); /* Group creation property list ID */
+ hid_t gid = -1, gid2 = -1; /* Group IDs */
+ H5O_info2_t oi; /* Stat buffer for object */
+ char objname[128]; /* Buffer for name of objects to create */
+ char objname2[128]; /* Buffer for name of objects to create */
+ char filename[1024]; /* Buffer for filename */
+ h5_stat_size_t keep_size; /* Size of the file with objects to keep */
+ h5_stat_size_t file_size; /* Size of each file created */
+ unsigned u; /* Local index variable */
TESTING("unlinking non-empty dense group");
@@ -2307,33 +2799,43 @@ test_full_group_dense(hid_t fapl)
h5_fixname(FILENAME[10], fapl, filename, sizeof filename);
/* Create the file */
- if((file_id = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file_id = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Create group to link objects to */
- if((gid = H5Gcreate2(file_id, "/keep", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((gid = H5Gcreate2(file_id, "/keep", H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Create several objects to link to */
- for(u = 0; u < FULL_GROUP_NUM_KEEP; u++) {
+ for (u = 0; u < FULL_GROUP_NUM_KEEP; u++) {
HDsprintf(objname, "keep %u\n", u);
- if((gid2 = H5Gcreate2(gid, objname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Gclose(gid2) < 0) FAIL_STACK_ERROR
+ if ((gid2 = H5Gcreate2(gid, objname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Gclose(gid2) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Close group with objects to keep */
- if(H5Gclose(gid) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(gid) < 0)
+ FAIL_STACK_ERROR
/* Close the file */
- if(H5Fclose(file_id) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file_id) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file with only the objects to keep */
- if((keep_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((keep_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Re-open the file */
- if((file_id = H5Fopen(filename, H5F_ACC_RDWR, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file_id = H5Fopen(filename, H5F_ACC_RDWR, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Set group creation "est. link info" closer to what will actually occur */
- if((gcpl = H5Pcreate(H5P_GROUP_CREATE)) < 0) FAIL_STACK_ERROR
- if(H5Pset_est_link_info(gcpl, FULL_GROUP_EST_NUM_ENTRIES, FULL_GROUP_EST_ENTRY_LEN) < 0) FAIL_STACK_ERROR
+ if ((gcpl = H5Pcreate(H5P_GROUP_CREATE)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Pset_est_link_info(gcpl, FULL_GROUP_EST_NUM_ENTRIES, FULL_GROUP_EST_ENTRY_LEN) < 0)
+ FAIL_STACK_ERROR
/* Create group to delete */
/* (use non-default GCPL, in order to make certain that the group's object
@@ -2341,86 +2843,107 @@ test_full_group_dense(hid_t fapl)
* another object header message chunk - in order to make the file size
* computation below easier/correct - QAK)
*/
- if((gid = H5Gcreate2(file_id, "/delete", H5P_DEFAULT, gcpl, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
+ if ((gid = H5Gcreate2(file_id, "/delete", H5P_DEFAULT, gcpl, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
/* Close GCPL */
- if(H5Pclose(gcpl) < 0) FAIL_STACK_ERROR
+ if (H5Pclose(gcpl) < 0)
+ FAIL_STACK_ERROR
/* Create external link (doesn't matter if it dangles) */
- if(H5Lcreate_external("foo.h5", "/dst", gid, "external", H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Lcreate_external("foo.h5", "/dst", gid, "external", H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Create soft link (doesn't matter if it dangles) */
- if(H5Lcreate_soft("/foo", gid, "soft", H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Lcreate_soft("/foo", gid, "soft", H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Create hard links to objects in group to keep */
- for(u = 0; u < FULL_GROUP_NUM_KEEP; u++) {
+ for (u = 0; u < FULL_GROUP_NUM_KEEP; u++) {
HDsprintf(objname, "/keep/keep %u\n", u);
HDsprintf(objname2, "keep %u\n", u);
- if(H5Lcreate_hard(file_id, objname, gid, objname2, H5P_DEFAULT, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Lcreate_hard(file_id, objname, gid, objname2, H5P_DEFAULT, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Create several objects to delete */
- for(u = 0; u < FULL_GROUP_NUM_DELETE_DENSE; u++) {
+ for (u = 0; u < FULL_GROUP_NUM_DELETE_DENSE; u++) {
HDsprintf(objname, "delete %u\n", u);
- if((gid2 = H5Gcreate2(gid, objname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0) FAIL_STACK_ERROR
- if(H5Gclose(gid2) < 0) FAIL_STACK_ERROR
+ if ((gid2 = H5Gcreate2(gid, objname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0)
+ FAIL_STACK_ERROR
+ if (H5Gclose(gid2) < 0)
+ FAIL_STACK_ERROR
} /* end for */
/* Check on group's status */
- if(H5G__is_empty_test(gid) == TRUE) TEST_ERROR
- if(H5G__has_links_test(gid, NULL) == TRUE) TEST_ERROR
- if(H5G__is_new_dense_test(gid) != TRUE) TEST_ERROR
+ if (H5G__is_empty_test(gid) == TRUE)
+ TEST_ERROR
+ if (H5G__has_links_test(gid, NULL) == TRUE)
+ TEST_ERROR
+ if (H5G__is_new_dense_test(gid) != TRUE)
+ TEST_ERROR
/* Close group with objects to delete */
- if(H5Gclose(gid) < 0) FAIL_STACK_ERROR
+ if (H5Gclose(gid) < 0)
+ FAIL_STACK_ERROR
/* Check reference count on objects to keep */
- for(u = 0; u < FULL_GROUP_NUM_KEEP; u++) {
+ for (u = 0; u < FULL_GROUP_NUM_KEEP; u++) {
HDsprintf(objname, "/keep/keep %u\n", u);
- if(H5Oget_info_by_name3(file_id, objname, &oi, H5O_INFO_BASIC, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(oi.rc != 2) TEST_ERROR
+ if (H5Oget_info_by_name3(file_id, objname, &oi, H5O_INFO_BASIC, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (oi.rc != 2)
+ TEST_ERROR
} /* end for */
/* Close the file */
- if(H5Fclose(file_id) < 0) FAIL_STACK_ERROR
-
+ if (H5Fclose(file_id) < 0)
+ FAIL_STACK_ERROR
/* Re-open the file */
- if((file_id = H5Fopen(filename, H5F_ACC_RDWR, fapl)) < 0) FAIL_STACK_ERROR
+ if ((file_id = H5Fopen(filename, H5F_ACC_RDWR, fapl)) < 0)
+ FAIL_STACK_ERROR
/* Delete the full group */
- if(H5Ldelete(file_id, "/delete", H5P_DEFAULT) < 0) FAIL_STACK_ERROR
+ if (H5Ldelete(file_id, "/delete", H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
/* Check reference count on objects to keep */
- for(u = 0; u < FULL_GROUP_NUM_KEEP; u++) {
+ for (u = 0; u < FULL_GROUP_NUM_KEEP; u++) {
HDsprintf(objname, "/keep/keep %u\n", u);
- if(H5Oget_info_by_name3(file_id, objname, &oi, H5O_INFO_BASIC, H5P_DEFAULT) < 0) FAIL_STACK_ERROR
- if(oi.rc != 1) TEST_ERROR
+ if (H5Oget_info_by_name3(file_id, objname, &oi, H5O_INFO_BASIC, H5P_DEFAULT) < 0)
+ FAIL_STACK_ERROR
+ if (oi.rc != 1)
+ TEST_ERROR
} /* end for */
/* Close the file */
- if(H5Fclose(file_id) < 0) FAIL_STACK_ERROR
+ if (H5Fclose(file_id) < 0)
+ FAIL_STACK_ERROR
/* Get the size of the file */
- if((file_size = h5_get_file_size(filename, fapl)) < 0) TEST_ERROR
+ if ((file_size = h5_get_file_size(filename, fapl)) < 0)
+ TEST_ERROR
/* Verify the file is correct size */
- if(file_size != keep_size) TEST_ERROR
+ if (file_size != keep_size)
+ TEST_ERROR
PASSED();
return 0;
error:
- H5E_BEGIN_TRY {
- H5Gclose(gid2);
- H5Gclose(gid);
+ H5E_BEGIN_TRY
+ {
+ H5Gclose(gid2);
+ H5Gclose(gid);
H5Pclose(gcpl);
- H5Fclose(file_id);
- } H5E_END_TRY;
+ H5Fclose(file_id);
+ }
+ H5E_END_TRY;
return 1;
} /* end test_full_group_dense() */
-
/*-------------------------------------------------------------------------
* Function: main
*
@@ -2437,12 +2960,12 @@ int
main(void)
{
hid_t fapl, fapl2, file;
- int nerrors = 0;
- char filename[1024];
- unsigned new_format;
+ int nerrors = 0;
+ char filename[1024];
+ unsigned new_format;
/* Metadata cache parameters */
- int mdc_nelmts;
+ int mdc_nelmts;
size_t rdcc_nelmts;
size_t rdcc_nbytes;
double rdcc_w0;
@@ -2455,17 +2978,19 @@ main(void)
fapl = h5_fileaccess();
/* Copy the file access property list */
- if((fapl2 = H5Pcopy(fapl)) < 0) TEST_ERROR
+ if ((fapl2 = H5Pcopy(fapl)) < 0)
+ TEST_ERROR
/* Set the "use the latest version of the format" bounds for creating objects in the file */
- if(H5Pset_libver_bounds(fapl2, H5F_LIBVER_LATEST, H5F_LIBVER_LATEST) < 0) TEST_ERROR
+ if (H5Pset_libver_bounds(fapl2, H5F_LIBVER_LATEST, H5F_LIBVER_LATEST) < 0)
+ TEST_ERROR
/* Test with old & new format groups */
- for(new_format = FALSE; new_format <= TRUE; new_format++) {
+ for (new_format = FALSE; new_format <= TRUE; new_format++) {
hid_t my_fapl;
/* Set the FAPL for the type of format */
- if(new_format) {
+ if (new_format) {
HDputs("\nTesting with new group format:");
my_fapl = fapl2;
} /* end if */
@@ -2475,7 +3000,8 @@ main(void)
} /* end else */
h5_fixname(FILENAME[0], my_fapl, filename, sizeof filename);
- if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, my_fapl)) < 0) TEST_ERROR
+ if ((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, my_fapl)) < 0)
+ TEST_ERROR
/* Tests */
nerrors += test_one(file);
@@ -2494,22 +3020,24 @@ main(void)
hid_t fapl_small_mdc;
/* Make copy of regular fapl, to turn down the elements in the metadata cache */
- if((fapl_small_mdc = H5Pcopy(my_fapl)) < 0)
+ if ((fapl_small_mdc = H5Pcopy(my_fapl)) < 0)
goto error;
/* Get FAPL cache settings */
- if(H5Pget_cache(fapl_small_mdc, &mdc_nelmts, &rdcc_nelmts, &rdcc_nbytes, &rdcc_w0) < 0)
+ if (H5Pget_cache(fapl_small_mdc, &mdc_nelmts, &rdcc_nelmts, &rdcc_nbytes, &rdcc_w0) < 0)
HDprintf("H5Pget_cache failed\n");
/* Change FAPL cache settings */
- mdc_nelmts=1;
- if(H5Pset_cache(fapl_small_mdc, mdc_nelmts, rdcc_nelmts, rdcc_nbytes, rdcc_w0) < 0)
+ mdc_nelmts = 1;
+ if (H5Pset_cache(fapl_small_mdc, mdc_nelmts, rdcc_nelmts, rdcc_nbytes, rdcc_w0) < 0)
HDprintf("H5Pset_cache failed\n");
/* Test creating & unlinking lots of objects with a 1-element metadata cache FAPL */
- nerrors += test_create_unlink("create and unlink large number of objects with small cache", fapl_small_mdc);
+ nerrors += test_create_unlink("create and unlink large number of objects with small cache",
+ fapl_small_mdc);
- if(H5Pclose(fapl_small_mdc) < 0) TEST_ERROR
+ if (H5Pclose(fapl_small_mdc) < 0)
+ TEST_ERROR
} /* end block */
nerrors += test_link_slashes(my_fapl);
@@ -2517,7 +3045,7 @@ main(void)
/* Test specific B-tree removal issues */
/* (only for old format groups) */
- if(!new_format) {
+ if (!new_format) {
nerrors += test_unlink_rightleaf(file);
nerrors += test_unlink_rightnode(file);
nerrors += test_unlink_middlenode(file);
@@ -2533,13 +3061,14 @@ main(void)
/* Test unlinked groups which still have objects in them */
/* (only for new format groups) */
- if(new_format) {
+ if (new_format) {
nerrors += test_full_group_compact(my_fapl);
nerrors += test_full_group_dense(my_fapl);
} /* end if */
/* Close */
- if(H5Fclose(file) < 0) TEST_ERROR
+ if (H5Fclose(file) < 0)
+ TEST_ERROR
} /* end for */
/* Close 2nd FAPL */
@@ -2549,7 +3078,7 @@ main(void)
nerrors += (h5_verify_cached_stabs(FILENAME, fapl) < 0 ? 1 : 0);
if (nerrors) {
- HDprintf("***** %d FAILURE%s! *****\n", nerrors, 1==nerrors?"":"S");
+ HDprintf("***** %d FAILURE%s! *****\n", nerrors, 1 == nerrors ? "" : "S");
HDexit(EXIT_FAILURE);
}
@@ -2562,4 +3091,3 @@ main(void)
error:
HDexit(EXIT_FAILURE);
} /* end main() */
-