mirror of
https://gitlab.rtems.org/rtems/rtos/rtems.git
synced 2025-12-11 01:53:13 +00:00
ca7858bb88
a BSP (c4xsim) supporting the simulator included with gdb. This port was done by Joel Sherrill and Jennifer Averett of OAR Corporation. Also included with this port is a space/time optimization to eliminate FP context switch management on CPUs without hardware or software FP. An issue with this port was that sizeof(unsigned32) = sizeof(unsigned8) on this CPU. This required addressing alignment checks and assumptions as well as fixing code that assumed sizeof(unsigned32) == 4.
595 lines
13 KiB
C
595 lines
13 KiB
C
/*
|
|
*
|
|
* 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$
|
|
*/
|
|
|
|
#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();
|
|
#if (CPU_HARDWARE_FP == 1) || (CPU_SOFTWARE_FP == 1)
|
|
_Context_Restore_fp( &_Thread_Executing->fp_context );
|
|
#endif
|
|
_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();
|
|
#if (CPU_HARDWARE_FP == 1) || (CPU_SOFTWARE_FP == 1)
|
|
_Context_Save_fp( &executing->fp_context );
|
|
_Context_Restore_fp( &_Thread_Executing->fp_context );
|
|
#endif
|
|
_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();
|
|
#if (CPU_HARDWARE_FP == 1) || (CPU_SOFTWARE_FP == 1)
|
|
_Context_Save_fp( &executing->fp_context );
|
|
_Context_Restore_fp( &_Thread_Executing->fp_context );
|
|
#endif
|
|
_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();
|
|
#if (CPU_HARDWARE_FP == 1) || (CPU_SOFTWARE_FP == 1)
|
|
_Context_Save_fp( &executing->fp_context );
|
|
_Context_Restore_fp( &_Thread_Executing->fp_context );
|
|
#endif
|
|
_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
|
|
);
|
|
|
|
#if (CPU_HARDWARE_FP == 1) || (CPU_SOFTWARE_FP == 1)
|
|
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
|
|
);
|
|
#else
|
|
puts( "fp context switch: restore 1st FP task - NA" );
|
|
puts( "fp context switch: save idle, restore initialized - NA" );
|
|
puts( "fp context switch: save idle, restore idle - NA" );
|
|
puts( "fp context switch: save initialized, restore initialized - NA" );
|
|
#endif
|
|
|
|
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 );
|
|
}
|
|
|