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
|
// -*- C++ -*-
#include "test_i.h"
ACE_RCSID (PICurrent,
test_i,
"$Id$")
test_i::test_i (PortableInterceptor::Current_ptr current,
PortableInterceptor::SlotId id,
CORBA::ORB_ptr orb)
: current_ (PortableInterceptor::Current::_duplicate (current)),
slot_id_ (id),
orb_ (CORBA::ORB::_duplicate (orb))
{
}
test_i::~test_i (void)
{
}
void
test_i::invoke_me (ACE_ENV_SINGLE_ARG_DECL)
ACE_THROW_SPEC ((CORBA::SystemException))
{
ACE_DEBUG ((LM_DEBUG,
"Test method invoked.\n"));
// @note "TSC" is "thread scope current"
// "RSC" is "request scope current"
// ----------------------------------------------------
CORBA::Any_var retrieved_any;
ACE_TRY
{
// Retrieve data placed into RSC PICurrent by the
// receive_request_service_contexts() interception point, and
// then copied into the TSC current.
retrieved_any =
this->current_->get_slot (this->slot_id_ ACE_ENV_ARG_PARAMETER);
ACE_TRY_CHECK;
}
ACE_CATCH (PortableInterceptor::InvalidSlot, ex)
{
ACE_PRINT_EXCEPTION (ex,
"Exception thrown in "
"test_i::invoke_me() when calling "
"Current::get_slot\n");
ACE_DEBUG ((LM_DEBUG,
"Invalid slot: %u\n",
this->slot_id_));
ACE_TRY_THROW (CORBA::INTERNAL ());
}
ACE_CATCHANY
{
ACE_PRINT_EXCEPTION (ACE_ANY_EXCEPTION,
"Unexpected exception\n");
}
ACE_ENDTRY;
ACE_CHECK;
CORBA::Long retrieved;
if (retrieved_any.in() >>= retrieved)
ACE_DEBUG ((LM_DEBUG,
"(%P|%t) Retrieved number <%d> from TSC.\n",
retrieved));
else
{
ACE_DEBUG ((LM_DEBUG,
"(%P|%t) Problem extracting data from "
"CORBA::Any retrieved from TSC.\n"));
ACE_THROW (CORBA::INTERNAL ());
}
// ----------------------------------------------------
// Insert some data into the TSC PICurrent object.
const char str[] = "Drink milk!";
CORBA::Any data;
data <<= str;
ACE_TRY_EX (foo)
{
this->current_->set_slot (this->slot_id_, data ACE_ENV_ARG_PARAMETER);
ACE_TRY_CHECK_EX (foo);
}
ACE_CATCH (PortableInterceptor::InvalidSlot, ex)
{
ACE_PRINT_EXCEPTION (ex,
"Exception thrown in "
"test_i::invoke_me() when calling "
"Current::set_slot\n");
ACE_DEBUG ((LM_DEBUG,
"Invalid slot: %u\n",
this->slot_id_));
ACE_TRY_THROW_EX (CORBA::INTERNAL (), foo);
}
ACE_ENDTRY;
ACE_CHECK;
ACE_DEBUG ((LM_DEBUG,
"(%P|%t) String \"%s\" inserted into TSC.\n",
str));
}
void
test_i::shutdown (ACE_ENV_SINGLE_ARG_DECL)
ACE_THROW_SPEC ((CORBA::SystemException))
{
ACE_DEBUG ((LM_DEBUG,
"(%P|%t) Server is shutting down.\n"));
this->orb_->shutdown (0 ACE_ENV_ARG_PARAMETER);
}
|
