mirror of
https://github.com/HDFGroup/hdf5.git
synced 2025-01-18 15:15:56 +08:00
c01750fa74
---------------------- ./src/H5B.c ./src/H5D.c ./src/H5Dprivate.h ./src/H5Dpublic.h ./src/H5F.c ./src/H5Farray.c ./src/H5Fcore.c ./src/H5Ffamily.c ./src/H5Fistore.c ./src/H5Flow.c ./src/H5Fprivate.h ./src/H5Fpublic.h ./src/H5Fsec2.c ./src/H5Fsplit.c ./src/H5Fstdio.c ./src/H5G.c ./src/H5Gent.c ./src/H5Gnode.c ./src/H5HG.c ./src/H5HL.c ./src/H5MF.c ./src/H5MFprivate.h ./src/H5O.c ./src/H5Ocont.c ./src/H5Odtype.c ./src/H5Oefl.c ./src/H5Olayout.c ./src/H5Oname.c ./src/H5Oprivate.h ./src/H5Osdspace.c ./src/H5Oshared.c ./src/H5Ostab.c ./src/H5P.c ./src/H5Ppublic.h ./src/H5S.c ./src/H5Sprivate.h ./src/H5Spublic.h ./src/H5Ssimp.c ./src/H5Tconv.c ./src/H5Tpkg.h ./src/H5V.c ./src/H5Vprivate.h ./src/H5private.h ./src/H5public.h ./src/h5ls.c ./test/cmpd_dset.c ./test/dsets.c ./test/extend.c ./test/external.c ./test/hyperslab.c ./test/iopipe.c ./test/istore.c ./test/shtype.c ./test/tfile.c ./test/th5s.c Anything having to do with the size of a dataset now uses the types `hsize_t' and `hssize_t' which must be the same size and at least as large as `size_t'. This isn't fully tested yet, so hsize_t and hssize_t are defined as size_t and ssize_t in H5public.h. Setting them to larger values will trip up gcc versions less than 2.8.1 on x86 platforms. Documented unused function formals with `__unused__' before the formal name. This also has the effect of supressing warning messages for gcc since it's defined to be `__attribute__((unused))' in the H5private.h file. ./src/debug.c ./src/h5ls.c If the file name contains a `%' then the file is opened as a file family with H5P_DEFAULT for the file member access property list. ./src/h5ls.c The group name is optional, defaulting to `/'. ./src/hdf5.h Added some missing public header files.
278 lines
8.6 KiB
C
278 lines
8.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: tfile
|
|
*
|
|
* Test the low-level file I/O features.
|
|
*
|
|
*************************************************************/
|
|
|
|
#include <testhdf5.h>
|
|
|
|
#include <H5private.h>
|
|
#include <H5Bprivate.h>
|
|
#include <H5Pprivate.h>
|
|
|
|
#define F1_USERBLOCK_SIZE (hsize_t)0
|
|
#define F1_OFFSET_SIZE sizeof(hsize_t)
|
|
#define F1_LENGTH_SIZE sizeof(hsize_t)
|
|
#define F1_SYM_LEAF_K 4
|
|
#define F1_SYM_INTERN_K 16
|
|
#define FILE1 "tfile1.h5"
|
|
|
|
#define F2_USERBLOCK_SIZE (hsize_t)512
|
|
#define F2_OFFSET_SIZE 8
|
|
#define F2_LENGTH_SIZE 8
|
|
#define F2_SYM_LEAF_K 8
|
|
#define F2_SYM_INTERN_K 32
|
|
#define FILE2 "tfile2.h5"
|
|
|
|
#define F3_USERBLOCK_SIZE (hsize_t)0
|
|
#define F3_OFFSET_SIZE F2_OFFSET_SIZE
|
|
#define F3_LENGTH_SIZE F2_LENGTH_SIZE
|
|
#define F3_SYM_LEAF_K F2_SYM_LEAF_K
|
|
#define F3_SYM_INTERN_K F2_SYM_INTERN_K
|
|
#define FILE3 "tfile3.h5"
|
|
|
|
/****************************************************************
|
|
**
|
|
** test_file_create(): Low-level file creation I/O test routine.
|
|
**
|
|
****************************************************************/
|
|
static void
|
|
test_file_create(void)
|
|
{
|
|
hid_t fid1, fid2, fid3; /* HDF5 File IDs */
|
|
hid_t tmpl1, tmpl2; /*file creation templates */
|
|
hsize_t ublock; /*sizeof userblock */
|
|
size_t parm; /*file-creation parameters */
|
|
size_t parm2; /*file-creation parameters */
|
|
int iparm, iparm2;
|
|
herr_t ret; /*generic return value */
|
|
|
|
/* Output message about test being performed */
|
|
MESSAGE(5, ("Testing Low-Level File Creation I/O\n"));
|
|
|
|
/* Create first file */
|
|
fid1 = H5Fcreate(FILE1, H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT);
|
|
CHECK(fid1, FAIL, "H5Fcreate");
|
|
|
|
/* Try to create first file again (should fail) */
|
|
fid2 = H5Fcreate(FILE1, H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT);
|
|
VERIFY(fid2, FAIL, "H5Fcreate");
|
|
|
|
/* Get the file-creation template */
|
|
tmpl1 = H5Fget_create_template(fid1);
|
|
CHECK(tmpl1, FAIL, "H5Fget_create_template");
|
|
|
|
/* Get the file-creation parameters */
|
|
ret = H5Pget_userblock(tmpl1, &ublock);
|
|
CHECK(ret, FAIL, "H5Pget_userblock");
|
|
VERIFY(ublock, F1_USERBLOCK_SIZE, "H5Pget_userblock");
|
|
|
|
ret = H5Pget_sizes(tmpl1, &parm, &parm2);
|
|
CHECK(ret, FAIL, "H5Pget_sizes");
|
|
VERIFY(parm, F1_OFFSET_SIZE, "H5Pget_sizes");
|
|
VERIFY(parm2, F1_LENGTH_SIZE, "H5Pget_sizes");
|
|
|
|
ret = H5Pget_sym_k(tmpl1, &iparm, &iparm2);
|
|
CHECK(ret, FAIL, "H5Pget_sym_k");
|
|
VERIFY(iparm, F1_SYM_INTERN_K, "H5Pget_sym_k");
|
|
VERIFY(iparm2, F1_SYM_LEAF_K, "H5Pget_sym_k");
|
|
|
|
/* Release file-creation template */
|
|
ret = H5Pclose(tmpl1);
|
|
CHECK(ret, FAIL, "H5Pclose");
|
|
|
|
#ifdef LATER
|
|
/* Double-check that the atom has been vaporized */
|
|
ret = H5Pclose(tmpl1);
|
|
VERIFY(ret, FAIL, "H5Pclose");
|
|
#endif
|
|
|
|
/* Create a new file with a non-standard file-creation template */
|
|
tmpl1 = H5Pcreate(H5P_FILE_CREATE);
|
|
CHECK(tmpl1, FAIL, "H5Pnew");
|
|
|
|
/* Set the new file-creation parameters */
|
|
ret = H5Pset_userblock(tmpl1, F2_USERBLOCK_SIZE);
|
|
CHECK(ret, FAIL, "H5Pset_userblock");
|
|
|
|
ret = H5Pset_sizes(tmpl1, F2_OFFSET_SIZE, F2_LENGTH_SIZE);
|
|
CHECK(ret, FAIL, "H5Pset_sizes");
|
|
|
|
ret = H5Pset_sym_k(tmpl1, F2_SYM_INTERN_K, F2_SYM_LEAF_K);
|
|
CHECK(ret, FAIL, "H5Pset_sym_k");
|
|
|
|
/*
|
|
* Try to create second file, with non-standard file-creation template
|
|
* params.
|
|
*/
|
|
fid2 = H5Fcreate(FILE2, H5F_ACC_TRUNC, tmpl1, H5P_DEFAULT);
|
|
CHECK(fid2, FAIL, "H5Fcreate");
|
|
|
|
/* Release file-creation template */
|
|
ret = H5Pclose(tmpl1);
|
|
CHECK(ret, FAIL, "H5Pclose");
|
|
|
|
/* Get the file-creation template */
|
|
tmpl1 = H5Fget_create_template(fid2);
|
|
CHECK(tmpl1, FAIL, "H5Fget_create_template");
|
|
|
|
/* Get the file-creation parameters */
|
|
ret = H5Pget_userblock(tmpl1, &ublock);
|
|
CHECK(ret, FAIL, "H5Pget_userblock");
|
|
VERIFY(ublock, F2_USERBLOCK_SIZE, "H5Pget_userblock");
|
|
|
|
ret = H5Pget_sizes(tmpl1, &parm, &parm2);
|
|
CHECK(ret, FAIL, "H5Pget_sizes");
|
|
VERIFY(parm, F2_OFFSET_SIZE, "H5Pget_sizes");
|
|
VERIFY(parm2, F2_LENGTH_SIZE, "H5Pget_sizes");
|
|
|
|
ret = H5Pget_sym_k(tmpl1, &iparm, &iparm2);
|
|
CHECK(ret, FAIL, "H5Pget_sym_k");
|
|
VERIFY(iparm, F2_SYM_INTERN_K, "H5Pget_sym_k");
|
|
VERIFY(iparm2, F2_SYM_LEAF_K, "H5Pget_sym_k");
|
|
|
|
/* Clone the file-creation template */
|
|
tmpl2 = H5Pcopy(tmpl1);
|
|
CHECK(tmpl2, FAIL, "H5Pcopy");
|
|
|
|
/* Release file-creation template */
|
|
ret = H5Pclose(tmpl1);
|
|
CHECK(ret, FAIL, "H5Pclose");
|
|
|
|
/* Set the new file-creation parameter */
|
|
ret = H5Pset_userblock(tmpl2, F3_USERBLOCK_SIZE);
|
|
CHECK(ret, FAIL, "H5Pset_userblock");
|
|
|
|
/*
|
|
* Try to create second file, with non-standard file-creation template
|
|
* params
|
|
*/
|
|
fid3 = H5Fcreate(FILE3, H5F_ACC_TRUNC, tmpl2, H5P_DEFAULT);
|
|
CHECK(fid3, FAIL, "H5Fcreate");
|
|
|
|
/* Release file-creation template */
|
|
ret = H5Pclose(tmpl2);
|
|
CHECK(ret, FAIL, "H5Pclose");
|
|
|
|
/* Get the file-creation template */
|
|
tmpl1 = H5Fget_create_template(fid3);
|
|
CHECK(tmpl1, FAIL, "H5Fget_create_template");
|
|
|
|
/* Get the file-creation parameters */
|
|
ret = H5Pget_userblock(tmpl1, &ublock);
|
|
CHECK(ret, FAIL, "H5Pget_userblock");
|
|
VERIFY(ublock, F3_USERBLOCK_SIZE, "H5Pget_userblock");
|
|
|
|
ret = H5Pget_sizes(tmpl1, &parm, &parm2);
|
|
CHECK(ret, FAIL, "H5Pget_sizes");
|
|
VERIFY(parm, F3_OFFSET_SIZE, "H5Pget_sizes");
|
|
VERIFY(parm2, F3_LENGTH_SIZE, "H5Pget_sizes");
|
|
|
|
ret = H5Pget_sym_k(tmpl1, &iparm, &iparm2);
|
|
CHECK(ret, FAIL, "H5Pget_sym_k");
|
|
VERIFY(iparm, F3_SYM_INTERN_K, "H5Pget_sym_k");
|
|
VERIFY(iparm2, F3_SYM_LEAF_K, "H5Pget_sym_k");
|
|
|
|
/* Release file-creation template */
|
|
ret = H5Pclose(tmpl1);
|
|
CHECK(ret, FAIL, "H5Pclose");
|
|
|
|
/* Close first file */
|
|
ret = H5Fclose(fid1);
|
|
CHECK(ret, FAIL, "H5Fclose");
|
|
|
|
/* Close second file */
|
|
ret = H5Fclose(fid2);
|
|
CHECK(ret, FAIL, "H5Fclose");
|
|
|
|
/* Close third file */
|
|
ret = H5Fclose(fid3);
|
|
CHECK(ret, FAIL, "H5Fclose");
|
|
} /* test_file_create() */
|
|
|
|
/****************************************************************
|
|
**
|
|
** test_file_open(): Low-level file open I/O test routine.
|
|
**
|
|
****************************************************************/
|
|
static void
|
|
test_file_open(void)
|
|
{
|
|
hid_t fid1; /*HDF5 File IDs */
|
|
hid_t tmpl1; /*file creation templates */
|
|
hsize_t ublock; /*sizeof user block */
|
|
size_t parm; /*file-creation parameters */
|
|
size_t parm2; /*file-creation parameters */
|
|
int iparm, iparm2;
|
|
herr_t ret; /*generic return value */
|
|
|
|
/* Output message about test being performed */
|
|
MESSAGE(5, ("Testing Low-Level File Opening I/O\n"));
|
|
|
|
/* Open first file */
|
|
fid1 = H5Fopen(FILE2, H5F_ACC_RDWR, H5P_DEFAULT);
|
|
CHECK(fid1, FAIL, "H5Fopen");
|
|
|
|
/* Get the file-creation template */
|
|
tmpl1 = H5Fget_create_template(fid1);
|
|
CHECK(tmpl1, FAIL, "H5Fget_create_template");
|
|
|
|
/* Get the file-creation parameters */
|
|
ret = H5Pget_userblock(tmpl1, &ublock);
|
|
CHECK(ret, FAIL, "H5Pget_userblock");
|
|
VERIFY(ublock, F2_USERBLOCK_SIZE, "H5Pget_userblock");
|
|
|
|
ret = H5Pget_sizes(tmpl1, &parm, &parm2);
|
|
CHECK(ret, FAIL, "H5Pget_sizes");
|
|
VERIFY(parm, F2_OFFSET_SIZE, "H5Pget_sizes");
|
|
VERIFY(parm2, F2_LENGTH_SIZE, "H5Pget_sizes");
|
|
|
|
ret = H5Pget_sym_k(tmpl1, &iparm, &iparm2);
|
|
CHECK(ret, FAIL, "H5Pget_sym_k");
|
|
VERIFY(iparm, F2_SYM_INTERN_K, "H5Pget_sym_k");
|
|
VERIFY(iparm2, F2_SYM_LEAF_K, "H5Pget_sym_k");
|
|
|
|
/* Release file-creation template */
|
|
ret = H5Pclose(tmpl1);
|
|
CHECK(ret, FAIL, "H5Pclose");
|
|
|
|
/* Close first file */
|
|
ret = H5Fclose(fid1);
|
|
CHECK(ret, FAIL, "H5Fclose");
|
|
} /* test_file_open() */
|
|
|
|
/****************************************************************
|
|
**
|
|
** test_file(): Main low-level file I/O test routine.
|
|
**
|
|
****************************************************************/
|
|
void
|
|
test_file(void)
|
|
{
|
|
/* Output message about test being performed */
|
|
MESSAGE(5, ("Testing Low-Level File I/O\n"));
|
|
|
|
test_file_create(); /* Test file creation (also creation templates) */
|
|
test_file_open(); /* Test file opening */
|
|
} /* test_file() */
|