diff options
Diffstat (limited to 'testsuites/tmtests/tm29/task1.c')
-rw-r--r-- | testsuites/tmtests/tm29/task1.c | 207 |
1 files changed, 0 insertions, 207 deletions
diff --git a/testsuites/tmtests/tm29/task1.c b/testsuites/tmtests/tm29/task1.c deleted file mode 100644 index 9600942b6d..0000000000 --- a/testsuites/tmtests/tm29/task1.c +++ /dev/null @@ -1,207 +0,0 @@ -/* - * - * 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$ - */ - -#define TEST_INIT -#include "system.h" - -rtems_name Period_name; - -rtems_task Tasks( - rtems_task_argument argument -); - -rtems_task Low_task( - rtems_task_argument argument -); - -rtems_unsigned32 Task_count; - -rtems_task Init( - rtems_task_argument argument -) -{ - rtems_id id; - rtems_unsigned32 index; - rtems_status_code status; - - Print_Warning(); - - puts( "\n\n*** TIME TEST 29 ***" ); - - Period_name = rtems_build_name( 'P', 'R', 'D', ' ' ); - - Timer_initialize(); - (void) rtems_rate_monotonic_create( Period_name, &id ); - end_time = Read_timer(); - - put_time( - "rtems_rate_monotonic_create", - end_time, - 1, - 0, - CALLING_OVERHEAD_RATE_MONOTONIC_CREATE - ); - - Timer_initialize(); - (void) rtems_rate_monotonic_period( id, 10 ); - end_time = Read_timer(); - - put_time( - "rtems_rate_monotonic_period: initiate period -- returns to caller", - end_time, - 1, - 0, - CALLING_OVERHEAD_RATE_MONOTONIC_PERIOD - ); - - Timer_initialize(); - (void) rtems_rate_monotonic_period( id, RTEMS_PERIOD_STATUS ); - end_time = Read_timer(); - - put_time( - "rtems_rate_monotonic_period: obtain status", - end_time, - 1, - 0, - CALLING_OVERHEAD_RATE_MONOTONIC_PERIOD - ); - - Timer_initialize(); - (void) rtems_rate_monotonic_cancel( id ); - end_time = Read_timer(); - - put_time( - "rtems_rate_monotonic_cancel", - end_time, - 1, - 0, - CALLING_OVERHEAD_RATE_MONOTONIC_CANCEL - ); - - Timer_initialize(); - (void) rtems_rate_monotonic_delete( id ); - end_time = Read_timer(); - - put_time( - "rtems_rate_monotonic_delete: inactive", - end_time, - 1, - 0, - CALLING_OVERHEAD_RATE_MONOTONIC_DELETE - ); - - status = rtems_rate_monotonic_create( Period_name, &id ); - directive_failed( status, "rtems_rate_monotonic_create" ); - - status = rtems_rate_monotonic_period( id, 10 ); - directive_failed( status, "rtems_rate_monotonic_period" ); - - Timer_initialize(); - rtems_rate_monotonic_delete( id ); - end_time = Read_timer(); - - put_time( - "rtems_rate_monotonic_delete: active", - end_time, - 1, - 0, - CALLING_OVERHEAD_RATE_MONOTONIC_DELETE - ); - - for ( index=1 ; index <= OPERATION_COUNT ; index++ ) { - status = rtems_task_create( - rtems_build_name( 'T', 'E', 'S', 'T' ), - 128, - RTEMS_MINIMUM_STACK_SIZE, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &id - ); - directive_failed( status, "rtems_task_create LOOP" ); - - status = rtems_task_start( id, Tasks, 0 ); - directive_failed( status, "rtems_task_start LOOP" ); - } - - status = rtems_task_create( - rtems_build_name( 'L', 'O', 'W', ' ' ), - 200, - RTEMS_MINIMUM_STACK_SIZE, - RTEMS_DEFAULT_MODES, - RTEMS_DEFAULT_ATTRIBUTES, - &id - ); - directive_failed( status, "rtems_task_create LOW" ); - - status = rtems_task_start( id, Low_task, 0 ); - directive_failed( status, "rtems_task_start LOW" ); - - Task_count = 0; - - status = rtems_task_delete( RTEMS_SELF ); - directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); -} - -rtems_task Tasks( - rtems_task_argument argument -) -{ - rtems_id id; - rtems_status_code status; - - status = rtems_rate_monotonic_create( 1, &id ); - directive_failed( status, "rtems_rate_monotonic_create" ); - - status = rtems_rate_monotonic_period( id, 100 ); - directive_failed( status, "rtems_rate_monotonic_period" ); - - /* - * Give up the processor to allow all tasks to actually - * create and start their period timer before the benchmark - * timer is initialized. - */ - - (void) rtems_task_wake_after( RTEMS_YIELD_PROCESSOR ); - - Task_count++; - - if ( Task_count == 1 ) - Timer_initialize(); - - (void) rtems_rate_monotonic_period( id, 100 ); -} - -rtems_task Low_task( - rtems_task_argument argument -) -{ - rtems_unsigned32 index; - - end_time = Read_timer(); - - Timer_initialize(); - for ( index=1 ; index <= OPERATION_COUNT ; index++ ) - (void) Empty_function(); - overhead = Read_timer(); - - put_time( - "rtems_rate_monotonic_period: conclude periods -- caller blocks", - end_time, - OPERATION_COUNT, - overhead, - CALLING_OVERHEAD_RATE_MONOTONIC_PERIOD - ); - - puts( "*** END OF TEST 29 ***" ); - exit( 0 ); -} |