summaryrefslogtreecommitdiffstats
path: root/test/th5s.c
diff options
context:
space:
mode:
Diffstat (limited to 'test/th5s.c')
-rw-r--r--test/th5s.c1283
1 files changed, 619 insertions, 664 deletions
diff --git a/test/th5s.c b/test/th5s.c
index bb84353..07cb0ab 100644
--- a/test/th5s.c
+++ b/test/th5s.c
@@ -12,12 +12,12 @@
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
/***********************************************************
-*
-* Test program: th5s
-*
-* Test the dataspace functionality
-*
-*************************************************************/
+ *
+ * Test program: th5s
+ *
+ * Test the dataspace functionality
+ *
+ *************************************************************/
#include "testhdf5.h"
#include "H5srcdir.h"
@@ -29,69 +29,69 @@
* This file needs to access private information from the H5S package.
* This file also needs to access the dataspace testing code.
*/
-#define H5S_FRIEND /*suppress error about including H5Spkg */
-#define H5S_TESTING /*suppress warning about H5S testing funcs*/
-#include "H5Spkg.h" /* Dataspaces */
+#define H5S_FRIEND /*suppress error about including H5Spkg */
+#define H5S_TESTING /*suppress warning about H5S testing funcs*/
+#include "H5Spkg.h" /* Dataspaces */
/*
* This file needs to access private information from the H5O package.
* This file also needs to access the dataspace testing code.
*/
-#define H5O_FRIEND /*suppress error about including H5Opkg */
+#define H5O_FRIEND /*suppress error about including H5Opkg */
#define H5O_TESTING
-#include "H5Opkg.h" /* Object header */
+#include "H5Opkg.h" /* Object header */
-#define TESTFILE "th5s.h5"
-#define DATAFILE "th5s1.h5"
-#define NULLFILE "th5s2.h5"
-#define BASICFILE "th5s3.h5"
-#define ZEROFILE "th5s4.h5"
+#define TESTFILE "th5s.h5"
+#define DATAFILE "th5s1.h5"
+#define NULLFILE "th5s2.h5"
+#define BASICFILE "th5s3.h5"
+#define ZEROFILE "th5s4.h5"
#define BASICDATASET "basic_dataset"
#define BASICDATASET1 "basic_dataset1"
#define BASICDATASET2 "basic_dataset2"
#define BASICDATASET3 "basic_dataset3"
#define BASICDATASET4 "basic_dataset4"
-#define BASICATTR "basic_attribute"
-#define NULLDATASET "null_dataset"
-#define NULLATTR "null_attribute"
-#define EXTFILE_NAME "ext_file"
+#define BASICATTR "basic_attribute"
+#define NULLDATASET "null_dataset"
+#define NULLATTR "null_attribute"
+#define EXTFILE_NAME "ext_file"
/* 3-D dataset with fixed dimensions */
-#define SPACE1_RANK 3
-#define SPACE1_DIM1 3
-#define SPACE1_DIM2 15
-#define SPACE1_DIM3 13
+#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_RANK 4
-#define SPACE2_DIM1 0
-#define SPACE2_DIM2 15
-#define SPACE2_DIM3 13
-#define SPACE2_DIM4 23
-#define SPACE2_MAX1 H5S_UNLIMITED
-#define SPACE2_MAX2 15
-#define SPACE2_MAX3 13
-#define SPACE2_MAX4 23
+#define SPACE2_RANK 4
+#define SPACE2_DIM1 0
+#define SPACE2_DIM2 15
+#define SPACE2_DIM3 13
+#define SPACE2_DIM4 23
+#define SPACE2_MAX1 H5S_UNLIMITED
+#define SPACE2_MAX2 15
+#define SPACE2_MAX3 13
+#define SPACE2_MAX4 23
/* Scalar dataset with simple datatype */
-#define SPACE3_RANK 0
-unsigned space3_data=65;
+#define SPACE3_RANK 0
+unsigned space3_data = 65;
/* Scalar dataset with compound datatype */
-#define SPACE4_FIELDNAME1 "c1"
-#define SPACE4_FIELDNAME2 "u"
-#define SPACE4_FIELDNAME3 "f"
-#define SPACE4_FIELDNAME4 "c2"
-size_t space4_field1_off=0;
-size_t space4_field2_off=0;
-size_t space4_field3_off=0;
-size_t space4_field4_off=0;
+#define SPACE4_FIELDNAME1 "c1"
+#define SPACE4_FIELDNAME2 "u"
+#define SPACE4_FIELDNAME3 "f"
+#define SPACE4_FIELDNAME4 "c2"
+size_t space4_field1_off = 0;
+size_t space4_field2_off = 0;
+size_t space4_field3_off = 0;
+size_t space4_field4_off = 0;
struct space4_struct {
- char c1;
+ char c1;
unsigned u;
- float f;
- char c2;
-} space4_data={'v',987123,-3.14F,'g'}; /* Test data for 4th dataspace */
+ float f;
+ char c2;
+} space4_data = {'v', 987123, -3.14F, 'g'}; /* Test data for 4th dataspace */
/*
* Testing configuration defines used by:
@@ -99,13 +99,12 @@ struct space4_struct {
* test_h5s_encode_irregular_hyper()
* test_h5s_encode_points()
*/
-#define CONFIG_8 1
-#define CONFIG_16 2
-#define CONFIG_32 3
-#define POWER8 256 /* 2^8 */
-#define POWER16 65536 /* 2^16 */
-#define POWER32 4294967296 /* 2^32 */
-
+#define CONFIG_8 1
+#define CONFIG_16 2
+#define CONFIG_32 3
+#define POWER8 256 /* 2^8 */
+#define POWER16 65536 /* 2^16 */
+#define POWER32 4294967296 /* 2^32 */
/****************************************************************
**
@@ -115,21 +114,19 @@ struct space4_struct {
static void
test_h5s_basic(void)
{
- hid_t fid1; /* HDF5 File IDs */
- hid_t sid1, sid2; /* Dataspace ID */
- hid_t dset1; /* Dataset ID */
- hid_t aid1; /* Attribute ID */
- int rank; /* Logical rank of dataspace */
- hsize_t dims1[] = {SPACE1_DIM1, SPACE1_DIM2, SPACE1_DIM3};
- hsize_t dims2[] = {SPACE2_DIM1, SPACE2_DIM2, SPACE2_DIM3,
- SPACE2_DIM4};
- hsize_t dims3[H5S_MAX_RANK+1];
- hsize_t max2[] = {SPACE2_MAX1, SPACE2_MAX2, SPACE2_MAX3,
- SPACE2_MAX4};
- hsize_t tdims[4]; /* Dimension array to test with */
- hsize_t tmax[4];
- hssize_t n; /* Number of dataspace elements */
- herr_t ret; /* Generic return value */
+ hid_t fid1; /* HDF5 File IDs */
+ hid_t sid1, sid2; /* Dataspace ID */
+ hid_t dset1; /* Dataset ID */
+ hid_t aid1; /* Attribute ID */
+ int rank; /* Logical rank of dataspace */
+ hsize_t dims1[] = {SPACE1_DIM1, SPACE1_DIM2, SPACE1_DIM3};
+ hsize_t dims2[] = {SPACE2_DIM1, SPACE2_DIM2, SPACE2_DIM3, SPACE2_DIM4};
+ hsize_t dims3[H5S_MAX_RANK + 1];
+ hsize_t max2[] = {SPACE2_MAX1, SPACE2_MAX2, SPACE2_MAX3, SPACE2_MAX4};
+ hsize_t tdims[4]; /* Dimension array to test with */
+ hsize_t tmax[4];
+ hssize_t n; /* Number of dataspace elements */
+ herr_t ret; /* Generic return value */
/* Output message about test being performed */
MESSAGE(5, ("Testing Dataspace Manipulation\n"));
@@ -139,8 +136,7 @@ test_h5s_basic(void)
n = H5Sget_simple_extent_npoints(sid1);
CHECK(n, FAIL, "H5Sget_simple_extent_npoints");
- VERIFY(n, SPACE1_DIM1 * SPACE1_DIM2 * SPACE1_DIM3,
- "H5Sget_simple_extent_npoints");
+ VERIFY(n, SPACE1_DIM1 * SPACE1_DIM2 * SPACE1_DIM3, "H5Sget_simple_extent_npoints");
rank = H5Sget_simple_extent_ndims(sid1);
CHECK(rank, FAIL, "H5Sget_simple_extent_ndims");
@@ -148,16 +144,14 @@ test_h5s_basic(void)
rank = H5Sget_simple_extent_dims(sid1, tdims, NULL);
CHECK(rank, FAIL, "H5Sget_simple_extent_dims");
- VERIFY(HDmemcmp(tdims, dims1, SPACE1_RANK * sizeof(hsize_t)), 0,
- "H5Sget_simple_extent_dims");
+ VERIFY(HDmemcmp(tdims, dims1, SPACE1_RANK * sizeof(hsize_t)), 0, "H5Sget_simple_extent_dims");
sid2 = H5Screate_simple(SPACE2_RANK, dims2, max2);
CHECK(sid2, FAIL, "H5Screate_simple");
n = H5Sget_simple_extent_npoints(sid2);
CHECK(n, FAIL, "H5Sget_simple_extent_npoints");
- VERIFY(n, SPACE2_DIM1 * SPACE2_DIM2 * SPACE2_DIM3 * SPACE2_DIM4,
- "H5Sget_simple_extent_npoints");
+ VERIFY(n, SPACE2_DIM1 * SPACE2_DIM2 * SPACE2_DIM3 * SPACE2_DIM4, "H5Sget_simple_extent_npoints");
rank = H5Sget_simple_extent_ndims(sid2);
CHECK(rank, FAIL, "H5Sget_simple_extent_ndims");
@@ -165,20 +159,16 @@ test_h5s_basic(void)
rank = H5Sget_simple_extent_dims(sid2, tdims, tmax);
CHECK(rank, FAIL, "H5Sget_simple_extent_dims");
- VERIFY(HDmemcmp(tdims, dims2, SPACE2_RANK * sizeof(hsize_t)), 0,
- "H5Sget_simple_extent_dims");
- VERIFY(HDmemcmp(tmax, max2, SPACE2_RANK * sizeof(hsize_t)), 0,
- "H5Sget_simple_extent_dims");
+ VERIFY(HDmemcmp(tdims, dims2, SPACE2_RANK * sizeof(hsize_t)), 0, "H5Sget_simple_extent_dims");
+ VERIFY(HDmemcmp(tmax, max2, SPACE2_RANK * sizeof(hsize_t)), 0, "H5Sget_simple_extent_dims");
/* Change max dims to be equal to the dimensions */
ret = H5Sset_extent_simple(sid1, SPACE1_RANK, dims1, NULL);
CHECK(ret, FAIL, "H5Sset_extent_simple");
rank = H5Sget_simple_extent_dims(sid1, tdims, tmax);
CHECK(rank, FAIL, "H5Sget_simple_extent_dims");
- VERIFY(HDmemcmp(tdims, dims1, SPACE1_RANK * sizeof(hsize_t)), 0,
- "H5Sget_simple_extent_dims");
- VERIFY(HDmemcmp(tmax, dims1, SPACE1_RANK * sizeof(hsize_t)), 0,
- "H5Sget_simple_extent_dims");
+ VERIFY(HDmemcmp(tdims, dims1, SPACE1_RANK * sizeof(hsize_t)), 0, "H5Sget_simple_extent_dims");
+ VERIFY(HDmemcmp(tmax, dims1, SPACE1_RANK * sizeof(hsize_t)), 0, "H5Sget_simple_extent_dims");
ret = H5Sclose(sid1);
CHECK(ret, FAIL, "H5Sclose");
@@ -190,9 +180,8 @@ test_h5s_basic(void)
* Check to be sure we can't create a simple dataspace that has too many
* dimensions.
*/
- H5E_BEGIN_TRY {
- sid1 = H5Screate_simple(H5S_MAX_RANK+1, dims3, NULL);
- } H5E_END_TRY;
+ H5E_BEGIN_TRY { sid1 = H5Screate_simple(H5S_MAX_RANK + 1, dims3, NULL); }
+ H5E_END_TRY;
VERIFY(sid1, FAIL, "H5Screate_simple");
/*
@@ -203,30 +192,30 @@ test_h5s_basic(void)
* the instructions in space_overflow.c for regenerating the th5s.h5 file.
*/
{
- const char *testfile = H5_get_srcdir_filename(TESTFILE); /* Corrected test file name */
-
- fid1 = H5Fopen(testfile, H5F_ACC_RDONLY, H5P_DEFAULT);
- CHECK_I(fid1, "H5Fopen");
- if (fid1 >= 0){
- dset1 = H5Dopen2(fid1, "dset", H5P_DEFAULT);
- VERIFY(dset1, FAIL, "H5Dopen2");
- ret = H5Fclose(fid1);
- CHECK_I(ret, "H5Fclose");
- }
- else
- HDprintf("***cannot open the pre-created H5S_MAX_RANK test file (%s)\n", testfile);
+ const char *testfile = H5_get_srcdir_filename(TESTFILE); /* Corrected test file name */
+
+ fid1 = H5Fopen(testfile, H5F_ACC_RDONLY, H5P_DEFAULT);
+ CHECK_I(fid1, "H5Fopen");
+ if (fid1 >= 0) {
+ dset1 = H5Dopen2(fid1, "dset", H5P_DEFAULT);
+ VERIFY(dset1, FAIL, "H5Dopen2");
+ ret = H5Fclose(fid1);
+ CHECK_I(ret, "H5Fclose");
+ }
+ else
+ HDprintf("***cannot open the pre-created H5S_MAX_RANK test file (%s)\n", testfile);
}
/* Verify that incorrect dimensions don't work */
dims1[0] = H5S_UNLIMITED;
- sid1 = H5Screate_simple(SPACE1_RANK, dims1, NULL);
+ sid1 = H5Screate_simple(SPACE1_RANK, dims1, NULL);
VERIFY(sid1, FAIL, "H5Screate_simple");
dims1[0] = H5S_UNLIMITED;
- sid1 = H5Screate(H5S_SIMPLE);
+ sid1 = H5Screate(H5S_SIMPLE);
CHECK(sid1, FAIL, "H5Screate");
- ret = H5Sset_extent_simple(sid1,SPACE1_RANK,dims1,NULL);
+ ret = H5Sset_extent_simple(sid1, SPACE1_RANK, dims1, NULL);
VERIFY(ret, FAIL, "H5Sset_extent_simple");
ret = H5Sclose(sid1);
@@ -239,7 +228,7 @@ test_h5s_basic(void)
fid1 = H5Fcreate(BASICFILE, H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT);
CHECK(fid1, FAIL, "H5Fcreate");
- dims1[0]=SPACE1_DIM1;
+ dims1[0] = SPACE1_DIM1;
sid1 = H5Screate(H5S_SIMPLE);
CHECK(sid1, FAIL, "H5Screate");
@@ -247,62 +236,55 @@ test_h5s_basic(void)
CHECK(sid2, FAIL, "H5Screate");
/* This dataset's space has no extent; it should not be created */
- H5E_BEGIN_TRY {
- dset1 = H5Dcreate2(fid1, BASICDATASET, H5T_NATIVE_INT, sid1, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT);
- } H5E_END_TRY
+ H5E_BEGIN_TRY
+ {
+ dset1 = H5Dcreate2(fid1, BASICDATASET, H5T_NATIVE_INT, sid1, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT);
+ }
+ H5E_END_TRY
VERIFY(dset1, FAIL, "H5Dcreate2");
dset1 = H5Dcreate2(fid1, BASICDATASET2, H5T_NATIVE_INT, sid2, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT);
CHECK(dset1, FAIL, "H5Dcreate2");
/* Try some writes with the bad dataspace (sid1) */
- H5E_BEGIN_TRY {
- ret = H5Dwrite(dset1, H5T_NATIVE_INT, sid1, H5S_ALL, H5P_DEFAULT, &n);
- } H5E_END_TRY
+ H5E_BEGIN_TRY { ret = H5Dwrite(dset1, H5T_NATIVE_INT, sid1, H5S_ALL, H5P_DEFAULT, &n); }
+ H5E_END_TRY
VERIFY(ret, FAIL, "H5Dwrite");
- H5E_BEGIN_TRY {
- ret = H5Dwrite(dset1, H5T_NATIVE_INT, H5S_ALL, sid1, H5P_DEFAULT, &n);
- } H5E_END_TRY
+ H5E_BEGIN_TRY { ret = H5Dwrite(dset1, H5T_NATIVE_INT, H5S_ALL, sid1, H5P_DEFAULT, &n); }
+ H5E_END_TRY
VERIFY(ret, FAIL, "H5Dwrite");
- H5E_BEGIN_TRY {
- ret = H5Dwrite(dset1, H5T_NATIVE_INT, sid1, sid1, H5P_DEFAULT, &n);
- } H5E_END_TRY
+ H5E_BEGIN_TRY { ret = H5Dwrite(dset1, H5T_NATIVE_INT, sid1, sid1, H5P_DEFAULT, &n); }
+ H5E_END_TRY
VERIFY(ret, FAIL, "H5Dwrite");
/* Try to iterate using the bad dataspace */
- H5E_BEGIN_TRY {
- ret = H5Diterate(&n, H5T_NATIVE_INT, sid1, NULL, NULL);
- } H5E_END_TRY
+ H5E_BEGIN_TRY { ret = H5Diterate(&n, H5T_NATIVE_INT, sid1, NULL, NULL); }
+ H5E_END_TRY
VERIFY(ret, FAIL, "H5Diterate");
/* Try to fill using the bad dataspace */
- H5E_BEGIN_TRY {
- ret = H5Dfill(NULL, H5T_NATIVE_INT, &n, H5T_NATIVE_INT, sid1);
- } H5E_END_TRY
+ H5E_BEGIN_TRY { ret = H5Dfill(NULL, H5T_NATIVE_INT, &n, H5T_NATIVE_INT, sid1); }
+ H5E_END_TRY
VERIFY(ret, FAIL, "H5Dfill");
/* Now use the bad dataspace as the space for an attribute */
- H5E_BEGIN_TRY {
- aid1 = H5Acreate2(dset1, BASICATTR, H5T_NATIVE_INT, sid1, H5P_DEFAULT, H5P_DEFAULT);
- } H5E_END_TRY
+ H5E_BEGIN_TRY { aid1 = H5Acreate2(dset1, BASICATTR, H5T_NATIVE_INT, sid1, H5P_DEFAULT, H5P_DEFAULT); }
+ H5E_END_TRY
VERIFY(aid1, FAIL, "H5Acreate2");
/* Make sure that dataspace reads using the bad dataspace fail */
- H5E_BEGIN_TRY {
- ret = H5Dread(dset1, H5T_NATIVE_INT, sid1, H5S_ALL, H5P_DEFAULT, &n);
- } H5E_END_TRY
+ H5E_BEGIN_TRY { ret = H5Dread(dset1, H5T_NATIVE_INT, sid1, H5S_ALL, H5P_DEFAULT, &n); }
+ H5E_END_TRY
VERIFY(ret, FAIL, "H5Dread");
- H5E_BEGIN_TRY {
- ret = H5Dread(dset1, H5T_NATIVE_INT, H5S_ALL, sid1, H5P_DEFAULT, &n);
- } H5E_END_TRY
+ H5E_BEGIN_TRY { ret = H5Dread(dset1, H5T_NATIVE_INT, H5S_ALL, sid1, H5P_DEFAULT, &n); }
+ H5E_END_TRY
VERIFY(ret, FAIL, "H5Dread");
- H5E_BEGIN_TRY {
- ret = H5Dread(dset1, H5T_NATIVE_INT, sid1, sid1, H5P_DEFAULT, &n);
- } H5E_END_TRY
+ H5E_BEGIN_TRY { ret = H5Dread(dset1, H5T_NATIVE_INT, sid1, sid1, H5P_DEFAULT, &n); }
+ H5E_END_TRY
VERIFY(ret, FAIL, "H5Dread");
/* Clean up */
@@ -314,7 +296,7 @@ test_h5s_basic(void)
CHECK(ret, FAIL, "H5Sclose");
ret = H5Fclose(fid1);
CHECK(ret, FAIL, "H5Fclose");
-} /* test_h5s_basic() */
+} /* test_h5s_basic() */
/****************************************************************
**
@@ -324,20 +306,20 @@ test_h5s_basic(void)
static void
test_h5s_null(void)
{
- hid_t fid; /* File ID */
- hid_t sid; /* Dataspace IDs */
- hid_t dset_sid, dset_sid2; /* Dataspace IDs */
- hid_t attr_sid; /* Dataspace IDs */
- hid_t did; /* Dataset ID */
- hid_t attr; /*Attribute ID */
- H5S_class_t stype; /* dataspace type */
- hssize_t nelem; /* Number of elements */
- unsigned uval=2; /* Buffer for writing to dataset */
- int val=1; /* Buffer for writing to attribute */
- H5S_sel_type sel_type; /* Type of selection currently */
- hsize_t dims[1]={10}; /* Dimensions for converting null dataspace to simple */
- H5S_class_t space_type; /* Type of dataspace */
- herr_t ret; /* Generic return value */
+ hid_t fid; /* File ID */
+ hid_t sid; /* Dataspace IDs */
+ hid_t dset_sid, dset_sid2; /* Dataspace IDs */
+ hid_t attr_sid; /* Dataspace IDs */
+ hid_t did; /* Dataset ID */
+ hid_t attr; /*Attribute ID */
+ H5S_class_t stype; /* dataspace type */
+ hssize_t nelem; /* Number of elements */
+ unsigned uval = 2; /* Buffer for writing to dataset */
+ int val = 1; /* Buffer for writing to attribute */
+ H5S_sel_type sel_type; /* Type of selection currently */
+ hsize_t dims[1] = {10}; /* Dimensions for converting null dataspace to simple */
+ H5S_class_t space_type; /* Type of dataspace */
+ herr_t ret; /* Generic return value */
/* Output message about test being performed */
MESSAGE(5, ("Testing Null Dataspace\n"));
@@ -370,21 +352,25 @@ test_h5s_null(void)
VERIFY(nelem, 0, "H5Sget_select_npoints");
/* Check to be sure we can't set a hyperslab selection on a null dataspace */
- H5E_BEGIN_TRY {
- hsize_t start[1]={0};
- hsize_t count[1]={0};
+ H5E_BEGIN_TRY
+ {
+ hsize_t start[1] = {0};
+ hsize_t count[1] = {0};
- ret = H5Sselect_hyperslab(sid, H5S_SELECT_SET, start, NULL, count, NULL);
- } H5E_END_TRY;
+ ret = H5Sselect_hyperslab(sid, H5S_SELECT_SET, start, NULL, count, NULL);
+ }
+ H5E_END_TRY;
VERIFY(ret, FAIL, "H5Sselect_hyperslab");
/* Check to be sure we can't set a point selection on a null dataspace */
- H5E_BEGIN_TRY {
- hsize_t coord[1][1]; /* Coordinates for point selection */
+ H5E_BEGIN_TRY
+ {
+ hsize_t coord[1][1]; /* Coordinates for point selection */
- coord[0][0]=0;
- ret = H5Sselect_elements(sid, H5S_SELECT_SET, (size_t)1, (const hsize_t *)coord);
- } H5E_END_TRY;
+ coord[0][0] = 0;
+ ret = H5Sselect_elements(sid, H5S_SELECT_SET, (size_t)1, (const hsize_t *)coord);
+ }
+ H5E_END_TRY;
VERIFY(ret, FAIL, "H5Sselect_elements");
/* Create first dataset */
@@ -432,7 +418,7 @@ test_h5s_null(void)
VERIFY(uval, 2, "H5Aread");
/* Close attribute */
- ret=H5Aclose(attr);
+ ret = H5Aclose(attr);
CHECK(ret, FAIL, "H5Aclose");
/* Close the dataset */
@@ -524,7 +510,7 @@ test_h5s_null(void)
VERIFY(val, 1, "H5Aread");
/* Close attribute */
- ret=H5Aclose(attr);
+ ret = H5Aclose(attr);
CHECK(ret, FAIL, "H5Aclose");
/* Close the dataset */
@@ -544,61 +530,61 @@ test_h5s_null(void)
static void
test_h5s_zero_dim(void)
{
- hid_t fid1; /* HDF5 File IDs */
- hid_t sid1, attr_sid; /* Dataspace ID */
- hid_t sid_chunk; /* Dataspace ID for chunked dataset */
- hid_t dset1; /* Dataset ID */
- hid_t plist_id; /* Dataset creation property list */
- hid_t attr; /* Attribute ID */
- int rank; /* Logical rank of dataspace */
- hsize_t dims1[] = {0, SPACE1_DIM2, SPACE1_DIM3};
- hsize_t max_dims[] = {SPACE1_DIM1+1, SPACE1_DIM2, SPACE1_DIM3};
- hsize_t extend_dims[] = {SPACE1_DIM1, SPACE1_DIM2, SPACE1_DIM3};
- hsize_t chunk_dims[] = {SPACE1_DIM1, SPACE1_DIM2/3, SPACE1_DIM3};
- hsize_t tdims[SPACE1_RANK]; /* Dimension array to test with */
- int wdata[SPACE1_DIM2][SPACE1_DIM3];
- int rdata[SPACE1_DIM2][SPACE1_DIM3];
- short wdata_short[SPACE1_DIM2][SPACE1_DIM3];
- short rdata_short[SPACE1_DIM2][SPACE1_DIM3];
- int wdata_real[SPACE1_DIM1][SPACE1_DIM2][SPACE1_DIM3];
- int rdata_real[SPACE1_DIM1][SPACE1_DIM2][SPACE1_DIM3];
- int val = 3;
- hsize_t start[] = {0, 0, 0};
- hsize_t count[] = {3, 15, 13};
- hsize_t coord[1][3]; /* Coordinates for point selection */
- hssize_t nelem; /* Number of elements */
- H5S_sel_type sel_type; /* Type of selection currently */
- H5S_class_t stype; /* dataspace type */
- H5D_alloc_time_t alloc_time; /* Space allocation time */
- herr_t ret; /* Generic return value */
- unsigned int i, j, k;
+ hid_t fid1; /* HDF5 File IDs */
+ hid_t sid1, attr_sid; /* Dataspace ID */
+ hid_t sid_chunk; /* Dataspace ID for chunked dataset */
+ hid_t dset1; /* Dataset ID */
+ hid_t plist_id; /* Dataset creation property list */
+ hid_t attr; /* Attribute ID */
+ int rank; /* Logical rank of dataspace */
+ hsize_t dims1[] = {0, SPACE1_DIM2, SPACE1_DIM3};
+ hsize_t max_dims[] = {SPACE1_DIM1 + 1, SPACE1_DIM2, SPACE1_DIM3};
+ hsize_t extend_dims[] = {SPACE1_DIM1, SPACE1_DIM2, SPACE1_DIM3};
+ hsize_t chunk_dims[] = {SPACE1_DIM1, SPACE1_DIM2 / 3, SPACE1_DIM3};
+ hsize_t tdims[SPACE1_RANK]; /* Dimension array to test with */
+ int wdata[SPACE1_DIM2][SPACE1_DIM3];
+ int rdata[SPACE1_DIM2][SPACE1_DIM3];
+ short wdata_short[SPACE1_DIM2][SPACE1_DIM3];
+ short rdata_short[SPACE1_DIM2][SPACE1_DIM3];
+ int wdata_real[SPACE1_DIM1][SPACE1_DIM2][SPACE1_DIM3];
+ int rdata_real[SPACE1_DIM1][SPACE1_DIM2][SPACE1_DIM3];
+ int val = 3;
+ hsize_t start[] = {0, 0, 0};
+ hsize_t count[] = {3, 15, 13};
+ hsize_t coord[1][3]; /* Coordinates for point selection */
+ hssize_t nelem; /* Number of elements */
+ H5S_sel_type sel_type; /* Type of selection currently */
+ H5S_class_t stype; /* dataspace type */
+ H5D_alloc_time_t alloc_time; /* Space allocation time */
+ herr_t ret; /* Generic return value */
+ unsigned int i, j, k;
/* Output message about test being performed */
MESSAGE(5, ("Testing Dataspace with zero dimension size\n"));
/* Initialize the data */
- for(i = 0; i < SPACE1_DIM2; i++)
- for(j = 0; j < SPACE1_DIM3; j++) {
- wdata[i][j] = (int)(i + j);
- rdata[i][j] = 7;
+ for (i = 0; i < SPACE1_DIM2; i++)
+ for (j = 0; j < SPACE1_DIM3; j++) {
+ wdata[i][j] = (int)(i + j);
+ rdata[i][j] = 7;
wdata_short[i][j] = (short)(i + j);
rdata_short[i][j] = 7;
}
- for(i = 0; i < SPACE1_DIM1; i++)
- for(j = 0; j < SPACE1_DIM2; j++)
- for(k = 0; k < SPACE1_DIM3; k++)
+ for (i = 0; i < SPACE1_DIM1; i++)
+ for (j = 0; j < SPACE1_DIM2; j++)
+ for (k = 0; k < SPACE1_DIM3; k++)
wdata_real[i][j][k] = (int)(i + j + k);
/* Test with different space allocation times */
- for(alloc_time = H5D_ALLOC_TIME_EARLY; alloc_time <= H5D_ALLOC_TIME_INCR; alloc_time++) {
+ for (alloc_time = H5D_ALLOC_TIME_EARLY; alloc_time <= H5D_ALLOC_TIME_INCR; alloc_time++) {
/* Make sure we can create the space with the dimension size 0 (starting from v1.8.7).
* The dimension doesn't need to be unlimited. */
dims1[0] = 0;
dims1[1] = SPACE1_DIM2;
dims1[2] = SPACE1_DIM3;
- sid1 = H5Screate_simple(SPACE1_RANK, dims1, NULL);
+ sid1 = H5Screate_simple(SPACE1_RANK, dims1, NULL);
CHECK(sid1, FAIL, "H5Screate_simple");
ret = H5Sclose(sid1);
@@ -609,7 +595,7 @@ test_h5s_zero_dim(void)
/* SID1 has the 1st dimension size as zero. The maximal dimension will be
* the same as the dimension because of the NULL passed in. */
- ret = H5Sset_extent_simple(sid1,SPACE1_RANK,dims1,NULL);
+ ret = H5Sset_extent_simple(sid1, SPACE1_RANK, dims1, NULL);
CHECK(ret, FAIL, "H5Sset_extent_simple");
/* Check that the dataspace actually has 0 elements */
@@ -679,12 +665,11 @@ test_h5s_zero_dim(void)
CHECK(ret, FAIL, "H5Dread");
/* Check results */
- for(i=0; i<SPACE1_DIM2; i++) {
- for(j=0; j<SPACE1_DIM3; j++) {
- if(rdata[i][j] != 7) {
+ for (i = 0; i < SPACE1_DIM2; i++) {
+ for (j = 0; j < SPACE1_DIM3; j++) {
+ if (rdata[i][j] != 7) {
H5_FAILED();
- HDprintf("element [%d][%d] is %d but should have been 7\n",
- i, j, rdata[i][j]);
+ HDprintf("element [%d][%d] is %d but should have been 7\n", i, j, rdata[i][j]);
}
}
}
@@ -701,12 +686,11 @@ test_h5s_zero_dim(void)
CHECK(ret, FAIL, "H5Dread");
/* Check results */
- for(i=0; i<SPACE1_DIM2; i++) {
- for(j=0; j<SPACE1_DIM3; j++) {
- if(rdata_short[i][j] != 7) {
+ for (i = 0; i < SPACE1_DIM2; i++) {
+ for (j = 0; j < SPACE1_DIM3; j++) {
+ if (rdata_short[i][j] != 7) {
H5_FAILED();
- HDprintf("element [%d][%d] is %d but should have been 7\n",
- i, j, rdata_short[i][j]);
+ HDprintf("element [%d][%d] is %d but should have been 7\n", i, j, rdata_short[i][j]);
}
}
}
@@ -716,9 +700,8 @@ test_h5s_zero_dim(void)
ret = H5Sselect_hyperslab(sid1, H5S_SELECT_SET, start, NULL, count, NULL);
CHECK(ret, FAIL, "H5Sselect_hyperslab");
- H5E_BEGIN_TRY {
- ret = H5Dwrite(dset1, H5T_NATIVE_INT, H5S_ALL, sid1, H5P_DEFAULT, wdata);
- } H5E_END_TRY;
+ H5E_BEGIN_TRY { ret = H5Dwrite(dset1, H5T_NATIVE_INT, H5S_ALL, sid1, H5P_DEFAULT, wdata); }
+ H5E_END_TRY;
VERIFY(ret, FAIL, "H5Dwrite");
/* Change to "none" selection */
@@ -727,13 +710,14 @@ test_h5s_zero_dim(void)
/* Select a point beyond the dimension size, then try to write the data.
* It should fail. */
- coord[0][0]=2; coord[0][1]=5; coord[0][2]=3;
- ret = H5Sselect_elements(sid1, H5S_SELECT_SET, (size_t)1, (const hsize_t *)coord);
+ coord[0][0] = 2;
+ coord[0][1] = 5;
+ coord[0][2] = 3;
+ ret = H5Sselect_elements(sid1, H5S_SELECT_SET, (size_t)1, (const hsize_t *)coord);
CHECK(ret, FAIL, "H5Sselect_elements");
- H5E_BEGIN_TRY {
- ret = H5Dwrite(dset1, H5T_NATIVE_INT, H5S_ALL, sid1, H5P_DEFAULT, &val);
- } H5E_END_TRY;
+ H5E_BEGIN_TRY { ret = H5Dwrite(dset1, H5T_NATIVE_INT, H5S_ALL, sid1, H5P_DEFAULT, &val); }
+ H5E_END_TRY;
VERIFY(ret, FAIL, "H5Dwrite");
/* Restore the selection to all */
@@ -753,7 +737,8 @@ test_h5s_zero_dim(void)
/* ret = H5Pset_alloc_time(plist_id, alloc_time); */
/* CHECK(ret, FAIL, "H5Pset_alloc_time"); */
- dset1 = H5Dcreate2(fid1, BASICDATASET1, H5T_NATIVE_INT, sid_chunk, H5P_DEFAULT, plist_id, H5P_DEFAULT);
+ dset1 =
+ H5Dcreate2(fid1, BASICDATASET1, H5T_NATIVE_INT, sid_chunk, H5P_DEFAULT, plist_id, H5P_DEFAULT);
CHECK(dset1, FAIL, "H5Dcreate2");
/* Write "nothing" to the dataset */
@@ -768,19 +753,18 @@ test_h5s_zero_dim(void)
CHECK(ret, FAIL, "H5Dread");
/* Check results */
- for(i=0; i<SPACE1_DIM2; i++)
- for(j=0; j<SPACE1_DIM3; j++) {
- if(rdata[i][j] != 7) {
+ for (i = 0; i < SPACE1_DIM2; i++)
+ for (j = 0; j < SPACE1_DIM3; j++) {
+ if (rdata[i][j] != 7) {
H5_FAILED();
- HDprintf("element [%d][%d] is %d but should have been 7\n",
- i, j, rdata[i][j]);
+ HDprintf("element [%d][%d] is %d but should have been 7\n", i, j, rdata[i][j]);
}
- }
+ }
/* Now extend the dataset to SPACE1_DIM1*SPACE1_DIM2*SPACE1_DIM3 and make sure
* we can write data to it */
extend_dims[0] = SPACE1_DIM1;
- ret = H5Dset_extent(dset1, extend_dims);
+ ret = H5Dset_extent(dset1, extend_dims);
CHECK(ret, FAIL, "H5Dset_extent");
ret = H5Dwrite(dset1, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, wdata_real);
@@ -793,13 +777,13 @@ test_h5s_zero_dim(void)
CHECK(ret, FAIL, "H5Dread");
/* Check results */
- for(i=0; i<SPACE1_DIM1; i++) {
- for(j=0; j<SPACE1_DIM2; j++) {
- for(k=0; k<SPACE1_DIM3; k++) {
- if(rdata_real[i][j][k] != wdata_real[i][j][k]) {
+ for (i = 0; i < SPACE1_DIM1; i++) {
+ for (j = 0; j < SPACE1_DIM2; j++) {
+ for (k = 0; k < SPACE1_DIM3; k++) {
+ if (rdata_real[i][j][k] != wdata_real[i][j][k]) {
H5_FAILED();
- HDprintf("element [%d][%d][%d] is %d but should have been %d\n",
- i, j, k, rdata_real[i][j][k], wdata_real[i][j][k]);
+ HDprintf("element [%d][%d][%d] is %d but should have been %d\n", i, j, k,
+ rdata_real[i][j][k], wdata_real[i][j][k]);
}
}
}
@@ -807,7 +791,7 @@ test_h5s_zero_dim(void)
/* Now shrink the first dimension size of the dataset to 0 and make sure no data is in it */
extend_dims[0] = 0;
- ret = H5Dset_extent(dset1, extend_dims);
+ ret = H5Dset_extent(dset1, extend_dims);
CHECK(ret, FAIL, "H5Dset_extent");
ret = H5Fflush(fid1, H5F_SCOPE_GLOBAL);
@@ -818,21 +802,19 @@ test_h5s_zero_dim(void)
CHECK(ret, FAIL, "H5Dread");
/* Check results */
- for(i=0; i<SPACE1_DIM2; i++)
- for(j=0; j<SPACE1_DIM3; j++) {
- if(rdata[i][j] != 7) {
+ for (i = 0; i < SPACE1_DIM2; i++)
+ for (j = 0; j < SPACE1_DIM3; j++) {
+ if (rdata[i][j] != 7) {
H5_FAILED();
- HDprintf("element [%d][%d] is %d but should have been 7\n",
- i, j, rdata[i][j]);
+ HDprintf("element [%d][%d] is %d but should have been 7\n", i, j, rdata[i][j]);
}
- }
+ }
/* Now extend the first dimension size of the dataset to SPACE1_DIM1*3 past the maximal size.
* It is supposed to fail. */
- extend_dims[0] = SPACE1_DIM1*3;
- H5E_BEGIN_TRY {
- ret = H5Dset_extent(dset1, extend_dims);
- } H5E_END_TRY;
+ extend_dims[0] = SPACE1_DIM1 * 3;
+ H5E_BEGIN_TRY { ret = H5Dset_extent(dset1, extend_dims); }
+ H5E_END_TRY;
VERIFY(ret, FAIL, "H5Dset_extent");
ret = H5Pclose(plist_id);
@@ -865,14 +847,13 @@ test_h5s_zero_dim(void)
CHECK(ret, FAIL, "H5Dread");
/* Check results */
- for(i=0; i<SPACE1_DIM2; i++)
- for(j=0; j<SPACE1_DIM3; j++) {
- if(rdata[i][j] != 7) {
+ for (i = 0; i < SPACE1_DIM2; i++)
+ for (j = 0; j < SPACE1_DIM3; j++) {
+ if (rdata[i][j] != 7) {
H5_FAILED();
- HDprintf("element [%d][%d] is %d but should have been 7\n",
- i, j, rdata[i][j]);
+ HDprintf("element [%d][%d] is %d but should have been 7\n", i, j, rdata[i][j]);
}
- }
+ }
ret = H5Pclose(plist_id);
CHECK(ret, FAIL, "H5Pclose");
@@ -909,12 +890,11 @@ test_h5s_zero_dim(void)
CHECK(ret, FAIL, "H5Dread");
/* Check results */
- for(i=0; i<SPACE1_DIM2; i++) {
- for(j=0; j<SPACE1_DIM3; j++) {
- if(rdata[i][j] != 7) {
+ for (i = 0; i < SPACE1_DIM2; i++) {
+ for (j = 0; j < SPACE1_DIM3; j++) {
+ if (rdata[i][j] != 7) {
H5_FAILED();
- HDprintf("element [%d][%d] is %d but should have been 7\n",
- i, j, rdata[i][j]);
+ HDprintf("element [%d][%d] is %d but should have been 7\n", i, j, rdata[i][j]);
}
}
}
@@ -941,12 +921,11 @@ test_h5s_zero_dim(void)
CHECK(ret, FAIL, "H5Aread");
/* Check results */
- for(i=0; i<SPACE1_DIM2; i++) {
- for(j=0; j<SPACE1_DIM3; j++) {
- if(rdata[i][j] != 7) {
+ for (i = 0; i < SPACE1_DIM2; i++) {
+ for (j = 0; j < SPACE1_DIM3; j++) {
+ if (rdata[i][j] != 7) {
H5_FAILED();
- HDprintf("element [%d][%d] is %d but should have been 7\n",
- i, j, rdata[i][j]);
+ HDprintf("element [%d][%d] is %d but should have been 7\n", i, j, rdata[i][j]);
}
}
}
@@ -963,12 +942,11 @@ test_h5s_zero_dim(void)
CHECK(ret, FAIL, "H5Aread");
/* Check results */
- for(i=0; i<SPACE1_DIM2; i++) {
- for(j=0; j<SPACE1_DIM3; j++) {
- if(rdata_short[i][j] != 7) {
+ for (i = 0; i < SPACE1_DIM2; i++) {
+ for (j = 0; j < SPACE1_DIM3; j++) {
+ if (rdata_short[i][j] != 7) {
H5_FAILED();
- HDprintf("element [%d][%d] is %d but should have been 7\n",
- i, j, rdata_short[i][j]);
+ HDprintf("element [%d][%d] is %d but should have been 7\n", i, j, rdata_short[i][j]);
}
}
}
@@ -983,14 +961,13 @@ test_h5s_zero_dim(void)
* dataset now.
*===============================================================
*/
- dims1[0]=SPACE1_DIM1;
- ret = H5Sset_extent_simple(sid_chunk,SPACE1_RANK,dims1,max_dims);
+ dims1[0] = SPACE1_DIM1;
+ ret = H5Sset_extent_simple(sid_chunk, SPACE1_RANK, dims1, max_dims);
CHECK(ret, FAIL, "H5Sset_extent_simple");
nelem = H5Sget_simple_extent_npoints(sid_chunk);
CHECK(nelem, FAIL, "H5Sget_simple_extent_npoints");
- VERIFY(nelem, SPACE1_DIM1 * SPACE1_DIM2 * SPACE1_DIM3,
- "H5Sget_simple_extent_npoints");
+ VERIFY(nelem, SPACE1_DIM1 * SPACE1_DIM2 * SPACE1_DIM3, "H5Sget_simple_extent_npoints");
rank = H5Sget_simple_extent_ndims(sid_chunk);
CHECK(rank, FAIL, "H5Sget_simple_extent_ndims");
@@ -998,8 +975,7 @@ test_h5s_zero_dim(void)
rank = H5Sget_simple_extent_dims(sid_chunk, tdims, NULL);
CHECK(rank, FAIL, "H5Sget_simple_extent_dims");
- VERIFY(HDmemcmp(tdims, dims1, SPACE1_RANK * sizeof(hsize_t)), 0,
- "H5Sget_simple_extent_dims");
+ VERIFY(HDmemcmp(tdims, dims1, SPACE1_RANK * sizeof(hsize_t)), 0, "H5Sget_simple_extent_dims");
/* Set it to chunked dataset */
plist_id = H5Pcreate(H5P_DATASET_CREATE);
@@ -1011,7 +987,8 @@ test_h5s_zero_dim(void)
ret = H5Pset_alloc_time(plist_id, alloc_time);
CHECK(ret, FAIL, "H5Pset_alloc_time");
- dset1 = H5Dcreate2(fid1, BASICDATASET4, H5T_NATIVE_INT, sid_chunk, H5P_DEFAULT, plist_id, H5P_DEFAULT);
+ dset1 =
+ H5Dcreate2(fid1, BASICDATASET4, H5T_NATIVE_INT, sid_chunk, H5P_DEFAULT, plist_id, H5P_DEFAULT);
CHECK(dset1, FAIL, "H5Dcreate2");
ret = H5Dwrite(dset1, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, wdata_real);
@@ -1024,13 +1001,13 @@ test_h5s_zero_dim(void)
CHECK(ret, FAIL, "H5Dread");
/* Check results */
- for(i=0; i<SPACE1_DIM1; i++) {
- for(j=0; j<SPACE1_DIM2; j++) {
- for(k=0; k<SPACE1_DIM3; k++) {
- if(rdata_real[i][j][k] != wdata_real[i][j][k]) {
+ for (i = 0; i < SPACE1_DIM1; i++) {
+ for (j = 0; j < SPACE1_DIM2; j++) {
+ for (k = 0; k < SPACE1_DIM3; k++) {
+ if (rdata_real[i][j][k] != wdata_real[i][j][k]) {
H5_FAILED();
- HDprintf("element [%d][%d][%d] is %d but should have been %d\n",
- i, j, k, rdata_real[i][j][k], wdata_real[i][j][k]);
+ HDprintf("element [%d][%d][%d] is %d but should have been %d\n", i, j, k,
+ rdata_real[i][j][k], wdata_real[i][j][k]);
}
}
}
@@ -1044,8 +1021,8 @@ test_h5s_zero_dim(void)
/* Change the dimensions to make them zero size again (0x0x0). Verify that
* no element is in the dataspace. */
- dims1[0]=dims1[1]=dims1[2]=0;
- ret = H5Sset_extent_simple(sid_chunk,SPACE1_RANK,dims1,NULL);
+ dims1[0] = dims1[1] = dims1[2] = 0;
+ ret = H5Sset_extent_simple(sid_chunk, SPACE1_RANK, dims1, NULL);
CHECK(ret, FAIL, "H5Sset_extent_simple");
/* Check that the dataspace actually has 0 elements */
@@ -1112,12 +1089,11 @@ test_h5s_zero_dim(void)
CHECK(ret, FAIL, "H5Dread");
/* Check results */
- for(i=0; i<SPACE1_DIM2; i++) {
- for(j=0; j<SPACE1_DIM3; j++) {
- if(rdata[i][j] != 7) {
+ for (i = 0; i < SPACE1_DIM2; i++) {
+ for (j = 0; j < SPACE1_DIM3; j++) {
+ if (rdata[i][j] != 7) {
H5_FAILED();
- HDprintf("element [%d][%d] is %d but should have been 7\n",
- i, j, rdata[i][j]);
+ HDprintf("element [%d][%d] is %d but should have been 7\n", i, j, rdata[i][j]);
}
}
}
@@ -1150,18 +1126,17 @@ test_h5s_zero_dim(void)
CHECK(ret, FAIL, "H5Aread");
/* Check results */
- for(i=0; i<SPACE1_DIM2; i++) {
- for(j=0; j<SPACE1_DIM3; j++) {
- if(rdata_short[i][j] != 7) {
+ for (i = 0; i < SPACE1_DIM2; i++) {
+ for (j = 0; j < SPACE1_DIM3; j++) {
+ if (rdata_short[i][j] != 7) {
H5_FAILED();
- HDprintf("element [%d][%d] is %d but should have been 7\n",
- i, j, rdata_short[i][j]);
+ HDprintf("element [%d][%d] is %d but should have been 7\n", i, j, rdata_short[i][j]);
}
}
}
/* Close attribute */
- ret=H5Aclose(attr);
+ ret = H5Aclose(attr);
CHECK(ret, FAIL, "H5Aclose");
/* Close the dataspace */
@@ -1173,7 +1148,6 @@ test_h5s_zero_dim(void)
} /* end for */
} /* test_h5s_zero_dim() */
-
/****************************************************************
**
** test_h5s_encode(): Test H5S (dataspace) encoding and decoding.
@@ -1184,24 +1158,24 @@ test_h5s_zero_dim(void)
static void
test_h5s_encode(H5F_libver_t low, H5F_libver_t high)
{
- hid_t sid1, sid2, sid3; /* Dataspace ID */
- hid_t decoded_sid1, decoded_sid2, decoded_sid3;
- int rank; /* Logical rank of dataspace */
- hid_t fapl = -1; /* File access property list ID */
- hsize_t dims1[] = {SPACE1_DIM1, SPACE1_DIM2, SPACE1_DIM3};
- size_t sbuf_size=0, null_size=0, scalar_size=0;
- unsigned char *sbuf=NULL, *null_sbuf=NULL, *scalar_buf=NULL;
- hsize_t tdims[4]; /* Dimension array to test with */
- hssize_t n; /* Number of dataspace elements */
- hsize_t start[] = {0, 0, 0};
- hsize_t stride[] = {2, 5, 3};
- hsize_t count[] = {2, 2, 2};
- hsize_t block[] = {1, 3, 1};
- H5S_sel_type sel_type;
- H5S_class_t space_type;
- hssize_t nblocks;
- hid_t ret_id; /* Generic hid_t return value */
- herr_t ret; /* Generic return value */
+ hid_t sid1, sid2, sid3; /* Dataspace ID */
+ hid_t decoded_sid1, decoded_sid2, decoded_sid3;
+ int rank; /* Logical rank of dataspace */
+ hid_t fapl = -1; /* File access property list ID */
+ hsize_t dims1[] = {SPACE1_DIM1, SPACE1_DIM2, SPACE1_DIM3};
+ size_t sbuf_size = 0, null_size = 0, scalar_size = 0;
+ unsigned char *sbuf = NULL, *null_sbuf = NULL, *scalar_buf = NULL;
+ hsize_t tdims[4]; /* Dimension array to test with */
+ hssize_t n; /* Number of dataspace elements */
+ hsize_t start[] = {0, 0, 0};
+ hsize_t stride[] = {2, 5, 3};
+ hsize_t count[] = {2, 2, 2};
+ hsize_t block[] = {1, 3, 1};
+ H5S_sel_type sel_type;
+ H5S_class_t space_type;
+ hssize_t nblocks;
+ hid_t ret_id; /* Generic hid_t return value */
+ herr_t ret; /* Generic return value */
/* Output message about test being performed */
MESSAGE(5, ("Testing Dataspace Encoding and Decoding\n"));
@@ -1231,15 +1205,14 @@ test_h5s_encode(H5F_libver_t low, H5F_libver_t high)
ret = H5Sencode2(sid1, NULL, &sbuf_size, fapl);
CHECK(ret, FAIL, "H5Sencode2");
- if(sbuf_size>0) {
- sbuf = (unsigned char*)HDcalloc((size_t)1, sbuf_size);
+ if (sbuf_size > 0) {
+ sbuf = (unsigned char *)HDcalloc((size_t)1, sbuf_size);
CHECK(sbuf, NULL, "HDcalloc");
}
/* Try decoding bogus buffer */
- H5E_BEGIN_TRY {
- ret_id = H5Sdecode(sbuf);
- } H5E_END_TRY;
+ H5E_BEGIN_TRY { ret_id = H5Sdecode(sbuf); }
+ H5E_END_TRY;
VERIFY(ret_id, FAIL, "H5Sdecode");
/* Encode the simple dataspace in a buffer with the fapl setting */
@@ -1247,25 +1220,23 @@ test_h5s_encode(H5F_libver_t low, H5F_libver_t high)
CHECK(ret, FAIL, "H5Sencode");
/* Decode from the dataspace buffer and return an object handle */
- decoded_sid1=H5Sdecode(sbuf);
+ decoded_sid1 = H5Sdecode(sbuf);
CHECK(decoded_sid1, FAIL, "H5Sdecode");
/* Verify the decoded dataspace */
n = H5Sget_simple_extent_npoints(decoded_sid1);
CHECK(n, FAIL, "H5Sget_simple_extent_npoints");
- VERIFY(n, SPACE1_DIM1 * SPACE1_DIM2 * SPACE1_DIM3,
- "H5Sget_simple_extent_npoints");
+ VERIFY(n, SPACE1_DIM1 * SPACE1_DIM2 * SPACE1_DIM3, "H5Sget_simple_extent_npoints");
/* Retrieve and verify the dataspace rank */
rank = H5Sget_simple_extent_ndims(decoded_sid1);
CHECK(rank, FAIL, "H5Sget_simple_extent_ndims");
VERIFY(rank, SPACE1_RANK, "H5Sget_simple_extent_ndims");
- /* Retrieve and verify the dataspace dimensions */
+ /* Retrieve and verify the dataspace dimensions */
rank = H5Sget_simple_extent_dims(decoded_sid1, tdims, NULL);
CHECK(rank, FAIL, "H5Sget_simple_extent_dims");
- VERIFY(HDmemcmp(tdims, dims1, SPACE1_RANK * sizeof(hsize_t)), 0,
- "H5Sget_simple_extent_dims");
+ VERIFY(HDmemcmp(tdims, dims1, SPACE1_RANK * sizeof(hsize_t)), 0, "H5Sget_simple_extent_dims");
/* Verify the type of dataspace selection */
sel_type = H5Sget_select_type(decoded_sid1);
@@ -1273,7 +1244,7 @@ test_h5s_encode(H5F_libver_t low, H5F_libver_t high)
/* Verify the number of hyperslab blocks */
nblocks = H5Sget_select_hyper_nblocks(decoded_sid1);
- VERIFY(nblocks, 2*2*2, "H5Sget_select_hyper_nblocks");
+ VERIFY(nblocks, 2 * 2 * 2, "H5Sget_select_hyper_nblocks");
/* Close the dataspaces */
ret = H5Sclose(sid1);
@@ -1293,8 +1264,8 @@ test_h5s_encode(H5F_libver_t low, H5F_libver_t high)
ret = H5Sencode2(sid2, NULL, &null_size, fapl);
CHECK(ret, FAIL, "H5Sencode");
- if(null_size>0) {
- null_sbuf = (unsigned char*)HDcalloc((size_t)1, null_size);
+ if (null_size > 0) {
+ null_sbuf = (unsigned char *)HDcalloc((size_t)1, null_size);
CHECK(null_sbuf, NULL, "HDcalloc");
}
@@ -1303,7 +1274,7 @@ test_h5s_encode(H5F_libver_t low, H5F_libver_t high)
CHECK(ret, FAIL, "H5Sencode2");
/* Decode from the dataspace buffer and return an object handle */
- decoded_sid2=H5Sdecode(null_sbuf);
+ decoded_sid2 = H5Sdecode(null_sbuf);
CHECK(decoded_sid2, FAIL, "H5Sdecode");
/* Verify the decoded dataspace type */
@@ -1329,8 +1300,8 @@ test_h5s_encode(H5F_libver_t low, H5F_libver_t high)
ret = H5Sencode2(sid3, NULL, &scalar_size, fapl);
CHECK(ret, FAIL, "H5Sencode");
- if(scalar_size>0) {
- scalar_buf = (unsigned char*)HDcalloc((size_t)1, scalar_size);
+ if (scalar_size > 0) {
+ scalar_buf = (unsigned char *)HDcalloc((size_t)1, scalar_size);
CHECK(scalar_buf, NULL, "HDcalloc");
}
@@ -1339,7 +1310,7 @@ test_h5s_encode(H5F_libver_t low, H5F_libver_t high)
CHECK(ret, FAIL, "H5Sencode2");
/* Decode from the dataspace buffer and return an object handle */
- decoded_sid3=H5Sdecode(scalar_buf);
+ decoded_sid3 = H5Sdecode(scalar_buf);
CHECK(decoded_sid3, FAIL, "H5Sdecode");
/* Verify extent type */
@@ -1363,16 +1334,16 @@ test_h5s_encode(H5F_libver_t low, H5F_libver_t high)
ret = H5Sclose(decoded_sid3);
CHECK(ret, FAIL, "H5Sclose");
- /* Close the file access property list */
+ /* Close the file access property list */
ret = H5Pclose(fapl);
CHECK(ret, FAIL, "H5Pclose");
/* Release resources */
- if(sbuf)
+ if (sbuf)
HDfree(sbuf);
- if(null_sbuf)
+ if (null_sbuf)
HDfree(null_sbuf);
- if(scalar_buf)
+ if (scalar_buf)
HDfree(scalar_buf);
} /* test_h5s_encode() */
@@ -1386,23 +1357,23 @@ test_h5s_encode(H5F_libver_t low, H5F_libver_t high)
static void
test_h5s_encode1(void)
{
- hid_t sid1, sid2, sid3; /* Dataspace ID */
- hid_t decoded_sid1, decoded_sid2, decoded_sid3;
- int rank; /* Logical rank of dataspace */
- hsize_t dims1[] = {SPACE1_DIM1, SPACE1_DIM2, SPACE1_DIM3};
- size_t sbuf_size=0, null_size=0, scalar_size=0;
- unsigned char *sbuf=NULL, *null_sbuf=NULL, *scalar_buf=NULL;
- hsize_t tdims[4]; /* Dimension array to test with */
- hssize_t n; /* Number of dataspace elements */
- hsize_t start[] = {0, 0, 0};
- hsize_t stride[] = {2, 5, 3};
- hsize_t count[] = {2, 2, 2};
- hsize_t block[] = {1, 3, 1};
- H5S_sel_type sel_type;
- H5S_class_t space_type;
- hssize_t nblocks;
- hid_t ret_id; /* Generic hid_t return value */
- herr_t ret; /* Generic return value */
+ hid_t sid1, sid2, sid3; /* Dataspace ID */
+ hid_t decoded_sid1, decoded_sid2, decoded_sid3;
+ int rank; /* Logical rank of dataspace */
+ hsize_t dims1[] = {SPACE1_DIM1, SPACE1_DIM2, SPACE1_DIM3};
+ size_t sbuf_size = 0, null_size = 0, scalar_size = 0;
+ unsigned char *sbuf = NULL, *null_sbuf = NULL, *scalar_buf = NULL;
+ hsize_t tdims[4]; /* Dimension array to test with */
+ hssize_t n; /* Number of dataspace elements */
+ hsize_t start[] = {0, 0, 0};
+ hsize_t stride[] = {2, 5, 3};
+ hsize_t count[] = {2, 2, 2};
+ hsize_t block[] = {1, 3, 1};
+ H5S_sel_type sel_type;
+ H5S_class_t space_type;
+ hssize_t nblocks;
+ hid_t ret_id; /* Generic hid_t return value */
+ herr_t ret; /* Generic return value */
/* Output message about test being performed */
MESSAGE(5, ("Testing Dataspace Encoding (H5Sencode1) and Decoding\n"));
@@ -1423,15 +1394,14 @@ test_h5s_encode1(void)
ret = H5Sencode1(sid1, NULL, &sbuf_size);
CHECK(ret, FAIL, "H5Sencode2");
- if(sbuf_size>0) {
- sbuf = (unsigned char*)HDcalloc((size_t)1, sbuf_size);
+ if (sbuf_size > 0) {
+ sbuf = (unsigned char *)HDcalloc((size_t)1, sbuf_size);
CHECK(sbuf, NULL, "HDcalloc");
}
/* Try decoding bogus buffer */
- H5E_BEGIN_TRY {
- ret_id = H5Sdecode(sbuf);
- } H5E_END_TRY;
+ H5E_BEGIN_TRY { ret_id = H5Sdecode(sbuf); }
+ H5E_END_TRY;
VERIFY(ret_id, FAIL, "H5Sdecode");
/* Encode the simple dataspace in a buffer */
@@ -1439,25 +1409,23 @@ test_h5s_encode1(void)
CHECK(ret, FAIL, "H5Sencode");
/* Decode from the dataspace buffer and return an object handle */
- decoded_sid1=H5Sdecode(sbuf);
+ decoded_sid1 = H5Sdecode(sbuf);
CHECK(decoded_sid1, FAIL, "H5Sdecode");
/* Verify the decoded dataspace */
n = H5Sget_simple_extent_npoints(decoded_sid1);
CHECK(n, FAIL, "H5Sget_simple_extent_npoints");
- VERIFY(n, SPACE1_DIM1 * SPACE1_DIM2 * SPACE1_DIM3,
- "H5Sget_simple_extent_npoints");
+ VERIFY(n, SPACE1_DIM1 * SPACE1_DIM2 * SPACE1_DIM3, "H5Sget_simple_extent_npoints");
/* Retrieve and verify the dataspace rank */
rank = H5Sget_simple_extent_ndims(decoded_sid1);
CHECK(rank, FAIL, "H5Sget_simple_extent_ndims");
VERIFY(rank, SPACE1_RANK, "H5Sget_simple_extent_ndims");
- /* Retrieve and verify the dataspace dimensions */
+ /* Retrieve and verify the dataspace dimensions */
rank = H5Sget_simple_extent_dims(decoded_sid1, tdims, NULL);
CHECK(rank, FAIL, "H5Sget_simple_extent_dims");
- VERIFY(HDmemcmp(tdims, dims1, SPACE1_RANK * sizeof(hsize_t)), 0,
- "H5Sget_simple_extent_dims");
+ VERIFY(HDmemcmp(tdims, dims1, SPACE1_RANK * sizeof(hsize_t)), 0, "H5Sget_simple_extent_dims");
/* Verify the type of dataspace selection */
sel_type = H5Sget_select_type(decoded_sid1);
@@ -1465,7 +1433,7 @@ test_h5s_encode1(void)
/* Verify the number of hyperslab blocks */
nblocks = H5Sget_select_hyper_nblocks(decoded_sid1);
- VERIFY(nblocks, 2*2*2, "H5Sget_select_hyper_nblocks");
+ VERIFY(nblocks, 2 * 2 * 2, "H5Sget_select_hyper_nblocks");
/* Close the dataspaces */
ret = H5Sclose(sid1);
@@ -1485,8 +1453,8 @@ test_h5s_encode1(void)
ret = H5Sencode1(sid2, NULL, &null_size);
CHECK(ret, FAIL, "H5Sencode");
- if(null_size>0) {
- null_sbuf = (unsigned char*)HDcalloc((size_t)1, null_size);
+ if (null_size > 0) {
+ null_sbuf = (unsigned char *)HDcalloc((size_t)1, null_size);
CHECK(null_sbuf, NULL, "HDcalloc");
}
@@ -1495,7 +1463,7 @@ test_h5s_encode1(void)
CHECK(ret, FAIL, "H5Sencode2");
/* Decode from the dataspace buffer and return an object handle */
- decoded_sid2=H5Sdecode(null_sbuf);
+ decoded_sid2 = H5Sdecode(null_sbuf);
CHECK(decoded_sid2, FAIL, "H5Sdecode");
/* Verify the decoded dataspace type */
@@ -1521,8 +1489,8 @@ test_h5s_encode1(void)
ret = H5Sencode1(sid3, NULL, &scalar_size);
CHECK(ret, FAIL, "H5Sencode");
- if(scalar_size>0) {
- scalar_buf = (unsigned char*)HDcalloc((size_t)1, scalar_size);
+ if (scalar_size > 0) {
+ scalar_buf = (unsigned char *)HDcalloc((size_t)1, scalar_size);
CHECK(scalar_buf, NULL, "HDcalloc");
}
@@ -1531,7 +1499,7 @@ test_h5s_encode1(void)
CHECK(ret, FAIL, "H5Sencode2");
/* Decode from the dataspace buffer and return an object handle */
- decoded_sid3=H5Sdecode(scalar_buf);
+ decoded_sid3 = H5Sdecode(scalar_buf);
CHECK(decoded_sid3, FAIL, "H5Sdecode");
/* Verify extent type */
@@ -1556,17 +1524,16 @@ test_h5s_encode1(void)
CHECK(ret, FAIL, "H5Sclose");
/* Release resources */
- if(sbuf)
+ if (sbuf)
HDfree(sbuf);
- if(null_sbuf)
+ if (null_sbuf)
HDfree(null_sbuf);
- if(scalar_buf)
+ if (scalar_buf)
HDfree(scalar_buf);
} /* test_h5s_encode1() */
#endif /* H5_NO_DEPRECATED_SYMBOLS */
-
/****************************************************************
**
** test_h5s_check_encoding():
@@ -1582,27 +1549,27 @@ test_h5s_encode1(void)
**
****************************************************************/
static herr_t
-test_h5s_check_encoding(hid_t in_fapl, hid_t in_sid,
- uint32_t expected_version, uint8_t expected_enc_size, hbool_t expected_to_fail)
+test_h5s_check_encoding(hid_t in_fapl, hid_t in_sid, uint32_t expected_version, uint8_t expected_enc_size,
+ hbool_t expected_to_fail)
{
- char *buf = NULL; /* Pointer to the encoded buffer */
- size_t buf_size; /* Size of the encoded buffer */
- hid_t d_sid = -1; /* The decoded dataspace ID */
- htri_t check;
- hsize_t in_low_bounds[1]; /* The low bounds for the selection for in_sid */
- hsize_t in_high_bounds[1]; /* The high bounds for the selection for in_sid */
- hsize_t d_low_bounds[1]; /* The low bounds for the selection for d_sid */
- hsize_t d_high_bounds[1]; /* The high bounds for the selection for d_sid */
- herr_t ret; /* Return value */
+ char * buf = NULL; /* Pointer to the encoded buffer */
+ size_t buf_size; /* Size of the encoded buffer */
+ hid_t d_sid = -1; /* The decoded dataspace ID */
+ htri_t check;
+ hsize_t in_low_bounds[1]; /* The low bounds for the selection for in_sid */
+ hsize_t in_high_bounds[1]; /* The high bounds for the selection for in_sid */
+ hsize_t d_low_bounds[1]; /* The low bounds for the selection for d_sid */
+ hsize_t d_high_bounds[1]; /* The high bounds for the selection for d_sid */
+ herr_t ret; /* Return value */
/* Get buffer size for encoding with the format setting in in_fapl */
- H5E_BEGIN_TRY {
- ret = H5Sencode2(in_sid, NULL, &buf_size, in_fapl);
- } H5E_END_TRY
+ H5E_BEGIN_TRY { ret = H5Sencode2(in_sid, NULL, &buf_size, in_fapl); }
+ H5E_END_TRY
- if(expected_to_fail) {
+ if (expected_to_fail) {
VERIFY(ret, FAIL, "H5Screate_simple");
- } else {
+ }
+ else {
CHECK(ret, FAIL, "H5Sencode2");
@@ -1643,35 +1610,34 @@ test_h5s_check_encoding(hid_t in_fapl, hid_t in_sid,
* --the expected encoded size (version 3 hyperslab selection info)
*/
- if(H5Sget_select_type(in_sid) == H5S_SEL_POINTS) {
+ if (H5Sget_select_type(in_sid) == H5S_SEL_POINTS) {
/* Verify the version */
VERIFY((uint32_t)buf[35], expected_version, "Version for point selection");
/* Verify the encoded size for version 2 */
- if(expected_version == 2)
+ if (expected_version == 2)
VERIFY((uint8_t)buf[39], expected_enc_size, "Encoded size of point selection info");
}
- if(H5Sget_select_type(in_sid) == H5S_SEL_HYPERSLABS) {
+ if (H5Sget_select_type(in_sid) == H5S_SEL_HYPERSLABS) {
/* Verify the version */
VERIFY((uint32_t)buf[35], expected_version, "Version for hyperslab selection info");
/* Verify the encoded size for version 3 */
- if(expected_version == 3)
+ if (expected_version == 3)
VERIFY((uint8_t)buf[40], expected_enc_size, "Encoded size of selection info");
} /* hyperslab selection */
ret = H5Sclose(d_sid);
CHECK(ret, FAIL, "H5Sclose");
- if(buf)
+ if (buf)
HDfree(buf);
-
}
- return(0);
+ return (0);
} /* test_h5s_check_encoding */
@@ -1686,18 +1652,18 @@ test_h5s_check_encoding(hid_t in_fapl, hid_t in_sid,
static void
test_h5s_encode_regular_hyper(H5F_libver_t low, H5F_libver_t high)
{
- hid_t fapl = -1; /* File access property list ID */
- hid_t sid = -1; /* Dataspace ID */
- hsize_t numparticles = 8388608; /* Used to calculate dimension size */
- unsigned num_dsets = 513; /* Used to calculate dimension size */
- hsize_t total_particles = numparticles * num_dsets;
- hsize_t vdsdims[1] = {total_particles}; /* Dimension size */
- hsize_t start, stride, count, block; /* Selection info */
- unsigned config; /* Testing configuration */
- unsigned unlim; /* H5S_UNLIMITED setting or not */
- herr_t ret; /* Generic return value */
- uint32_t expected_version = 0; /* Expected version for selection info */
- uint8_t expected_enc_size = 0; /* Expected encoded size for selection info */
+ hid_t fapl = -1; /* File access property list ID */
+ hid_t sid = -1; /* Dataspace ID */
+ hsize_t numparticles = 8388608; /* Used to calculate dimension size */
+ unsigned num_dsets = 513; /* Used to calculate dimension size */
+ hsize_t total_particles = numparticles * num_dsets;
+ hsize_t vdsdims[1] = {total_particles}; /* Dimension size */
+ hsize_t start, stride, count, block; /* Selection info */
+ unsigned config; /* Testing configuration */
+ unsigned unlim; /* H5S_UNLIMITED setting or not */
+ herr_t ret; /* Generic return value */
+ uint32_t expected_version = 0; /* Expected version for selection info */
+ uint8_t expected_enc_size = 0; /* Expected encoded size for selection info */
/* Output message about test being performed */
MESSAGE(5, ("Testing Dataspace encoding of regular hyperslabs\n"));
@@ -1715,35 +1681,34 @@ test_h5s_encode_regular_hyper(H5F_libver_t low, H5F_libver_t high)
CHECK(sid, FAIL, "H5Screate_simple");
/* Testing with each configuration */
- for(config = CONFIG_16; config <= CONFIG_32; config++) {
+ for (config = CONFIG_16; config <= CONFIG_32; config++) {
hbool_t expected_to_fail = FALSE;
/* Testing with unlimited or not */
- for(unlim = 0; unlim <= 1; unlim++) {
+ for (unlim = 0; unlim <= 1; unlim++) {
start = 0;
- count = unlim? H5S_UNLIMITED : 2;
+ count = unlim ? H5S_UNLIMITED : 2;
- if((high <= H5F_LIBVER_V18) &&
- (unlim || config == CONFIG_32))
+ if ((high <= H5F_LIBVER_V18) && (unlim || config == CONFIG_32))
expected_to_fail = TRUE;
- if(low >= H5F_LIBVER_V112)
+ if (low >= H5F_LIBVER_V112)
expected_version = 3;
- else if(config == CONFIG_16 && !unlim)
+ else if (config == CONFIG_16 && !unlim)
expected_version = 1;
else
expected_version = 2;
/* test 1 */
- switch(config) {
+ switch (config) {
case CONFIG_16:
- stride = POWER16 - 1;
- block = 4;
+ stride = POWER16 - 1;
+ block = 4;
expected_enc_size = (uint8_t)(expected_version == 3 ? 2 : 4);
break;
case CONFIG_32:
- stride = POWER32 - 1;
- block = 4;
+ stride = POWER32 - 1;
+ block = 4;
expected_enc_size = (uint8_t)(expected_version == 3 ? 4 : 8);
break;
@@ -1761,15 +1726,15 @@ test_h5s_encode_regular_hyper(H5F_libver_t low, H5F_libver_t high)
CHECK(ret, FAIL, "test_h5s_check_encoding");
/* test 2 */
- switch(config) {
+ switch (config) {
case CONFIG_16:
- stride = POWER16 - 1;
- block = POWER16 - 2;
+ stride = POWER16 - 1;
+ block = POWER16 - 2;
expected_enc_size = (uint8_t)(expected_version == 3 ? 2 : 4);
break;
case CONFIG_32:
- stride = POWER32 - 1;
- block = POWER32 - 2;
+ stride = POWER32 - 1;
+ block = POWER32 - 2;
expected_enc_size = (uint8_t)(expected_version == 3 ? 4 : 8);
break;
default:
@@ -1786,15 +1751,15 @@ test_h5s_encode_regular_hyper(H5F_libver_t low, H5F_libver_t high)
CHECK(ret, FAIL, "test_h5s_check_encoding");
/* test 3 */
- switch(config) {
+ switch (config) {
case CONFIG_16:
- stride = POWER16 - 1;
- block = POWER16 - 1;
+ stride = POWER16 - 1;
+ block = POWER16 - 1;
expected_enc_size = 4;
break;
case CONFIG_32:
- stride = POWER32 - 1;
- block = POWER32 - 1;
+ stride = POWER32 - 1;
+ block = POWER32 - 1;
expected_enc_size = 8;
break;
default:
@@ -1811,15 +1776,15 @@ test_h5s_encode_regular_hyper(H5F_libver_t low, H5F_libver_t high)
CHECK(ret, FAIL, "test_h5s_check_encoding");
/* test 4 */
- switch(config) {
+ switch (config) {
case CONFIG_16:
- stride = POWER16;
- block = POWER16 - 2;
+ stride = POWER16;
+ block = POWER16 - 2;
expected_enc_size = 4;
break;
case CONFIG_32:
- stride = POWER32;
- block = POWER32 - 2;
+ stride = POWER32;
+ block = POWER32 - 2;
expected_enc_size = 8;
break;
default:
@@ -1836,15 +1801,15 @@ test_h5s_encode_regular_hyper(H5F_libver_t low, H5F_libver_t high)
CHECK(ret, FAIL, "test_h5s_check_encoding");
/* test 5 */
- switch(config) {
+ switch (config) {
case CONFIG_16:
- stride = POWER16;
- block = 1;
+ stride = POWER16;
+ block = 1;
expected_enc_size = 4;
break;
case CONFIG_32:
- stride = POWER32;
- block = 1;
+ stride = POWER32;
+ block = 1;
expected_enc_size = 8;
break;
default:
@@ -1861,7 +1826,7 @@ test_h5s_encode_regular_hyper(H5F_libver_t low, H5F_libver_t high)
CHECK(ret, FAIL, "test_h5s_check_encoding");
} /* for unlim */
- } /* for config */
+ } /* for config */
ret = H5Sclose(sid);
CHECK(ret, FAIL, "H5Sclose");
@@ -1882,16 +1847,16 @@ test_h5s_encode_regular_hyper(H5F_libver_t low, H5F_libver_t high)
static void
test_h5s_encode_irregular_hyper(H5F_libver_t low, H5F_libver_t high)
{
- hid_t fapl = -1; /* File access property list ID */
- hid_t sid; /* Dataspace ID */
- hsize_t numparticles = 8388608; /* Used to calculate dimension size */
- unsigned num_dsets = 513; /* Used to calculate dimension size */
- hsize_t total_particles = numparticles * num_dsets;
- hsize_t vdsdims[1] = {total_particles}; /* Dimension size */
- hsize_t start, stride, count, block; /* Selection info */
- htri_t is_regular; /* Is this a regular hyperslab */
- unsigned config; /* Testing configuration */
- herr_t ret; /* Generic return value */
+ hid_t fapl = -1; /* File access property list ID */
+ hid_t sid; /* Dataspace ID */
+ hsize_t numparticles = 8388608; /* Used to calculate dimension size */
+ unsigned num_dsets = 513; /* Used to calculate dimension size */
+ hsize_t total_particles = numparticles * num_dsets;
+ hsize_t vdsdims[1] = {total_particles}; /* Dimension size */
+ hsize_t start, stride, count, block; /* Selection info */
+ htri_t is_regular; /* Is this a regular hyperslab */
+ unsigned config; /* Testing configuration */
+ herr_t ret; /* Generic return value */
/* Output message about test being performed */
MESSAGE(5, ("Testing Dataspace encoding of irregular hyperslabs\n"));
@@ -1909,9 +1874,9 @@ test_h5s_encode_irregular_hyper(H5F_libver_t low, H5F_libver_t high)
CHECK(sid, FAIL, "H5Screate_simple");
/* Testing with each configuration */
- for(config = CONFIG_8; config <= CONFIG_32; config++) {
- hbool_t expected_to_fail = FALSE; /* Whether H5Sencode2 is expected to fail */
- uint32_t expected_version = 0; /* Expected version for selection info */
+ for (config = CONFIG_8; config <= CONFIG_32; config++) {
+ hbool_t expected_to_fail = FALSE; /* Whether H5Sencode2 is expected to fail */
+ uint32_t expected_version = 0; /* Expected version for selection info */
uint32_t expected_enc_size = 0; /* Expected encoded size for selection info */
start = 0;
@@ -1920,15 +1885,15 @@ test_h5s_encode_irregular_hyper(H5F_libver_t low, H5F_libver_t high)
/* H5Sencode2 is expected to fail for library v110 and below
when the selection exceeds the 32 bits integer limit */
- if(high <= H5F_LIBVER_V110 && config == CONFIG_32)
+ if (high <= H5F_LIBVER_V110 && config == CONFIG_32)
expected_to_fail = TRUE;
- if(low >= H5F_LIBVER_V112 || config == CONFIG_32)
+ if (low >= H5F_LIBVER_V112 || config == CONFIG_32)
expected_version = 3;
else
expected_version = 1;
- switch(config) {
+ switch (config) {
case CONFIG_8:
stride = POWER8 - 2;
break;
@@ -1954,19 +1919,19 @@ test_h5s_encode_irregular_hyper(H5F_libver_t low, H5F_libver_t high)
count = 5;
block = 2;
- switch(config) {
+ switch (config) {
case CONFIG_8:
- stride = POWER8;
+ stride = POWER8;
expected_enc_size = expected_version == 3 ? 2 : 4;
break;
case CONFIG_16:
- stride = POWER16;
+ stride = POWER16;
expected_enc_size = 4;
break;
case CONFIG_32:
- stride = POWER32;
+ stride = POWER32;
expected_enc_size = 8;
break;
@@ -1985,7 +1950,8 @@ test_h5s_encode_irregular_hyper(H5F_libver_t low, H5F_libver_t high)
/* Verify the version and encoded size expected for the configuration */
HDassert(expected_enc_size <= 255);
- ret = test_h5s_check_encoding(fapl, sid, expected_version, (uint8_t)expected_enc_size, expected_to_fail);
+ ret = test_h5s_check_encoding(fapl, sid, expected_version, (uint8_t)expected_enc_size,
+ expected_to_fail);
CHECK(ret, FAIL, "test_h5s_check_encoding");
} /* for config */
@@ -2006,17 +1972,17 @@ test_h5s_encode_irregular_hyper(H5F_libver_t low, H5F_libver_t high)
static void
test_h5s_encode_points(H5F_libver_t low, H5F_libver_t high)
{
- hid_t fapl = -1; /* File access property list ID */
- hid_t sid; /* Dataspace ID */
- hsize_t numparticles = 8388608; /* Used to calculate dimenion size */
- unsigned num_dsets = 513; /* used to calculate dimension size */
- hsize_t total_particles = numparticles * num_dsets;
- hsize_t vdsdims[1] = {total_particles}; /* Dimension size */
- hsize_t coord[4]; /* The point coordinates */
- herr_t ret; /* Generic return value */
- hbool_t expected_to_fail = FALSE; /* Expected to fail or not */
- uint32_t expected_version = 0; /* Expected version for selection info */
- uint8_t expected_enc_size = 0; /* Expected encoded size of selection info */
+ hid_t fapl = -1; /* File access property list ID */
+ hid_t sid; /* Dataspace ID */
+ hsize_t numparticles = 8388608; /* Used to calculate dimenion size */
+ unsigned num_dsets = 513; /* used to calculate dimension size */
+ hsize_t total_particles = numparticles * num_dsets;
+ hsize_t vdsdims[1] = {total_particles}; /* Dimension size */
+ hsize_t coord[4]; /* The point coordinates */
+ herr_t ret; /* Generic return value */
+ hbool_t expected_to_fail = FALSE; /* Expected to fail or not */
+ uint32_t expected_version = 0; /* Expected version for selection info */
+ uint8_t expected_enc_size = 0; /* Expected encoded size of selection info */
/* Output message about test being performed */
MESSAGE(5, ("Testing Dataspace encoding of points selection\n"));
@@ -2038,14 +2004,14 @@ test_h5s_encode_points(H5F_libver_t low, H5F_libver_t high)
coord[1] = 15;
coord[2] = POWER16;
coord[3] = 19;
- ret = H5Sselect_elements(sid, H5S_SELECT_SET, (size_t)4, coord);
+ ret = H5Sselect_elements(sid, H5S_SELECT_SET, (size_t)4, coord);
CHECK(ret, FAIL, "H5Sselect_elements");
- expected_to_fail = FALSE;
+ expected_to_fail = FALSE;
expected_enc_size = 4;
- expected_version = 1;
+ expected_version = 1;
- if(low >= H5F_LIBVER_V112)
+ if (low >= H5F_LIBVER_V112)
expected_version = 2;
/* Verify the version and encoded size expected for the configuration */
@@ -2057,7 +2023,7 @@ test_h5s_encode_points(H5F_libver_t low, H5F_libver_t high)
coord[1] = 15;
coord[2] = POWER32 - 1;
coord[3] = 19;
- ret = H5Sselect_elements(sid, H5S_SELECT_SET, (size_t)4, coord);
+ ret = H5Sselect_elements(sid, H5S_SELECT_SET, (size_t)4, coord);
CHECK(ret, FAIL, "H5Sselect_elements");
/* Expected result same as test 1 */
@@ -2065,11 +2031,11 @@ test_h5s_encode_points(H5F_libver_t low, H5F_libver_t high)
CHECK(ret, FAIL, "test_h5s_check_encoding");
/* test 3 */
- if(high <= H5F_LIBVER_V110)
+ if (high <= H5F_LIBVER_V110)
expected_to_fail = TRUE;
- if(high >= H5F_LIBVER_V112) {
- expected_version = 2;
+ if (high >= H5F_LIBVER_V112) {
+ expected_version = 2;
expected_enc_size = 8;
}
@@ -2077,7 +2043,7 @@ test_h5s_encode_points(H5F_libver_t low, H5F_libver_t high)
coord[1] = 15;
coord[2] = POWER32 + 1;
coord[3] = 19;
- ret = H5Sselect_elements(sid, H5S_SELECT_SET, (size_t)4, coord);
+ ret = H5Sselect_elements(sid, H5S_SELECT_SET, (size_t)4, coord);
CHECK(ret, FAIL, "H5Sselect_elements");
/* Verify the version and encoded size expected for the configuration */
@@ -2103,13 +2069,13 @@ test_h5s_encode_points(H5F_libver_t low, H5F_libver_t high)
static void
test_h5s_encode_length(void)
{
- hid_t sid; /* Dataspace ID */
- hid_t decoded_sid; /* Dataspace ID from H5Sdecode2 */
- size_t sbuf_size=0; /* Buffer size for H5Sencode2/1 */
- unsigned char *sbuf=NULL; /* Buffer for H5Sencode2/1 */
- hsize_t dims[1] = {500}; /* Dimension size */
- hsize_t start, count, block, stride; /* Hyperslab selection specifications */
- herr_t ret; /* Generic return value */
+ hid_t sid; /* Dataspace ID */
+ hid_t decoded_sid; /* Dataspace ID from H5Sdecode2 */
+ size_t sbuf_size = 0; /* Buffer size for H5Sencode2/1 */
+ unsigned char *sbuf = NULL; /* Buffer for H5Sencode2/1 */
+ hsize_t dims[1] = {500}; /* Dimension size */
+ hsize_t start, count, block, stride; /* Hyperslab selection specifications */
+ herr_t ret; /* Generic return value */
/* Output message about test being performed */
MESSAGE(5, ("Testing Version 2 Hyperslab Encoding Length is correct\n"));
@@ -2119,10 +2085,10 @@ test_h5s_encode_length(void)
CHECK(sid, FAIL, "H5Screate_simple");
/* Setting H5S_UNLIMITED in count will use version 2 for hyperslab encoding */
- start = 0;
+ start = 0;
stride = 10;
- block = 4;
- count = H5S_UNLIMITED;
+ block = 4;
+ count = H5S_UNLIMITED;
/* Set hyperslab selection */
ret = H5Sselect_hyperslab(sid, H5S_SELECT_SET, &start, &stride, &count, &block);
@@ -2133,8 +2099,8 @@ test_h5s_encode_length(void)
CHECK(ret, FAIL, "H5Sencode");
/* Allocate the buffer */
- if(sbuf_size > 0) {
- sbuf = (unsigned char*)HDcalloc((size_t)1, sbuf_size);
+ if (sbuf_size > 0) {
+ sbuf = (unsigned char *)HDcalloc((size_t)1, sbuf_size);
CHECK(sbuf, NULL, "H5Sencode2");
}
@@ -2158,7 +2124,7 @@ test_h5s_encode_length(void)
CHECK(ret, FAIL, "H5Sclose");
/* Free the buffer */
- if(sbuf)
+ if (sbuf)
HDfree(sbuf);
/* Close the original dataspace */
@@ -2175,14 +2141,14 @@ test_h5s_encode_length(void)
static void
test_h5s_scalar_write(void)
{
- hid_t fid1; /* HDF5 File IDs */
- hid_t dataset; /* Dataset ID */
- hid_t sid1; /* Dataspace ID */
- int rank; /* Logical rank of dataspace */
- hsize_t tdims[4]; /* Dimension array to test with */
- hssize_t n; /* Number of dataspace elements */
- H5S_class_t ext_type; /* Extent type */
- herr_t ret; /* Generic return value */
+ hid_t fid1; /* HDF5 File IDs */
+ hid_t dataset; /* Dataset ID */
+ hid_t sid1; /* Dataspace ID */
+ int rank; /* Logical rank of dataspace */
+ hsize_t tdims[4]; /* Dimension array to test with */
+ hssize_t n; /* Number of dataspace elements */
+ H5S_class_t ext_type; /* Extent type */
+ herr_t ret; /* Generic return value */
/* Output message about test being performed */
MESSAGE(5, ("Testing Scalar Dataspace Manipulation during Writing\n"));
@@ -2192,9 +2158,8 @@ test_h5s_scalar_write(void)
CHECK(fid1, FAIL, "H5Fcreate");
/* Verify a non-zero rank fails with a NULL dimension. */
- H5E_BEGIN_TRY {
- sid1 = H5Screate_simple(SPACE1_RANK, NULL, NULL);
- } H5E_END_TRY
+ H5E_BEGIN_TRY { sid1 = H5Screate_simple(SPACE1_RANK, NULL, NULL); }
+ H5E_END_TRY
VERIFY(sid1, FAIL, "H5Screate_simple");
/* Create scalar dataspace */
@@ -2238,7 +2203,7 @@ test_h5s_scalar_write(void)
/* Close file */
ret = H5Fclose(fid1);
CHECK(ret, FAIL, "H5Fclose");
-} /* test_h5s_scalar_write() */
+} /* test_h5s_scalar_write() */
/****************************************************************
**
@@ -2248,15 +2213,15 @@ test_h5s_scalar_write(void)
static void
test_h5s_scalar_read(void)
{
- hid_t fid1; /* HDF5 File IDs */
- hid_t dataset; /* Dataset ID */
- hid_t sid1; /* Dataspace ID */
- int rank; /* Logical rank of dataspace */
- hsize_t tdims[4]; /* Dimension array to test with */
- hssize_t n; /* Number of dataspace elements */
- unsigned rdata; /* Scalar data read in */
- herr_t ret; /* Generic return value */
- H5S_class_t ext_type; /* Extent type */
+ hid_t fid1; /* HDF5 File IDs */
+ hid_t dataset; /* Dataset ID */
+ hid_t sid1; /* Dataspace ID */
+ int rank; /* Logical rank of dataspace */
+ hsize_t tdims[4]; /* Dimension array to test with */
+ hssize_t n; /* Number of dataspace elements */
+ unsigned rdata; /* Scalar data read in */
+ herr_t ret; /* Generic return value */
+ H5S_class_t ext_type; /* Extent type */
/* Output message about test being performed */
MESSAGE(5, ("Testing Scalar Dataspace Manipulation during Reading\n"));
@@ -2302,7 +2267,7 @@ test_h5s_scalar_read(void)
/* Close file */
ret = H5Fclose(fid1);
CHECK(ret, FAIL, "H5Fclose");
-} /* test_h5s_scalar_read() */
+} /* test_h5s_scalar_read() */
/****************************************************************
**
@@ -2313,14 +2278,14 @@ test_h5s_scalar_read(void)
static void
test_h5s_compound_scalar_write(void)
{
- hid_t fid1; /* HDF5 File IDs */
- hid_t dataset; /* Dataset ID */
- hid_t tid1; /* Attribute datatype ID */
- hid_t sid1; /* Dataspace ID */
- int rank; /* Logical rank of dataspace */
- hsize_t tdims[4]; /* Dimension array to test with */
- hssize_t n; /* Number of dataspace elements */
- herr_t ret; /* Generic return value */
+ hid_t fid1; /* HDF5 File IDs */
+ hid_t dataset; /* Dataset ID */
+ hid_t tid1; /* Attribute datatype ID */
+ hid_t sid1; /* Dataspace ID */
+ int rank; /* Logical rank of dataspace */
+ hsize_t tdims[4]; /* Dimension array to test with */
+ hssize_t n; /* Number of dataspace elements */
+ herr_t ret; /* Generic return value */
/* Output message about test being performed */
MESSAGE(5, ("Testing Scalar Dataspace Manipulation for Writing Compound Datatypes\n"));
@@ -2330,23 +2295,19 @@ test_h5s_compound_scalar_write(void)
CHECK(fid1, FAIL, "H5Fcreate");
/* Create the compound datatype. */
- tid1 = H5Tcreate (H5T_COMPOUND, sizeof(struct space4_struct));
+ tid1 = H5Tcreate(H5T_COMPOUND, sizeof(struct space4_struct));
CHECK(tid1, FAIL, "H5Tcreate");
- space4_field1_off=HOFFSET(struct space4_struct, c1);
- ret = H5Tinsert(tid1, SPACE4_FIELDNAME1, space4_field1_off,
- H5T_NATIVE_SCHAR);
+ space4_field1_off = HOFFSET(struct space4_struct, c1);
+ ret = H5Tinsert(tid1, SPACE4_FIELDNAME1, space4_field1_off, H5T_NATIVE_SCHAR);
CHECK(ret, FAIL, "H5Tinsert");
- space4_field2_off=HOFFSET(struct space4_struct, u);
- ret = H5Tinsert(tid1, SPACE4_FIELDNAME2, space4_field2_off,
- H5T_NATIVE_UINT);
+ space4_field2_off = HOFFSET(struct space4_struct, u);
+ ret = H5Tinsert(tid1, SPACE4_FIELDNAME2, space4_field2_off, H5T_NATIVE_UINT);
CHECK(ret, FAIL, "H5Tinsert");
- space4_field3_off=HOFFSET(struct space4_struct, f);
- ret = H5Tinsert(tid1, SPACE4_FIELDNAME3, space4_field3_off,
- H5T_NATIVE_FLOAT);
+ space4_field3_off = HOFFSET(struct space4_struct, f);
+ ret = H5Tinsert(tid1, SPACE4_FIELDNAME3, space4_field3_off, H5T_NATIVE_FLOAT);
CHECK(ret, FAIL, "H5Tinsert");
- space4_field4_off=HOFFSET(struct space4_struct, c2);
- ret = H5Tinsert(tid1, SPACE4_FIELDNAME4, space4_field4_off,
- H5T_NATIVE_SCHAR);
+ space4_field4_off = HOFFSET(struct space4_struct, c2);
+ ret = H5Tinsert(tid1, SPACE4_FIELDNAME4, space4_field4_off, H5T_NATIVE_SCHAR);
CHECK(ret, FAIL, "H5Tinsert");
/* Create scalar dataspace */
@@ -2386,7 +2347,7 @@ test_h5s_compound_scalar_write(void)
/* Close file */
ret = H5Fclose(fid1);
CHECK(ret, FAIL, "H5Fclose");
-} /* test_h5s_compound_scalar_write() */
+} /* test_h5s_compound_scalar_write() */
/****************************************************************
**
@@ -2397,15 +2358,15 @@ test_h5s_compound_scalar_write(void)
static void
test_h5s_compound_scalar_read(void)
{
- hid_t fid1; /* HDF5 File IDs */
- hid_t dataset; /* Dataset ID */
- hid_t sid1; /* Dataspace ID */
- hid_t type; /* Datatype */
- int rank; /* Logical rank of dataspace */
- hsize_t tdims[4]; /* Dimension array to test with */
- hssize_t n; /* Number of dataspace elements */
- struct space4_struct rdata; /* Scalar data read in */
- herr_t ret; /* Generic return value */
+ hid_t fid1; /* HDF5 File IDs */
+ hid_t dataset; /* Dataset ID */
+ hid_t sid1; /* Dataspace ID */
+ hid_t type; /* Datatype */
+ int rank; /* Logical rank of dataspace */
+ hsize_t tdims[4]; /* Dimension array to test with */
+ hssize_t n; /* Number of dataspace elements */
+ struct space4_struct rdata; /* Scalar data read in */
+ herr_t ret; /* Generic return value */
/* Output message about test being performed */
MESSAGE(5, ("Testing Scalar Dataspace Manipulation for Reading Compound Datatypes\n"));
@@ -2432,17 +2393,19 @@ test_h5s_compound_scalar_read(void)
rank = H5Sget_simple_extent_dims(sid1, tdims, NULL);
VERIFY(rank, 0, "H5Sget_simple_extent_dims");
- type=H5Dget_type(dataset);
+ type = H5Dget_type(dataset);
CHECK(type, FAIL, "H5Dget_type");
ret = H5Dread(dataset, type, H5S_ALL, H5S_ALL, H5P_DEFAULT, &rdata);
CHECK(ret, FAIL, "H5Dread");
- if(HDmemcmp(&space4_data,&rdata,sizeof(struct space4_struct))) {
- HDprintf("scalar data different: space4_data.c1=%c, read_data4.c1=%c\n",space4_data.c1,rdata.c1);
- HDprintf("scalar data different: space4_data.u=%u, read_data4.u=%u\n",space4_data.u,rdata.u);
- HDprintf("scalar data different: space4_data.f=%f, read_data4.f=%f\n",(double)space4_data.f,(double)rdata.f);
- TestErrPrintf("scalar data different: space4_data.c1=%c, read_data4.c1=%c\n",space4_data.c1,rdata.c2);
- } /* end if */
+ if (HDmemcmp(&space4_data, &rdata, sizeof(struct space4_struct))) {
+ HDprintf("scalar data different: space4_data.c1=%c, read_data4.c1=%c\n", space4_data.c1, rdata.c1);
+ HDprintf("scalar data different: space4_data.u=%u, read_data4.u=%u\n", space4_data.u, rdata.u);
+ HDprintf("scalar data different: space4_data.f=%f, read_data4.f=%f\n", (double)space4_data.f,
+ (double)rdata.f);
+ TestErrPrintf("scalar data different: space4_data.c1=%c, read_data4.c1=%c\n", space4_data.c1,
+ rdata.c2);
+ } /* end if */
/* Close datatype */
ret = H5Tclose(type);
@@ -2459,12 +2422,11 @@ test_h5s_compound_scalar_read(void)
/* Close file */
ret = H5Fclose(fid1);
CHECK(ret, FAIL, "H5Fclose");
-} /* end test_h5s_compound_scalar_read() */
-
+} /* end test_h5s_compound_scalar_read() */
/* Data array sizes for chunk test */
-#define CHUNK_DATA_NX 50000
-#define CHUNK_DATA_NY 3
+#define CHUNK_DATA_NX 50000
+#define CHUNK_DATA_NY 3
/****************************************************************
**
@@ -2476,17 +2438,17 @@ test_h5s_compound_scalar_read(void)
static void
test_h5s_chunk(void)
{
- herr_t status;
- hid_t fileID, dsetID;
- hid_t plist_id;
- hid_t space_id;
- hsize_t dims[2];
- hsize_t csize[2];
- double **chunk_data_dbl = NULL;
- double *chunk_data_dbl_data = NULL;
- float **chunk_data_flt = NULL;
- float *chunk_data_flt_data = NULL;
- int i,j;
+ herr_t status;
+ hid_t fileID, dsetID;
+ hid_t plist_id;
+ hid_t space_id;
+ hsize_t dims[2];
+ hsize_t csize[2];
+ double **chunk_data_dbl = NULL;
+ double * chunk_data_dbl_data = NULL;
+ float ** chunk_data_flt = NULL;
+ float * chunk_data_flt_data = NULL;
+ int i, j;
/* Allocate memory */
chunk_data_dbl_data = (double *)HDcalloc(CHUNK_DATA_NX * CHUNK_DATA_NY, sizeof(double));
@@ -2511,12 +2473,12 @@ test_h5s_chunk(void)
csize[0] = CHUNK_DATA_NX;
csize[1] = CHUNK_DATA_NY;
- status = H5Pset_chunk(plist_id, 2, csize);
+ status = H5Pset_chunk(plist_id, 2, csize);
CHECK(status, FAIL, "H5Pset_chunk");
/* Create the dataspace */
- dims[0] = CHUNK_DATA_NX;
- dims[1] = CHUNK_DATA_NY;
+ dims[0] = CHUNK_DATA_NX;
+ dims[1] = CHUNK_DATA_NY;
space_id = H5Screate_simple(2, dims, NULL);
CHECK(space_id, FAIL, "H5Screate_simple");
@@ -2524,8 +2486,8 @@ test_h5s_chunk(void)
CHECK(dsetID, FAIL, "H5Dcreate2");
/* Initialize float array */
- for(i = 0; i < CHUNK_DATA_NX; i++)
- for(j = 0; j < CHUNK_DATA_NY; j++)
+ for (i = 0; i < CHUNK_DATA_NX; i++)
+ for (j = 0; j < CHUNK_DATA_NY; j++)
chunk_data_flt[i][j] = (float)(i + 1) * 2.5F - (float)j * 100.3F;
status = H5Dwrite(dsetID, H5T_NATIVE_FLOAT, H5S_ALL, H5S_ALL, H5P_DEFAULT, chunk_data_flt_data);
@@ -2549,9 +2511,9 @@ test_h5s_chunk(void)
dsetID = H5Dopen2(fileID, "coords", H5P_DEFAULT);
CHECK(dsetID, FAIL, "H5Dopen2");
- status= H5Dread(dsetID, H5T_NATIVE_DOUBLE, H5S_ALL, H5S_ALL, H5P_DEFAULT, chunk_data_dbl_data);
+ status = H5Dread(dsetID, H5T_NATIVE_DOUBLE, H5S_ALL, H5S_ALL, H5P_DEFAULT, chunk_data_dbl_data);
CHECK(status, FAIL, "H5Dread");
- status= H5Dread(dsetID, H5T_NATIVE_FLOAT, H5S_ALL, H5S_ALL, H5P_DEFAULT, chunk_data_flt_data);
+ status = H5Dread(dsetID, H5T_NATIVE_FLOAT, H5S_ALL, H5S_ALL, H5P_DEFAULT, chunk_data_flt_data);
CHECK(status, FAIL, "H5Dread");
status = H5Dclose(dsetID);
@@ -2559,13 +2521,15 @@ test_h5s_chunk(void)
status = H5Fclose(fileID);
CHECK(status, FAIL, "H5Fclose");
- for(i = 0; i < CHUNK_DATA_NX; i++) {
- for(j = 0; j < CHUNK_DATA_NY; j++) {
+ for (i = 0; i < CHUNK_DATA_NX; i++) {
+ for (j = 0; j < CHUNK_DATA_NY; j++) {
/* Check if the two values are within 0.001% range. */
- if(!H5_DBL_REL_EQUAL(chunk_data_dbl[i][j], (double)chunk_data_flt[i][j], (double)0.00001F))
- TestErrPrintf("%u: chunk_data_dbl[%d][%d]=%e, chunk_data_flt[%d][%d]=%e\n", (unsigned)__LINE__, i, j, chunk_data_dbl[i][j], i, j, (double)chunk_data_flt[i][j]);
+ if (!H5_DBL_REL_EQUAL(chunk_data_dbl[i][j], (double)chunk_data_flt[i][j], (double)0.00001F))
+ TestErrPrintf("%u: chunk_data_dbl[%d][%d]=%e, chunk_data_flt[%d][%d]=%e\n",
+ (unsigned)__LINE__, i, j, chunk_data_dbl[i][j], i, j,
+ (double)chunk_data_flt[i][j]);
} /* end for */
- } /* end for */
+ } /* end for */
HDfree(chunk_data_dbl);
HDfree(chunk_data_dbl_data);
@@ -2581,22 +2545,19 @@ test_h5s_chunk(void)
static void
test_h5s_extent_equal(void)
{
- hid_t null_space; /* Null dataspace */
- hid_t scalar_space; /* Scalar dataspace */
- hid_t d1_space1, d1_space2, d1_space3, d1_space4; /* 1-D dataspaces */
- hid_t d2_space1, d2_space2, d2_space3, d2_space4; /* 2-D dataspaces */
- hid_t d3_space1, d3_space2, d3_space3, d3_space4; /* 3-D dataspaces */
- hsize_t d1_dims1[1] = {10}, /* 1-D dimensions */
- d1_dims2[1] = {20},
- d1_dims3[1] = {H5S_UNLIMITED};
- hsize_t d2_dims1[2] = {10, 10}, /* 2-D dimensions */
- d2_dims2[2] = {20, 20},
- d2_dims3[2] = {H5S_UNLIMITED, H5S_UNLIMITED};
- hsize_t d3_dims1[3] = {10, 10, 10}, /* 3-D dimensions */
- d3_dims2[3] = {20, 20, 20},
- d3_dims3[3] = {H5S_UNLIMITED, H5S_UNLIMITED, H5S_UNLIMITED};
- htri_t ext_equal; /* Whether two dataspace extents are equal */
- herr_t ret; /* Generic error return */
+ hid_t null_space; /* Null dataspace */
+ hid_t scalar_space; /* Scalar dataspace */
+ hid_t d1_space1, d1_space2, d1_space3, d1_space4; /* 1-D dataspaces */
+ hid_t d2_space1, d2_space2, d2_space3, d2_space4; /* 2-D dataspaces */
+ hid_t d3_space1, d3_space2, d3_space3, d3_space4; /* 3-D dataspaces */
+ hsize_t d1_dims1[1] = {10}, /* 1-D dimensions */
+ d1_dims2[1] = {20}, d1_dims3[1] = {H5S_UNLIMITED};
+ hsize_t d2_dims1[2] = {10, 10}, /* 2-D dimensions */
+ d2_dims2[2] = {20, 20}, d2_dims3[2] = {H5S_UNLIMITED, H5S_UNLIMITED};
+ hsize_t d3_dims1[3] = {10, 10, 10}, /* 3-D dimensions */
+ d3_dims2[3] = {20, 20, 20}, d3_dims3[3] = {H5S_UNLIMITED, H5S_UNLIMITED, H5S_UNLIMITED};
+ htri_t ext_equal; /* Whether two dataspace extents are equal */
+ herr_t ret; /* Generic error return */
/* Create dataspaces */
null_space = H5Screate(H5S_NULL);
@@ -3098,22 +3059,19 @@ static void
test_h5s_extent_copy(void)
{
hid_t spaces[14] = {-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1}; /* Array of all dataspaces */
- hid_t tmp_space = -1;
+ hid_t tmp_space = -1;
hsize_t d1_dims1[1] = {10}, /* 1-D dimensions */
- d1_dims2[1] = {20},
- d1_dims3[1] = {H5S_UNLIMITED};
- hsize_t d2_dims1[2] = {10, 10}, /* 2-D dimensions */
- d2_dims2[2] = {20, 20},
- d2_dims3[2] = {H5S_UNLIMITED, H5S_UNLIMITED};
- hsize_t d3_dims1[3] = {10, 10, 10}, /* 3-D dimensions */
- d3_dims2[3] = {20, 20, 20},
- d3_dims3[3] = {H5S_UNLIMITED, H5S_UNLIMITED, H5S_UNLIMITED};
- hsize_t npoints[14]; /* Expected number of points in selection for each element in spaces */
- hssize_t npoints_ret; /* Number of points returned by H5Sget_select_npoints() */
- htri_t ext_equal; /* Whether two dataspace extents are equal */
+ d1_dims2[1] = {20}, d1_dims3[1] = {H5S_UNLIMITED};
+ hsize_t d2_dims1[2] = {10, 10}, /* 2-D dimensions */
+ d2_dims2[2] = {20, 20}, d2_dims3[2] = {H5S_UNLIMITED, H5S_UNLIMITED};
+ hsize_t d3_dims1[3] = {10, 10, 10}, /* 3-D dimensions */
+ d3_dims2[3] = {20, 20, 20}, d3_dims3[3] = {H5S_UNLIMITED, H5S_UNLIMITED, H5S_UNLIMITED};
+ hsize_t npoints[14]; /* Expected number of points in selection for each element in spaces */
+ hssize_t npoints_ret; /* Number of points returned by H5Sget_select_npoints() */
+ htri_t ext_equal; /* Whether two dataspace extents are equal */
const unsigned num_spaces = sizeof(spaces) / sizeof(spaces[0]);
- unsigned i, j;
- herr_t ret; /* Generic error return */
+ unsigned i, j;
+ herr_t ret; /* Generic error return */
/* Create dataspaces */
spaces[0] = H5Screate(H5S_NULL);
@@ -3127,39 +3085,39 @@ test_h5s_extent_copy(void)
spaces[2] = H5Screate_simple(1, d1_dims1, NULL);
CHECK(spaces[2], FAIL, "H5Screate");
npoints[2] = d1_dims1[0];
- spaces[3] = H5Screate_simple(1, d1_dims2, NULL);
+ spaces[3] = H5Screate_simple(1, d1_dims2, NULL);
CHECK(spaces[3], FAIL, "H5Screate");
npoints[3] = d1_dims2[0];
- spaces[4] = H5Screate_simple(1, d1_dims1, d1_dims2);
+ spaces[4] = H5Screate_simple(1, d1_dims1, d1_dims2);
CHECK(spaces[4], FAIL, "H5Screate");
npoints[4] = d1_dims1[0];
- spaces[5] = H5Screate_simple(1, d1_dims1, d1_dims3);
+ spaces[5] = H5Screate_simple(1, d1_dims1, d1_dims3);
CHECK(spaces[5], FAIL, "H5Screate");
npoints[5] = d1_dims1[0];
spaces[6] = H5Screate_simple(2, d2_dims1, NULL);
CHECK(spaces[6], FAIL, "H5Screate");
npoints[6] = d2_dims1[0] * d2_dims1[1];
- spaces[7] = H5Screate_simple(2, d2_dims2, NULL);
+ spaces[7] = H5Screate_simple(2, d2_dims2, NULL);
CHECK(spaces[7], FAIL, "H5Screate");
npoints[7] = d2_dims2[0] * d2_dims2[1];
- spaces[8] = H5Screate_simple(2, d2_dims1, d2_dims2);
+ spaces[8] = H5Screate_simple(2, d2_dims1, d2_dims2);
CHECK(spaces[8], FAIL, "H5Screate");
npoints[8] = d2_dims1[0] * d2_dims1[1];
- spaces[9] = H5Screate_simple(2, d2_dims1, d2_dims3);
+ spaces[9] = H5Screate_simple(2, d2_dims1, d2_dims3);
CHECK(spaces[9], FAIL, "H5Screate");
npoints[9] = d2_dims1[0] * d2_dims1[1];
spaces[10] = H5Screate_simple(3, d3_dims1, NULL);
CHECK(spaces[10], FAIL, "H5Screate");
npoints[10] = d3_dims1[0] * d3_dims1[1] * d3_dims1[2];
- spaces[11] = H5Screate_simple(3, d3_dims2, NULL);
+ spaces[11] = H5Screate_simple(3, d3_dims2, NULL);
CHECK(spaces[11], FAIL, "H5Screate");
npoints[11] = d3_dims2[0] * d3_dims2[1] * d3_dims2[2];
- spaces[12] = H5Screate_simple(3, d3_dims1, d3_dims2);
+ spaces[12] = H5Screate_simple(3, d3_dims1, d3_dims2);
CHECK(spaces[12], FAIL, "H5Screate");
npoints[12] = d3_dims1[0] * d3_dims1[1] * d3_dims1[2];
- spaces[13] = H5Screate_simple(3, d3_dims1, d3_dims3);
+ spaces[13] = H5Screate_simple(3, d3_dims1, d3_dims3);
CHECK(spaces[13], FAIL, "H5Screate");
npoints[13] = d3_dims1[0] * d3_dims1[1] * d3_dims1[2];
@@ -3168,8 +3126,8 @@ test_h5s_extent_copy(void)
/* Copy between all dataspace combinations. Note there are a few
* duplicates. */
- for(i = 0; i < num_spaces; i++)
- for(j = i; j < num_spaces; j++) {
+ for (i = 0; i < num_spaces; i++)
+ for (j = i; j < num_spaces; j++) {
/* Copy from i to j, unless the inner loop just restarted, in which
* case i and j are the same, so the second call to H5Sextent_copy()
* will test copying from i/j to i/j */
@@ -3198,7 +3156,7 @@ test_h5s_extent_copy(void)
} /* end for */
/* Close dataspaces */
- for(i = 0; i < num_spaces; i++) {
+ for (i = 0; i < num_spaces; i++) {
ret = H5Sclose(spaces[i]);
CHECK(ret, FAIL, "H5Sclose");
spaces[i] = -1;
@@ -3217,12 +3175,12 @@ test_h5s_extent_copy(void)
static void
test_h5s_bug1(void)
{
- hid_t space1; /* Dataspace to copy extent to */
- hid_t space2; /* Scalar dataspace */
- hsize_t dims[2] = {10, 10}; /* Dimensions */
- hsize_t start[2] = {0, 0}; /* Hyperslab start */
- htri_t select_valid; /* Whether the dataspace selection is valid */
- herr_t ret; /* Generic error return */
+ hid_t space1; /* Dataspace to copy extent to */
+ hid_t space2; /* Scalar dataspace */
+ hsize_t dims[2] = {10, 10}; /* Dimensions */
+ hsize_t start[2] = {0, 0}; /* Hyperslab start */
+ htri_t select_valid; /* Whether the dataspace selection is valid */
+ herr_t ret; /* Generic error return */
/* Create dataspaces */
space1 = H5Screate(H5S_SIMPLE);
@@ -3250,7 +3208,6 @@ test_h5s_bug1(void)
CHECK(ret, FAIL, "H5Sclose");
} /* test_h5s_bug1() */
-
/*-------------------------------------------------------------------------
* Function: test_versionbounds
*
@@ -3266,21 +3223,21 @@ test_h5s_bug1(void)
*
*-------------------------------------------------------------------------
*/
-#define VERBFNAME "tverbounds_dspace.h5"
-#define BASIC_DSET "Basic Dataset"
-#define LATEST_DSET "Latest Dataset"
+#define VERBFNAME "tverbounds_dspace.h5"
+#define BASIC_DSET "Basic Dataset"
+#define LATEST_DSET "Latest Dataset"
static void
test_versionbounds(void)
{
- hid_t file = -1; /* File ID */
- hid_t space = -1; /* Dataspace ID */
- hid_t dset = -1; /* Dataset ID */
- hid_t fapl = -1; /* File access property list ID */
- hid_t dset_space = -1; /* Retrieved dataset's dataspace ID */
- hsize_t dim[1]; /* Dataset dimensions */
- H5F_libver_t low, high; /* File format bounds */
- H5S_t *spacep = NULL; /* Pointer to internal dataspace */
- herr_t ret = 0; /* Generic return value */
+ hid_t file = -1; /* File ID */
+ hid_t space = -1; /* Dataspace ID */
+ hid_t dset = -1; /* Dataset ID */
+ hid_t fapl = -1; /* File access property list ID */
+ hid_t dset_space = -1; /* Retrieved dataset's dataspace ID */
+ hsize_t dim[1]; /* Dataset dimensions */
+ H5F_libver_t low, high; /* File format bounds */
+ H5S_t * spacep = NULL; /* Pointer to internal dataspace */
+ herr_t ret = 0; /* Generic return value */
/* Output message about test being performed */
MESSAGE(5, ("Testing Version Bounds\n"));
@@ -3291,7 +3248,7 @@ test_versionbounds(void)
/* Create dataspace */
dim[0] = 10;
- space = H5Screate_simple(1, dim, NULL);
+ space = H5Screate_simple(1, dim, NULL);
CHECK(space, FAIL, "H5Screate");
/* Its version should be H5O_SDSPACE_VERSION_1 */
@@ -3300,9 +3257,9 @@ test_versionbounds(void)
VERIFY(spacep->extent.version, H5O_SDSPACE_VERSION_1, "basic dataspace version bound");
/* Set high bound to V18 */
- low = H5F_LIBVER_EARLIEST;
+ low = H5F_LIBVER_EARLIEST;
high = H5F_LIBVER_V18;
- ret = H5Pset_libver_bounds(fapl, low, high);
+ ret = H5Pset_libver_bounds(fapl, low, high);
CHECK(ret, FAIL, "H5Pset_libver_bounds");
/* Create the file */
@@ -3335,9 +3292,9 @@ test_versionbounds(void)
/* Set low and high bounds to latest to trigger the increment of the
dataspace version */
- low = H5F_LIBVER_LATEST;
+ low = H5F_LIBVER_LATEST;
high = H5F_LIBVER_LATEST;
- ret = H5Pset_libver_bounds(fapl, low, high);
+ ret = H5Pset_libver_bounds(fapl, low, high);
CHECK(ret, FAIL, "H5Pset_libver_bounds");
/* Reopen the file with new version bounds, LATEST/LATEST */
@@ -3373,7 +3330,6 @@ test_versionbounds(void)
CHECK(ret, FAIL, "H5Fclose");
} /* end test_versionbounds() */
-
/****************************************************************
**
** test_h5s(): Main H5S (dataspace) testing routine.
@@ -3382,21 +3338,21 @@ test_versionbounds(void)
void
test_h5s(void)
{
- H5F_libver_t low, high; /* Low and high bounds */
+ H5F_libver_t low, high; /* Low and high bounds */
/* Output message about test being performed */
MESSAGE(5, ("Testing Dataspaces\n"));
- test_h5s_basic(); /* Test basic H5S code */
- test_h5s_null(); /* Test Null dataspace H5S code */
- test_h5s_zero_dim(); /* Test dataspace with zero dimension size */
+ test_h5s_basic(); /* Test basic H5S code */
+ test_h5s_null(); /* Test Null dataspace H5S code */
+ test_h5s_zero_dim(); /* Test dataspace with zero dimension size */
/* Loop through all the combinations of low/high version bounds */
- for(low = H5F_LIBVER_EARLIEST; low < H5F_LIBVER_NBOUNDS; low++) {
- for(high = H5F_LIBVER_EARLIEST; high < H5F_LIBVER_NBOUNDS; high++) {
+ for (low = H5F_LIBVER_EARLIEST; low < H5F_LIBVER_NBOUNDS; low++) {
+ for (high = H5F_LIBVER_EARLIEST; high < H5F_LIBVER_NBOUNDS; high++) {
/* Invalid combinations, just continue */
- if(high == H5F_LIBVER_EARLIEST || high < low)
+ if (high == H5F_LIBVER_EARLIEST || high < low)
continue;
test_h5s_encode(low, high); /* Test encoding and decoding */
@@ -3405,29 +3361,28 @@ test_h5s(void)
test_h5s_encode_points(low, high); /* Test encoding points */
} /* end high bound */
- } /* end low bound */
+ } /* end low bound */
- test_h5s_encode_length(); /* Test version 2 hyperslab encoding length is correct */
+ test_h5s_encode_length(); /* Test version 2 hyperslab encoding length is correct */
#ifndef H5_NO_DEPRECATED_SYMBOLS
- test_h5s_encode1(); /* Test operations with old API routine (H5Sencode1) */
-#endif /* H5_NO_DEPRECATED_SYMBOLS */
+ test_h5s_encode1(); /* Test operations with old API routine (H5Sencode1) */
+#endif /* H5_NO_DEPRECATED_SYMBOLS */
- test_h5s_scalar_write(); /* Test scalar H5S writing code */
- test_h5s_scalar_read(); /* Test scalar H5S reading code */
+ test_h5s_scalar_write(); /* Test scalar H5S writing code */
+ test_h5s_scalar_read(); /* Test scalar H5S reading code */
- test_h5s_compound_scalar_write(); /* Test compound datatype scalar H5S writing code */
- test_h5s_compound_scalar_read(); /* Test compound datatype scalar H5S reading code */
+ test_h5s_compound_scalar_write(); /* Test compound datatype scalar H5S writing code */
+ test_h5s_compound_scalar_read(); /* Test compound datatype scalar H5S reading code */
/* This test was added later to exercise a bug in chunked I/O */
- test_h5s_chunk(); /* Exercise bug fix for chunked I/O */
+ test_h5s_chunk(); /* Exercise bug fix for chunked I/O */
- test_h5s_extent_equal(); /* Test extent comparison code */
- test_h5s_extent_copy(); /* Test extent copy code */
- test_h5s_bug1(); /* Test bug in offset initialization */
- test_versionbounds(); /* Test version bounds with dataspace */
+ test_h5s_extent_equal(); /* Test extent comparison code */
+ test_h5s_extent_copy(); /* Test extent copy code */
+ test_h5s_bug1(); /* Test bug in offset initialization */
+ test_versionbounds(); /* Test version bounds with dataspace */
} /* test_h5s() */
-
/*-------------------------------------------------------------------------
* Function: cleanup_h5s
*