diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/Makefile.in | 19 | ||||
| -rw-r--r-- | test/chunk.c | 8 | ||||
| -rw-r--r-- | test/flush1.c | 129 | ||||
| -rw-r--r-- | test/flush2.c | 151 | ||||
| -rw-r--r-- | test/mount.c | 1 | ||||
| -rw-r--r-- | test/ragged.c | 2 |
6 files changed, 299 insertions, 11 deletions
diff --git a/test/Makefile.in b/test/Makefile.in index 3b43e76..98f4af0 100644 --- a/test/Makefile.in +++ b/test/Makefile.in @@ -12,7 +12,7 @@ CPPFLAGS=-I. -I../src @CPPFLAGS@ # These are our main targets. They should be listed in the order to be # executed, generally most specific tests to least specific tests. TESTS=testhdf5 gheap hyperslab istore bittests dtypes dsets cmpd_dset extend \ - external shtype links unlink big mtime fillval mount + external shtype links unlink big mtime fillval mount flush1 flush2 TIMINGS=iopipe chunk ragged overhead # Temporary files @@ -25,17 +25,18 @@ MOSTLYCLEAN=cmpd_dset.h5 dataset.h5 extend.h5 istore.h5 tfile1.h5 tfile2.h5 \ shtype2a.h5 shtype2b.h5 shtype3.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 ragged.h5 grptime.h5 unlink.h5 overhead.h5 \ - fillval_[0-9].h5 mount_[0-9].h5 trefer.h5 + fillval_[0-9].h5 mount_[0-9].h5 trefer.h5 flush.h5 CLEAN=$(TIMINGS) # Source and object files for programs... The TEST_SRC list contains all the # source files and is used for things like dependencies, archiving, etc. The # other source lists are for the individual tests, the files of which may # overlap with other tests. -TEST_SRC=testhdf5.c tattr.c tfile.c theap.c tmeta.c tohdr.c trefer.c tselect.c \ - tstab.c th5s.c dtypes.c hyperslab.c istore.c dsets.c cmpd_dset.c extend.c \ - external.c iopipe.c gheap.c shtype.c big.c links.c chunk.c bittests.c \ - mtime.c ragged.c unlink.c overhead.c fillval.c mount.c +TEST_SRC=testhdf5.c tattr.c tfile.c theap.c tmeta.c tohdr.c trefer.c \ + tselect.c tstab.c th5s.c dtypes.c hyperslab.c istore.c dsets.c \ + cmpd_dset.c extend.c external.c iopipe.c gheap.c shtype.c big.c links.c \ + chunk.c bittests.c mtime.c ragged.c unlink.c overhead.c fillval.c \ + mount.c flush1.c flush2.c TEST_OBJ=$(TEST_SRC:.c=.o) # Private header files (not to be installed)... @@ -119,4 +120,10 @@ fillval: fillval.o ../src/libhdf5.a mount: mount.o ../src/libhdf5.a $(CC) $(CFLAGS) -o $@ mount.o ../src/libhdf5.a $(LIBS) +flush1: flush1.o ../src/libhdf5.a + $(CC) $(CFLAGS) -o $@ flush1.o ../src/libhdf5.a $(LIBS) + +flush2: flush2.o ../src/libhdf5.a + $(CC) $(CFLAGS) -o $@ flush2.o ../src/libhdf5.a $(LIBS) + @CONCLUDE@ diff --git a/test/chunk.c b/test/chunk.c index c0cbb9f..5af7d46 100644 --- a/test/chunk.c +++ b/test/chunk.c @@ -47,9 +47,9 @@ #define RM_CACHE_DELT 5 #define RM_START 0.50 #define RM_END 5.00 -#define RM_DELTA 0.5 -#define RM_W0 1.0 -#define RM_NRDCC 5210 +#define RM_DELTA 0.50 +#define RM_W0 0.0 +#define RM_NRDCC 521 /* Diagonal test */ #define DIAG_CACHE_STRT 25 @@ -57,7 +57,7 @@ #define DIAG_CACHE_DELT 5 #define DIAG_START 0.50 #define DIAG_END 5.00 -#define DIAG_DELTA 0.5 +#define DIAG_DELTA 0.50 /* #define DIAG_W0 0.65 */ /* #define DIAG_NRDCC 521 */ diff --git a/test/flush1.c b/test/flush1.c new file mode 100644 index 0000000..02ddbca --- /dev/null +++ b/test/flush1.c @@ -0,0 +1,129 @@ +/* + * Copyright (C) 1998 NCSA + * All rights reserved. + * + * Programmer: Robb Matzke <matzke@llnl.gov> + * Friday, October 23, 1998 + * + * Purpose: This is the first half of a two-part test that makes sure + * that a file can be read after an application crashes as long + * as the file was flushed first. We simulate a crash by + * calling _exit(0) since this doesn't flush HDF5 caches but + * still exits with success. + */ +#include <hdf5.h> +#include <stdio.h> +#include <unistd.h> + +#include <H5config.h> +#ifndef HAVE_ATTRIBUTE +# undef __attribute__ +# define __attribute__(X) /*void*/ +# define __unused__ /*void*/ +#else +# define __unused__ __attribute__((unused)) +#endif + + +#define FILE_NAME_1 "flush.h5" /*do not clean up*/ + + + +/*------------------------------------------------------------------------- + * Function: display_error_cb + * + * Purpose: Displays the error stack after printing "*FAILED*". + * + * Return: Success: 0 + * + * Failure: -1 + * + * Programmer: Robb Matzke + * Wednesday, March 4, 1998 + * + * Modifications: + * + *------------------------------------------------------------------------- + */ +static herr_t +display_error_cb (void __unused__ *client_data) +{ + puts ("*FAILED*"); + H5Eprint (stdout); + return 0; +} + + +/*------------------------------------------------------------------------- + * Function: main + * + * Purpose: Part 1 of a two-part H5Fflush() test. + * + * Return: Success: 0 + * + * Failure: 1 + * + * Programmer: Robb Matzke + * Friday, October 23, 1998 + * + * Modifications: + * + *------------------------------------------------------------------------- + */ +int +main(void) +{ + hid_t file, dcpl, space, dset, groups, grp; + hsize_t ds_size[2] = {100, 100}; + hsize_t ch_size[2] = {5, 5}; + double the_data[100][100]; + hsize_t i, j; + char name[256]; + + printf("%-70s", "Testing H5Fflush (part1)"); + fflush(stdout); + H5Eset_auto(display_error_cb, NULL); + + /* Create the file */ + if ((file=H5Fcreate(FILE_NAME_1, H5F_ACC_TRUNC, + H5P_DEFAULT, H5P_DEFAULT))<0) goto error; + + /* Create a chunked dataset */ + if ((dcpl=H5Pcreate(H5P_DATASET_CREATE))<0) goto error; + if (H5Pset_chunk(dcpl, 2, ch_size)<0) goto error; + if ((space=H5Screate_simple(2, ds_size, NULL))<0) goto error; + if ((dset=H5Dcreate(file, "dset", H5T_NATIVE_FLOAT, space, H5P_DEFAULT))<0) + goto error; + + /* Write some data */ + for (i=0; i<ds_size[0]; i++) { + for (j=0; j<ds_size[1]; j++) { + the_data[i][j] = (double)i/((double)j+1); + } + } + if (H5Dwrite(dset, H5T_NATIVE_DOUBLE, space, space, H5P_DEFAULT, + the_data)<0) goto error; + + /* Create some groups */ + if ((groups=H5Gcreate(file, "some_groups", 0))<0) goto error; + for (i=0; i<100; i++) { + sprintf(name, "grp%02u", (unsigned)i); + if ((grp=H5Gcreate(groups, name, 0))<0) goto error; + if (H5Gclose(grp)<0) goto error; + } + + /* Flush and exit without closing the library */ + if (H5Fflush(file, H5F_SCOPE_GLOBAL)<0) goto error; + puts(" PASSED"); + fflush(stdout); + fflush(stderr); + _exit(0); + + error: + printf("*FAILED*"); + return 1; +} + + + + diff --git a/test/flush2.c b/test/flush2.c new file mode 100644 index 0000000..a799619 --- /dev/null +++ b/test/flush2.c @@ -0,0 +1,151 @@ +/* + * Copyright (C) 1998 NCSA + * All rights reserved. + * + * Programmer: Robb Matzke <matzke@llnl.gov> + * Friday, October 23, 1998 + * + * Purpose: This is the second half of a two-part test that makes sure + * that a file can be read after an application crashes as long + * as the file was flushed first. This half tries to read the + * file created by the first half. + */ +#undef NDEBUG +#include <assert.h> +#include <hdf5.h> +#include <math.h> +#include <stdio.h> + +#include <H5config.h> +#ifndef HAVE_ATTRIBUTE +# undef __attribute__ +# define __attribute__(X) /*void*/ +# define __unused__ /*void*/ +#else +# define __unused__ __attribute__((unused)) +#endif + + +#define FILE_NAME_1 "flush.h5" + + + +/*------------------------------------------------------------------------- + * Function: cleanup + * + * Purpose: Removes test files + * + * Return: void + * + * Programmer: Robb Matzke + * Thursday, June 4, 1998 + * + * Modifications: + * + *------------------------------------------------------------------------- + */ +static void +cleanup (void) +{ + if (!getenv ("HDF5_NOCLEANUP")) { + remove (FILE_NAME_1); + } +} + + +/*------------------------------------------------------------------------- + * Function: display_error_cb + * + * Purpose: Displays the error stack after printing "*FAILED*". + * + * Return: Success: 0 + * + * Failure: -1 + * + * Programmer: Robb Matzke + * Wednesday, March 4, 1998 + * + * Modifications: + * + *------------------------------------------------------------------------- + */ +static herr_t +display_error_cb (void __unused__ *client_data) +{ + puts ("*FAILED*"); + H5Eprint (stdout); + return 0; +} + + +/*------------------------------------------------------------------------- + * Function: main + * + * Purpose: Part 1 of a two-part H5Fflush() test. + * + * Return: Success: 0 + * + * Failure: 1 + * + * Programmer: Robb Matzke + * Friday, October 23, 1998 + * + * Modifications: + * + *------------------------------------------------------------------------- + */ +int +main(void) +{ + hid_t file, space, dset, groups, grp; + hsize_t ds_size[2]; + double the_data[100][100], error; + hsize_t i, j; + char name[256]; + + printf("%-70s", "Testing H5Fflush (part2)"); + fflush(stdout); + H5Eset_auto(display_error_cb, NULL); + + /* Open the file */ + if ((file=H5Fopen(FILE_NAME_1, H5F_ACC_RDONLY, H5P_DEFAULT))<0) goto error; + + /* Open the dataset */ + if ((dset=H5Dopen(file, "dset"))<0) goto error; + if ((space=H5Dget_space(dset))<0) goto error; + if (H5Sget_simple_extent_dims(space, ds_size, NULL)<0) goto error; + assert(100==ds_size[0] && 100==ds_size[1]); + + /* Read some data */ + if (H5Dread(dset, H5T_NATIVE_DOUBLE, space, space, H5P_DEFAULT, + the_data)<0) goto error; + for (i=0; i<ds_size[0]; i++) { + for (j=0; j<ds_size[1]; j++) { + error = fabs(the_data[i][j]-(double)i/((double)j+1)); + assert(error<0.0001); + } + } + + /* Open some groups */ + if ((groups=H5Gopen(file, "some_groups"))<0) goto error; + for (i=0; i<100; i++) { + sprintf(name, "grp%02u", (unsigned)i); + if ((grp=H5Gopen(groups, name))<0) goto error; + if (H5Gclose(grp)<0) goto error; + } + + if (H5Gclose(groups)<0) goto error; + if (H5Dclose(dset)<0) goto error; + if (H5Fclose(file)<0) goto error; + puts(" PASSED"); + cleanup(); + return 0; + + error: + printf("*FAILED*"); + return 1; +} + + + + diff --git a/test/mount.c b/test/mount.c index 4716795..b6231a8 100644 --- a/test/mount.c +++ b/test/mount.c @@ -30,6 +30,7 @@ #undef __unused__ #define __unused__ #endif + /*------------------------------------------------------------------------- * Function: cleanup diff --git a/test/ragged.c b/test/ragged.c index f55d0f9..903a32e 100644 --- a/test/ragged.c +++ b/test/ragged.c @@ -200,7 +200,7 @@ ragged_write_all(hid_t ra, hsize_t rows_at_once) hsize_t interval_nelmts; /*elmts/interval timer */ #else hssize_t interval_nelmts; /*elmts/interval timer */ -#endif +#endif hsize_t *size=NULL; /*size of each row */ void **buf=NULL; /*buffer for each row */ H5_timer_t timer, timer_total; /*performance timers */ |