int main(void) { hid_t file=-1, dcpl=-1, space=-1, dset1=-1, dset2=-1; hsize_t cur_size[2]= {8, 8}; H5D_space_status_t allocation; int fill_val1 = 4444, fill_val2=5555; if((file=H5Fcreate(FILENAME, H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT)) <0) goto error; if((space=H5Screate_simple(2, cur_size, cur_size)) < 0) goto error; if((dcpl=H5Pcreate(H5P_DATASET_CREATE)) < 0) goto error; /* Create a dataset with space being allocated and fill value written */ if(H5Pset_alloc_time(dcpl, H5D_ALLOC_TIME_EARLY) < 0) goto error; if(H5Pset_fill_time(dcpl, H5D_FILL_TIME_ALLOC) < 0) goto error; if(H5Pset_fill_value(dcpl, H5T_NATIVE_INT, &fill_val1) < 0) goto error; if((dset1 = H5Dcreate2(file, "dset1", H5T_NATIVE_INT, space, H5P_DEFAULT, dcpl, H5P_DEFAULT)) < 0) goto error; if(H5Dget_space_status(dset1, &allocation) < 0) goto error; if(allocation == H5D_SPACE_STATUS_NOT_ALLOCATED) { puts(" Got unallocated space instead of allocated."); printf(" Got %d\n", allocation); goto error; } if(H5Dclose(dset1) < 0) goto error; /* Create a dataset with space allocation being delayed */ if(H5Pset_alloc_time(dcpl, H5D_ALLOC_TIME_LATE) < 0) goto error; if(H5Pset_fill_time(dcpl, H5D_FILL_TIME_ALLOC) < 0) goto error; if(H5Pset_fill_value(dcpl, H5T_NATIVE_INT, &fill_val2) < 0) goto error; if((dset2 = H5Dcreate2(file, "dset2", H5T_NATIVE_INT, space, H5P_DEFAULT, dcpl, H5P_DEFAULT)) < 0) goto error; if(H5Dget_space_status(dset2, &allocation) < 0) goto error; if(allocation != H5D_SPACE_STATUS_NOT_ALLOCATED) { puts(" Got allocated space instead of unallocated."); printf(" Got %d\n", allocation); goto error; } if(H5Dclose(dset2) < 0) goto error; if(H5Sclose(space) < 0) goto error; if(H5Pclose(dcpl) < 0) goto error; if(H5Fclose(file) < 0) goto error; return 0; error: H5E_BEGIN_TRY { H5Pclose(dcpl); H5Sclose(space); H5Dclose(dset1); H5Dclose(dset2); H5Fclose(file); } H5E_END_TRY; return 1; }
SpaceAllocationStatus Dataset::getSpaceAllocationStatus() const { // {{{ H5D_space_status_t status; assertSuccess( "getting dataset space allocation status", H5Dget_space_status(getId(),&status) ); return static_cast<SpaceAllocationStatus>(status); } // }}}
/****if* H5Df/h5dget_space_status_c * NAME * h5dget_space_status_c * PURPOSE * Call H5Dget_space_status to request dataspace allocation status * INPUTS * dset_id - dataset identifier * OUTPUTS * flag - status flag * RETURNS * 0 on success, -1 on failure * AUTHOR * Elena Pourmal * Wednesday, March 12, 2003 * HISTORY * * SOURCE */ int_f h5dget_space_status_c ( hid_t_f *dset_id, int_f *flag) /******/ { int ret_value = -1; herr_t ret; hid_t c_dset_id; H5D_space_status_t c_flag; c_dset_id = (hid_t)*dset_id; /* * Call H5Dget_space_status */ ret = H5Dget_space_status(c_dset_id, &c_flag); if (ret < 0) return ret_value; *flag = (int_f)c_flag; ret_value = 0; return ret_value; }