summaryrefslogtreecommitdiffstats
path: root/test/th5s.c
diff options
context:
space:
mode:
authorQuincey Koziol <koziol@hdfgroup.org>1998-02-25 18:48:33 (GMT)
committerQuincey Koziol <koziol@hdfgroup.org>1998-02-25 18:48:33 (GMT)
commitfaa3f5739e0b52d84d119791b6859fe610b76d37 (patch)
tree6c1849a3516a7bf19a4f33af1868bb55e536c3d3 /test/th5s.c
parent1f96b24ba70e33d1c87dd5773d3ef18d1f46a3c5 (diff)
downloadhdf5-faa3f5739e0b52d84d119791b6859fe610b76d37.zip
hdf5-faa3f5739e0b52d84d119791b6859fe610b76d37.tar.gz
hdf5-faa3f5739e0b52d84d119791b6859fe610b76d37.tar.bz2
[svn-r296] Switched prefix for dataspaces from H5P to H5S
Diffstat (limited to 'test/th5s.c')
-rw-r--r--test/th5s.c129
1 files changed, 129 insertions, 0 deletions
diff --git a/test/th5s.c b/test/th5s.c
new file mode 100644
index 0000000..faafd5e
--- /dev/null
+++ b/test/th5s.c
@@ -0,0 +1,129 @@
+/****************************************************************************
+ * NCSA HDF *
+ * Software Development Group *
+ * National Center for Supercomputing Applications *
+ * University of Illinois at Urbana-Champaign *
+ * 605 E. Springfield, Champaign IL 61820 *
+ * *
+ * For conditions of distribution and use, see the accompanying *
+ * hdf/COPYING file. *
+ * *
+ ****************************************************************************/
+
+#ifdef RCSID
+static char RcsId[] = "$Revision$";
+#endif
+
+/* $Id$ */
+
+/***********************************************************
+*
+* Test program: th5p
+*
+* Test the dataspace functionality
+*
+*************************************************************/
+
+#include <testhdf5.h>
+
+#include <H5private.h>
+#include <H5Bprivate.h>
+#include <H5Mprivate.h>
+#include <H5Sprivate.h>
+
+#define FILE "th5p1.h5"
+
+/* 3-D dataset with fixed dimensions */
+#define SPACE1_NAME "Space1"
+#define SPACE1_RANK 3
+#define SPACE1_DIM1 3
+#define SPACE1_DIM2 15
+#define SPACE1_DIM3 13
+
+/* 4-D dataset with one unlimited dimension */
+#define SPACE2_NAME "Space2"
+#define SPACE2_RANK 4
+#define SPACE2_DIM1 0
+#define SPACE2_DIM2 15
+#define SPACE2_DIM3 13
+#define SPACE2_DIM4 23
+
+/****************************************************************
+**
+** test_h5p_basic(): Test basic H5S (dataspace) code.
+**
+****************************************************************/
+static void
+test_h5p_basic(void)
+{
+ hid_t fid1; /* HDF5 File IDs */
+ hid_t sid1, sid2; /* Dataspace ID */
+ uint32 rank; /* Logical rank of dataspace */
+ size_t dims1[] =
+ {SPACE1_DIM1, SPACE1_DIM2, SPACE1_DIM3}, /* dataspace dim sizes */
+ dims2[] =
+ {SPACE2_DIM1, SPACE2_DIM2, SPACE2_DIM3, SPACE2_DIM4}, tdims[4]; /* Dimension array to test with */
+ size_t n; /* number of dataspace elements */
+ herr_t ret; /* Generic return value */
+
+ /* Output message about test being performed */
+ MESSAGE(5, ("Testing Datatype Manipulation\n"));
+
+ /* Create file */
+ fid1 = H5Fcreate(FILE, H5F_ACC_TRUNC, H5C_DEFAULT, H5C_DEFAULT);
+ CHECK(fid1, FAIL, "H5Fcreate");
+
+ sid1 = H5Screate_simple(SPACE1_RANK, dims1, NULL);
+ CHECK(sid1, FAIL, "H5Screate_simple");
+
+ n = H5Sget_npoints(sid1);
+ CHECK(n, UFAIL, "H5Sget_npoints");
+ VERIFY(n, SPACE1_DIM1 * SPACE1_DIM2 * SPACE1_DIM3, "H5Sget_npoints");
+
+ rank = H5Sget_ndims(sid1);
+ CHECK(rank, UFAIL, "H5Sget_lrank");
+ VERIFY(rank, SPACE1_RANK, "H5Sget_lrank");
+
+ ret = H5Sget_dims(sid1, tdims);
+ CHECK(ret, FAIL, "H5Sget_ldims");
+ VERIFY(HDmemcmp(tdims, dims1, SPACE1_RANK * sizeof(uint32)), 0, "H5Sget_ldims");
+
+ sid2 = H5Screate_simple(SPACE2_RANK, dims2, NULL);
+ CHECK(sid2, FAIL, "H5Screate_simple");
+
+ n = H5Sget_npoints(sid2);
+ CHECK(n, UFAIL, "H5Snelem");
+ VERIFY(n, SPACE2_DIM1 * SPACE2_DIM2 * SPACE2_DIM3 * SPACE2_DIM4, "H5Snelem");
+
+ rank = H5Sget_ndims(sid2);
+ CHECK(rank, UFAIL, "H5Sget_lrank");
+ VERIFY(rank, SPACE2_RANK, "H5Sget_lrank");
+
+ ret = H5Sget_dims(sid2, tdims);
+ CHECK(ret, FAIL, "H5Sget_ldims");
+ VERIFY(HDmemcmp(tdims, dims2, SPACE2_RANK * sizeof(uint32)), 0, "H5Sget_ldims");
+
+ ret = H5Mclose(sid1);
+ CHECK(ret, FAIL, "H5Mrelease");
+
+ ret = H5Mclose(sid2);
+ CHECK(ret, FAIL, "H5Mrelease");
+
+ /* Close first file */
+ ret = H5Fclose(fid1);
+ CHECK(ret, FAIL, "H5Fclose");
+} /* test_h5p_basic() */
+
+/****************************************************************
+**
+** test_h5p(): Main H5S (dataspace) testing routine.
+**
+****************************************************************/
+void
+test_h5p(void)
+{
+ /* Output message about test being performed */
+ MESSAGE(5, ("Testing Dataspaces\n"));
+
+ test_h5p_basic(); /* Test basic H5S code */
+} /* test_h5p() */