diff options
author | Raymond Lu <songyulu@hdfgroup.org> | 2011-10-13 18:25:18 (GMT) |
---|---|---|
committer | Raymond Lu <songyulu@hdfgroup.org> | 2011-10-13 18:25:18 (GMT) |
commit | 6f50b718192e2b6c7be0cea3c631bad2f1e3c128 (patch) | |
tree | a2cfa823ed38229e6956299b031468d4ea4c1f95 /vms/tools | |
parent | 301a24eb3273883257fd65317bdcdf755ce49f4a (diff) | |
download | hdf5-6f50b718192e2b6c7be0cea3c631bad2f1e3c128.zip hdf5-6f50b718192e2b6c7be0cea3c631bad2f1e3c128.tar.gz hdf5-6f50b718192e2b6c7be0cea3c631bad2f1e3c128.tar.bz2 |
[svn-r21550] I updated many test cases in check_h5dump.com. There are some failures but I want to check in first. Then I can fix them during the release test.
Tested on VMS.
Diffstat (limited to 'vms/tools')
-rw-r--r-- | vms/tools/h5dump/check_h5dump.com | 107 |
1 files changed, 98 insertions, 9 deletions
diff --git a/vms/tools/h5dump/check_h5dump.com b/vms/tools/h5dump/check_h5dump.com index 7d08a45..85d8b2f 100644 --- a/vms/tools/h5dump/check_h5dump.com +++ b/vms/tools/h5dump/check_h5dump.com @@ -37,7 +37,8 @@ $ ! h5dump tests $ ! $ $ -$ +$ ! Test for signed/unsigned datasets +$ CALL TOOLTEST packedbits.ddl "packedbits.h5" $ ! Test for displaying groups $ CALL TOOLTEST tgroup-1.ddl "tgroup.h5" $ ! Test for displaying the selected groups @@ -57,8 +58,10 @@ $ CALL TOOLTEST tnamed_dtype_attr.ddl "tnamed_dtype_attr.h5" $ $ ! Test for displaying soft links $ CALL TOOLTEST tslink-1.ddl "tslink.h5" +$ CALL TOOLTEST tudlink-1.ddl "tudlink.h5" $ ! Test for displaying the selected link $ CALL TOOLTEST tslink-2.ddl "-l slink2 tslink.h5" +$ CALL TOOLTEST tudlink-2.ddl "-l udlink2 tudlink.h5" $ $ ! Tests for hard links $ CALL TOOLTEST thlink-1.ddl "thlink.h5" @@ -106,12 +109,15 @@ $ CALL TOOLTEST tvlstr.ddl "tvlstr.h5" $ $ ! Test for files with array data $ CALL TOOLTEST tarray1.ddl "tarray1.h5" +# ! Added for bug# 2092 - tarray1_big.h +$ CALL TOOLTEST tarray1_big.ddl "-"""R""" tarray1_big.h5" $ CALL TOOLTEST tarray2.ddl "tarray2.h5" $ CALL TOOLTEST tarray3.ddl "tarray3.h5" $ CALL TOOLTEST tarray4.ddl "tarray4.h5" $ CALL TOOLTEST tarray5.ddl "tarray5.h5" $ CALL TOOLTEST tarray6.ddl "tarray6.h5" $ CALL TOOLTEST tarray7.ddl "tarray7.h5" +$ CALL TOOLTEST tarray8.ddl "tarray8.h5" $ $ ! Test for files with empty data $ CALL TOOLTEST tempty.ddl "tempty.h5" @@ -183,14 +189,39 @@ $ $ ! Array indices print/not print $ CALL TOOLTEST tindicesyes.ddl "taindices.h5" $ CALL TOOLTEST tindicesno.ddl "-y taindices.h5" +$ +$ ! Array indices with subsetting +$ ! 1D case +$ CALL TOOLTEST tindicessub1.ddl "-d 1d -s 1 -S 10 -c 2 -k 3 taindices.h5" +$ ! 2D case +$ CALL TOOLTEST tindicessub2.ddl "-d 2d -s 1,2 -S 3,3 -c 3,2 -k 2,2 taindices.h5" +$ ! 3D case +$ CALL TOOLTEST tindicessub3.ddl "-d 3d -s 0,1,2 -S 1,3,3 -c 2,2,2 -k 1,2,2 taindices.h5" +$ ! 4D case +$ CALL TOOLTEST tindicessub4.ddl "-d 4d -s 0,0,1,2 -c 2,2,3,2 -S 1,1,3,3 -k 1,1,2,2 taindices.h5" +$ +$ ! Exceed the dimensions for subsetting +$ CALL TOOLTEST texceedsubstart.ddl "-d 1d -s 1,3 taindices.h5" +$ CALL TOOLTEST texceedsubcount.ddl "-d 1d -c 1,3 taindices.h5" +$ CALL TOOLTEST texceedsubstride.ddl "-d 1d -S 1,3 taindices.h5" +$ CALL TOOLTEST texceedsubblock.ddl "-d 1d -k 1,3 taindices.h5" + $ ! User defined $ CALL TOOLTEST tuserfilter.ddl "-"""H""" -p -d myfilter tfilters.h5" -$ +$ ! Test for displaying objects with very long names. The error message says: +$ ! %DIFF-F-READERR, error reading DISK$USER:[HDFGROUP.1_8_VMS_9_30.TOOLS.TESTFILES]TLONGLINKS.DDL;1 +$ ! -RMS-W-RTB, 66573 byte record too large for user's buffer +$ ! %RMS-E-EOF, end of file detected +$! CALL TOOLTEST tlonglinks.ddl "tlonglinks.h5" +$ ! Dimensions over 4GB, print boundary +$ CALL TOOLTEST tbigdims.ddl "-d dset4gb -s 4294967284 -c 22 tbigdims.h5" +$ ! Hyperslab read +$ CALL TOOLTEST thyperslab.ddl "thyperslab.h5" $ ! Test for displaying dataset and attribute of null space $ CALL TOOLTEST tnullspace.ddl "tnullspace.h5" $ -$ ! Test for displaying objects with very long names -$ !CALL TOOLTEST tlonglinks.ddl "tlonglinks.h5" +$ ! Test for displaying dataset and attribute of space with 0 dimension size +$ CALL TOOLTEST zerodim.ddl "zerodim.h5" $ $ ! Test for long double (some systems do not have long double) $ ! CALL TOOLTEST tldouble.ddl "tldouble.h5" @@ -205,6 +236,9 @@ $ CALL TOOLTEST1 tbin4.ddl "-d double -o out4.bin -b """FILE""" tbinary.h5" $ $ ! Test for dataset region references $ CALL TOOLTEST tdatareg.ddl "tdatareg.h5" +$ CALL TOOLTEST tdataregR.ddl "-"""R""" tdatareg.h5" +$ CALL TOOLTEST tattrreg.ddl "tattrreg.h5" +$ CALL TOOLTEST tattrregR.ddl "-"""R""" tattrreg.h5" $ $ ! tests for group creation order "1" tracked, "2" name, root tracked $ CALL TOOLTEST tordergr1.ddl "--group=1 --sort_by=creation_order --sort_order=ascending tordergr.h5" @@ -219,6 +253,18 @@ $ CALL TOOLTEST torderattr2.ddl "-"""H""" --sort_by=name --sort_order=descending $ CALL TOOLTEST torderattr3.ddl "-"""H""" --sort_by=creation_order --sort_order=ascending torderattr.h5" $ CALL TOOLTEST torderattr4.ddl "-"""H""" --sort_by=creation_order --sort_order=descending torderattr.h5" $ +$ ! Test for floating point user defined printf format +$ CALL TOOLTEST tfpformat.ddl "-m %.7f tfpformat.h5" +$ ! Test for traversal of external links +$ CALL TOOLTEST textlinksrc.ddl "textlinksrc.h5" +$ CALL TOOLTEST textlinkfar.ddl "textlinkfar.h5" +$ ! Test for danglng external links +$ CALL TOOLTEST textlink.ddl "textlink.h5" +$ ! Test for error stack display (BZ2048) +$ CALL TOOLTEST filter_fail.ddl "--enable-error-stack filter_fail.h5" +$ ! Test for -o -y for dataset with attributes +$ CALL TOOLTEST tall-6.ddl "-y -o data -d /g1/g1.1/dset1.1.1 tall.h5" +$ $ ! Test for dataset packed bits $ ! Limits: $ ! Maximum number of packed bits is 8 (for now). @@ -227,8 +273,45 @@ $ ! Maximun Offset is 7 (Maximum size - 1). $ ! Maximum Offset+Length is 8 (Maximum size). $ ! Test Normal operation on both signed and unsigned int datasets. $ ! Their rawdata output should be the same. +$ CALL TOOLTEST tpbitsSignedWhole.ddl "-d /"""DS08BITS""" -"""M""" 0,8 packedbits.h5" +$ CALL TOOLTEST tpbitsUnsignedWhole.ddl "-d /"""DU08BITS""" -"""M""" 0,8 packedbits.h5" +$ CALL TOOLTEST tpbitsSignedIntWhole.ddl "-d /"""DS16BITS""" -"""M""" 0,16 packedbits.h5" +$ CALL TOOLTEST tpbitsUnsignedIntWhole.ddl "-d /"""DU16BITS""" -"""M""" 0,16 packedbits.h5" +$ CALL TOOLTEST tpbitsSignedLongWhole.ddl "-d /"""DS32BITS""" -"""M""" 0,32 packedbits.h5" +$ CALL TOOLTEST tpbitsUnsignedLongWhole.ddl "-d /"""DU32BITS""" -"""M""" 0,32 packedbits.h5" +$ CALL TOOLTEST tpbitsSignedLongLongWhole.ddl "-d /"""DS64BITS""" -"""M""" 0,64 packedbits.h5" +$ CALL TOOLTEST tpbitsUnsignedLongLongWhole.ddl "-d /"""DU64BITS""" -"""M""" 0,64 packedbits.h5" +$ CALL TOOLTEST tpbitsSignedLongLongWhole63.ddl "-d /"""DS64BITS""" -"""M""" 0,63 packedbits.h5" +$ CALL TOOLTEST tpbitsUnsignedLongLongWhole63.ddl "-d /"""DU64BITS""" -"""M""" 0,63 packedbits.h5" +$ CALL TOOLTEST tpbitsSignedLongLongWhole1.ddl "-d /"""DS64BITS""" -"""M""" 1,63 packedbits.h5" +$ CALL TOOLTEST tpbitsUnsignedLongLongWhole1.ddl "-d /"""DU64BITS""" -"""M""" 1,63 packedbits.h5" +$ ! Half sections +$ CALL TOOLTEST tpbitsSigned4.ddl "-d /"""DS08BITS""" -"""M""" 0,4,4,4 packedbits.h5" +$ CALL TOOLTEST tpbitsUnsigned4.ddl "-d /"""DU08BITS""" -"""M""" 0,4,4,4 packedbits.h5" +$ CALL TOOLTEST tpbitsSignedInt8.ddl "-d /"""DS16BITS""" -"""M""" 0,8,8,8 packedbits.h5" +$ CALL TOOLTEST tpbitsUnsignedInt8.ddl "-d /"""DU16BITS""" -"""M""" 0,8,8,8 packedbits.h5" +$ CALL TOOLTEST tpbitsSignedLong16.ddl "-d /"""DS32BITS""" -"""M""" 0,16,16,16 packedbits.h5" +$ CALL TOOLTEST tpbitsUnsignedLong16.ddl "-d /"""DU32BITS""" -"""M""" 0,16,16,16 packedbits.h5" +$ CALL TOOLTEST tpbitsSignedLongLong32.ddl "-d /"""DS64BITS""" -"""M""" 0,32,32,32 packedbits.h5" +$ CALL TOOLTEST tpbitsUnsignedLongLong32.ddl "-d /"""DU64BITS""" -"""M""" 0,32,32,32 packedbits.h5" +$ ! Quarter sections +$ CALL TOOLTEST tpbitsSigned2.ddl "-d /"""DS08BITS""" -"""M""" 0,2,2,2,4,2,6,2 packedbits.h5" +$ CALL TOOLTEST tpbitsUnsigned2.ddl "-d /"""DU08BITS""" -"""M""" 0,2,2,2,4,2,6,2 packedbits.h5" +$ CALL TOOLTEST tpbitsSignedInt4.ddl "-d /"""DS16BITS""" -"""M""" 0,4,4,4,8,4,12,4 packedbits.h5" +$ CALL TOOLTEST tpbitsUnsignedInt4.ddl "-d /"""DU16BITS""" -"""M""" 0,4,4,4,8,4,12,4 packedbits.h5" +$ CALL TOOLTEST tpbitsSignedLong8.ddl "-d /"""DS32BITS""" -"""M""" 0,8,8,8,16,8,24,8 packedbits.h5" +$ CALL TOOLTEST tpbitsUnsignedLong8.ddl "-d /"""DU32BITS""" -"""M""" 0,8,8,8,16,8,24,8 packedbits.h5" +$ CALL TOOLTEST tpbitsSignedLongLong16.ddl "-d /"""DS64BITS""" -"""M""" 0,16,16,16,32,16,48,16 packedbits.h5" +$ CALL TOOLTEST tpbitsUnsignedLongLong16.ddl "-d /"""DU64BITS""" -"""M""" 0,16,16,16,32,16,48,16 packedbits.h5" +$ ! Begin and end $ CALL TOOLTEST tpbitsSigned.ddl "-d /"""DS08BITS""" -"""M""" 0,2,2,6 packedbits.h5" $ CALL TOOLTEST tpbitsUnsigned.ddl "-d /"""DU08BITS""" -"""M""" 0,2,2,6 packedbits.h5" +$ CALL TOOLTEST tpbitsSignedInt.ddl "-d /"""DS16BITS""" -"""M""" 0,2,10,6 packedbits.h5" +$ CALL TOOLTEST tpbitsUnsignedInt.ddl "-d /"""DU16BITS""" -"""M""" 0,2,10,6 packedbits.h5" +$ CALL TOOLTEST tpbitsSignedLong.ddl "-d /"""DS32BITS""" -"""M""" 0,2,26,6 packedbits.h5" +$ CALL TOOLTEST tpbitsUnsignedLong.ddl "-d /"""DU32BITS""" -"""M""" 0,2,26,6 packedbits.h5" +$ CALL TOOLTEST tpbitsSignedLongLong.ddl "-d /"""DS64BITS""" -"""M""" 0,2,58,6 packedbits.h5" +$ CALL TOOLTEST tpbitsUnsignedLongLong.ddl "-d /"""DU64BITS""" -"""M""" 0,2,58,6 packedbits.h5" $ ! Overlapped packed bits. $ CALL TOOLTEST tpbitsOverlapped.ddl "-d /"""DS08BITS""" -"""M""" 0,1,1,1,2,1,0,3 packedbits.h5" $ ! Maximum number of packed bits. @@ -241,13 +324,19 @@ $ ! Test Error handling. $ ! Too many packed bits requested. Max is 8 for now. $ CALL TOOLTEST tpbitsMaxExceeded.ddl "-d /"""DS08BITS""" -"""M""" 0,1,0,1,1,1,2,1,3,1,4,1,5,1,6,1,7,1 packedbits.h5" $ ! Offset too large. Max is 7 (8-1) for now. -$ CALL TOOLTEST tpbitsOffsetExceeded.ddl "-d /"""DS08BITS""" -"""M""" 8,1 packedbits.h5" +$ CALL TOOLTEST tpbitsOffsetExceeded.ddl "-d /"""DS08BITS""" -"""M""" 64,1 packedbits.h5" +$ CALL TOOLTEST tpbitsCharOffsetExceeded.ddl "-d /"""DS08BITS""" -"""M""" 8,1 packedbits.h5" +$ CALL TOOLTEST tpbitsIntOffsetExceeded.ddl "-d /"""DS16BITS""" -"""M""" 16,1 packedbits.h5" +$ CALL TOOLTEST tpbitsLongOffsetExceeded.ddl "-d /"""DS32BITS""" -"""M""" 32,1 packedbits.h5" $ ! Bad offset, must not be negative. $ CALL TOOLTEST tpbitsOffsetNegative.ddl "-d /"""DS08BITS""" -"""M""" -1,1 packedbits.h5" $ ! Bad length, must not be positive. $ CALL TOOLTEST tpbitsLengthPositive.ddl "-d /"""DS08BITS""" -"""M""" 4,0 packedbits.h5" $ ! Offset+Length is too large. Max is 8 for now. -$ CALL TOOLTEST tpbitsLengthExceeded.ddl "-d /"""DS08BITS""" -"""M""" 2,7 packedbits.h5" +$ CALL TOOLTEST tpbitsLengthExceeded.ddl "-d /"""DS08BITS""" -"""M""" 37,28 packedbits.h5" +$ CALL TOOLTEST tpbitsCharLengthExceeded.ddl "-d /"""DS08BITS""" -"""M""" 2,7 packedbits.h5" +$ CALL TOOLTEST tpbitsIntLengthExceeded.ddl "-d /"""DS16BITS""" -"""M""" 10,7 packedbits.h5" +$ CALL TOOLTEST tpbitsLongLengthExceeded.ddl "-d /"""DS32BITS""" -"""M""" 26,7 packedbits.h5" $ ! Incomplete pair of packed bits request. $ CALL TOOLTEST tpbitsIncomplete.ddl "-d /"""DS08BITS""" -"""M""" 0,2,2,1,0,2,2, packedbits.h5" $ @@ -266,9 +355,9 @@ $ ! $ $ define/nolog sys$output 'actual' $ define/nolog sys$error 'actual_err' -$ write sys$output "#############################" -$ write sys$output "Expected output for 'h5dump ''P2''" -$ write sys$output "#############################" +$! write sys$output "#############################" +$! write sys$output "Expected output for 'h5dump ''P2''" +$! write sys$output "#############################" $ ON ERROR THEN CONTINUE $ h5dump 'P2 $ deassign sys$output |