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
|
// $Id$
#include "EC_Priority_Scheduling.h"
#include "EC_QOS_Info.h"
#include "EC_ProxyConsumer.h"
#include "EC_ProxySupplier.h"
#if ! defined (__ACE_INLINE__)
#include "EC_Priority_Scheduling.i"
#endif /* __ACE_INLINE__ */
ACE_RCSID(Event, EC_Priority_Scheduling, "$Id$")
TAO_EC_Priority_Scheduling::~TAO_EC_Priority_Scheduling (void)
{
}
void
TAO_EC_Priority_Scheduling::add_proxy_supplier_dependencies (
TAO_EC_ProxyPushSupplier *supplier,
TAO_EC_ProxyPushConsumer *consumer,
CORBA::Environment &ACE_TRY_ENV)
{
const RtecEventChannelAdmin::SupplierQOS& qos =
consumer->publications ();
for (CORBA::ULong i = 0; i < qos.publications.length (); ++i)
{
const RtecEventComm::EventHeader &header =
qos.publications[i].event.header;
TAO_EC_QOS_Info qos_info;
qos_info.rt_info = qos.publications[i].dependency_info.rt_info;
RtecScheduler::OS_Priority os_priority;
RtecScheduler::Preemption_Subpriority_t p_subpriority;
RtecScheduler::Preemption_Priority_t p_priority;
this->scheduler_->priority (qos_info.rt_info,
os_priority,
p_subpriority,
p_priority,
ACE_TRY_ENV);
ACE_CHECK;
qos_info.preemption_priority = p_priority;
supplier->add_dependencies (header, qos_info, ACE_TRY_ENV);
ACE_CHECK;
}
}
void
TAO_EC_Priority_Scheduling::init_event_qos (
const RtecEventComm::EventHeader &header,
TAO_EC_ProxyPushConsumer *consumer,
TAO_EC_QOS_Info &qos_info,
CORBA::Environment &ACE_TRY_ENV)
{
const RtecEventChannelAdmin::SupplierQOS& qos =
consumer->publications ();
for (CORBA::ULong i = 0; i < qos.publications.length (); ++i)
{
const RtecEventComm::EventHeader &qos_header =
qos.publications[i].event.header;
if (TAO_EC_Filter::matches (header, qos_header) == 0)
continue;
qos_info.rt_info = qos.publications[i].dependency_info.rt_info;
RtecScheduler::OS_Priority os_priority;
RtecScheduler::Preemption_Subpriority_t p_subpriority;
RtecScheduler::Preemption_Priority_t p_priority;
this->scheduler_->priority (qos_info.rt_info,
os_priority,
p_subpriority,
p_priority,
ACE_TRY_ENV);
ACE_CHECK;
qos_info.preemption_priority = p_priority;
}
}
|
