source: rtems/testsuites/sptests/sp02/task1.c @ 65450c14

4.104.114.95
Last change on this file since 65450c14 was c87608f, checked in by Ralf Corsepius <ralf.corsepius@…>, on 03/30/04 at 11:15:35

2004-03-30 Ralf Corsepius <ralf_corsepius@…>

  • sp02/task1.c, sp04/system.h, sp04/task1.c, sp04/tswitch.c, sp05/task1.c, sp06/task1.c, sp09/screen01.c, sp09/screen07.c, sp09/screen12.c, sp09/system.h, sp09/task3.c, sp11/task1.c, sp12/pridrv.c, sp12/pritask.c, sp12/system.h, sp13/task1.c, sp13/task2.c, sp13/task3.c, sp14/system.h, sp15/system.h, sp16/system.h, sp17/system.h, sp19/first.c, sp19/fptask.c, sp19/inttest.h, sp19/system.h, sp19/task1.c, sp20/init.c, sp20/system.h, sp20/task1.c, sp23/system.h, sp24/init.c, sp25/system.h, sp30/init.c, spfatal/fatal.c, spfatal/puterr.c, spfatal/system.h, spsize/size.c: Convert to using c99 fixed size types.
  • Property mode set to 100644
File size: 2.1 KB
Line 
1/*  Task_1
2 *
3 *  This routine serves as a test task.  It verifies the task manager.
4 *
5 *  Input parameters:
6 *    argument - task argument
7 *
8 *  Output parameters:  NONE
9 *
10 *  COPYRIGHT (c) 1989-1999.
11 *  On-Line Applications Research Corporation (OAR).
12 *
13 *  The license and distribution terms for this file may be
14 *  found in the file LICENSE in this distribution or at
15 *  http://www.rtems.com/license/LICENSE.
16 *
17 *  $Id$
18 */
19
20#include "system.h"
21
22rtems_task Task_1(
23  rtems_task_argument argument
24)
25{
26  rtems_id          tid2;
27  rtems_id          tid3;
28  rtems_status_code status;
29  rtems_name        tid2_name;
30  uint32_t    previous_priority;
31
32  puts( "TA1 - rtems_task_wake_after - sleep 1 second" );
33  status = rtems_task_wake_after( 1*TICKS_PER_SECOND );
34  directive_failed( status, "rtems_task_wake_after" );
35
36  status = rtems_task_ident( Task_name[ 2 ], RTEMS_SEARCH_ALL_NODES, &tid2 );
37  directive_failed( status, "rtems_task_ident of TA2" );
38
39  printf( "TA1 - rtems_task_ident - tid of TA2 (0x%.8x)\n", tid2 );
40
41  status = rtems_object_id_to_name( tid2, &tid2_name );
42  directive_failed( status, "rtems_object_id_to_name of TA2" );
43
44  printf( "TA1 - rtems_id_to_name - id -> name of TA2 %sOK\n",
45    (tid2_name != Task_name[2]) ? "NOT " : "" );
46
47  status = rtems_task_ident( Task_name[ 3 ], RTEMS_SEARCH_ALL_NODES, &tid3 );
48  directive_failed( status, "rtems_task_ident of TA3" );
49
50  printf( "TA1 - rtems_task_ident - tid of TA3 (0x%.8x)\n", tid3 );
51
52  status = rtems_task_set_priority( tid3, 2, &previous_priority );
53  directive_failed( status, "rtems_task_set_priority" );
54
55  puts( "TA1 - rtems_task_set_priority - set TA3's priority to 2" );
56
57
58  puts( "TA1 - rtems_task_suspend - suspend TA2" );
59  status = rtems_task_suspend( tid2 );
60  directive_failed( status, "rtems_task_suspend of TA2" );
61
62  puts( "TA1 - rtems_task_delete - delete TA2" );
63  status = rtems_task_delete( tid2 );
64  directive_failed( status, "rtems_task_delete of TA2" );
65
66  puts( "TA1 - rtems_task_wake_after - sleep for 5 seconds" );
67  status = rtems_task_wake_after( 5*TICKS_PER_SECOND );
68  directive_failed( status, "rtems_task_wake_after" );
69
70  puts( "*** END OF TEST 2 ***" );
71  rtems_test_exit( 0 );
72}
Note: See TracBrowser for help on using the repository browser.