diff options
author | Joel Sherrill <joel.sherrill@OARcorp.com> | 1995-05-11 17:39:37 +0000 |
---|---|---|
committer | Joel Sherrill <joel.sherrill@OARcorp.com> | 1995-05-11 17:39:37 +0000 |
commit | ac7d5ef06a6d6e8d84abbd1f0b82162725f98326 (patch) | |
tree | 9304cf759a73f2a1c6fd3191948f00e870af3787 /testsuites/tmtests/tm29/task1.c |
Initial revision
Diffstat (limited to 'testsuites/tmtests/tm29/task1.c')
-rw-r--r-- | testsuites/tmtests/tm29/task1.c | 207 |
1 files changed, 207 insertions, 0 deletions
diff --git a/testsuites/tmtests/tm29/task1.c b/testsuites/tmtests/tm29/task1.c new file mode 100644 index 0000000000..a38e9567c8 --- /dev/null +++ b/testsuites/tmtests/tm29/task1.c @@ -0,0 +1,207 @@ +/* + * + * 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" +#undef EXTERN +#define EXTERN +#include "conftbl.h" +#include "gvar.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; + + 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 (initial)", + 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 (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 (cancelled)", + 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, + 1024, + 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, + 2048, + 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 (blocking)", + end_time, + OPERATION_COUNT, + overhead, + CALLING_OVERHEAD_RATE_MONOTONIC_PERIOD + ); + + exit( 0 ); +} |