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
|
//
// $Id$
//
#include "tao/RT_Current.h"
#if (TAO_HAS_RT_CORBA == 1)
#include "tao/Stub.h"
#include "tao/ORB_Core.h"
#include "tao/Priority_Mapping.h"
#include "ace/Thread.h"
#if !defined (__ACE_INLINE__)
#include "tao/RT_Current.i"
#endif /* __ACE_INLINE__ */
ACE_RCSID(tao, RT_Current, "$Id$")
TAO_RT_Current_ptr
TAO_RT_Current::_duplicate (TAO_RT_Current_ptr obj)
{
if (!CORBA::is_nil (obj))
obj->_incr_refcnt ();
return obj;
}
TAO_RT_Current_ptr TAO_RT_Current::_narrow (
CORBA::Object_ptr obj,
CORBA::Environment &ACE_TRY_ENV
)
{
if (CORBA::is_nil (obj))
return TAO_RT_Current::_nil ();
CORBA::Boolean check =
!obj->_is_a ("IDL:omg.org/RTCORBA/Current:1.0", ACE_TRY_ENV);
ACE_CHECK_RETURN (TAO_RT_Current::_nil ());
if (check)
return TAO_RT_Current::_nil ();
TAO_Stub *stub = obj->_stubobj ();
stub->_incr_refcnt ();
TAO_RT_Current *current;
ACE_NEW_RETURN (current,
TAO_RT_Current (stub),
0);
return current;
}
CORBA::Boolean TAO_RT_Current::_is_a (const char *value,
CORBA::Environment &)
{
if (
(!ACE_OS::strcmp ((char *)value, "IDL:omg.org/RTCORBA/Current:1.0")) ||
(!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/Current:1.0")) ||
(!ACE_OS::strcmp ((char *)value, "IDL:omg.org/CORBA/Object:1.0")))
return 1;
return 0;
}
const char* TAO_RT_Current::_interface_repository_id (void) const
{
return "IDL:omg.org/RTCORBA/Current:1.0";
}
RTCORBA::Priority
TAO_RT_Current::the_priority (
CORBA::Environment &ACE_TRY_ENV)
ACE_THROW_SPEC ((
CORBA::SystemException
))
{
TAO_ORB_Core *orb_core =
this->_stubobj ()->orb_core ();
RTCORBA::Priority priority;
if (orb_core->get_thread_priority (priority) == -1)
ACE_THROW_RETURN (CORBA::DATA_CONVERSION (1, CORBA::COMPLETED_NO), -1);
return 0;
}
void
TAO_RT_Current::the_priority (
RTCORBA::Priority the_priority,
CORBA::Environment &ACE_TRY_ENV)
ACE_THROW_SPEC ((
CORBA::SystemException
))
{
TAO_ORB_Core *orb_core =
this->_stubobj ()->orb_core ();
if (orb_core->set_thread_priority (the_priority) == -1)
ACE_THROW (CORBA::DATA_CONVERSION (1, CORBA::COMPLETED_NO));
}
#endif /* TAO_HAS_RT_CORBA == 1 */
|
