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
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
|
/**
* @file Loopback_Supplier.cpp
*
* $Id$
*
* @author Carlos O'Ryan <coryan@uci.edu>
*/
#include "Loopback_Supplier.h"
#include "ECFL_Configuration.h"
ACE_RCSID(EC_Federated_Latency, Loopback_Supplier, "$Id$")
ECFL_Loopback_Supplier::ECFL_Loopback_Supplier (CORBA::Long experiment_id)
: experiment_id_ (experiment_id)
{
}
void
ECFL_Loopback_Supplier::connect (RtecEventChannelAdmin::EventChannel_ptr ec,
CORBA::Environment &ACE_TRY_ENV)
{
RtecEventChannelAdmin::SupplierAdmin_var supplier_admin =
ec->for_suppliers (ACE_TRY_ENV);
ACE_CHECK;
{
ACE_GUARD (TAO_SYNCH_MUTEX, ace_mon, this->mutex_);
if (!CORBA::is_nil (this->proxy_consumer_.in ()))
return;
this->proxy_consumer_ =
supplier_admin->obtain_push_consumer (ACE_TRY_ENV);
ACE_CHECK;
}
RtecEventComm::PushSupplier_var supplier =
this->_this (ACE_TRY_ENV);
ACE_CHECK;
RtecEventChannelAdmin::SupplierQOS supplier_qos;
supplier_qos.is_gateway = 0;
supplier_qos.publications.length (1);
RtecEventComm::EventHeader& sh0 =
supplier_qos.publications[0].event.header;
sh0.type = ECFL_RESPONSE_EVENT_TYPE;
sh0.source = this->experiment_id_;
this->proxy_consumer_->connect_push_supplier (supplier.in (),
supplier_qos,
ACE_TRY_ENV);
ACE_CHECK;
}
void
ECFL_Loopback_Supplier::disconnect (CORBA::Environment &ACE_TRY_ENV)
{
RtecEventChannelAdmin::ProxyPushConsumer_var proxy;
{
ACE_GUARD (TAO_SYNCH_MUTEX, ace_mon, this->mutex_);
if (CORBA::is_nil (this->proxy_consumer_.in ()))
return;
proxy = this->proxy_consumer_._retn ();
}
ACE_TRY
{
proxy->disconnect_push_consumer (ACE_TRY_ENV);
ACE_TRY_CHECK;
}
ACE_CATCHANY {} ACE_ENDTRY;
PortableServer::POA_var poa = this->_default_POA (ACE_TRY_ENV);
ACE_CHECK;
PortableServer::ObjectId_var id = poa->servant_to_id (this,
ACE_TRY_ENV);
ACE_CHECK;
poa->deactivate_object (id.in (), ACE_TRY_ENV);
ACE_CHECK;
}
void
ECFL_Loopback_Supplier::push (const RtecEventComm::EventSet &source,
CORBA::Environment &ACE_TRY_ENV)
ACE_THROW_SPEC ((CORBA::SystemException))
{
RtecEventChannelAdmin::ProxyPushConsumer_var proxy;
{
ACE_GUARD (TAO_SYNCH_MUTEX, ace_mon, this->mutex_);
if (CORBA::is_nil (this->proxy_consumer_.in ()))
return;
proxy = this->proxy_consumer_;
}
// ACE_DEBUG ((LM_DEBUG, "Loopback_Supplier::push (%P|%t)\n"));
RtecEventComm::EventSet events (source);
for (CORBA::ULong i = 0; i != events.length (); ++i)
{
events[i].header.ttl = 1;
events[i].header.type = ECFL_RESPONSE_EVENT_TYPE;
events[i].header.source = this->experiment_id_;
}
proxy->push (events, ACE_TRY_ENV);
}
void
ECFL_Loopback_Supplier::disconnect_push_supplier (CORBA::Environment &)
ACE_THROW_SPEC ((CORBA::SystemException))
{
ACE_GUARD (TAO_SYNCH_MUTEX, ace_mon, this->mutex_);
this->proxy_consumer_ =
RtecEventChannelAdmin::ProxyPushConsumer::_nil ();
}
|