source:
rtems/testsuites/mptests/mp13/init.c
@
945f5901
Last change on this file since 945f5901 was d7a0857, checked in by Joel Sherrill <joel.sherrill@…>, on 09/04/03 at 18:53:31 | |
---|---|
|
|
File size: 3.0 KB |
Line | |
---|---|
1 | /* Init |
2 | * |
3 | * This routine is the initialization task for this test program. |
4 | * It is a user initialization task and has the responsibility for creating |
5 | * and starting the tasks that make up the test. If the time of day |
6 | * clock is required for the test, it should also be set to a known |
7 | * value by this function. |
8 | * |
9 | * Input parameters: |
10 | * argument - task argument |
11 | * |
12 | * Output parameters: NONE |
13 | * |
14 | * COPYRIGHT (c) 1989-1999. |
15 | * On-Line Applications Research Corporation (OAR). |
16 | * |
17 | * The license and distribution terms for this file may be |
18 | * found in the file LICENSE in this distribution or at |
19 | * http://www.rtems.com/license/LICENSE. |
20 | * |
21 | * $Id$ |
22 | */ |
23 | |
24 | #define TEST_INIT |
25 | #include "system.h" |
26 | |
27 | rtems_task Init( |
28 | rtems_task_argument argument |
29 | ) |
30 | { |
31 | rtems_status_code status; |
32 | |
33 | printf( |
34 | "\n\n*** TEST 13 -- NODE %d ***\n", |
35 | Multiprocessing_configuration.node |
36 | ); |
37 | |
38 | Task_name[ 1 ] = rtems_build_name( '1', '1', '1', ' ' ); |
39 | Task_name[ 2 ] = rtems_build_name( '2', '2', '2', ' ' ); |
40 | |
41 | Queue_name[ 1 ] = rtems_build_name( 'M', 'S', 'G', ' ' ); |
42 | |
43 | Semaphore_name[ 1 ] = rtems_build_name( 'S', 'E', 'M', ' ' ); |
44 | |
45 | if ( Multiprocessing_configuration.node == 1 ) { |
46 | puts( "Creating Message Queue (Global)" ); |
47 | status = rtems_message_queue_create( |
48 | Queue_name[ 1 ], |
49 | 3, |
50 | 16, |
51 | RTEMS_GLOBAL, |
52 | &Queue_id[ 1 ] |
53 | ); |
54 | directive_failed( status, "rtems_message_queue_create" ); |
55 | |
56 | puts( "Creating Semaphore (Global)" ); |
57 | status = rtems_semaphore_create( |
58 | Semaphore_name[ 1 ], |
59 | 1, |
60 | RTEMS_GLOBAL | RTEMS_PRIORITY, |
61 | RTEMS_NO_PRIORITY, |
62 | &Semaphore_id[ 1 ] |
63 | ); |
64 | directive_failed( status, "rtems_semaphore_create" ); |
65 | |
66 | status = rtems_semaphore_obtain( |
67 | Semaphore_id[ 1 ], |
68 | RTEMS_DEFAULT_OPTIONS, |
69 | RTEMS_NO_TIMEOUT |
70 | ); |
71 | directive_failed( status, "rtems_semaphore_obtain" ); |
72 | } |
73 | |
74 | puts( "Creating Test_task 1 (local)" ); |
75 | status = rtems_task_create( |
76 | Task_name[ 1 ], |
77 | 1, |
78 | RTEMS_MINIMUM_STACK_SIZE, |
79 | RTEMS_TIMESLICE, |
80 | RTEMS_DEFAULT_ATTRIBUTES, |
81 | &Task_id[ 1 ] |
82 | ); |
83 | directive_failed( status, "rtems_task_create" ); |
84 | |
85 | puts( "Starting Test_task 1 (local)" ); |
86 | status = rtems_task_start( Task_id[ 1 ], Test_task1, 0 ); |
87 | directive_failed( status, "rtems_task_start" ); |
88 | |
89 | puts( "Creating Test_task 2 (local)" ); |
90 | status = rtems_task_create( |
91 | Task_name[ 2 ], |
92 | 1, |
93 | RTEMS_MINIMUM_STACK_SIZE, |
94 | RTEMS_TIMESLICE, |
95 | RTEMS_DEFAULT_ATTRIBUTES, |
96 | &Task_id[ 2 ] |
97 | ); |
98 | directive_failed( status, "rtems_task_create" ); |
99 | |
100 | puts( "Starting Test_task 2 (local)" ); |
101 | status = rtems_task_start( Task_id[ 2 ], Test_task2, 0 ); |
102 | directive_failed( status, "rtems_task_start" ); |
103 | |
104 | if ( Multiprocessing_configuration.node == 1 ) { |
105 | status = rtems_task_wake_after( 5 * TICKS_PER_SECOND ); |
106 | directive_failed( status, "rtems_task_wake_after" ); |
107 | |
108 | puts( "*** END OF TEST 13 ***" ); |
109 | rtems_test_exit( 0 ); |
110 | } |
111 | puts( "Deleting initialization task" ); |
112 | status = rtems_task_delete( RTEMS_SELF ); |
113 | directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); |
114 | } |
Note: See TracBrowser
for help on using the repository browser.