source: rtems/testsuites/tmtests/tm25/task1.c @ 7f6a24ab

4.104.114.84.95
Last change on this file since 7f6a24ab was 7f6a24ab, checked in by Joel Sherrill <joel.sherrill@…>, on Aug 28, 1995 at 3:30:29 PM

Added unused priority ceiling parameter to rtems_semaphore_create.

Rearranged code to created thread handler routines to initialize,
start, restart, and "close/delete" a thread.

Made internal threads their own object class. This now uses the
thread support routines for starting and initializing a thread.

Insured deleted tasks are freed to the Inactive pool associated with the
correct Information block.

Added an RTEMS API specific data area to the thread control block.

Beginnings of removing the word "rtems" from the core.

  • Property mode set to 100644
File size: 2.3 KB
Line 
1/*
2 *
3 *  COPYRIGHT (c) 1989, 1990, 1991, 1992, 1993, 1994.
4 *  On-Line Applications Research Corporation (OAR).
5 *  All rights assigned to U.S. Government, 1994.
6 *
7 *  This material may be reproduced by or for the U.S. Government pursuant
8 *  to the copyright license under the clause at DFARS 252.227-7013.  This
9 *  notice must appear in all copies of this file and its derivatives.
10 *
11 *  $Id$
12 */
13
14#include "system.h"
15#undef EXTERN
16#define EXTERN
17#include "conftbl.h"
18#include "gvar.h"
19
20rtems_id Semaphore_id;
21
22rtems_task High_tasks(
23  rtems_task_argument argument
24);
25
26rtems_task Low_task(
27  rtems_task_argument argument
28);
29
30rtems_task Init(
31  rtems_task_argument argument
32)
33{
34  rtems_id          task_id;
35  rtems_unsigned32  index;
36  rtems_status_code status;
37
38  puts( "\n\n*** TIME TEST 25 ***" );
39
40  status = rtems_semaphore_create(
41    rtems_build_name( 'S', 'M', '1', ' ') ,
42    0,
43    RTEMS_DEFAULT_ATTRIBUTES,
44    RTEMS_NO_PRIORITY,
45    &Semaphore_id
46  );
47  directive_failed( status, "rtems_semaphore_create of SM1" );
48
49  status = rtems_task_create(
50    rtems_build_name( 'L', 'O', 'W', ' ' ),
51    254,
52    1024,
53    RTEMS_DEFAULT_MODES,
54    RTEMS_DEFAULT_ATTRIBUTES,
55    &task_id
56  );
57  directive_failed( status, "rtems_task_create LOW" );
58
59  status = rtems_task_start( task_id, Low_task, 0 );
60  directive_failed( status, "rtems_task_start LOW" );
61
62  for ( index=1 ; index <= OPERATION_COUNT ; index++ ) {
63    status = rtems_task_create(
64      rtems_build_name( 'T', 'I', 'M', 'E' ),
65      128,
66      1024,
67      RTEMS_DEFAULT_MODES,
68      RTEMS_DEFAULT_ATTRIBUTES,
69      &task_id
70    );
71    directive_failed( status, "rtems_task_create LOOP" );
72
73    status = rtems_task_start( task_id, High_tasks, 0 );
74    directive_failed( status, "rtems_task_start LOOP" );
75  }
76
77  status = rtems_task_delete( RTEMS_SELF );
78  directive_failed( status, "rtems_task_delete of RTEMS_SELF" );
79}
80
81rtems_task High_tasks(
82  rtems_task_argument argument
83)
84{
85  (void) rtems_semaphore_obtain(
86    Semaphore_id,
87    RTEMS_DEFAULT_OPTIONS,
88    0xffffffff
89  );
90}
91
92rtems_task Low_task(
93  rtems_task_argument argument
94)
95{
96  Timer_initialize();
97    (void) rtems_clock_tick();
98  end_time = Read_timer();
99
100  put_time(
101    "rtems_clock_tick",
102    end_time,
103    1,
104    0,
105    CALLING_OVERHEAD_CLOCK_TICK
106  );
107
108  exit( 0 );
109}
Note: See TracBrowser for help on using the repository browser.