URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [rtos/] [rtems/] [c/] [src/] [tests/] [tmtests/] [tm26/] [task1.c] - Rev 173
Compare with Previous | Blame | View Log
/* * * COPYRIGHT (c) 1989-1999. * On-Line Applications Research Corporation (OAR). * * 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: task1.c,v 1.2 2001-09-27 12:02:44 chris Exp $ */ #define TEST_INIT #define __RTEMS_VIOLATE_KERNEL_VISIBILITY__ #include <rtems.h> #include "system.h" #include "fptest.h" #include <coverhd.h> #include <tmacros.h> #include <timesys.h> /* TEST DATA */ rtems_id Semaphore_id; Objects_Locations location; /* uses internal RTEMS type */ Thread_Control *Middle_tcb; /* uses internal RTEMS type */ Thread_Control *Low_tcb; /* uses internal RTEMS type */ /* * Variables to hold execution times until they are printed * at the end of the test. */ rtems_unsigned32 isr_disable_time; rtems_unsigned32 isr_flash_time; rtems_unsigned32 isr_enable_time; rtems_unsigned32 thread_disable_dispatch_time; rtems_unsigned32 thread_enable_dispatch_time; rtems_unsigned32 thread_set_state_time; rtems_unsigned32 thread_dispatch_no_fp_time; rtems_unsigned32 context_switch_no_fp_time; rtems_unsigned32 context_switch_self_time; rtems_unsigned32 context_switch_another_task_time; rtems_unsigned32 context_switch_restore_1st_fp_time; rtems_unsigned32 context_switch_save_idle_restore_initted_time; rtems_unsigned32 context_switch_save_restore_idle_time; rtems_unsigned32 context_switch_save_restore_initted_time; rtems_unsigned32 thread_resume_time; rtems_unsigned32 thread_unblock_time; rtems_unsigned32 thread_ready_time; rtems_unsigned32 thread_get_time; rtems_unsigned32 semaphore_get_time; rtems_unsigned32 thread_get_invalid_time; rtems_task High_task( rtems_task_argument argument ); rtems_task Middle_task( rtems_task_argument argument ); rtems_task Low_task( rtems_task_argument argument ); rtems_task Floating_point_task_1( rtems_task_argument argument ); rtems_task Floating_point_task_2( rtems_task_argument argument ); void complete_test( void ); rtems_task null_task( rtems_task_argument argument ) { } rtems_task Init( rtems_task_argument argument ) { rtems_unsigned32 index; rtems_id task_id; rtems_status_code status; Print_Warning(); puts( "\n\n*** TIME TEST 26 ***" ); status = rtems_task_create( rtems_build_name( 'F', 'P', '1', ' ' ), 201, RTEMS_MINIMUM_STACK_SIZE, RTEMS_DEFAULT_MODES, RTEMS_FLOATING_POINT, &task_id ); directive_failed( status, "rtems_task_create of FP1" ); status = rtems_task_start( task_id, Floating_point_task_1, 0 ); directive_failed( status, "rtems_task_start of FP1" ); status = rtems_task_create( rtems_build_name( 'F', 'P', '2', ' ' ), 202, RTEMS_MINIMUM_STACK_SIZE, RTEMS_DEFAULT_MODES, RTEMS_FLOATING_POINT, &task_id ); directive_failed( status, "rtems_task_create of FP2" ); status = rtems_task_start( task_id, Floating_point_task_2, 0 ); directive_failed( status, "rtems_task_start of FP2" ); status = rtems_task_create( rtems_build_name( 'L', 'O', 'W', ' ' ), 200, RTEMS_MINIMUM_STACK_SIZE, RTEMS_DEFAULT_MODES, RTEMS_DEFAULT_ATTRIBUTES, &task_id ); directive_failed( status, "rtems_task_create of LOW" ); status = rtems_task_start( task_id, Low_task, 0 ); directive_failed( status, "rtems_task_start of LOW" ); status = rtems_task_create( rtems_build_name( 'M', 'I', 'D', ' ' ), 128, RTEMS_MINIMUM_STACK_SIZE, RTEMS_DEFAULT_MODES, RTEMS_DEFAULT_ATTRIBUTES, &task_id ); directive_failed( status, "rtems_task_create of MIDDLE" ); status = rtems_task_start( task_id, Middle_task, 0 ); directive_failed( status, "rtems_task_start of MIDDLE" ); status = rtems_task_create( rtems_build_name( 'H', 'I', 'G', 'H' ), 5, RTEMS_MINIMUM_STACK_SIZE, RTEMS_DEFAULT_MODES, RTEMS_DEFAULT_ATTRIBUTES, &task_id ); directive_failed( status, "rtems_task_create of HIGH" ); status = rtems_task_start( task_id, High_task, 0 ); directive_failed( status, "rtems_task_start of HIGH" ); status = rtems_semaphore_create( rtems_build_name( 'S', 'E', 'M', '1' ), OPERATION_COUNT, RTEMS_DEFAULT_ATTRIBUTES, RTEMS_NO_PRIORITY, &Semaphore_id ); directive_failed( status, "rtems_semaphore_create" ); for ( index = 1 ; index <= OPERATION_COUNT ; index++ ) { status = rtems_task_create( rtems_build_name( 'N', 'U', 'L', 'L' ), 254, RTEMS_MINIMUM_STACK_SIZE, RTEMS_DEFAULT_MODES, RTEMS_DEFAULT_ATTRIBUTES, &task_id ); directive_failed( status, "rtems_task_create LOOP" ); status = rtems_task_start( task_id, null_task, 0 ); directive_failed( status, "rtems_task_start LOOP" ); } status = rtems_task_delete( RTEMS_SELF ); directive_failed( status, "rtems_task_delete of RTEMS_SELF" ); } rtems_task High_task( rtems_task_argument argument ) { rtems_interrupt_level level; Timer_initialize(); rtems_interrupt_disable( level ); isr_disable_time = Read_timer(); Timer_initialize(); rtems_interrupt_flash( level ); isr_flash_time = Read_timer(); Timer_initialize(); rtems_interrupt_enable( level ); isr_enable_time = Read_timer(); Timer_initialize(); _Thread_Disable_dispatch(); thread_disable_dispatch_time = Read_timer(); Timer_initialize(); _Thread_Enable_dispatch(); thread_enable_dispatch_time = Read_timer(); Timer_initialize(); _Thread_Set_state( _Thread_Executing, STATES_SUSPENDED ); thread_set_state_time = Read_timer(); _Context_Switch_necessary = TRUE; Timer_initialize(); _Thread_Dispatch(); /* dispatches Middle_task */ } rtems_task Middle_task( rtems_task_argument argument ) { thread_dispatch_no_fp_time = Read_timer(); _Thread_Set_state( _Thread_Executing, STATES_SUSPENDED ); Middle_tcb = _Thread_Executing; _Thread_Executing = (Thread_Control *) _Thread_Ready_chain[200].first; /* do not force context switch */ _Context_Switch_necessary = FALSE; _Thread_Disable_dispatch(); Timer_initialize(); _Context_Switch( &Middle_tcb->Registers, &_Thread_Executing->Registers ); Timer_initialize(); _Context_Switch(&Middle_tcb->Registers, &Low_tcb->Registers); } rtems_task Low_task( rtems_task_argument argument ) { Thread_Control *executing; context_switch_no_fp_time = Read_timer(); executing = _Thread_Executing; Low_tcb = executing; Timer_initialize(); _Context_Switch( &executing->Registers, &executing->Registers ); context_switch_self_time = Read_timer(); _Context_Switch(&executing->Registers, &Middle_tcb->Registers); context_switch_another_task_time = Read_timer(); _Thread_Executing = (Thread_Control *) _Thread_Ready_chain[201].first; /* do not force context switch */ _Context_Switch_necessary = FALSE; _Thread_Disable_dispatch(); Timer_initialize(); _Context_Restore_fp( &_Thread_Executing->fp_context ); _Context_Switch( &executing->Registers, &_Thread_Executing->Registers ); } rtems_task Floating_point_task_1( rtems_task_argument argument ) { Thread_Control *executing; FP_DECLARE; context_switch_restore_1st_fp_time = Read_timer(); executing = _Thread_Executing; _Thread_Executing = (Thread_Control *) _Thread_Ready_chain[202].first; /* do not force context switch */ _Context_Switch_necessary = FALSE; _Thread_Disable_dispatch(); Timer_initialize(); _Context_Save_fp( &executing->fp_context ); _Context_Restore_fp( &_Thread_Executing->fp_context ); _Context_Switch( &executing->Registers, &_Thread_Executing->Registers ); /* switch to Floating_point_task_2 */ context_switch_save_idle_restore_initted_time = Read_timer(); FP_LOAD( 1.0 ); executing = _Thread_Executing; _Thread_Executing = (Thread_Control *) _Thread_Ready_chain[202].first; /* do not force context switch */ _Context_Switch_necessary = FALSE; _Thread_Disable_dispatch(); Timer_initialize(); _Context_Save_fp( &executing->fp_context ); _Context_Restore_fp( &_Thread_Executing->fp_context ); _Context_Switch( &executing->Registers, &_Thread_Executing->Registers ); /* switch to Floating_point_task_2 */ } rtems_task Floating_point_task_2( rtems_task_argument argument ) { Thread_Control *executing; FP_DECLARE; context_switch_save_restore_idle_time = Read_timer(); executing = _Thread_Executing; _Thread_Executing = (Thread_Control *) _Thread_Ready_chain[201].first; FP_LOAD( 1.0 ); /* do not force context switch */ _Context_Switch_necessary = FALSE; _Thread_Disable_dispatch(); Timer_initialize(); _Context_Save_fp( &executing->fp_context ); _Context_Restore_fp( &_Thread_Executing->fp_context ); _Context_Switch( &executing->Registers, &_Thread_Executing->Registers ); /* switch to Floating_point_task_1 */ context_switch_save_restore_initted_time = Read_timer(); complete_test(); } void complete_test( void ) { rtems_unsigned32 index; rtems_id task_id; Timer_initialize(); _Thread_Resume( Middle_tcb, TRUE ); thread_resume_time = Read_timer(); _Thread_Set_state( Middle_tcb, STATES_WAITING_FOR_MESSAGE ); Timer_initialize(); _Thread_Unblock( Middle_tcb ); thread_unblock_time = Read_timer(); _Thread_Set_state( Middle_tcb, STATES_WAITING_FOR_MESSAGE ); Timer_initialize(); _Thread_Ready( Middle_tcb ); thread_ready_time = Read_timer(); Timer_initialize(); for ( index=1 ; index <= OPERATION_COUNT ; index++ ) (void) Empty_function(); overhead = Read_timer(); task_id = Middle_tcb->Object.id; Timer_initialize(); for ( index=1 ; index <= OPERATION_COUNT ; index++ ) (void) _Thread_Get( task_id, &location ); thread_get_time = Read_timer(); Timer_initialize(); for ( index=1 ; index <= OPERATION_COUNT ; index++ ) (void) _Semaphore_Get( Semaphore_id, &location ); semaphore_get_time = Read_timer(); Timer_initialize(); for ( index=1 ; index <= OPERATION_COUNT ; index++ ) (void) _Thread_Get( 0x3, &location ); thread_get_invalid_time = Read_timer(); /* * Now dump all the times */ put_time( "_ISR_Disable", isr_disable_time, 1, 0, 0 ); put_time( "_ISR_Flash", isr_flash_time, 1, 0, 0 ); put_time( "_ISR_Enable", isr_enable_time, 1, 0, 0 ); put_time( "_Thread_Disable_dispatch", thread_disable_dispatch_time, 1, 0, 0 ); put_time( "_Thread_Enable_dispatch", thread_enable_dispatch_time, 1, 0, 0 ); put_time( "_Thread_Set_state", thread_set_state_time, 1, 0, 0 ); put_time( "_Thread_Disptach (NO FP)", thread_dispatch_no_fp_time, 1, 0, 0 ); put_time( "context switch: no floating point contexts", context_switch_no_fp_time, 1, 0, 0 ); put_time( "context switch: self", context_switch_self_time, 1, 0, 0 ); put_time( "context switch: to another task", context_switch_another_task_time, 1, 0, 0 ); put_time( "fp context switch: restore 1st FP task", context_switch_restore_1st_fp_time, 1, 0, 0 ); put_time( "fp context switch: save idle, restore initialized", context_switch_save_idle_restore_initted_time, 1, 0, 0 ); put_time( "fp context switch: save idle, restore idle", context_switch_save_restore_idle_time, 1, 0, 0 ); put_time( "fp context switch: save initialized, restore initialized", context_switch_save_restore_initted_time, 1, 0, 0 ); put_time( "_Thread_Resume", thread_resume_time, 1, 0, 0 ); put_time( "_Thread_Unblock", thread_unblock_time, 1, 0, 0 ); put_time( "_Thread_Ready", thread_ready_time, 1, 0, 0 ); put_time( "_Thread_Get", thread_get_time, OPERATION_COUNT, 0, 0 ); put_time( "_Semaphore_Get", semaphore_get_time, OPERATION_COUNT, 0, 0 ); put_time( "_Thread_Get: invalid id", thread_get_invalid_time, OPERATION_COUNT, 0, 0 ); puts( "*** END OF TEST 26 ***" ); exit( 0 ); }