blob: c7de619af4e6ecbd8cf1f49e2504c4834c0073ec (
plain)
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
|
// $Id$
#include "POA.h"
#include "ThruPOA_Object_Proxy_Impl.h"
#include "tao/ORB_Core.h"
#include "tao/Stub.h"
ACE_RCSID(tao, TAO_ThruPOA_Object_Proxy_Impl, "$Id$")
TAO_ThruPOA_Object_Proxy_Impl::TAO_ThruPOA_Object_Proxy_Impl (void)
{
// No-op
}
TAO_ThruPOA_Object_Proxy_Impl::~TAO_ThruPOA_Object_Proxy_Impl (void)
{
// No-op
}
CORBA::Boolean
TAO_ThruPOA_Object_Proxy_Impl::_is_a (const CORBA::Object_ptr target,
const CORBA::Char *logical_type_id
TAO_ENV_ARG_DECL)
{
TAO_Object_Adapter::Servant_Upcall
servant_upcall (target->_stubobj ()->servant_orb_var ()->orb_core ());
CORBA::Object_var forward_to;
servant_upcall.prepare_for_upcall (
target->_object_key (),
"_is_a",
forward_to.out ()
TAO_ENV_ARG_PARAMETER);
ACE_CHECK_RETURN (0);
return servant_upcall.servant ()->_is_a (logical_type_id TAO_ENV_ARG_PARAMETER);
}
#if (TAO_HAS_MINIMUM_CORBA == 0)
CORBA::Boolean
TAO_ThruPOA_Object_Proxy_Impl::_non_existent (const CORBA::Object_ptr target
TAO_ENV_ARG_DECL)
{
CORBA::Boolean _tao_retval = 0;
ACE_TRY
{
TAO_Object_Adapter::Servant_Upcall servant_upcall (
target->_stubobj ()->servant_orb_var ()->orb_core ()
);
CORBA::Object_var forward_to;
servant_upcall.prepare_for_upcall (
target->_object_key (),
"_non_existent",
forward_to.out ()
TAO_ENV_ARG_PARAMETER);
ACE_TRY_CHECK;
return servant_upcall.servant ()->_non_existent (TAO_ENV_SINGLE_ARG_PARAMETER);
}
ACE_CATCH (CORBA::OBJECT_NOT_EXIST, ex)
{
_tao_retval = 1;
}
ACE_CATCHANY
{
ACE_RE_THROW;
}
ACE_ENDTRY;
return _tao_retval;
}
CORBA_InterfaceDef_ptr
TAO_ThruPOA_Object_Proxy_Impl::_get_interface (const CORBA::Object_ptr target
TAO_ENV_ARG_DECL)
{
ACE_TRY
{
TAO_Object_Adapter::Servant_Upcall servant_upcall (
target->_stubobj ()->servant_orb_var ()->orb_core ()
);
CORBA::Object_var forward_to;
servant_upcall.prepare_for_upcall (
target->_object_key (),
"_get_interface",
forward_to.out ()
TAO_ENV_ARG_PARAMETER);
ACE_TRY_CHECK;
return servant_upcall.servant ()->_get_interface (TAO_ENV_SINGLE_ARG_PARAMETER);
}
ACE_CATCH (CORBA::OBJECT_NOT_EXIST, ex)
{
}
ACE_CATCHANY
{
ACE_RE_THROW;
}
ACE_ENDTRY;
return 0;
}
#endif // TAO_HAS_MINIMUM_CORBA == 0 //
|