source: rtems/testsuites/libtests/stackchk/task1.c @ ac7d5ef0

4.104.114.84.95
Last change on this file since ac7d5ef0 was ac7d5ef0, checked in by Joel Sherrill <joel.sherrill@…>, on May 11, 1995 at 5:39:37 PM

Initial revision

  • Property mode set to 100644
File size: 1.3 KB
Line 
1/*  task1.c
2 *
3 *  This set of three tasks do some simple task switching for about
4 *  15 seconds and then call a routine to "blow the stack".
5 *
6 *  COPYRIGHT (c) 1989, 1990, 1991, 1992, 1993, 1994.
7 *  On-Line Applications Research Corporation (OAR).
8 *  All rights assigned to U.S. Government, 1994.
9 *
10 *  This material may be reproduced by or for the U.S. Government pursuant
11 *  to the copyright license under the clause at DFARS 252.227-7013.  This
12 *  notice must appear in all copies of this file and its derivatives.
13 *
14 *  $Id$
15 */
16
17#include "app.h"
18
19rtems_task Task_1_through_3(
20  rtems_task_argument argument
21)
22{
23  rtems_id          tid;
24  rtems_time_of_day time;
25  rtems_status_code status;
26
27  status = rtems_task_ident( RTEMS_SELF, RTEMS_SEARCH_ALL_NODES, &tid );
28  directive_failed( status, "rtems_task_ident" );
29
30  while( FOREVER ) {
31    status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time );
32    directive_failed( status, "rtems_clock_get" );
33
34    if ( time.second >= 15 && tid == Task_id[ 1 ] ) {
35       blow_stack();
36    }
37
38    put_name( Task_name[ task_number( tid ) ], FALSE );
39    print_time( " - rtems_clock_get - ", &time, "\n" );
40
41    status = rtems_task_wake_after( task_number( tid ) * 5 * TICKS_PER_SECOND );
42    directive_failed( status, "rtems_task_wake_after" );
43  }
44}
Note: See TracBrowser for help on using the repository browser.