[svn-r353] Changes since 19980414

----------------------

./html/Compression.html          [NEW]
./html/Datasets.html
./html/H5.format.html
./html/H5.user.html
        Documented compression.  A couple of the H5P functions aren't
        quite implemented yet but they're coming soon...

./src/H5Dprivate.h
./src/H5E.c
./src/H5Epublic.h
./src/H5Farray.c
./src/H5Fistore.c
./src/H5Fprivate.h
./src/H5MF.c
./src/H5MFprivate.h
./src/H5O.c
./src/H5Ocomp.c         [NEW]
./src/H5Oprivate.h
./src/H5P.c
./src/H5Ppublic.h
./src/H5Sprivate.h
./src/H5Ssimp.c
./src/H5Z.c             [NEW]
./src/H5Zprivate.h      [NEW]
./src/H5Zpublic.h       [NEW]
./src/Makefile.in
./src/hdf5.h
./test/dsets.c
./test/istore.c
        Compression is now mostly working.  Don't try to open a
        compressed dataset though because the compression message
        won't be read.

./html/Datatypes.html
./html/H5.api.html
./src/H5.c
./src/H5private.h
./src/H5D.c
./src/H5T.c
./src/H5Tconv.c
./src/H5Tpkg.h
./src/H5Tprivate.h
./src/H5Tpublic.h
        Added timing support.  When compiled with H5T_DEBUG defined
        the library will print conversion bandwidths when the library
        closes.  The H5Tregister functions take a string as the first
        argument so the statistics output is meaningful.

./MANIFEST
        Added new files.

./configure.in
./src/H5config.h.in
        Check for getrusage().  Check for compress2() in libz.a and
        the zlib.h header file.  Added `z' to the debug list.

./src/H5B.c
./src/H5Bprivate.h
./src/H5Gnode.c
./src/debug.c
        Cleaned up some indentation and added support to print istore
        B-trees.  From the debugger, give the B-tree address and the
        dimensionality from the layout message of the object header.

./src/h5ls.c
        The oid is printed as  w:x:y:z where w and x are the file ID
        and y and z are the OID within the file.  You can give z or
        y*2^32+z as an argument to the debugger to print the object
        header for the object.

./src/H5AC.c
        Cleaned up statistics and made them match those reported by
        H5T and H5Z.

./src/H5MM.c
./src/H5MMprivate.h
./src/H5Fistore.c
        Finally got rid of a couple of long-standing const cast
        warnings.

1 files changed, 86 insertions, 0 deletions

diff --git a/src/H5MF.c b/src/H5MF.c
index 9d22c8a..fd5031b 100644
--- a/src/H5MF.c
+++ b/src/H5MF.c
@@ -128,3 +128,89 @@ H5MF_free(H5F_t __unused__ *f, const haddr_t *addr, hsize_t size)
 
     FUNC_LEAVE(SUCCEED);
 }
+
+
+/*-------------------------------------------------------------------------
+ * Function:	H5MF_realloc
+ *
+ * Purpose:	Changes the size of an allocated chunk, possibly moving it to
+ *		a new address.  The chunk to change is at address ORIG_ADDR
+ *		and is exactly ORIG_SIZE bytes (if these are zero and undef
+ *		then this function acts like H5MF_alloc).  The new size will
+ *		be NEW_SIZE and its address is returned though NEW_ADDR (if
+ *		NEW_SIZE is zero then this function acts like H5MF_free and
+ *		an undefined address is returned for NEW_ADDR).
+ *
+ *		If the new size is less than the old size then the new
+ *		address will be the same as the old address (except for the
+ *		special case where the new size is zero).
+ *
+ *		If the new size is more than the old size then most likely a
+ *		new address will be returned.  However, under certain
+ *		circumstances the library may return the same address.
+ *
+ * Return:	Success:	SUCCEED
+ *
+ *		Failure:	FAIL
+ *
+ * Programmer:	Robb Matzke
+ *              Thursday, April 16, 1998
+ *
+ * Modifications:
+ *
+ *-------------------------------------------------------------------------
+ */
+herr_t
+H5MF_realloc (H5F_t *f, intn op, hsize_t orig_size, const haddr_t *orig_addr,
+	      hsize_t new_size, haddr_t *new_addr/*out*/)
+{
+    FUNC_ENTER (H5MF_realloc, FAIL);
+
+    if (0==orig_size) {
+	/* Degenerate to H5MF_alloc() */
+	assert (!H5F_addr_defined (orig_addr));
+	if (new_size>0) {
+	    if (H5MF_alloc (f, op, new_size, new_addr/*out*/)<0) {
+		HRETURN_ERROR (H5E_RESOURCE, H5E_CANTINIT, FAIL,
+			       "unable to allocate new file memory");
+	    }
+	} else {
+	    H5F_addr_undef (new_addr);
+	}
+	
+    } else if (0==new_size) {
+	/* Degenerate to H5MF_free() */
+	assert (H5F_addr_defined (orig_addr));
+	if (H5MF_free (f, orig_addr, orig_size)<0) {
+	    HRETURN_ERROR (H5E_RESOURCE, H5E_CANTINIT, FAIL,
+			   "unable to free old file memory");
+	}
+	H5F_addr_undef (new_addr);
+	
+    } else if (new_size > orig_size) {
+	/* Size is getting larger */
+	if (H5MF_alloc (f, op, new_size, new_addr/*out*/)<0) {
+	    HRETURN_ERROR (H5E_RESOURCE, H5E_CANTINIT, FAIL,
+			   "unable to allocate new file memory");
+	}
+	if (H5MF_free (f, orig_addr, orig_size)<0) {
+	    HRETURN_ERROR (H5E_RESOURCE, H5E_CANTINIT, FAIL,
+			   "unable to free old file memory");
+	}
+
+    } else {
+	/* New size is not larger */
+#ifdef H5MF_DEBUG
+	if (new_size<orig_size) {
+	    HDfprintf (stderr, "H5MF: realloc lost %Hd bytes\n",
+		       orig_size-new_size);
+	}
+#endif
+	*new_addr = *orig_addr;
+    }
+
+    FUNC_LEAVE (SUCCEED);
+}
+
+	    
+