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
|
/* Copyright 2014 Daniel Ramirez (javamonn@gmail.com)
*
* This file's license is 2-clause BSD as in this distribution's LICENSE.2 file.
*/
/*
* WARNING!!!!!!!!!
*
* THIS TEST USES INTERNAL RTEMS VARIABLES!!!
*/
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#define CONFIGURE_INIT
#include <timesys.h>
#include <rtems/score/schedulerpriorityimpl.h>
#include <rtems/timerdrv.h>
#include <coverhd.h>
/* configuration information */
#define CONFIGURE_APPLICATION_NEEDS_CONSOLE_DRIVER
#define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
#define CONFIGURE_MAXIMUM_TASKS 2
#define CONFIGURE_TICKS_PER_TIMESLICE 0
#define CONFIGURE_RTEMS_INIT_TASKS_TABLE
#define CONFIGURE_SCHEDULER_PRIORITY
#include <rtems/confdefs.h>
#include <bsp.h>
#define _RTEMS_TMTEST27
#include <tm27.h>
const char rtems_test_name[] = "RHILATENCY";
#define BENCHMARKS 50000
rtems_task Task_1(
rtems_task_argument argument
);
uint32_t Interrupt_nest;
uint32_t timer_overhead;
uint32_t Interrupt_enter_time;
rtems_isr Isr_handler(
rtems_vector_number vector
);
rtems_task Init(
rtems_task_argument argument
)
{
rtems_status_code status;
rtems_id Task_id;
Print_Warning();
TEST_BEGIN();
if (
_Scheduler_Table[ 0 ].Operations.initialize
!= _Scheduler_priority_Initialize
) {
puts( " Error ==> " );
puts( "Test only supported for deterministic priority scheduler\n" );
rtems_test_exit( 0 );
}
#define LOW_PRIORITY (RTEMS_MAXIMUM_PRIORITY - 1u)
status = rtems_task_create(
rtems_build_name( 'T', 'A', '1', ' ' ),
LOW_PRIORITY,
RTEMS_MINIMUM_STACK_SIZE,
RTEMS_DEFAULT_MODES,
RTEMS_DEFAULT_ATTRIBUTES,
&Task_id
);
directive_failed( status, "rtems_task_create Task_1" );
status = rtems_task_start( Task_id, Task_1, 0 );
directive_failed( status, "rtems_task_start Task_1" );
benchmark_timer_initialize();
benchmark_timer_read();
benchmark_timer_initialize();
timer_overhead = benchmark_timer_read();
status = rtems_task_delete( RTEMS_SELF );
directive_failed( status, "rtems_task_delete of RTEMS_SELF" );
}
rtems_task Task_1(
rtems_task_argument argument
)
{
Install_tm27_vector( Isr_handler ) ;
Interrupt_nest = 0;
/* Benchmark code */
benchmark_timer_initialize();
/* goes to Isr_handler */
Cause_tm27_intr();
put_time(
"Rhealstone: Interrupt Latency",
Interrupt_enter_time,
1, /* Only Rhealstone that isn't an average */
timer_overhead,
0
);
TEST_END();
rtems_test_exit( 0 );
}
rtems_isr Isr_handler(
rtems_vector_number vector
)
{
/* See how long it took system to recognize interrupt */
Interrupt_enter_time = benchmark_timer_read();
Clear_tm27_intr();
}
|