summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPatrick Lu <ptlu@hawkwind.ncsa.uiuc.edu>2000-05-19 15:52:59 (GMT)
committerPatrick Lu <ptlu@hawkwind.ncsa.uiuc.edu>2000-05-19 15:52:59 (GMT)
commitf782d80d00a90575f63a6df528523c55989465b2 (patch)
tree3663c5eb781c0176bbd9e7e5dc7390d8cf119f1d
parent2b4672286c14dd051b6e414ff2614e25ce7db562 (diff)
downloadhdf5-f782d80d00a90575f63a6df528523c55989465b2.zip
hdf5-f782d80d00a90575f63a6df528523c55989465b2.tar.gz
hdf5-f782d80d00a90575f63a6df528523c55989465b2.tar.bz2
[svn-r2280] more complicated test file for nested compounds. copied from Elena's test file
-rw-r--r--tools/h5dumptst.c112
1 files changed, 74 insertions, 38 deletions
diff --git a/tools/h5dumptst.c b/tools/h5dumptst.c
index b90974a..97c5c08 100644
--- a/tools/h5dumptst.c
+++ b/tools/h5dumptst.c
@@ -1574,38 +1574,63 @@ void test_datareg(void){
}
void test_nestcomp(void){
-
- hid_t file,space,type,type2,dataset;
- int i, maxdim = 5;
- hsize_t dim = 5;
- int y = 1;
-
- typedef struct {
- double re; /*real part*/
- double im; /*imaginary part*/
- } complex_t;
-
- typedef struct {
- complex_t x;
- complex_t y;
- } surf_t;
- surf_t surft[5];
+/*taken from Elena's compound test file*/
+
+ /* Compound memeber of the compound datatype*/
+ typedef struct cmp_t {
+ char a;
+ float b[2];
+ } cmp_t;
+ /* First structure and dataset*/
+ typedef struct s1_t {
+ int a;
+ float b;
+ double c;
+ cmp_t d;
+ } s1_t;
+ hid_t cmp_tid; /* Handle for the compound datatype */
+ hid_t char_id; /* Handle for the string datatype */
+ size_t array_dims[] = {2}; /* Dataspace dimensions */
+ int ndims = 1; /* Number of dimensions in the array field */
+
+
+ s1_t s1[10];
+ hid_t s1_tid; /* File datatype identifier */
+
+ /* Second structure (subset of s1_t) and dataset*/
+ typedef struct s2_t {
+ double c;
+ int a;
+ } s2_t;
+ s2_t s2[10];
+ hid_t s2_tid; /* Memory datatype handle */
+
+ /* Third "structure" ( will be used to read float field of s1) */
+ hid_t s3_tid; /* Memory datatype handle */
+ float s3[10];
+
+ int i;
+ hid_t file, dataset, space; /* Handles */
+ herr_t status;
+ hsize_t dim[] = {10}; /* Dataspace dimensions */
+
+ char datasetname[] = "ArrayOfStructures";
/*
* Initialize the data
*/
-
- for (i = 0; i< dim; i++) {
- surft[i].x.re = i;
- surft[i].x.im = i+y;
- y++;
- surft[i].y.re = i+y;
- surft[i].y.im = i+2*y;
+ for (i = 0; i< 10; i++) {
+ s1[i].a = i;
+ s1[i].b = i*i;
+ s1[i].c = 1./(i+1);
+ s1[i].d.a = 65 + i;
+ s1[i].d.b[0] = -100.;
+ s1[i].d.b[1] = 100.;
}
/*
* Create the data space.
*/
- space = H5Screate_simple(1, &dim, NULL);
+ space = H5Screate_simple(1, dim, NULL);
/*
* Create the file.
@@ -1613,37 +1638,48 @@ void test_nestcomp(void){
file = H5Fcreate(FILE18, H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT);
/*
- * Create the memory datatype.
+ * Create the memory data type.
*/
- type = H5Tcreate (H5T_COMPOUND, sizeof(complex_t));
-
- H5Tinsert(type, "re", HOFFSET(complex_t, re), H5T_NATIVE_DOUBLE);
- H5Tinsert(type, "im", HOFFSET(complex_t, im), H5T_NATIVE_DOUBLE);
-
- type2 = H5Tcreate (H5T_COMPOUND, sizeof(surf_t));
-
- H5Tinsert(type2, "x", HOFFSET(surf_t, x), type);
- H5Tinsert(type2, "y", HOFFSET(surf_t, y), type);
+ /*
+ * Create a datatype for compound field first.
+ */
+ cmp_tid = H5Tcreate (H5T_COMPOUND, sizeof(cmp_t));
+ /* We are using C string of length one to represent "real" character */
+ char_id = H5Tcopy(H5T_C_S1);
+ H5Tset_strpad(char_id, H5T_STR_NULLTERM);
+ H5Tinsert(cmp_tid, "char_name", HOFFSET(cmp_t, a), char_id);
+ H5Tinsert_array(cmp_tid, "array_name", HOFFSET(cmp_t, b), ndims,
+ array_dims, NULL, H5T_NATIVE_FLOAT);
+
+ s1_tid = H5Tcreate (H5T_COMPOUND, sizeof(s1_t));
+ H5Tinsert(s1_tid, "a_name", HOFFSET(s1_t, a), H5T_NATIVE_INT);
+ H5Tinsert(s1_tid, "c_name", HOFFSET(s1_t, c), H5T_NATIVE_DOUBLE);
+ H5Tinsert(s1_tid, "b_name", HOFFSET(s1_t, b), H5T_NATIVE_FLOAT);
+ /* Insert compound memeber created above */
+ H5Tinsert(s1_tid, "d_name", HOFFSET(s1_t, d), cmp_tid);
/*
* Create the dataset.
*/
- dataset = H5Dcreate(file, "/nested compound", type2, space, H5P_DEFAULT);
+ dataset = H5Dcreate(file, datasetname, s1_tid, space, H5P_DEFAULT);
/*
* Wtite data to the dataset;
*/
- H5Dwrite(dataset, type2, H5S_ALL, H5S_ALL, H5P_DEFAULT, surft);
+ status = H5Dwrite(dataset, s1_tid, H5S_ALL, H5S_ALL, H5P_DEFAULT, s1);
/*
* Release resources
*/
- H5Tclose(type2);
- H5Tclose(type);
+ H5Tclose(s1_tid);
+ H5Tclose(cmp_tid);
+ H5Tclose(char_id);
H5Sclose(space);
H5Dclose(dataset);
H5Fclose(file);
+
+
}
void test_opaque(){