mirror of
https://github.com/reactos/reactos.git
synced 2024-09-14 06:42:52 +00:00
b655fc4f5e
Of course, ReactOS' cmd doesn't work at all with the framework at the moment :-) Some tests were taken from "seta_test.cmd" by Royce. (see file headers) svn path=/trunk/; revision=33560
29 lines
966 B
Batchfile
29 lines
966 B
Batchfile
::
|
|
:: PROJECT: ReactOS CMD Testing Suite
|
|
:: LICENSE: GPL v2 or any later version
|
|
:: FILE: tests/redirect.cmd
|
|
:: PURPOSE: Tests for redirections
|
|
:: COPYRIGHT: Copyright 2008 Colin Finck <mail@colinfinck.de>
|
|
::
|
|
|
|
:: One redirect, the file must exist
|
|
call :_test "echo moo > temp\redirect_temp.txt"
|
|
call :_test "type temp\redirect_temp.txt >nul"
|
|
call :_test "find "moo" temp\redirect_temp.txt >nul"
|
|
|
|
:: Add the string yet another time to the file
|
|
call :_test "echo moo >> temp\redirect_temp.txt"
|
|
|
|
set moo_temp=0
|
|
|
|
:: Count the moo's in the file (must be 2 now)
|
|
:: No idea why so many percent signs are necessary here :-)
|
|
call :_test "for /f "usebackq" %%%%i in (`findstr moo temp\redirect_temp.txt`) do set /a moo_temp+=1"
|
|
call :_testvar %moo_temp% moo_temp 2
|
|
|
|
:: Two redirects, the file in the middle mustn't exist after this call
|
|
call :_test "echo moo > temp\redirect_temp2.txt > nul"
|
|
call :_testnot "type temp\redirect_temp2.txt 2>nul"
|
|
|
|
goto :EOF
|