From d98781ef482a364e72b53fd90355e394a246cce4 Mon Sep 17 00:00:00 2001 From: nilabjar Date: Mon, 7 Jan 2008 15:54:11 +0000 Subject: --- .../space/descriptors/run_NodeManager_Nish.pl | 24 ++++++++++++++++++++++ 1 file changed, 24 insertions(+) create mode 100755 CIAO/examples/space/descriptors/run_NodeManager_Nish.pl diff --git a/CIAO/examples/space/descriptors/run_NodeManager_Nish.pl b/CIAO/examples/space/descriptors/run_NodeManager_Nish.pl new file mode 100755 index 00000000000..6cdba09ebee --- /dev/null +++ b/CIAO/examples/space/descriptors/run_NodeManager_Nish.pl @@ -0,0 +1,24 @@ +eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}' + & eval 'exec perl -S $0 $argv:q' + if 0; + +$NS_HOST = "roon.dre.vanderbilt.edu"; +$NS_PORT = 40000; +$HOST = "$ENV{'HOSTNAME'}"; +$PORT = 30000; +use lib "$ENV{'ACE_ROOT'}/bin"; +use PerlACE::Run_Test; + +$CIAO_ROOT=$ENV{'CIAO_ROOT'}; + + +# Set up NamingService environment +$ENV{"NameServiceIOR"} = "corbaloc:iiop:$NS_HOST:$NS_PORT/NameService"; + + +$SV1 = new PerlACE::Process ("$CIAO_ROOT/DAnCE/NodeManager/NodeManager", + "-ORBEndpoint iiop://$HOST:$PORT -ORBInitRef NameService=corbaloc:iiop:$NS_HOST:$NS_PORT/NameService -c svc_node_manager.conf -s $CIAO_ROOT/DAnCE/NodeApplication/NodeApplication -d 10"); + +$SV1->Spawn (); + +sleep (99999999999); -- cgit v1.2.1