summaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
authorQuincey Koziol <koziol@hdfgroup.org>2007-03-16 18:41:26 (GMT)
committerQuincey Koziol <koziol@hdfgroup.org>2007-03-16 18:41:26 (GMT)
commitde1af0c1c706c04ac19abcdd773d91127b81abd8 (patch)
treed51adaa29bbcb9b3d607202fa0dad9d5f9244bcd /test
parentd3bd0649ed34c91f2cd2cdca61a29c6cc9a7575a (diff)
downloadhdf5-de1af0c1c706c04ac19abcdd773d91127b81abd8.zip
hdf5-de1af0c1c706c04ac19abcdd773d91127b81abd8.tar.gz
hdf5-de1af0c1c706c04ac19abcdd773d91127b81abd8.tar.bz2
[svn-r13520] Description:
Added H5Lexists() API routine, which determines if a link of a particular name exists in a group. Tested on: Linux/32 2.6 (chicago) Linux/64 2.6 (chicago2)
Diffstat (limited to 'test')
-rw-r--r--test/links.c7
1 files changed, 7 insertions, 0 deletions
diff --git a/test/links.c b/test/links.c
index eb7b596..ff6a8b8 100644
--- a/test/links.c
+++ b/test/links.c
@@ -310,6 +310,8 @@ cklinks(hid_t fapl, hbool_t new_format)
puts(" expected file location.");
TEST_ERROR
}
+ if(H5Lexists(file, "d1", H5P_DEFAULT) != TRUE) TEST_ERROR
+ if(H5Lexists(file, "grp1/hard", H5P_DEFAULT) != TRUE) TEST_ERROR
/* Symbolic link */
if (H5Gget_objinfo(file, "grp1/soft", TRUE, &sb2) < 0) TEST_ERROR
@@ -330,6 +332,7 @@ cklinks(hid_t fapl, hbool_t new_format)
puts(" Soft link test failed. Wrong link value");
TEST_ERROR
}
+ if(H5Lexists(file, "grp1/soft", H5P_DEFAULT) != TRUE) TEST_ERROR
/* Dangling link */
H5E_BEGIN_TRY {
@@ -356,6 +359,7 @@ cklinks(hid_t fapl, hbool_t new_format)
puts(" Dangling link test failed. Wrong link value");
TEST_ERROR
}
+ if(H5Lexists(file, "grp1/dangle", H5P_DEFAULT) != TRUE) TEST_ERROR
/* Recursive link */
H5E_BEGIN_TRY {
@@ -383,6 +387,9 @@ cklinks(hid_t fapl, hbool_t new_format)
TEST_ERROR
}
+ /* Non-existant link */
+ if(H5Lexists(file, "foobar", H5P_DEFAULT) == TRUE) TEST_ERROR
+
/* Cleanup */
if (H5Fclose(file) < 0) TEST_ERROR
PASSED();