1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
|
// $Id$
#include "ace/Auto_Ptr.h"
#include "DAnCE/Deployment/Deployment_DeploymentPlanC.h"
#include "DAnCE/Deployment/Deployment_ExecutionManagerC.h"
#include "DAnCE/Deployment/Deployment_DomainApplicationManagerC.h"
#include "DAnCE/Deployment/Deployment_DomainApplicationC.h"
#include "DAnCE/Deployment/Deployment_NodeManagerC.h"
#include "DAnCE/Deployment/Deployment_NodeApplicationManagerC.h"
#include "DAnCE/Logger/Log_Macros.h"
#include "tools/Config_Handlers/DnC_Dump.h"
#include "tools/Config_Handlers/XML_File_Intf.h"
int ACE_TMAIN (int argc, ACE_TCHAR * argv[])
{
try
{
CIAO::Config_Handlers::XML_File_Intf file (argv[1]);
file.add_search_path ("CIAO_ROOT", "/docs/schema/");
file.add_search_path ("TAO_ROOT", "/docs/schema/");
auto_ptr<Deployment::DeploymentPlan> pplan (file.release_plan());
DANCE_DEBUG((LM_DEBUG, "[%M] Test starts.\n"));
// Initialize orb
CORBA::ORB_var orb = CORBA::ORB_init (argc, argv);
const char * ior = "file://execution_manager.ior";
CORBA::Object_var obj = orb->string_to_object (ior);
if (CORBA::is_nil (obj. in()))
{
throw 0;
}
Deployment::ExecutionManager_var em = Deployment::ExecutionManager::_narrow (obj);
if (CORBA::is_nil (em.in ()))
{
throw 0;
}
DANCE_DEBUG((LM_DEBUG, "[%M] preparePlan\n"));
Deployment::DomainApplicationManager_var dam = em->preparePlan (*pplan, Deployment::ResourceCommitmentManager::_nil());
DANCE_DEBUG((LM_DEBUG, "[%M] startLaunch\n"));
//call startLaunch
Deployment::Properties dp;
Deployment::Connections_var dc;
Deployment::Application_var na = dam->startLaunch (dp, dc.out());
Deployment::DomainApplication_var da = Deployment::DomainApplication::_narrow (na);
if (CORBA::is_nil (da.in ()))
{
DANCE_DEBUG((LM_DEBUG, "[%M] narrow fails\n"));
}
DANCE_DEBUG((LM_DEBUG, "[%M] finishLaunch\n"));
da->finishLaunch (dc.in(), true);
DANCE_DEBUG((LM_DEBUG, "[%M] Test succeded!\n"));
}
catch (const CORBA::Exception &e)
{
e._tao_print_exception ("DeploymentTest1::main\t\n");
DANCE_ERROR((LM_ERROR, "[%M] Uncaught CORBA exception\n"));
return 1;
}
catch (...)
{
return 1;
}
return 0;
}
|