mirror of
https://github.com/HDFGroup/hdf5.git
synced 2025-02-05 15:42:32 +08:00
932ec25e54
Changed the H5Mfind_name() return value and removed the call to H5Maccess(). ./test/th5p.c Removed unused variables.
117 lines
3.6 KiB
C
117 lines
3.6 KiB
C
/****************************************************************************
|
|
* NCSA HDF *
|
|
* Software Development Group *
|
|
* National Center for Supercomputing Applications *
|
|
* University of Illinois at Urbana-Champaign *
|
|
* 605 E. Springfield, Champaign IL 61820 *
|
|
* *
|
|
* For conditions of distribution and use, see the accompanying *
|
|
* hdf/COPYING file. *
|
|
* *
|
|
****************************************************************************/
|
|
|
|
#ifdef RCSID
|
|
static char RcsId[] = "$Revision$";
|
|
#endif
|
|
|
|
/* $Id$ */
|
|
|
|
/***********************************************************
|
|
*
|
|
* Test program: th5p
|
|
*
|
|
* Test the dataspace functionality
|
|
*
|
|
*************************************************************/
|
|
|
|
#include <testhdf5.h>
|
|
|
|
#include <H5private.h>
|
|
#include <H5Bprivate.h>
|
|
#include <H5Mprivate.h>
|
|
#include <H5Pprivate.h>
|
|
|
|
#define FILE "th5p1.h5"
|
|
|
|
/* 3-D dataset with fixed dimensions */
|
|
#define SPACE1_NAME "Space1"
|
|
#define SPACE1_RANK 3
|
|
#define SPACE1_DIM1 3
|
|
#define SPACE1_DIM2 15
|
|
#define SPACE1_DIM3 13
|
|
|
|
/* 4-D dataset with one unlimited dimension */
|
|
#define SPACE2_NAME "Space2"
|
|
#define SPACE2_RANK 4
|
|
#define SPACE2_DIM1 0
|
|
#define SPACE2_DIM2 15
|
|
#define SPACE2_DIM3 13
|
|
#define SPACE2_DIM4 23
|
|
|
|
/****************************************************************
|
|
**
|
|
** test_h5p_basic(): Test basic H5P (dataspace) code.
|
|
**
|
|
****************************************************************/
|
|
static void test_h5p_basic(void)
|
|
{
|
|
hatom_t fid1; /* HDF5 File IDs */
|
|
hatom_t sid1,sid2; /* Dataspace ID */
|
|
uint32 dims1[]={SPACE1_DIM1,SPACE1_DIM2,SPACE1_DIM3}, /* dataspace dim sizes */
|
|
dims2[]={SPACE2_DIM1,SPACE2_DIM2,SPACE2_DIM3,SPACE2_DIM4};
|
|
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=H5Mcreate(fid1,H5_DATASPACE,SPACE1_NAME);
|
|
CHECK(sid1,FAIL,"H5Mcreate");
|
|
|
|
ret=H5Pset_space(sid1,SPACE1_RANK,dims1);
|
|
CHECK(ret,FAIL,"H5Pset_space");
|
|
|
|
n=H5Pnelem(sid1);
|
|
CHECK(n,UFAIL,"H5Pnelem");
|
|
VERIFY(n,SPACE1_DIM1*SPACE1_DIM2*SPACE1_DIM3,"H5Pnelem");
|
|
|
|
sid2=H5Mcreate(fid1,H5_DATASPACE,SPACE2_NAME);
|
|
CHECK(sid2,FAIL,"H5Mcreate");
|
|
|
|
ret=H5Pset_space(sid2,SPACE2_RANK,dims2);
|
|
CHECK(ret,FAIL,"H5Pset_space");
|
|
|
|
n=H5Pnelem(sid2);
|
|
CHECK(n,UFAIL,"H5Pnelem");
|
|
VERIFY(n,SPACE2_DIM1*SPACE2_DIM2*SPACE2_DIM3*SPACE2_DIM4,"H5Pnelem");
|
|
|
|
ret=H5Mrelease(sid1);
|
|
CHECK(ret,FAIL,"H5Mrelease");
|
|
|
|
ret=H5Mrelease(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)
|
|
{
|
|
/* Output message about test being performed */
|
|
MESSAGE(5, ("Testing Dataspaces\n"));
|
|
|
|
test_h5p_basic(); /* Test basic H5P code */
|
|
} /* test_h5p() */
|
|
|