mirror of
https://github.com/HDFGroup/hdf5.git
synced 2025-01-24 15:25:00 +08:00
fc88fcde10
* Merge examples repo into library * Change grepTest to be more fault-tolerant * Update examples macro file * Exclude all Fortran examples from doxygen
212 lines
5.2 KiB
Bash
Executable File
212 lines
5.2 KiB
Bash
Executable File
#! /bin/sh
|
|
#
|
|
# 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 files COPYING and Copyright.html. COPYING can be found at the root
|
|
# of the source code distribution tree; Copyright.html can be found at the
|
|
# root level of an installed copy of the electronic HDF5 document set and
|
|
# is linked from the top-level documents page. It can also be found at
|
|
# http://hdfgroup.org/HDF5/doc/Copyright.html. If you do not have
|
|
# access to either file, you may request a copy from help@hdfgroup.org.
|
|
|
|
srcdir=@srcdir@
|
|
|
|
|
|
case $FC in
|
|
*/*) H5DUMP=`echo $FC | sed -e 's/\/[^/]*$/\/h5dump/'`;
|
|
test -x $H5DUMP || H5DUMP=h5dump;;
|
|
*) H5DUMP=h5dump;;
|
|
esac
|
|
|
|
|
|
case `echo "testing\c"; echo 1,2,3`,`echo -n testing; echo 1,2,3` in
|
|
*c*,-n*) ECHO_N= ECHO_C='
|
|
' ;;
|
|
*c*,* ) ECHO_N=-n ECHO_C= ;;
|
|
*) ECHO_N= ECHO_C='\c' ;;
|
|
esac
|
|
ECHO_N="echo $ECHO_N"
|
|
|
|
|
|
exout() {
|
|
$*
|
|
}
|
|
|
|
dumpout() {
|
|
$H5DUMP $*
|
|
}
|
|
|
|
# compare current version, required version.
|
|
# returns if cur_ver < req_ver is true.
|
|
version_compare() {
|
|
version_lt=0
|
|
if [ ! "$(printf '%s\n' "$1" "$2" | sort -V | head -n1)" = "$2" ]; then
|
|
version_lt=1
|
|
fi
|
|
}
|
|
|
|
H5_LIBVER=@H5_LIBVER@
|
|
H5_LIBVER_DIR=@H5_LIBVER_DIR@
|
|
|
|
topics="alloc \
|
|
checksum \
|
|
chunk \
|
|
compact \
|
|
extern \
|
|
fillval \
|
|
gzip \
|
|
hyper \
|
|
rdwr \
|
|
soint \
|
|
szip \
|
|
unlimmod"
|
|
|
|
FORTRAN_2003_CONDITIONAL_F="@FORTRAN_2003_CONDITIONAL_F@"
|
|
|
|
if [ "$FORTRAN_2003_CONDITIONAL_F" = "Xyes" ]; then
|
|
topics="$topics rdwr_kind"
|
|
fi
|
|
|
|
return_val=0
|
|
|
|
#Remove external data file from h5ex_d_extern
|
|
rm -f h5ex_d_extern.data
|
|
|
|
for topic in $topics
|
|
do
|
|
fname=h5ex_d_$topic
|
|
$ECHO_N "Testing FORTRAN/H5D/$fname...$ECHO_C"
|
|
exout ./$fname >tmp.test
|
|
status=$?
|
|
if test $status -eq 1
|
|
then
|
|
echo " Unsupported feature"
|
|
status=0
|
|
else
|
|
if [ "$topic" = "alloc" ]; then
|
|
# Check if the only difference is the size of the unallocated space. This
|
|
# was fixed later in HDF5 to be of zero size.
|
|
status=0
|
|
diff tmp.test $srcdir/tfiles/18/$fname.tst > tmp.diff
|
|
if [ $? -ne 0 ]; then
|
|
NumOfFinds=`grep -c "0 bytes" tmp.diff | wc -l`
|
|
rm -f tmp.diff
|
|
if [ "$NumOfFinds" -gt "1" ]; then
|
|
status=1
|
|
fi
|
|
fi
|
|
else
|
|
cmp -s tmp.test $srcdir/tfiles/18/$fname.tst
|
|
status=$?
|
|
fi
|
|
status=$?
|
|
if test $status -ne 0
|
|
then
|
|
echo " FAILED!"
|
|
else
|
|
dumpout $fname.h5 >tmp.test
|
|
rm -f $fname.h5
|
|
cmp -s tmp.test $srcdir/tfiles/18/$fname.ddl
|
|
status=$?
|
|
if test $status -ne 0
|
|
then
|
|
# test to see if the only difference is because of big-endian and little-endian
|
|
diff tmp.test $srcdir/tfiles/18/$fname.ddl > tmp.diff
|
|
echo " "
|
|
NumOfFinds=`grep -c "DATATYPE" tmp.diff`
|
|
NumOfFinds=`expr $NumOfFinds \* 2`
|
|
NumOfLines=`wc -l <tmp.diff`
|
|
rm -f tmp.diff
|
|
if test $NumOfLines -gt $NumOfFinds
|
|
then
|
|
echo " FAILED!"
|
|
else
|
|
echo " *Inconsequential difference* ... Passed"
|
|
status=0
|
|
fi
|
|
else
|
|
echo " Passed"
|
|
fi
|
|
fi
|
|
return_val=`expr $status + $return_val`
|
|
fi
|
|
done
|
|
|
|
#######Non-standard tests#######
|
|
USE_ALT=""
|
|
### Set default tfiles directory for tests
|
|
nbitdir="18"
|
|
version_compare "$H5_LIBVER" "1.8.23"
|
|
# check if HDF5 version is < 1.8.23
|
|
if [ "$version_lt" = 1 ]; then
|
|
USE_ALT="22"
|
|
else
|
|
# check if HDF5 version is < 1.10.8
|
|
version_compare "$H5_LIBVER" "1.10.8"
|
|
if [ "$version_lt" = 1 ]; then
|
|
USE_ALT="07"
|
|
nbitdir="110"
|
|
fi
|
|
fi
|
|
|
|
topics="nbit"
|
|
for topic in $topics18
|
|
do
|
|
fname=h5ex_d_$topic
|
|
$ECHO_N "Testing C/H5D/$fname...$ECHO_C"
|
|
exout ./$fname >tmp.test
|
|
status=$?
|
|
if test $status -eq 1
|
|
then
|
|
echo " Unsupported feature"
|
|
status=0
|
|
else
|
|
if [[ $fname == "h5ex_d_nbit" ]]
|
|
then
|
|
tdir=$nbitdir
|
|
if [[ $USE_ALT == "" ]]
|
|
then
|
|
### set USE_ALT=07 if not set above
|
|
USE_ALT="07"
|
|
fi
|
|
else
|
|
tdir=18
|
|
### unset USE_ALT for the other topics
|
|
USE_ALT=""
|
|
fi
|
|
cmp -s tmp.test $srcdir/tfiles/18/$fname.tst
|
|
status=$?
|
|
if test $status -ne 0
|
|
then
|
|
echo " FAILED!"
|
|
else
|
|
if [[ $fname == "h5ex_d_transform" ]]
|
|
then
|
|
targ="-n"
|
|
else
|
|
targ=""
|
|
fi
|
|
dumpout $targ $fname.h5 >tmp.test
|
|
rm -f $fname.h5
|
|
cmp -s tmp.test $srcdir/tfiles/$tdir/$fname$USE_ALT.ddl
|
|
status=$?
|
|
if test $status -ne 0
|
|
then
|
|
echo " FAILED!"
|
|
else
|
|
echo " Passed"
|
|
fi
|
|
fi
|
|
return_val=`expr $status + $return_val`
|
|
fi
|
|
done
|
|
|
|
|
|
rm -f tmp.test
|
|
echo "$return_val tests failed in FORTRAN/H5D/"
|
|
exit $return_val
|