index : hdf5.git	architecture_docs develop develop-readme feature/1_12_recursive_ts_rw_lock feature/alignment feature/async2 feature/ccio feature/coding_standards feature/de-hd feature/h5detect feature/h5f_get_obj_rework feature/indexing feature/new_datatypes feature/onion_vfd feature/parallel_h5repack feature/refactor-h5t-cmp feature/select_io_chunk_cache feature/select_io_tconv feature/vfd_swmr feature/vfd_swmr_beta_2 feature/vol_cap_flags feature/vol_tools_tests feature/werror-restrict gh-pages hdf5_1_10 hdf5_1_10_10 hdf5_1_10_11 hdf5_1_10_9 hdf5_1_12 hdf5_1_12_2 hdf5_1_12_3 hdf5_1_13_2 hdf5_1_13_3 hdf5_1_14 hdf5_1_14_0 hdf5_1_14_1 hdf5_1_14_2 hdf5_1_14_3 hdf5_1_6 hdf5_1_8 hdf5_1_8_23 inactive/110_HDFFV-10808-h5pset_file_space_strategy inactive/H5Ocompare inactive/NPOESS inactive/aio_vfd inactive/avoid_truncate inactive/cu_dev inactive/develop_subfiling inactive/develop_subfiling_v1 inactive/direct_io_2 inactive/h5ocompare inactive/hdf5_daosm inactive/hdf5_ff inactive/hdf5_ff_compactor inactive/hdf5_rados inactive/jpeg_converter inactive/json_vol inactive/json_vol_old inactive/mdc_sl_opt inactive/mds inactive/merge_metadata_journaling inactive/metadata_journaling inactive/modify_dtype_filter inactive/multi_rd_wd_coll_io inactive/multi_rd_wd_coll_io_merge inactive/null_vfd inactive/parallel_vds inactive/parallel_vds_develop inactive/parallel_vds_testing inactive/phdf5_metadata_opt inactive/post_open_fix inactive/rados_vol inactive/selection_io inactive/selection_io_with_subfiling_vfd inactive/trunk_merge_coverity loricooperhdf-patch-1 metadata_cache_macro_cleanup ossf-scorecard pr_484 reduce-h5f-duplication sel_io_chunk_cache shell_script zzz-gitlab-ci
	Mirror from: https://github.com/HDFGroup/hdf5.git

summaryrefslogtreecommitdiffstats

log msg author committer range

Branch	Commit message	Author	Age
architecture_docs	Update README.md	Gerd Heber	3 years
develop	Fix an issue where the Subfiling VFD's context cache grows too large (#4159)	jhendersonHDF	18 months
develop-readme	Update Linux workflows (#3173)	Dana Robinson	2 years
feature/1_12_recursive_ts_rw_lock	Updates BRANCH.md file	Dana Robinson	3 years
feature/alignment	Per discussion, use HD and add comments.	David Young	4 years
feature/async2	Update pr-check.yml	Les Kurz	5 years
feature/ccio	Correcting H5FD__mpio_custom_<read,write> syntax to have two _ characters.	Rick	7 years
feature/coding_standards	Merge branch 'develop' into feature/coding_standards	Dana Robinson	3 years
feature/de-hd	Try to turn off auto-formatting on this branch.	David Young	4 years
feature/h5detect	Committing clang-format changes	github-actions	3 years
feature/h5f_get_obj_rework	Replace internal API calls	Matthew Larson	18 months
feature/indexing	Removed redundant text	Richard Warren	6 years
feature/new_datatypes	Merge branch 'develop' into feature/new_datatypes	Dana Robinson	18 months
feature/onion_vfd	Sync with develop (#1863)	Dana Robinson	3 years
feature/parallel_h5repack	Sync branch with develop (#1616)	Scot Breitenfeld	3 years
feature/refactor-h5t-cmp	Merge branch 'feature/refactor-h5t-cmp' of github.com:HDFGroup/hdf5 into feat...	David Young	4 years
feature/select_io_chunk_cache	Committing clang-format changes	github-actions	21 months
feature/select_io_tconv	Merge pull request #2876 from vchoi-hdfgroup/2my_feature_select_io_tconv	Neil Fortner	2 years
feature/vfd_swmr	VFD SWMR: Warning fixes and minor cleanup (#1847)	Dana Robinson	3 years
feature/vfd_swmr_beta_2	Update VFD SWMR UG	Dana Robinson	3 years
feature/vol_cap_flags	Convert unsigned cap flag field to uint64_t and add flags (#2050)	Dana Robinson	3 years
feature/vol_tools_tests	Move changes from external repo to main repo (#3718)	Glenn Song	23 months
feature/werror-restrict	Merge branch 'develop' into feature/werror-restrict	Dana Robinson	3 years
gh-pages	deploy: 2908dd1d12f82b3ad559e98ae639fac2c238bcdd	lrknox	18 months
hdf5_1_10	Added RELEASE.txt from HDF5 1.10.11 release to HISTORY-1_10.txt. (#3611)	Larry Knox	24 months
hdf5_1_10_10	Update release date. (#2655)	Larry Knox	2 years
hdf5_1_10_11	Create 11011 tarball (#3596)	Larry Knox	24 months
hdf5_1_10_9	Remove duplicate line from README.md.	Larry Knox	3 years
hdf5_1_12	Adjust some CMake settings (#3828)	Allen Byrne	22 months
hdf5_1_12_2	HDF5 1.12.2 release created April 19, 2022.	Larry Knox	3 years
hdf5_1_12_3	Hdf5 1 12 3 release (#3833)	Larry Knox	22 months
hdf5_1_13_2	Update READMERE.md and RELEASE.txt with release date.	Larry Knox	3 years
hdf5_1_13_3	Hdf5 1 13 3 - RELEASE.txt updates (#2203)	Larry Knox	3 years
hdf5_1_14	Fix typo/stray character in cmake-ctest.yml (#4128)	Larry Knox	18 months
hdf5_1_14_0	Commit release date.	Larry Knox	3 years
hdf5_1_14_1	Hdf5 1 14 1-2 release for autoconf 2.71 generated files (#2945)	Larry Knox	2 years
hdf5_1_14_2	Update release - fix bug and update date (#3380)	Larry Knox	2 years
hdf5_1_14_3	Release updates (#3792)	Larry Knox	23 months
hdf5_1_6	Merge pull request #1730 in HDFFV/hdf5 from ~BRTNFLD/hdf5_msb:hdf5_1_6 to hdf...	Scot Breitenfeld	6 years
hdf5_1_8	Correct script for 3.12 and update HPC process (#2435)	Allen Byrne	3 years
hdf5_1_8_23	Update release date in RELEASE.txt (#2440)	Larry Knox	3 years
inactive/110_HDFFV-10808-h5pset_file_space_strategy	Merge pull request #1795 in HDFFV/hdf5 from ~BYRN/hdf5_adb:hdf5_1_10 to hdf5_...	Allen Byrne	6 years
inactive/H5Ocompare	[svn-r22275] Clear up examples vs applications instances and add minimum file.	Allen Byrne	13 years
inactive/NPOESS	[svn-r17496] Fixed obvious error : changed talign.c to talign on TEST_PROG as...	Allen Byrne	16 years
inactive/aio_vfd	[svn-r22505] Comment out create file that fail with the new/PGI compiler unti...	Larry Knox	13 years
inactive/avoid_truncate	[svn-r28002] merge from trunk.	Mohamad Chaarawi	10 years
inactive/cu_dev	Merge branch 'develop' into cu_dev	John Ravi	5 years
inactive/develop_subfiling	Added skeletal version of H5FDsubfiling.c and H5FDsubfiling.h.	mainzer	5 years
inactive/develop_subfiling_v1	Changed the usleep parameters based on whether the MPI rank hosts an IO Conce...	Richard Warren	5 years
inactive/direct_io_2	[svn-r26017] Added BRANCH.txt.	Dana Robinson	11 years
inactive/h5ocompare	[svn-r19890] Add initial implementation for H5Ocompare and usage in h5diff. ...	Neil Fortner	15 years
inactive/hdf5_daosm	Fix uninitialized return value bugs.	Neil Fortner	8 years
inactive/hdf5_ff	added *ff* files dependency	Scot Breitenfeld	9 years
inactive/hdf5_ff_compactor	[svn-r24100] minor fix while creating a memory datatype for native writes	Vishwanath Venkatesan	12 years
inactive/hdf5_rados	Merge pull request #1585 in HDFFV/hdf5 from ~DEROBINS/hdf5_der:hdf5_rados to ...	Dana Robinson	7 years
inactive/jpeg_converter	[svn-r15458] Purpose: Modify the library to take the proper action when files...	Neil Fortner	17 years
inactive/json_vol	Merge pull request #1633 in HDFFV/hdf5 from ~DEROBINS/hdf5_der:feature/json_v...	Dana Robinson	6 years
inactive/json_vol_old	cleanup, commenting	Frank Willmore	8 years
inactive/mdc_sl_opt	Minor copy edits to comments -- no code changes.	mainzer	5 years
inactive/mds	[svn-r23487] use the core driver at the server side for the metadata file	Mohamad Chaarawi	12 years
inactive/merge_metadata_journaling	[svn-r24779] Description:	Quincey Koziol	12 years
inactive/metadata_journaling	[svn-r22480] Description:	Quincey Koziol	13 years
inactive/modify_dtype_filter	[svn-r15820] Added a design document describing the design details for the fi...	Raymond Lu	17 years
inactive/multi_rd_wd_coll_io	[svn-r29709] another merge from trunk.	Mohamad Chaarawi	9 years
inactive/multi_rd_wd_coll_io_merge	Merge pull request #837 in HDFFV/hdf5 from ~LRKNOX/hdf5_lrk:multi_rd_wd_coll_...	Larry Knox	8 years
inactive/null_vfd	[svn-r22705] Updated the failure behavior of inner driver calls. Expanded the...	Jacob Gruber	13 years
inactive/parallel_vds	Some fixes from Neil plus changes talked about in our last code review	Richard Warren	7 years
inactive/parallel_vds_develop	Merge branch 'develop' into parallel_vds_develop	M. Scot Breitenfeld	6 years
inactive/parallel_vds_testing	Add two(2) new parallel VDS tests, the VDS merge code for Neil, and a few edi...	Richard Warren	8 years
inactive/phdf5_metadata_opt	[svn-r29080] merge from trunk.	Mohamad Chaarawi	10 years
inactive/post_open_fix	Added a BRANCH.md file	Dana Robinson	3 years
inactive/rados_vol	Merge pull request #1641 in HDFFV/hdf5 from ~DEROBINS/hdf5_der:feature/rados_...	Dana Robinson	6 years
inactive/selection_io	Merge pull request #1531 from fortnern/selection_io	Neil Fortner	3 years
inactive/selection_io_with_subfiling_vfd	spelling corrections (#1382)	Scot Breitenfeld	4 years
inactive/trunk_merge_coverity	[svn-r23698] Description:	Quincey Koziol	12 years
loricooperhdf-patch-1	Updated help desk URL	Lori Cooper	21 months
metadata_cache_macro_cleanup	remove obsolete SZIP find module (#2901)	Allen Byrne	2 years
ossf-scorecard	Create scorecard.yml	Dana Robinson	2 years
pr_484	Committing clang-format changes	github-actions	4 years
reduce-h5f-duplication	Instead of duplicating H5F_shared_block_write() and _read() wholesale in	David Young	6 years
sel_io_chunk_cache	Committing clang-format changes	github-actions	21 months
shell_script	Remove unneeded/duplicated files	Jordan Henderson	24 months
zzz-gitlab-ci	Run test without submitting to CDash.	Larry Knox	5 years
Tag	Download	Author	Age
snapshot	snapshot.zip  snapshot.tar.gz  snapshot.tar.bz2	lrknox	18 months
snapshot-1.14	snapshot-1.14.zip  snapshot-1.14.tar.gz  snapshot-1.14.tar.bz2	byrnHDF	19 months
hdf5-1_12_3	hdf5-1_12_3.zip  hdf5-1_12_3.tar.gz  hdf5-1_12_3.tar.bz2	Larry Knox	22 months
snapshot-1.12	snapshot-1.12.zip  snapshot-1.12.tar.gz  snapshot-1.12.tar.bz2	byrnHDF	23 months
hdf5-1_14_3	hdf5-1_14_3.zip  hdf5-1_14_3.tar.gz  hdf5-1_14_3.tar.bz2	Larry Knox	23 months
hdf5-1_14_3-rc1	hdf5-1_14_3-rc1.zip  hdf5-1_14_3-rc1.tar.gz  hdf5-1_14_3-rc1.tar.bz2	Larry Knox	23 months
snapshot-1.10	snapshot-1.10.zip  snapshot-1.10.tar.gz  snapshot-1.10.tar.bz2	byrnHDF	24 months
hdf5-1_10_11	hdf5-1_10_11.zip  hdf5-1_10_11.tar.gz  hdf5-1_10_11.tar.bz2	Larry Knox	24 months
hdf5-1_14_2	hdf5-1_14_2.zip  hdf5-1_14_2.tar.gz  hdf5-1_14_2.tar.bz2	Larry Knox	2 years
hdf5-1_14_1-2	hdf5-1_14_1-2.zip  hdf5-1_14_1-2.tar.gz  hdf5-1_14_1-2.tar.bz2	Larry Knox	2 years
1.14.1	hdf5-1.14.1.zip  hdf5-1.14.1.tar.gz  hdf5-1.14.1.tar.bz2	Larry Knox	2 years
hdf5-1_14_1	hdf5-1_14_1.zip  hdf5-1_14_1.tar.gz  hdf5-1_14_1.tar.bz2	Larry Knox	2 years
hdf5-1_10_10	hdf5-1_10_10.zip  hdf5-1_10_10.tar.gz  hdf5-1_10_10.tar.bz2	Larry Knox	2 years
hdf5-1_8_23	hdf5-1_8_23.zip  hdf5-1_8_23.tar.gz  hdf5-1_8_23.tar.bz2	Larry Knox	3 years
hdf5-1_14_0	hdf5-1_14_0.zip  hdf5-1_14_0.tar.gz  hdf5-1_14_0.tar.bz2	Larry Knox	3 years
hdf5-1_13_3	hdf5-1_13_3.zip  hdf5-1_13_3.tar.gz  hdf5-1_13_3.tar.bz2	Larry Knox	3 years
hdf5-1_13_2	hdf5-1_13_2.zip  hdf5-1_13_2.tar.gz  hdf5-1_13_2.tar.bz2	Larry Knox	3 years
hdf5-1_10_9	hdf5-1_10_9.zip  hdf5-1_10_9.tar.gz  hdf5-1_10_9.tar.bz2	Larry Knox	3 years
hdf5_1_10_9-base	hdf5_1_10_9-base.zip  hdf5_1_10_9-base.tar.gz  hdf5_1_10_9-base.tar.bz2	Allen Byrne	3 years
hdf5-1_12_2	hdf5-1_12_2.zip  hdf5-1_12_2.tar.gz  hdf5-1_12_2.tar.bz2	Larry Knox	3 years
hdf5-1_12_2-3-rc1	hdf5-1_12_2-3-rc1.zip  hdf5-1_12_2-3-rc1.tar.gz  hdf5-1_12_2-3-rc1.tar.bz2	Larry Knox	3 years
hdf5-1_13_1	hdf5-1_13_1.zip  hdf5-1_13_1.tar.gz  hdf5-1_13_1.tar.bz2	Larry Knox	4 years
hdf5-1_13_0	hdf5-1_13_0.zip  hdf5-1_13_0.tar.gz  hdf5-1_13_0.tar.bz2	Larry Knox	4 years
hdf5-1_10_8	hdf5-1_10_8.zip  hdf5-1_10_8.tar.gz  hdf5-1_10_8.tar.bz2	Larry Knox	4 years
hdf5-1_13_0-rc6	hdf5-1_13_0-rc6.zip  hdf5-1_13_0-rc6.tar.gz  hdf5-1_13_0-rc6.tar.bz2	Larry Knox	4 years
vfd_swmr_beta_1	vfd_swmr_beta_1.zip  vfd_swmr_beta_1.tar.gz  vfd_swmr_beta_1.tar.bz2	Dana Robinson	4 years
hdf5-1_12_1	hdf5-1_12_1.zip  hdf5-1_12_1.tar.gz  hdf5-1_12_1.tar.bz2	Larry Knox	4 years
vfd_swmr_alpha_2	vfd_swmr_alpha_2.zip  vfd_swmr_alpha_2.tar.gz  vfd_swmr_alpha_2.tar.bz2	Dana Robinson	4 years
hdf5-1_8_22	hdf5-1_8_22.zip  hdf5-1_8_22.tar.gz  hdf5-1_8_22.tar.bz2	Larry Knox	5 years
hdf5-1_13_0-rc5	hdf5-1_13_0-rc5.zip  hdf5-1_13_0-rc5.tar.gz  hdf5-1_13_0-rc5.tar.bz2	Neil Fortner	5 years
hdf5-1_13_0-rc4	hdf5-1_13_0-rc4.zip  hdf5-1_13_0-rc4.tar.gz  hdf5-1_13_0-rc4.tar.bz2	Dana Robinson	5 years
hdf5-1_13_0-rc3	hdf5-1_13_0-rc3.zip  hdf5-1_13_0-rc3.tar.gz  hdf5-1_13_0-rc3.tar.bz2	Quincey Koziol	5 years
hdf5-1_13_0-rc2	hdf5-1_13_0-rc2.zip  hdf5-1_13_0-rc2.tar.gz  hdf5-1_13_0-rc2.tar.bz2	jhendersonHDF	5 years
hdf5-1_13_0-rc1	hdf5-1_13_0-rc1.zip  hdf5-1_13_0-rc1.tar.gz  hdf5-1_13_0-rc1.tar.bz2	Hans Johnson	5 years
hdf5-1.12.1-rc1	hdf5-1.12.1-rc1.zip  hdf5-1.12.1-rc1.tar.gz  hdf5-1.12.1-rc1.tar.bz2	Allen Byrne	5 years
hdf5-1_10_7	hdf5-1_10_7.zip  hdf5-1_10_7.tar.gz  hdf5-1_10_7.tar.bz2	Larry Knox	5 years
vfd_swmr_alpha_1	vfd_swmr_alpha_1.zip  vfd_swmr_alpha_1.tar.gz  vfd_swmr_alpha_1.tar.bz2	John Mainzer	5 years
hdf5-1_12_0	hdf5-1_12_0.zip  hdf5-1_12_0.tar.gz  hdf5-1_12_0.tar.bz2	Larry Knox	6 years
hdf5-1_12_0-initial	hdf5-1_12_0-initial.zip  hdf5-1_12_0-initial.tar.gz  hdf5-1_12_0-initial.tar.bz2	Larry Knox	6 years
hdf5-1_10_6	hdf5-1_10_6.zip  hdf5-1_10_6.tar.gz  hdf5-1_10_6.tar.bz2	Larry Knox	6 years
hdf5-1_12_0-alpha1	hdf5-1_12_0-alpha1.zip  hdf5-1_12_0-alpha1.tar.gz  hdf5-1_12_0-alpha1.tar.bz2	Larry Knox	6 years
hdf5-1_12_0-alpha0	hdf5-1_12_0-alpha0.zip  hdf5-1_12_0-alpha0.tar.gz  hdf5-1_12_0-alpha0.tar.bz2	Larry Knox	6 years
hdf5_1_12-initial	hdf5_1_12-initial.zip  hdf5_1_12-initial.tar.gz  hdf5_1_12-initial.tar.bz2	Larry Knox	6 years
hdf5-1_10_5	hdf5-1_10_5.zip  hdf5-1_10_5.tar.gz  hdf5-1_10_5.tar.bz2	Larry Knox	7 years
hdf5-1_10_4	hdf5-1_10_4.zip  hdf5-1_10_4.tar.gz  hdf5-1_10_4.tar.bz2	Larry Knox	7 years
Base_1_10_4	Base_1_10_4.zip  Base_1_10_4.tar.gz  Base_1_10_4.tar.bz2	Larry Knox	7 years
hdf5-1_10_3	hdf5-1_10_3.zip  hdf5-1_10_3.tar.gz  hdf5-1_10_3.tar.bz2	Larry Knox	7 years
hdf5-1_8_21	hdf5-1_8_21.zip  hdf5-1_8_21.tar.gz  hdf5-1_8_21.tar.bz2	Larry Knox	7 years
hdf5-1_10_2	hdf5-1_10_2.zip  hdf5-1_10_2.tar.gz  hdf5-1_10_2.tar.bz2	Larry Knox	7 years
hdf5-1_8_20	hdf5-1_8_20.zip  hdf5-1_8_20.tar.gz  hdf5-1_8_20.tar.bz2	Larry Knox	8 years
hdf5-1_8_19	hdf5-1_8_19.zip  hdf5-1_8_19.tar.gz  hdf5-1_8_19.tar.bz2	Larry Knox	8 years
hdf5-1_10_1	hdf5-1_10_1.zip  hdf5-1_10_1.tar.gz  hdf5-1_10_1.tar.bz2	Larry Knox	8 years
hdf5-1_8_18	hdf5-1_8_18.zip  hdf5-1_8_18.tar.gz  hdf5-1_8_18.tar.bz2	lrknox	9 years
hdf5-1_10_0-patch1	hdf5-1_10_0-patch1.zip  hdf5-1_10_0-patch1.tar.gz  hdf5-1_10_0-patch1.tar.bz2	Larry Knox	9 years
hdf5-1_8_17	hdf5-1_8_17.zip  hdf5-1_8_17.tar.gz  hdf5-1_8_17.tar.bz2	Larry Knox	9 years
hdf5-1_10_0	hdf5-1_10_0.zip  hdf5-1_10_0.tar.gz  hdf5-1_10_0.tar.bz2	Larry Knox	9 years
hdf5-1_10_0-alpha1	hdf5-1_10_0-alpha1.zip  hdf5-1_10_0-alpha1.tar.gz  hdf5-1_10_0-alpha1.tar.bz2	Elena Pourmal	10 years
hdf5-1_10_0-alpha0	hdf5-1_10_0-alpha0.zip  hdf5-1_10_0-alpha0.tar.gz  hdf5-1_10_0-alpha0.tar.bz2	Elena Pourmal	10 years
hdf5-1_8_16	hdf5-1_8_16.zip  hdf5-1_8_16.tar.gz  hdf5-1_8_16.tar.bz2	Larry Knox	10 years
hdf5_ff_v1	hdf5_ff_v1.zip  hdf5_ff_v1.tar.gz  hdf5_ff_v1.tar.bz2	Mohamad Chaarawi	10 years
hdf5-1_9_222-swmr0	hdf5-1_9_222-swmr0.zip  hdf5-1_9_222-swmr0.tar.gz  hdf5-1_9_222-swmr0.tar.bz2	Albert Cheng	10 years
hdf5-1_8_15-patch1	hdf5-1_8_15-patch1.zip  hdf5-1_8_15-patch1.tar.gz  hdf5-1_8_15-patch1.tar.bz2	Elena Pourmal	10 years
CCP_proto1	CCP_proto1.zip  CCP_proto1.tar.gz  CCP_proto1.tar.bz2	Albert Cheng	10 years
hdf5-1_8_15	hdf5-1_8_15.zip  hdf5-1_8_15.tar.gz  hdf5-1_8_15.tar.bz2	Elena Pourmal	10 years
hdf5_1_8_15_precodefreeze_final_commit	hdf5_1_8_15_precodefreeze_final_commit.zip  hdf5_1_8_15_precodefreeze_final_commit.tar.gz  hdf5_1_8_15_precodefreeze_final_commit.tar.bz2	Larry Knox	10 years
vms_last_support_1_8	vms_last_support_1_8.zip  vms_last_support_1_8.tar.gz  vms_last_support_1_8.tar.bz2	Dana Robinson	11 years
vms_last_support_trunk	vms_last_support_trunk.zip  vms_last_support_trunk.tar.gz  vms_last_support_trunk.tar.bz2	Dana Robinson	11 years
hdf5-1_8_14	hdf5-1_8_14.zip  hdf5-1_8_14.tar.gz  hdf5-1_8_14.tar.bz2	Elena Pourmal	11 years
hdf5-1_8_13	hdf5-1_8_13.zip  hdf5-1_8_13.tar.gz  hdf5-1_8_13.tar.bz2	Elena Pourmal	11 years
DLS_20140316	DLS_20140316.zip  DLS_20140316.tar.gz  DLS_20140316.tar.bz2	Elena Pourmal	11 years
before_removing_mpiposix_vfd	before_removing_mpiposix_vfd.zip  before_removing_mpiposix_vfd.tar.gz  before_removing_mpiposix_vfd.tar.bz2	Quincey Koziol	12 years
DECTRIS_20131231	DECTRIS_20131231.zip  DECTRIS_20131231.tar.gz  DECTRIS_20131231.tar.bz2	Elena Pourmal	12 years
DLS_20131204	DLS_20131204.zip  DLS_20131204.tar.gz  DLS_20131204.tar.bz2	Elena Pourmal	12 years
hdf5-1_8_12-cmake_install_fix	hdf5-1_8_12-cmake_install_fix.zip  hdf5-1_8_12-cmake_install_fix.tar.gz  hdf5-1_8_12-cmake_install_fix.tar.bz2	Elena Pourmal	12 years
hdf5-1_8_12	hdf5-1_8_12.zip  hdf5-1_8_12.tar.gz  hdf5-1_8_12.tar.bz2	Elena Pourmal	12 years
DLS_20130630	DLS_20130630.zip  DLS_20130630.tar.gz  DLS_20130630.tar.bz2	Albert Cheng	12 years
hdf5-1_8_11	hdf5-1_8_11.zip  hdf5-1_8_11.tar.gz  hdf5-1_8_11.tar.bz2	Albert Cheng	12 years
hdf5-1_8_10-patch1	hdf5-1_8_10-patch1.zip  hdf5-1_8_10-patch1.tar.gz  hdf5-1_8_10-patch1.tar.bz2	Albert Cheng	13 years
hdf5-1_8_10	hdf5-1_8_10.zip  hdf5-1_8_10.tar.gz  hdf5-1_8_10.tar.bz2	Albert Cheng	13 years
hdf5-1_8_9	hdf5-1_8_9.zip  hdf5-1_8_9.tar.gz  hdf5-1_8_9.tar.bz2	Mike McGreevy	13 years
hdf5-1_8_8	hdf5-1_8_8.zip  hdf5-1_8_8.tar.gz  hdf5-1_8_8.tar.bz2	Mike McGreevy	14 years
hdf5-1_8_7	hdf5-1_8_7.zip  hdf5-1_8_7.tar.gz  hdf5-1_8_7.tar.bz2	Mike McGreevy	14 years
hdf5-1_8_6	hdf5-1_8_6.zip  hdf5-1_8_6.tar.gz  hdf5-1_8_6.tar.bz2	Mike McGreevy	15 years
hdf5-1_8_5-patch1	hdf5-1_8_5-patch1.zip  hdf5-1_8_5-patch1.tar.gz  hdf5-1_8_5-patch1.tar.bz2	Mike McGreevy	15 years
hdf5-1_8_5	hdf5-1_8_5.zip  hdf5-1_8_5.tar.gz  hdf5-1_8_5.tar.bz2	Mike McGreevy	15 years
hdf5-1_8_4-patch1	hdf5-1_8_4-patch1.zip  hdf5-1_8_4-patch1.tar.gz  hdf5-1_8_4-patch1.tar.bz2	Mike McGreevy	16 years
hdf5-1_8_4-VMS	hdf5-1_8_4-VMS.zip  hdf5-1_8_4-VMS.tar.gz  hdf5-1_8_4-VMS.tar.bz2	Elena Pourmal	16 years
hdf5-1_8_4	hdf5-1_8_4.zip  hdf5-1_8_4.tar.gz  hdf5-1_8_4.tar.bz2	Elena Pourmal	16 years
hdf5-1_6_10	hdf5-1_6_10.zip  hdf5-1_6_10.tar.gz  hdf5-1_6_10.tar.bz2	Elena Pourmal	16 years
hdf5-1_8_3-patched	hdf5-1_8_3-patched.zip  hdf5-1_8_3-patched.tar.gz  hdf5-1_8_3-patched.tar.bz2	Elena Pourmal	16 years
hdf5-1_6_9	hdf5-1_6_9.zip  hdf5-1_6_9.tar.gz  hdf5-1_6_9.tar.bz2	Elena Pourmal	16 years
hdf5-1_8_3	hdf5-1_8_3.zip  hdf5-1_8_3.tar.gz  hdf5-1_8_3.tar.bz2	Elena Pourmal	16 years
hdf5-1_8_2	hdf5-1_8_2.zip  hdf5-1_8_2.tar.gz  hdf5-1_8_2.tar.bz2	Elena Pourmal	17 years
hdf5-1_6_8	hdf5-1_6_8.zip  hdf5-1_6_8.tar.gz  hdf5-1_6_8.tar.bz2	Elena Pourmal	17 years
hdf5-1_8_1	hdf5-1_8_1.zip  hdf5-1_8_1.tar.gz  hdf5-1_8_1.tar.bz2	Elena Pourmal	17 years
hdf5-1_0_0-alpha1	hdf5-1_0_0-alpha1.zip  hdf5-1_0_0-alpha1.tar.gz  hdf5-1_0_0-alpha1.tar.bz2	Quincey Koziol	18 years
hdf5-1_0_0-alpha2	hdf5-1_0_0-alpha2.zip  hdf5-1_0_0-alpha2.tar.gz  hdf5-1_0_0-alpha2.tar.bz2	Quincey Koziol	18 years
hdf5-1_4_5	hdf5-1_4_5.zip  hdf5-1_4_5.tar.gz  hdf5-1_4_5.tar.bz2	Quincey Koziol	18 years
hdf5-1_4_4	hdf5-1_4_4.zip  hdf5-1_4_4.tar.gz  hdf5-1_4_4.tar.bz2	Quincey Koziol	18 years
hdf5-1_8_0-beta5	hdf5-1_8_0-beta5.zip  hdf5-1_8_0-beta5.tar.gz  hdf5-1_8_0-beta5.tar.bz2	Quincey Koziol	18 years
hdf5-1_8_0-beta4	hdf5-1_8_0-beta4.zip  hdf5-1_8_0-beta4.tar.gz  hdf5-1_8_0-beta4.tar.bz2	Quincey Koziol	18 years
hdf5-1_8_0-beta3	hdf5-1_8_0-beta3.zip  hdf5-1_8_0-beta3.tar.gz  hdf5-1_8_0-beta3.tar.bz2	Quincey Koziol	18 years
hdf5-1_8_0-beta2	hdf5-1_8_0-beta2.zip  hdf5-1_8_0-beta2.tar.gz  hdf5-1_8_0-beta2.tar.bz2	Quincey Koziol	18 years
hdf5-1_8_0-beta1	hdf5-1_8_0-beta1.zip  hdf5-1_8_0-beta1.tar.gz  hdf5-1_8_0-beta1.tar.bz2	Quincey Koziol	18 years
hdf5-1_8_0-alpha4	hdf5-1_8_0-alpha4.zip  hdf5-1_8_0-alpha4.tar.gz  hdf5-1_8_0-alpha4.tar.bz2	Quincey Koziol	18 years
hdf5-1_8_0-alpha3	hdf5-1_8_0-alpha3.zip  hdf5-1_8_0-alpha3.tar.gz  hdf5-1_8_0-alpha3.tar.bz2	Quincey Koziol	18 years
hdf5-1_8_0-alpha2	hdf5-1_8_0-alpha2.zip  hdf5-1_8_0-alpha2.tar.gz  hdf5-1_8_0-alpha2.tar.bz2	Quincey Koziol	18 years
hdf5-1_8_0-alpha1	hdf5-1_8_0-alpha1.zip  hdf5-1_8_0-alpha1.tar.gz  hdf5-1_8_0-alpha1.tar.bz2	Quincey Koziol	18 years
hdf5-1_8_0-alpha0	hdf5-1_8_0-alpha0.zip  hdf5-1_8_0-alpha0.tar.gz  hdf5-1_8_0-alpha0.tar.bz2	Quincey Koziol	18 years
hdf5-1_8_0	hdf5-1_8_0.zip  hdf5-1_8_0.tar.gz  hdf5-1_8_0.tar.bz2	Elena Pourmal	18 years
hdf5-1_9-start	hdf5-1_9-start.zip  hdf5-1_9-start.tar.gz  hdf5-1_9-start.tar.bz2	Elena Pourmal	18 years
hdf5-1_6_7	hdf5-1_6_7.zip  hdf5-1_6_7.tar.gz  hdf5-1_6_7.tar.bz2	Elena Pourmal	18 years
hdf5-1_6_6	hdf5-1_6_6.zip  hdf5-1_6_6.tar.gz  hdf5-1_6_6.tar.bz2	Elena Pourmal	18 years
before_removing_fphdf5	before_removing_fphdf5.zip  before_removing_fphdf5.tar.gz  before_removing_fphdf5.tar.bz2	cvs2svn	19 years
hdf5-1_6_5	hdf5-1_6_5.zip  hdf5-1_6_5.tar.gz  hdf5-1_6_5.tar.bz2	cvs2svn	20 years
before_removing_docs	before_removing_docs.zip  before_removing_docs.tar.gz  before_removing_docs.tar.bz2	cvs2svn	20 years
hdf5-1_6_4	hdf5-1_6_4.zip  hdf5-1_6_4.tar.gz  hdf5-1_6_4.tar.bz2	cvs2svn	21 years
before_removing_tbbt_code	before_removing_tbbt_code.zip  before_removing_tbbt_code.tar.gz  before_removing_tbbt_code.tar.bz2	cvs2svn	21 years
before_signed_unsigned_changes	before_signed_unsigned_changes.zip  before_signed_unsigned_changes.tar.gz  before_signed_unsigned_changes.tar.bz2	cvs2svn	21 years
hdf5-1_6_3	hdf5-1_6_3.zip  hdf5-1_6_3.tar.gz  hdf5-1_6_3.tar.bz2	cvs2svn	21 years
hdf5-1_6_2	hdf5-1_6_2.zip  hdf5-1_6_2.tar.gz  hdf5-1_6_2.tar.bz2	cvs2svn	22 years
hdf5-1_6_1	hdf5-1_6_1.zip  hdf5-1_6_1.tar.gz  hdf5-1_6_1.tar.bz2	cvs2svn	22 years
hdf5-1_6_0	hdf5-1_6_0.zip  hdf5-1_6_0.tar.gz  hdf5-1_6_0.tar.bz2	cvs2svn	22 years
hdf5-1_4_3	hdf5-1_4_3.zip  hdf5-1_4_3.tar.gz  hdf5-1_4_3.tar.bz2	cvs2svn	24 years
hdf5-1_4_2	hdf5-1_4_2.zip  hdf5-1_4_2.tar.gz  hdf5-1_4_2.tar.bz2	cvs2svn	24 years
hdf5-1_4_1	hdf5-1_4_1.zip  hdf5-1_4_1.tar.gz  hdf5-1_4_1.tar.bz2	cvs2svn	24 years
hdf5-1_4_0	hdf5-1_4_0.zip  hdf5-1_4_0.tar.gz  hdf5-1_4_0.tar.bz2	cvs2svn	25 years
hdf5-1_2_2	hdf5-1_2_2.zip  hdf5-1_2_2.tar.gz  hdf5-1_2_2.tar.bz2	cvs2svn	25 years
hdf5-1_2_1	hdf5-1_2_1.zip  hdf5-1_2_1.tar.gz  hdf5-1_2_1.tar.bz2	cvs2svn	26 years
hdf5-1_2_0	hdf5-1_2_0.zip  hdf5-1_2_0.tar.gz  hdf5-1_2_0.tar.bz2	cvs2svn	26 years
hdf5-1_3_1	hdf5-1_3_1.zip  hdf5-1_3_1.tar.gz  hdf5-1_3_1.tar.bz2	cvs2svn	26 years
hdf5-1_3_0	hdf5-1_3_0.zip  hdf5-1_3_0.tar.gz  hdf5-1_3_0.tar.bz2	cvs2svn	26 years
hdf5-1_2_0-beta1-update2	hdf5-1_2_0-beta1-update2.zip  hdf5-1_2_0-beta1-update2.tar.gz  hdf5-1_2_0-beta1-update2.tar.bz2	cvs2svn	26 years
hdf5-1_2_0beta	hdf5-1_2_0beta.zip  hdf5-1_2_0beta.tar.gz  hdf5-1_2_0beta.tar.bz2	cvs2svn	26 years
hdf5-1_0_1	hdf5-1_0_1.zip  hdf5-1_0_1.tar.gz  hdf5-1_0_1.tar.bz2	cvs2svn	27 years
hdf5-1_0_0	hdf5-1_0_0.zip  hdf5-1_0_0.tar.gz  hdf5-1_0_0.tar.bz2	cvs2svn	27 years
r1_1beta1	r1_1beta1.zip  r1_1beta1.tar.gz  r1_1beta1.tar.bz2	cvs2svn	27 years
proto1	proto1.zip  proto1.tar.gz  proto1.tar.bz2	cvs2svn	28 years

generated by cgit v0.12 at 2025-09-17 17:42:51 (GMT)

/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
 * Copyright by The HDF Group.                                               *
 * Copyright by the Board of Trustees of the University of Illinois.         *
 * All rights reserved.                                                      *
 *                                                                           *
 * This file is part of HDF5.  The full HDF5 copyright notice, including     *
 * terms governing use, modification, and redistribution, is contained in    *
 * the COPYING file, which can be found at the root of the source code       *
 * distribution tree, or in https://support.hdfgroup.org/ftp/HDF5/releases.  *
 * If you do not have access to either file, you may request a copy from     *
 * help@hdfgroup.org.                                                        *
 * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */

/*
 * Programmer:  Robb Matzke <matzke@llnl.gov>
 *              Tuesday, December  9, 1997
 *
 * Purpose:     Tests the data type interface (H5T)
 */

#include "h5test.h"

/* Number of elements in each random test */
#define NTESTELEM	10000

/* Epsilon for floating-point comparisons */
#define FP_EPSILON 0.000001F

/*
 * Offset from alinged memory returned by malloc().  This can be used to test
 * that type conversions handle non-aligned buffers correctly.
 */
#define ALIGNMENT	1

/*
 * Define if you want to test alignment code on a machine that doesn't
 * normally require alignment. When set, all native data types must be aligned
 * on a byte boundary equal to the data size.
 */
#define TEST_ALIGNMENT

/* Alignment test stuff */
#ifdef TEST_ALIGNMENT
#define H5T_FRIEND		/*suppress error about including H5Tpkg	  */
#include "H5Tpkg.h"
#endif
#define SET_ALIGNMENT(TYPE,VAL) \
    H5T_NATIVE_##TYPE##_ALIGN_g=MAX(H5T_NATIVE_##TYPE##_ALIGN_g, VAL)

const char *FILENAME[] = {
    "dt_arith1",
    "dt_arith2",
    NULL
};

/*
 * Count up or down depending on whether the machine is big endian or little
 * endian.  If local variable `endian' is H5T_ORDER_BE then the result will
 * be I, otherwise the result will be Z-(I+1).
 */
#define ENDIAN(Z,I,E)	(H5T_ORDER_BE==E?(I):(Z)-((I)+1))

typedef enum dtype_t {
    INT_SCHAR, INT_UCHAR, INT_SHORT, INT_USHORT, INT_INT, INT_UINT,
    INT_LONG, INT_ULONG, INT_LLONG, INT_ULLONG, FLT_FLOAT, FLT_DOUBLE,
#if H5_SIZEOF_LONG_DOUBLE !=0
    FLT_LDOUBLE,
#endif
    OTHER
} dtype_t;

/* Skip overflow tests if non-zero */
static int skip_overflow_tests_g = 0;

/*
 * Although we check whether a floating point overflow generates a SIGFPE and
 * turn off overflow tests in that case, it might still be possible for an
 * overflow condition to occur.  Once a SIGFPE is raised the program cannot
 * be allowed to continue (cf. Posix signals) so in order to recover from a
 * SIGFPE we run tests that might generate one in a child process.
 */
#if defined(H5_HAVE_FORK) && defined(H5_HAVE_WAITPID)
#define HANDLE_SIGFPE
#endif

/*
 * Decide what values of floating-point number we want to test.  They are
 * 1 - normalized; 2 - denormalized; 3 - special.
 */
#define TEST_NOOP       0
#define TEST_NORMAL     1
#define TEST_DENORM     2
#define TEST_SPECIAL    3

/* Temporary buffer sizes */
#define TMP_BUF_DIM1    32
#define TMP_BUF_DIM2    100

/* Don't use hardware conversions if set */
static int without_hardware_g = 0;

/* Allocates memory aligned on a certain boundary. */
#define aligned_malloc(Z)	((void*)((char*)HDmalloc(ALIGNMENT+Z)+ALIGNMENT))
#define aligned_free(M)		HDfree((char*)(M)-ALIGNMENT)

/* Initialize source buffer of integer for integer->integer and integer->floating-point conversion test.
 * This algorithm is mainly to avoid any casting and comparison between source and destination types
 * for compiler, because we're testing conversions. */
#define INIT_INTEGER(TYPE, SRC_MAX, SRC_MIN, SRC_SIZE, DST_SIZE, SRC_PREC, BUF, SAVED, NELMTS)  \
{                                                                                               \
    unsigned char *buf_p, *saved_p;                                                             \
    unsigned int n;                                                                             \
    TYPE value1 = 1;                                                                            \
    TYPE value2 = 0;                                                                            \
                                                                                                \
    /* Allocate buffers */                                                                      \
    NELMTS=SRC_PREC*3;                                                                          \
    BUF = (unsigned char*)aligned_malloc(NELMTS*MAX(SRC_SIZE, DST_SIZE));                       \
    SAVED = (unsigned char*)aligned_malloc(NELMTS*MAX(SRC_SIZE, DST_SIZE));                     \
    HDmemset(BUF, 0, NELMTS*MAX(SRC_SIZE, DST_SIZE));                                           \
    HDmemset(SAVED, 0, NELMTS*MAX(SRC_SIZE, DST_SIZE));                                         \
                                                                                                \
    buf_p = BUF;                                                                                \
    saved_p = SAVED;                                                                            \
                                                                                                \
    /*positive values, ascending order. VALUE1 starts from 00000001, to 00000010, until 10000000*/ \
    /*VALUE2 ascends from 00000000, to 00000011, 00000111,...,  until 11111111.*/               \
    for(n=0; n<SRC_PREC; n++) {                                                                 \
        {                                                                                       \
            HDmemcpy(buf_p, &value1, SRC_SIZE);                                                 \
            HDmemcpy(saved_p, &value1, SRC_SIZE);                                               \
            buf_p += SRC_SIZE;                                                                  \
            saved_p += SRC_SIZE;                                                                \
        }                                                                                       \
        {                                                                                       \
            HDmemcpy(buf_p, &value2, SRC_SIZE);                                                 \
            HDmemcpy(saved_p, &value2, SRC_SIZE);                                               \
            buf_p += SRC_SIZE;                                                                  \
            saved_p += SRC_SIZE;                                                                \
        }                                                                                       \
                                                                                                \
        if(n<SRC_PREC-2) {                                                                      \
            value1 = (TYPE)(value1 << 1);                                                       \
            value2 = (TYPE)((value1 - 1) | value1);                                             \
        } else if(n==SRC_PREC-2) { /*to avoid overflow of negative values for signed integer*/  \
            value1 = (TYPE)(value1 << 1);                                                       \
            value2 = (TYPE)((~value1) | value1);                                                \
        }                                                                                       \
    }                                                                                           \
                                                                                                \
    /* negative values for signed; descending positive values for unsigned */                   \
    /* VALUE2 descends from 11111111 to 11111110, 11111100, ..., until 10000000. */             \
    for(n=0; n<SRC_PREC-1; n++) {                                                               \
        {                                                                                       \
            HDmemcpy(buf_p, &value2, SRC_SIZE);                                                 \
            HDmemcpy(saved_p, &value2, SRC_SIZE);                                               \
            buf_p += SRC_SIZE;                                                                  \
            saved_p += SRC_SIZE;                                                                \
        }                                                                                       \
        if(n<SRC_PREC-1)                                                                        \
            value2 = (TYPE)(value2 << 1);                                                       \
    }                                                                                           \
}

/* Change a buffer's byte order from big endian to little endian.  It's mainly for library's
 * bit operations which handle only little endian order.
 */
#define CHANGE_ORDER(EBUF, EORDER, ESIZE)                                                       \
{                                                                                               \
    unsigned int m;                                                                             \
    if (H5T_ORDER_BE==EORDER) {                                                                 \
        unsigned char mediator;                                                                 \
        size_t half_size = ESIZE/2;                                                             \
        for (m=0; m<half_size; m++) {                                                           \
            mediator = EBUF[ESIZE-(m+1)];                                                       \
            EBUF[ESIZE-(m+1)] = EBUF[m];                                                        \
            EBUF[m] = mediator;                                                                 \
        }                                                                                       \
    } else if (H5T_ORDER_VAX==EORDER) {                                                         \
        unsigned char mediator1, mediator2;                                                     \
        for (m = 0; m < ESIZE; m += 4) {                                                        \
            mediator1 = EBUF[m];                                                                \
            mediator2 = EBUF[m+1];                                                              \
                                                                                                \
            EBUF[m] = EBUF[(ESIZE-2)-m];                                                        \
            EBUF[m+1] = EBUF[(ESIZE-1)-m];                                                      \
                                                                                                \
            EBUF[(ESIZE-2)-m] = mediator1;                                                      \
            EBUF[(ESIZE-1)-m] = mediator2;                                                      \
        }                                                                                       \
    }                                                                                           \
}

/* Allocate buffer and initialize it with floating-point normalized values.
 * It's for conversion test of floating-point as the source.
 */
#define INIT_FP_NORM(TYPE, SRC_MAX, SRC_MIN, SRC_MAX_10_EXP, SRC_MIN_10_EXP, SRC_SIZE,          \
                DST_SIZE, BUF, SAVED, NELMTS)                                                   \
{                                                                                               \
    unsigned char *buf_p, *saved_p;                                                             \
    size_t num_norm, factor, n;                                                                 \
    TYPE value1, value2;                                                                        \
    TYPE multiply;                                                                              \
                                                                                                \
    /*Determine the number of normalized values and increment pace.  The values start from      \
     *minimal normalized value and are multiplied by MULTIPLY each step until reach to maximal  \
     *normalized value.*/                                                                       \
    if(SRC_MAX_10_EXP<100) { /*for float*/                                                      \
        factor = 0;                                                                             \
        multiply = 10;                                                                          \
    } else if(SRC_MAX_10_EXP>=100 && SRC_MAX_10_EXP<400) { /*for double*/                       \
        factor = 2;                                                                             \
        multiply = 10000;                                                                       \
    } else { /*for long double*/                                                                \
        factor = 3;                                                                             \
        multiply = 100000000;                                                                   \
    }                                                                                           \
                                                                                                \
    /*The number of values if multiplied by 10 for each step.*/                                 \
    num_norm =  (SRC_MAX_10_EXP - SRC_MIN_10_EXP);                                              \
    /*Reduce the number of values by 2^factor. MULTIPLY=10^(2^factor). Using this algorithm     \
     *instead of arithmatic operation to avoid any conversion*/                                 \
    num_norm >>= factor;                                                                        \
                                                                                                \
    /*Total number of values*/                                                                  \
    NELMTS  = 2 *                      /*both positive and negative*/                           \
                (num_norm +            /*number of normalized values*/                          \
                 1);                   /*maximal normalized value*/                             \
                                                                                                \
    /* Allocate buffers */                                                                      \
    BUF = (unsigned char*)aligned_malloc(NELMTS*MAX(SRC_SIZE, DST_SIZE));                       \
    SAVED = (unsigned char*)aligned_malloc(NELMTS*MAX(SRC_SIZE, DST_SIZE));                     \
    HDmemset(BUF, 0, NELMTS*MAX(SRC_SIZE, DST_SIZE));                                           \
    HDmemset(SAVED, 0, NELMTS*MAX(SRC_SIZE, DST_SIZE));                                         \
                                                                                                \
    buf_p = BUF;                                                                                \
    saved_p = SAVED;                                                                            \
                                                                                                \
    /*Normalized values*/                                                                       \
    value1 = SRC_MIN;                                                                           \
    value2 = -SRC_MIN;                                                                          \
    for(n=0; n<num_norm; n++) {                                                                 \
        if(value1<SRC_MAX) { /*positive*/                                                       \
            HDmemcpy(buf_p, &value1, SRC_SIZE);                                                 \
            HDmemcpy(saved_p, &value1, SRC_SIZE);                                               \
            value1 *= multiply;                                                                 \
            buf_p += SRC_SIZE;                                                                  \
            saved_p += SRC_SIZE;                                                                \
        }                                                                                       \
        if(value2>-SRC_MAX) { /*negative*/                                                      \
            HDmemcpy(buf_p, &value2, SRC_SIZE);                                                 \
            HDmemcpy(saved_p, &value2, SRC_SIZE);                                               \
            value2 *= multiply;                                                                 \
            buf_p += SRC_SIZE;                                                                  \
            saved_p += SRC_SIZE;                                                                \
        }                                                                                       \
    }                                                                                           \
                                                                                                \
    value1 = SRC_MAX;                              /*maximal value*/                            \
    HDmemcpy(buf_p, &value1, SRC_SIZE);                                                         \
    HDmemcpy(saved_p, &value1, SRC_SIZE);                                                       \
    buf_p += SRC_SIZE;                                                                          \
    saved_p += SRC_SIZE;                                                                        \
                                                                                                \
    value2 = -SRC_MAX;                             /*negative value*/                           \
    HDmemcpy(buf_p, &value2, SRC_SIZE);                                                         \
    HDmemcpy(saved_p, &value2, SRC_SIZE);                                                       \
    buf_p += SRC_SIZE;                                                                          \
    saved_p += SRC_SIZE;                                                                        \
}

/* Allocate buffer and initialize it with floating-point denormalized values.
 * It's for conversion test of floating-point as the source.
 */
#define INIT_FP_DENORM(TYPE, SRC_MANT_DIG, SRC_SIZE, SRC_PREC, SRC_ORDR, DST_SIZE,              \
                       BUF, SAVED, NELMTS)                                                      \
{                                                                                               \
    unsigned char *buf_p, *saved_p;                                                             \
    unsigned char *tmp1, *tmp2;                                                                 \
    size_t n;                                                                                   \
                                                                                                \
    /*Total number of values*/                                                                  \
    NELMTS  = 2 *                      /*both positive and negative*/                           \
                (SRC_MANT_DIG - 1);    /*number of denormalized values*/                        \
                                                                                                \
    /* Allocate buffers */                                                                      \
    BUF = (unsigned char*)aligned_malloc(NELMTS*MAX(SRC_SIZE, DST_SIZE));                       \
    SAVED = (unsigned char*)aligned_malloc(NELMTS*MAX(SRC_SIZE, DST_SIZE));                     \
    HDmemset(BUF, 0, NELMTS*MAX(SRC_SIZE, DST_SIZE));                                           \
    HDmemset(SAVED, 0, NELMTS*MAX(SRC_SIZE, DST_SIZE));                                         \
                                                                                                \
    tmp1 = (unsigned char*)HDcalloc((size_t)1, (size_t)SRC_SIZE);                               \
    tmp2 = (unsigned char*)HDcalloc((size_t)1, (size_t)SRC_SIZE);                               \
                                                                                                \
    buf_p = BUF;                                                                                \
    saved_p = SAVED;                                                                            \
                                                                                                \
    /*Denormalized values. Exponent is 0. Let mantissa starts from 00000001, 00000011,          \
     *00000111,..., until 11111111.*/                                                           \
    HDmemset(tmp1, 0, SRC_SIZE);                                                                \
    HDmemset(tmp2, 0, SRC_SIZE);                                                                \
    H5T__bit_set (tmp2, SRC_PREC-1, (size_t)1, TRUE);       /*the negative value*/              \
    for(n=0; n<SRC_MANT_DIG-1; n++) {                                                           \
        H5T__bit_set (tmp1, n, (size_t)1, TRUE);            /*turn on 1 bit each time*/         \
        CHANGE_ORDER(tmp1, SRC_ORDR, SRC_SIZE);    /*change order for big endian*/              \
        HDmemcpy(buf_p, tmp1, SRC_SIZE);                                                        \
        HDmemcpy(saved_p, tmp1, SRC_SIZE);                                                      \
        CHANGE_ORDER(tmp1, SRC_ORDR, SRC_SIZE);    /*change back the order for bit operation*/  \
        buf_p += SRC_SIZE;                                                                      \
        saved_p += SRC_SIZE;                                                                    \
                                                                                                \
        /*negative values*/                                                                     \
        H5T__bit_set (tmp2, n, (size_t)1, TRUE);                                                \
        CHANGE_ORDER(tmp2, SRC_ORDR, SRC_SIZE);                                                 \
        HDmemcpy(buf_p, tmp2, SRC_SIZE);                                                        \
        HDmemcpy(saved_p, tmp2, SRC_SIZE);                                                      \
        CHANGE_ORDER(tmp2, SRC_ORDR, SRC_SIZE);                                                 \
        buf_p += SRC_SIZE;                                                                      \
        saved_p += SRC_SIZE;                                                                    \
    }                                                                                           \
    HDfree(tmp1);                                                                               \
    HDfree(tmp2);                                                                               \
}

/* Allocate buffer and initialize it with floating-point special values, +/-0, +/-infinity,
 * +/-QNaN, +/-SNaN.  It's for conversion test of floating-point as the source.
 */
#define INIT_FP_SPECIAL(SRC_SIZE, SRC_PREC, SRC_ORDR, SRC_MANT_DIG, DST_SIZE,                   \
            BUF, SAVED, NELMTS)                                                                 \
{                                                                                               \
    unsigned char *buf_p;                                                                       \
    unsigned char *value;                                                                       \
    int n;                                                                                      \
                                                                                                \
    /*Total number of values*/                                                                  \
    NELMTS  = 2 *                      /*both positive and negative*/                           \
                4;                     /*infinity, SNaN, QNaN      */                           \
                                                                                                \
    /* Allocate buffers */                                                                      \
    BUF = (unsigned char*)aligned_malloc(NELMTS*MAX(SRC_SIZE, DST_SIZE));                       \
    SAVED = (unsigned char*)aligned_malloc( NELMTS*MAX(SRC_SIZE, DST_SIZE));                    \
    HDmemset(BUF, 0, NELMTS*MAX(SRC_SIZE, DST_SIZE));                                           \
    HDmemset(SAVED, 0, NELMTS*MAX(SRC_SIZE, DST_SIZE));                                         \
    value = (unsigned char*)HDcalloc(SRC_SIZE, sizeof(unsigned char));                          \
                                                                                                \
    buf_p = BUF;                                                                                \
                                                                                                \
    /* +0 */                                                                                    \
    H5T__bit_set(value, (size_t)0, SRC_PREC, FALSE);                                            \
    HDmemcpy(buf_p, value, SRC_SIZE*sizeof(unsigned char));                                     \
    buf_p += SRC_SIZE;                                                                          \
                                                                                                \
    for(n=0; n<2; n++) {                                                                        \
        if(n==1) {                                                                              \
            memset(value, 0, SRC_SIZE*sizeof(unsigned char));                                   \
            /* -0 */                                                                            \
            H5T__bit_set(value, (size_t)(SRC_PREC - 1), (size_t)1, TRUE);                       \
            CHANGE_ORDER(value, SRC_ORDR, SRC_SIZE);/*change order for big endian*/             \
            HDmemcpy(buf_p, value, SRC_SIZE*sizeof(unsigned char));                             \
            CHANGE_ORDER(value, SRC_ORDR, SRC_SIZE);/*change back the order for bit operation*/ \
            buf_p += SRC_SIZE;                                                                  \
        }                                                                                       \
                                                                                                \
        /* +/-infinity */                                                                       \
        H5T__bit_set(value, (size_t)(SRC_MANT_DIG - 1), SRC_PREC-SRC_MANT_DIG, TRUE);           \
        CHANGE_ORDER(value, SRC_ORDR, SRC_SIZE);    /*change order for big endian*/             \
        HDmemcpy(buf_p, value, SRC_SIZE*sizeof(unsigned char));                                 \
        CHANGE_ORDER(value, SRC_ORDR, SRC_SIZE);    /*change back the order for bit operation*/ \
        buf_p += SRC_SIZE;                                                                      \
                                                                                                \
        /* +/-SNaN */                                                                           \
        H5T__bit_set(value, (size_t)0, (size_t)1, TRUE);                                        \
        CHANGE_ORDER(value, SRC_ORDR, SRC_SIZE);    /*change order for big endian*/             \
        HDmemcpy(buf_p, value, SRC_SIZE * sizeof(unsigned char));                               \
        CHANGE_ORDER(value, SRC_ORDR, SRC_SIZE);    /*change back the order for bit operation*/ \
        buf_p += SRC_SIZE;                                                                      \
                                                                                                \
        /* +/-QNaN */                                                                           \
        H5T__bit_set(value, (size_t)(SRC_MANT_DIG - 2), (size_t)1, TRUE);                       \
        CHANGE_ORDER(value, SRC_ORDR, SRC_SIZE);    /*change order for big endian*/             \
        HDmemcpy(buf_p, value, SRC_SIZE*sizeof(unsigned char));                                 \
        CHANGE_ORDER(value, SRC_ORDR, SRC_SIZE);    /*change back the order for bit operation*/ \
        buf_p += SRC_SIZE;                                                                      \
    }                                                                                           \
                                                                                                \
    HDmemcpy(SAVED, BUF, NELMTS*MAX(SRC_SIZE, DST_SIZE));                                       \
    HDfree(value);                                                                              \
}

void some_dummy_func(float x);
static hbool_t overflows(unsigned char *origin_bits, hid_t src_id, size_t dst_num_bits);
static int my_isnan(dtype_t type, void *val);
static int my_isinf(int endian, unsigned char *val, size_t size,
        size_t mpos, size_t msize, size_t epos, size_t esize);

/*-------------------------------------------------------------------------
 * Function:	fpe_handler
 *
 * Purpose:	Exit with 255
 *
 * Return:	void
 *
 * Programmer:	Robb Matzke
 *              Monday, July  6, 1998
 *
 * Modifications:
 *
 *-------------------------------------------------------------------------
 */
static void
fpe_handler(int H5_ATTR_UNUSED signo)
{
    SKIPPED();
    HDputs("    Test skipped due to SIGFPE.");
#ifndef HANDLE_SIGFPE
    HDputs("    Remaining tests could not be run.");
    HDputs("    Please turn off SIGFPE on overflows and try again.");
#endif
    HDexit(255);
}


/*-------------------------------------------------------------------------
 * Function:	reset_hdf5
 *
 * Purpose:	Reset the hdf5 library.  This causes statistics to be printed
 *		and counters to be reset.
 *
 * Return:	void
 *
 * Programmer:	Robb Matzke
 *              Monday, November 16, 1998
 *
 * Modifications:
 *
 *-------------------------------------------------------------------------
 */
static void
reset_hdf5(void)
{
    h5_reset();

    if (without_hardware_g) h5_no_hwconv();
#ifdef TEST_ALIGNMENT
    SET_ALIGNMENT(SCHAR,   H5_SIZEOF_CHAR);
    SET_ALIGNMENT(UCHAR,   H5_SIZEOF_CHAR);
    SET_ALIGNMENT(SHORT,   H5_SIZEOF_SHORT);
    SET_ALIGNMENT(USHORT,  H5_SIZEOF_SHORT);
    SET_ALIGNMENT(INT,     H5_SIZEOF_INT);
    SET_ALIGNMENT(UINT,    H5_SIZEOF_INT);
    SET_ALIGNMENT(LONG,    H5_SIZEOF_LONG);
    SET_ALIGNMENT(ULONG,   H5_SIZEOF_LONG);
    SET_ALIGNMENT(LLONG,   H5_SIZEOF_LONG_LONG);
    SET_ALIGNMENT(ULLONG,  H5_SIZEOF_LONG_LONG);
    SET_ALIGNMENT(FLOAT,   H5_SIZEOF_FLOAT);
    SET_ALIGNMENT(DOUBLE,  H5_SIZEOF_DOUBLE);
#if H5_SIZEOF_LONG_DOUBLE !=0
    SET_ALIGNMENT(LDOUBLE, H5_SIZEOF_LONG_DOUBLE);
#endif
#endif

}


/*-------------------------------------------------------------------------
 * Function:	except_func
 *
 * Purpose:	Gets called for all data type conversion exceptions.
 *
 * Return:	H5T_CONV_ABORT:	        -1
 *
 *              H5T_CONV_UNHANDLED      0
 *
 *              H5T_CONV_HANDLED        1
 *
 * Programmer:	Raymond Lu
 *              April 19, 2004
 *
 * Modifications:
 *
 *-------------------------------------------------------------------------
 */
static H5T_conv_ret_t
except_func(H5T_conv_except_t except_type, hid_t H5_ATTR_UNUSED src_id, hid_t H5_ATTR_UNUSED dst_id, void H5_ATTR_UNUSED *src_buf,
		 void *dst_buf, void *user_data)
{
    H5T_conv_ret_t      ret = H5T_CONV_HANDLED;

    if(except_type == H5T_CONV_EXCEPT_RANGE_HI)
        /*only test integer case*/
        *(int*)dst_buf = *(int*)user_data;
    else if(except_type == H5T_CONV_EXCEPT_RANGE_LOW)
        /*only test integer case*/
        *(int*)dst_buf = *(int*)user_data;
    else if(except_type == H5T_CONV_EXCEPT_TRUNCATE)
        ret = H5T_CONV_UNHANDLED;
    else if(except_type == H5T_CONV_EXCEPT_PRECISION)
        ret = H5T_CONV_UNHANDLED;
    else if(except_type == H5T_CONV_EXCEPT_PINF)
        /*only test integer case*/
        *(int*)dst_buf = *(int*)user_data;
    else if(except_type == H5T_CONV_EXCEPT_NINF)
        /*only test integer case*/
        *(int*)dst_buf = *(int*)user_data;
    else if(except_type == H5T_CONV_EXCEPT_NAN)
        /*only test integer case*/
        *(int*)dst_buf = *(int*)user_data;

    return ret;
}


/*-------------------------------------------------------------------------
 * Function:	some_dummy_func
 *
 * Purpose:	A dummy function to help check for overflow.
 *
 * Note:	DO NOT DECLARE THIS FUNCTION STATIC OR THE COMPILER MIGHT
 *		PROMOTE ARGUMENT `x' TO DOUBLE AND DEFEAT THE OVERFLOW
 *		CHECKING.
 *
 * Return:	void
 *
 * Programmer:	Robb Matzke
 *              Tuesday, July 21, 1998
 *
 *-------------------------------------------------------------------------
 */
void
some_dummy_func(float x)
{
    char	s[128];

    HDsnprintf(s, sizeof(s), "%g", (double)x);
}


/*-------------------------------------------------------------------------
 * Function:	generates_sigfpe
 *
 * Purpose:	Determines if SIGFPE is generated from overflows.  We must be
 *		able to fork() and waitpid() in order for this test to work
 *		properly.  Sets skip_overflow_tests_g to non-zero if they
 *		would generate SIGBUS, zero otherwise.
 *
 * Programmer:	Robb Matzke
 *              Tuesday, July 21, 1998
 *
 * Modifications:
 *
 *-------------------------------------------------------------------------
 */
static void
generates_sigfpe(void)
{
#if defined(H5_HAVE_FORK) && defined(H5_HAVE_WAITPID)
    pid_t	pid;
    int		status;
    size_t	i, j;
    double	d;
    unsigned char *dp = (unsigned char*)&d;
    float	f;

    HDfflush(stdout);
    HDfflush(stderr);
    if ((pid=fork()) < 0) {
	HDperror("fork");
	HDexit(EXIT_FAILURE);
    } else if (0==pid) {
	for (i=0; i<2000; i++) {
	    for(j = 0; j < sizeof(double); j++)
                dp[j] = (unsigned char)HDrand();
	    f = (float)d;
	    some_dummy_func((float)f);
	}
	HDexit(EXIT_SUCCESS);
    }

    while (pid!=waitpid(pid, &status, 0))
        /*void*/;
    if (WIFEXITED(status) && 0==WEXITSTATUS(status)) {
	HDputs("Floating-point overflow cases will be tested.");
	skip_overflow_tests_g = FALSE;
    } else if (WIFSIGNALED(status) && SIGFPE==WTERMSIG(status)) {
	HDputs("Floating-point overflow cases cannot be safely tested.");
	skip_overflow_tests_g = TRUE;
	/* delete the core dump file that SIGFPE may have created */
	HDunlink("core");
    }
#else
    HDputs("Cannot determine if floating-point overflows generate a SIGFPE;");
    HDputs("assuming yes.");
    HDputs("Overflow cases will not be tested.");
    skip_overflow_tests_g = TRUE;
#endif
}


/*-------------------------------------------------------------------------
 * Function:    test_hard_query
 *
 * Purpose:     Tests H5Tcompiler_conv() for querying whether a conversion is
 *              a hard one.
 *
 * Return:      Success:        0
 *
 *              Failure:        number of errors
 *
 * Programmer:  Raymond Lu
 *              Friday, Sept 2, 2005
 *
 * Modifications:
 *
 *-------------------------------------------------------------------------
 */
static int
test_hard_query(void)
{
    TESTING("query functions of compiler conversion");

    /* Verify the conversion from int to float is a hard conversion. */
    if(H5Tcompiler_conv(H5T_NATIVE_INT, H5T_NATIVE_FLOAT) != TRUE) {
        H5_FAILED();
        printf("Can't query conversion function\n");
        goto error;
    }

    /* Unregister the hard conversion from int to float.  Verify the conversion
     * is a soft conversion. */
    H5Tunregister(H5T_PERS_HARD, NULL, H5T_NATIVE_INT, H5T_NATIVE_FLOAT, H5T__conv_int_float);
    if(H5Tcompiler_conv(H5T_NATIVE_INT, H5T_NATIVE_FLOAT) != FALSE) {
        H5_FAILED();
        printf("Can't query conversion function\n");
        goto error;
    }

    /* Register the hard conversion from int to float.  Verify the conversion
     * is a hard conversion. */
    H5Tregister(H5T_PERS_HARD, "int_flt", H5T_NATIVE_INT, H5T_NATIVE_FLOAT, H5T__conv_int_float);
    if(H5Tcompiler_conv(H5T_NATIVE_INT, H5T_NATIVE_FLOAT) != TRUE) {
        H5_FAILED();
        printf("Can't query conversion function\n");
        goto error;
    }

    PASSED();

    /* Restore the default error handler (set in h5_reset()) */
    h5_restore_err();

    reset_hdf5();

    return 0;

error:
    /* Restore the default error handler (set in h5_reset()) */
    h5_restore_err();

    reset_hdf5();
    return 1;
}


/*-------------------------------------------------------------------------
 * Function:	expt_handle
 *
 * Purpose:	Gets called from test_particular_fp_integer() for data type
 *              conversion exceptions.
 *
 * Return:	H5T_CONV_HANDLED        1
 *
 * Programmer:	Raymond Lu
 *              Sept 7, 2005
 *
 * Modifications:
 *
 *-------------------------------------------------------------------------
 */
static H5T_conv_ret_t
expt_handle(H5T_conv_except_t except_type, hid_t H5_ATTR_UNUSED src_id, hid_t H5_ATTR_UNUSED dst_id, void H5_ATTR_UNUSED *src_buf,
		 void *dst_buf, void *user_data)
{
    signed char         fill_value1 = 7;
    int                 fill_value2 = 13;

    if(except_type == H5T_CONV_EXCEPT_RANGE_HI || except_type == H5T_CONV_EXCEPT_RANGE_LOW ||
            except_type == H5T_CONV_EXCEPT_TRUNCATE) {
        if(*(hbool_t*)user_data)
            *(signed char*)dst_buf = fill_value1;
        else
            *(int*)dst_buf = fill_value2;
    } /* end if */

    return H5T_CONV_HANDLED;
}


/*-------------------------------------------------------------------------
 * Function:    test_particular_fp_integer
 *
 * Purpose:     Tests hard conversions from floating numbers to integers in
 *              a special situation when the source is "float" and assigned
 *              the value of "INT_MAX".  A compiler may do roundup making
 *              this value "INT_MAX+1".  When this float value is casted to
 *              int, overflow happens.  This test makes sure the library
 *              returns exception in this situation.
 *
 *              Also verifies the library handles conversion from double to
 *              signed char correctly when the value of double is SCHAR_MAX.
 *              The test makes sure the signed char doesn't overflow.
 *
 *              This test is mainly for netCDF's request.
 *
 * Return:      Success:        0
 *
 *              Failure:        number of errors
 *
 * Programmer:  Raymond Lu
 *              Sept 7, 2005
 *
 * Modifications:
 *
 *-------------------------------------------------------------------------
 */
static int test_particular_fp_integer(void)
{
    hid_t       dxpl_id;
    hbool_t     flag;
    double      src_d = (double)SCHAR_MAX;
    signed char dst_c;
    unsigned char *buf1 = NULL, *buf2 = NULL;
    unsigned char *saved_buf1 = NULL, *saved_buf2 = NULL;
    size_t      src_size1, src_size2;
    size_t      dst_size1, dst_size2;
    float       src_f = (float)INT_MAX;
    int         dst_i;
    int         fill_value = 13;
    int		endian;			/*endianess	        */
    unsigned int        fails_this_test = 0;
    size_t      j;

    TESTING("hard particular floating number -> integer conversions");

    if((dxpl_id = H5Pcreate(H5P_DATASET_XFER)) < 0) {
        H5_FAILED();
        printf("Can't create data transfer property list\n");
        goto error;
    }

    /* Test conversion from double (the value is SCHAR_MAX) to signed char. */
    endian = H5Tget_order(H5T_NATIVE_DOUBLE);
    src_size1 = H5Tget_size(H5T_NATIVE_DOUBLE);
    dst_size1 = H5Tget_size(H5T_NATIVE_SCHAR);
    buf1 = (unsigned char*)HDcalloc((size_t)1, (size_t)MAX(src_size1, dst_size1));
    saved_buf1 = (unsigned char*)HDcalloc((size_t)1, (size_t)MAX(src_size1, dst_size1));

    memcpy(buf1, &src_d, src_size1);
    memcpy(saved_buf1, &src_d, src_size1);

    /* Register exception handling function and signal the destination is "signed char". */
    flag = 1;
    if(H5Pset_type_conv_cb(dxpl_id, expt_handle, &flag) < 0) {
        H5_FAILED();
        printf("Can't register conversion callback\n");
        goto error;
    }

    /* Do conversion */
    if(H5Tconvert(H5T_NATIVE_DOUBLE, H5T_NATIVE_SCHAR, (size_t)1, buf1, NULL, dxpl_id) < 0) {
        H5_FAILED();
        printf("Can't convert data\n");
        goto error;
    }

    memcpy(&dst_c, buf1, dst_size1);

    /* Print errors */
    if(dst_c != SCHAR_MAX) {
        double x;
        signed char   y;

        if(0 == fails_this_test++)
            H5_FAILED();

        printf("    test double to signed char:\n");
        printf("        src = ");
        for (j=0; j<src_size1; j++)
            printf(" %02x", saved_buf1[ENDIAN(src_size1, j, endian)]);

        HDmemcpy(&x, saved_buf1, src_size1);
        printf(" %29.20e\n", x);

        printf("        dst = ");
        for (j=0; j<dst_size1; j++)
            printf(" %02x", buf1[ENDIAN(dst_size1, j, endian)]);

        HDmemcpy(&y, buf1, dst_size1);
        printf(" %29d\n", y);
    }

    /* Test conversion from float (the value is INT_MAX) to int. */
    src_size2 = H5Tget_size(H5T_NATIVE_FLOAT);
    dst_size2 = H5Tget_size(H5T_NATIVE_INT);
    buf2 = (unsigned char*)HDcalloc((size_t)1, (size_t)MAX(src_size2, dst_size2));
    saved_buf2 = (unsigned char*)HDcalloc((size_t)1, (size_t)MAX(src_size2, dst_size2));
    HDmemcpy(buf2, &src_f, src_size2);
    HDmemcpy(saved_buf2, &src_f, src_size2);

    /* signal exception handling function that the destination is "int". */
    flag = 0;

    /* Do conversion */
    if(H5Tconvert(H5T_NATIVE_FLOAT, H5T_NATIVE_INT, (size_t)1, buf2, NULL, dxpl_id) < 0) {
        H5_FAILED();
        printf("Can't convert data\n");
        goto error;
    }

    memcpy(&dst_i, buf2, dst_size2);

    /* Print errors */
    if(dst_i != fill_value) {
        float x;
        int   y;

        if(0 == fails_this_test++)
            H5_FAILED();

        printf("    test float to int:\n");
        printf("        src = ");
        for (j=0; j<src_size2; j++)
            printf(" %02x", saved_buf2[ENDIAN(src_size2, j, endian)]);

        HDmemcpy(&x, saved_buf2, src_size2);
        printf(" %29.20e\n", (double)x);

        printf("        dst = ");
        for (j=0; j<dst_size2; j++)
            printf(" %02x", buf2[ENDIAN(dst_size2, j, endian)]);

        HDmemcpy(&y, buf2, dst_size2);
        printf(" %29d\n", y);
    }

    if(fails_this_test)
        goto error;

    if(H5Pclose(dxpl_id) < 0) {
        H5_FAILED();
        printf("Can't close property list\n");
        goto error;
    }

    if(buf1)
        HDfree(buf1);
    if(buf2)
        HDfree(buf2);
    if(saved_buf1)
        HDfree(saved_buf1);
    if(saved_buf2)
        HDfree(saved_buf2);

    PASSED();
    return 0;

error:
    HDfflush(stdout);
    H5E_BEGIN_TRY {
        H5Pclose(dxpl_id);
    } H5E_END_TRY;
    if(buf1)
        HDfree(buf1);
    if(buf2)
        HDfree(buf2);
    if(saved_buf1)
        HDfree(saved_buf1);
    if(saved_buf2)
        HDfree(saved_buf2);

    /* Restore the default error handler (set in h5_reset()) */
    h5_restore_err();

    reset_hdf5(); /*print statistics*/

    return MAX((int)fails_this_test, 1);
}


/*-------------------------------------------------------------------------
 * Function:    test_derived_flt
 *
 * Purpose:     Tests user-define and query functions of floating-point types.
 *
 * Return:      Success:        0
 *
 *              Failure:        number of errors
 *
 * Programmer:  Raymond Lu
 *              Thursday, Jan 6, 2005
 *
 * Modifications:
 *
 *-------------------------------------------------------------------------
 */
static int
test_derived_flt(void)
{
    hid_t       file=-1, tid1=-1, tid2=-1;
    hid_t       dxpl_id=-1;
    char        filename[1024];
    size_t      spos, epos, esize, mpos, msize, size;
    size_t      src_size, dst_size;
    unsigned char        *buf=NULL, *saved_buf=NULL;
    int         *aligned=NULL;
    int		endian;			/*endianess	        */
    size_t      nelmts = NTESTELEM;
    unsigned int        fails_this_test = 0;
    const size_t	max_fails=40;	/*max number of failures*/
    char	str[256];		/*message string	*/
    unsigned int         i, j;

    TESTING("user-define and query functions of floating-point types");

    /* Create File */
    h5_fixname(FILENAME[0], H5P_DEFAULT, filename, sizeof filename);
    if((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT)) < 0) {
        H5_FAILED();
        printf("Can't create file\n");
        goto error;
    }

    if((dxpl_id = H5Pcreate(H5P_DATASET_XFER)) < 0) {
        H5_FAILED();
        printf("Can't create data transfer property list\n");
        goto error;
    }

    if((tid1 = H5Tcopy(H5T_IEEE_F64LE)) < 0) {
        H5_FAILED();
        printf("Can't copy data type\n");
        goto error;
    }

    if((tid2 = H5Tcopy(H5T_IEEE_F32LE)) < 0) {
        H5_FAILED();
        printf("Can't copy data type\n");
        goto error;
    }

    /*------------------------------------------------------------------------
     *                   1st floating-point type
     * size=7 byte, precision=42 bits, offset=3 bits, mantissa size=31 bits,
     * mantissa position=3, exponent size=10 bits, exponent position=34,
     * exponent bias=511.  It can be illustrated in little-endian order as
     *
     *          6       5       4       3       2       1       0
     *    ???????? ???SEEEE EEEEEEMM MMMMMMMM MMMMMMMM MMMMMMMM MMMMM???
     *
     * To create a new floating-point type, the following properties must be
     * set in the order of
     *   set fields -> set offset -> set precision -> set size.
     * All these properties must be set before the type can function. Other
     * properties can be set anytime.  Derived type size cannot be expanded
     * bigger than original size but can be decreased.  There should be no
     * holes among the significant bits.  Exponent bias usually is set
     * 2^(n-1)-1, where n is the exponent size.
     *-----------------------------------------------------------------------*/
    if(H5Tset_fields(tid1, (size_t)44, (size_t)34, (size_t)10, (size_t)3, (size_t)31) < 0) {
        H5_FAILED();
        printf("Can't set fields\n");
        goto error;
    }
    if(H5Tset_offset(tid1, (size_t)3) < 0) {
        H5_FAILED();
        printf("Can't set offset\n");
        goto error;
    }
    if(H5Tset_precision(tid1, (size_t)42) < 0) {
        H5_FAILED();
        printf("Can't set precision 1\n");
        goto error;
    }
    if(H5Tset_size(tid1, (size_t)7) < 0) {
        H5_FAILED();
        printf("Can't set size\n");
        goto error;
    }

    if(H5Tset_ebias(tid1, (size_t)511) < 0) {
        H5_FAILED();
        printf("Can't set exponent bias\n");
        goto error;
    }
    if(H5Tset_pad(tid1, H5T_PAD_ZERO, H5T_PAD_ZERO) < 0) {
        H5_FAILED();
        printf("Can't set padding\n");
        goto error;
    }

    if(H5Tcommit2(file, "new float type 1", tid1, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT) < 0) {
        H5_FAILED();
        printf("Can't set inpad\n");
        goto error;
    }
    if(H5Tclose(tid1) < 0) {
        H5_FAILED();
        printf("Can't close datatype\n");
        goto error;
    }

    if((tid1 = H5Topen2(file, "new float type 1", H5P_DEFAULT)) < 0)
        FAIL_PUTS_ERROR("Can't open datatype")
    if(H5Tget_fields(tid1, &spos, &epos, &esize, &mpos, &msize) < 0) {
        H5_FAILED();
        printf("Can't get fields\n");
        goto error;
    }
    if(spos != 44 || epos != 34 || esize != 10 || mpos != 3 || msize != 31) {
        H5_FAILED();
        printf("Wrong field values\n");
        goto error;
    }

    if(H5Tget_precision(tid1) != 42) {
        H5_FAILED();
        printf("Can't get precision or wrong precision\n");
        goto error;
    }
    if(H5Tget_offset(tid1)!=3) {
        H5_FAILED();
        printf("Can't get offset or wrong offset\n");
        goto error;
    }
    if((size = H5Tget_size(tid1))!=7) {
        H5_FAILED();
        printf("Can't get size or wrong size\n");
        goto error;
    }
    if(H5Tget_ebias(tid1)!=511) {
        H5_FAILED();
        printf("Can't get exponent bias or wrong bias\n");
        goto error;
    }

    /* Convert data from native integer to the 1st derived floating-point type.
     * Then convert data from the floating-point type back to native integer.
     * Compare the final data with the original data.
     */
    src_size = H5Tget_size(H5T_NATIVE_INT);
    endian = H5Tget_order(H5T_NATIVE_INT);
    buf = (unsigned char *)HDmalloc(nelmts * (MAX(src_size, size)));
    saved_buf = (unsigned char *)HDmalloc(nelmts * src_size);
    HDmemset(buf, 0, nelmts * MAX(src_size, size));
    HDmemset(saved_buf, 0, nelmts * src_size);
    aligned = (int *)HDcalloc((size_t)1, src_size);

    for(i = 0; i < nelmts * src_size; i++)
        buf[i] = saved_buf[i] = (unsigned char)HDrand();

    /* Convert data from native integer to derived floating-point type.
     * The mantissa is big enough to retain the integer's precision. */
    if(H5Tconvert(H5T_NATIVE_INT, tid1, nelmts, buf, NULL, dxpl_id) < 0) {
        H5_FAILED();
        printf("Can't convert data\n");
        goto error;
    }
    /* Convert data from the derived floating-point type back to native integer. */
    if(H5Tconvert(tid1, H5T_NATIVE_INT, nelmts, buf, NULL, dxpl_id) < 0) {
        H5_FAILED();
        printf("Can't convert data\n");
        goto error;
    }

    /* Are the values still the same?*/
    for(i=0; i<nelmts; i++) {
        for(j=0; j<src_size; j++)
            if(buf[i*src_size+j]!=saved_buf[i*src_size+j])
               break;
        if(j==src_size)
           continue; /*no error*/

        /* Print errors */
        if (0==fails_this_test++) {
	    HDsnprintf(str, sizeof(str), "\nTesting random sw derived floating-point -> derived floating-point conversions");
	    printf("%-70s", str);
	    HDfflush(stdout);
            H5_FAILED();
        }
        printf("    test %u elmt %u: \n", 1, (unsigned)i);

        printf("        src = ");
        for (j=0; j<src_size; j++)
            printf(" %02x", saved_buf[i*src_size+ENDIAN(src_size, j, endian)]);

        HDmemcpy(aligned, saved_buf+i*sizeof(int), sizeof(int));
        printf(" %29d\n", *aligned);

        printf("        dst = ");
        for (j=0; j<src_size; j++)
            printf(" %02x", buf[i*src_size+ENDIAN(src_size, j, endian)]);

        HDmemcpy(aligned, buf+i*sizeof(int), sizeof(int));
        printf(" %29d\n", *aligned);

        if (fails_this_test>=max_fails) {
            HDputs("    maximum failures reached, aborting test...");
            goto error;
        }
    }

    fails_this_test = 0;
    HDfree(buf);
    HDfree(saved_buf);
    HDfree(aligned);
    buf = NULL;
    saved_buf = NULL;
    aligned = NULL;

    /*--------------------------------------------------------------------------
     *                   2nd floating-point type
     * size=3 byte, precision=24 bits, offset=0 bits, mantissa size=16 bits,
     * mantissa position=0, exponent size=7 bits, exponent position=16, exponent
     * bias=63. It can be illustrated in little-endian order as
     *
     *          2       1       0
     *    SEEEEEEE MMMMMMMM MMMMMMMM
     *--------------------------------------------------------------------------*/
    if(H5Tset_fields(tid2, (size_t)23, (size_t)16, (size_t)7, (size_t)0, (size_t)16) < 0) {
        H5_FAILED();
        printf("Can't set fields\n");
        goto error;
    }
    if(H5Tset_offset(tid2, (size_t)0) < 0) {
        H5_FAILED();
        printf("Can't set offset\n");
        goto error;
    }
    if(H5Tset_precision(tid2, (size_t)24) < 0) {
        H5_FAILED();
        printf("Can't set precision 2\n");
        goto error;
    }
    if(H5Tset_size(tid2, (size_t)3) < 0) {
        H5_FAILED();
        printf("Can't set size\n");
        goto error;
    }
    if(H5Tset_ebias(tid2, (size_t)63) < 0) {
        H5_FAILED();
        printf("Can't set size\n");
        goto error;
    }
    if(H5Tset_pad(tid2, H5T_PAD_ZERO, H5T_PAD_ZERO) < 0) {
        H5_FAILED();
        printf("Can't set padding\n");
        goto error;
    }

    if(H5Tcommit2(file, "new float type 2", tid2, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT) < 0) {
        H5_FAILED();
        printf("Can't set inpad\n");
        goto error;
    }
    if(H5Tclose(tid2) < 0) {
        H5_FAILED();
        printf("Can't close datatype\n");
        goto error;
    }

    if((tid2 = H5Topen2(file, "new float type 2", H5P_DEFAULT)) < 0)
        FAIL_PUTS_ERROR("Can't open datatype")
    if(H5Tget_fields(tid2, &spos, &epos, &esize, &mpos, &msize) < 0) {
        H5_FAILED();
        printf("Can't get fields\n");
        goto error;
    }
    if(spos != 23 || epos != 16 || esize != 7 || mpos != 0 || msize != 16) {
        H5_FAILED();
        printf("Wrong field values\n");
        goto error;
    }

    if(H5Tget_precision(tid2) != 24) {
        H5_FAILED();
        printf("Can't get precision or wrong precision\n");
        goto error;
    }
    if(H5Tget_offset(tid2)!=0) {
        H5_FAILED();
        printf("Can't get offset or wrong offset\n");
        goto error;
    }
    if((size = H5Tget_size(tid2))!=3) {
        H5_FAILED();
        printf("Can't get size or wrong size\n");
        goto error;
    }
    if(H5Tget_ebias(tid2)!=63) {
        H5_FAILED();
        printf("Can't get exponent bias or wrong bias\n");
        goto error;
    }

    /* Convert data from the 2nd to the 1st derived floating-point type.
     * Then convert data from the 1st type back to the 2nd type.
     * Compare the final data with the original data.
     */
    src_size = H5Tget_size(tid2);
    dst_size = H5Tget_size(tid1);
    endian = H5Tget_order(tid2);
    buf = (unsigned char *)HDmalloc(nelmts * (MAX(src_size, dst_size)));
    saved_buf = (unsigned char *)HDmalloc(nelmts * src_size);
    HDmemset(buf, 0, nelmts * MAX(src_size, dst_size));
    HDmemset(saved_buf, 0, nelmts*src_size);

    for(i=0; i<nelmts*src_size; i++)
        buf[i] = saved_buf[i] = (unsigned char)HDrand();

    /* Convert data from the 2nd to the 1st derived floating-point type.
     * The mantissa and exponent of the 2nd type are big enough to retain
     * the precision and exponent power. */
    if(H5Tconvert(tid2, tid1, nelmts, buf, NULL, dxpl_id) < 0) {
        H5_FAILED();
        printf("Can't convert data\n");
        goto error;
    }
    /* Convert data from the 1st back to the 2nd derived floating-point type. */
    if(H5Tconvert(tid1, tid2, nelmts, buf, NULL, dxpl_id) < 0) {
        H5_FAILED();
        printf("Can't convert data\n");
        goto error;
    }

    /* Are the values still the same?*/
    for(i=0; i<nelmts; i++) {
        for(j=0; j<src_size; j++)
            if(buf[i*src_size+j]!=saved_buf[i*src_size+j])
               break;
        if(j==src_size)
           continue; /*no error*/

        /* If original value is NaN(exponent bits are all ones, 11..11),
         * the library simply sets all mantissa bits to ones.  So don't
         * compare values in this case.
         */
        if((buf[i*src_size+2]==0x7f && saved_buf[i*src_size+2]==0x7f) ||
            (buf[i*src_size+2]==0xff && saved_buf[i*src_size+2]==0xff))
            continue;

        /* Print errors */
        if (0==fails_this_test++) {
	    HDsnprintf(str, sizeof(str), "\nTesting random sw derived floating-point -> derived floating-point conversions");
	    printf("%-70s", str);
	    HDfflush(stdout);
            H5_FAILED();
        }
        printf("    test %u elmt %u: \n", 1, (unsigned)i);

        printf("        src = ");
        for (j=0; j<src_size; j++)
            printf(" %02x", saved_buf[i*src_size+ENDIAN(src_size, j, endian)]);
        printf("\n");

        printf("        dst = ");
        for (j=0; j<src_size; j++)
            printf(" %02x", buf[i*src_size+ENDIAN(src_size, j, endian)]);
        printf("\n");

        if (fails_this_test>=max_fails) {
            HDputs("    maximum failures reached, aborting test...");
            goto error;
        }
    }

    if (buf) HDfree(buf);
    if (saved_buf) HDfree(saved_buf);

    if(H5Tclose(tid1) < 0) {
        H5_FAILED();
        printf("Can't close datatype\n");
        goto error;
    }

    if(H5Tclose(tid2) < 0) {
        H5_FAILED();
        printf("Can't close datatype\n");
        goto error;
    }

    if(H5Pclose(dxpl_id) < 0) {
        H5_FAILED();
        printf("Can't close property list\n");
        goto error;
    }

    if(H5Fclose(file) < 0) {
        H5_FAILED();
        printf("Can't close file\n");
        goto error;
    } /* end if */

    PASSED();

    /* Restore the default error handler (set in h5_reset()) */
    h5_restore_err();

    reset_hdf5();	/*print statistics*/

    return 0;

 error:
    if (buf) HDfree(buf);
    if (saved_buf) HDfree(saved_buf);
    if (aligned) HDfree(aligned);
    HDfflush(stdout);
    H5E_BEGIN_TRY {
        H5Tclose (tid1);
        H5Tclose (tid2);
        H5Pclose (dxpl_id);
        H5Fclose (file);
    } H5E_END_TRY;

    /* Restore the default error handler (set in h5_reset()) */
    h5_restore_err();

    reset_hdf5(); /*print statistics*/

    return MAX((int)fails_this_test, 1);
}


/*-------------------------------------------------------------------------
 * Function:    test_derived_integer
 *
 * Purpose:     Tests user-define and query functions of integer types.
 *
 * Return:      Success:        0
 *
 *              Failure:        number of errors
 *
 * Programmer:  Raymond Lu
 *              Saturday, Jan 29, 2005
 *
 * Modifications:
 *
 *-------------------------------------------------------------------------
 */
static int
test_derived_integer(void)
{
    hid_t       file=-1, tid1=-1, tid2=-1;
    hid_t       dxpl_id=-1;
    char        filename[1024];
    size_t      src_size, dst_size;
    unsigned char        *buf=NULL, *saved_buf=NULL;
    int		endian;			/*endianess	        */
    size_t      nelmts = NTESTELEM;
    unsigned int        fails_this_test = 0;
    const size_t	max_fails=40;	/*max number of failures*/
    char	str[256];		/*message string	*/
    unsigned int         i, j;

    TESTING("user-define and query functions of integer types");

    /* Create File */
    h5_fixname(FILENAME[1], H5P_DEFAULT, filename, sizeof filename);
    if((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT)) < 0) {
        H5_FAILED();
        printf("Can't create file\n");
        goto error;
    }

    if((dxpl_id = H5Pcreate(H5P_DATASET_XFER)) < 0) {
        H5_FAILED();
        printf("Can't create data transfer property list\n");
        goto error;
    }

    if((tid1 = H5Tcopy(H5T_STD_I32LE)) < 0) {
        H5_FAILED();
        printf("Can't copy data type\n");
        goto error;
    }

    if((tid2 = H5Tcopy(H5T_STD_U64LE)) < 0) {
        H5_FAILED();
        printf("Can't copy data type\n");
        goto error;
    }

    /*--------------------------------------------------------------------------
     *                   1st integer type
     * size=3 byte, precision=24 bits, offset=0 bits, order=big endian.
     * It can be illustrated in big-endian order as
     *
     *          0       1       2
     *    SIIIIIII IIIIIIII IIIIIIII
     *
     * There's no specific order for these functions to define the attributes
     * of a new integer type, H5Tset_precision, H5Tset_offset, H5Tset_size,
     * H5Tset_order, H5Tset_pad, H5Tset_sign.
     *--------------------------------------------------------------------------*/
    if(H5Tset_offset(tid1, (size_t)0) < 0) {
        H5_FAILED();
        printf("Can't set offset\n");
        goto error;
    }

    if(H5Tset_size(tid1, (size_t)3) < 0) {
        H5_FAILED();
        printf("Can't set size\n");
        goto error;
    }

    if(H5Tset_precision(tid1, (size_t)24) < 0) {
        H5_FAILED();
        printf("Can't set precision\n");
        goto error;
    }

    if(H5Tset_order(tid1, H5T_ORDER_BE) < 0) {
        H5_FAILED();
        printf("Can't set order\n");
        goto error;
    }

    if(H5Tcommit2(file, "new integer type 1", tid1, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT) < 0) {
        H5_FAILED();
        printf("Can't commit data type\n");
        goto error;
    }

    if(H5Tclose(tid1) < 0) {
        H5_FAILED();
        printf("Can't close datatype\n");
        goto error;
    }

    if((tid1 = H5Topen2(file, "new integer type 1", H5P_DEFAULT)) < 0)
        FAIL_PUTS_ERROR("Can't open datatype")
    if(H5Tget_precision(tid1) != 24) {
        H5_FAILED();
        printf("Can't get precision or wrong precision\n");
        goto error;
    }
    if(H5Tget_offset(tid1) != 0) {
        H5_FAILED();
        printf("Can't get offset or wrong offset\n");
        goto error;
    }
    if(H5Tget_size(tid1) != 3) {
        H5_FAILED();
        printf("Can't get size or wrong size\n");
        goto error;
    }
    if(H5Tget_order(tid1)!=H5T_ORDER_BE) {
        H5_FAILED();
        printf("Can't get order or wrong order\n");
        goto error;
    }

    /*--------------------------------------------------------------------------
     *                   2nd integer type
     * size=8 byte, precision=48 bits, offset=10 bits, order=little endian.
     * It can be illustrated in little-endian order as
     *
     *          7       6       5       4       3       2       1       0
     *   ??????SI IIIIIIII IIIIIIII IIIIIIII IIIIIIII IIIIIIII IIIIII?? ????????
     *--------------------------------------------------------------------------*/
    if(H5Tset_precision(tid2, (size_t)48) < 0) {
        H5_FAILED();
        printf("Can't set precision\n");
        goto error;
    }

    if(H5Tset_offset(tid2, (size_t)10) < 0) {
        H5_FAILED();
        printf("Can't set offset\n");
        goto error;
    }

    if(H5Tset_sign(tid2, H5T_SGN_2) < 0) {
        H5_FAILED();
        printf("Can't set offset\n");
        goto error;
    }

    if(H5Tcommit2(file, "new integer type 2", tid2, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT) < 0) {
        H5_FAILED();
        printf("Can't commit data type\n");
        goto error;
    }

    if(H5Tclose(tid2) < 0) {
        H5_FAILED();
        printf("Can't close datatype\n");
        goto error;
    }

    if((tid2 = H5Topen2(file, "new integer type 2", H5P_DEFAULT)) < 0)
        FAIL_PUTS_ERROR("Can't open datatype")
    if(H5Tget_precision(tid2) != 48) {
        H5_FAILED();
        printf("Can't get precision or wrong precision\n");
        goto error;
    }
    if(H5Tget_offset(tid2) != 10) {
        H5_FAILED();
        printf("Can't get offset or wrong offset\n");
        goto error;
    }
    if(H5Tget_size(tid2) != 8) {
        H5_FAILED();
        printf("Can't get size or wrong size\n");
        goto error;
    }
    if(H5Tget_sign(tid2)!=H5T_SGN_2) {
        H5_FAILED();
        printf("Can't get sign or wrong sign\n");
        goto error;
    }

    /* Convert data from the 1st to the 2nd derived integer type.
     * Then convert data from the 2nd type back to the 1st type.
     * Compare the final data with the original data.
     */
    src_size = H5Tget_size(tid1);
    dst_size = H5Tget_size(tid2);
    endian = H5Tget_order(tid1);
    buf = (unsigned char *)HDmalloc(nelmts*(MAX(src_size, dst_size)));
    saved_buf = (unsigned char *)HDmalloc(nelmts*src_size);
    HDmemset(buf, 0, nelmts * MAX(src_size, dst_size));
    HDmemset(saved_buf, 0, nelmts*src_size);

    for(i=0; i<nelmts * src_size; i++)
        buf[i] = saved_buf[i] = (unsigned char)HDrand();

    /* Convert data from the 1st to the 2nd derived integer type.
     * The precision of the 2nd type are big enough to retain
     * the 1st type's precision. */
    if(H5Tconvert(tid1, tid2, nelmts, buf, NULL, dxpl_id) < 0) {
        H5_FAILED();
        printf("Can't convert data\n");
        goto error;
    }
    /* Convert data from the 2nd back to the 1st derived integer type. */
    if(H5Tconvert(tid2, tid1, nelmts, buf, NULL, dxpl_id) < 0) {
        H5_FAILED();
        printf("Can't convert data\n");
        goto error;
    }

    /* Are the values still the same?*/
    for(i=0; i<nelmts; i++) {
        for(j=0; j<src_size; j++)
            if(buf[i*src_size+j]!=saved_buf[i*src_size+j])
               break;
        if(j==src_size)
           continue; /*no error*/

        /* Print errors */
        if (0==fails_this_test++) {
	    HDsnprintf(str, sizeof(str), "\nTesting random sw derived integer -> derived integer conversions");
	    printf("%-70s", str);
	    HDfflush(stdout);
            H5_FAILED();
        }
        printf("    test %u elmt %u: \n", 1, (unsigned)i);

        printf("        src = ");
        for (j=0; j<src_size; j++)
            printf(" %02x", saved_buf[i*src_size+ENDIAN(src_size, j, endian)]);
        printf("\n");

        printf("        dst = ");
        for (j=0; j<src_size; j++)
            printf(" %02x", buf[i*src_size+ENDIAN(src_size, j, endian)]);
        printf("\n");

        if (fails_this_test>=max_fails) {
            HDputs("    maximum failures reached, aborting test...");
            goto error;
        }
    }

    if(H5Tclose(tid1) < 0) {
        H5_FAILED();
        printf("Can't close datatype\n");
        goto error;
    }

    if(H5Tclose(tid2) < 0) {
        H5_FAILED();
        printf("Can't close datatype\n");
        goto error;
    }

    if(H5Pclose(dxpl_id) < 0) {
        H5_FAILED();
        printf("Can't close property list\n");
        goto error;
    }

    if(H5Fclose(file) < 0) {
        H5_FAILED();
        printf("Can't close file\n");
        goto error;
    } /* end if */

    HDfree(buf);
    HDfree(saved_buf);

    PASSED();

    /* Restore the default error handler (set in h5_reset()) */
    h5_restore_err();

    reset_hdf5();	/*print statistics*/

    return 0;

 error:
    if (buf) HDfree(buf);
    if (saved_buf) HDfree(saved_buf);
    HDfflush(stdout);
    H5E_BEGIN_TRY {
        H5Tclose (tid1);
        H5Tclose (tid2);
        H5Pclose (dxpl_id);
        H5Fclose (file);
    } H5E_END_TRY;

    /* Restore the default error handler (set in h5_reset()) */
    h5_restore_err();

    reset_hdf5(); /*print statistics*/

    return MAX((int)fails_this_test, 1);
}


/*-------------------------------------------------------------------------
 * Function:	test_conv_int_1
 *
 * Purpose:	Test conversion of integer values from SRC to DST.
 *		These types should be any combination of:
 *
 * 			H5T_NATIVE_SCHAR	H5T_NATIVE_UCHAR
 *			H5T_NATIVE_SHORT	H5T_NATIVE_USHORT
 *			H5T_NATIVE_INT		H5T_NATIVE_UINT
 *			H5T_NATIVE_LONG		H5T_NATIVE_ULONG
 *			H5T_NATIVE_LLONG	H5T_NATIVE_ULLONG
 *
 * Return:	Success:	0
 *
 *		Failure:	number of errors
 *
 * Programmer:	Robb Matzke
 *              Monday, November 16, 1998
 *
 * Modifications:
 *
 *-------------------------------------------------------------------------
 */
static int
test_conv_int_1(const char *name, hid_t src, hid_t dst)
{
    size_t	        nelmts=0;		/*num values per test	*/
    const size_t	max_fails=8;		/*max number of failures*/
    size_t		fails_all_tests=0;	/*number of failures	*/
    size_t		fails_this_test;	/*fails for this test	*/
    char		str[256];		/*hello string		*/
    dtype_t		src_type, dst_type;	/*data types		*/
    const char		*src_type_name=NULL;	/*source type name	*/
    const char		*dst_type_name=NULL;	/*destination type name	*/
    int			endian;			/*machine endianess	*/
    size_t		src_size, dst_size;	/*type sizes		*/
    unsigned char	*buf=NULL;		/*buffer for conversion	*/
    unsigned char	*saved=NULL;		/*original values	*/
    size_t		j, k;			/*counters		*/
    unsigned char	*hw=NULL;		/*hardware conv result	*/
    unsigned char	src_bits[32];		/*src value in LE order	*/
    unsigned char	dst_bits[32];		/*dest value in LE order*/
    size_t		src_nbits;		/*source length in bits	*/
    size_t		dst_nbits;		/*dst length in bits	*/
    H5T_sign_t          src_sign;               /*source sign type      */
    H5T_sign_t          dst_sign;               /*dst sign type         */
    void		*aligned=NULL;		/*aligned temp buffer	*/
    signed char		hw_char;
    unsigned char	hw_uchar;
    short		hw_short;
    unsigned short	hw_ushort;
    int			hw_int;
    unsigned		hw_uint;
    long		hw_long;
    unsigned long	hw_ulong;
    long long		hw_llong;
    unsigned long long	hw_ullong;

    /* What are the names of the source and destination types */
    if (H5Tequal(src, H5T_NATIVE_SCHAR)) {
	src_type_name = "signed char";
	src_type = INT_SCHAR;
    } else if (H5Tequal(src, H5T_NATIVE_UCHAR)) {
	src_type_name = "unsigned char";
	src_type = INT_UCHAR;
    } else if (H5Tequal(src, H5T_NATIVE_SHORT)) {
	src_type_name = "short";
	src_type = INT_SHORT;
    } else if (H5Tequal(src, H5T_NATIVE_USHORT)) {
	src_type_name = "unsigned short";
	src_type = INT_USHORT;
    } else if (H5Tequal(src, H5T_NATIVE_INT)) {
	src_type_name = "int";
	src_type = INT_INT;
    } else if (H5Tequal(src, H5T_NATIVE_UINT)) {
	src_type_name = "unsigned int";
	src_type = INT_UINT;
    } else if (H5Tequal(src, H5T_NATIVE_LONG)) {
	src_type_name = "long";
	src_type = INT_LONG;
    } else if (H5Tequal(src, H5T_NATIVE_ULONG)) {
	src_type_name = "unsigned long";
	src_type = INT_ULONG;
    } else if (H5Tequal(src, H5T_NATIVE_LLONG)) {
	src_type_name = "long long";
	src_type = INT_LLONG;
    } else if (H5Tequal(src, H5T_NATIVE_ULLONG)) {
	src_type_name = "unsigned long long";
	src_type = INT_ULLONG;
    } else {
	src_type_name = "UNKNOWN";
	src_type = OTHER;
    }

    if (H5Tequal(dst, H5T_NATIVE_SCHAR)) {
	dst_type_name = "signed char";
	dst_type = INT_SCHAR;
    } else if (H5Tequal(dst, H5T_NATIVE_UCHAR)) {
	dst_type_name = "unsigned char";
	dst_type = INT_UCHAR;
    } else if (H5Tequal(dst, H5T_NATIVE_SHORT)) {
	dst_type_name = "short";
	dst_type = INT_SHORT;
    } else if (H5Tequal(dst, H5T_NATIVE_USHORT)) {
	dst_type_name = "unsigned short";
	dst_type = INT_USHORT;
    } else if (H5Tequal(dst, H5T_NATIVE_INT)) {
	dst_type_name = "int";
	dst_type = INT_INT;
    } else if (H5Tequal(dst, H5T_NATIVE_UINT)) {
	dst_type_name = "unsigned int";
	dst_type = INT_UINT;
    } else if (H5Tequal(dst, H5T_NATIVE_LONG)) {
	dst_type_name = "long";
	dst_type = INT_LONG;
    } else if (H5Tequal(dst, H5T_NATIVE_ULONG)) {
	dst_type_name = "unsigned long";
	dst_type = INT_ULONG;
    } else if (H5Tequal(dst, H5T_NATIVE_LLONG)) {
	dst_type_name = "long long";
	dst_type = INT_LLONG;
    } else if (H5Tequal(dst, H5T_NATIVE_ULLONG)) {
	dst_type_name = "unsigned long long";
	dst_type = INT_ULLONG;
    } else {
	dst_type_name = "UNKNOWN";
	dst_type = OTHER;
    }

    /* Sanity checks */
    if (OTHER==src_type || OTHER==dst_type) {
	HDsnprintf(str, sizeof(str), "Testing %s %s -> %s conversions",
		name, src_type_name, dst_type_name);
	printf("%-70s", str);
	H5_FAILED();
	HDputs("    Unknown data type.");
	goto error;
    } else {
        HDsnprintf(str, sizeof(str), "Testing %s %s -> %s conversions",
            name, src_type_name, dst_type_name);
        printf("%-70s", str);
        HDfflush(stdout);
        fails_this_test=0;
    }

    /* Some information about datatypes */
    endian = H5Tget_order(H5T_NATIVE_INT);
    src_size = H5Tget_size(src);
    dst_size = H5Tget_size(dst);
    src_nbits = H5Tget_precision(src); /* not 8*src_size, esp on J90 - QAK */
    dst_nbits = H5Tget_precision(dst); /* not 8*dst_size, esp on J90 - QAK */
    src_sign = H5Tget_sign(src);
    dst_sign = H5Tget_sign(dst);
    aligned = HDcalloc((size_t)1, sizeof(long long));

    /* Allocate and initialize the source buffer through macro INIT_INTEGER.  The BUF
     * will be used for the conversion while the SAVED buffer will be
     * used for the comparison later.
     */
    if(src_type == INT_SCHAR) {
        INIT_INTEGER(signed char, SCHAR_MAX, SCHAR_MIN, src_size, dst_size, src_nbits, buf, saved, nelmts);
    } else if(src_type == INT_UCHAR) {
        INIT_INTEGER(unsigned char, UCHAR_MAX, 0, src_size, dst_size, src_nbits, buf, saved, nelmts);
    } else if(src_type == INT_SHORT) {
        INIT_INTEGER(short, SHRT_MAX, SHRT_MIN, src_size, dst_size, src_nbits, buf, saved, nelmts);
    } else if(src_type == INT_USHORT) {
        INIT_INTEGER(unsigned short, USHRT_MAX, 0, src_size, dst_size, src_nbits, buf, saved, nelmts);
    } else if(src_type == INT_INT) {
        INIT_INTEGER(int, INT_MAX, INT_MIN, src_size, dst_size, src_nbits, buf, saved, nelmts);
    } else if(src_type == INT_UINT) {
        INIT_INTEGER(unsigned int, UINT_MAX, 0, src_size, dst_size, src_nbits, buf, saved, nelmts);
    } else if(src_type == INT_LONG) {
        INIT_INTEGER(long, LONG_MAX, LONG_MIN, src_size, dst_size, src_nbits, buf, saved, nelmts);
    } else if(src_type == INT_ULONG) {
        INIT_INTEGER(unsigned long, ULONG_MAX, 0, src_size, dst_size, src_nbits, buf, saved, nelmts);
    } else if(src_type == INT_LLONG) {
        INIT_INTEGER(long long, LLONG_MAX, LLONG_MIN, src_size, dst_size, src_nbits, buf, saved, nelmts);
    } else if(src_type == INT_ULLONG) {
        INIT_INTEGER(unsigned long long, ULLONG_MAX, 0, src_size, dst_size, src_nbits, buf, saved, nelmts);
    } else
        goto error;

    /* Perform the conversion */
    if (H5Tconvert(src, dst, nelmts, buf, NULL, H5P_DEFAULT) < 0)
        goto error;

    /* Check the results from the library against hardware */
    for (j=0; j<nelmts; j++) {
        if (INT_SCHAR==dst_type) {
            hw = (unsigned char*)&hw_char;
            switch (src_type) {
            case INT_SCHAR:
                HDmemcpy(aligned, saved+j*sizeof(signed char), sizeof(signed char));
                hw_char = (signed char)(*((signed char*)aligned));
                break;
            case INT_UCHAR:
                HDmemcpy(aligned, saved+j*sizeof(unsigned char), sizeof(unsigned char));
                hw_char = (signed char)(*((unsigned char*)aligned));
                break;
            case INT_SHORT:
                HDmemcpy(aligned, saved+j*sizeof(short), sizeof(short));
                hw_char = (signed char)(*((short*)aligned));
                break;
            case INT_USHORT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned short), sizeof(unsigned short));
                hw_char = (signed char)(*((unsigned short*)aligned));
                break;
            case INT_INT:
                HDmemcpy(aligned, saved+j*sizeof(int), sizeof(int));
                hw_char = (signed char)(*((int*)aligned));
                break;
            case INT_UINT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned), sizeof(unsigned));
                hw_char = (signed char)(*((unsigned*)aligned));
                break;
            case INT_LONG:
                HDmemcpy(aligned, saved+j*sizeof(long), sizeof(long));
                hw_char = (signed char)(*((long*)aligned));
                break;
            case INT_ULONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long), sizeof(unsigned long));
                hw_char = (signed char)(*((unsigned long*)aligned));
                break;
            case INT_LLONG:
                HDmemcpy(aligned, saved+j*sizeof(long long), sizeof(long long));
                hw_char = (signed char)(*((long long*)aligned));
                break;
            case INT_ULLONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long long), sizeof(unsigned long long));
                hw_char = (signed char)(*((unsigned long long*)aligned));
                break;
            case FLT_FLOAT:
            case FLT_DOUBLE:
            case FLT_LDOUBLE:
            case OTHER:
            default:
                HDassert(0 && "Unknown type");
                break;
            }
        } else if (INT_UCHAR==dst_type) {
            hw = (unsigned char*)&hw_uchar;
            switch (src_type) {
            case INT_SCHAR:
                HDmemcpy(aligned, saved+j*sizeof(signed char), sizeof(signed char));
                hw_uchar = (unsigned char)(*((signed char*)aligned));
                break;
            case INT_UCHAR:
                HDmemcpy(aligned, saved+j*sizeof(unsigned char), sizeof(unsigned char));
                hw_uchar = (unsigned char)(*((unsigned char*)aligned));
                break;
            case INT_SHORT:
                HDmemcpy(aligned, saved+j*sizeof(short), sizeof(short));
                hw_uchar = (unsigned char)(*((short*)aligned));
                break;
            case INT_USHORT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned short), sizeof(unsigned short));
                hw_uchar = (unsigned char)(*((unsigned short*)aligned));
                break;
            case INT_INT:
                HDmemcpy(aligned, saved+j*sizeof(int), sizeof(int));
                hw_uchar = (unsigned char)(*((int*)aligned));
                break;
            case INT_UINT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned), sizeof(unsigned));
                hw_uchar = (unsigned char)(*((unsigned*)aligned));
                break;
            case INT_LONG:
                HDmemcpy(aligned, saved+j*sizeof(long), sizeof(long));
                hw_uchar = (unsigned char)(*((long*)aligned));
                break;
            case INT_ULONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long), sizeof(unsigned long));
                hw_uchar = (unsigned char)(*((unsigned long*)aligned));
                break;
            case INT_LLONG:
                HDmemcpy(aligned, saved+j*sizeof(long long), sizeof(long long));
                hw_uchar = (unsigned char)(*((long long*)aligned));
                break;
            case INT_ULLONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long long), sizeof(unsigned long long));
                hw_uchar = (unsigned char)(*((unsigned long long*)aligned));
                break;
            case FLT_FLOAT:
            case FLT_DOUBLE:
            case FLT_LDOUBLE:
            case OTHER:
            default:
                HDassert(0 && "Unknown type");
                break;
            }
        } else if (INT_SHORT==dst_type) {
            hw = (unsigned char*)&hw_short;
            switch (src_type) {
            case INT_SCHAR:
                HDmemcpy(aligned, saved+j*sizeof(char), sizeof(char));
                hw_short = (short)(*((char*)aligned));
                break;
            case INT_UCHAR:
                HDmemcpy(aligned, saved+j*sizeof(unsigned char), sizeof(unsigned char));
                hw_short = (short)(*((unsigned char*)aligned));
                break;
            case INT_SHORT:
                HDmemcpy(aligned, saved+j*sizeof(short), sizeof(short));
                hw_short = (short)(*((short*)aligned));
                break;
            case INT_USHORT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned short), sizeof(unsigned short));
                hw_short = (short)(*((unsigned short*)aligned));
                break;
            case INT_INT:
                HDmemcpy(aligned, saved+j*sizeof(int), sizeof(int));
                hw_short = (short)(*((int*)aligned));
                break;
            case INT_UINT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned), sizeof(unsigned));
                hw_short = (short)(*((unsigned*)aligned));
                break;
            case INT_LONG:
                HDmemcpy(aligned, saved+j*sizeof(long), sizeof(long));
                hw_short = (short)(*((long*)aligned));
                break;
            case INT_ULONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long), sizeof(unsigned long));
                hw_short = (short)(*((unsigned long*)aligned));
                break;
            case INT_LLONG:
                HDmemcpy(aligned, saved+j*sizeof(long long), sizeof(long long));
                hw_short = (short)(*((long long*)aligned));
                break;
            case INT_ULLONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long long), sizeof(unsigned long long));
                hw_short = (short)(*((unsigned long long*)aligned));
                break;

            case FLT_FLOAT:
            case FLT_DOUBLE:
            case FLT_LDOUBLE:
            case OTHER:
            default:
                HDassert(0 && "Unknown type");
                break;
            }
        } else if (INT_USHORT==dst_type) {
            hw = (unsigned char*)&hw_ushort;
            switch (src_type) {
            case INT_SCHAR:
                HDmemcpy(aligned, saved+j*sizeof(signed char), sizeof(signed char));
                hw_ushort = (unsigned short)(*((signed char*)aligned));
                break;
            case INT_UCHAR:
                HDmemcpy(aligned, saved+j*sizeof(unsigned char), sizeof(unsigned char));
                hw_ushort = (unsigned short)(*((unsigned char*)aligned));
                break;
            case INT_SHORT:
                HDmemcpy(aligned, saved+j*sizeof(short), sizeof(short));
                hw_ushort = (unsigned short)(*((short*)aligned));
                break;
            case INT_USHORT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned short), sizeof(unsigned short));
                hw_ushort = (unsigned short)(*((unsigned short*)aligned));
                break;
            case INT_INT:
                HDmemcpy(aligned, saved+j*sizeof(int), sizeof(int));
                hw_ushort = (unsigned short)(*((int*)aligned));
                break;
            case INT_UINT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned), sizeof(unsigned));
                hw_ushort = (unsigned short)(*((unsigned*)aligned));
                break;
            case INT_LONG:
                HDmemcpy(aligned, saved+j*sizeof(long), sizeof(long));
                hw_ushort = (unsigned short)(*((long*)aligned));
                break;
            case INT_ULONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long), sizeof(unsigned long));
                hw_ushort = (unsigned short)(*((unsigned long*)aligned));
                break;
            case INT_LLONG:
                HDmemcpy(aligned, saved+j*sizeof(long long), sizeof(long long));
                hw_ushort = (unsigned short)(*((long long*)aligned));
                break;
            case INT_ULLONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long long), sizeof(unsigned long long));
                hw_ushort = (unsigned short)(*((unsigned long long*)aligned));
                break;
            case FLT_FLOAT:
            case FLT_DOUBLE:
            case FLT_LDOUBLE:
            case OTHER:
            default:
                HDassert(0 && "Unknown type");
                break;
            }
        } else if (INT_INT==dst_type) {
            hw = (unsigned char*)&hw_int;
            switch (src_type) {
            case INT_SCHAR:
                HDmemcpy(aligned, saved+j*sizeof(signed char), sizeof(signed char));
                hw_int = (int)(*((signed char*)aligned));
                break;
            case INT_UCHAR:
                HDmemcpy(aligned, saved+j*sizeof(unsigned char), sizeof(unsigned char));
                hw_int = (int)(*((unsigned char*)aligned));
                break;
            case INT_SHORT:
                HDmemcpy(aligned, saved+j*sizeof(short), sizeof(short));
                hw_int = (int)(*((short*)aligned));
                break;
            case INT_USHORT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned short), sizeof(unsigned short));
                hw_int = (int)(*((unsigned short*)aligned));
                break;
            case INT_INT:
                HDmemcpy(aligned, saved+j*sizeof(int), sizeof(int));
                hw_int = (int)(*((int*)aligned));
                break;
            case INT_UINT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned), sizeof(unsigned));
                hw_int = (int)(*((unsigned*)aligned));
                break;
            case INT_LONG:
                HDmemcpy(aligned, saved+j*sizeof(long), sizeof(long));
                hw_int = (int)(*((long*)aligned));
                break;
            case INT_ULONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long), sizeof(unsigned long));
                hw_int = (int)(*((unsigned long*)aligned));
                break;
            case INT_LLONG:
                HDmemcpy(aligned, saved+j*sizeof(long long), sizeof(long long));
                hw_int = (int)(*((long long*)aligned));
                break;
            case INT_ULLONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long long), sizeof(unsigned long long));
                hw_int = (int)(*((unsigned long long*)aligned));
                break;
            case FLT_FLOAT:
            case FLT_DOUBLE:
            case FLT_LDOUBLE:
            case OTHER:
            default:
                HDassert(0 && "Unknown type");
                break;
            }
        } else if (INT_UINT==dst_type) {
            hw = (unsigned char*)&hw_uint;
            switch (src_type) {
            case INT_SCHAR:
                HDmemcpy(aligned, saved+j*sizeof(signed char), sizeof(signed char));
                hw_uint = (unsigned int)(*((signed char*)aligned));
                break;
            case INT_UCHAR:
                HDmemcpy(aligned, saved+j*sizeof(unsigned char), sizeof(unsigned char));
                hw_uint = (unsigned int)(*((unsigned char*)aligned));
                break;
            case INT_SHORT:
                HDmemcpy(aligned, saved+j*sizeof(short), sizeof(short));
                hw_uint = (unsigned int)(*((short*)aligned));
                break;
            case INT_USHORT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned short), sizeof(unsigned short));
                hw_uint = (unsigned int)(*((unsigned short*)aligned));
                break;
            case INT_INT:
                HDmemcpy(aligned, saved+j*sizeof(int), sizeof(int));
                hw_uint = (unsigned int)(*((int*)aligned));
                break;
            case INT_UINT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned), sizeof(unsigned));
                hw_uint = (unsigned int)(*((unsigned*)aligned));
                break;
            case INT_LONG:
                HDmemcpy(aligned, saved+j*sizeof(long), sizeof(long));
                hw_uint = (unsigned int)(*((long*)aligned));
                break;
            case INT_ULONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long), sizeof(unsigned long));
                hw_uint = (unsigned int)(*((unsigned long*)aligned));
                break;
            case INT_LLONG:
                HDmemcpy(aligned, saved+j*sizeof(long long), sizeof(long long));
                hw_uint = (unsigned int)(*((long long*)aligned));
                break;
            case INT_ULLONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long long), sizeof(unsigned long long));
                hw_uint = (unsigned int)(*((unsigned long long*)aligned));
                break;
            case FLT_FLOAT:
            case FLT_DOUBLE:
            case FLT_LDOUBLE:
            case OTHER:
            default:
                HDassert(0 && "Unknown type");
                break;
            }
        } else if (INT_LONG==dst_type) {
            hw = (unsigned char*)&hw_long;
            switch (src_type) {
            case INT_SCHAR:
                HDmemcpy(aligned, saved+j*sizeof(signed char), sizeof(signed char));
                hw_long = (long int)(*((signed char*)aligned));
                break;
            case INT_UCHAR:
                HDmemcpy(aligned, saved+j*sizeof(unsigned char), sizeof(unsigned char));
                hw_long = (long int)(*((unsigned char*)aligned));
                break;
            case INT_SHORT:
                HDmemcpy(aligned, saved+j*sizeof(short), sizeof(short));
                hw_long = (long int)(*((short*)aligned));
                break;
            case INT_USHORT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned short), sizeof(unsigned short));
                hw_long = (long int)(*((unsigned short*)aligned));
                break;
            case INT_INT:
                HDmemcpy(aligned, saved+j*sizeof(int), sizeof(int));
                hw_long = (long int)(*((int*)aligned));
                break;
            case INT_UINT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned), sizeof(unsigned));
                hw_long = (long int)(*((unsigned*)aligned));
                break;
            case INT_LONG:
                HDmemcpy(aligned, saved+j*sizeof(long), sizeof(long));
                hw_long = (long int)(*((long*)aligned));
                break;
            case INT_ULONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long), sizeof(unsigned long));
                hw_long = (long int)(*((unsigned long*)aligned));
                break;
            case INT_LLONG:
                HDmemcpy(aligned, saved+j*sizeof(long long), sizeof(long long));
                hw_long = (long int)(*((long long*)aligned));
                break;
            case INT_ULLONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long long), sizeof(unsigned long long));
                hw_long = (long int)(*((unsigned long long*)aligned));
                break;
            case FLT_FLOAT:
            case FLT_DOUBLE:
            case FLT_LDOUBLE:
            case OTHER:
            default:
                HDassert(0 && "Unknown type");
                break;
            }
        } else if (INT_ULONG==dst_type) {
            hw = (unsigned char*)&hw_ulong;
            switch (src_type) {
            case INT_SCHAR:
                HDmemcpy(aligned, saved+j*sizeof(signed char), sizeof(signed char));
                hw_ulong = (unsigned long)(*((signed char*)aligned));
                break;
            case INT_UCHAR:
                HDmemcpy(aligned, saved+j*sizeof(unsigned char), sizeof(unsigned char));
                hw_ulong = (unsigned long)(*((unsigned char*)aligned));
                break;
            case INT_SHORT:
                HDmemcpy(aligned, saved+j*sizeof(short), sizeof(short));
                hw_ulong = (unsigned long)(*((short*)aligned));
                break;
            case INT_USHORT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned short), sizeof(unsigned short));
                hw_ulong = (unsigned long)(*((unsigned short*)aligned));
                break;
            case INT_INT:
                HDmemcpy(aligned, saved+j*sizeof(int), sizeof(int));
                hw_ulong = (unsigned long)(*((int*)aligned));
                break;
            case INT_UINT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned), sizeof(unsigned));
                hw_ulong = (unsigned long)(*((unsigned*)aligned));
                break;
            case INT_LONG:
                HDmemcpy(aligned, saved+j*sizeof(long), sizeof(long));
                hw_ulong = (unsigned long)(*((long*)aligned));
                break;
            case INT_ULONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long), sizeof(unsigned long));
                hw_ulong = (unsigned long)(*((unsigned long*)aligned));
                break;
            case INT_LLONG:
                HDmemcpy(aligned, saved+j*sizeof(long long), sizeof(long long));
                hw_ulong = (unsigned long)(*((long long*)aligned));
                break;
            case INT_ULLONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long long), sizeof(unsigned long long));
                hw_ulong = (unsigned long)(*((unsigned long long*)aligned));
                break;
            case FLT_FLOAT:
            case FLT_DOUBLE:
            case FLT_LDOUBLE:
            case OTHER:
            default:
                HDassert(0 && "Unknown type");
                break;
            }
        } else if (INT_LLONG==dst_type) {
            hw = (unsigned char*)&hw_llong;
            switch (src_type) {
            case INT_SCHAR:
                HDmemcpy(aligned, saved+j*sizeof(char), sizeof(char));
                hw_llong = (long long)(*((char*)aligned));
                break;
            case INT_UCHAR:
                HDmemcpy(aligned, saved+j*sizeof(unsigned char), sizeof(unsigned char));
                hw_llong = (long long)(*((unsigned char*)aligned));
                break;
            case INT_SHORT:
                HDmemcpy(aligned, saved+j*sizeof(short), sizeof(short));
                hw_llong = (long long)(*((short*)aligned));
                break;
            case INT_USHORT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned short), sizeof(unsigned short));
                hw_llong = (long long)(*((unsigned short*)aligned));
                break;
            case INT_INT:
                HDmemcpy(aligned, saved+j*sizeof(int), sizeof(int));
                hw_llong = (long long)(*((int*)aligned));
                break;
            case INT_UINT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned), sizeof(unsigned));
                hw_llong = (long long)(*((unsigned*)aligned));
                break;
            case INT_LONG:
                HDmemcpy(aligned, saved+j*sizeof(long), sizeof(long));
                hw_llong = (long long)(*((long*)aligned));
                break;
            case INT_ULONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long), sizeof(unsigned long));
                hw_llong = (long long)(*((unsigned long*)aligned));
                break;
            case INT_LLONG:
                HDmemcpy(aligned, saved+j*sizeof(long long), sizeof(long long));
                hw_llong = (long long)(*((long long*)aligned));
                break;
            case INT_ULLONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long long), sizeof(unsigned long long));
                hw_llong = (long long)(*((unsigned long long*)aligned));
                break;
            case FLT_FLOAT:
            case FLT_DOUBLE:
            case FLT_LDOUBLE:
            case OTHER:
            default:
                HDassert(0 && "Unknown type");
                break;
            }
        } else if (INT_ULLONG==dst_type) {
            hw = (unsigned char*)&hw_ullong;
            switch (src_type) {
            case INT_SCHAR:
                HDmemcpy(aligned, saved+j*sizeof(signed char), sizeof(signed char));
                hw_ullong = (unsigned long long)(*((signed char*)aligned));
                break;
            case INT_UCHAR:
                HDmemcpy(aligned, saved+j*sizeof(unsigned char), sizeof(unsigned char));
                hw_ullong = (unsigned long long)(*((unsigned char*)aligned));
                break;
            case INT_SHORT:
                HDmemcpy(aligned, saved+j*sizeof(short), sizeof(short));
                hw_ullong = (unsigned long long)(*((short*)aligned));
                break;
            case INT_USHORT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned short), sizeof(unsigned short));
                hw_ullong = (unsigned long long)(*((unsigned short*)aligned));
                break;
            case INT_INT:
                HDmemcpy(aligned, saved+j*sizeof(int), sizeof(int));
                hw_ullong = (unsigned long long)(*((int*)aligned));
                break;
            case INT_UINT:
                HDmemcpy(aligned, saved+j*sizeof(unsigned), sizeof(unsigned));
                hw_ullong = (unsigned long long)(*((unsigned*)aligned));
                break;
            case INT_LONG:
                HDmemcpy(aligned, saved+j*sizeof(long), sizeof(long));
                hw_ullong = (unsigned long long)(*((long*)aligned));
                break;
            case INT_ULONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long), sizeof(unsigned long));
                hw_ullong = (unsigned long long)(*((unsigned long*)aligned));
                break;
            case INT_LLONG:
                HDmemcpy(aligned, saved+j*sizeof(long long), sizeof(long long));
                hw_ullong = (unsigned long long)(*((long long*)aligned));
                break;
            case INT_ULLONG:
                HDmemcpy(aligned, saved+j*sizeof(unsigned long long), sizeof(unsigned long long));
                hw_ullong = (unsigned long long)(*((unsigned long long*)aligned));
                break;
            case FLT_FLOAT:
            case FLT_DOUBLE:
            case FLT_LDOUBLE:
            case OTHER:
            default:
                HDassert(0 && "Unknown type");
                break;
            }
        }

        /* Make certain that there isn't some weird number of destination bits */
        assert(dst_nbits%8==0);

        /* Are the two results the same? */
        for (k=(dst_size-(dst_nbits/8)); k<dst_size; k++)
            if (buf[j*dst_size+k]!=hw[k])
                break;
        if (k==dst_size)
            continue; /*no error*/

        /*
         * Convert the source and destination values to little endian
         * order so we can use the HDF5 bit vector operations to test
         * certain things.  These routines have already been tested by
         * the `bittests' program.
         */
        for (k=0; k<src_size; k++)
            src_bits[src_size-(k+1)] = saved[j*src_size+ENDIAN(src_size, k, endian)];

        for (k=0; k<dst_size; k++)
            dst_bits[dst_size-(k+1)] = buf[j*dst_size+ENDIAN(dst_size, k, endian)];

        /*
         * Hardware usually doesn't handle overflows too gracefully. The
         * hardware conversion result during overflows is usually garbage
         * so we must handle those cases differetly when checking results.
         */
        if (H5T_SGN_2==src_sign && H5T_SGN_2==dst_sign) {
            if (src_nbits>dst_nbits) {
                if(0==H5T__bit_get_d(src_bits, src_nbits-1, (size_t)1) &&
                        H5T__bit_find(src_bits, dst_nbits-1, (src_nbits-dst_nbits),
                            H5T_BIT_MSB, 1)>=0) {
                    /*
                     * Source is positive and the magnitude is too large for
                     * the destination.  The destination should be set to the
                     * maximum possible value: 0x7f...f
                     */
                    if (0==H5T__bit_get_d(dst_bits, dst_nbits-1, (size_t)1) &&
                            H5T__bit_find(dst_bits, (size_t)0, dst_nbits-1, H5T_BIT_LSB, 0) < 0)
                        continue; /*no error*/
                } else if (1==H5T__bit_get_d(src_bits, src_nbits-1, (size_t)1) &&
                       H5T__bit_find(src_bits, (size_t)0, src_nbits-1, H5T_BIT_MSB,
                            0)+1>=(ssize_t)dst_nbits) {
                    /*
                     * Source is negative but the magnitude is too large for
                     * the destination. The destination should be set to the
                     * smallest possible value: 0x80...0
                     */
                    if (1==H5T__bit_get_d(dst_bits, dst_nbits-1, (size_t)1) &&
                            H5T__bit_find(dst_bits, (size_t)0, dst_nbits-1, H5T_BIT_LSB, 1) < 0)
                        continue; /*no error*/
                }
            } else if(src_nbits<dst_nbits) {
                /* Source is smaller than the destination */
                if(0==H5T__bit_get_d(src_bits, src_nbits-1, (size_t)1)) {
                    /*
                     * Source is positive, so the excess bits in the
                     * destination should be set to 0's.
                     */
                    if (0==H5T__bit_get_d(dst_bits, src_nbits-1, (size_t)1) &&
                            H5T__bit_find(dst_bits, src_nbits, dst_nbits-src_nbits, H5T_BIT_LSB, 1) < 0)
                        continue; /*no error*/
                } else {
                    /*
                     * Source is negative, so the excess bits in the
                     * destination should be set to 1's.
                     */
                    if (1==H5T__bit_get_d(dst_bits, src_nbits-1, (size_t)1) &&
                            H5T__bit_find(dst_bits, src_nbits, dst_nbits-src_nbits, H5T_BIT_LSB, 0) < 0)
                        continue; /*no error*/
                }
            }
        } else if (H5T_SGN_2==src_sign && H5T_SGN_NONE==dst_sign) {
            if (H5T__bit_get_d(src_bits, src_nbits-1, (size_t)1)) {
                /*
                 * The source is negative so the result should be zero.
                 * The source is negative if the most significant bit is
                 * set.  The destination is zero if all bits are zero.
                 */
                if (H5T__bit_find(dst_bits, (size_t)0, dst_nbits, H5T_BIT_LSB, 1) < 0)
                    continue; /*no error*/
            } else if (src_nbits>dst_nbits &&
                   H5T__bit_find(src_bits, dst_nbits-1,
                        src_nbits-dst_nbits, H5T_BIT_LSB, 1)>=0) {
                /*
                 * The source is a value with a magnitude too large for
                 * the destination.  The destination should be the
                 * largest possible value: 0xff...f
                 */
                if (H5T__bit_find(dst_bits, (size_t)0, dst_nbits, H5T_BIT_LSB, 0) < 0)
                    continue; /*no error*/
            }