source:
rtems/testsuites/tmtests/tm17/task1.c
@
95a81ab
Last change on this file since 95a81ab was 95a81ab, checked in by Joel Sherrill <joel.sherrill@…>, on 09/04/03 at 18:53:55 | |
---|---|
|
|
File size: 2.5 KB |
Rev | Line | |
---|---|---|
[ac7d5ef0] | 1 | /* |
2 | * | |
[08311cc3] | 3 | * COPYRIGHT (c) 1989-1999. |
[ac7d5ef0] | 4 | * On-Line Applications Research Corporation (OAR). |
5 | * | |
[98e4ebf5] | 6 | * The license and distribution terms for this file may be |
7 | * found in the file LICENSE in this distribution or at | |
[95a81ab] | 8 | * http://www.rtems.com/license/LICENSE. |
[ac7d5ef0] | 9 | * |
10 | * $Id$ | |
11 | */ | |
12 | ||
[3a4ae6c] | 13 | #define TEST_INIT |
[ac7d5ef0] | 14 | #include "system.h" |
15 | ||
16 | rtems_unsigned32 Task_count; | |
17 | rtems_task_priority Task_priority; | |
18 | ||
19 | rtems_task First_task( | |
20 | rtems_task_argument argument | |
21 | ); | |
22 | ||
23 | rtems_task Middle_tasks( | |
24 | rtems_task_argument argument | |
25 | ); | |
26 | ||
27 | rtems_task Last_task( | |
28 | rtems_task_argument argument | |
29 | ); | |
30 | ||
31 | rtems_task Init( | |
32 | rtems_task_argument argument | |
33 | ) | |
34 | { | |
35 | rtems_task_entry task_entry; | |
36 | rtems_unsigned32 index; | |
37 | rtems_status_code status; | |
38 | ||
[3a4ae6c] | 39 | Print_Warning(); |
40 | ||
[ac7d5ef0] | 41 | puts( "\n\n*** TIME TEST 17 ***" ); |
42 | ||
43 | Task_priority = 254; | |
44 | ||
45 | for( index = 0; index <= OPERATION_COUNT ; index++ ) { | |
46 | status = rtems_task_create( | |
47 | rtems_build_name( 'T', 'I', 'M', 'E' ), | |
48 | Task_priority, | |
[3652ad35] | 49 | RTEMS_MINIMUM_STACK_SIZE, |
[ac7d5ef0] | 50 | RTEMS_DEFAULT_MODES, |
51 | RTEMS_DEFAULT_ATTRIBUTES, | |
52 | &Task_id[ index ] | |
53 | ); | |
54 | directive_failed( status, "rtems_task_create loop" ); | |
55 | ||
56 | if ( index == OPERATION_COUNT ) task_entry = Last_task; | |
57 | else if ( index == 0 ) task_entry = First_task; | |
58 | else task_entry = Middle_tasks; | |
59 | ||
60 | status = rtems_task_start( Task_id[ index ], task_entry, 0 ); | |
61 | directive_failed( status, "rtems_task_start loop" ); | |
62 | } | |
63 | ||
64 | Task_count = 1; | |
65 | status = rtems_task_delete( RTEMS_SELF ); | |
66 | directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); | |
67 | } | |
68 | ||
69 | rtems_task First_task( | |
70 | rtems_task_argument argument | |
71 | ) | |
72 | { | |
73 | rtems_task_priority previous_priority; | |
74 | ||
75 | Timer_initialize(); | |
76 | ||
77 | Task_priority--; | |
78 | Task_count++; | |
79 | ||
80 | (void) rtems_task_set_priority( | |
81 | Task_id[ Task_count ], | |
82 | Task_priority, | |
83 | &previous_priority | |
84 | ); | |
85 | } | |
86 | ||
87 | rtems_task Middle_tasks( | |
88 | rtems_task_argument argument | |
89 | ) | |
90 | { | |
91 | rtems_task_priority previous_priority; | |
92 | ||
93 | Task_priority--; | |
94 | Task_count++; | |
95 | ||
96 | (void) rtems_task_set_priority( | |
97 | Task_id[ Task_count ], | |
98 | Task_priority, | |
99 | &previous_priority | |
100 | ); | |
101 | } | |
102 | ||
103 | rtems_task Last_task( | |
104 | rtems_task_argument argument | |
105 | ) | |
106 | { | |
107 | rtems_unsigned32 index; | |
108 | ||
109 | end_time = Read_timer(); | |
110 | ||
111 | Timer_initialize(); | |
112 | for ( index=1 ; index <= OPERATION_COUNT ; index++ ) | |
113 | (void) Empty_function(); | |
114 | overhead = Read_timer(); | |
115 | ||
116 | put_time( | |
[5c491aef] | 117 | "rtems_task_set_priority: preempts caller", |
[ac7d5ef0] | 118 | end_time, |
119 | OPERATION_COUNT, | |
120 | overhead, | |
121 | CALLING_OVERHEAD_TASK_SET_PRIORITY | |
122 | ); | |
123 | ||
[3a4ae6c] | 124 | puts( "*** END OF TEST 17 ***" ); |
[b454bc9] | 125 | rtems_test_exit( 0 ); |
[ac7d5ef0] | 126 | } |
Note: See TracBrowser
for help on using the repository browser.