1
0
mirror of https://github.com/TREX-CoE/trexio.git synced 2025-01-05 11:00:30 +01:00

Removed H5LTfind_dataset

This commit is contained in:
Anthony Scemama 2023-01-14 11:43:11 +01:00
parent 3f0a3d62ad
commit 5dff6491aa

View File

@ -411,7 +411,8 @@ trexio_hdf5_write_$group_dset$ (trexio_t* const file, const $group_dset_dtype$*
Consider using HDF5-native h5repack utility after deleting/overwriting big datasets. Consider using HDF5-native h5repack utility after deleting/overwriting big datasets.
,*/ ,*/
if (H5LTfind_dataset(f->$group$_group, $GROUP_DSET$_NAME) == 1 && file->mode == 'u') {
if ((trexio_hdf5_has_$group_dset$(file) == TREXIO_SUCCESS) && (file->mode == 'u')) {
herr_t status_del = H5Ldelete(f->$group$_group, $GROUP_DSET$_NAME, H5P_DEFAULT); herr_t status_del = H5Ldelete(f->$group$_group, $GROUP_DSET$_NAME, H5P_DEFAULT);
if (status_del < 0) return TREXIO_FAILURE; if (status_del < 0) return TREXIO_FAILURE;
} }
@ -454,14 +455,13 @@ trexio_hdf5_has_$group_dset$ (trexio_t* const file)
trexio_hdf5_t* f = (trexio_hdf5_t*) file; trexio_hdf5_t* f = (trexio_hdf5_t*) file;
if (f->$group$_group == (hsize_t) 0) return TREXIO_HAS_NOT; if (f->$group$_group == (hsize_t) 0) return TREXIO_HAS_NOT;
herr_t status = H5LTfind_dataset(f->$group$_group, $GROUP_DSET$_NAME); htri_t exists = H5Lexists(f->$group$_group, $GROUP_DSET$_NAME, H5P_DEFAULT);
/* H5LTfind_dataset returns 1 if dataset exists, 0 otherwise */ if (exists > 0) {
if (status == 1){
return TREXIO_SUCCESS; return TREXIO_SUCCESS;
} else if (status == 0) { } else if (exists < 0) {
return TREXIO_HAS_NOT;
} else {
return TREXIO_FAILURE; return TREXIO_FAILURE;
} else {
return TREXIO_HAS_NOT;
} }
} }
@ -534,7 +534,7 @@ trexio_hdf5_write_$group_dset$ (trexio_t* const file,
trexio_exit_code rc_write = TREXIO_FAILURE; trexio_exit_code rc_write = TREXIO_FAILURE;
/* NOTE: chunk size is set upon creation of the HDF5 dataset and cannot be changed ! */ /* NOTE: chunk size is set upon creation of the HDF5 dataset and cannot be changed ! */
if ( H5LTfind_dataset(f->$group$_group, dset_index_name) != 1 ) { if (trexio_hdf5_has_$group_dset$(file) == TREXIO_HAS_NOT) {
/* If the file does not exist -> create it and write */ /* If the file does not exist -> create it and write */
/* Create chunked dataset with index_dtype datatype and write indices into it */ /* Create chunked dataset with index_dtype datatype and write indices into it */
@ -657,14 +657,13 @@ trexio_hdf5_has_$group_dset$ (trexio_t* const file)
trexio_hdf5_t* f = (trexio_hdf5_t*) file; trexio_hdf5_t* f = (trexio_hdf5_t*) file;
if (f->$group$_group == (hsize_t) 0) return TREXIO_HAS_NOT; if (f->$group$_group == (hsize_t) 0) return TREXIO_HAS_NOT;
herr_t status = H5LTfind_dataset(f->$group$_group, $GROUP_DSET$_NAME "_values"); htri_t exists = H5Lexists(f->$group$_group, $GROUP_DSET$_NAME "_values", H5P_DEFAULT);
/* H5LTfind_dataset returns 1 if dataset exists, 0 otherwise */ if (exists > 0) {
if (status == 1){
return TREXIO_SUCCESS; return TREXIO_SUCCESS;
} else if (status == 0) { } else if (exists < 0) {
return TREXIO_HAS_NOT;
} else {
return TREXIO_FAILURE; return TREXIO_FAILURE;
} else {
return TREXIO_HAS_NOT;
} }
} }
@ -728,7 +727,7 @@ trexio_exit_code trexio_hdf5_write_$group_dset$(trexio_t* const file,
trexio_exit_code rc_write = TREXIO_FAILURE; trexio_exit_code rc_write = TREXIO_FAILURE;
/* NOTE: chunk size is set upon creation of the HDF5 dataset and cannot be changed ! */ /* NOTE: chunk size is set upon creation of the HDF5 dataset and cannot be changed ! */
if ( H5LTfind_dataset(f->$group$_group, dset_name) != 1 ) { if (trexio_hdf5_has_$group_dset$(file) == TREXIO_HAS_NOT) {
/* If the file does not exist -> create it and write */ /* If the file does not exist -> create it and write */
/* Create chunked dataset with dtype datatype and write indices into it */ /* Create chunked dataset with dtype datatype and write indices into it */
@ -793,14 +792,13 @@ trexio_exit_code trexio_hdf5_has_$group_dset$(trexio_t* const file)
const char dset_name[256] = "$group_dset$"; const char dset_name[256] = "$group_dset$";
herr_t status = H5LTfind_dataset(f->$group$_group, dset_name); htri_t exists = H5Lexists(f->$group$_group, dset_name, H5P_DEFAULT);
/* H5LTfind_dataset returns 1 if dataset exists, 0 otherwise */ if (exists > 0) {
if (status == 1){
return TREXIO_SUCCESS; return TREXIO_SUCCESS;
} else if (status == 0) { } else if (exists < 0) {
return TREXIO_HAS_NOT;
} else {
return TREXIO_FAILURE; return TREXIO_FAILURE;
} else {
return TREXIO_HAS_NOT;
} }
} }
#+end_src #+end_src
@ -936,7 +934,7 @@ trexio_hdf5_write_$group_dset$ (trexio_t* const file, const char** $group_dset$,
Consider using HDF5-provided h5repack utility after deleting/overwriting big datasets. Consider using HDF5-provided h5repack utility after deleting/overwriting big datasets.
,*/ ,*/
if (H5LTfind_dataset(f->$group$_group, $GROUP_DSET$_NAME) == 1 && file->mode == 'u') { if ( (trexio_hdf5_has_$group_dset$(file) == TREXIO_SUCCESS) && (file->mode == 'u') ) {
herr_t status_del = H5Ldelete(f->$group$_group, $GROUP_DSET$_NAME, H5P_DEFAULT); herr_t status_del = H5Ldelete(f->$group$_group, $GROUP_DSET$_NAME, H5P_DEFAULT);
if (status_del < 0) return TREXIO_FAILURE; if (status_del < 0) return TREXIO_FAILURE;
} }
@ -991,14 +989,13 @@ trexio_hdf5_has_$group_dset$ (trexio_t* const file)
trexio_hdf5_t* f = (trexio_hdf5_t*) file; trexio_hdf5_t* f = (trexio_hdf5_t*) file;
if (f->$group$_group == (hsize_t) 0) return TREXIO_HAS_NOT; if (f->$group$_group == (hsize_t) 0) return TREXIO_HAS_NOT;
herr_t status = H5LTfind_dataset(f->$group$_group, $GROUP_DSET$_NAME); htri_t exists = H5Lexists(f->$group$_group, $GROUP_DSET$_NAME, H5P_DEFAULT);
/* H5LTfind_dataset returns 1 if dataset exists, 0 otherwise */ if (exists > 0) {
if (status == 1){
return TREXIO_SUCCESS; return TREXIO_SUCCESS;
} else if (status == 0) { } else if (exists < 0) {
return TREXIO_HAS_NOT;
} else {
return TREXIO_FAILURE; return TREXIO_FAILURE;
} else {
return TREXIO_HAS_NOT;
} }
} }
@ -1231,7 +1228,7 @@ trexio_exit_code trexio_hdf5_write_determinant_list(trexio_t* const file,
trexio_exit_code rc_write = TREXIO_FAILURE; trexio_exit_code rc_write = TREXIO_FAILURE;
/* NOTE: chunk size is set upon creation of the HDF5 dataset and cannot be changed ! */ /* NOTE: chunk size is set upon creation of the HDF5 dataset and cannot be changed ! */
if ( H5LTfind_dataset(f->determinant_group, dset_det_name) != 1 ) { if ( trexio_hdf5_has_determinant_list(file) == TREXIO_HAS_NOT ) {
/* If the file does not exist -> create it and write */ /* If the file does not exist -> create it and write */
/* Create chunked dataset with det_dtype datatype and write indices into it */ /* Create chunked dataset with det_dtype datatype and write indices into it */
@ -1260,14 +1257,13 @@ trexio_exit_code trexio_hdf5_has_determinant_list(trexio_t* const file)
trexio_hdf5_t* f = (trexio_hdf5_t*) file; trexio_hdf5_t* f = (trexio_hdf5_t*) file;
if (f->determinant_group == (hsize_t) 0) return TREXIO_HAS_NOT; if (f->determinant_group == (hsize_t) 0) return TREXIO_HAS_NOT;
herr_t status = H5LTfind_dataset(f->determinant_group, "determinant_list"); htri_t exists = H5Lexists(f->determinant_group, "determinant_list", H5P_DEFAULT);
/* H5LTfind_dataset returns 1 if dataset exists, 0 otherwise */ if (exists > 0) {
if (status == 1){
return TREXIO_SUCCESS; return TREXIO_SUCCESS;
} else if (status == 0) { } else if (exists < 0) {
return TREXIO_HAS_NOT;
} else {
return TREXIO_FAILURE; return TREXIO_FAILURE;
} else {
return TREXIO_HAS_NOT;
} }
} }
#+end_src #+end_src