diff options
Diffstat (limited to 'test/th5p.c')
| -rw-r--r-- | test/th5p.c | 127 |
1 files changed, 64 insertions, 63 deletions
diff --git a/test/th5p.c b/test/th5p.c index eb8528b..78ec4a9 100644 --- a/test/th5p.c +++ b/test/th5p.c @@ -11,7 +11,7 @@ ****************************************************************************/ #ifdef RCSID -static char RcsId[] = "$Revision$"; +static char RcsId[] = "$Revision$"; #endif /* $Id$ */ @@ -53,82 +53,83 @@ static char RcsId[] = "$Revision$"; ** test_h5p_basic(): Test basic H5P (dataspace) code. ** ****************************************************************/ -static void test_h5p_basic(void) +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 */ - uintn n; /* number of dataspace elements */ - herr_t ret; /* Generic return value */ + 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 */ + uintn 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,H5ACC_OVERWRITE,0,0); - CHECK(fid1,FAIL,"H5Fcreate"); - - sid1=H5Pcreate (H5P_SIMPLE); - CHECK(sid1,FAIL,"H5Mcreate"); - - ret=H5Pset_space(sid1,SPACE1_RANK,dims1); - CHECK(ret,FAIL,"H5Pset_space"); - - n=H5Pget_npoints(sid1); - CHECK(n,UFAIL,"H5Pnelem"); - VERIFY(n,SPACE1_DIM1*SPACE1_DIM2*SPACE1_DIM3,"H5Pnelem"); - - rank=H5Pget_ndims(sid1); - CHECK(rank,UFAIL,"H5Pget_lrank"); - VERIFY(rank,SPACE1_RANK,"H5Pget_lrank"); - - ret=H5Pget_dims(sid1,tdims); - CHECK(ret,FAIL,"H5Pget_ldims"); - VERIFY(HDmemcmp(tdims,dims1,SPACE1_RANK*sizeof(uint32)),0,"H5Pget_ldims"); - - sid2=H5Pcreate(H5P_SIMPLE); - CHECK(sid2,FAIL,"H5Mcreate"); - - ret=H5Pset_space(sid2,SPACE2_RANK,dims2); - CHECK(ret,FAIL,"H5Pset_space"); - - n=H5Pget_npoints(sid2); - CHECK(n,UFAIL,"H5Pnelem"); - VERIFY(n,SPACE2_DIM1*SPACE2_DIM2*SPACE2_DIM3*SPACE2_DIM4,"H5Pnelem"); - - rank=H5Pget_ndims(sid2); - CHECK(rank,UFAIL,"H5Pget_lrank"); - VERIFY(rank,SPACE2_RANK,"H5Pget_lrank"); - - ret=H5Pget_dims(sid2,tdims); - CHECK(ret,FAIL,"H5Pget_ldims"); - VERIFY(HDmemcmp(tdims,dims2,SPACE2_RANK*sizeof(uint32)),0,"H5Pget_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() */ + fid1 = H5Fcreate(FILE, H5ACC_OVERWRITE, 0, 0); + CHECK(fid1, FAIL, "H5Fcreate"); + + sid1 = H5Pcreate(H5P_SIMPLE); + CHECK(sid1, FAIL, "H5Mcreate"); + + ret = H5Pset_space(sid1, SPACE1_RANK, dims1); + CHECK(ret, FAIL, "H5Pset_space"); + + n = H5Pget_npoints(sid1); + CHECK(n, UFAIL, "H5Pnelem"); + VERIFY(n, SPACE1_DIM1 * SPACE1_DIM2 * SPACE1_DIM3, "H5Pnelem"); + + rank = H5Pget_ndims(sid1); + CHECK(rank, UFAIL, "H5Pget_lrank"); + VERIFY(rank, SPACE1_RANK, "H5Pget_lrank"); + + ret = H5Pget_dims(sid1, tdims); + CHECK(ret, FAIL, "H5Pget_ldims"); + VERIFY(HDmemcmp(tdims, dims1, SPACE1_RANK * sizeof(uint32)), 0, "H5Pget_ldims"); + + sid2 = H5Pcreate(H5P_SIMPLE); + CHECK(sid2, FAIL, "H5Mcreate"); + + ret = H5Pset_space(sid2, SPACE2_RANK, dims2); + CHECK(ret, FAIL, "H5Pset_space"); + n = H5Pget_npoints(sid2); + CHECK(n, UFAIL, "H5Pnelem"); + VERIFY(n, SPACE2_DIM1 * SPACE2_DIM2 * SPACE2_DIM3 * SPACE2_DIM4, "H5Pnelem"); + + rank = H5Pget_ndims(sid2); + CHECK(rank, UFAIL, "H5Pget_lrank"); + VERIFY(rank, SPACE2_RANK, "H5Pget_lrank"); + + ret = H5Pget_dims(sid2, tdims); + CHECK(ret, FAIL, "H5Pget_ldims"); + VERIFY(HDmemcmp(tdims, dims2, SPACE2_RANK * sizeof(uint32)), 0, "H5Pget_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 H5P (dataspace) testing routine. ** ****************************************************************/ -void test_h5p(void) +void +test_h5p(void) { /* Output message about test being performed */ MESSAGE(5, ("Testing Dataspaces\n")); - test_h5p_basic(); /* Test basic H5P code */ -} /* test_h5p() */ - + test_h5p_basic(); /* Test basic H5P code */ +} /* test_h5p() */ |