summaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
authorRaymond Lu <songyulu@hdfgroup.org>2003-07-22 01:32:27 (GMT)
committerRaymond Lu <songyulu@hdfgroup.org>2003-07-22 01:32:27 (GMT)
commitb06dd8c8246c92c600352d5b7bd1c4a5efc2e560 (patch)
tree8b8c6a077387a54ca112a8d59bb1c298d5972db2 /test
parent032396d4828a83362d8a6b3a72af0038689a0ff4 (diff)
downloadhdf5-b06dd8c8246c92c600352d5b7bd1c4a5efc2e560.zip
hdf5-b06dd8c8246c92c600352d5b7bd1c4a5efc2e560.tar.gz
hdf5-b06dd8c8246c92c600352d5b7bd1c4a5efc2e560.tar.bz2
[svn-r7245] *** empty log message ***
Diffstat (limited to 'test')
-rw-r--r--test/errors.c193
1 files changed, 87 insertions, 106 deletions
diff --git a/test/errors.c b/test/errors.c
index 975a3ec..926af3e 100644
--- a/test/errors.c
+++ b/test/errors.c
@@ -41,9 +41,11 @@ hid_t ERR_MAJ_API;
hid_t ERR_MIN_SUBROUTINE;
hid_t ERR_MIN_ERRSTACK;
hid_t ERR_MIN_CREATE;
+hid_t ERR_MIN_WRITE;
hid_t ERR_MIN_GETNUM;
#define DSET_NAME "a_dataset"
+#define FAKE_ID 0
#define ERR_CLS_NAME "Error Test"
#define PROG_NAME "Error Program"
@@ -55,6 +57,7 @@ hid_t ERR_MIN_GETNUM;
#define ERR_MIN_SUBROUTINE_MSG "Error in subroutine"
#define ERR_MIN_ERRSTACK_MSG "Error in error stack"
#define ERR_MIN_CREATE_MSG "Error in H5Dcreate"
+#define ERR_MIN_WRITE_MSG "Error in H5Dwrite"
#define ERR_MIN_GETNUM_MSG "Error in H5Eget_num"
#define MSG_SIZE 64
@@ -88,96 +91,68 @@ static herr_t
test_error(hid_t file)
{
hid_t dataset, space;
- hid_t dtype, native_type;
- int i, j, n;
+ hid_t estack_id;
hsize_t dims[2];
- void *tmp;
const char *FUNC_test_error="test_error";
+ H5E_auto_t old_func;
+ void *old_data;
- TESTING("error API based on atomic datatype");
-
- /* Initialize the dataset */
- for (i = n = 0; i < DIM0; i++) {
- for (j = 0; j < DIM1; j++) {
- ipoints2[i][j] = n++;
- }
- }
+ TESTING("error API based on data I/O");
/* Create the data space */
dims[0] = DIM0;
dims[1] = DIM1;
if ((space = H5Screate_simple(2, dims, NULL))<0) TEST_ERROR;
- /*------------------- Test data values ------------------------*/
+ /* Test H5E_BEGIN_TRY */
+ H5E_BEGIN_TRY {
+ dataset = H5Dcreate(FAKE_ID, DSET_NAME, H5T_STD_I32BE, space, H5P_DEFAULT);
+ } H5E_END_TRY;
+
/* Create the dataset */
- /* Make it H5Dcreate fail */
- /*file = 0;*/
if ((dataset = H5Dcreate(file, DSET_NAME, H5T_STD_I32BE, space,
H5P_DEFAULT))<0) {
-#ifndef NEW_ERR
H5Epush_new(H5E_DEFAULT, __FILE__, FUNC_test_error, __LINE__, ERR_MAJ_IO, ERR_MIN_CREATE,
"H5Dcreate failed");
-#endif /* NEW_ERR */
goto error;
- /*TEST_ERROR;*/
}
- /* Write the data to the dataset */
- if (H5Dwrite(dataset, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, ipoints2)<0)
+ /* Test enabling and disabling default printing */
+ if (H5Eget_auto_new(H5E_DEFAULT, &old_func, &old_data)<0)
+ TEST_ERROR;
+ if (old_data != stderr)
+ TEST_ERROR;
+ if (old_func != H5Eprint_new)
TEST_ERROR;
- /* Close dataset */
- if(H5Dclose(dataset)<0) TEST_ERROR;
-
- /* Open dataset again to check H5Tget_native_type */
- if((dataset=H5Dopen(file, DSET_NAME))<0) TEST_ERROR;
-
- if((dtype=H5Dget_type(dataset))<0) TEST_ERROR;
-
- if((native_type=H5Tget_native_type(dtype, H5T_DIR_DEFAULT))<0)
+ if(H5Eset_auto_new(H5E_DEFAULT, NULL, NULL)<0)
TEST_ERROR;
- /* Verify the datatype retrieved and converted */
- if(H5Tget_order(native_type) != H5Tget_order(H5T_NATIVE_INT))
- TEST_ERROR;
- if(H5Tget_size(native_type) < H5Tget_size(H5T_STD_I32BE))
- TEST_ERROR;
- if(H5T_INTEGER!=H5Tget_class(native_type))
- TEST_ERROR;
+ /* Make H5Dwrite fail, verify default print is disabled */
+ /*if (H5Dwrite(FAKE_ID, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, ipoints2)>=0) {
+ H5Epush_new(H5E_DEFAULT, __FILE__, FUNC_test_error, __LINE__, ERR_MAJ_IO, ERR_MIN_WRITE,
+ "H5Dwrite shouldn't succeed");
+ goto error;
+ }*/
- /* Read the dataset back. The temporary buffer is for special platforms
- * like Cray. */
- tmp = malloc((size_t)(DIM0*DIM1*H5Tget_size(native_type)));
-
- if (H5Dread(dataset, native_type, H5S_ALL, H5S_ALL, H5P_DEFAULT, tmp)<0)
- TEST_ERROR;
-
- /* Copy data from temporary buffer to destination buffer */
- memcpy(icheck2, tmp, (size_t)(DIM0*DIM1*H5Tget_size(native_type)));
- free(tmp);
-
- /* Convert to the integer type */
- if(H5Tconvert(native_type, H5T_NATIVE_INT, (hsize_t)(DIM0*DIM1), icheck2, NULL, H5P_DEFAULT)<0)
+ if(H5Eset_auto_new(H5E_DEFAULT, old_func, old_data)<0)
TEST_ERROR;
-
- /* Check that the values read are the same as the values written */
- for (i = 0; i < DIM0; i++) {
- for (j = 0; j < DIM1; j++) {
- if (ipoints2[i][j] != icheck2[i][j]) {
- H5_FAILED();
- printf(" Read different values than written.\n");
- printf(" At index %d,%d\n", i, j);
- TEST_ERROR ;
- }
- }
+
+ /* Test saving and restoring the current error stack */
+ if (H5Dwrite(FAKE_ID, H5T_NATIVE_INT, H5S_ALL, H5S_ALL, H5P_DEFAULT, ipoints2)<0) {
+ H5Epush_new(H5E_DEFAULT, __FILE__, FUNC_test_error, __LINE__, ERR_MAJ_IO, ERR_MIN_WRITE,
+ "H5Dwrite failed as supposed to");
+ estack_id = H5Eget_current_stack();
+ H5Dclose(dataset);
+ H5Sclose(space);
+ H5Eset_current_stack(estack_id);
+ goto error;
}
+ /* In case program comes to this point, close dataset */
if(H5Dclose(dataset)<0) TEST_ERROR;
- if(H5Tclose(dtype)<0) TEST_ERROR;
- if(H5Sclose(space)<0) TEST_ERROR;
- PASSED();
- return 0;
+ TEST_ERROR;
error:
return -1;
@@ -201,7 +176,6 @@ test_error(hid_t file)
*
*-------------------------------------------------------------------------
*/
-#ifndef NEW_ERR
static herr_t
init_error(void)
{
@@ -234,6 +208,8 @@ init_error(void)
TEST_ERROR;
if((ERR_MIN_CREATE = H5Ecreate_msg(ERR_CLS, H5E_MINOR_new, ERR_MIN_CREATE_MSG))<0)
TEST_ERROR;
+ if((ERR_MIN_WRITE = H5Ecreate_msg(ERR_CLS, H5E_MINOR_new, ERR_MIN_WRITE_MSG))<0)
+ TEST_ERROR;
if((ERR_MIN_GETNUM = H5Ecreate_msg(ERR_CLS, H5E_MINOR_new, ERR_MIN_GETNUM_MSG))<0)
TEST_ERROR;
@@ -248,7 +224,6 @@ init_error(void)
free(msg);
free(msg_type);
- PASSED();
return 0;
error:
@@ -287,23 +262,18 @@ error_stack(void)
if((ERR_STACK = H5Eget_current_stack())<0)
TEST_ERROR;
- /* Make it push error */
- if((err_num = H5Eget_num(ERR_STACK))<0) {
+ /* Make it push error, force this function to fail */
+ if((err_num = H5Eget_num(ERR_STACK))==0) {
H5Epush_new(ERR_STACK, __FILE__, FUNC_error_stack, __LINE__, ERR_MAJ_API, ERR_MIN_GETNUM,
"Get number test failed, returned %d", err_num);
goto error;
- /*TEST_ERROR;*/
}
- if(err_num)
- TEST_ERROR;
-
- if(H5Eclear_new(ERR_STACK)<0)
- TEST_ERROR;
+
+ /* In case program falls through here, close the stack and let it fail. */
if(H5Eclose_stack(ERR_STACK)<0)
TEST_ERROR;
- PASSED();
- return 0;
+ return -1;
error:
return -1;
@@ -332,13 +302,14 @@ dump_error(hid_t estack)
{
/* Print errors in library default way */
fprintf(stderr, "********* Print error stack in HDF5 default way *********\n");
- H5Eprint_new(estack, stderr);
+ if(H5Eprint_new(estack, stderr)<0)
+ TEST_ERROR;
/* Customized way to print errors */
fprintf(stderr, "\n********* Print error stack in customized way *********\n");
- H5Ewalk_new(estack, H5E_WALK_UPWARD, custom_print_cb, stderr);
+ if(H5Ewalk_new(estack, H5E_WALK_UPWARD, custom_print_cb, stderr)<0)
+ TEST_ERROR;
- PASSED();
return 0;
error:
@@ -372,9 +343,14 @@ custom_print_cb(int n, H5E_error_t_new *err_desc, void* client_data)
const int indent = 4;
/* Get descriptions for the major and minor error numbers */
- H5Eget_class_name(err_desc->cls_id, cls, MSG_SIZE);
- H5Eget_msg(err_desc->maj_id, NULL, maj, MSG_SIZE);
- H5Eget_msg(err_desc->maj_id, NULL, min, MSG_SIZE);
+ if(H5Eget_class_name(err_desc->cls_id, cls, MSG_SIZE)<0)
+ TEST_ERROR;
+
+ if(H5Eget_msg(err_desc->maj_id, NULL, maj, MSG_SIZE)<0)
+ TEST_ERROR;
+
+ if(H5Eget_msg(err_desc->min_id, NULL, min, MSG_SIZE)<0)
+ TEST_ERROR;
fprintf (stream, "%*serror #%03d: %s in %s(): line %u\n",
indent, "", n, err_desc->file_name,
@@ -383,7 +359,6 @@ custom_print_cb(int n, H5E_error_t_new *err_desc, void* client_data)
fprintf (stream, "%*smajor: %s\n", indent*2, "", maj);
fprintf (stream, "%*sminor: %s\n", indent*2, "", min);
- PASSED();
return 0;
error:
@@ -411,24 +386,24 @@ custom_print_cb(int n, H5E_error_t_new *err_desc, void* client_data)
static herr_t
close_error(void)
{
- /*
+ /* Close major errors, let H5Eunregister_class close minor errors */
if(H5Eclose_msg(ERR_MAJ_TEST)<0)
TEST_ERROR ;
- if(H5Eclose_msg(ERR_MIN_SUBROUTINE)<0)
- TEST_ERROR ;
- */
+ if(H5Eclose_msg(ERR_MAJ_IO)<0)
+ TEST_ERROR ;
+
+ if(H5Eclose_msg(ERR_MAJ_API)<0)
+ TEST_ERROR ;
+
if(H5Eunregister_class(ERR_CLS)<0)
TEST_ERROR ;
- PASSED();
return 0;
error:
return -1;
}
-
-#endif /* NEW_ERR */
/*-------------------------------------------------------------------------
@@ -447,52 +422,58 @@ int
main(void)
{
hid_t file, fapl;
+ hid_t estack_id;
char filename[1024];
const char *FUNC_main="main";
- h5_reset();
-#ifndef NEW_ERR
+ /*h5_reset();*/
+
+ /* Initialize errors */
if(init_error()<0)
TEST_ERROR ;
-#endif /* NEW_ERR */
fapl = h5_fileaccess();
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0)
TEST_ERROR ;
-
-#ifndef NEW_ERR
+
+ /* Test error stack */
if(error_stack()<0) {
+ /* Push an error onto error stack */
H5Epush_new(ERR_STACK, __FILE__, FUNC_main, __LINE__, ERR_MAJ_TEST, ERR_MIN_ERRSTACK,
- "Error stack test failed");
+ "Error stack test failed");
+
+ /* Delete an error from the top of error stack */
H5Epop(ERR_STACK, 1);
+
+ /* Print out the errors on stack */
dump_error(ERR_STACK);
- /*H5Eprint_new(ERR_STACK, stderr);*/
+
+ /* Empty error stack */
+ H5Eclear_new(ERR_STACK);
+
+ /* Close error stack */
H5Eclose_stack(ERR_STACK);
- TEST_ERROR;
}
-#endif /* NEW_ERR */
+ /* Test error API */
if(test_error(file)<0) {
-#ifndef NEW_ERR
H5Epush_new(H5E_DEFAULT, __FILE__, FUNC_main, __LINE__, ERR_MAJ_TEST, ERR_MIN_SUBROUTINE,
"Error test failed, %s", "it's wrong");
- H5Eprint_new(H5E_DEFAULT, stderr);
-#endif /* NEW_ERR */
- goto error;
- /*TEST_ERROR;*/
+ estack_id = H5Eget_current_stack();
+ H5Eprint_new(estack_id, stderr);
+ H5Eclose_stack(estack_id);
}
if (H5Fclose(file)<0) TEST_ERROR ;
h5_cleanup(FILENAME, fapl);
-#ifndef NEW_ERR
+ /* Close error information */
if(close_error()<0)
TEST_ERROR ;
-#endif /* NEW_ERR */
+
printf("All error API test based on native datatype test passed.\n");
-
return 0;
error: