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
|
// $Id$
#include "tao/Client_Priority_Policy.h"
#if ! defined (__ACE_INLINE__)
#include "tao/Client_Priority_Policy.i"
#endif /* __ACE_INLINE__ */
#if defined (TAO_HAS_CORBA_MESSAGING)
ACE_RCSID(TAO, Client_Priority_Policy, "$Id$")
TAO::PrioritySpecification
TAO_Client_Priority_Policy::priority_specification (CORBA::Environment &)
{
return this->priority_spec_;
}
CORBA::PolicyType
TAO_Client_Priority_Policy::policy_type (CORBA_Environment &)
{
return TAO::CLIENT_PRIORITY_POLICY_TYPE;
}
CORBA::Policy_ptr
TAO_Client_Priority_Policy::create (PortableServer::POA_ptr poa,
const CORBA::Any& val,
CORBA::Environment &ACE_TRY_ENV)
{
// Future policy implementors: notice how the following code is
// exception safe!
TAO::PrioritySpecification *priority_spec;
if ((val >>= priority_spec) == 0)
ACE_THROW_RETURN (CORBA::PolicyError (CORBA::BAD_POLICY_TYPE),
CORBA::Policy::_nil ());
TAO_Client_Priority_Policy *tmp;
ACE_NEW_THROW_EX (tmp,
TAO_Client_Priority_Policy (poa, *priority_spec),
CORBA::NO_MEMORY ());
ACE_CHECK_RETURN (CORBA::Policy::_nil ());
PortableServer::ServantBase_var clone (tmp);
CORBA::Policy_var result = tmp->_this (ACE_TRY_ENV);
ACE_CHECK_RETURN (CORBA::Policy::_nil ());
return result._retn ();
}
CORBA::Policy_ptr
TAO_Client_Priority_Policy::copy (CORBA_Environment &ACE_TRY_ENV)
{
// Future policy implementors: notice how the following code is
// exception safe!
TAO_Client_Priority_Policy* tmp;
ACE_NEW_THROW_EX (tmp,
TAO_Client_Priority_Policy (*this),
CORBA::NO_MEMORY ());
ACE_CHECK_RETURN (CORBA::Policy::_nil ());
PortableServer::ServantBase_var clone (tmp);
CORBA::Policy_var result = tmp->_this (ACE_TRY_ENV);
ACE_CHECK_RETURN (CORBA::Policy::_nil ());
return result._retn ();
}
void
TAO_Client_Priority_Policy::destroy (CORBA_Environment &ACE_TRY_ENV)
{
PortableServer::ObjectId_var id =
this->poa_->servant_to_id (this, ACE_TRY_ENV);
ACE_CHECK;
this->poa_->deactivate_object (id.in (), ACE_TRY_ENV);
ACE_CHECK;
}
PortableServer::POA_ptr
TAO_Client_Priority_Policy::_default_POA (CORBA_Environment &)
{
return PortableServer::POA::_duplicate (this->poa_.in ());
}
#if defined (ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION)
#elif defined(ACE_HAS_TEMPLATE_INSTANTIATION_PRAGMA)
#endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */
#endif /* TAO_HAS_CORBA_MESSAGING */
|