source: rtems/testsuites/sptests/sp04/init.c @ d5ae827

4.104.115
Last change on this file since d5ae827 was 2186ba80, checked in by Joel Sherrill <joel.sherrill@…>, on 02/01/08 at 00:45:11

2008-01-31 Joel Sherrill <joel.sherrill@…>

  • sp01/init.c, sp02/init.c, sp03/init.c, sp04/init.c, sp05/init.c, sp06/init.c, sp07/init.c, sp08/init.c, sp09/init.c, sp11/init.c, sp12/init.c, sp13/init.c, sp14/init.c, sp15/init.c, sp16/init.c, sp17/init.c, sp19/init.c, sp20/init.c, sp21/init.c, sp22/init.c, sp23/init.c, sp24/init.c, sp25/init.c, sp26/init.c, sp28/init.c, sp30/init.c, sp31/init.c, sp32/init.c, sp33/init.c, sp37/init.c, sp38/init.c, sp39/init.c, sp40/init.c, sp41/init.c, sp43/init.c, spfatal/init.c, spfatal_support/init.c, spsize/init.c: Change TEST_INIT to CONFIGURE_INIT. Make tmacros.h available to all POSIX tests. Add a clock_settime case for < 1988.
  • Property mode set to 100644
File size: 3.1 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 CONFIGURE_INIT
25#include "system.h"
26
27rtems_extensions_table Extensions = {
28  NULL,                      /* task create user extension */
29  NULL,                      /* task start user extension */
30  NULL,                      /* task restart user extension */
31  NULL,                      /* task delete user extension */
32  Task_switch,               /* task switch user extension */
33  NULL,                      /* task begin user extension */
34  NULL,                      /* task exitted user extension */
35  NULL                       /* fatal error user extension */
36};
37
38rtems_task Init(
39  rtems_task_argument argument
40)
41{
42  rtems_status_code status;
43  rtems_time_of_day time;
44
45  puts( "\n\n*** TEST 4 ***" );
46  build_time( &time, 12, 31, 1988, 9, 15, 0, 0 );
47
48  status = rtems_clock_set( &time );
49  directive_failed( status, "rtems_clock_set" );
50
51  Extension_name[ 1 ] =  rtems_build_name( 'E', 'X', 'T', ' ' );
52
53  status = rtems_extension_create(
54    Extension_name[ 1 ],
55    &Extensions,
56    &Extension_id[ 1 ]
57  );
58  directive_failed( status, "rtems_extension_create" );
59
60  Task_name[ 1 ] =  rtems_build_name( 'T', 'A', '1', ' ' );
61  Task_name[ 2 ] =  rtems_build_name( 'T', 'A', '2', ' ' );
62  Task_name[ 3 ] =  rtems_build_name( 'T', 'A', '3', ' ' );
63
64  Run_count[ 1 ] = 0;
65  Run_count[ 2 ] = 0;
66  Run_count[ 3 ] = 0;
67
68  status = rtems_task_create(
69     Task_name[ 1 ],
70     1,
71     RTEMS_MINIMUM_STACK_SIZE * 2,
72     RTEMS_TIMESLICE,
73     RTEMS_DEFAULT_ATTRIBUTES,
74     &Task_id[ 1 ]
75  );
76  directive_failed( status, "rtems_task_create of TA1" );
77
78  status = rtems_task_create(
79     Task_name[ 2 ],
80     1,
81     RTEMS_MINIMUM_STACK_SIZE * 2,
82     RTEMS_TIMESLICE,
83     RTEMS_DEFAULT_ATTRIBUTES,
84     &Task_id[ 2 ]
85  );
86  directive_failed( status, "rtems_task_create of TA2" );
87
88  status = rtems_task_create(
89     Task_name[ 3 ],
90     1,
91     RTEMS_MINIMUM_STACK_SIZE * 2,
92     RTEMS_TIMESLICE,
93     RTEMS_DEFAULT_ATTRIBUTES,
94     &Task_id[ 3 ]
95  );
96  directive_failed( status, "rtems_task_create of TA3" );
97
98  status = rtems_task_start( Task_id[ 1 ], Task_1, 0 );
99  directive_failed( status, "rtems_task_start of TA1" );
100
101  status = rtems_task_start( Task_id[ 2 ], Task_2, 0 );
102  directive_failed( status, "rtems_task_start of TA2" );
103
104  status = rtems_task_start( Task_id[ 3 ], Task_3, 0 );
105  directive_failed( status, "rtems_task_start of TA3" );
106
107  status = rtems_task_delete( RTEMS_SELF );
108  directive_failed( status, "rtems_task_delete of RTEMS_SELF" );
109}
Note: See TracBrowser for help on using the repository browser.