From 19c8cfa8617156fa99caa4349fecb40ab652753c Mon Sep 17 00:00:00 2001 From: Pedro Vicente Nunes Date: Thu, 11 Apr 2002 16:30:42 -0500 Subject: [svn-r5169] Purpose: test for the H5Dset_extent API function Description: there are 2 types of tests: Test H5Dset_extent with chunks on the raw data cache Test H5Dset_extent with chunks written to file Platforms tested: Windows 2000 SUN( arabica) LINUX (eirene) IRIX64 (modi4) --- test/set_extent.c | 72 ++++++++++++++++++++++++++----------------------------- 1 file changed, 34 insertions(+), 38 deletions(-) diff --git a/test/set_extent.c b/test/set_extent.c index c84a3e3..6178472 100644 --- a/test/set_extent.c +++ b/test/set_extent.c @@ -29,9 +29,8 @@ int main( void ) int data[ 90 ][ 90 ]; int buf1[ 70 ][ 70 ]; int buf2[ 90 ][ 90 ]; - herr_t status; int i, j, n = 0; - int fillvalue = 0; /* Fill value for the dataset */ + int fillvalue = 0; /* Fill value for the dataset */ for( i = 0; i < 90; i++ ) @@ -42,8 +41,7 @@ int main( void ) } } -#if 0 - + /*------------------------------------------------------------------------- * Test H5Dset_extent with chunks on the raw data cache *------------------------------------------------------------------------- @@ -51,17 +49,16 @@ int main( void ) TESTING("extend dataset create"); - /* Create a new file using default properties. */ - file_id = H5Fcreate( "set_extent_create.h5", H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT ); + if ((file_id = H5Fcreate( "set_extent_create.h5", H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT ))<0) goto out; /* Create the data space with unlimited dimensions. */ - space_id = H5Screate_simple( RANK, dims, maxdims ); + if ((space_id = H5Screate_simple( RANK, dims, maxdims ))<0) goto out; /* Modify dataset creation properties, i.e. enable chunking. */ - plist_id = H5Pcreate (H5P_DATASET_CREATE); - status = H5Pset_chunk( plist_id, RANK, dims_chunk); - status = H5Pset_fill_value( plist_id, H5T_NATIVE_INT, &fillvalue); + if ((plist_id = H5Pcreate (H5P_DATASET_CREATE ))<0) goto out; + if (H5Pset_chunk( plist_id, RANK, dims_chunk )<0) goto out; + if (H5Pset_fill_value( plist_id, H5T_NATIVE_INT, &fillvalue )<0) goto out; /*------------------------------------------------------------------------- @@ -70,10 +67,10 @@ int main( void ) */ /* Create a new dataset */ - dataset_id = H5Dcreate( file_id , "Dataset", H5T_NATIVE_INT, space_id, plist_id ); + if ((dataset_id = H5Dcreate( file_id , "Dataset", H5T_NATIVE_INT, space_id, plist_id ))<0) goto out; /* Write the data. */ - status = H5Dwrite( dataset_id , H5T_NATIVE_INT, space_id, H5S_ALL, H5P_DEFAULT, data ); + if (H5Dwrite( dataset_id , H5T_NATIVE_INT, space_id, H5S_ALL, H5P_DEFAULT, data )<0) goto out; /*------------------------------------------------------------------------- * Set new dimensions for the array; shrink it @@ -81,13 +78,13 @@ int main( void ) */ /* Set new dimensions for the array. */ - status = H5Dset_extent( dataset_id , dims_new ); + if (H5Dset_extent( dataset_id , dims_new )<0) goto out; /* Get the space. */ - space_id = H5Dget_space( dataset_id ); + if ((space_id = H5Dget_space( dataset_id ))<0) goto out; /* Get dimensions. */ - status = H5Sget_simple_extent_dims( space_id, dims_out, NULL); + if (H5Sget_simple_extent_dims( space_id, dims_out, NULL )<0) goto out; if ( dims_out[0] != dims_new[0] ) goto out; @@ -99,7 +96,7 @@ int main( void ) */ /* Read the new dataset. */ - status = H5Dread( dataset_id, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, buf1 ); + if (H5Dread( dataset_id, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, buf1 )<0) goto out; /* Compare the read array with the original array */ @@ -120,13 +117,13 @@ int main( void ) */ /* Set new dimensions for the array. */ - status = H5Dset_extent( dataset_id , dims ); + if (H5Dset_extent( dataset_id , dims )<0) goto out; /* Get the space. */ - space_id = H5Dget_space( dataset_id ); + if ((space_id = H5Dget_space( dataset_id ))<0) goto out; /* Get dimensions. */ - status = H5Sget_simple_extent_dims( space_id, dims_out, NULL); + if (H5Sget_simple_extent_dims( space_id, dims_out, NULL )<0) goto out; if ( dims_out[0] != dims[0] ) goto out; @@ -138,7 +135,7 @@ int main( void ) */ /* Read the new dataset. */ - status = H5Dread( dataset_id, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, buf2 ); + if (H5Dread( dataset_id, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, buf2 )<0) goto out; /* Compare the read array with the original array */ for( i = 0; i < dims_out[0]; i++ ) @@ -187,21 +184,21 @@ int main( void ) TESTING("extend dataset read"); /* Create a new file using default properties. */ - file_id = H5Fcreate( "set_extent_read.h5", H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT ); + if ((file_id = H5Fcreate( "set_extent_read.h5", H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT ))<0) goto out; /* Create the data space with unlimited dimensions. */ - space_id = H5Screate_simple( RANK, dims, maxdims ); + if ((space_id = H5Screate_simple( RANK, dims, maxdims ))<0) goto out; /* Modify dataset creation properties, i.e. enable chunking. */ - plist_id = H5Pcreate (H5P_DATASET_CREATE); - status = H5Pset_chunk( plist_id, RANK, dims_chunk); - status = H5Pset_fill_value( plist_id, H5T_NATIVE_INT, &fillvalue); + if ((plist_id = H5Pcreate (H5P_DATASET_CREATE ))<0) goto out; + if (H5Pset_chunk( plist_id, RANK, dims_chunk )<0) goto out; + if (H5Pset_fill_value( plist_id, H5T_NATIVE_INT, &fillvalue )<0) goto out; /* Create a new dataset within the file using cparms creation properties. */ - dataset_id = H5Dcreate( file_id , "Dataset", H5T_NATIVE_INT, space_id, plist_id ); + if ((dataset_id = H5Dcreate( file_id , "Dataset", H5T_NATIVE_INT, space_id, plist_id ))<0) goto out; /* Write the data. */ - status = H5Dwrite( dataset_id , H5T_NATIVE_INT, space_id, H5S_ALL, H5P_DEFAULT, data ); + if (H5Dwrite( dataset_id , H5T_NATIVE_INT, space_id, H5S_ALL, H5P_DEFAULT, data )<0) goto out; /* Close/release resources. */ H5Dclose( dataset_id ); @@ -211,25 +208,25 @@ int main( void ) /* Open the file */ - file_id = H5Fopen( "set_extent_read.h5", H5F_ACC_RDWR, H5P_DEFAULT ); + if ((file_id = H5Fopen( "set_extent_read.h5", H5F_ACC_RDWR, H5P_DEFAULT ))<0) goto out; /* Open the dataset */ - dataset_id = H5Dopen( file_id , "Dataset" ); + if ((dataset_id = H5Dopen( file_id , "Dataset" ))<0) goto out; /* Set new dimensions for the array. */ - status = H5Dset_extent( dataset_id, dims_new ); + if (H5Dset_extent( dataset_id, dims_new )<0) goto out; /* Get the space. */ - space_id = H5Dget_space( dataset_id ); + if ((space_id = H5Dget_space( dataset_id ))<0) goto out; /* Get dimensions. */ - status = H5Sget_simple_extent_dims( space_id, dims_out, NULL); + if (H5Sget_simple_extent_dims( space_id, dims_out, NULL )<0) goto out; if ( dims_out[0] != dims_new[0] ) goto out; /* Read the new dataset. */ - status = H5Dread( dataset_id, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, buf1 ); + if (H5Dread( dataset_id, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, buf1 )<0) goto out; /* Compare the read array with the original array */ for( i = 0; i < dims_out[0]; i++ ) @@ -248,19 +245,19 @@ int main( void ) */ /* Set new dimensions for the array. */ - status = H5Dset_extent( dataset_id , dims ); + if (H5Dset_extent( dataset_id , dims )<0) goto out; /* Get the space. */ - space_id = H5Dget_space( dataset_id ); + if ((space_id = H5Dget_space( dataset_id ))<0) goto out; /* Get dimensions. */ - status = H5Sget_simple_extent_dims( space_id, dims_out, NULL); + if (H5Sget_simple_extent_dims( space_id, dims_out, NULL )<0) goto out; if ( dims_out[0] != dims[0] ) goto out; /* Read the new dataset. */ - status = H5Dread( dataset_id, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, buf2 ); + if (H5Dread( dataset_id, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, buf2 )<0) goto out; /* Compare the read array with the original array */ for( i = 0; i < dims_out[0]; i++ ) @@ -296,7 +293,6 @@ int main( void ) PASSED(); -#endif return 0; -- cgit v0.12