From e0991809991a2c5547d45881978212d5efc0e1de Mon Sep 17 00:00:00 2001 From: Joel Sherrill Date: Tue, 9 Nov 1999 23:27:05 +0000 Subject: Merged tests from Task group. --- c/src/tests/itrontests/itrontask01/task1.c | 55 ++++++++++++++++++++++++++++++ 1 file changed, 55 insertions(+) create mode 100644 c/src/tests/itrontests/itrontask01/task1.c (limited to 'c/src/tests/itrontests/itrontask01/task1.c') diff --git a/c/src/tests/itrontests/itrontask01/task1.c b/c/src/tests/itrontests/itrontask01/task1.c new file mode 100644 index 0000000000..2df961c35c --- /dev/null +++ b/c/src/tests/itrontests/itrontask01/task1.c @@ -0,0 +1,55 @@ +/* Task_1_through_3 + * + * This routine serves as a test task. It verifies the basic task + * switching capabilities of the executive. + * + * Input parameters: + * argument - task argument + * + * Output parameters: NONE + * + * COPYRIGHT (c) 1989-1998. + * On-Line Applications Research Corporation (OAR). + * Copyright assigned to U.S. Government, 1994. + * + * The license and distribution terms for this file may be + * found in the file LICENSE in this distribution or at + * http://www.OARcorp.com/rtems/license.html. + * + * $Id$ + */ + +#include "system.h" + +void Task_2_through_4() +{ + ID tid; + int tid_index; + rtems_time_of_day time; + ER status; + char name[30]; + + status = get_tid( &tid ); + directive_failed( status, "get_tid"); + + tid_index = tid - 1; /* account for init tasks */ + + sprintf(name, "TA%d", tid_index); + + while( FOREVER ) { + status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); + directive_failed( status, "rtems_clock_get" ); + + if ( time.second >= 35 ) { + puts( "*** END OF ITRON TEST 3 ***" ); + exit( 0 ); + } + + printf(name); + print_time( " - rtems_clock_get - ", &time, "\n" ); + + status = rtems_task_wake_after( tid_index * 5 * TICKS_PER_SECOND ); + directive_failed( status, "rtems_task_wake_after" ); + } +} + -- cgit v1.2.3