123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616 |
- @echo off
- @rem This file must use CRLF linebreaks to function properly
- @rem and requires both pcretest and pcregrep
- @rem This file was originally contributed by Ralf Junker, and touched up by
- @rem Daniel Richard G. Tests 10-12 added by Philip H.
- @rem Philip H also changed test 3 to use "wintest" files.
- @rem
- @rem Updated by Tom Fortmann to support explicit test numbers on the command line.
- @rem Added argument validation and added error reporting.
- @rem
- @rem MS Windows batch file to run pcretest on testfiles with the correct
- @rem options.
- @rem
- @rem Sheri Pierce added logic to skip feature dependent tests
- @rem tests 4 5 9 15 and 18 require utf support
- @rem tests 6 7 10 16 and 19 require ucp support
- @rem 11 requires ucp and link size 2
- @rem 12 requires presence of jit support
- @rem 13 requires absence of jit support
- @rem Sheri P also added override tests for study and jit testing
- @rem Zoltan Herczeg added libpcre16 support
- @rem Zoltan Herczeg added libpcre32 support
- setlocal enabledelayedexpansion
- if [%srcdir%]==[] (
- if exist testdata\ set srcdir=.)
- if [%srcdir%]==[] (
- if exist ..\testdata\ set srcdir=..)
- if [%srcdir%]==[] (
- if exist ..\..\testdata\ set srcdir=..\..)
- if NOT exist %srcdir%\testdata\ (
- Error: echo distribution testdata folder not found!
- call :conferror
- exit /b 1
- goto :eof
- )
- if [%pcretest%]==[] set pcretest=.\pcretest.exe
- echo source dir is %srcdir%
- echo pcretest=%pcretest%
- if NOT exist %pcretest% (
- echo Error: %pcretest% not found!
- echo.
- call :conferror
- exit /b 1
- )
- %pcretest% -C linksize >NUL
- set link_size=%ERRORLEVEL%
- %pcretest% -C pcre8 >NUL
- set support8=%ERRORLEVEL%
- %pcretest% -C pcre16 >NUL
- set support16=%ERRORLEVEL%
- %pcretest% -C pcre32 >NUL
- set support32=%ERRORLEVEL%
- %pcretest% -C utf >NUL
- set utf=%ERRORLEVEL%
- %pcretest% -C ucp >NUL
- set ucp=%ERRORLEVEL%
- %pcretest% -C jit >NUL
- set jit=%ERRORLEVEL%
- if %support8% EQU 1 (
- if not exist testout8 md testout8
- if not exist testoutstudy8 md testoutstudy8
- if not exist testoutjit8 md testoutjit8
- )
- if %support16% EQU 1 (
- if not exist testout16 md testout16
- if not exist testoutstudy16 md testoutstudy16
- if not exist testoutjit16 md testoutjit16
- )
- if %support16% EQU 1 (
- if not exist testout32 md testout32
- if not exist testoutstudy32 md testoutstudy32
- if not exist testoutjit32 md testoutjit32
- )
- set do1=no
- set do2=no
- set do3=no
- set do4=no
- set do5=no
- set do6=no
- set do7=no
- set do8=no
- set do9=no
- set do10=no
- set do11=no
- set do12=no
- set do13=no
- set do14=no
- set do15=no
- set do16=no
- set do17=no
- set do18=no
- set do19=no
- set do20=no
- set do21=no
- set do22=no
- set do23=no
- set do24=no
- set do25=no
- set do26=no
- set all=yes
- for %%a in (%*) do (
- set valid=no
- for %%v in (1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26) do if %%v == %%a set valid=yes
- if "!valid!" == "yes" (
- set do%%a=yes
- set all=no
- ) else (
- echo Invalid test number - %%a!
- echo Usage %0 [ test_number ] ...
- echo Where test_number is one or more optional test numbers 1 through 26, default is all tests.
- exit /b 1
- )
- )
- set failed="no"
- if "%all%" == "yes" (
- set do1=yes
- set do2=yes
- set do3=yes
- set do4=yes
- set do5=yes
- set do6=yes
- set do7=yes
- set do8=yes
- set do9=yes
- set do10=yes
- set do11=yes
- set do12=yes
- set do13=yes
- set do14=yes
- set do15=yes
- set do16=yes
- set do17=yes
- set do18=yes
- set do19=yes
- set do20=yes
- set do21=yes
- set do22=yes
- set do23=yes
- set do24=yes
- set do25=yes
- set do26=yes
- )
- @echo RunTest.bat's pcretest output is written to newly created subfolders named
- @echo testout, testoutstudy and testoutjit.
- @echo.
- set mode=
- set bits=8
- :nextMode
- if "%mode%" == "" (
- if %support8% EQU 0 goto modeSkip
- echo.
- echo ---- Testing 8-bit library ----
- echo.
- )
- if "%mode%" == "-16" (
- if %support16% EQU 0 goto modeSkip
- echo.
- echo ---- Testing 16-bit library ----
- echo.
- )
- if "%mode%" == "-32" (
- if %support32% EQU 0 goto modeSkip
- echo.
- echo ---- Testing 32-bit library ----
- echo.
- )
- if "%do1%" == "yes" call :do1
- if "%do2%" == "yes" call :do2
- if "%do3%" == "yes" call :do3
- if "%do4%" == "yes" call :do4
- if "%do5%" == "yes" call :do5
- if "%do6%" == "yes" call :do6
- if "%do7%" == "yes" call :do7
- if "%do8%" == "yes" call :do8
- if "%do9%" == "yes" call :do9
- if "%do10%" == "yes" call :do10
- if "%do11%" == "yes" call :do11
- if "%do12%" == "yes" call :do12
- if "%do13%" == "yes" call :do13
- if "%do14%" == "yes" call :do14
- if "%do15%" == "yes" call :do15
- if "%do16%" == "yes" call :do16
- if "%do17%" == "yes" call :do17
- if "%do18%" == "yes" call :do18
- if "%do19%" == "yes" call :do19
- if "%do20%" == "yes" call :do20
- if "%do21%" == "yes" call :do21
- if "%do22%" == "yes" call :do22
- if "%do23%" == "yes" call :do23
- if "%do24%" == "yes" call :do24
- if "%do25%" == "yes" call :do25
- if "%do26%" == "yes" call :do26
- :modeSkip
- if "%mode%" == "" (
- set mode=-16
- set bits=16
- goto nextMode
- )
- if "%mode%" == "-16" (
- set mode=-32
- set bits=32
- goto nextMode
- )
- @rem If mode is -32, testing is finished
- if %failed% == "yes" (
- echo In above output, one or more of the various tests failed!
- exit /b 1
- )
- echo All OK
- goto :eof
- :runsub
- @rem Function to execute pcretest and compare the output
- @rem Arguments are as follows:
- @rem
- @rem 1 = test number
- @rem 2 = outputdir
- @rem 3 = test name use double quotes
- @rem 4 - 9 = pcretest options
- if [%1] == [] (
- echo Missing test number argument!
- exit /b 1
- )
- if [%2] == [] (
- echo Missing outputdir!
- exit /b 1
- )
- if [%3] == [] (
- echo Missing test name argument!
- exit /b 1
- )
- set testinput=testinput%1
- set testoutput=testoutput%1
- if exist %srcdir%\testdata\win%testinput% (
- set testinput=wintestinput%1
- set testoutput=wintestoutput%1
- )
- echo Test %1: %3
- %pcretest% %mode% %4 %5 %6 %7 %8 %9 %srcdir%\testdata\%testinput% >%2%bits%\%testoutput%
- if errorlevel 1 (
- echo. failed executing command-line:
- echo. %pcretest% %mode% %4 %5 %6 %7 %8 %9 %srcdir%\testdata\%testinput% ^>%2%bits%\%testoutput%
- set failed="yes"
- goto :eof
- )
- set type=
- if [%1]==[11] (
- set type=-%bits%
- )
- if [%1]==[18] (
- set type=-%bits%
- )
- if [%1]==[21] (
- set type=-%bits%
- )
- if [%1]==[22] (
- set type=-%bits%
- )
- fc /n %srcdir%\testdata\%testoutput%%type% %2%bits%\%testoutput% >NUL
- if errorlevel 1 (
- echo. failed comparison: fc /n %srcdir%\testdata\%testoutput% %2%bits%\%testoutput%
- if [%1]==[2] (
- echo.
- echo ** Test 2 requires a lot of stack. PCRE can be configured to
- echo ** use heap for recursion. Otherwise, to pass Test 2
- echo ** you generally need to allocate 8 mb stack to PCRE.
- echo ** See the 'pcrestack' page for a discussion of PCRE's
- echo ** stack usage.
- echo.
- )
- if [%1]==[3] (
- echo.
- echo ** Test 3 failure usually means french locale is not
- echo ** available on the system, rather than a bug or problem with PCRE.
- echo.
- goto :eof
- )
- set failed="yes"
- goto :eof
- )
- echo. Passed.
- goto :eof
- :do1
- call :runsub 1 testout "Main functionality (Compatible with Perl >= 5.10)" -q
- call :runsub 1 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 1 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do2
- call :runsub 2 testout "API, errors, internals, and non-Perl stuff" -q
- call :runsub 2 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 2 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do3
- call :runsub 3 testout "Locale-specific features" -q
- call :runsub 3 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 3 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do4
- if %utf% EQU 0 (
- echo Test 4 Skipped due to absence of UTF-%bits% support.
- goto :eof
- )
- call :runsub 4 testout "UTF-%bits% support - (Compatible with Perl >= 5.10)" -q
- call :runsub 4 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 4 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do5
- if %utf% EQU 0 (
- echo Test 5 Skipped due to absence of UTF-%bits% support.
- goto :eof
- )
- call :runsub 5 testout "API, internals, and non-Perl stuff for UTF-%bits%" -q
- call :runsub 5 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 5 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do6
- if %ucp% EQU 0 (
- echo Test 6 Skipped due to absence of Unicode property support.
- goto :eof
- )
- call :runsub 6 testout "Unicode property support (Compatible with Perl >= 5.10)" -q
- call :runsub 6 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 6 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do7
- if %ucp% EQU 0 (
- echo Test 7 Skipped due to absence of Unicode property support.
- goto :eof
- )
- call :runsub 7 testout "API, internals, and non-Perl stuff for Unicode property support" -q
- call :runsub 7 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 7 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do8
- call :runsub 8 testout "DFA matching main functionality" -q -dfa
- call :runsub 8 testoutstudy "Test with Study Override" -q -dfa -s
- goto :eof
- :do9
- if %utf% EQU 0 (
- echo Test 9 Skipped due to absence of UTF-%bits% support.
- goto :eof
- )
- call :runsub 9 testout "DFA matching with UTF-%bits%" -q -dfa
- call :runsub 9 testoutstudy "Test with Study Override" -q -dfa -s
- goto :eof
- :do10
- if %ucp% EQU 0 (
- echo Test 10 Skipped due to absence of Unicode property support.
- goto :eof
- )
- call :runsub 10 testout "DFA matching with Unicode properties" -q -dfa
- call :runsub 10 testoutstudy "Test with Study Override" -q -dfa -s
- goto :eof
- :do11
- if NOT %link_size% EQU 2 (
- echo Test 11 Skipped because link size is not 2.
- goto :eof
- )
- if %ucp% EQU 0 (
- echo Test 11 Skipped due to absence of Unicode property support.
- goto :eof
- )
- call :runsub 11 testout "Internal offsets and code size tests" -q
- call :runsub 11 testoutstudy "Test with Study Override" -q -s
- goto :eof
- :do12
- if %jit% EQU 0 (
- echo Test 12 Skipped due to absence of JIT support.
- goto :eof
- )
- call :runsub 12 testout "JIT-specific features (JIT available)" -q
- goto :eof
- :do13
- if %jit% EQU 1 (
- echo Test 13 Skipped due to presence of JIT support.
- goto :eof
- )
- call :runsub 13 testout "JIT-specific features (JIT not available)" -q
- goto :eof
- :do14
- if NOT %bits% EQU 8 (
- echo Test 14 Skipped when running 16/32-bit tests.
- goto :eof
- )
- copy /Y %srcdir%\testdata\saved16 testsaved16
- copy /Y %srcdir%\testdata\saved32 testsaved32
- call :runsub 14 testout "Specials for the basic 8-bit library" -q
- call :runsub 14 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 14 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do15
- if NOT %bits% EQU 8 (
- echo Test 15 Skipped when running 16/32-bit tests.
- goto :eof
- )
- if %utf% EQU 0 (
- echo Test 15 Skipped due to absence of UTF-%bits% support.
- goto :eof
- )
- call :runsub 15 testout "Specials for the 8-bit library with UTF-%bits% support" -q
- call :runsub 15 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 15 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do16
- if NOT %bits% EQU 8 (
- echo Test 16 Skipped when running 16/32-bit tests.
- goto :eof
- )
- if %ucp% EQU 0 (
- echo Test 16 Skipped due to absence of Unicode property support.
- goto :eof
- )
- call :runsub 16 testout "Specials for the 8-bit library with Unicode propery support" -q
- call :runsub 16 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 16 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do17
- if %bits% EQU 8 (
- echo Test 17 Skipped when running 8-bit tests.
- goto :eof
- )
- call :runsub 17 testout "Specials for the basic 16/32-bit library" -q
- call :runsub 17 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 17 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do18
- if %bits% EQU 8 (
- echo Test 18 Skipped when running 8-bit tests.
- goto :eof
- )
- if %utf% EQU 0 (
- echo Test 18 Skipped due to absence of UTF-%bits% support.
- goto :eof
- )
- call :runsub 18 testout "Specials for the 16/32-bit library with UTF-%bits% support" -q
- call :runsub 18 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 18 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do19
- if %bits% EQU 8 (
- echo Test 19 Skipped when running 8-bit tests.
- goto :eof
- )
- if %ucp% EQU 0 (
- echo Test 19 Skipped due to absence of Unicode property support.
- goto :eof
- )
- call :runsub 19 testout "Specials for the 16/32-bit library with Unicode property support" -q
- call :runsub 19 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 19 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do20
- if %bits% EQU 8 (
- echo Test 20 Skipped when running 8-bit tests.
- goto :eof
- )
- call :runsub 20 testout "DFA specials for the basic 16/32-bit library" -q -dfa
- call :runsub 20 testoutstudy "Test with Study Override" -q -dfa -s
- goto :eof
- :do21
- if %bits% EQU 8 (
- echo Test 21 Skipped when running 8-bit tests.
- goto :eof
- )
- if NOT %link_size% EQU 2 (
- echo Test 21 Skipped because link size is not 2.
- goto :eof
- )
- copy /Y %srcdir%\testdata\saved8 testsaved8
- copy /Y %srcdir%\testdata\saved16LE-1 testsaved16LE-1
- copy /Y %srcdir%\testdata\saved16BE-1 testsaved16BE-1
- copy /Y %srcdir%\testdata\saved32LE-1 testsaved32LE-1
- copy /Y %srcdir%\testdata\saved32BE-1 testsaved32BE-1
- call :runsub 21 testout "Reloads for the basic 16/32-bit library" -q
- call :runsub 21 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 21 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do22
- if %bits% EQU 8 (
- echo Test 22 Skipped when running 8-bit tests.
- goto :eof
- )
- if %utf% EQU 0 (
- echo Test 22 Skipped due to absence of UTF-%bits% support.
- goto :eof
- )
- if NOT %link_size% EQU 2 (
- echo Test 22 Skipped because link size is not 2.
- goto :eof
- )
- copy /Y %srcdir%\testdata\saved16LE-2 testsaved16LE-2
- copy /Y %srcdir%\testdata\saved16BE-2 testsaved16BE-2
- copy /Y %srcdir%\testdata\saved32LE-2 testsaved32LE-2
- copy /Y %srcdir%\testdata\saved32BE-2 testsaved32BE-2
- call :runsub 22 testout "Reloads for the 16/32-bit library with UTF-16/32 support" -q
- call :runsub 22 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 22 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do23
- if NOT %bits% EQU 16 (
- echo Test 23 Skipped when running 8/32-bit tests.
- goto :eof
- )
- call :runsub 23 testout "Specials for the 16-bit library" -q
- call :runsub 23 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 23 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do24
- if NOT %bits% EQU 16 (
- echo Test 24 Skipped when running 8/32-bit tests.
- goto :eof
- )
- if %utf% EQU 0 (
- echo Test 24 Skipped due to absence of UTF-%bits% support.
- goto :eof
- )
- call :runsub 24 testout "Specials for the 16-bit library with UTF-16 support" -q
- call :runsub 24 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 24 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do25
- if NOT %bits% EQU 32 (
- echo Test 25 Skipped when running 8/16-bit tests.
- goto :eof
- )
- call :runsub 25 testout "Specials for the 32-bit library" -q
- call :runsub 25 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 25 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :do26
- if NOT %bits% EQU 32 (
- echo Test 26 Skipped when running 8/16-bit tests.
- goto :eof
- )
- if %utf% EQU 0 (
- echo Test 26 Skipped due to absence of UTF-%bits% support.
- goto :eof
- )
- call :runsub 26 testout "Specials for the 32-bit library with UTF-32 support" -q
- call :runsub 26 testoutstudy "Test with Study Override" -q -s
- if %jit% EQU 1 call :runsub 26 testoutjit "Test with JIT Override" -q -s+
- goto :eof
- :conferror
- @echo.
- @echo Either your build is incomplete or you have a configuration error.
- @echo.
- @echo If configured with cmake and executed via "make test" or the MSVC "RUN_TESTS"
- @echo project, pcre_test.bat defines variables and automatically calls RunTest.bat.
- @echo For manual testing of all available features, after configuring with cmake
- @echo and building, you can run the built pcre_test.bat. For best results with
- @echo cmake builds and tests avoid directories with full path names that include
- @echo spaces for source or build.
- @echo.
- @echo Otherwise, if the build dir is in a subdir of the source dir, testdata needed
- @echo for input and verification should be found automatically when (from the
- @echo location of the the built exes) you call RunTest.bat. By default RunTest.bat
- @echo runs all tests compatible with the linked pcre library but it can be given
- @echo a test number as an argument.
- @echo.
- @echo If the build dir is not under the source dir you can either copy your exes
- @echo to the source folder or copy RunTest.bat and the testdata folder to the
- @echo location of your built exes and then run RunTest.bat.
- @echo.
- goto :eof
|