[svn-r6882] Purpose:

Bug Fix

Description:
    The H5HG module had a couple of lines like the following:

        HDmemcpy(foo + 1, foo, size);

    This would overwrite the first character of "foo" for the total of
    "size" bytes.

    The H5Pfapl.c is an update of the trace information.

Solution:
    Use HDmemmove instead. (Suggested by George Lewandowski at Boeing.
    Thanks! :-)


Platforms tested:
    Modi4 (Fortran & Parallel)
    Verbena (Fortran & C++)
    Arabica (Fortran)

Misc. update:
This commit is contained in:
Bill Wendling 2003-05-15 18:28:15 -05:00
parent 6377386751
commit f5500a0051
2 changed files with 6 additions and 2 deletions

View File

@ -425,13 +425,13 @@ H5HG_load (H5F_t *f, hid_t dxpl_id, haddr_t addr, const void UNUSED * udata1,
} else if (H5HG_NCWFS==f->shared->ncwfs) {
for (i=H5HG_NCWFS-1; i>=0; --i) {
if (f->shared->cwfs[i]->obj[0].size < heap->obj[0].size) {
HDmemcpy (f->shared->cwfs+1, f->shared->cwfs, i * sizeof(H5HG_heap_t*));
HDmemmove (f->shared->cwfs+1, f->shared->cwfs, i * sizeof(H5HG_heap_t*));
f->shared->cwfs[0] = heap;
break;
}
}
} else {
HDmemcpy (f->shared->cwfs+1, f->shared->cwfs, f->shared->ncwfs*sizeof(H5HG_heap_t*));
HDmemmove (f->shared->cwfs+1, f->shared->cwfs, f->shared->ncwfs*sizeof(H5HG_heap_t*));
f->shared->ncwfs += 1;
f->shared->cwfs[0] = heap;
}

View File

@ -528,6 +528,7 @@ H5Pset_family_offset(hid_t fapl_id, hsize_t offset)
herr_t ret_value=SUCCEED; /* return value */
FUNC_ENTER_API(H5Pset_family_offset, FAIL);
H5TRACE2("e","ih",fapl_id,offset);
/* Get the plist structure */
if(H5P_DEFAULT == fapl_id)
@ -604,6 +605,7 @@ H5Pget_family_offset(hid_t fapl_id, hsize_t *offset)
herr_t ret_value=SUCCEED; /* return value */
FUNC_ENTER_API(H5Pget_family_offset, FAIL);
H5TRACE2("e","i*h",fapl_id,offset);
/* Get the plist structure */
if(H5P_DEFAULT == fapl_id)
@ -680,6 +682,7 @@ H5Pset_multi_type(hid_t fapl_id, H5FD_mem_t type)
herr_t ret_value=SUCCEED; /* return value */
FUNC_ENTER_API(H5Pset_multi_type, FAIL);
H5TRACE2("e","iMt",fapl_id,type);
/* Get the plist structure */
if(H5P_DEFAULT == fapl_id)
@ -756,6 +759,7 @@ H5Pget_multi_type(hid_t fapl_id, H5FD_mem_t *type)
herr_t ret_value=SUCCEED; /* return value */
FUNC_ENTER_API(H5Pget_multi_type, FAIL);
H5TRACE2("e","i*Mt",fapl_id,type);
/* Get the plist structure */
if(H5P_DEFAULT == fapl_id)