From 747e7945f9b208664332bb0b13f2caac5a679703 Mon Sep 17 00:00:00 2001 From: Mike McGreevy Date: Wed, 16 Jun 2010 10:19:57 -0500 Subject: [svn-r19009] Purpose: Fix some tagging issues. Description: - change H5Gcreate to H5Gcreate2 in the cache_tagging.c test file to work properly with 1.6 API default mapping turned on. - Added FUNC_ENTER/LEAVE_*TAG macros to the H5G_stab_valid function. Tested: gandalf, jam, amani (w/production mode, 1.6 API mapping) --- src/H5Gstab.c | 4 ++-- test/cache_tagging.c | 28 ++++++++++++++-------------- 2 files changed, 16 insertions(+), 16 deletions(-) diff --git a/src/H5Gstab.c b/src/H5Gstab.c index 31ee008..0566725 100644 --- a/src/H5Gstab.c +++ b/src/H5Gstab.c @@ -1005,7 +1005,7 @@ H5G_stab_valid(H5O_loc_t *grp_oloc, hid_t dxpl_id, H5O_stab_t *alt_stab) hbool_t changed = FALSE; /* Whether stab has been modified */ herr_t ret_value = SUCCEED; /* Return value */ - FUNC_ENTER_NOAPI(H5G_stab_valid, FAIL) + FUNC_ENTER_NOAPI_TAG(H5G_stab_valid, dxpl_id, grp_oloc->addr, FAIL) /* Read the symbol table message */ if(NULL == H5O_msg_read(grp_oloc, H5O_STAB_ID, &stab, dxpl_id)) @@ -1051,7 +1051,7 @@ done: if(heap && H5HL_unprotect(heap) < 0) HDONE_ERROR(H5E_SYM, H5E_PROTECT, FAIL, "unable to unprotect symbol table heap") - FUNC_LEAVE_NOAPI(ret_value) + FUNC_LEAVE_NOAPI_TAG(ret_value, FAIL) } /* end H5G_stab_valid */ #endif /* H5_STRICT_FORMAT_CHECKS */ diff --git a/test/cache_tagging.c b/test/cache_tagging.c index 4ec256e..0aa04ab 100644 --- a/test/cache_tagging.c +++ b/test/cache_tagging.c @@ -782,7 +782,7 @@ check_group_creation_tags(hid_t fcpl, int type) /* TEST: Create a Group */ /* ==================== */ - if ( (gid = H5Gcreate(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; + if ( (gid = H5Gcreate2(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; /* =================================== */ /* Verification of Metadata Tag Values */ @@ -894,7 +894,7 @@ check_multi_group_creation_tags(hid_t fcpl, int type) for (i = 0; i < MULTIGROUPS; i++) { sprintf(gname, "%d", i); - if ( (gid = H5Gcreate(fid, gname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; + if ( (gid = H5Gcreate2(fid, gname, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; if ( H5Gclose(gid) < 0 ) TEST_ERROR; } /* end for */ @@ -1281,7 +1281,7 @@ check_group_open_tags(hid_t fcpl, int type) } /* end if */ /* Create group */ - if ( (gid = H5Gcreate(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; + if ( (gid = H5Gcreate2(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; /* Retrieve group tag */ if ( get_new_object_header_tag(fid, &g_tag) < 0 ) TEST_ERROR; @@ -1397,7 +1397,7 @@ check_attribute_creation_tags(hid_t fcpl, int type) } /* end if */ /* Create group */ - if ( (gid = H5Gcreate(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; + if ( (gid = H5Gcreate2(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; /* Retrieve group tag */ if ( get_new_object_header_tag(fid, &g_tag) < 0 ) TEST_ERROR; @@ -1537,7 +1537,7 @@ check_attribute_open_tags(hid_t fcpl, int type) } /* end if */ /* Create group */ - if ( (gid = H5Gcreate(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; + if ( (gid = H5Gcreate2(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; /* Retrieve group tag */ if ( get_new_object_header_tag(fid, &g_tag) < 0 ) TEST_ERROR; @@ -1681,7 +1681,7 @@ check_attribute_rename_tags(hid_t fcpl, int type) } /* end if */ /* Create group */ - if ( (gid = H5Gcreate(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; + if ( (gid = H5Gcreate2(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; /* Retrieve group tag */ if ( get_new_object_header_tag(fid, &g_tag) < 0 ) TEST_ERROR; @@ -1847,7 +1847,7 @@ check_attribute_delete_tags(hid_t fcpl, int type) } /* end if */ /* Create group */ - if ( (gid = H5Gcreate(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; + if ( (gid = H5Gcreate2(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; /* Retrieve group tag */ if ( get_new_object_header_tag(fid, &g_tag) < 0 ) TEST_ERROR; @@ -2525,7 +2525,7 @@ check_attribute_write_tags(hid_t fcpl, int type) } /* end if */ /* Create group */ - if ( (gid = H5Gcreate(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; + if ( (gid = H5Gcreate2(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; /* Retrieve group tag */ if ( get_new_object_header_tag(fid, &g_tag) < 0 ) TEST_ERROR; @@ -3089,7 +3089,7 @@ check_object_info_tags(hid_t fcpl, int type) } /* end if */ /* Create group */ - if ( (gid = H5Gcreate(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; + if ( (gid = H5Gcreate2(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; /* Retrieve group tag */ if ( get_new_object_header_tag(fid, &g_tag) < 0 ) TEST_ERROR; @@ -3203,7 +3203,7 @@ check_object_copy_tags(hid_t fcpl, int type) } /* end if */ /* Create group */ - if ( (gid = H5Gcreate(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; + if ( (gid = H5Gcreate2(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; /* Retrieve group tag */ if ( get_new_object_header_tag(fid, &g_tag) < 0 ) TEST_ERROR; @@ -3331,7 +3331,7 @@ check_link_removal_tags(hid_t fcpl, int type) } /* end if */ /* Create group */ - if ( (gid = H5Gcreate(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; + if ( (gid = H5Gcreate2(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; /* Retrieve group tag */ if ( get_new_object_header_tag(fid, &g_tag) < 0 ) TEST_ERROR; @@ -3490,7 +3490,7 @@ check_link_getname_tags(hid_t fcpl, int type) } /* end if */ /* Create group */ - if ( (gid = H5Gcreate(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; + if ( (gid = H5Gcreate2(fid, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; /* Retrieve group tag */ if ( get_new_object_header_tag(fid, &g_tag) < 0 ) TEST_ERROR; @@ -3640,7 +3640,7 @@ check_external_link_creation_tags(hid_t fcpl, int type) if ( (fid2 = H5Fcreate(FILENAME2, H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; /* Create group in second file */ - if ( (gid = H5Gcreate(fid2, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; + if ( (gid = H5Gcreate2(fid2, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; /* Close out second file */ if ( (H5Gclose(gid)) < 0 ) TEST_ERROR; @@ -3744,7 +3744,7 @@ check_external_link_open_tags(hid_t fcpl, int type) if ( (fid2 = H5Fcreate(FILENAME2, H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; /* Create group in second file */ - if ( (gid = H5Gcreate(fid2, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; + if ( (gid = H5Gcreate2(fid2, GROUPNAME, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT)) < 0 ) TEST_ERROR; /* Close out second file */ if ( (H5Gclose(gid)) < 0 ) TEST_ERROR; -- cgit v0.12