diff options
Diffstat (limited to 'testsuites/sptests/sp03/task1.c')
-rw-r--r-- | testsuites/sptests/sp03/task1.c | 59 |
1 files changed, 59 insertions, 0 deletions
diff --git a/testsuites/sptests/sp03/task1.c b/testsuites/sptests/sp03/task1.c new file mode 100644 index 0000000000..e59fad45cf --- /dev/null +++ b/testsuites/sptests/sp03/task1.c @@ -0,0 +1,59 @@ +/* Task_1 + * + * This routine serves as a test task. It verifies the capability to + * set and read the executives calender and clock. + * + * Input parameters: + * argument - task argument + * + * Output parameters: NONE + * + * COPYRIGHT (c) 1989, 1990, 1991, 1992, 1993, 1994. + * On-Line Applications Research Corporation (OAR). + * All rights assigned to U.S. Government, 1994. + * + * This material may be reproduced by or for the U.S. Government pursuant + * to the copyright license under the clause at DFARS 252.227-7013. This + * notice must appear in all copies of this file and its derivatives. + * + * $Id$ + */ + +#include "system.h" + +rtems_task Task_1( + rtems_task_argument argument +) +{ + rtems_status_code status; + rtems_time_of_day time; + + build_time( &time, 12, 31, 1988, 9, 15, 0, 0 ); + + status = rtems_clock_set( &time ); + directive_failed( status, "rtems_clock_set" ); + + put_name( Task_name[ 1 ], FALSE ); + print_time( " sets clock: ", &time, "\n" ); + + while( FOREVER ) { + status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time ); + directive_failed( status, "rtems_clock_get" ); + + put_name( Task_name[ 1 ], FALSE ); + print_time( " going to sleep: ", &time, "\n" ); + + time.second += 5; + time.minute += ( time.second / 60 ); + time.second %= 60; + time.hour += ( time.minute / 60 ); + time.minute %= 60; + time.hour %= 24; + + status = rtems_task_wake_when( &time ); + directive_failed( status, "rtems_task_wake_when" ); + + put_name( Task_name[ 1 ], FALSE ); + print_time( " awakened: ", &time, "\n" ); + } +} |