summaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
authorQuincey Koziol <koziol@hdfgroup.org>2001-07-30 20:03:25 (GMT)
committerQuincey Koziol <koziol@hdfgroup.org>2001-07-30 20:03:25 (GMT)
commitbbae8bfdcd4b12bd007cd8a731307bad50384b9a (patch)
tree6cce608e49d5b93a2ba0f477b175f58f6219ea64 /test
parenta836c9bf45515b9bb86058b15e840ab7b86565ba (diff)
downloadhdf5-bbae8bfdcd4b12bd007cd8a731307bad50384b9a.zip
hdf5-bbae8bfdcd4b12bd007cd8a731307bad50384b9a.tar.gz
hdf5-bbae8bfdcd4b12bd007cd8a731307bad50384b9a.tar.bz2
[svn-r4281] Purpose:
Additional test Description: Added metadata cache abuser code to the 'timings' target in the tests. Platforms Tested: FreeBSD 4.3 (hawkwind)
Diffstat (limited to 'test')
-rw-r--r--test/Makefile.in17
-rw-r--r--test/testmeta.c227
2 files changed, 237 insertions, 7 deletions
diff --git a/test/Makefile.in b/test/Makefile.in
index 4cd2df2..77cd888 100644
--- a/test/Makefile.in
+++ b/test/Makefile.in
@@ -22,7 +22,7 @@ TEST_PROGS=testhdf5 lheap ohdr stab gheap hyperslab istore bittests dtypes \
flush1 flush2 enum gass_write gass_read gass_append dpss_write \
dpss_read srb_write srb_append srb_read ttsafe stream_test
-TIMINGS=iopipe chunk overhead
+TIMINGS=iopipe chunk overhead testmeta
## The libh5test.a library provides common support code for the tests. We link
## this library statically because some systems can only link executables to
@@ -46,9 +46,9 @@ MOSTLYCLEAN=cmpd_dset.h5 dataset.h5 extend.h5 istore.h5 tfile1.h5 tfile2.h5 \
gheap1.h5 gheap2.h5 gheap3.h5 gheap4.h5 links.h5 chunk.h5 \
big.data big[0-9][0-9][0-9][0-9][0-9].h5 dtypes1.h5 dtypes2.h5 \
tattr.h5 tselect.h5 mtime.h5 unlink.h5 overhead.h5 \
- fillval_[0-9].h5 fillval.raw mount_[0-9].h5 ttime.h5 trefer[12].h5 \
- tvltypes.h5 tvlstr.h5 flush.h5 enum1.h5 titerate.h5 ttsafe.h5 \
- tarray1.h5 tgenprop.h5
+ fillval_[0-9].h5 fillval.raw mount_[0-9].h5 testmeta.h5 \
+ ttime.h5 trefer[12].h5 tvltypes.h5 tvlstr.h5 flush.h5 enum1.h5 \
+ titerate.h5 ttsafe.h5 tarray1.h5 tgenprop.h5
CLEAN=$(TIMINGS)
## Source and object files for programs... The TEST_SRC list contains all the
@@ -57,9 +57,9 @@ CLEAN=$(TIMINGS)
## overlap with other tests.
TEST_SRC=big.c bittests.c chunk.c cmpd_dset.c dsets.c dtypes.c extend.c \
- external.c fillval.c flush1.c flush2.c gheap.c h5test.c hyperslab.c \
- iopipe.c istore.c lheap.c links.c mount.c mtime.c ohdr.c overhead.c \
- stab.c tarray.c tattr.c testhdf5.c tfile.c tgenprop.c th5s.c \
+ external.c fillval.c flush1.c flush2.c gheap.c h5test.c hyperslab.c \
+ iopipe.c istore.c lheap.c links.c mount.c mtime.c ohdr.c overhead.c \
+ stab.c tarray.c tattr.c testhdf5.c testmeta.c tfile.c tgenprop.c th5s.c \
titerate.c tmeta.c trefer.c tselect.c ttime.c ttbbt.c tvltypes.c tvlstr.c \
unlink.c enum.c ttsafe.c ttsafe_dcreate.c ttsafe_error.c ttsafe_cancel.c \
ttsafe_acreate.c gass_write.c gass_read.c gass_append.c dpss_read.c \
@@ -195,5 +195,8 @@ srb_append: srb_append.lo
stream_test: stream_test.lo
@$(LT_LINK_EXE) $(CFLAGS) -o $@ stream_test.lo $(LIB) $(LIBHDF5) $(LDFLAGS) $(LIBS)
+testmeta: testmeta.lo
+ @$(LT_LINK_EXE) $(CFLAGS) -o $@ testmeta.lo $(LIB) $(LIBHDF5) $(LDFLAGS) $(LIBS)
+
@CONCLUDE@
diff --git a/test/testmeta.c b/test/testmeta.c
new file mode 100644
index 0000000..0a77c77
--- /dev/null
+++ b/test/testmeta.c
@@ -0,0 +1,227 @@
+/*
+ * This program illustrates assertion errors when linked
+ * to HDF5 1.4.1-post2 or 1.4.2-pre3 debug library.
+ *
+ * If the assertion errors are ignored, the program eventially causes
+ * an error in H5Gcreate when writing object 83381.
+ *
+ * When writing in single file mode, the assertion errors still occur
+ * but the H5Gcreate error does not.
+ */
+
+
+#include "hdf5.h"
+
+#define FILEN "testmeta.h5"
+
+#define MEMB_SIZE 100000000
+#define CHUNK_SIZE 512
+
+#define NDATAARRAYS 3
+/*#define NPOINTS 2048*/
+#define NPOINTS 20
+#define NEXTARRAYS 10
+#define NWATTRS 2
+#define NDATAOBJECTS 100000
+
+int main(void)
+{
+ hid_t file_id, prop_id, memspace_id, type_id;
+ hid_t group_id, access_plist;
+ hid_t dataset_id, dataspace_id, s_dataspace_id;
+ herr_t status;
+ hsize_t dims[1];
+ hsize_t maxdims[1];
+ float data[NPOINTS];
+ float floatval;
+ unsigned numdataobj = 0;
+ unsigned i, j;
+ char name[80];
+ hssize_t start[1] = {0};
+ hsize_t stride[1] = {1};
+ hsize_t count[1] = {1};
+
+ /* Create a file */
+ file_id = H5Fcreate(FILEN, H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT);
+
+ /* Create a dataset to hold the number of data objects */
+ /* Create the data space */
+ dataspace_id = H5Screate(H5S_SCALAR);
+
+ /* Create dataset */
+ dataset_id = H5Dcreate(file_id, "/NumDataObj",
+ H5T_NATIVE_UINT, dataspace_id, H5P_DEFAULT);
+
+ /* Write value to NumDataObj dataset */
+ status = H5Dwrite(dataset_id, H5T_NATIVE_UINT, H5S_ALL,
+ H5S_ALL, H5P_DEFAULT, &numdataobj);
+
+ /* Close the identifiers */
+ status = H5Dclose(dataset_id);
+ status = H5Sclose(dataspace_id);
+
+ /* Create extendible arrays */
+ /* Set up for extendible dataset */
+ prop_id = H5Pcreate(H5P_DATASET_CREATE);
+ dims[0] = CHUNK_SIZE;
+ status = H5Pset_chunk(prop_id, 1, dims);
+
+ /* Create dataspace */
+ dims[0]=1;
+ maxdims[0]=H5S_UNLIMITED;
+ dataspace_id = H5Screate_simple(1, dims, maxdims);
+
+ for(i=0; i<NEXTARRAYS; i++)
+ {
+ /* Create dataset */
+ sprintf(name, "/ExtArray%06d", i);
+ dataset_id = H5Dcreate(file_id, name,
+ H5T_NATIVE_FLOAT, dataspace_id, prop_id);
+
+ /* Close the identifier */
+ status = H5Dclose(dataset_id);
+ }
+
+ /* Close the identifiers */
+ status = H5Sclose(dataspace_id);
+ status = H5Pclose(prop_id);
+
+ /* Create group to hold data object data arrays */
+ group_id = H5Gcreate(file_id, "/DataArray", 0);
+ H5Gclose(group_id);
+
+ for(j=0; j<NDATAOBJECTS; j++)
+ {
+ printf("\rWriting Object #%d of %d", j+1, NDATAOBJECTS);
+ fflush(stdout);
+
+ floatval = (float)j;
+
+ /* Create group to hold data arrays for this object */
+ sprintf(name, "/DataArray/%06d", j);
+ group_id = H5Gcreate(file_id, name, 0);
+ if(group_id < 0)
+ {
+ fprintf(stderr, "Failed to create DataArray group.\n");
+ status = H5Fclose(file_id);
+ return -1;
+ }
+
+ /* Loop over data arrays */
+ for(i=0; i<NDATAARRAYS; i++)
+ {
+ /* Create dataspace */
+ dims[0]=NPOINTS;
+ maxdims[0]=NPOINTS;
+ dataspace_id = H5Screate_simple(1 ,dims, maxdims);
+
+ /* Create dataset */
+ sprintf(name, "DataArray%06d", i);
+ dataset_id = H5Dcreate(group_id, name,
+ H5T_NATIVE_FLOAT, dataspace_id, H5P_DEFAULT);
+ if(dataset_id < 0)
+ {
+ fprintf(stderr, "Failed to create DataArray dataset.\n");
+ status = H5Fclose(file_id);
+ return -1;
+ }
+
+ /* Write the data array data */
+ status = H5Dwrite(dataset_id, H5T_NATIVE_FLOAT, H5S_ALL,
+ H5S_ALL, H5P_DEFAULT, data);
+ if(status < 0)
+ {
+ fprintf(stderr, "Failed to write DataArray dataset.\n");
+ status = H5Fclose(file_id);
+ return -1;
+ }
+
+ /* Close the identifiers */
+ status = H5Dclose(dataset_id);
+ status = H5Sclose(dataspace_id);
+ }
+
+ /* Open NumDataObj dataset */
+ dataset_id = H5Dopen(file_id, "/NumDataObj");
+ if(dataset_id < 0)
+ {
+ fprintf(stderr, "Failed to open NumDataObj dataset.\n");
+ status = H5Fclose(file_id);
+ return -1;
+ }
+
+ /* Write value to NumDataObj dataset */
+ numdataobj = j + 1;
+ status = H5Dwrite(dataset_id, H5T_NATIVE_UINT, H5S_ALL,
+ H5S_ALL, H5P_DEFAULT, &numdataobj);
+ if(status < 0)
+ {
+ fprintf(stderr, "Failed to write NumDataObj dataset.\n");
+ status = H5Fclose(file_id);
+ return -1;
+ }
+
+ /* Close identifiers */
+ status = H5Dclose(dataset_id);
+ status = H5Gclose(group_id);
+
+ /* Extend attribute arrays */
+ for(i=0; i<NEXTARRAYS; i++)
+ {
+ /* Open extendable dataset */
+ sprintf(name, "/ExtArray%06d", i);
+ dataset_id = H5Dopen(file_id, name);
+ if(dataset_id < 0)
+ {
+ fprintf(stderr, "Failed to open ExtArray dataset.\n");
+ status = H5Fclose(file_id);
+ return -1;
+ }
+
+ /* Extend attribute dataset */
+ dims[0] = (hsize_t)j + 1;
+ status = H5Dextend(dataset_id, dims);
+ if(status < 0)
+ {
+ fprintf(stderr, "Failed to extend DataArray dataset.\n");
+ status = H5Fclose(file_id);
+ return -1;
+ }
+
+ /* Select element and write value to attribute dataset */
+ dims[0] = 1;
+ memspace_id = H5Screate_simple(1, dims, dims);
+ dataspace_id = H5Dget_space(dataset_id);
+ type_id = H5Dget_type(dataset_id);
+
+ start[0] = 0;
+ status = H5Sselect_hyperslab(memspace_id, H5S_SELECT_SET,
+ start, stride, count, NULL);
+ start[0] = (hssize_t)j;
+ status = H5Sselect_hyperslab(dataspace_id, H5S_SELECT_SET,
+ start, stride, count, NULL);
+ status = H5Dwrite(dataset_id, type_id, memspace_id,
+ dataspace_id, H5P_DEFAULT, &floatval);
+ if(status < 0)
+ {
+ fprintf(stderr, "Failed to write DataArray dataset.\n");
+ status = H5Fclose(file_id);
+ return -1;
+ }
+
+ /* Close identifiers */
+ status = H5Tclose(type_id);
+ status = H5Sclose(dataspace_id);
+ status = H5Sclose(memspace_id);
+ status = H5Dclose(dataset_id);
+ }
+ }
+
+
+ /* Close the file */
+ status = H5Fclose(file_id);
+
+ printf("\n");
+
+ return 0;
+}