diff options
| -rw-r--r-- | test/extend.c | 155 |
1 files changed, 101 insertions, 54 deletions
diff --git a/test/extend.c b/test/extend.c index 272cd2e..23625fd 100644 --- a/test/extend.c +++ b/test/extend.c @@ -29,63 +29,39 @@ const char *FILENAME[] = { #define NX 100 /* USE AN EVEN NUMBER!*/ #define NY 100 /* USE AN EVEN NUMBER!*/ +/* Data buffers */ +static int buf1[NY][NX], buf2[NX/2][NY/2]; + /*------------------------------------------------------------------------- - * Function: main + * Function: write_data * - * Purpose: Tests extendible datasets - * - * Return: Success: exit(0) + * Purpose: Create extendible dataset and test extend/write/read * - * Failure: exit(non-zero) + * Return: Success: 0 + * Failure: -1 * - * Programmer: Robb Matzke - * Friday, January 30, 1998 + * Programmer: Quincey Koziol + * Tuesday, June 10, 2003 * * Modifications: * *------------------------------------------------------------------------- */ int -main (void) +write_data(const char *msg, hid_t file, const char *name, hid_t cparms, hid_t mem_space) { - hid_t file, dataset, mem_space, file_space, cparms; - hid_t fapl; - int i, j, k, m; - static int buf1[NY][NX], buf2[NX/2][NY/2]; - static const hsize_t dims[2] = {NX, NY}; + hid_t dataset, file_space, half_space; + static const hsize_t dims[2] = {NX, NY}; static const hsize_t half_dims[2] = {NX/2, NY/2}; - static const hsize_t chunk_dims[2] = {NX/2, NY/2}; - static hsize_t maxdims[2] = {H5S_UNLIMITED, H5S_UNLIMITED}; static hsize_t size[2]; hssize_t offset[2]; - char filename[1024]; - - h5_reset(); - fapl = h5_fileaccess(); - TESTING("dataset extend"); - - /* Initialize buffer and space */ - for (i=0; i<NX; i++) { - for (j=0; j<NY; j++) { - buf1[i][j] = i*NY+j; - } - } - if ((mem_space = H5Screate_simple (2, dims, maxdims))<0) goto error; + int i, j, k, m; - /* Create the file */ - h5_fixname(FILENAME[0], fapl, filename, sizeof filename); - if ((file = H5Fcreate (filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) { - goto error; - } - - /* Create the dataset which is originally NX by NY */ - if((cparms = H5Pcreate(H5P_DATASET_CREATE))<0) goto error; - if (H5Pset_chunk (cparms, 2, chunk_dims)<0) goto error; - if ((dataset = H5Dcreate (file, "dataset", H5T_NATIVE_INT, mem_space, - cparms))<0) goto error; - if (H5Pclose (cparms)<0) goto error; + TESTING(msg); + if ((dataset = H5Dcreate (file, name, H5T_NATIVE_INT, mem_space, + cparms))<0) TEST_ERROR; /* Write the data */ for (i=0; i<5; i++) { for (j=0; j<5; j++) { @@ -95,24 +71,23 @@ main (void) offset[1] = j * NY; size[0] = offset[0] + NX; size[1] = offset[1] + NY; - if (H5Dextend (dataset, size)<0) goto error; + if (H5Dextend (dataset, size)<0) TEST_ERROR; /* Select a hyperslab */ - if ((file_space = H5Dget_space (dataset))<0) goto error; + if ((file_space = H5Dget_space (dataset))<0) TEST_ERROR; if (H5Sselect_hyperslab (file_space, H5S_SELECT_SET, offset, - NULL, dims, NULL)<0) goto error; + NULL, dims, NULL)<0) TEST_ERROR; /* Write to the hyperslab */ if (H5Dwrite (dataset, H5T_NATIVE_INT, mem_space, file_space, - H5P_DEFAULT, buf1)<0) goto error; - if (H5Sclose (file_space)<0) goto error; + H5P_DEFAULT, buf1)<0) TEST_ERROR; + if (H5Sclose (file_space)<0) TEST_ERROR; } } - if (H5Sclose (mem_space)<0) goto error; /* Read the data */ - if ((mem_space = H5Screate_simple (2, half_dims, NULL))<0) goto error; - if ((file_space = H5Dget_space (dataset))<0) goto error; + if ((half_space = H5Screate_simple (2, half_dims, NULL))<0) TEST_ERROR; + if ((file_space = H5Dget_space (dataset))<0) TEST_ERROR; for (i=0; i<10; i++) { for (j=0; j<10; j++) { @@ -120,11 +95,11 @@ main (void) offset[0] = i * NX/2; offset[1] = j * NY/2; if (H5Sselect_hyperslab (file_space, H5S_SELECT_SET, offset, - NULL, half_dims, NULL)<0) goto error; + NULL, half_dims, NULL)<0) TEST_ERROR; /* Read */ - if (H5Dread (dataset, H5T_NATIVE_INT, mem_space, file_space, - H5P_DEFAULT, buf2)<0) goto error; + if (H5Dread (dataset, H5T_NATIVE_INT, half_space, file_space, + H5P_DEFAULT, buf2)<0) TEST_ERROR; /* Compare */ for (k=0; k<NX/2; k++) { @@ -134,7 +109,7 @@ main (void) printf(" i=%d, j=%d, k=%d, m=%d\n", i, j, k, m); printf(" buf2[%d][%d]=%d\n",k,m,buf2[k][m]); printf(" buf1[%d][%d]=%d\n",(i%2)*NX/2+k,(j%2)*NY/2+m,buf1[(i%2)*NX/2+k][(j%2)*NY/2+m]); - goto error; + TEST_ERROR; } } } @@ -142,9 +117,81 @@ main (void) } - if (H5Dclose (dataset)<0) goto error; - if (H5Fclose (file)<0) goto error; + /* Cleanup */ + if (H5Dclose (dataset)<0) TEST_ERROR; + if (H5Sclose (file_space)<0) TEST_ERROR; + if (H5Sclose (half_space)<0) TEST_ERROR; + PASSED(); + return 0; + +error: + return -1; +} + + +/*------------------------------------------------------------------------- + * Function: main + * + * Purpose: Tests extendible datasets + * + * Return: Success: exit(0) + * + * Failure: exit(non-zero) + * + * Programmer: Robb Matzke + * Friday, January 30, 1998 + * + * Modifications: + * Took main data code out into write_data() routine, to allow + * different dataset creation property list settings to be tested. + * Quincey Koziol + * Tuesday, June 10, 2003 + * + *------------------------------------------------------------------------- + */ +int +main (void) +{ + hid_t file, mem_space, cparms; + hid_t fapl; + int nerrors = 0; + static const hsize_t dims[2] = {NX, NY}; + static const hsize_t chunk_dims[2] = {NX/2, NY/2}; + static hsize_t maxdims[2] = {H5S_UNLIMITED, H5S_UNLIMITED}; + char filename[1024]; + int i, j; + + h5_reset(); + fapl = h5_fileaccess(); + + /* Initialize buffer and space */ + for (i=0; i<NX; i++) { + for (j=0; j<NY; j++) { + buf1[i][j] = i*NY+j; + } + } + if ((mem_space = H5Screate_simple (2, dims, maxdims))<0) TEST_ERROR; + + /* Create the file */ + h5_fixname(FILENAME[0], fapl, filename, sizeof filename); + if ((file = H5Fcreate (filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR; + + /* Create the dataset which is originally NX by NY */ + if((cparms = H5Pcreate(H5P_DATASET_CREATE))<0) TEST_ERROR; + if (H5Pset_chunk (cparms, 2, chunk_dims)<0) TEST_ERROR; + nerrors += write_data("extendible dataset with incremental allocation",file,"dataset1",cparms,mem_space)<0 ?1:0; + if(H5Pset_alloc_time(cparms, H5D_ALLOC_TIME_EARLY)<0) TEST_ERROR; + nerrors += write_data("extendible dataset with early allocation",file,"dataset2",cparms,mem_space)<0 ?1:0; + + if (H5Pclose (cparms)<0) TEST_ERROR; + if (H5Sclose (mem_space)<0) TEST_ERROR; + + if (H5Fclose (file)<0) TEST_ERROR; + if (nerrors) { + printf("***** %d FAILURE%s! *****\n", nerrors, 1==nerrors?"":"S"); + exit(1); + } printf("All extend tests passed.\n"); h5_cleanup(FILENAME, fapl); return 0; |