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
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
|
// -*- C++ -*-
#include "FT_Invocation_Endpoint_Selectors.h"
#include "tao/Profile_Transport_Resolver.h"
#include "tao/Stub.h"
#include "tao/Profile.h"
#include "tao/Endpoint.h"
#include "tao/Base_Transport_Property.h"
#include "tao/debug.h"
#include "ace/Log_Msg.h"
#if !defined (__ACE_INLINE__)
#include "tao/Invocation_Endpoint_Selectors.i"
#endif /* __ACE_INLINE__ */
ACE_RCSID (FaultTolerance,
FT_Invocation_Endpoint_Selectors,
"$Id$")
TAO_FT_Invocation_Endpoint_Selector::TAO_FT_Invocation_Endpoint_Selector (void)
: TAO_Default_Endpoint_Selector ()
{
}
TAO_FT_Invocation_Endpoint_Selector::~TAO_FT_Invocation_Endpoint_Selector (void)
{
}
void
TAO_FT_Invocation_Endpoint_Selector::select_endpoint (
TAO::Profile_Transport_Resolver *r,
ACE_Time_Value *val
ACE_ENV_ARG_DECL)
{
bool retval =
this->select_primary (r,
val
ACE_ENV_ARG_PARAMETER);
ACE_CHECK;
if (retval)
return;
retval =
this->select_secondary (r,
val
ACE_ENV_ARG_PARAMETER);
ACE_CHECK;
if (retval == false)
{
// If we get here, we completely failed to find an endpoint selector
// that we know how to use, so throw an exception.
ACE_THROW (CORBA::TRANSIENT (CORBA::OMGVMCID | 2,
CORBA::COMPLETED_NO));
}
return;
}
bool
TAO_FT_Invocation_Endpoint_Selector::select_primary (
TAO::Profile_Transport_Resolver *r,
ACE_Time_Value *max_wait_time
ACE_ENV_ARG_DECL)
{
// Grab the forwarded list
TAO_MProfile *prof_list =
ACE_const_cast (TAO_MProfile *,
r->stub ()->forward_profiles ());
TAO_MProfile &basep = r->stub ()->base_profiles ();
if (prof_list ==0)
prof_list = &basep;
if (prof_list == 0)
return false;
// Did not succeed. Try to look for primaries all over the place
CORBA::ULong sz =
prof_list->size ();
// Iterate through the list in a circular fashion. Stop one before
// the list instead of trying the same thing again.
for (CORBA::ULong i = 0;
i != sz;
++i)
{
TAO_Profile *tmp = prof_list->get_profile (i);
bool retval =
this->check_profile_for_primary (tmp
ACE_ENV_ARG_PARAMETER);
ACE_CHECK_RETURN (false);
// Choose a non-primary
if (retval == true && tmp != 0)
{
retval =
this->try_connect (r,
tmp,
max_wait_time
ACE_ENV_ARG_PARAMETER);
ACE_CHECK_RETURN (false);
if (retval == true)
return true;
}
}
return false;
}
bool
TAO_FT_Invocation_Endpoint_Selector::select_secondary (
TAO::Profile_Transport_Resolver *r,
ACE_Time_Value *max_wait_time
ACE_ENV_ARG_DECL)
{
// Grab the forwarded list
TAO_MProfile *prof_list =
ACE_const_cast (TAO_MProfile *,
r->stub ()->forward_profiles ());
TAO_MProfile &basep =
r->stub ()->base_profiles ();
if (prof_list ==0)
prof_list = &basep;
if (prof_list == 0)
return false;
CORBA::ULong sz =
prof_list->size ();
for (CORBA::ULong i = 0;
i != sz;
++i)
{
TAO_Profile *tmp =
prof_list->get_profile (i);
bool retval =
this->check_profile_for_primary (tmp
ACE_ENV_ARG_PARAMETER);
ACE_CHECK_RETURN (false);
// Choose a non-primary
if (retval == false && tmp != 0)
{
retval =
this->try_connect (r,
tmp,
max_wait_time
ACE_ENV_ARG_PARAMETER);
ACE_CHECK_RETURN (false);
if (retval == true)
return true;
}
}
return false;
}
bool
TAO_FT_Invocation_Endpoint_Selector::try_connect (
TAO::Profile_Transport_Resolver *r,
TAO_Profile *profile,
ACE_Time_Value *max_wait_time
ACE_ENV_ARG_DECL)
{
r->profile (profile);
size_t endpoint_count =
r->profile ()->endpoint_count ();
TAO_Endpoint *ep =
r->profile ()->endpoint ();
for (size_t i = 0; i < endpoint_count; ++i)
{
TAO_Base_Transport_Property desc (ep);
bool retval =
r->try_connect (&desc,
max_wait_time
ACE_ENV_ARG_PARAMETER);
ACE_CHECK;
// @@ Good place to handle timeouts.. We can omit timeouts and
// go ahead looking for other things... There are some small
// issues that needs ironed out first in the invocation
// classes.
// Check if the connect has completed.
if (retval)
return true;
// Go to the next endpoint in this profile.
ep = ep->next ();
}
return false;
}
bool
TAO_FT_Invocation_Endpoint_Selector::check_profile_for_primary (
TAO_Profile *pfile
ACE_ENV_ARG_DECL_NOT_USED)
{
if (pfile == 0)
return false;
IOP::TaggedComponent tagged_component;
tagged_component.tag = IOP::TAG_FT_PRIMARY;
// Get the tagged component from the profile
TAO_Tagged_Components &pfile_tagged =
pfile->tagged_components ();
// Search for the TaggedComponent that we want
if (pfile_tagged.get_component (tagged_component) != 1)
return false;
if (TAO_debug_level > 2)
{
ACE_DEBUG ((LM_DEBUG,
"(%P|%t) TAO-FT - Got a primary component \n"));
}
return true;
}
|
