mirror of
https://github.com/HDFGroup/hdf5.git
synced 2025-03-31 17:10:47 +08:00
[svn-r20459] Purpose:
Progress on bug 2138 (bugzilla) / HDFFV-4298 (JIRA) Description: - Added basic VFD tests (i.e. cloned the SEC2 test) for the Windows, STDIO and log VFDs. - Added H5Pget_driver() sanity check to all VFD's tests. - Added log output file to list of files to clean up in Makefile.am. Tested on: - h5committest script platforms (jam, amani, heiwa) - Windows 7 (32- and 64-bit)
This commit is contained in:
Dana Robinson
parent
0c032eef21
commit
8a7973b011
@ -125,7 +125,7 @@ CHECK_CLEANFILES+=accum.h5 cmpd_dset.h5 compact_dataset.h5 dataset.h5 dset_offse
|
||||
dtransform.h5 test_filters.h5 get_file_name.h5 tstint[1-2].h5 \
|
||||
unlink_chunked.h5 btree2.h5 objcopy_src.h5 objcopy_dst.h5 \
|
||||
objcopy_ext.dat trefer1.h5 trefer2.h5 app_ref.h5 farray.h5 \
|
||||
earray.h5 efc[0-5].h5
|
||||
earray.h5 efc[0-5].h5 log_vfd_out.log
|
||||
|
||||
# Sources for testhdf5 executable
|
||||
testhdf5_SOURCES=testhdf5.c tarray.c tattr.c tchecksum.c tconfig.c tfile.c \
|
||||
|
||||
391
test/vfd.c
391
test/vfd.c
@ -30,28 +30,34 @@
|
||||
#define CORE_INCREMENT (4*KB)
|
||||
|
||||
/*Macros for Direct VFD*/
|
||||
#define MBOUNDARY 512
|
||||
#define FBSIZE (4*KB)
|
||||
#define CBSIZE (8*KB)
|
||||
#define THRESHOLD 1
|
||||
#define DSET1_NAME "dset1"
|
||||
#define DSET1_DIM1 1024
|
||||
#define DSET1_DIM2 32
|
||||
#define DSET2_NAME "dset2"
|
||||
#define DSET2_DIM 4
|
||||
#define MBOUNDARY 512
|
||||
#define FBSIZE (4*KB)
|
||||
#define CBSIZE (8*KB)
|
||||
#define THRESHOLD 1
|
||||
#define DSET1_NAME "dset1"
|
||||
#define DSET1_DIM1 1024
|
||||
#define DSET1_DIM2 32
|
||||
#define DSET2_NAME "dset2"
|
||||
#define DSET2_DIM 4
|
||||
|
||||
const char *FILENAME[] = {
|
||||
"sec2_file",
|
||||
"core_file",
|
||||
"family_file",
|
||||
"new_family_v16_",
|
||||
"multi_file",
|
||||
"direct_file",
|
||||
"sec2_file", /*0*/
|
||||
"core_file", /*1*/
|
||||
"family_file", /*2*/
|
||||
"new_family_v16_", /*3*/
|
||||
"multi_file", /*4*/
|
||||
"direct_file", /*5*/
|
||||
"log_file", /*6*/
|
||||
"stdio_file", /*7*/
|
||||
"windows_file", /*8*/
|
||||
NULL
|
||||
};
|
||||
|
||||
#define LOG_FILENAME "log_vfd_out.log"
|
||||
|
||||
#define COMPAT_BASENAME "family_v16_"
|
||||
|
||||
|
||||
|
||||
/*-------------------------------------------------------------------------
|
||||
* Function: test_sec2
|
||||
@ -64,21 +70,17 @@ const char *FILENAME[] = {
|
||||
* Programmer: Raymond Lu
|
||||
* Tuesday, Sept 24, 2002
|
||||
*
|
||||
* Modifications:
|
||||
*
|
||||
* Raymond Lu
|
||||
* Wednesday, June 23, 2004
|
||||
* Added test for H5Fget_filesize.
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
static herr_t
|
||||
test_sec2(void)
|
||||
{
|
||||
hid_t file=(-1), fapl, access_fapl = -1;
|
||||
char filename[1024];
|
||||
int *fhandle=NULL;
|
||||
hsize_t file_size;
|
||||
hid_t file = -1;
|
||||
hid_t fapl = -1;
|
||||
hid_t access_fapl = -1;
|
||||
char filename[1024];
|
||||
int *fhandle = NULL;
|
||||
hsize_t file_size = 0;
|
||||
|
||||
TESTING("SEC2 file driver");
|
||||
|
||||
@ -88,47 +90,53 @@ test_sec2(void)
|
||||
TEST_ERROR;
|
||||
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
|
||||
|
||||
if((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
|
||||
if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Retrieve the access property list... */
|
||||
if ((access_fapl = H5Fget_access_plist(file)) < 0)
|
||||
if((access_fapl = H5Fget_access_plist(file)) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Check that the driver is correct */
|
||||
if(H5FD_SEC2 != H5Pget_driver(access_fapl))
|
||||
TEST_ERROR;
|
||||
|
||||
/* ...and close the property list */
|
||||
if (H5Pclose(access_fapl) < 0)
|
||||
if(H5Pclose(access_fapl) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Check file handle API */
|
||||
if(H5Fget_vfd_handle(file, H5P_DEFAULT, (void **)&fhandle) < 0)
|
||||
TEST_ERROR;
|
||||
if(*fhandle<0)
|
||||
if(*fhandle < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Check file size API */
|
||||
if(H5Fget_filesize(file, &file_size) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* There is no garantee the size of metadata in file is constant.
|
||||
/* There is no guarantee the size of metadata in file is constant.
|
||||
* Just try to check if it's reasonable. It's 2KB right now.
|
||||
*/
|
||||
if(file_size<1*KB || file_size>4*KB)
|
||||
if(file_size < 1 * KB || file_size > 4 * KB)
|
||||
TEST_ERROR;
|
||||
|
||||
if(H5Fclose(file) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
h5_cleanup(FILENAME, fapl);
|
||||
PASSED();
|
||||
return 0;
|
||||
|
||||
error:
|
||||
H5E_BEGIN_TRY {
|
||||
H5Pclose (fapl);
|
||||
H5Pclose(fapl);
|
||||
H5Fclose(file);
|
||||
} H5E_END_TRY;
|
||||
return -1;
|
||||
}
|
||||
|
||||
|
||||
|
||||
/*-------------------------------------------------------------------------
|
||||
* Function: test_direct
|
||||
@ -162,7 +170,7 @@ test_direct(void)
|
||||
int i, j, n;
|
||||
#endif /*H5_HAVE_DIRECT*/
|
||||
|
||||
TESTING("Direct I/O file driver");
|
||||
TESTING("DIRECT I/O file driver");
|
||||
|
||||
#ifndef H5_HAVE_DIRECT
|
||||
SKIPPED();
|
||||
@ -199,6 +207,10 @@ test_direct(void)
|
||||
if ((access_fapl = H5Fget_access_plist(file)) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Check that the driver is correct */
|
||||
if(H5FD_DIRECT != H5Pget_driver(access_fapl))
|
||||
TEST_ERROR;
|
||||
|
||||
/* ...and close the property list */
|
||||
if (H5Pclose(access_fapl) < 0)
|
||||
TEST_ERROR;
|
||||
@ -346,15 +358,6 @@ error:
|
||||
* Programmer: Raymond Lu
|
||||
* Tuesday, Sept 24, 2002
|
||||
*
|
||||
* Modifications:
|
||||
*
|
||||
* Raymond Lu
|
||||
* Wednesday, June 23, 2004
|
||||
* Added test for H5Fget_filesize.
|
||||
*
|
||||
* Raymond Lu, 2006-11-30
|
||||
* Enabled the driver to read an existing file depending on
|
||||
* the setting of the backing_store and file open flags.
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
static herr_t
|
||||
@ -384,6 +387,10 @@ test_core(void)
|
||||
if ((access_fapl = H5Fget_access_plist(file)) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Check that the driver is correct */
|
||||
if(H5FD_CORE != H5Pget_driver(access_fapl))
|
||||
TEST_ERROR;
|
||||
|
||||
/* ...and close the property list */
|
||||
if (H5Pclose(access_fapl) < 0)
|
||||
TEST_ERROR;
|
||||
@ -627,17 +634,6 @@ error:
|
||||
* Programmer: Raymond Lu
|
||||
* Tuesday, Sept 24, 2002
|
||||
*
|
||||
* Modifications:
|
||||
*
|
||||
* Raymond Lu
|
||||
* Wednesday, June 23, 2004
|
||||
* Added test for H5Fget_filesize.
|
||||
*
|
||||
* Raymond Lu
|
||||
* June 2, 2005
|
||||
* Added a function test_family_opens() to test different
|
||||
* wrong way to reopen family files.
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
static herr_t
|
||||
@ -696,6 +692,10 @@ test_family(void)
|
||||
if ((access_fapl = H5Fget_access_plist(file)) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Check that the driver is correct */
|
||||
if(H5FD_FAMILY != H5Pget_driver(access_fapl))
|
||||
TEST_ERROR;
|
||||
|
||||
/* ...and close the property list */
|
||||
if (H5Pclose(access_fapl) < 0)
|
||||
TEST_ERROR;
|
||||
@ -924,12 +924,6 @@ test_multi_opens(char *fname)
|
||||
* Programmer: Raymond Lu
|
||||
* Tuesday, Sept 24, 2002
|
||||
*
|
||||
* Modifications:
|
||||
*
|
||||
* Raymond Lu
|
||||
* Wednesday, June 23, 2004
|
||||
* Added test for H5Fget_filesize.
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
static herr_t
|
||||
@ -985,7 +979,7 @@ test_multi(void)
|
||||
|
||||
sprintf(sv[H5FD_MEM_GHEAP], "%%s-%c.h5", 'g');
|
||||
memb_name[H5FD_MEM_GHEAP] = sv[H5FD_MEM_GHEAP];
|
||||
memb_addr[H5FD_MEM_GHEAP] = HADDR_MAX*3/4;
|
||||
memb_addr[H5FD_MEM_GHEAP] = (HADDR_MAX/4)*3;
|
||||
|
||||
|
||||
if(H5Pset_fapl_multi(fapl, memb_map, memb_fapl, memb_name, memb_addr, TRUE) < 0)
|
||||
@ -1015,6 +1009,10 @@ test_multi(void)
|
||||
if ((access_fapl = H5Fget_access_plist(file)) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Check that the driver is correct */
|
||||
if(H5FD_MULTI != H5Pget_driver(access_fapl))
|
||||
TEST_ERROR;
|
||||
|
||||
/* ...and close the property list */
|
||||
if (H5Pclose(access_fapl) < 0)
|
||||
TEST_ERROR;
|
||||
@ -1123,14 +1121,266 @@ error:
|
||||
return -1;
|
||||
}
|
||||
|
||||
|
||||
/*-------------------------------------------------------------------------
|
||||
* Function: test_log
|
||||
*
|
||||
* Purpose: Tests the file handle interface for log driver
|
||||
*
|
||||
* Return: Success: 0
|
||||
* Failure: -1
|
||||
*
|
||||
* Programmer: Dana Robinson
|
||||
* Tuesday, March 22, 2011
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
static herr_t
|
||||
test_log(void)
|
||||
{
|
||||
hid_t file = -1;
|
||||
hid_t fapl = -1;
|
||||
hid_t access_fapl = -1;
|
||||
char filename[1024];
|
||||
int *fhandle = NULL;
|
||||
hsize_t file_size = 0;
|
||||
unsigned int flags = H5FD_LOG_ALL;
|
||||
size_t buf_size = 0;
|
||||
|
||||
TESTING("LOG file driver");
|
||||
|
||||
/* Set property list and file name for log driver. */
|
||||
fapl = h5_fileaccess();
|
||||
if(H5Pset_fapl_log(fapl, LOG_FILENAME, 0, buf_size) < 0)
|
||||
TEST_ERROR;
|
||||
h5_fixname(FILENAME[6], fapl, filename, sizeof filename);
|
||||
|
||||
/* Create the test file */
|
||||
if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Retrieve the access property list... */
|
||||
if((access_fapl = H5Fget_access_plist(file)) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Check that the driver is correct */
|
||||
if(H5FD_LOG != H5Pget_driver(access_fapl))
|
||||
TEST_ERROR;
|
||||
|
||||
/* ...and close the property list */
|
||||
if(H5Pclose(access_fapl) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Check file handle API */
|
||||
if(H5Fget_vfd_handle(file, H5P_DEFAULT, (void **)&fhandle) < 0)
|
||||
TEST_ERROR;
|
||||
if(*fhandle < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Check file size API */
|
||||
if(H5Fget_filesize(file, &file_size) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* There is no guarantee the size of metadata in file is constant.
|
||||
* Just try to check if it's reasonable. It's 2KB right now.
|
||||
*/
|
||||
if(file_size < 1 * KB || file_size > 4 * KB)
|
||||
TEST_ERROR;
|
||||
|
||||
if(H5Fclose(file) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
h5_cleanup(FILENAME, fapl);
|
||||
PASSED();
|
||||
return 0;
|
||||
|
||||
error:
|
||||
H5E_BEGIN_TRY {
|
||||
H5Pclose(fapl);
|
||||
H5Fclose(file);
|
||||
} H5E_END_TRY;
|
||||
return -1;
|
||||
}
|
||||
|
||||
|
||||
/*-------------------------------------------------------------------------
|
||||
* Function: test_stdio
|
||||
*
|
||||
* Purpose: Tests the file handle interface for STDIO driver
|
||||
*
|
||||
* Return: Success: 0
|
||||
* Failure: -1
|
||||
*
|
||||
* Programmer: Dana Robinson
|
||||
* Tuesday, March 22, 2011
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
static herr_t
|
||||
test_stdio(void)
|
||||
{
|
||||
hid_t file = -1;
|
||||
hid_t fapl = -1;
|
||||
hid_t access_fapl = -1;
|
||||
char filename[1024];
|
||||
int *fhandle = NULL;
|
||||
hsize_t file_size = 0;
|
||||
|
||||
TESTING("STDIO file driver");
|
||||
|
||||
/* Set property list and file name for STDIO driver. */
|
||||
fapl = h5_fileaccess();
|
||||
if(H5Pset_fapl_stdio(fapl) < 0)
|
||||
TEST_ERROR;
|
||||
h5_fixname(FILENAME[7], fapl, filename, sizeof filename);
|
||||
|
||||
if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Retrieve the access property list... */
|
||||
if((access_fapl = H5Fget_access_plist(file)) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Check that the driver is correct */
|
||||
if(H5FD_STDIO != H5Pget_driver(access_fapl))
|
||||
TEST_ERROR;
|
||||
|
||||
/* ...and close the property list */
|
||||
if(H5Pclose(access_fapl) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Check file handle API */
|
||||
if(H5Fget_vfd_handle(file, H5P_DEFAULT, (void **)&fhandle) < 0)
|
||||
TEST_ERROR;
|
||||
if(*fhandle < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Check file size API */
|
||||
if(H5Fget_filesize(file, &file_size) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* There is no guarantee the size of metadata in file is constant.
|
||||
* Just try to check if it's reasonable. It's 2KB right now.
|
||||
*/
|
||||
if(file_size < 1 * KB || file_size > 4 * KB)
|
||||
TEST_ERROR;
|
||||
|
||||
if(H5Fclose(file) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
h5_cleanup(FILENAME, fapl);
|
||||
PASSED();
|
||||
return 0;
|
||||
|
||||
error:
|
||||
H5E_BEGIN_TRY {
|
||||
H5Pclose(fapl);
|
||||
H5Fclose(file);
|
||||
} H5E_END_TRY;
|
||||
return -1;
|
||||
}
|
||||
|
||||
|
||||
|
||||
/*-------------------------------------------------------------------------
|
||||
* Function: test_windows
|
||||
*
|
||||
* Purpose: Tests the file handle interface for WINDOWS driver
|
||||
*
|
||||
* Return: Success: 0
|
||||
* Failure: -1
|
||||
*
|
||||
* Programmer: Dana Robinson
|
||||
* Tuesday, March 22, 2011
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
static herr_t
|
||||
test_windows(void)
|
||||
{
|
||||
#ifdef _WIN32
|
||||
|
||||
hid_t file = -1;
|
||||
hid_t fapl = -1;
|
||||
hid_t access_fapl = -1;
|
||||
char filename[1024];
|
||||
int *fhandle = NULL;
|
||||
hsize_t file_size = 0;
|
||||
|
||||
#endif /*_WIN32*/
|
||||
|
||||
TESTING("WINDOWS file driver");
|
||||
|
||||
#ifndef _WIN32
|
||||
|
||||
SKIPPED();
|
||||
return 0;
|
||||
|
||||
#else /*_WIN32*/
|
||||
|
||||
/* Set property list and file name for WINDOWS driver. */
|
||||
fapl = h5_fileaccess();
|
||||
if(H5Pset_fapl_windows(fapl) < 0)
|
||||
TEST_ERROR;
|
||||
h5_fixname(FILENAME[8], fapl, filename, sizeof filename);
|
||||
|
||||
if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Retrieve the access property list... */
|
||||
if((access_fapl = H5Fget_access_plist(file)) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Check that the driver is correct */
|
||||
if(H5FD_WINDOWS!= H5Pget_driver(access_fapl))
|
||||
TEST_ERROR;
|
||||
|
||||
/* ...and close the property list */
|
||||
if(H5Pclose(access_fapl) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Check file handle API */
|
||||
if(H5Fget_vfd_handle(file, H5P_DEFAULT, (void **)&fhandle) < 0)
|
||||
TEST_ERROR;
|
||||
if(*fhandle < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* Check file size API */
|
||||
if(H5Fget_filesize(file, &file_size) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
/* There is no guarantee the size of metadata in file is constant.
|
||||
* Just try to check if it's reasonable. It's 2KB right now.
|
||||
*/
|
||||
if(file_size < 1 * KB || file_size > 4 * KB)
|
||||
TEST_ERROR;
|
||||
|
||||
if(H5Fclose(file) < 0)
|
||||
TEST_ERROR;
|
||||
|
||||
h5_cleanup(FILENAME, fapl);
|
||||
PASSED();
|
||||
return 0;
|
||||
|
||||
error:
|
||||
H5E_BEGIN_TRY {
|
||||
H5Pclose(fapl);
|
||||
H5Fclose(file);
|
||||
} H5E_END_TRY;
|
||||
return -1;
|
||||
|
||||
#endif /*_WIN32*/
|
||||
}
|
||||
|
||||
|
||||
|
||||
/*-------------------------------------------------------------------------
|
||||
* Function: main
|
||||
*
|
||||
* Purpose: Tests the basic features of Virtual File Drivers
|
||||
*
|
||||
* Return: Success: exit(0)
|
||||
* Failure: exit(1)
|
||||
* Return: Success: 0
|
||||
* Failure: 1
|
||||
*
|
||||
* Programmer: Raymond Lu
|
||||
* Tuesday, Sept 24, 2002
|
||||
@ -1144,12 +1394,17 @@ main(void)
|
||||
|
||||
h5_reset();
|
||||
|
||||
nerrors += test_sec2() < 0 ? 1 : 0;
|
||||
nerrors += test_core() < 0 ? 1 : 0;
|
||||
nerrors += test_family() < 0 ? 1 : 0;
|
||||
nerrors += test_family_compat() < 0 ? 1 : 0;
|
||||
nerrors += test_multi() < 0 ? 1 : 0;
|
||||
nerrors += test_direct() < 0 ? 1 : 0;
|
||||
printf("Testing basic Virtual File Driver functionality.\n");
|
||||
|
||||
nerrors += test_sec2() < 0 ? 1 : 0;
|
||||
nerrors += test_core() < 0 ? 1 : 0;
|
||||
nerrors += test_family() < 0 ? 1 : 0;
|
||||
nerrors += test_family_compat() < 0 ? 1 : 0;
|
||||
nerrors += test_multi() < 0 ? 1 : 0;
|
||||
nerrors += test_direct() < 0 ? 1 : 0;
|
||||
nerrors += test_log() < 0 ? 1 : 0;
|
||||
nerrors += test_stdio() < 0 ? 1 : 0;
|
||||
nerrors += test_windows() < 0 ? 1 : 0;
|
||||
|
||||
if(nerrors) {
|
||||
printf("***** %d Virtual File Driver TEST%s FAILED! *****\n",
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user