diff options
author | brunsch <brunsch@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1998-05-12 20:45:25 +0000 |
---|---|---|
committer | brunsch <brunsch@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1998-05-12 20:45:25 +0000 |
commit | 0971648a64465a1f7531b5b6bea7f985ae0b3566 (patch) | |
tree | 81cc7d43e0617f83c6ce1af5c0fc96f80bb843bf /TAO/tests | |
parent | a57e7721dec9c7ac368ae5a9d8be374e4c25c7cb (diff) | |
download | ATCD-0971648a64465a1f7531b5b6bea7f985ae0b3566.tar.gz |
We now have a perl script, so this isn't needed anymore.
Diffstat (limited to 'TAO/tests')
-rw-r--r-- | TAO/tests/Quoter/run_test.btm | 143 |
1 files changed, 0 insertions, 143 deletions
diff --git a/TAO/tests/Quoter/run_test.btm b/TAO/tests/Quoter/run_test.btm deleted file mode 100644 index 5b4fc593e23..00000000000 --- a/TAO/tests/Quoter/run_test.btm +++ /dev/null @@ -1,143 +0,0 @@ -@echo off - -REM This is a 4NT Batch file. To use, just type run_test and it will start the -REM server, wait for a second, and then start the client. At the end, it will -REM clean up. - -setlocal - -set nsiorfile=%temp%\qns_ior -set del=2 - -REM variables for parameters - -set nsport=20002 -set clport=20003 -set svport=20004 -set ffport=20005 -set gfport=20006 -set n=1 -set leave=/C -set ior=0 -set done= - -:get_args - -if %1 == /h goto is_h -if %1 == /? goto is_h -goto no_h -:is_h -echo run_test [/n num] [/leave] [/h] [/ns, /sv, /ff, /cl, /gf] -echo. -echo /n num -- runs the client num times -echo /leave -- leaves the servers running and their windows open -echo /h -- prints this information -echo /ns /sv /ff /cl /gf -- Runs only one of the executables -quit -:no_h - -if not %1 == /ns goto no_ns -set done=quit -goto run_name_server -:no_ns - -if not %1 == /sv goto no_sv -set done=quit -goto run_server -:no_sv - -if not %1 == /ff goto no_ff -set done=quit -goto run_finder -:no_ff - -if not %1 == /gf goto no_gf -set done=quit -goto run_generic_factory -:no_gf - - -if not %1 == /cl goto no_cl -set done=quit -goto run_client -:no_cl - -if not %1 == /n goto no_n -set n=%2 -shift -shift -goto get_args -:no_n - -if not %1 == /leave goto no_leave -set leave=/K -shift -goto get_args -:no_leave - -:run_name_server -REM Naming Service must have been built or else this will fail -start "Naming Service" %leave ..\..\orbsvcs\Naming_Service\Naming_Service.exe -ORBport %nsport -ORBobjrefstyle url -o %nsiorfile -rem -ORBnameserviceior %temp\qns_ior - -%done - -REM Delay some to let the Naming Service get set up -DELAY %del - -:run_server -REM read in the IOR from the file -for %%d in (@%nsiorfile) do set ior=%%d - -REM Start the server -start "Quoter Server" %leave server.exe -ORBport %svport -ORBobjrefstyle url -ORBnameserviceior %ior -ORBsvcconf server.conf - -%done - -REM Delay some to let the server get set up -DELAY %del - -:run_finder -REM read in the IOR from the file -for %%d in (@%nsiorfile) do set ior=%%d - -REM Start the factory finder -start "Quoter Factory Finder" %leave Factory_Finder.exe -ORBport %ffport -ORBobjrefstyle url -ORBnameserviceior %ior -ORBsvcconf svc.conf - -%done - -REM Delay some to let the Factory Finder get set up -DELAY %del - -:run_generic_factory -REM read in the IOR from the file -for %%d in (@%nsiorfile) do set ior=%%d - -REM Start the factory finder -start "Quoter Generic Factory" %leave Generic_Factory.exe -ORBport %gfport -ORBobjrefstyle url -ORBnameserviceior %ior -ORBsvcconf svc.conf - - -%done - -REM Delay some to let the Generic Factory get set up -DELAY %del - -:run_client -REM read in the IOR from the file -for %%d in (@%nsiorfile) do set ior=%%d - -REM And now start the client -for /l %x in (1,1,%n) do client.exe -ORBobjrefstyle url -ORBport %clport -ORBnameserviceior %ior -ORBsvcconf client.conf - -%done - -REM We don't really need to delete this -REM del %temp%\qns_ior - -REM Remove any running servers -if %leave==/C activate "Naming Service" CLOSE -if %leave==/C activate "Quoter Server" CLOSE -if %leave==/C activate "Quoter Factory Finder" CLOSE -if %leave==/C activate "Quoter Generic Factory" CLOSE - -endlocal
\ No newline at end of file |