mirror of
https://github.com/HDFGroup/hdf5.git
synced 2025-01-12 15:04:59 +08:00
d2818a17e8
Description: There was a minor typo in the Windows test script for h5copy. It was actually causing us to do extra work, so this checkin should make the test slightly more efficient, without breaking anything. Tested: VS2005 on WinXP
308 lines
10 KiB
Batchfile
308 lines
10 KiB
Batchfile
@echo off
|
|
rem
|
|
rem Copyright by The HDF Group.
|
|
rem Copyright by the Board of Trustees of the University of Illinois.
|
|
rem All rights reserved.
|
|
rem
|
|
rem This file is part of HDF5. The full HDF5 copyright notice, including
|
|
rem terms governing use, modification, and redistribution, is contained in
|
|
rem the files COPYING and Copyright.html. COPYING can be found at the root
|
|
rem of the source code distribution tree; Copyright.html can be found at the
|
|
rem root level of an installed copy of the electronic HDF5 document set and
|
|
rem is linked from the top-level documents page. It can also be found at
|
|
rem http://hdfgroup.org/HDF5/doc/Copyright.html. If you do not have
|
|
rem access to either file, you may request a copy from help@hdfgroup.org.
|
|
rem
|
|
rem Tests for the h5copy tool
|
|
rem
|
|
rem Created: Scott Wegner, 8/16/07
|
|
rem Modified: Scott Wegner, 8/22/07
|
|
rem
|
|
|
|
|
|
rem We don't currently build DLL version of h5copy, but this test script is
|
|
rem setup to support it if we do in the future. --SJW 8/22/07
|
|
|
|
setlocal enabledelayedexpansion
|
|
pushd %~dp0
|
|
|
|
rem The tool name
|
|
set h5copy=h5copy%2
|
|
rem The path of the tool binary
|
|
set h5copy_bin=%CD%\%1\%h5copy%
|
|
rem The h5diff tool name
|
|
set h5diff=h5diff%2
|
|
rem The path of the h5diff too binary
|
|
set h5diff_bin=%CD%\..\%h5diff%\%1\%h5diff%
|
|
rem The h5ls tool name
|
|
set h5ls=h5ls%2
|
|
rem Arguments to the h5ls tool
|
|
set h5ls_args=-Svr
|
|
rem The path of the h5ls tool binary
|
|
set h5ls_bin=%CD%\..\%h5ls%\%1\%h5ls%
|
|
|
|
set /a nerrors=0
|
|
set verbose=yes
|
|
|
|
set srcfile=h5copytst.h5
|
|
set indir=%CD%\..\testfiles
|
|
set outdir=%CD%\..\testfiles
|
|
|
|
if not exist %outdir% mkdir %outdir%
|
|
|
|
goto main
|
|
|
|
|
|
rem Print a line-line message left justified in a field of 70 characters
|
|
rem beginning with the word "Testing".
|
|
rem
|
|
:testing
|
|
set test_msg=Testing
|
|
for %%a in (%*) do (
|
|
if %%a neq PASSED (
|
|
if %%a neq *FAILED* (
|
|
set test_msg=!test_msg! %%~nxa
|
|
) )
|
|
)
|
|
set test_msg=%test_msg%
|
|
echo.%test_msg:~0,69% %1
|
|
|
|
exit /b
|
|
|
|
rem Print a line-line message left justified in a field of 70 characters
|
|
rem beginning with the word "Verifying".
|
|
rem
|
|
:verify
|
|
set verify_msg=Verifying h5diff output
|
|
for %%a in (%*) do (
|
|
if %%a neq PASSED (
|
|
if %%a neq *FAILED* (
|
|
set verify_msg=!test_msg! %%~nxa
|
|
) )
|
|
)
|
|
set verify_msg=%verify_msg%
|
|
echo.%verify_msg:~0,69% %1
|
|
|
|
exit /b
|
|
|
|
rem Print a line-line message left justified in a field of 70 characters
|
|
rem beginning with the word "Verifying".
|
|
rem
|
|
:verify_h5ls
|
|
set verifyh5ls_msg=Verifying h5ls file structure
|
|
for %%a in (%*) do (
|
|
if %%a neq PASSED (
|
|
if %%a neq *FAILED* (
|
|
set verifyh5ls_msg=!test_msg! %%~nxa
|
|
) )
|
|
)
|
|
set verifyh5ls_msg=%verifyh5ls_msg%
|
|
echo.%verifyh5ls_msg:~0,69% %1
|
|
|
|
exit /b
|
|
|
|
|
|
|
|
rem Run a test and print PASS or *FAIL*. If h5copy can complete
|
|
rem with exit status 0, consider it pass. If a test fails then increment
|
|
rem the `nerrors' global variable.
|
|
rem Assumed arguments:
|
|
rem $1 is -i
|
|
rem $2 is input file
|
|
rem $3 is -o
|
|
rem $4 is output file
|
|
rem $* everything else arguments for h5copy.
|
|
|
|
:tooltest
|
|
set runh5diff=yes
|
|
if "%1"=="-i" (
|
|
set inputfile=%2
|
|
) else (
|
|
set runh5diff=no
|
|
)
|
|
if "%3"=="-o" (
|
|
set outputfile=%4
|
|
) else (
|
|
set h5diff=no
|
|
)
|
|
|
|
(
|
|
echo.#############################
|
|
echo. output for %h5copy% %*
|
|
echo.#############################
|
|
%h5copy_bin% %*
|
|
) > output.out
|
|
|
|
if %errorlevel% neq 0 (
|
|
call :testing *FAILED* %h5copy% %*
|
|
echo.failed result is:
|
|
type output.out
|
|
set /a nerrors=!nerrors!+1
|
|
) else (
|
|
call :testing PASSED %h5copy% %*
|
|
|
|
rem Clean up output file
|
|
if not defined HDF5_NOCLEANUP (
|
|
del /f output.out
|
|
)
|
|
)
|
|
|
|
if %runh5diff% neq no (
|
|
call :h5difftest %inputfile% %outputfile%
|
|
)
|
|
|
|
exit /b
|
|
|
|
|
|
rem Call the h5diff tool
|
|
rem
|
|
:h5difftest
|
|
%h5diff_bin% %* -q
|
|
if %errorlevel% neq 0 (
|
|
call :verify *FAILED* %*
|
|
set /a nerrors=!nerrors!+1
|
|
) else (
|
|
call :verify PASSED %*
|
|
)
|
|
|
|
exit /b
|
|
|
|
|
|
rem Call the h5ls tool to verify the correct output data in the destination file
|
|
rem
|
|
:h5lstest
|
|
set expect=%indir%\%~n1.ls
|
|
set expect_parsed=%expect%.parsed
|
|
set actual=%outdir%\%~n1.out
|
|
set actual_parsed=%actual%.parsed
|
|
|
|
rem Stderr is included in stdout so that the diff can detect
|
|
rem any unexpected output from that stream too.
|
|
rem
|
|
rem Note: The modification time and storage utilization are masked off
|
|
rem so that the output is more portable
|
|
(
|
|
echo.#############################
|
|
echo.Expected output for %h5ls% %*
|
|
echo.#############################
|
|
%h5ls_bin% %h5ls_args% %*
|
|
) > %actual% 2>&1
|
|
|
|
rem Windows doesn't have "sed" command, and parsing the files line-by-line
|
|
rem to emulate Unix takes a very long time. Instead, we simply remove lines
|
|
rem with "Modified" or "Storage". We also remove lines "Opened (filename)
|
|
rem with sec2 driver" and "Expected output for (h5ls test)", because Windows
|
|
rem paths differ from Linux. Do this for actual and expected otput.
|
|
rem If there is a better alternative in the future, we should use it instead.
|
|
rem --SJW 8/22/07
|
|
for %%a in (expect actual) do (
|
|
findstr /v /c:" Modified:" !%%a! > tmp.txt
|
|
findstr /v /c:" Storage:" tmp.txt > tmp2.txt
|
|
findstr /v /b /c:"Expected output for " tmp2.txt > tmp.txt
|
|
findstr /v /b /c:"Opened " tmp.txt > !%%a_parsed!
|
|
)
|
|
del /f tmp.txt tmp2.txt
|
|
|
|
rem Don't special case non-existing expected output as Linux does, because
|
|
rem we depend on it above to parse anyway. It should be an error if it
|
|
rem doesn't exist. --SJW 8/22/07
|
|
rem if not exist %expect% (
|
|
rem rem Create the expect file if it doesn't yet exist
|
|
rem call :verify_h5ls CREATED %*
|
|
rem copy %actual% %expect%
|
|
rem ) else (
|
|
fc %expect_parsed% %actual_parsed% | find "FC: no diff" > nul
|
|
if %errorlevel% equ 0 (
|
|
call :verify_h5ls PASSED %*
|
|
) else (
|
|
call :verify_h5ls *FAILED* %*
|
|
echo. Expected result ^(*.ls^) differs from actual result ^(*.out^)
|
|
set /a nerrors=!nerrors!+1
|
|
if "yes"=="%verbose%" fc %expect_parsed% %actual_parsed%
|
|
)
|
|
rem )
|
|
|
|
rem Clean up output file
|
|
if not defined HDF5_NOCLEANUP (
|
|
for %%a in (%actual% %actual_parsed% %expect_parsed%) do del /f %%a
|
|
)
|
|
|
|
exit /b
|
|
|
|
|
|
|
|
rem Copy single datasets of various forms from one group to another,
|
|
rem adding object copied to the destination file each time
|
|
rem
|
|
rem Assumed arguments:
|
|
rem <none>
|
|
:copyobjects
|
|
|
|
set testfile=%indir%\%srcfile%
|
|
set fileout=%outdir%\%srcfile:.h5=.out.h5%
|
|
|
|
rem Remove any output file left over from previous test run
|
|
del /f %fileout% 2> nul
|
|
|
|
echo.Test copying various forms of datasets
|
|
call :tooltest -i %testfile% -o %fileout% -v -s simple -d simple
|
|
call :tooltest -i %testfile% -o %fileout% -v -s chunk -d chunk
|
|
call :tooltest -i %testfile% -o %fileout% -v -s compact -d compact
|
|
call :tooltest -i %testfile% -o %fileout% -v -s compound -d compound
|
|
call :tooltest -i %testfile% -o %fileout% -v -s compressed -d compressed
|
|
call :tooltest -i %testfile% -o %fileout% -v -s named_vl -d named_vl
|
|
call :tooltest -i %testfile% -o %fileout% -v -s nested_vl -d nested_vl
|
|
|
|
echo.Test copying dataset within group in source file to root of destination
|
|
call :tooltest -i %testfile% -o %fileout% -v -s grp_dsets/simple -d simple_top
|
|
|
|
echo.Test copying ^& renaming dataset.
|
|
call :tooltest -i %testfile% -o %fileout% -v -s compound -d rename
|
|
|
|
echo.Test copying empty, 'full' ^& 'nested' groups
|
|
call :tooltest -i %testfile% -o %fileout% -v -s grp_empty -d grp_empty
|
|
call :tooltest -i %testfile% -o %fileout% -v -s grp_dsets -d grp_dsets
|
|
call :tooltest -i %testfile% -o %fileout% -v -s grp_nested -d grp_nested
|
|
|
|
echo.Test copying dataset within group in source file to group in destination
|
|
call :tooltest -i %testfile% -o %fileout% -v -s /grp_dsets/simple -d /grp_dsets/simple_group
|
|
|
|
echo.Test copying ^& renaming group
|
|
call :tooltest -i %testfile% -o %fileout% -v -s grp_dsets -d grp_rename
|
|
|
|
echo.Test copying 'full' group hierarchy into group in destination file
|
|
call :tooltest -i %testfile% -o %fileout% -v -s grp_dsets -d /grp_rename/grp_dsets
|
|
|
|
echo.Test copying objects into group hier. that doesn't exist yet in destination file
|
|
call :tooltest -i %testfile% -o %fileout% -vp -s simple -d /A/B1/simple
|
|
call :tooltest -i %testfile% -o %fileout% -vp -s simple -d /A/B2/simple2
|
|
call :tooltest -i %testfile% -o %fileout% -vp -s /grp_dsets/simple -d /C/D/simple
|
|
call :tooltest -i %testfile% -o %fileout% -vp -s /grp_dsets -d /E/F/grp_dsets
|
|
call :tooltest -i %testfile% -o %fileout% -vp -s /grp_nested -d /G/H/grp_nested
|
|
|
|
rem Verify that the file created above is correct
|
|
call :h5lstest %fileout%
|
|
|
|
rem Remove output file created, if the "no cleanup" environment variable is
|
|
rem not defined
|
|
if not defined HDF5_NOCLEANUP (
|
|
del /f %fileout%
|
|
)
|
|
|
|
exit /b
|
|
|
|
|
|
rem ##############################################################################
|
|
rem ### T H E T E S T S ###
|
|
rem ##############################################################################
|
|
|
|
:main
|
|
call :copyobjects
|
|
|
|
if %nerrors% equ 0 (
|
|
echo.All h5copy tests passed.
|
|
)
|
|
|
|
popd
|
|
endlocal & exit /b %nerrors%
|
|
|