blob: 45ac9dc3555414bd89b3d89874e56899fc4c2f8d (
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
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
|
/**
* \file Receiver.cpp
* \brief RTCORBA Server, holding one Object for receiving ping calls
*
* \author Manuel Traut
* \version 2009-06-23
*/
#include <iostream>
#include "pingI.h"
#include "orbsvcs/CosNamingC.h"
#include <tao/RTCORBA/RTCORBA.h>
int main(int argc, char* argv[]){
try{
// initialize ORB
CORBA::ORB_var orb = CORBA::ORB_init(argc, argv, "ServerORB");
std::cout<<"ORB initialized"<<std::endl;
// access RT Extensions
CORBA::Object_var rtorb = orb->resolve_initial_references("RTORB");
RTCORBA::RTORB_var rt_orb = RTCORBA::RTORB::_narrow(rtorb);
std::cout<<"RT Extensions OK"<<std::endl;
// obtain root_poa
CORBA::Object_var poa = orb->resolve_initial_references("RootPOA");
PortableServer::POA_var root_poa = PortableServer::POA::_narrow(poa.in());
// activate POA Manager
PortableServer::POAManager_var poa_manager = root_poa->the_POAManager();
poa_manager->activate();
std::cout<<"root_poa OK"<<std::endl;
// create Policy
CORBA::PolicyList ping_policy(1);
ping_policy.length(1);
ping_policy[0] = rt_orb->create_priority_model_policy(
RTCORBA::CLIENT_PROPAGATED, RTCORBA::maxPriority);
// create ObjectAdapter, assign Policy
PortableServer::POA_var ping_poa =
root_poa->create_POA("ping_poa", poa_manager.in(), ping_policy);
std::cout<<"Policy assigned"<<std::endl;
// create the servant
Linutronix_Ping_i ping_i;
// activate servant
PortableServer::ObjectId_var object_id = ping_poa->activate_object(&ping_i);
CORBA::Object_var ping_obj = ping_poa->id_to_reference(object_id.in());
CORBA::String_var ior = orb->object_to_string(ping_obj.in());
std::cout<<"Servant activated"<<std::endl;
// NameService
CORBA::Object_var naming_obj =
orb->resolve_initial_references("NameService");
std::cout<<"bind\n";
CosNaming::NamingContext_var naming_context =
CosNaming::NamingContext::_narrow(naming_obj.in());
CosNaming::Name name(1);
name.length(1);
name[0].id = CORBA::string_dup("Receiver");
naming_context->rebind(name, ping_obj.in());
std::cout<<"Bound Receiver to NameService"<<std::endl;
// start ORB
orb->run();
std::cout<<"ORB ready"<<std::endl;
//destroy
root_poa->destroy(1,1);
orb->destroy();
} catch(CORBA::Exception &any) {
std::cout<<"Exception: "<<any<<std::endl;
}
return 0;
}
|
