source: rtems/testsuites/rhealstone/rhilatency/ilatency.c @ 893aac16

4.11
Last change on this file since 893aac16 was 893aac16, checked in by Joel Sherrill <joel.sherrill@…>, on Jan 8, 2014 at 12:31:32 AM

rhealstone: Add start end and messages

  • Property mode set to 100644
File size: 2.7 KB
Line 
1/* Copyright 2014 Daniel Ramirez (javamonn@gmail.com)
2 *
3 * This file's license is 2-clause BSD as in this distribution's LICENSE.2 file.
4 */
5
6/*
7 *  WARNING!!!!!!!!!
8 *
9 *  THIS TEST USES INTERNAL RTEMS VARIABLES!!!
10 */
11
12#ifdef HAVE_CONFIG_H
13#include "config.h"
14#endif
15
16#define CONFIGURE_INIT
17#include <timesys.h>
18#include <rtems/timerdrv.h>
19#include <coverhd.h>
20
21/* configuration information */
22#define CONFIGURE_APPLICATION_NEEDS_CONSOLE_DRIVER
23#define CONFIGURE_APPLICATION_NEEDS_TIMER_DRIVER
24#define CONFIGURE_MAXIMUM_TASKS              2
25#define CONFIGURE_TICKS_PER_TIMESLICE        0
26#define CONFIGURE_RTEMS_INIT_TASKS_TABLE
27#define CONFIGURE_SCHEDULER_PRIORITY
28
29#include <rtems/confdefs.h>
30
31#include <bsp.h>
32
33#define _RTEMS_TMTEST27
34#include <tm27.h>
35
36#define BENCHMARKS 50000
37
38rtems_task Task_1(
39  rtems_task_argument argument
40);
41
42uint32_t   Interrupt_nest;
43uint32_t   timer_overhead;
44uint32_t   Interrupt_enter_time;
45
46rtems_isr Isr_handler(
47  rtems_vector_number vector
48);
49
50rtems_task Init(
51  rtems_task_argument argument
52)
53{
54  rtems_status_code status;
55  rtems_id Task_id;
56
57  Print_Warning();
58
59  puts( "*** START OF RHILATENCY ***" );
60
61  if (_Scheduler.Operations.initialize != _Scheduler_priority_Initialize) {
62    puts( "  Error ==> " );
63    puts( "Test only supported for deterministic priority scheduler\n" );
64    rtems_test_exit( 0 );
65  }
66
67#define LOW_PRIORITY (RTEMS_MAXIMUM_PRIORITY - 1u)
68  status = rtems_task_create(
69    rtems_build_name( 'T', 'A', '1', ' ' ),
70    LOW_PRIORITY,
71    RTEMS_MINIMUM_STACK_SIZE,
72    RTEMS_DEFAULT_MODES,
73    RTEMS_DEFAULT_ATTRIBUTES,
74    &Task_id
75  );
76  directive_failed( status, "rtems_task_create Task_1" );
77
78  status = rtems_task_start( Task_id, Task_1, 0 );
79  directive_failed( status, "rtems_task_start Task_1" );
80
81  benchmark_timer_initialize();
82  benchmark_timer_read();
83  benchmark_timer_initialize();
84  timer_overhead = benchmark_timer_read();
85
86  status = rtems_task_delete( RTEMS_SELF );
87  directive_failed( status, "rtems_task_delete of RTEMS_SELF" );
88}
89
90rtems_task Task_1(
91  rtems_task_argument argument
92)
93{
94  Install_tm27_vector( Isr_handler ) ;
95  Interrupt_nest = 0;
96  _Thread_Dispatch_set_disable_level( 0 );
97
98  /* Benchmark code */
99  benchmark_timer_initialize();
100  /* goes to Isr_handler */
101  Cause_tm27_intr();
102
103  put_time(
104    "Rhealstone: Interrupt Latency",
105    Interrupt_enter_time,
106    1,                             /* Only Rhealstone that isn't an average */
107    timer_overhead,
108    0
109  );
110
111  puts( "*** END OF RHILATENCY ***" );
112  rtems_test_exit( 0 );
113}
114
115rtems_isr Isr_handler(
116  rtems_vector_number vector
117)
118{
119  /* See how long it took system to recognize interrupt */
120  Interrupt_enter_time = benchmark_timer_read();
121  Clear_tm27_intr();
122}
Note: See TracBrowser for help on using the repository browser.