[svn-r12772]

added more tests for h5copy (compressed datasets, vl named datatypes )
This commit is contained in:
Pedro Vicente Nunes 2006-10-17 15:59:10 -05:00
parent 3a2bcc84ac
commit 2d586abc27
3 changed files with 173 additions and 24 deletions

View File

@ -15,24 +15,29 @@
/*
* Generate the binary hdf5 file for the h5copy tests
*/
#include <stdlib.h>
#include "hdf5.h"
#define FILENAME "h5copytst.h5"
#define DATASET_SIMPLE "simple"
#define DATASET_CHUNK "chunk"
#define DATASET_COMPACT "compact"
#define DATASET_COMPOUND "compound"
#define FILENAME "h5copytst.h5"
#define DATASET_SIMPLE "simple"
#define DATASET_CHUNK "chunk"
#define DATASET_COMPACT "compact"
#define DATASET_COMPOUND "compound"
#define DATASET_COMPRESSED "compressed"
#define DATASET_NAMED_VL "named_vl"
#define DATASET_NESTED_VL "nested_vl"
/*-------------------------------------------------------------------------
* Function: gent_simple_dataset
* Function: gent_simple
*
* Purpose: Generate a simple dataset in FID
*
*-------------------------------------------------------------------------
*/
static void gent_simple_dataset(hid_t fid)
static void gent_simple(hid_t fid)
{
hid_t sid, did;
hsize_t dims[1] = {6};
@ -53,13 +58,13 @@ static void gent_simple_dataset(hid_t fid)
}
/*-------------------------------------------------------------------------
* Function: gent_chunked_dataset
* Function: gent_chunked
*
* Purpose: Generate a chunked dataset in FID
*
*-------------------------------------------------------------------------
*/
static void gent_chunked_dataset(hid_t fid)
static void gent_chunked(hid_t fid)
{
hid_t sid, did, pid;
hsize_t dims[1] = {6};
@ -69,7 +74,7 @@ static void gent_chunked_dataset(hid_t fid)
/* create dataspace */
sid = H5Screate_simple(1, dims, NULL);
/* create property plist for chunk*/
/* create property plist */
pid = H5Pcreate(H5P_DATASET_CREATE);
H5Pset_chunk(pid, 1, chunk_dims);
@ -87,13 +92,13 @@ static void gent_chunked_dataset(hid_t fid)
/*-------------------------------------------------------------------------
* Function: gent_compact_dataset
* Function: gent_compact
*
* Purpose: Generate a compact dataset in FID
*
*-------------------------------------------------------------------------
*/
static void gent_compact_dataset(hid_t fid)
static void gent_compact(hid_t fid)
{
hid_t sid, did, pid;
hsize_t dims[1] = {6};
@ -102,7 +107,7 @@ static void gent_compact_dataset(hid_t fid)
/* create dataspace */
sid = H5Screate_simple(1, dims, NULL);
/* create property plist for chunk*/
/* create property plist */
pid = H5Pcreate(H5P_DATASET_CREATE);
H5Pset_layout (pid,H5D_COMPACT);
@ -120,13 +125,13 @@ static void gent_compact_dataset(hid_t fid)
/*-------------------------------------------------------------------------
* Function: gent_compound_dataset
* Function: gent_compound
*
* Purpose: Generate a compound dataset in FID
*
*-------------------------------------------------------------------------
*/
static void gent_compound_dataset(hid_t fid)
static void gent_compound(hid_t fid)
{
typedef struct s_t
{
@ -161,7 +166,144 @@ static void gent_compound_dataset(hid_t fid)
H5Tclose(tid_s);
}
/*-------------------------------------------------------------------------
* Function: gent_compressed
*
* Purpose: Generate a compressed dataset in FID
*
*-------------------------------------------------------------------------
*/
static void gent_compressed(hid_t fid)
{
hid_t sid, did, pid;
hsize_t dims[1] = {6};
hsize_t chunk_dims[1] = {2};
int buf[6] = {1,2,3,4,5,6};
/* create dataspace */
sid = H5Screate_simple(1, dims, NULL);
/* create property plist for chunk*/
pid = H5Pcreate(H5P_DATASET_CREATE);
H5Pset_chunk(pid, 1, chunk_dims);
/* set the deflate filter */
#if defined (H5_HAVE_FILTER_DEFLATE)
H5Pset_deflate(pid, 1);
#endif
/* create dataset */
did = H5Dcreate(fid, DATASET_COMPRESSED, H5T_NATIVE_INT, sid, pid);
/* write */
H5Dwrite(did, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, buf);
/* close */
H5Sclose(sid);
H5Dclose(did);
H5Pclose(pid);
}
/*-------------------------------------------------------------------------
* Function: gent_named_vl
*
* Purpose: Generate a variable lenght named datatype for a dataset in FID
*
*-------------------------------------------------------------------------
*/
static void gent_named_vl(hid_t fid)
{
hid_t sid, did, tid;
hsize_t dims[1] = {2};
hvl_t buf[2];
/* allocate and initialize VL dataset to write */
buf[0].len = 1;
buf[0].p = malloc( 1 * sizeof(int));
((int *)buf[0].p)[0]=1;
buf[1].len = 2;
buf[1].p = malloc( 2 * sizeof(int));
((int *)buf[1].p)[0]=2;
((int *)buf[1].p)[1]=3;
/* create dataspace */
sid = H5Screate_simple(1, dims, NULL);
/* create datatype */
tid = H5Tvlen_create(H5T_NATIVE_INT);
/* create named datatype */
H5Tcommit(fid, "vl", tid);
/* create dataset */
did = H5Dcreate(fid, DATASET_NAMED_VL, tid, sid, H5P_DEFAULT);
/* write */
H5Dwrite(did, tid, H5S_ALL, H5S_ALL, H5P_DEFAULT, buf);
/* close */
H5Dvlen_reclaim(tid,sid,H5P_DEFAULT,buf);
H5Sclose(sid);
H5Dclose(did);
H5Tclose(tid);
}
/*-------------------------------------------------------------------------
* Function: gent_nested_vl
*
* Purpose: Generate a nested variable lenght dataset in FID
*
*-------------------------------------------------------------------------
*/
static void gent_nested_vl(hid_t fid)
{
hid_t sid, did, tid1, tid2;
hsize_t dims[1] = {2};
hvl_t buf[2];
hvl_t *tvl;
/* allocate and initialize VL dataset to write */
buf[0].len = 1;
buf[0].p = malloc( 1 * sizeof(hvl_t));
tvl = buf[0].p;
tvl->p = malloc( 1 * sizeof(int) );
tvl->len = 1;
((int *)tvl->p)[0]=1;
buf[1].len = 1;
buf[1].p = malloc( 1 * sizeof(hvl_t));
tvl = buf[1].p;
tvl->p = malloc( 2 * sizeof(int) );
tvl->len = 2;
((int *)tvl->p)[0]=2;
((int *)tvl->p)[1]=3;
/* create dataspace */
sid = H5Screate_simple(1, dims, NULL);
/* create datatype */
tid1 = H5Tvlen_create(H5T_NATIVE_INT);
/* create nested VL datatype */
tid2 = H5Tvlen_create(tid1);
/* create dataset */
did = H5Dcreate(fid, DATASET_NESTED_VL, tid2, sid, H5P_DEFAULT);
/* write */
H5Dwrite(did, tid2, H5S_ALL, H5S_ALL, H5P_DEFAULT, buf);
/* close */
H5Dvlen_reclaim(tid2,sid,H5P_DEFAULT,buf);
H5Sclose(sid);
H5Dclose(did);
H5Tclose(tid1);
H5Tclose(tid2);
}
/*-------------------------------------------------------------------------
@ -177,10 +319,13 @@ int main(void)
fid = H5Fcreate(FILENAME, H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT);
gent_simple_dataset(fid);
gent_chunked_dataset(fid);
gent_compact_dataset(fid);
gent_compound_dataset(fid);
gent_simple(fid);
gent_chunked(fid);
gent_compact(fid);
gent_compound(fid);
gent_compressed(fid);
gent_named_vl(fid);
gent_nested_vl(fid);
H5Fclose(fid);
return 0;

View File

@ -120,10 +120,14 @@ H5DIFFTEST()
### T H E T E S T S ###
##############################################################################
TOOLTEST -i $TESTFILE -o $FILEOUT -v -s simple -d simple
TOOLTEST -i $TESTFILE -o $FILEOUT -v -s chunk -d chunk
TOOLTEST -i $TESTFILE -o $FILEOUT -v -s compact -d compact
TOOLTEST -i $TESTFILE -o $FILEOUT -v -s compound -d compound
TOOLTEST -i $TESTFILE -o $FILEOUT -v -s simple -d simple
TOOLTEST -i $TESTFILE -o $FILEOUT -v -s chunk -d chunk
TOOLTEST -i $TESTFILE -o $FILEOUT -v -s compact -d compact
TOOLTEST -i $TESTFILE -o $FILEOUT -v -s compound -d compound
TOOLTEST -i $TESTFILE -o $FILEOUT -v -s compressed -d compressed
TOOLTEST -i $TESTFILE -o $FILEOUT -v -s named_vl -d named_vl
TOOLTEST -i $TESTFILE -o $FILEOUT -v -s nested_vl -d nested_vl

Binary file not shown.