@echo off | |
cd ..\tests | |
call :pass checkkeys | |
call :pass loopwave | |
call :pass testatomic | |
call :pass testaudioinfo | |
call :pass testautomation | |
call :pass testdraw2 | |
call :pass testdrawchessboard | |
call :pass testerror | |
call :pass testfile | |
call :pass testfilesystem | |
call :pass testgamecontroller | |
call :pass testgesture | |
call :pass testgl2 | |
call :pass testgles | |
call :pass testhaptic | |
call :pass testiconv | |
call :pass testime | |
call :pass testintersection | |
call :pass testjoystick | |
call :pass testkeys | |
::call :pass testloadso | |
call :pass testlock | |
call :pass testmessage | |
call :pass testmultiaudio | |
call :pass testnative | |
call :pass testoverlay2 | |
call :pass testplatform | |
call :pass testpower | |
call :pass testrelative | |
call :pass testrendercopyex | |
call :pass testrendertarget | |
call :pass testresample sample.wav newsample.wav 44100 | |
call :pass testrumble | |
call :pass testscale | |
call :pass testsem 1 | |
call :pass testshader | |
call :testspecial testshape .\shapes | |
call :testspecial testshape .\shapes | |
call :testspecial testshape .\shapes | |
call :pass testsprite2 | |
call :pass testspriteminimal | |
call :pass teststreaming | |
call :pass testthread | |
call :pass testtimer | |
call :pass testver | |
call :pass testwm2 | |
call :pass torturethread | |
:: leave the tests directory | |
cd .. | |
:: exit batch | |
goto :eof | |
:testspecial | |
if not exist %1\Win32\Debug goto :eof | |
cd %1\Win32\Debug | |
call :randomfile %2 | |
cd ..\..\.. | |
call :pass testshape %RETURN% | |
goto :eof | |
:: pass label (similar to pass function in the Xcode tests command script) | |
:pass | |
setlocal enabledelayedexpansion | |
set args= | |
set /A count=0 | |
for %%x IN (%*) DO ( | |
if NOT !count! EQU 0 set args=!args! %%x | |
set /A count=%count% + 1 | |
) | |
endlocal & set callargs=%args% | |
:: if it does not exist, break procedure | |
if not exist %1\Win32\Debug goto endfunc | |
:: goto directory | |
echo Testing: %1 | |
title Testing: %1 | |
cd %1\Win32\Debug | |
:: execute test | |
".\%1.exe"%callargs% | |
cd ..\..\.. | |
pause | |
:endfunc | |
goto :eof | |
:randomfile | |
setlocal enabledelayedexpansion | |
set count=0 | |
if not exist %1 goto :eof | |
for %%d in (%1\*.*) DO ( | |
set /A count=count + 1 | |
) | |
set /A count=%RANDOM% %% %count% | |
for %%d in (%1\*.*) DO ( | |
if !count! EQU 0 ( | |
set rfile=%%d | |
goto endrfile | |
) | |
set /A count=count-1 | |
) | |
:endrfile | |
set tmprfile=!rfile! | |
endlocal & set RETURN=%tmprfile% | |
goto :eof |