ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/branches/udr/testsuite/rundelphitest.bat
(Generate patch)

Comparing ibx/branches/udr/testsuite/rundelphitest.bat (file contents):
Revision 378 by tony, Wed Jan 5 14:59:15 2022 UTC vs.
Revision 379 by tony, Mon Jan 10 10:08:03 2022 UTC

# Line 1 | Line 1
1 < @echo off
2 < REM Test suite Configuration parameters
3 < REM These may be modified if needed to suite local requirements
4 <
5 < REM Test suite Configuration parameters (FPCDIR and FPCBIN)
6 < REM These may be modified if needed to suite local requirements
7 <
8 <
9 < FOR %%V in (3.2.0 3.0.4 3.0.2 3.0.0) do (
10 <  if EXIST C:\lazarus\fpc\%%V\bin\i386-win32\fpc.exe (
11 <    set FPCDIR=C:\lazarus\fpc\%%V
12 <    set FPCBIN=C:\lazarus\fpc\%%V\bin\i386-win32
13 <    Goto COMPILE
14 <  )
15 <  if EXIST C:\lazarus\fpc\%%V\bin\x86_64-win32\fpc.exe (
16 <    set FPCDIR=C:\lazarus\fpc\%%V
17 <    set FPCBIN=C:\lazarus\fpc\%%V\bin\x86_64-win32
18 <    Goto COMPILE
19 <  )
20 <  if EXIST C:\lazarus\fpc\%%V\bin\x86_64-win64\fpc.exe (
21 <    set FPCDIR=C:\lazarus\fpc\%%V
22 <    set FPCBIN=C:\lazarus\fpc\%%V\bin\x86_64-win64
23 <    Goto COMPILE
24 <  )
25 < )
26 <
27 <
28 < :COMPILE
29 < set DELPHIBIN=C:\Program Files\Embarcadero\RAD Studio\7.0\bin
30 < if EXIST "%FPCBIN%\diff.exe" (
31 <  set DIFF=%FPCBIN%\diff.exe
32 < ) ELSE (
33 <  set DIFF=C:\Program Files\GnuWin32\bin\diff.exe
34 < )
35 < echo DIFF is %DIFF%
36 <
37 < set TESTOUTDIR=%TEMP%\fbintf-testsuite
38 < set USERNAME=SYSDBA
39 < set PASSWORD=masterkey
40 < set EMPLOYEEDB=employee
41 < set NEWDBNAME=%TESTOUTDIR%\testsuite1.fdb
42 < set NEWDBNAME2=%TESTOUTDIR%\testsuite2.fdb
43 < set BAKFILE=%TESTOUTDIR%\testsuite.gbk
44 <
45 < rd /s /q testunits
46 < mkdir testunits
47 < mkdir %TESTOUTDIR%
48 < IF EXIST "%DELPHIBIN%\dcc32.exe" (
49 < del testsuite.exe
50 < "%DELPHIBIN%\dcc32" -B -E. -N0testunits -I..\include;..\client\include -U..;..\client;..\client\2.5\;..\client\3.0;..\client\3.0\firebird testsuite.dpr
51 < )
52 < echo(
53 < echo Starting Testsuite
54 < echo(
55 < IF EXIST "testsuite.exe" (
56 < testsuite.exe -u %USERNAME% -p %PASSWORD% -e %EMPLOYEEDB% -n %NEWDBNAME% -s %NEWDBNAME2% -b %BAKFILE% -o testout.log %1
57 < if not EXIST "%DIFF%" (
58 <  echo Unable to compare results - diff not found
59 <  goto :EOF
60 <  )
61 <
62 < echo Comparing results with reference log
63 < echo(
64 < findstr /C:"ODS Major Version = 11" testout.log
65 < IF ERRORLEVEL 1 (
66 <  findstr /C:"ODS Major Version = 12" testout.log
67 <  IF ERRORLEVEL 1 (
68 <    %DIFF% FB4reference.log testout.log >diff.log
69 <  ) ELSE (
70 <    %DIFF% FB3reference.log testout.log >diff.log
71 <  )
72 < ) ELSE (
73 <  %DIFF% FB2reference.log testout.log >diff.log
74 < )
75 < type diff.log
76 <
77 < IF EXIST "%DELPHIBIN%\dcc32" (
78 < rd /s /q testunits
79 < rem del testsuite.exe
80 < )
81 < )
1 > @echo off
2 > REM Test suite Configuration parameters
3 > REM These may be modified if needed to suite local requirements
4 >
5 > REM Test suite Configuration parameters (FPCDIR and FPCBIN)
6 > REM These may be modified if needed to suite local requirements
7 >
8 >
9 > FOR %%V in (3.2.0 3.0.4 3.0.2 3.0.0) do (
10 >  if EXIST C:\lazarus\fpc\%%V\bin\i386-win32\fpc.exe (
11 >    set FPCDIR=C:\lazarus\fpc\%%V
12 >    set FPCBIN=C:\lazarus\fpc\%%V\bin\i386-win32
13 >    Goto COMPILE
14 >  )
15 >  if EXIST C:\lazarus\fpc\%%V\bin\x86_64-win32\fpc.exe (
16 >    set FPCDIR=C:\lazarus\fpc\%%V
17 >    set FPCBIN=C:\lazarus\fpc\%%V\bin\x86_64-win32
18 >    Goto COMPILE
19 >  )
20 >  if EXIST C:\lazarus\fpc\%%V\bin\x86_64-win64\fpc.exe (
21 >    set FPCDIR=C:\lazarus\fpc\%%V
22 >    set FPCBIN=C:\lazarus\fpc\%%V\bin\x86_64-win64
23 >    Goto COMPILE
24 >  )
25 > )
26 >
27 >
28 > :COMPILE
29 > set DELPHIBIN=C:\Program Files\Embarcadero\RAD Studio\7.0\bin
30 > if EXIST "%FPCBIN%\diff.exe" (
31 >  set DIFF=%FPCBIN%\diff.exe
32 > ) ELSE (
33 >  set DIFF=C:\Program Files\GnuWin32\bin\diff.exe
34 > )
35 > echo DIFF is %DIFF%
36 >
37 > set TESTOUTDIR=%TEMP%\fbintf-testsuite
38 > set USERNAME=SYSDBA
39 > set PASSWORD=masterkey
40 > set EMPLOYEEDB=employee
41 > set NEWDBNAME=%TESTOUTDIR%\testsuite1.fdb
42 > set NEWDBNAME2=%TESTOUTDIR%\testsuite2.fdb
43 > set BAKFILE=%TESTOUTDIR%\testsuite.gbk
44 >
45 > rd /s /q testunits
46 > mkdir testunits
47 > mkdir %TESTOUTDIR%
48 > IF EXIST "%DELPHIBIN%\dcc32.exe" (
49 > del testsuite.exe
50 > "%DELPHIBIN%\dcc32" -B -E. -N0testunits -I..\include;..\client\include -U..;..\client;..\client\2.5\;..\client\3.0;..\client\3.0\firebird testsuite.dpr
51 > )
52 > echo(
53 > echo Starting Testsuite
54 > echo(
55 > IF EXIST "testsuite.exe" (
56 > testsuite.exe -u %USERNAME% -p %PASSWORD% -e %EMPLOYEEDB% -n %NEWDBNAME% -s %NEWDBNAME2% -b %BAKFILE% -o testout.log %1
57 > if not EXIST "%DIFF%" (
58 >  echo Unable to compare results - diff not found
59 >  goto :EOF
60 >  )
61 >
62 > echo Comparing results with reference log
63 > echo(
64 > findstr /C:"ODS Major Version = 11" testout.log
65 > IF ERRORLEVEL 1 (
66 >  findstr /C:"ODS Major Version = 12" testout.log
67 >  IF ERRORLEVEL 1 (
68 >    %DIFF% FB4reference.log testout.log >diff.log
69 >  ) ELSE (
70 >    %DIFF% FB3reference.log testout.log >diff.log
71 >  )
72 > ) ELSE (
73 >  %DIFF% FB2reference.log testout.log >diff.log
74 > )
75 > type diff.log
76 >
77 > IF EXIST "%DELPHIBIN%\dcc32" (
78 > rd /s /q testunits
79 > rem del testsuite.exe
80 > )
81 > )

Comparing ibx/branches/udr/testsuite/rundelphitest.bat (property svn:eol-style):
Revision 378 by tony, Wed Jan 5 14:59:15 2022 UTC vs.
Revision 379 by tony, Mon Jan 10 10:08:03 2022 UTC

# Line 0 | Line 1
1 + native

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines