[svn-r14183] Description:

	Move H5Aget_num_attrs() into deprecated routines section, replacing all
internal usage with H5Oget_info().

Tested on:
        FreeBSD/32 6.2 (duty) in debug mode
        FreeBSD/64 6.2 (liberty) w/C++ & FORTRAN, in debug mode
        Linux/32 2.6 (kagiso) w/PGI compilers, w/C++ & FORTRAN, w/threadsafe,
                                in debug mode
        Linux/64-amd64 2.6 (smirom) w/default API=1.6.x, w/C++ & FORTRAN,
                                in production mode
        Linux/64-ia64 2.6 (cobalt) w/Intel compilers, w/C++ & FORTRAN,
                                in production mode
        Solaris/32 2.10 (linew) w/deprecated symbols disabled, w/C++ & FORTRAN,
                                w/szip filter, in production mode
        Mac OS X/32 10.4.10 (amazon) in debug mode

12 files changed, 342 insertions, 308 deletions

diff --git a/c++/src/H5Object.cpp b/c++/src/H5Object.cpp
index 494ee2c..b3b2982 100644
--- a/c++/src/H5Object.cpp
+++ b/c++/src/H5Object.cpp
@@ -235,14 +235,12 @@ int H5Object::iterateAttrs( attr_operator_t user_op, unsigned *_idx, void *op_da
 //--------------------------------------------------------------------------
 int H5Object::getNumAttrs() const
 {
-   int num_attrs = H5Aget_num_attrs( id );
-   if( num_attrs < 0 )
-   {
-      throw AttributeIException(inMemFunc("getNumAttrs"),
-		"H5Aget_num_attrs failed - returned negative number of attributes");
-   }
+   H5O_info_t oinfo;    /* Object info */
+
+   if(H5Oget_info(id, ".", &oinfo, H5P_DEFAULT) < 0)
+      throw AttributeIException(inMemFunc("getNumAttrs"), "H5Oget_info failed");
    else
-      return( num_attrs );
+      return( (int)oinfo.num_attrs );
 }
 
 //--------------------------------------------------------------------------
diff --git a/examples/h5_attribute.c b/examples/h5_attribute.c
index 4f55998..d86bbcd 100644
--- a/examples/h5_attribute.c
+++ b/examples/h5_attribute.c
@@ -62,7 +62,8 @@ main (void)
    float matrix[ADIM1][ADIM2]; /* Attribute data */
 
    herr_t  ret;                /* Return value */
-   unsigned i,j;                /* Counters */
+   H5O_info_t oinfo;           /* Object info */
+   unsigned i, j;              /* Counters */
    char    string_out[80];     /* Buffer to read string attribute back */
    int     point_out;          /* Buffer to read scalar attribute back */
    int     num_attr;           /* Number of attributes */
@@ -191,8 +192,8 @@ main (void)
    /*
     * Find string attribute by iterating through all attributes
     */
-   num_attr = H5Aget_num_attrs(dataset);
-   for(i=0; i < num_attr; i++) {
+   ret = H5Oget_info(dataset, ".", &oinfo, H5P_DEFAULT);
+   for(i = 0; i < (unsigned)oinfo.num_attrs; i++) {
       attr  = H5Aopen_idx(dataset, i);
       atype = H5Aget_type(attr);
       type_class = H5Tget_class(atype);
diff --git a/fortran/src/H5Af.c b/fortran/src/H5Af.c
index 6b49624..8253781 100644
--- a/fortran/src/H5Af.c
+++ b/fortran/src/H5Af.c
@@ -924,7 +924,7 @@ done:
 
 /*----------------------------------------------------------------------------
  * Name:        h5aget_num_attrs_c
- * Purpose:     Call H5Aget_num_attrs to determine number of
+ * Purpose:     Call H5Oget_info to determine number of
  *              attributes of an object
  * Inputs:      obj_id - object identifier
  *              attr_num - number of attributes
@@ -936,13 +936,17 @@ done:
 int_f
 nh5aget_num_attrs_c (hid_t_f *obj_id, int_f *attr_num)
 {
-    int_f ret_value=0;          /* Return value */
+    H5O_info_t oinfo;           /* Object info */
+    int_f ret_value = 0;        /* Return value */
 
-     /*
-      * Call H5Aget_num_attrs function.
-      */
-     if ((*attr_num = (int_f)H5Aget_num_attrs((hid_t)*obj_id)) < 0)
-         HGOTO_DONE(FAIL);
+    /*
+     * Call H5Oget_info function.
+     */
+    if(H5Oget_info((hid_t)*obj_id, ".", &oinfo, H5P_DEFAULT) < 0)
+        HGOTO_DONE(FAIL);
+
+    /* Set number of attributes */
+    *attr_num = (int_f)oinfo.num_attrs;
 
 done:
      return ret_value;
diff --git a/src/H5Adeprec.c b/src/H5Adeprec.c
index 9ca3d5a..65b876e 100644
--- a/src/H5Adeprec.c
+++ b/src/H5Adeprec.c
@@ -274,6 +274,7 @@ done:
     FUNC_LEAVE_API(ret_value)
 } /* H5Aopen_idx() */
 
+#ifndef H5_NO_DEPRECATED_SYMBOLS
 
 /*--------------------------------------------------------------------------
  NAME
@@ -334,7 +335,6 @@ done:
     FUNC_LEAVE_API(ret_value)
 } /* H5Aget_num_attrs() */
 
-#ifndef H5_NO_DEPRECATED_SYMBOLS
 
 /*-------------------------------------------------------------------------
  * Function:	H5Arename1
diff --git a/src/H5Apkg.h b/src/H5Apkg.h
index f72de64..049877e 100644
--- a/src/H5Apkg.h
+++ b/src/H5Apkg.h
@@ -267,8 +267,10 @@ H5_DLL herr_t H5O_attr_remove(const H5O_loc_t *loc, const char *name,
     hid_t dxpl_id);
 H5_DLL herr_t H5O_attr_remove_by_idx(const H5O_loc_t *loc, H5_index_t idx_type,
     H5_iter_order_t order, hsize_t n, hid_t dxpl_id);
-H5_DLL int H5O_attr_count(const H5O_loc_t *loc, hid_t dxpl_id);
 H5_DLL htri_t H5O_attr_exists(const H5O_loc_t *loc, const char *name, hid_t dxpl_id);
+#ifndef H5_NO_DEPRECATED_SYMBOLS
+H5_DLL int H5O_attr_count(const H5O_loc_t *loc, hid_t dxpl_id);
+#endif /* H5_NO_DEPRECATED_SYMBOLS */
 
 /* Testing functions */
 #ifdef H5A_TESTING
diff --git a/src/H5Apublic.h b/src/H5Apublic.h
index d20ad8f..76dec27 100644
--- a/src/H5Apublic.h
+++ b/src/H5Apublic.h
@@ -84,7 +84,6 @@ H5_DLL hid_t   H5Acreate(hid_t loc_id, const char *name, hid_t type_id,
     hid_t space_id, hid_t plist_id);
 H5_DLL hid_t   H5Aopen_name(hid_t loc_id, const char *name);
 H5_DLL hid_t   H5Aopen_idx(hid_t loc_id, unsigned idx);
-H5_DLL int     H5Aget_num_attrs(hid_t loc_id);
 
 /* Symbols defined for compatibility with previous versions of the HDF5 API.
  * 
@@ -103,6 +102,7 @@ typedef herr_t (*H5A_operator1_t)(hid_t location_id/*in*/,
 
 
 /* Function prototypes */
+H5_DLL int     H5Aget_num_attrs(hid_t loc_id);
 H5_DLL herr_t  H5Adelete1(hid_t loc_id, const char *name);
 H5_DLL herr_t  H5Arename1(hid_t loc_id, const char *old_name, const char *new_name);
 H5_DLL herr_t  H5Aiterate1(hid_t loc_id, unsigned *attr_num, H5A_operator1_t op,
diff --git a/src/H5Oattribute.c b/src/H5Oattribute.c
index 5050e5c..5c0a91a 100644
--- a/src/H5Oattribute.c
+++ b/src/H5Oattribute.c
@@ -1550,44 +1550,6 @@ H5O_attr_count_real(H5F_t *f, hid_t dxpl_id, H5O_t *oh)
 
 
 /*-------------------------------------------------------------------------
- * Function:	H5O_attr_count
- *
- * Purpose:	Determine the # of attributes on an object
- *
- * Return:	Non-negative on success/Negative on failure
- *
- * Programmer:	Quincey Koziol
- *		Monday, December 11, 2006
- *
- *-------------------------------------------------------------------------
- */
-int
-H5O_attr_count(const H5O_loc_t *loc, hid_t dxpl_id)
-{
-    H5O_t *oh = NULL;                   /* Pointer to actual object header */
-    int ret_value;                      /* Return value */
-
-    FUNC_ENTER_NOAPI_NOINIT(H5O_attr_count)
-
-    /* Check arguments */
-    HDassert(loc);
-
-    /* Protect the object header to iterate over */
-    if(NULL == (oh = (H5O_t *)H5AC_protect(loc->file, dxpl_id, H5AC_OHDR, loc->addr, NULL, NULL, H5AC_READ)))
-	HGOTO_ERROR(H5E_ATTR, H5E_CANTLOAD, FAIL, "unable to load object header")
-
-    /* Retrieve # of attributes on object */
-    ret_value = (int)H5O_attr_count_real(loc->file, dxpl_id, oh);
-
-done:
-    if(oh && H5AC_unprotect(loc->file, dxpl_id, H5AC_OHDR, loc->addr, oh, H5AC__NO_FLAGS_SET) < 0)
-        HDONE_ERROR(H5E_ATTR, H5E_PROTECT, FAIL, "unable to release object header")
-
-    FUNC_LEAVE_NOAPI(ret_value)
-} /* end H5O_attr_count */
-
-
-/*-------------------------------------------------------------------------
  * Function:	H5O_attr_exists_cb
  *
  * Purpose:	Object header iterator callback routine to check for an
@@ -1765,3 +1727,43 @@ done:
     FUNC_LEAVE_NOAPI(ret_value)
 }   /* H5O_attr_bh_info() */
 
+#ifndef H5_NO_DEPRECATED_SYMBOLS
+
+/*-------------------------------------------------------------------------
+ * Function:	H5O_attr_count
+ *
+ * Purpose:	Determine the # of attributes on an object
+ *
+ * Return:	Non-negative on success/Negative on failure
+ *
+ * Programmer:	Quincey Koziol
+ *		Monday, December 11, 2006
+ *
+ *-------------------------------------------------------------------------
+ */
+int
+H5O_attr_count(const H5O_loc_t *loc, hid_t dxpl_id)
+{
+    H5O_t *oh = NULL;                   /* Pointer to actual object header */
+    int ret_value;                      /* Return value */
+
+    FUNC_ENTER_NOAPI_NOINIT(H5O_attr_count)
+
+    /* Check arguments */
+    HDassert(loc);
+
+    /* Protect the object header to iterate over */
+    if(NULL == (oh = (H5O_t *)H5AC_protect(loc->file, dxpl_id, H5AC_OHDR, loc->addr, NULL, NULL, H5AC_READ)))
+	HGOTO_ERROR(H5E_ATTR, H5E_CANTLOAD, FAIL, "unable to load object header")
+
+    /* Retrieve # of attributes on object */
+    ret_value = (int)H5O_attr_count_real(loc->file, dxpl_id, oh);
+
+done:
+    if(oh && H5AC_unprotect(loc->file, dxpl_id, H5AC_OHDR, loc->addr, oh, H5AC__NO_FLAGS_SET) < 0)
+        HDONE_ERROR(H5E_ATTR, H5E_PROTECT, FAIL, "unable to release object header")
+
+    FUNC_LEAVE_NOAPI(ret_value)
+} /* end H5O_attr_count */
+#endif /* H5_NO_DEPRECATED_SYMBOLS */
+
diff --git a/test/objcopy.c b/test/objcopy.c
index f6d32d1..ff0e4bb 100755
--- a/test/objcopy.c
+++ b/test/objcopy.c
@@ -760,11 +760,8 @@ static int
 compare_std_attributes(hid_t oid, hid_t oid2, hid_t pid)
 {
     hid_t aid = -1, aid2 = -1;                  /* Attribute IDs */
-    int num_attrs;                              /* Number of attributes */
-    int num_attrs2;                             /* Number of attributes */
-    char attr_name[ATTR_NAME_LEN];              /* Attribute name */
+    H5O_info_t oinfo1, oinfo2;                  /* Object info */
     unsigned cpy_flags;                         /* Object copy flags */
-    unsigned i;                                 /* Local index variable */
 
     /* Retrieve the object copy flags from the property list, if it's non-DEFAULT */
     if(pid != H5P_DEFAULT) {
@@ -774,23 +771,26 @@ compare_std_attributes(hid_t oid, hid_t oid2, hid_t pid)
         cpy_flags = 0;
 
     /* Check the number of attributes on source dataset */
-    if((num_attrs = H5Aget_num_attrs(oid)) < 0) TEST_ERROR
+    if(H5Oget_info(oid, ".", &oinfo1, H5P_DEFAULT) < 0) TEST_ERROR
 
     /* Check the number of attributes on destination dataset */
-    if((num_attrs2 = H5Aget_num_attrs(oid2)) < 0) TEST_ERROR
+    if(H5Oget_info(oid2, ".", &oinfo2, H5P_DEFAULT) < 0) TEST_ERROR
 
     if(cpy_flags & H5O_COPY_WITHOUT_ATTR_FLAG) {
         /* Check that the destination has no attributes */
-        if(num_attrs2 != 0) TEST_ERROR
+        if(oinfo2.num_attrs != 0) TEST_ERROR
     } /* end if */
     else {
+        char attr_name[ATTR_NAME_LEN];  /* Attribute name */
+        unsigned i;             /* Local index variable */
+
         /* Compare the number of attributes */
-        if(num_attrs != num_attrs2) TEST_ERROR
+        if(oinfo1.num_attrs != oinfo1.num_attrs) TEST_ERROR
 
         /* Check the attributes are equal */
-        for(i = 0; i < (unsigned)num_attrs; i++) {
-            if ( (aid = H5Aopen_idx(oid, i) ) < 0 ) TEST_ERROR
-            if ( H5Aget_name(aid, ATTR_NAME_LEN, attr_name ) < 0) TEST_ERROR
+        for(i = 0; i < (unsigned)oinfo1.num_attrs; i++) {
+            if((aid = H5Aopen_idx(oid, i)) < 0) TEST_ERROR
+            if(H5Aget_name(aid, ATTR_NAME_LEN, attr_name) < 0) TEST_ERROR
 
             if((aid2 = H5Aopen_name(oid2, attr_name)) < 0) TEST_ERROR
 
diff --git a/test/tattr.c b/test/tattr.c
index 6800269..53f2c21 100644
--- a/test/tattr.c
+++ b/test/tattr.c
@@ -388,14 +388,15 @@ test_attr_basic_write(hid_t fapl)
 static void
 test_attr_basic_read(hid_t fapl)
 {
-    hid_t		fid1;		/* HDF5 File IDs		*/
-    hid_t		dataset;	/* Dataset ID			*/
-    hid_t		group;	    /* Group ID			    */
-    hid_t		attr;	    /* Attribute ID			*/
-    int       read_data1[ATTR1_DIM1]={0}; /* Buffer for reading 1st attribute */
-    int       read_data2[ATTR2_DIM1][ATTR2_DIM2]={{0}}; /* Buffer for reading 2nd attribute */
-    int         i,j;
-    herr_t		ret;		/* Generic return value		*/
+    hid_t	fid1;		/* HDF5 File IDs		*/
+    hid_t	dataset;	/* Dataset ID			*/
+    hid_t	group;	        /* Group ID			*/
+    hid_t	attr;	        /* Attribute ID			*/
+    H5O_info_t  oinfo;          /* Object info                  */
+    int         read_data1[ATTR1_DIM1] = {0}; /* Buffer for reading 1st attribute */
+    int         read_data2[ATTR2_DIM1][ATTR2_DIM2] = {{0}}; /* Buffer for reading 2nd attribute */
+    int         i, j;           /* Local index variables        */
+    herr_t	ret;		/* Generic return value		*/
 
     /* Output message about test being performed */
     MESSAGE(5, ("Testing Basic Attribute Functions\n"));
@@ -405,28 +406,29 @@ test_attr_basic_read(hid_t fapl)
     CHECK(fid1, FAIL, "H5Fopen");
 
     /* Open the dataset */
-    dataset=H5Dopen(fid1,DSET1_NAME);
+    dataset = H5Dopen(fid1, DSET1_NAME);
     CHECK(dataset, FAIL, "H5Dopen");
 
     /* Verify the correct number of attributes */
-    ret=H5Aget_num_attrs(dataset);
-    VERIFY(ret, 2, "H5Aget_num_attrs");
+    ret = H5Oget_info(dataset, ".", &oinfo, H5P_DEFAULT);
+    CHECK(ret, FAIL, "H5Oget_info");
+    VERIFY(oinfo.num_attrs, 2, "H5Oget_info");
 
     /* Open first attribute for the dataset */
-    attr=H5Aopen_name(dataset, ATTR_TMP_NAME);
+    attr = H5Aopen_name(dataset, ATTR_TMP_NAME);
     CHECK(attr, FAIL, "H5Aopen_name");
 
     /* Read attribute information */
-    ret=H5Aread(attr,H5T_NATIVE_INT,read_data1);
+    ret = H5Aread(attr, H5T_NATIVE_INT, read_data1);
     CHECK(ret, FAIL, "H5Aread");
 
     /* Verify values read in */
-    for(i=0; i<ATTR1_DIM1; i++)
-        if(attr_data1[i]!=read_data1[i])
-            TestErrPrintf("%d: attribute data different: attr_data1[%d]=%d, read_data1[%d]=%d\n",__LINE__,i,attr_data1[i],i,read_data1[i]);
+    for(i = 0; i < ATTR1_DIM1; i++)
+        if(attr_data1[i] != read_data1[i])
+            TestErrPrintf("%d: attribute data different: attr_data1[%d]=%d, read_data1[%d]=%d\n", __LINE__, i, attr_data1[i], i, read_data1[i]);
 
     /* Close attribute */
-    ret=H5Aclose(attr);
+    ret = H5Aclose(attr);
     CHECK(ret, FAIL, "H5Aclose");
 
     ret = H5Dclose(dataset);
@@ -437,25 +439,26 @@ test_attr_basic_read(hid_t fapl)
     CHECK(group, FAIL, "H5Gopen2");
 
     /* Verify the correct number of attributes */
-    ret=H5Aget_num_attrs(group);
-    VERIFY(ret, 1, "H5Aget_num_attrs");
+    ret = H5Oget_info(group, ".", &oinfo, H5P_DEFAULT);
+    CHECK(ret, FAIL, "H5Oget_info");
+    VERIFY(oinfo.num_attrs, 1, "H5Oget_info");
 
     /* Open the attribute for the group */
-    attr=H5Aopen_name(group,ATTR2_NAME);
+    attr = H5Aopen_name(group, ATTR2_NAME);
     CHECK(attr, FAIL, "H5Aopen_name");
 
     /* Read attribute information */
-    ret=H5Aread(attr,H5T_NATIVE_INT,read_data2);
+    ret = H5Aread(attr, H5T_NATIVE_INT, read_data2);
     CHECK(ret, FAIL, "H5Aread");
 
     /* Verify values read in */
-    for(i=0; i<ATTR2_DIM1; i++)
-        for(j=0; j<ATTR2_DIM2; j++)
-            if(attr_data2[i][j]!=read_data2[i][j])
-                TestErrPrintf("%d: attribute data different: attr_data2[%d][%d]=%d, read_data2[%d][%d]=%d\n",__LINE__, i,j,attr_data2[i][j],i,j,read_data1[i]);
+    for(i = 0; i < ATTR2_DIM1; i++)
+        for(j = 0; j < ATTR2_DIM2; j++)
+            if(attr_data2[i][j] != read_data2[i][j])
+                TestErrPrintf("%d: attribute data different: attr_data2[%d][%d]=%d, read_data2[%d][%d]=%d\n", __LINE__,  i, j, attr_data2[i][j], i, j, read_data1[i]);
 
     /* Close attribute */
-    ret=H5Aclose(attr);
+    ret = H5Aclose(attr);
     CHECK(ret, FAIL, "H5Aclose");
 
     /* Close group */
@@ -745,11 +748,11 @@ test_attr_compound_write(hid_t fapl)
 static void
 test_attr_compound_read(hid_t fapl)
 {
-    hid_t   fid1;		/* HDF5 File IDs		*/
-    hid_t   dataset;	/* Dataset ID			*/
+    hid_t   fid1;	/* HDF5 File ID		*/
+    hid_t   dataset;	/* Dataset ID		*/
     hid_t   space;      /* Attribute dataspace  */
     hid_t   type;       /* Attribute datatype   */
-    hid_t   attr;	    /* Attribute ID			*/
+    hid_t   attr;	/* Attribute ID         */
     char    attr_name[ATTR_NAME_LEN]; /* Buffer for attribute names */
     int     rank;       /* Attribute rank */
     hsize_t dims[ATTR_MAX_DIMS];    /* Attribute dimensions */
@@ -758,12 +761,13 @@ test_attr_compound_read(hid_t fapl)
     size_t      size;   /* Attribute datatype size as stored in file */
     int     fields;     /* # of Attribute datatype fields */
     char *fieldname;    /* Name of a field */
-    size_t      offset; /* Attribute datatype field offset */
+    size_t  offset;     /* Attribute datatype field offset */
     hid_t   field;      /* Attribute field datatype */
     struct attr4_struct read_data4[ATTR4_DIM1][ATTR4_DIM2]; /* Buffer for reading 4th attribute */
-    int     i,j;
     size_t  name_len;   /* Length of attribute name */
-    herr_t  ret;		/* Generic return value		*/
+    H5O_info_t oinfo;   /* Object info */
+    int     i, j;       /* Local index variables */
+    herr_t  ret;	/* Generic return value	*/
 
     /* Output message about test being performed */
     MESSAGE(5, ("Testing Basic Attribute Functions\n"));
@@ -773,106 +777,107 @@ test_attr_compound_read(hid_t fapl)
     CHECK(fid1, FAIL, "H5Fopen");
 
     /* Open the dataset */
-    dataset=H5Dopen(fid1,DSET1_NAME);
+    dataset = H5Dopen(fid1, DSET1_NAME);
     CHECK(dataset, FAIL, "H5Dopen");
 
     /* Verify the correct number of attributes */
-    ret=H5Aget_num_attrs(dataset);
-    VERIFY(ret, 1, "H5Aget_num_attrs");
+    ret = H5Oget_info(dataset, ".", &oinfo, H5P_DEFAULT);
+    CHECK(ret, FAIL, "H5Oget_info");
+    VERIFY(oinfo.num_attrs, 1, "H5Oget_info");
 
     /* Open 1st attribute for the dataset */
-    attr=H5Aopen_idx(dataset,0);
+    attr = H5Aopen_idx(dataset, 0);
     CHECK(attr, FAIL, "H5Aopen_idx");
 
     /* Verify Dataspace */
-    space=H5Aget_space(attr);
+    space = H5Aget_space(attr);
     CHECK(space, FAIL, "H5Aget_space");
-    rank=H5Sget_simple_extent_ndims(space);
+    rank = H5Sget_simple_extent_ndims(space);
     VERIFY(rank, ATTR4_RANK, "H5Sget_simple_extent_ndims");
-    ret=H5Sget_simple_extent_dims(space,dims, NULL);
+    ret = H5Sget_simple_extent_dims(space, dims, NULL);
     CHECK(ret, FAIL, "H5Sget_simple_extent_dims");
-    if(dims[0]!=ATTR4_DIM1)
-        TestErrPrintf("attribute dimensions different: dims[0]=%d, should be %d\n",(int)dims[0],ATTR4_DIM1);
-    if(dims[1]!=ATTR4_DIM2)
-        TestErrPrintf("attribute dimensions different: dims[1]=%d, should be %d\n",(int)dims[1],ATTR4_DIM2);
+    if(dims[0] != ATTR4_DIM1)
+        TestErrPrintf("attribute dimensions different: dims[0]=%d, should be %d\n", (int)dims[0], ATTR4_DIM1);
+    if(dims[1] != ATTR4_DIM2)
+        TestErrPrintf("attribute dimensions different: dims[1]=%d, should be %d\n", (int)dims[1], ATTR4_DIM2);
     H5Sclose(space);
 
     /* Verify Datatype */
-    type=H5Aget_type(attr);
+    type = H5Aget_type(attr);
     CHECK(type, FAIL, "H5Aget_type");
-    t_class=H5Tget_class(type);
+    t_class = H5Tget_class(type);
     VERIFY(t_class, H5T_COMPOUND, "H5Tget_class");
-    fields=H5Tget_nmembers(type);
+    fields = H5Tget_nmembers(type);
     VERIFY(fields, 3, "H5Tget_nmembers");
-    for(i=0; i<fields; i++) {
-        fieldname=H5Tget_member_name(type,(unsigned)i);
-        if(!(HDstrcmp(fieldname,ATTR4_FIELDNAME1) ||
-                HDstrcmp(fieldname,ATTR4_FIELDNAME2) ||
-                HDstrcmp(fieldname,ATTR4_FIELDNAME3)))
-            TestErrPrintf("invalid field name for field #%d: %s\n",i,fieldname);
+    for(i = 0; i < fields; i++) {
+        fieldname = H5Tget_member_name(type, (unsigned)i);
+        if(!(HDstrcmp(fieldname, ATTR4_FIELDNAME1) ||
+                HDstrcmp(fieldname, ATTR4_FIELDNAME2) ||
+                HDstrcmp(fieldname, ATTR4_FIELDNAME3)))
+            TestErrPrintf("invalid field name for field #%d: %s\n", i, fieldname);
         free(fieldname);
       } /* end for */
-    offset=H5Tget_member_offset(type,0);
+    offset = H5Tget_member_offset(type, 0);
     VERIFY(offset, attr4_field1_off, "H5Tget_member_offset");
-    offset=H5Tget_member_offset(type,1);
+    offset = H5Tget_member_offset(type, 1);
     VERIFY(offset, attr4_field2_off, "H5Tget_member_offset");
-    offset=H5Tget_member_offset(type,2);
+    offset = H5Tget_member_offset(type, 2);
     VERIFY(offset, attr4_field3_off, "H5Tget_member_offset");
 
     /* Verify each field's type, class & size */
-    field=H5Tget_member_type(type,0);
+    field = H5Tget_member_type(type, 0);
     CHECK(field, FAIL, "H5Tget_member_type");
-    t_class=H5Tget_class(field);
+    t_class = H5Tget_class(field);
     VERIFY(t_class, H5T_INTEGER, "H5Tget_class");
-    order=H5Tget_order(field);
+    order = H5Tget_order(field);
     VERIFY(order, H5Tget_order(H5T_NATIVE_INT), "H5Tget_order");
-    size=H5Tget_size(field);
+    size = H5Tget_size(field);
     VERIFY(size, H5Tget_size(H5T_NATIVE_INT), "H5Tget_size");
     H5Tclose(field);
-    field=H5Tget_member_type(type,1);
+    field = H5Tget_member_type(type, 1);
     CHECK(field, FAIL, "H5Tget_member_type");
-    t_class=H5Tget_class(field);
+    t_class = H5Tget_class(field);
     VERIFY(t_class, H5T_FLOAT, "H5Tget_class");
-    order=H5Tget_order(field);
+    order = H5Tget_order(field);
     VERIFY(order, H5Tget_order(H5T_NATIVE_DOUBLE), "H5Tget_order");
-    size=H5Tget_size(field);
+    size = H5Tget_size(field);
     VERIFY(size, H5Tget_size(H5T_NATIVE_DOUBLE), "H5Tget_size");
     H5Tclose(field);
-    field=H5Tget_member_type(type,2);
+    field = H5Tget_member_type(type, 2);
     CHECK(field, FAIL, "H5Tget_member_type");
-    t_class=H5Tget_class(field);
+    t_class = H5Tget_class(field);
     VERIFY(t_class, H5T_INTEGER, "H5Tget_class");
-    order=H5Tget_order(field);
+    order = H5Tget_order(field);
     VERIFY(order, H5Tget_order(H5T_NATIVE_SCHAR), "H5Tget_order");
-    size=H5Tget_size(field);
+    size = H5Tget_size(field);
     VERIFY(size, H5Tget_size(H5T_NATIVE_SCHAR), "H5Tget_size");
     H5Tclose(field);
 
     /* Read attribute information */
-    ret=H5Aread(attr,type,read_data4);
+    ret = H5Aread(attr, type, read_data4);
     CHECK(ret, FAIL, "H5Aread");
 
     /* Verify values read in */
-    for(i=0; i<ATTR4_DIM1; i++)
-        for(j=0; j<ATTR4_DIM2; j++)
-            if(HDmemcmp(&attr_data4[i][j],&read_data4[i][j],sizeof(struct attr4_struct))) {
-                printf("%d: attribute data different: attr_data4[%d][%d].i=%d, read_data4[%d][%d].i=%d\n",__LINE__,i,j,attr_data4[i][j].i,i,j,read_data4[i][j].i);
-                printf("%d: attribute data different: attr_data4[%d][%d].d=%f, read_data4[%d][%d].d=%f\n",__LINE__,i,j,attr_data4[i][j].d,i,j,read_data4[i][j].d);
-                TestErrPrintf("%d: attribute data different: attr_data4[%d][%d].c=%c, read_data4[%d][%d].c=%c\n",__LINE__,i,j,attr_data4[i][j].c,i,j,read_data4[i][j].c);
+    for(i = 0; i < ATTR4_DIM1; i++)
+        for(j = 0; j < ATTR4_DIM2; j++)
+            if(HDmemcmp(&attr_data4[i][j], &read_data4[i][j], sizeof(struct attr4_struct))) {
+                printf("%d: attribute data different: attr_data4[%d][%d].i=%d, read_data4[%d][%d].i=%d\n", __LINE__, i, j, attr_data4[i][j].i, i, j, read_data4[i][j].i);
+                printf("%d: attribute data different: attr_data4[%d][%d].d=%f, read_data4[%d][%d].d=%f\n", __LINE__, i, j, attr_data4[i][j].d, i, j, read_data4[i][j].d);
+                TestErrPrintf("%d: attribute data different: attr_data4[%d][%d].c=%c, read_data4[%d][%d].c=%c\n", __LINE__, i, j, attr_data4[i][j].c, i, j, read_data4[i][j].c);
              } /* end if */
 
     /* Verify Name */
-    name_len=H5Aget_name(attr, (size_t)ATTR_NAME_LEN, attr_name);
+    name_len = H5Aget_name(attr, (size_t)ATTR_NAME_LEN, attr_name);
     VERIFY(name_len, HDstrlen(ATTR4_NAME), "H5Aget_name");
-    if(HDstrcmp(attr_name,ATTR4_NAME))
-        TestErrPrintf("attribute name different: attr_name=%s, should be %s\n",attr_name,ATTR4_NAME);
+    if(HDstrcmp(attr_name, ATTR4_NAME))
+        TestErrPrintf("attribute name different: attr_name=%s, should be %s\n", attr_name, ATTR4_NAME);
 
     /* Close attribute datatype */
-    ret=H5Tclose(type);
+    ret = H5Tclose(type);
     CHECK(ret, FAIL, "H5Tclose");
 
     /* Close attribute */
-    ret=H5Aclose(attr);
+    ret = H5Aclose(attr);
     CHECK(ret, FAIL, "H5Aclose");
 
     /* Close dataset */
@@ -958,13 +963,14 @@ test_attr_scalar_write(hid_t fapl)
 static void
 test_attr_scalar_read(hid_t fapl)
 {
-    hid_t		fid1;		/* HDF5 File IDs		*/
-    hid_t		dataset;	/* Dataset ID			*/
-    hid_t		sid;	        /* Dataspace ID			*/
-    hid_t		attr;	        /* Attribute ID			*/
-    H5S_class_t         stype;          /* Dataspace class              */
-    float       rdata=0.0;  /* Buffer for reading 1st attribute */
-    herr_t		ret;		/* Generic return value		*/
+    hid_t	fid1;		/* HDF5 File IDs		*/
+    hid_t	dataset;	/* Dataset ID			*/
+    hid_t	sid;	        /* Dataspace ID			*/
+    hid_t	attr;	        /* Attribute ID			*/
+    H5S_class_t stype;          /* Dataspace class              */
+    float       rdata = 0.0;    /* Buffer for reading 1st attribute */
+    H5O_info_t  oinfo;          /* Object info                  */
+    herr_t	ret;		/* Generic return value		*/
 
     /* Output message about test being performed */
     MESSAGE(5, ("Testing Basic Scalar Attribute Reading Functions\n"));
@@ -974,22 +980,24 @@ test_attr_scalar_read(hid_t fapl)
     CHECK(fid1, FAIL, "H5Fopen");
 
     /* Open the dataset */
-    dataset=H5Dopen(fid1,DSET1_NAME);
+    dataset = H5Dopen(fid1, DSET1_NAME);
     CHECK(dataset, FAIL, "H5Dopen");
 
     /* Verify the correct number of attributes */
-    ret=H5Aget_num_attrs(dataset);
-    VERIFY(ret, 1, "H5Aget_num_attrs");
+    ret = H5Oget_info(dataset, ".", &oinfo, H5P_DEFAULT);
+    CHECK(ret, FAIL, "H5Oget_info");
+    VERIFY(oinfo.num_attrs, 1, "H5Oget_info");
 
     /* Open an attribute for the dataset */
-    attr=H5Aopen_name(dataset,ATTR5_NAME);
+    attr = H5Aopen_name(dataset, ATTR5_NAME);
     CHECK(attr, FAIL, "H5Aopen_name");
 
     /* Read attribute information */
-    ret=H5Aread(attr,H5T_NATIVE_FLOAT,&rdata);
+    ret = H5Aread(attr, H5T_NATIVE_FLOAT, &rdata);
     CHECK(ret, FAIL, "H5Aread");
+
     /* Verify the floating-poing value in this way to avoid compiler warning. */
-    if(!FLT_ABS_EQUAL(rdata,attr_data5))
+    if(!FLT_ABS_EQUAL(rdata, attr_data5))
 	printf("*** UNEXPECTED VALUE from %s should be %f, but is %f at line %4d in %s\n",
 	    "H5Aread", attr_data5, rdata, (int)__LINE__, __FILE__);
  
@@ -998,7 +1006,7 @@ test_attr_scalar_read(hid_t fapl)
     CHECK(sid, FAIL, "H5Aget_space");
 
     /* Make certain the dataspace is scalar */
-    stype = H5Sget_simple_extent_type (sid);
+    stype = H5Sget_simple_extent_type(sid);
     VERIFY(stype, H5S_SCALAR, "H5Sget_simple_extent_type");
 
     /* Close dataspace */
@@ -1006,7 +1014,7 @@ test_attr_scalar_read(hid_t fapl)
     CHECK(ret, FAIL, "H5Sclose");
 
     /* Close attribute */
-    ret=H5Aclose(attr);
+    ret = H5Aclose(attr);
     CHECK(ret, FAIL, "H5Aclose");
 
     ret = H5Dclose(dataset);
@@ -1146,24 +1154,25 @@ test_attr_mult_write(hid_t fapl)
 static void
 test_attr_mult_read(hid_t fapl)
 {
-    hid_t   fid1;		/* HDF5 File IDs		*/
-    hid_t   dataset;	/* Dataset ID			*/
+    hid_t   fid1;	/* HDF5 File ID		*/
+    hid_t   dataset;	/* Dataset ID		*/
     hid_t   space;      /* Attribute dataspace  */
     hid_t   type;       /* Attribute datatype   */
-    hid_t   attr;	    /* Attribute ID			*/
+    hid_t   attr;	/* Attribute ID		*/
     char    attr_name[ATTR_NAME_LEN]; /* Buffer for attribute names */
     char    temp_name[ATTR_NAME_LEN]; /* Buffer for mangling attribute names */
     int     rank;       /* Attribute rank */
-    hsize_t dims[ATTR_MAX_DIMS];    /* Attribute dimensions */
-    H5T_class_t t_class;              /* Attribute datatype class */
-    H5T_order_t order;              /* Attribute datatype order */
-    size_t      size;               /* Attribute datatype size as stored in file */
-    int   read_data1[ATTR1_DIM1]={0}; /* Buffer for reading 1st attribute */
-    int   read_data2[ATTR2_DIM1][ATTR2_DIM2]={{0}}; /* Buffer for reading 2nd attribute */
-    double  read_data3[ATTR3_DIM1][ATTR3_DIM2][ATTR3_DIM3]={{{0}}}; /* Buffer for reading 3rd attribute */
-    int     i,j,k;
+    hsize_t dims[ATTR_MAX_DIMS];        /* Attribute dimensions */
+    H5T_class_t t_class;        /* Attribute datatype class */
+    H5T_order_t order;          /* Attribute datatype order */
+    size_t      size;           /* Attribute datatype size as stored in file */
+    int     read_data1[ATTR1_DIM1] = {0}; /* Buffer for reading 1st attribute */
+    int     read_data2[ATTR2_DIM1][ATTR2_DIM2] = {{0}}; /* Buffer for reading 2nd attribute */
+    double  read_data3[ATTR3_DIM1][ATTR3_DIM2][ATTR3_DIM3] = {{{0}}}; /* Buffer for reading 3rd attribute */
     size_t  name_len;   /* Length of attribute name */
-    herr_t  ret;		/* Generic return value		*/
+    H5O_info_t oinfo;   /* Object info */
+    int     i, j, k;    /* Local index values */
+    herr_t  ret;	/* Generic return value */
 
     /* Output message about test being performed */
     MESSAGE(5, ("Testing Basic Attribute Functions\n"));
@@ -1173,179 +1182,180 @@ test_attr_mult_read(hid_t fapl)
     CHECK(fid1, FAIL, "H5Fopen");
 
     /* Open the dataset */
-    dataset=H5Dopen(fid1,DSET1_NAME);
+    dataset = H5Dopen(fid1, DSET1_NAME);
     CHECK(dataset, FAIL, "H5Dopen");
 
     /* Verify the correct number of attributes */
-    ret=H5Aget_num_attrs(dataset);
-    VERIFY(ret, 3, "H5Aget_num_attrs");
+    ret = H5Oget_info(dataset, ".", &oinfo, H5P_DEFAULT);
+    CHECK(ret, FAIL, "H5Oget_info");
+    VERIFY(oinfo.num_attrs, 3, "H5Oget_info");
 
     /* Open 1st attribute for the dataset */
-    attr=H5Aopen_idx(dataset,0);
+    attr = H5Aopen_idx(dataset, (unsigned)0);
     CHECK(attr, FAIL, "H5Aopen_idx");
 
     /* Verify Dataspace */
-    space=H5Aget_space(attr);
+    space = H5Aget_space(attr);
     CHECK(space, FAIL, "H5Aget_space");
-    rank=H5Sget_simple_extent_ndims(space);
+    rank = H5Sget_simple_extent_ndims(space);
     VERIFY(rank, ATTR1_RANK, "H5Sget_simple_extent_ndims");
-    ret=H5Sget_simple_extent_dims(space,dims, NULL);
+    ret = H5Sget_simple_extent_dims(space, dims, NULL);
     CHECK(ret, FAIL, "H5Sget_simple_extent_dims");
-    if(dims[0]!=ATTR1_DIM1)
-        TestErrPrintf("attribute dimensions different: dims[0]=%d, should be %d\n",(int)dims[0],ATTR1_DIM1);
+    if(dims[0] != ATTR1_DIM1)
+        TestErrPrintf("attribute dimensions different: dims[0]=%d, should be %d\n", (int)dims[0], ATTR1_DIM1);
     H5Sclose(space);
 
     /* Verify Datatype */
-    type=H5Aget_type(attr);
+    type = H5Aget_type(attr);
     CHECK(type, FAIL, "H5Aget_type");
-    t_class=H5Tget_class(type);
+    t_class = H5Tget_class(type);
     VERIFY(t_class, H5T_INTEGER, "H5Tget_class");
-    order=H5Tget_order(type);
+    order = H5Tget_order(type);
     VERIFY(order, H5Tget_order(H5T_NATIVE_INT), "H5Tget_order");
-    size=H5Tget_size(type);
+    size = H5Tget_size(type);
     VERIFY(size, H5Tget_size(H5T_NATIVE_INT), "H5Tget_size");
     H5Tclose(type);
 
     /* Read attribute information */
-    ret=H5Aread(attr,H5T_NATIVE_INT,read_data1);
+    ret = H5Aread(attr, H5T_NATIVE_INT, read_data1);
     CHECK(ret, FAIL, "H5Aread");
 
     /* Verify values read in */
-    for(i=0; i<ATTR1_DIM1; i++)
-        if(attr_data1[i]!=read_data1[i])
-            TestErrPrintf("%d: attribute data different: attr_data1[%d]=%d, read_data1[%d]=%d\n",__LINE__,i,attr_data1[i],i,read_data1[i]);
+    for(i = 0; i < ATTR1_DIM1; i++)
+        if(attr_data1[i] != read_data1[i])
+            TestErrPrintf("%d: attribute data different: attr_data1[%d]=%d, read_data1[%d]=%d\n", __LINE__, i, attr_data1[i], i, read_data1[i]);
 
     /* Verify Name */
-    name_len=H5Aget_name(attr, (size_t)ATTR_NAME_LEN, attr_name);
+    name_len = H5Aget_name(attr, (size_t)ATTR_NAME_LEN, attr_name);
     VERIFY(name_len, HDstrlen(ATTR1_NAME), "H5Aget_name");
-    if(HDstrcmp(attr_name,ATTR1_NAME))
-        TestErrPrintf("attribute name different: attr_name=%s, should be %s\n",attr_name,ATTR1_NAME);
+    if(HDstrcmp(attr_name, ATTR1_NAME))
+        TestErrPrintf("attribute name different: attr_name=%s, should be %s\n", attr_name, ATTR1_NAME);
 
     /* Verify Name with too small of a buffer */
-    name_len=H5Aget_name(attr,HDstrlen(ATTR1_NAME), attr_name);
+    name_len = H5Aget_name(attr,HDstrlen(ATTR1_NAME), attr_name);
     VERIFY(name_len, HDstrlen(ATTR1_NAME), "H5Aget_name");
-    HDstrcpy(temp_name,ATTR1_NAME);     /* make a copy of the name */
-    temp_name[HDstrlen(ATTR1_NAME)-1]='\0';   /* truncate it to match the one retrieved */
-    if(HDstrcmp(attr_name,temp_name))
-        TestErrPrintf("attribute name different: attr_name=%s, should be %s\n",attr_name,temp_name);
+    HDstrcpy(temp_name, ATTR1_NAME);     /* make a copy of the name */
+    temp_name[HDstrlen(ATTR1_NAME) - 1] = '\0';   /* truncate it to match the one retrieved */
+    if(HDstrcmp(attr_name, temp_name))
+        TestErrPrintf("attribute name different: attr_name=%s, should be %s\n", attr_name, temp_name);
 
     /* Close attribute */
-    ret=H5Aclose(attr);
+    ret = H5Aclose(attr);
     CHECK(ret, FAIL, "H5Aclose");
 
     /* Open 2nd attribute for the dataset */
-    attr=H5Aopen_idx(dataset,1);
+    attr = H5Aopen_idx(dataset, (unsigned)1);
     CHECK(attr, FAIL, "H5Aopen_idx");
 
     /* Verify Dataspace */
-    space=H5Aget_space(attr);
+    space = H5Aget_space(attr);
     CHECK(space, FAIL, "H5Aget_space");
-    rank=H5Sget_simple_extent_ndims(space);
+    rank = H5Sget_simple_extent_ndims(space);
     VERIFY(rank, ATTR2_RANK, "H5Sget_simple_extent_ndims");
-    ret=H5Sget_simple_extent_dims(space,dims, NULL);
+    ret = H5Sget_simple_extent_dims(space, dims, NULL);
     CHECK(ret, FAIL, "H5Sget_simple_extent_dims");
-    if(dims[0]!=ATTR2_DIM1)
-        TestErrPrintf("attribute dimensions different: dims[0]=%d, should be %d\n",(int)dims[0],ATTR2_DIM1);
-    if(dims[1]!=ATTR2_DIM2)
-        TestErrPrintf("attribute dimensions different: dims[1]=%d, should be %d\n",(int)dims[1],ATTR2_DIM2);
+    if(dims[0] != ATTR2_DIM1)
+        TestErrPrintf("attribute dimensions different: dims[0]=%d, should be %d\n", (int)dims[0], ATTR2_DIM1);
+    if(dims[1] != ATTR2_DIM2)
+        TestErrPrintf("attribute dimensions different: dims[1]=%d, should be %d\n", (int)dims[1], ATTR2_DIM2);
     H5Sclose(space);
 
     /* Verify Datatype */
-    type=H5Aget_type(attr);
+    type = H5Aget_type(attr);
     CHECK(type, FAIL, "H5Aget_type");
-    t_class=H5Tget_class(type);
+    t_class = H5Tget_class(type);
     VERIFY(t_class, H5T_INTEGER, "H5Tget_class");
-    order=H5Tget_order(type);
+    order = H5Tget_order(type);
     VERIFY(order, H5Tget_order(H5T_NATIVE_INT), "H5Tget_order");
-    size=H5Tget_size(type);
+    size = H5Tget_size(type);
     VERIFY(size, H5Tget_size(H5T_NATIVE_INT), "H5Tget_size");
     H5Tclose(type);
 
     /* Read attribute information */
-    ret=H5Aread(attr,H5T_NATIVE_INT,read_data2);
+    ret = H5Aread(attr, H5T_NATIVE_INT, read_data2);
     CHECK(ret, FAIL, "H5Aread");
 
     /* Verify values read in */
-    for(i=0; i<ATTR2_DIM1; i++)
-        for(j=0; j<ATTR2_DIM2; j++)
-            if(attr_data2[i][j]!=read_data2[i][j])
-                TestErrPrintf("%d: attribute data different: attr_data2[%d][%d]=%d, read_data2[%d][%d]=%d\n",__LINE__,i,j,attr_data2[i][j],i,j,read_data2[i][j]);
+    for(i = 0; i < ATTR2_DIM1; i++)
+        for(j = 0; j < ATTR2_DIM2; j++)
+            if(attr_data2[i][j] != read_data2[i][j])
+                TestErrPrintf("%d: attribute data different: attr_data2[%d][%d]=%d, read_data2[%d][%d]=%d\n", __LINE__, i, j, attr_data2[i][j], i, j, read_data2[i][j]);
 
     /* Verify Name */
-    name_len=H5Aget_name(attr, (size_t)ATTR_NAME_LEN, attr_name);
+    name_len = H5Aget_name(attr, (size_t)ATTR_NAME_LEN, attr_name);
     VERIFY(name_len, HDstrlen(ATTR2_NAME), "H5Aget_name");
-    if(HDstrcmp(attr_name,ATTR2_NAME))
-        TestErrPrintf("attribute name different: attr_name=%s, should be %s\n",attr_name,ATTR2_NAME);
+    if(HDstrcmp(attr_name, ATTR2_NAME))
+        TestErrPrintf("attribute name different: attr_name=%s, should be %s\n", attr_name, ATTR2_NAME);
 
     /* Verify Name with too small of a buffer */
-    name_len=H5Aget_name(attr, HDstrlen(ATTR2_NAME), attr_name);
+    name_len = H5Aget_name(attr, HDstrlen(ATTR2_NAME), attr_name);
     VERIFY(name_len, HDstrlen(ATTR2_NAME), "H5Aget_name");
-    HDstrcpy(temp_name,ATTR2_NAME);     /* make a copy of the name */
-    temp_name[HDstrlen(ATTR2_NAME)-1]='\0';   /* truncate it to match the one retrieved */
-    if(HDstrcmp(attr_name,temp_name))
-        TestErrPrintf("attribute name different: attr_name=%s, should be %s\n",attr_name,temp_name);
+    HDstrcpy(temp_name, ATTR2_NAME);     /* make a copy of the name */
+    temp_name[HDstrlen(ATTR2_NAME) - 1] = '\0';   /* truncate it to match the one retrieved */
+    if(HDstrcmp(attr_name, temp_name))
+        TestErrPrintf("attribute name different: attr_name=%s, should be %s\n", attr_name, temp_name);
 
     /* Close attribute */
-    ret=H5Aclose(attr);
+    ret = H5Aclose(attr);
     CHECK(ret, FAIL, "H5Aclose");
 
     /* Open 2nd attribute for the dataset */
-    attr=H5Aopen_idx(dataset,2);
+    attr = H5Aopen_idx(dataset, (unsigned)2);
     CHECK(attr, FAIL, "H5Aopen_idx");
 
     /* Verify Dataspace */
-    space=H5Aget_space(attr);
+    space = H5Aget_space(attr);
     CHECK(space, FAIL, "H5Aget_space");
-    rank=H5Sget_simple_extent_ndims(space);
+    rank = H5Sget_simple_extent_ndims(space);
     VERIFY(rank, ATTR3_RANK, "H5Sget_simple_extent_ndims");
-    ret=H5Sget_simple_extent_dims(space,dims, NULL);
+    ret = H5Sget_simple_extent_dims(space, dims, NULL);
     CHECK(ret, FAIL, "H5Sget_simple_extent_dims");
-    if(dims[0]!=ATTR3_DIM1)
-        TestErrPrintf("attribute dimensions different: dims[0]=%d, should be %d\n",(int)dims[0],ATTR3_DIM1);
-    if(dims[1]!=ATTR3_DIM2)
-        TestErrPrintf("attribute dimensions different: dims[1]=%d, should be %d\n",(int)dims[1],ATTR3_DIM2);
-    if(dims[2]!=ATTR3_DIM3)
-        TestErrPrintf("attribute dimensions different: dims[2]=%d, should be %d\n",(int)dims[2],ATTR3_DIM3);
+    if(dims[0] != ATTR3_DIM1)
+        TestErrPrintf("attribute dimensions different: dims[0]=%d, should be %d\n", (int)dims[0], ATTR3_DIM1);
+    if(dims[1] != ATTR3_DIM2)
+        TestErrPrintf("attribute dimensions different: dims[1]=%d, should be %d\n", (int)dims[1], ATTR3_DIM2);
+    if(dims[2] != ATTR3_DIM3)
+        TestErrPrintf("attribute dimensions different: dims[2]=%d, should be %d\n", (int)dims[2], ATTR3_DIM3);
     H5Sclose(space);
 
     /* Verify Datatype */
-    type=H5Aget_type(attr);
+    type = H5Aget_type(attr);
     CHECK(type, FAIL, "H5Aget_type");
-    t_class=H5Tget_class(type);
+    t_class = H5Tget_class(type);
     VERIFY(t_class, H5T_FLOAT, "H5Tget_class");
-    order=H5Tget_order(type);
+    order = H5Tget_order(type);
     VERIFY(order, H5Tget_order(H5T_NATIVE_DOUBLE), "H5Tget_order");
-    size=H5Tget_size(type);
+    size = H5Tget_size(type);
     VERIFY(size, H5Tget_size(H5T_NATIVE_DOUBLE), "H5Tget_size");
     H5Tclose(type);
 
     /* Read attribute information */
-    ret=H5Aread(attr,H5T_NATIVE_DOUBLE,read_data3);
+    ret = H5Aread(attr, H5T_NATIVE_DOUBLE, read_data3);
     CHECK(ret, FAIL, "H5Aread");
 
     /* Verify values read in */
-    for(i=0; i<ATTR3_DIM1; i++)
-        for(j=0; j<ATTR3_DIM2; j++)
-            for(k=0; k<ATTR3_DIM3; k++)
-                if(!DBL_ABS_EQUAL(attr_data3[i][j][k],read_data3[i][j][k]))
-                    TestErrPrintf("%d: attribute data different: attr_data3[%d][%d][%d]=%f, read_data3[%d][%d][%d]=%f\n",__LINE__,i,j,k,attr_data3[i][j][k],i,j,k,read_data3[i][j][k]);
+    for(i = 0; i < ATTR3_DIM1; i++)
+        for(j = 0; j < ATTR3_DIM2; j++)
+            for(k = 0; k < ATTR3_DIM3; k++)
+                if(!DBL_ABS_EQUAL(attr_data3[i][j][k], read_data3[i][j][k]))
+                    TestErrPrintf("%d: attribute data different: attr_data3[%d][%d][%d]=%f, read_data3[%d][%d][%d]=%f\n", __LINE__, i, j, k, attr_data3[i][j][k], i, j, k, read_data3[i][j][k]);
 
     /* Verify Name */
-    name_len=H5Aget_name(attr, (size_t)ATTR_NAME_LEN, attr_name);
+    name_len = H5Aget_name(attr, (size_t)ATTR_NAME_LEN, attr_name);
     VERIFY(name_len, HDstrlen(ATTR3_NAME), "H5Aget_name");
-    if(HDstrcmp(attr_name,ATTR3_NAME))
-        TestErrPrintf("attribute name different: attr_name=%s, should be %s\n",attr_name,ATTR3_NAME);
+    if(HDstrcmp(attr_name, ATTR3_NAME))
+        TestErrPrintf("attribute name different: attr_name=%s, should be %s\n", attr_name, ATTR3_NAME);
 
     /* Verify Name with too small of a buffer */
-    name_len=H5Aget_name(attr, HDstrlen(ATTR3_NAME), attr_name);
+    name_len = H5Aget_name(attr, HDstrlen(ATTR3_NAME), attr_name);
     VERIFY(name_len, HDstrlen(ATTR3_NAME), "H5Aget_name");
-    HDstrcpy(temp_name,ATTR3_NAME);     /* make a copy of the name */
-    temp_name[HDstrlen(ATTR3_NAME)-1]='\0';   /* truncate it to match the one retrieved */
-    if(HDstrcmp(attr_name,temp_name))
-        TestErrPrintf("attribute name different: attr_name=%s, should be %s\n",attr_name,temp_name);
+    HDstrcpy(temp_name, ATTR3_NAME);     /* make a copy of the name */
+    temp_name[HDstrlen(ATTR3_NAME) - 1] = '\0';   /* truncate it to match the one retrieved */
+    if(HDstrcmp(attr_name, temp_name))
+        TestErrPrintf("attribute name different: attr_name=%s, should be %s\n", attr_name, temp_name);
 
     /* Close attribute */
-    ret=H5Aclose(attr);
+    ret = H5Aclose(attr);
     CHECK(ret, FAIL, "H5Aclose");
 
     /* Close dataset */
@@ -1406,11 +1416,12 @@ attr_op1(hid_t UNUSED loc_id, const char *name, const H5A_info_t UNUSED *ainfo,
 static void
 test_attr_iterate(hid_t fapl)
 {
-    hid_t   file;		/* HDF5 File ID 		*/
+    hid_t   file;	/* HDF5 File ID 		*/
     hid_t   dataset;	/* Dataset ID			*/
     hid_t   sid;	/* Dataspace ID			*/
     int     count;      /* operator data for the iterator */
-    herr_t  ret;		/* Generic return value		*/
+    H5O_info_t oinfo;   /* Object info                  */
+    herr_t  ret;	/* Generic return value		*/
 
     /* Output message about test being performed */
     MESSAGE(5, ("Testing Basic Attribute Functions\n"));
@@ -1432,8 +1443,9 @@ test_attr_iterate(hid_t fapl)
     CHECK(ret, FAIL, "H5Sclose");
 
     /* Verify the correct number of attributes */
-    ret = H5Aget_num_attrs(dataset);
-    VERIFY(ret, 0, "H5Aget_num_attrs");
+    ret = H5Oget_info(dataset, ".", &oinfo, H5P_DEFAULT);
+    CHECK(ret, FAIL, "H5Oget_info");
+    VERIFY(oinfo.num_attrs, 0, "H5Oget_info");
 
     /* Iterate over attributes on dataset */
     count = 0;
@@ -1449,8 +1461,9 @@ test_attr_iterate(hid_t fapl)
     CHECK(dataset, FAIL, "H5Dopen");
 
     /* Verify the correct number of attributes */
-    ret = H5Aget_num_attrs(dataset);
-    VERIFY(ret, 3, "H5Aget_num_attrs");
+    ret = H5Oget_info(dataset, ".", &oinfo, H5P_DEFAULT);
+    CHECK(ret, FAIL, "H5Oget_info");
+    VERIFY(oinfo.num_attrs, 3, "H5Oget_info");
 
     /* Iterate over attributes on dataset */
     count = 0;
@@ -1475,12 +1488,13 @@ test_attr_iterate(hid_t fapl)
 static void
 test_attr_delete(hid_t fapl)
 {
-    hid_t   fid1;		/* HDF5 File ID 		*/
+    hid_t   fid1;	/* HDF5 File ID 		*/
     hid_t   dataset;	/* Dataset ID			*/
-    hid_t   attr;	    /* Attribute ID			*/
+    hid_t   attr;       /* Attribute ID			*/
     char    attr_name[ATTR_NAME_LEN]; /* Buffer for attribute names */
-    size_t  name_len;   /* Length of attribute name */
-    herr_t  ret;		/* Generic return value		*/
+    size_t  name_len;   /* Length of attribute name     */
+    H5O_info_t oinfo;   /* Object info                  */
+    herr_t  ret;	/* Generic return value		*/
 
     /* Output message about test being performed */
     MESSAGE(5, ("Testing Basic Attribute Functions\n"));
@@ -1494,24 +1508,27 @@ test_attr_delete(hid_t fapl)
     CHECK(dataset, FAIL, "H5Dopen");
 
     /* Verify the correct number of attributes */
-    ret = H5Aget_num_attrs(dataset);
-    VERIFY(ret, 3, "H5Aget_num_attrs");
+    ret = H5Oget_info(dataset, ".", &oinfo, H5P_DEFAULT);
+    CHECK(ret, FAIL, "H5Oget_info");
+    VERIFY(oinfo.num_attrs, 3, "H5Oget_info");
 
     /* Try to delete bogus attribute */
     ret = H5Adelete2(dataset, ".", "Bogus", H5P_DEFAULT);
     VERIFY(ret, FAIL, "H5Adelete2");
 
     /* Verify the correct number of attributes */
-    ret = H5Aget_num_attrs(dataset);
-    VERIFY(ret, 3, "H5Aget_num_attrs");
+    ret = H5Oget_info(dataset, ".", &oinfo, H5P_DEFAULT);
+    CHECK(ret, FAIL, "H5Oget_info");
+    VERIFY(oinfo.num_attrs, 3, "H5Oget_info");
 
     /* Delete middle (2nd) attribute */
     ret = H5Adelete2(dataset, ".", ATTR2_NAME, H5P_DEFAULT);
     CHECK(ret, FAIL, "H5Adelete2");
 
     /* Verify the correct number of attributes */
-    ret = H5Aget_num_attrs(dataset);
-    VERIFY(ret, 2, "H5Aget_num_attrs");
+    ret = H5Oget_info(dataset, ".", &oinfo, H5P_DEFAULT);
+    CHECK(ret, FAIL, "H5Oget_info");
+    VERIFY(oinfo.num_attrs, 2, "H5Oget_info");
 
     /* Open 1st attribute for the dataset */
     attr = H5Aopen_idx(dataset, 0);
@@ -1546,8 +1563,9 @@ test_attr_delete(hid_t fapl)
     CHECK(ret, FAIL, "H5Adelete2");
 
     /* Verify the correct number of attributes */
-    ret = H5Aget_num_attrs(dataset);
-    VERIFY(ret, 1, "H5Aget_num_attrs");
+    ret = H5Oget_info(dataset, ".", &oinfo, H5P_DEFAULT);
+    CHECK(ret, FAIL, "H5Oget_info");
+    VERIFY(oinfo.num_attrs, 1, "H5Oget_info");
 
     /* Open last (formally 3rd) attribute for the dataset */
     attr = H5Aopen_idx(dataset, 0);
@@ -1568,8 +1586,9 @@ test_attr_delete(hid_t fapl)
     CHECK(ret, FAIL, "H5Adelete2");
 
     /* Verify the correct number of attributes */
-    ret = H5Aget_num_attrs(dataset);
-    VERIFY(ret, 0, "H5Aget_num_attrs");
+    ret = H5Oget_info(dataset, ".", &oinfo, H5P_DEFAULT);
+    CHECK(ret, FAIL, "H5Oget_info");
+    VERIFY(oinfo.num_attrs, 0, "H5Oget_info");
 
     /* Close dataset */
     ret = H5Dclose(dataset);
@@ -2119,7 +2138,7 @@ test_attr_dense_delete(hid_t fcpl, hid_t fapl)
     unsigned    u;              /* Local index variable */
     h5_stat_size_t empty_filesize;       /* Size of empty file */
     h5_stat_size_t filesize;             /* Size of file after modifications */
-    int         attr_count;     /* # of attributes */
+    H5O_info_t  oinfo;          /* Object info                  */
     herr_t	ret;		/* Generic return value		*/
 
     /* Output message about test being performed */
@@ -2186,9 +2205,9 @@ test_attr_dense_delete(hid_t fcpl, hid_t fapl)
         CHECK(ret, FAIL, "H5Aclose");
 
         /* Check # of attributes */
-        attr_count = H5Aget_num_attrs(dataset);
-        CHECK(attr_count, FAIL, "H5Aget_num_attrs");
-        VERIFY(attr_count, (int)(u + 1), "H5Aget_num_attrs");
+        ret = H5Oget_info(dataset, ".", &oinfo, H5P_DEFAULT);
+        CHECK(ret, FAIL, "H5Oget_info");
+        VERIFY(oinfo.num_attrs, (u + 1), "H5Oget_info");
     } /* end for */
 
     /* Check on dataset's attribute storage status */
@@ -2295,10 +2314,10 @@ test_attr_dense_rename(hid_t fcpl, hid_t fapl)
     unsigned    max_compact;    /* Maximum # of attributes to store compactly */
     unsigned    min_dense;      /* Minimum # of attributes to store "densely" */
     htri_t	is_dense;	/* Are attributes stored densely? */
-    int         attr_count;     /* # of attributes */
-    unsigned    u;              /* Local index variable */
     h5_stat_size_t empty_filesize;       /* Size of empty file */
     h5_stat_size_t filesize;             /* Size of file after modifications */
+    H5O_info_t  oinfo;          /* Object info */
+    unsigned    u;              /* Local index variable */
     herr_t	ret;		/* Generic return value		*/
 
     /* Output message about test being performed */
@@ -2368,9 +2387,9 @@ test_attr_dense_rename(hid_t fcpl, hid_t fapl)
         CHECK(ret, FAIL, "H5Arename2");
 
         /* Check # of attributes */
-        attr_count = H5Aget_num_attrs(dataset);
-        CHECK(attr_count, FAIL, "H5Aget_num_attrs");
-        VERIFY(attr_count, (int)(u + 1), "H5Aget_num_attrs");
+        ret = H5Oget_info(dataset, ".", &oinfo, H5P_DEFAULT);
+        CHECK(ret, FAIL, "H5Oget_info");
+        VERIFY(oinfo.num_attrs, (u + 1), "H5Oget_info");
     } /* end for */
 
     /* Check on dataset's attribute storage status */
@@ -2453,11 +2472,11 @@ test_attr_dense_unlink(hid_t fcpl, hid_t fapl)
     unsigned    max_compact;    /* Maximum # of attributes to store compactly */
     unsigned    min_dense;      /* Minimum # of attributes to store "densely" */
     htri_t	is_dense;	/* Are attributes stored densely? */
-    int         attr_count;     /* # of attributes */
     size_t      mesg_count;     /* # of shared messages */
-    unsigned    u;              /* Local index variable */
     h5_stat_size_t empty_filesize;       /* Size of empty file */
     h5_stat_size_t filesize;             /* Size of file after modifications */
+    H5O_info_t  oinfo;          /* Object info */
+    unsigned    u;              /* Local index variable */
     herr_t	ret;		/* Generic return value		*/
 
     /* Output message about test being performed */
@@ -2520,9 +2539,9 @@ test_attr_dense_unlink(hid_t fcpl, hid_t fapl)
         CHECK(ret, FAIL, "H5Aclose");
 
         /* Check # of attributes */
-        attr_count = H5Aget_num_attrs(dataset);
-        CHECK(attr_count, FAIL, "H5Aget_num_attrs");
-        VERIFY(attr_count, (int)(u + 1), "H5Aget_num_attrs");
+        ret = H5Oget_info(dataset, ".", &oinfo, H5P_DEFAULT);
+        CHECK(ret, FAIL, "H5Oget_info");
+        VERIFY(oinfo.num_attrs, (u + 1), "H5Oget_info");
     } /* end for */
 
     /* Check on dataset's attribute storage status */
@@ -3284,6 +3303,10 @@ test_attr_deprec(hid_t fcpl, hid_t fapl)
     CHECK(dataset, FAIL, "H5Dopen");
 
 
+    /* Get number of attributes */
+    ret = H5Aget_num_attrs(dataset);
+    VERIFY(ret, 1, "H5Aget_num_attrs");
+
     /* Rename attribute */
     ret = H5Arename1(dataset, "attr", "attr2");
     CHECK(ret, FAIL, "H5Arename1");
diff --git a/tools/h5repack/h5repack_copy.c b/tools/h5repack/h5repack_copy.c
index dedca0a..5734285 100644
--- a/tools/h5repack/h5repack_copy.c
+++ b/tools/h5repack/h5repack_copy.c
@@ -901,10 +901,11 @@ int copy_attr(hid_t loc_in,
  int        rank;         /* rank of dataset */
  hsize_t    dims[H5S_MAX_RANK];/* dimensions of dataset */
  char       name[255];
- int        n, j;
+ H5O_info_t oinfo;              /* Object info */
+ int        j;
  unsigned   u;
 
- if ((n = H5Aget_num_attrs(loc_in))<0)
+ if(H5Oget_info(loc_in, ".", &oinfo, H5P_DEFAULT) < 0)
   goto error;
 
 /*-------------------------------------------------------------------------
@@ -912,7 +913,7 @@ int copy_attr(hid_t loc_in,
  *-------------------------------------------------------------------------
  */
 
- for ( u = 0; u < (unsigned)n; u++)
+ for ( u = 0; u < (unsigned)oinfo.num_attrs; u++)
  {
 
    buf=NULL;
diff --git a/tools/h5repack/h5repack_refs.c b/tools/h5repack/h5repack_refs.c
index f1738e8..8ec1cfd 100644
--- a/tools/h5repack/h5repack_refs.c
+++ b/tools/h5repack/h5repack_refs.c
@@ -418,13 +418,14 @@ static int copy_refs_attr(hid_t loc_in,
     int        rank;              /* rank of dataset */
     hsize_t    dims[H5S_MAX_RANK];/* dimensions of dataset */
     char       name[255];
-    int        n, j;
+    H5O_info_t oinfo;           /* Object info */
+    int        j;
     unsigned   u;
 
-    if((n = H5Aget_num_attrs(loc_in)) < 0)
+    if(H5Oget_info(loc_in, ".", &oinfo, H5P_DEFAULT) < 0)
         goto error;
 
-    for(u = 0; u < (unsigned)n; u++) {
+    for(u = 0; u < (unsigned)oinfo.num_attrs; u++) {
         /*-------------------------------------------------------------------------
         * open
         *-------------------------------------------------------------------------
diff --git a/tools/lib/h5diff_attr.c b/tools/lib/h5diff_attr.c
index 89d18d3..26c93d3 100644
--- a/tools/lib/h5diff_attr.c
+++ b/tools/lib/h5diff_attr.c
@@ -65,30 +65,31 @@ hsize_t diff_attr(hid_t loc1_id,
  char       name2[512];
  char       np1[512];
  char       np2[512];
- int        n1, n2, i, j;
- hsize_t    nfound=0;
- hsize_t    nfound_total=0;
+ H5O_info_t oinfo1, oinfo2;     /* Object info */
+ unsigned   u;                  /* Local index variable */
+ hsize_t    nfound = 0;
+ hsize_t    nfound_total = 0;
  int        cmp=1;
 
- if ((n1 = H5Aget_num_attrs(loc1_id))<0)
+ if(H5Oget_info(loc1_id, ".", &oinfo1, H5P_DEFAULT) < 0)
   goto error;
- if ((n2 = H5Aget_num_attrs(loc2_id))<0)
+ if(H5Oget_info(loc2_id, ".", &oinfo2, H5P_DEFAULT) < 0)
   goto error;
 
- if (n1!=n2)
+ if(oinfo1.num_attrs != oinfo2.num_attrs)
   return 1;
 
- for ( i = 0; i < n1; i++)
+ for(u = 0; u < (unsigned)oinfo1.num_attrs; u++)
  {
   /* reset buffers for every attribute, we might goto out and call free */
-  buf1=NULL;
-  buf2=NULL;
+  buf1 = NULL;
+  buf2 = NULL;
 
   /* open attribute */
-  if ((attr1_id = H5Aopen_idx(loc1_id, (unsigned)i))<0)
+  if((attr1_id = H5Aopen_idx(loc1_id, u)) < 0)
    goto error;
    /* get name */
-  if (H5Aget_name( attr1_id, 255, name1 )<0)
+  if(H5Aget_name(attr1_id, 255, name1) < 0)
    goto error;
 
   /* use the name on the first file to open the second file */
@@ -148,6 +149,7 @@ hsize_t diff_attr(hid_t loc1_id,
   */
   if (cmp)
   {
+     int j;
 
   /*-------------------------------------------------------------------------
    * read to memory
@@ -287,7 +289,7 @@ hsize_t diff_attr(hid_t loc1_id,
    HDfree(buf2);
 
   nfound_total += nfound;
- } /* i */
+ } /* u */
 
  return nfound_total;