OpenCores
URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [rtos/] [rtems/] [c/] [src/] [tests/] [tmtests/] [tm08/] [task1.c] - Blame information for rev 484

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 30 unneback
/*
2
 *
3
 *  COPYRIGHT (c) 1989-1999.
4
 *  On-Line Applications Research Corporation (OAR).
5
 *
6
 *  The license and distribution terms for this file may be
7
 *  found in the file LICENSE in this distribution or at
8
 *  http://www.OARcorp.com/rtems/license.html.
9
 *
10
 *  $Id: task1.c,v 1.2 2001-09-27 12:02:41 chris Exp $
11
 */
12
 
13
#define TEST_INIT
14
#include "system.h"
15
 
16
rtems_id Test_task_id;
17
 
18
rtems_task test_task(
19
  rtems_task_argument argument
20
);
21
rtems_task test_task1(
22
  rtems_task_argument argument
23
);
24
void test_init();
25
 
26
rtems_task Init(
27
  rtems_task_argument argument
28
)
29
{
30
  rtems_status_code status;
31
 
32
  Print_Warning();
33
 
34
  puts( "\n\n*** TIME TEST 8 ***" );
35
 
36
  test_init();
37
 
38
  status = rtems_task_delete( RTEMS_SELF );
39
  directive_failed( status, "rtems_task_delete of RTEMS_SELF" );
40
}
41
 
42
void test_init()
43
{
44
  rtems_status_code status;
45
 
46
  status = rtems_task_create(
47
    1,
48
    128,
49
    RTEMS_MINIMUM_STACK_SIZE,
50
    RTEMS_DEFAULT_MODES,
51
    RTEMS_DEFAULT_ATTRIBUTES,
52
    &Test_task_id
53
  );
54
  directive_failed( status, "rtems_task_create" );
55
 
56
  status = rtems_task_start( Test_task_id, test_task, 0 );
57
  directive_failed( status, "rtems_task_start" );
58
 
59
  status = rtems_task_create(
60
    1,
61
    254,
62
    RTEMS_MINIMUM_STACK_SIZE,
63
    RTEMS_DEFAULT_MODES,
64
    RTEMS_DEFAULT_ATTRIBUTES,
65
    &Test_task_id
66
  );
67
  directive_failed( status, "rtems_task_create" );
68
 
69
  status = rtems_task_start( Test_task_id, test_task1, 0 );
70
  directive_failed( status, "rtems_task_start" );
71
}
72
 
73
rtems_task test_task(
74
  rtems_task_argument argument
75
)
76
{
77
  rtems_status_code   status;
78
  rtems_unsigned32    index;
79
  rtems_task_priority old_priority;
80
  rtems_time_of_day   time;
81
  rtems_unsigned32    old_note;
82
  rtems_unsigned32    old_mode;
83
 
84
  Timer_initialize();
85
    for ( index=1 ; index <= OPERATION_COUNT ; index++ )
86
      (void) Empty_function();
87
  overhead = Read_timer();
88
 
89
  Timer_initialize();
90
    for ( index=1 ; index <= OPERATION_COUNT ; index++ )
91
      (void) rtems_task_set_priority(
92
               Test_task_id,
93
               RTEMS_CURRENT_PRIORITY,
94
               &old_priority
95
             );
96
  end_time = Read_timer();
97
 
98
  put_time(
99
    "rtems_task_set_priority: obtain current priority",
100
    end_time,
101
    OPERATION_COUNT,
102
    overhead,
103
    CALLING_OVERHEAD_TASK_SET_PRIORITY
104
  );
105
 
106
  Timer_initialize();
107
    for ( index=1 ; index <= OPERATION_COUNT ; index++ )
108
      (void) rtems_task_set_priority( Test_task_id, 253, &old_priority );
109
  end_time = Read_timer();
110
 
111
  put_time(
112
    "rtems_task_set_priority: returns to caller",
113
    end_time,
114
    OPERATION_COUNT,
115
    overhead,
116
    CALLING_OVERHEAD_TASK_SET_PRIORITY
117
  );
118
 
119
  Timer_initialize();
120
    for ( index=1 ; index <= OPERATION_COUNT ; index++ )
121
      (void) rtems_task_mode(
122
        RTEMS_CURRENT_MODE,
123
        RTEMS_CURRENT_MODE,
124
        &old_mode
125
      );
126
  end_time = Read_timer();
127
 
128
  put_time(
129
    "rtems_task_mode: obtain current mode",
130
    end_time,
131
    OPERATION_COUNT,
132
    overhead,
133
    CALLING_OVERHEAD_TASK_MODE
134
  );
135
 
136
  Timer_initialize();
137
    for ( index=1 ; index <= OPERATION_COUNT ; index++ ) {
138
      (void) rtems_task_mode(
139
        RTEMS_INTERRUPT_LEVEL(1),
140
        RTEMS_INTERRUPT_MASK,
141
        &old_mode
142
      );
143
      (void) rtems_task_mode(
144
        RTEMS_INTERRUPT_LEVEL(0),
145
        RTEMS_INTERRUPT_MASK,
146
        &old_mode
147
      );
148
    }
149
  end_time = Read_timer();
150
 
151
  put_time(
152
    "rtems_task_mode: no reschedule",
153
    end_time,
154
    OPERATION_COUNT * 2,
155
    overhead,
156
    CALLING_OVERHEAD_TASK_MODE
157
  );
158
 
159
  Timer_initialize();                 /* must be one host */
160
    (void) rtems_task_mode( RTEMS_NO_ASR, RTEMS_ASR_MASK, &old_mode );
161
  end_time = Read_timer();
162
 
163
  put_time(
164
    "rtems_task_mode: reschedule -- returns to caller",
165
    end_time,
166
    1,
167
    0,
168
    CALLING_OVERHEAD_TASK_MODE
169
  );
170
 
171
  status = rtems_task_mode( RTEMS_NO_PREEMPT, RTEMS_PREEMPT_MASK, &old_mode );
172
  directive_failed( status, "rtems_task_mode" );
173
 
174
  status = rtems_task_set_priority( Test_task_id, 1, &old_priority );
175
  directive_failed( status, "rtems_task_set_priority" );
176
 
177
  /* preempted by test_task1 */
178
  Timer_initialize();
179
    (void)  rtems_task_mode( RTEMS_PREEMPT, RTEMS_PREEMPT_MASK, &old_mode );
180
 
181
  Timer_initialize();
182
    for ( index=1 ; index <= OPERATION_COUNT ; index++ )
183
      (void) rtems_task_set_note( Test_task_id, 8, 10 );
184
  end_time = Read_timer();
185
 
186
  put_time(
187
    "rtems_task_set_note",
188
    end_time,
189
    OPERATION_COUNT,
190
    overhead,
191
    CALLING_OVERHEAD_TASK_SET_NOTE
192
  );
193
 
194
  Timer_initialize();
195
    for ( index=1 ; index <= OPERATION_COUNT ; index++ )
196
      (void) rtems_task_get_note( Test_task_id, 8, &old_note );
197
  end_time = Read_timer();
198
 
199
  put_time(
200
    "rtems_task_get_note",
201
    end_time,
202
    OPERATION_COUNT,
203
    overhead,
204
    CALLING_OVERHEAD_TASK_GET_NOTE
205
  );
206
 
207
  build_time( &time, 1, 1, 1988, 0, 0, 0, 0 );
208
 
209
  Timer_initialize();
210
    for ( index=1 ; index <= OPERATION_COUNT ; index++ )
211
      (void) rtems_clock_set( &time );
212
  end_time = Read_timer();
213
 
214
  put_time(
215
    "rtems_clock_set",
216
    end_time,
217
    OPERATION_COUNT,
218
    overhead,
219
    CALLING_OVERHEAD_CLOCK_SET
220
  );
221
 
222
  Timer_initialize();
223
    for ( index=1 ; index <= OPERATION_COUNT ; index++ )
224
      (void) rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time );
225
  end_time = Read_timer();
226
 
227
  put_time(
228
    "rtems_clock_get",
229
    end_time,
230
    OPERATION_COUNT,
231
    overhead,
232
    CALLING_OVERHEAD_CLOCK_GET
233
  );
234
 
235
  puts( "*** END OF TEST 8 ***" );
236
  exit( 0 );
237
}
238
 
239
rtems_task test_task1(
240
  rtems_task_argument argument
241
)
242
{
243
  end_time = Read_timer();
244
 
245
  put_time(
246
    "rtems_task_mode: reschedule -- preempts caller",
247
    end_time,
248
    1,
249
    0,
250
    CALLING_OVERHEAD_TASK_MODE
251
  );
252
 
253
  (void) rtems_task_suspend( RTEMS_SELF );
254
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.