4 * Created on: Aug 11, 2010
10 #include "ServerEventThread.hh"
11 #include "OrbServerImpl.hh"
12 #include "ClientServerCommon.hh"
13 #include "BusMessageInternal.hh"
16 using namespace plpbus;
17 using namespace plpbus_orb;
19 static omni_mutex server_thread_mutex;
20 static omni_condition server_thread_shutdown_signal(&server_thread_mutex);
22 OrbServerImpl::OrbServerImpl()
26 _server_thread_count = 0;
27 _shutdown_pending = 0;
31 OrbServerImpl::~OrbServerImpl()
33 log_info("OrbServerImpl destroyed.\n");
36 void OrbServerImpl::send_message_and_request_response(OrbClient_ptr response_listener_param,
42 if (CORBA::is_nil(response_listener_param) == false) {
43 if (_listener != NULL) {
44 log_debug("send_message_and_request_response(): %s, server callback != NULL\n", msg_req);
45 _listener->request_received(msg_req, &msg_rsp);
46 response_listener_param->receive_response_message(msg_rsp);
49 log_error("send_message_and_request_response() error, server callback == NULL\n");
53 log_error("invalid callback object received.\n");
57 char *OrbServerImpl::send_message_and_wait_response(const char* msg_req_param, ::CORBA::Long& err_flg) {
63 if (_listener != NULL) {
64 log_debug("send_message_and_wait_response(): %s, server_callback != NULL\n", msg_req_param);
65 _listener->request_received(msg_req_param, &msg_rsp);
68 log_error("send_message_and_wait_response() error, server callback == NULL\n");
69 msg_rsp = strdup(msg_req_param);
72 ret_val = CORBA::string_dup(msg_rsp);
76 void OrbServerImpl::send_dataitem_message_and_request_response(OrbClient_ptr response_listener_param,
77 const ::DataItemSequence& msg_req_param) {
81 if (CORBA::is_nil(response_listener_param) == false) {
82 if (_listener != NULL) {
83 msg_req = new BusMessageInternal(msg_req_param);
84 log_debug("send_dataitem_message_and_request_response(), server_callback != NULL\n");
85 log_debug("msg_req:\n");
88 _listener->request_received(msg_req, &msg_rsp);
89 log_debug("msg_rsp length: %d\n", msg_rsp->_dataItemSeq.length());
91 response_listener_param->receive_response_dataitem_sequence(msg_rsp->_dataItemSeq);
94 log_error("send_dataitem_message_and_request_response() error, server_callback == NULL\n");
99 CORBA::Long OrbServerImpl::send_dataitem_message_and_wait_response(const DataItemSequence& req_seq_param,
100 DataItemSequence_out rsp_seq_param) {
104 msg_req = new BusMessageInternal(req_seq_param);
106 _listener->request_received(msg_req, &msg_rsp);
107 //rsp_seq_param = new DataItemSequence_out(msg_rsp._dataItemSeq);
108 rsp_seq_param._data = &(msg_rsp->_dataItemSeq);
113 void OrbServerImpl::add_event_listener(OrbClient_ptr client_param,
115 CORBA::UShort period_secs)
117 ServerEventThread *srvr_thread;
119 if (CORBA::is_nil(client_param) == false) {
120 log_debug("add_event_listener()\n");
121 server_thread_mutex.lock();
122 _server_thread_count++;
123 server_thread_mutex.unlock();
124 srvr_thread = new ServerEventThread(client_param, msg, period_secs, this);
125 srvr_thread->start();
128 cerr << "Failed to add event listener, listener NULL.\n";
132 void OrbServerImpl::shutdown()
134 omni_mutex_lock sync(server_thread_mutex);
135 if (is_shutdown_pending() == 0) {
136 cout << "shutdown request received!" << endl;
137 // Tell the servers to exit, and wait for them to do so.
138 _shutdown_pending = 1;
139 while(_server_thread_count > 0) {
140 server_thread_shutdown_signal.wait();
142 // Shutdown the ORB (but do not wait for completion). This also
143 // causes the main thread to unblock from CORBA::ORB::run().
148 int OrbServerImpl::init() {
156 _orb = CORBA::ORB_init(argc, argv);
158 _poa = create_poa(_orb);
162 cout << "init() failed" << endl;
167 int OrbServerImpl::launch(const char *server_name)
169 CORBA::Object_var server_ref;
170 PortableServer::ObjectId_var server_id;
173 CosNaming::NamingContext_var naming_context;
176 POA_plpbus_orb::OrbServer_tie<OrbServerImpl> server_impl(this);
177 server_id = _poa->activate_object(&server_impl);
178 server_ref = server_impl._this();
179 //this->_remove_ref();
180 naming_context = get_service_naming_context(CONST_CONTEXT_NAME__PLPBUS, CONST_CONTEXT_KIND__PLPBUS);
181 if (naming_context != NULL) {
182 ok_flg = bind_naming_context_and_service(naming_context, server_ref, server_name, CONST_CONTEXT_KIND__PLPBUS);
183 if (ok_flg == true) {
184 cout << "Registered to naming service: " << server_name << endl;
189 cout << "Failed to register to naming service: " << server_name << endl;
195 PortableServer::POA_var OrbServerImpl::create_poa(CORBA::ORB_var orb) {
196 PortableServer::POA_var ret_val;
197 CORBA::Object_var poa_obj;
198 CORBA::PolicyList policy_list;
199 CORBA::Any policyVal;
200 PortableServer::POAManager_var poa_man;
201 PortableServer::POA_var rootpoa;
204 poa_obj = orb->resolve_initial_references(CONST_ROOT_POA_NAME);
205 if (poa_obj != NULL) {
206 rootpoa = PortableServer::POA::_narrow(poa_obj);
207 if (rootpoa != NULL) {
208 poa_man = rootpoa->the_POAManager();
209 if (poa_man != NULL) {
211 // bidirectional policy
212 policy_list.length(1);
213 policyVal <<= BiDirPolicy::BOTH;
214 policy_list[0] = orb->create_policy(BiDirPolicy::BIDIRECTIONAL_POLICY_TYPE, policyVal);
215 ret_val = rootpoa->create_POA(CONST_ROOT_POA_BIDIR_POLICY_NAME,
222 cerr << "Failed to create RootPOA." << endl;
227 CosNaming::NamingContext_var OrbServerImpl::get_service_naming_context(const char *service_name_param,
228 const char *service_kind_param)
230 CosNaming::NamingContext_var ret_val;
231 CosNaming::NamingContext_var ns_context;
232 CORBA::Object_var ns_obj;
233 CORBA::Object_var service_obj;
234 CosNaming::Name context_data;
238 // get nameservice reference
239 ns_obj = _orb->resolve_initial_references(CONST_NAME_SERVICE_NAME);
240 // get nameservice context
241 ns_context = CosNaming::NamingContext::_narrow(ns_obj);
242 if (CORBA::is_nil(ns_context) == false) {
243 context_data.length(1);
244 context_data[0].id = service_name_param;
245 context_data[0].kind = service_kind_param;
247 service_obj = ns_context->resolve(context_data);
248 if (CORBA::is_nil(service_obj)) {
249 // not found, try to bind the new context to name service
250 ret_val = ns_context->bind_new_context(context_data);
251 if (CORBA::is_nil(ret_val) ) {
252 cerr << "Failed to create new context to name service for " << service_name_param << "." << endl;
256 ret_val = CosNaming::NamingContext::_narrow(service_obj);
257 if (CORBA::is_nil(ret_val) ) {
258 cerr << "Failed to get existing context from name service for " << service_name_param << ", narrowing failed." << endl;
262 catch(CosNaming::NamingContext::AlreadyBound& ex) {
263 cerr << "Could not get context from nameservice for " << service_name_param << ". Context with same name already existed."<< endl;
267 catch (CORBA::ORB::InvalidName&) {
268 // This should not happen!
269 cerr << "Could not get context from name service for " << service_name_param << ", name service does not exist." << endl;
271 catch(CORBA::TRANSIENT& ex) {
272 cerr << "Could not get context from name service for " << service_name_param << ", verify that name service is running. " << service_name_param << endl;
274 catch (CORBA::NO_RESOURCES&) {
275 cerr << "Could not get context from name service for " << service_name_param << ". Name service is not running or has configuration problem." << endl;
277 catch(CORBA::SystemException& ex) {
278 cerr << "Could not get context from name service for " << service_name_param << ", could not determine reason." << endl;
283 bool OrbServerImpl::bind_naming_context_and_service(CosNaming::NamingContext_var service_context_param,
284 CORBA::Object_ptr service_ref_param,
285 const char *service_name_param,
286 const char *service_kind_param)
289 CosNaming::Name context_data;
293 context_data.length(1);
294 context_data[0].id = service_name_param;
295 context_data[0].kind = service_kind_param;
297 service_context_param->bind(context_data, service_ref_param);
300 catch(CosNaming::NamingContext::AlreadyBound& ex) {
302 * service existed already for the naming context with similar description.
303 * Replace the existing one with a new one.
305 cout << "service " << service_name_param << " existed, replacing it." << endl;
306 service_context_param->rebind(context_data, service_ref_param);
310 catch (CosNaming::NamingContext::InvalidName&) {
311 cerr << "Could not register service to name server, invalid service name." << endl;
313 catch (CosNaming::NamingContext::NotFound&) {
314 cerr << "Could not register service to name server, service object reference is invalid." << endl;
316 catch (CosNaming::NamingContext::CannotProceed&) {
317 // This should not happen!
318 cerr << "Could not register service to name server, unknown error." << endl;
320 catch(CORBA::SystemException& ex) {
321 cerr << "Could not register service to name server, unknown error." << endl;
326 int OrbServerImpl::add_server_listener(IServerListener *listener_param)
331 cout << "register_request_received_callback() started" << endl;
332 _listener = listener_param;
333 cout << "register_callback() done" << endl;
337 int OrbServerImpl::is_shutdown_pending() {
338 return _shutdown_pending;
341 void OrbServerImpl::server_thread_closed() {
342 bool send_signal = false;
344 server_thread_mutex.lock();
345 _server_thread_count--;
346 if (_server_thread_count == 0) {
349 server_thread_mutex.unlock();
350 if (send_signal == true) {
351 server_thread_shutdown_signal.signal();