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
|
// $Id$
//========================================================================
//
// = LIBRARY
// TAO/tests/POA/wait_for_completion
//
// = FILENAME
// wait_for_completion.cpp
//
// = DESCRIPTION
// This program tests the wait_for_completion feature of a POA.
//
// = AUTHOR
// Irfan Pyarali
//
//=========================================================================
#include "testS.h"
class test_i : public POA_test
{
public:
void destroy_poa (CORBA::Environment &ACE_TRY_ENV)
ACE_THROW_SPEC ((CORBA::SystemException));
void test_poa (PortableServer::POA_ptr poa);
PortableServer::POA_var poa_;
};
void
test_i::test_poa (PortableServer::POA_ptr poa)
{
this->poa_ = PortableServer::POA::_duplicate (poa);
}
void
test_i::destroy_poa (CORBA::Environment &ACE_TRY_ENV)
ACE_THROW_SPEC ((CORBA::SystemException))
{
CORBA::Boolean etherealize_objects = 1;
CORBA::Boolean wait_for_completion = 1;
this->poa_->destroy (etherealize_objects,
wait_for_completion,
ACE_TRY_ENV);
ACE_CHECK;
}
PortableServer::POA_ptr
init_orb (int argc,
char **argv,
const char *orb_name,
CORBA::Environment &ACE_TRY_ENV)
{
// Initialize the ORB first.
CORBA::ORB_var orb = CORBA::ORB_init (argc,
argv,
orb_name,
ACE_TRY_ENV);
ACE_CHECK_RETURN (PortableServer::POA::_nil ());
// Obtain the RootPOA.
CORBA::Object_var obj =
orb->resolve_initial_references ("RootPOA",
ACE_TRY_ENV);
ACE_CHECK_RETURN (PortableServer::POA::_nil ());
// Get the POA_var object from Object_var.
PortableServer::POA_var root_poa =
PortableServer::POA::_narrow (obj.in (),
ACE_TRY_ENV);
ACE_CHECK_RETURN (PortableServer::POA::_nil ());
// Get the POAManager of the RootPOA.
PortableServer::POAManager_var poa_manager =
root_poa->the_POAManager (ACE_TRY_ENV);
ACE_CHECK_RETURN (PortableServer::POA::_nil ());
poa_manager->activate (ACE_TRY_ENV);
ACE_CHECK_RETURN (PortableServer::POA::_nil ());
return root_poa._retn ();
}
int
main (int argc,
char **argv)
{
ACE_DECLARE_NEW_CORBA_ENV;
ACE_TRY
{
PortableServer::POA_var first_poa =
init_orb (argc,
argv,
"first ORB",
ACE_TRY_ENV);
ACE_TRY_CHECK;
PortableServer::POA_var second_poa =
init_orb (argc,
argv,
"second ORB",
ACE_TRY_ENV);
ACE_TRY_CHECK;
test_i servant;
test_var test_object = servant._this (ACE_TRY_ENV);
ACE_TRY_CHECK;
ACE_TRY_EX (first_poa)
{
servant.test_poa (first_poa.in ());
test_object->destroy_poa (ACE_TRY_ENV);
ACE_TRY_CHECK_EX (first_poa);
}
ACE_CATCH (CORBA::BAD_INV_ORDER, ex)
{
// This is the correct exception! Ignore
}
ACE_CATCHANY
{
ACE_PRINT_EXCEPTION (ACE_ANY_EXCEPTION, "Exception caught of incorrect type");
return -1;
}
ACE_ENDTRY;
ACE_CHECK_RETURN (-1);
servant.test_poa (second_poa.in ());
test_object->destroy_poa (ACE_TRY_ENV);
ACE_TRY_CHECK;
}
ACE_CATCHANY
{
ACE_PRINT_EXCEPTION (ACE_ANY_EXCEPTION, "Unexpected exception caught");
return -1;
}
ACE_ENDTRY;
ACE_CHECK_RETURN (-1);
return 0;
}
|
