blob: e3908eeba4bb81882c1617fabe4d799c249ec362 (
plain)
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
|
#include "status_i.h"
#include "orbsvcs/CosNamingC.h"
int ACE_TMAIN (int argc, ACE_TCHAR *argv[])
{
try
{
// First initialize the ORB, that will remove some arguments...
CORBA::ORB_var orb = CORBA::ORB_init (argc, argv);
// Get a reference to the RootPOA
CORBA::Object_var poa_object =
orb->resolve_initial_references ("RootPOA");
// Narrow down to the correct reference
PortableServer::POA_var poa =
PortableServer::POA::_narrow (poa_object.in ());
// Set a POA Manager
PortableServer::POAManager_var poa_manager = poa->the_POAManager ();
// Activate the POA Manager
poa_manager->activate ();
// Create the servant
corbaname_Status_i status_i;
// Activate it to obtain the reference
corbaname::Status_var status = status_i._this ();
// Get a reference to Naming Context
CORBA::Object_var naming_context_object =
orb->resolve_initial_references ("NameService");
// Narrow down the reference
CosNaming::NamingContext_var naming_context =
CosNaming::NamingContext::_narrow (naming_context_object.in());
// Bind Status to the Naming Context
CosNaming::Name name (1);
name.length (1);
name[0].id = CORBA::string_dup ("STATUS");
naming_context->bind (name, status.in ());
// Run the orb
orb->run ();
// Destroy the POA, waiting until the destruction terminates
poa->destroy (1, 1);
orb->destroy ();
}
catch (const CORBA::SystemException& ex)
{
ex._tao_print_exception ("CORBA exception raised in server!");
}
return 0;
}
|