mirror/hdf5
2
0
Fork 0
mirror of https://github.com/HDFGroup/hdf5.git synced 2025-02-11 16:01:00 +08:00
Code Issues Packages Projects Releases Wiki Activity

[svn-r13943] Description:

Browse Source 
Allow H5Dset_extent() to reduce the size of dimensions that aren't unlimited

Tested on:
    Mac OS X/32 10.4.10 (amazon)
    Linux/32 2.6 (chicago)
    Linux/64 2.6 (chicago2)
This commit is contained in:
Quincey Koziol 2007-07-05 10:44:30 -05:00
parent 18d75c9985
commit 5c420a9180
1 changed files with 19 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
src/H5S.c
View File

@ -2086,28 +2086,30 @@ done:
*-------------------------------------------------------------------------
*/
int
H5S_set_extent( H5S_t *space, const hsize_t *size )
H5S_set_extent(H5S_t *space, const hsize_t *size)
{
unsigned u;
herr_t ret_value=0;
unsigned u; /* Local index variable */
herr_t ret_value = 0; /* Return value */
FUNC_ENTER_NOAPI( H5S_set_extent, FAIL );
FUNC_ENTER_NOAPI(H5S_set_extent, FAIL);
/* Check args */
assert( space && H5S_SIMPLE==H5S_GET_EXTENT_TYPE(space) );
assert( size);
HDassert(space && H5S_SIMPLE == H5S_GET_EXTENT_TYPE(space));
HDassert(size);
/* Verify that the dimensions being changed are allowed to change */
for ( u = 0; u < space->extent.rank; u++ ) {
if ( space->extent.max && H5S_UNLIMITED != space->extent.max[u] &&
space->extent.max[u]!=size[u] )
HGOTO_ERROR(H5E_ARGS, H5E_BADVALUE, FAIL,"dimension cannot be modified")
ret_value++;
for(u = 0; u < space->extent.rank; u++) {
if(space->extent.size[u] != size[u]) {
if(space->extent.max && H5S_UNLIMITED != space->extent.max[u] &&
space->extent.max[u] < size[u])
HGOTO_ERROR(H5E_ARGS, H5E_BADVALUE, FAIL, "dimension cannot be modified")
ret_value++;
} /* end if */
} /* end for */
/* Update */
if (ret_value)
H5S_set_extent_real(space,size);
if(ret_value)
H5S_set_extent_real(space, size);
done:
FUNC_LEAVE_NOAPI(ret_value);
@ -2186,6 +2188,10 @@ H5S_set_extent_real( H5S_t *space, const hsize_t *size )
if(H5S_select_all(space, FALSE)<0)
HGOTO_ERROR(H5E_DATASPACE, H5E_CANTDELETE, FAIL, "can't change selection")
/* Mark the dataspace as no longer shared if it was before */
if(H5O_msg_reset_share(H5O_SDSPACE_ID, space) < 0)
HGOTO_ERROR(H5E_DATASPACE, H5E_CANTRESET, FAIL, "can't stop sharing dataspace")
done:
FUNC_LEAVE_NOAPI(ret_value);
} /* end H5S_set_extent_real() */