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
|
// -*- C++ -*-
// $Id$
#include "ServerRequestInterceptor.h"
#include "tao/CORBA_String.h"
#include "ace/Log_Msg.h"
#include "ace/OS_NS_string.h"
ServerRequestInterceptor::ServerRequestInterceptor (
PortableInterceptor::SlotId id,
PortableInterceptor::Current_ptr pi_current)
: slot_id_ (id),
pi_current_ (PortableInterceptor::Current::_duplicate (pi_current))
{
}
char *
ServerRequestInterceptor::name (void)
{
return CORBA::string_dup ("ServerRequestInterceptor");
}
void
ServerRequestInterceptor::destroy (void)
{
}
void
ServerRequestInterceptor::receive_request_service_contexts (
PortableInterceptor::ServerRequestInfo_ptr ri)
{
CORBA::String_var op = ri->operation ();
if (ACE_OS::strcmp (op.in (), "invoke_me") != 0)
return; // Don't mess with PICurrent if not invoking test method.
try
{
// Insert data into the RSC (request scope current).
CORBA::Long number = 62;
CORBA::Any data;
data <<= number;
ri->set_slot (this->slot_id_, data);
ACE_DEBUG ((LM_DEBUG,
"(%P|%t) Inserted number <%d> into RSC.\n",
number));
}
catch (const PortableInterceptor::InvalidSlot& ex)
{
ex._tao_print_exception (
"Exception thrown in ""receive_request_service_contexts()\n");
ACE_DEBUG ((LM_DEBUG,
"Invalid slot: %u\n",
this->slot_id_));
throw CORBA::INTERNAL ();
}
}
void
ServerRequestInterceptor::receive_request (
PortableInterceptor::ServerRequestInfo_ptr ri)
{
try
{
CORBA::Any new_data;
CORBA::Long number = 19;
new_data <<= number;
// Set a value in RSC, this should not effect TSC anymore
ri->set_slot (this->slot_id_,
new_data);
// Now retrieve the data from the TSC again. It should not have
// changed to the new value
CORBA::Any_var data2 =
this->pi_current_->get_slot (this->slot_id_);
CORBA::Long number2 = 0;
if ((data2.in () >>= number2)
&& number == number2)
{
ACE_ERROR ((LM_ERROR,
"(%P|%t) ERROR: TSC was modified because "
"RSC was modified.\n"));
throw CORBA::INTERNAL ();
}
}
catch (const PortableInterceptor::InvalidSlot& ex)
{
ex._tao_print_exception ("Exception thrown in ""send_reply()\n");
ACE_DEBUG ((LM_DEBUG,
"Invalid slot: %u\n",
this->slot_id_));
throw CORBA::INTERNAL ();
}
ACE_DEBUG ((LM_INFO,
"(%P|%t) Server side RSC/TSC semantics appear "
"to be correct.\n"));
}
void
ServerRequestInterceptor::send_reply (
PortableInterceptor::ServerRequestInfo_ptr ri)
{
CORBA::String_var op = ri->operation ();
if (ACE_OS::strcmp (op.in (), "invoke_me") != 0)
return; // Don't mess with PICurrent if not invoking test method.
try
{
CORBA::Any_var data;
// Retrieve the data stored in the RSC. This data (a string)
// should be different from the original data (a CORBA::Long)
// stored into the RSC by the receive_request_service_contexts()
// interception point.
data = ri->get_slot (this->slot_id_);
// The original data in the RSC was of type CORBA::Long. If the
// following extraction from the CORBA::Any fails, then the
// original data in the RSC was not replaced with the data in
// the TSC after the test method completed.
const char *str = 0;
if (data.in () >>= str)
{
ACE_DEBUG ((LM_DEBUG,
"(%P|%t) Retrieved \"%s\" from the RSC.\n",
str));
}
else
{
ACE_DEBUG ((LM_DEBUG,
"(%P|%t) Unable to extract data (a string) "
"from the RSC.\n"));
throw CORBA::INTERNAL ();
}
// Now verify that the RSC is truly independent of the TSC. In
// particular, modifying the TSC at this point should not cause
// the RSC to be modified.
CORBA::Any new_data;
CORBA::Long number = 19;
new_data <<= number;
// Now reset the contents of our slot in the thread-scope
// current (TSC).
this->pi_current_->set_slot (this->slot_id_,
new_data);
// Now retrieve the data from the RSC again. It should not have
// changed!
CORBA::Any_var data2 =
ri->get_slot (this->slot_id_);
const char *str2 = 0;
if (!(data2.in () >>= str2)
|| ACE_OS::strcmp (str, str2) != 0)
{
ACE_ERROR ((LM_ERROR,
"(%P|%t) ERROR: RSC was modified after "
"TSC was modified.\n"));
throw CORBA::INTERNAL ();
}
}
catch (const PortableInterceptor::InvalidSlot& ex)
{
ex._tao_print_exception ("Exception thrown in ""send_reply()\n");
ACE_DEBUG ((LM_DEBUG,
"Invalid slot: %u\n",
this->slot_id_));
throw CORBA::INTERNAL ();
}
ACE_DEBUG ((LM_INFO,
"(%P|%t) Server side RSC/TSC semantics appear "
"to be correct.\n"));
}
void
ServerRequestInterceptor::send_exception (
PortableInterceptor::ServerRequestInfo_ptr)
{
}
void
ServerRequestInterceptor::send_other (
PortableInterceptor::ServerRequestInfo_ptr)
{
}
|
