forked from Imagelibrary/rtems
9e15e9bfba
* sp04/tswitch.c, sp07/task1.c, sp07/task2.c, sp09/screen07.c, sp11/task1.c, sp11/task2.c, sp12/pridrv.c, sp12/pritask.c, sp13/task1.c, sp14/asr.c, sp14/task1.c, sp19/first.c, sp19/fptask.c, sp19/inttest.h, sp19/task1.c, sp20/task1.c, sp25/task1.c, sp26/task1.c, sp28/init.c, sp29/init.c, sp31/task1.c, sp32/init.c, sp33/init.c, sp34/changepri.c, sp36/strict_order_mut.c, sp37/init.c, sp43/init.c, sp44/init.c, sp48/init.c, sp54/init.c, sp59/init.c, sp65/init.c, sp68/init.c, spchain/init.c, spclockget/init.c, spfatal03/testcase.h, spfatal07/testcase.h, spfatal_support/init.c: Do not line length exceed 80 columns.
127 lines
3.6 KiB
C
127 lines
3.6 KiB
C
/*
|
|
* COPYRIGHT (c) 1989-2011.
|
|
* 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.rtems.com/license/LICENSE.
|
|
*
|
|
* $Id$
|
|
*/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include "system.h"
|
|
|
|
void Priority_test_driver(
|
|
rtems_task_priority priority_base
|
|
)
|
|
{
|
|
rtems_task_priority previous_priority;
|
|
uint32_t index;
|
|
rtems_status_code status;
|
|
|
|
for ( index = 1 ; index <= 5 ; index++ ) {
|
|
switch ( index ) {
|
|
case 1:
|
|
case 2:
|
|
case 3:
|
|
Task_priority[ index ] = priority_base + index;
|
|
break;
|
|
default:
|
|
Task_priority[ index ] = priority_base + 3;
|
|
break;
|
|
}
|
|
|
|
status = rtems_task_create(
|
|
Priority_task_name[ index ],
|
|
Task_priority[ index ],
|
|
RTEMS_MINIMUM_STACK_SIZE * 2,
|
|
RTEMS_DEFAULT_MODES,
|
|
RTEMS_DEFAULT_ATTRIBUTES,
|
|
&Priority_task_id[ index ]
|
|
);
|
|
directive_failed( status, "rtems_task_create loop" );
|
|
|
|
}
|
|
|
|
if ( priority_base == 0 ) {
|
|
for ( index = 1 ; index <= 5 ; index++ ) {
|
|
status = rtems_task_start(
|
|
Priority_task_id[ index ],
|
|
Priority_task,
|
|
index
|
|
);
|
|
directive_failed( status, "rtems_task_start loop" );
|
|
}
|
|
} else {
|
|
for ( index = 5 ; index >= 1 ; index-- ) {
|
|
status = rtems_task_start(
|
|
Priority_task_id[ index ],
|
|
Priority_task,
|
|
index
|
|
);
|
|
directive_failed( status, "rtems_task_start loop" );
|
|
|
|
status = rtems_task_wake_after( rtems_clock_get_ticks_per_second() );
|
|
directive_failed( status, "rtems_task_wake_after loop" );
|
|
|
|
if ( priority_base == PRIORITY_INHERIT_BASE_PRIORITY ) {
|
|
if ( index == 4 ) {
|
|
status = rtems_task_set_priority(
|
|
Priority_task_id[ 5 ],
|
|
priority_base + 4,
|
|
&previous_priority
|
|
);
|
|
printf(
|
|
"PDRV - change priority of PRI5 from %" PRIdrtems_task_priority
|
|
" to %" PRIdrtems_task_priority "\n",
|
|
previous_priority,
|
|
priority_base + 4
|
|
);
|
|
directive_failed( status, "PDRV rtems_task_set_priority" );
|
|
}
|
|
status = rtems_task_set_priority(
|
|
Priority_task_id[ 5 ],
|
|
RTEMS_CURRENT_PRIORITY,
|
|
&previous_priority
|
|
);
|
|
directive_failed( status, "PDRV rtems_task_set_priority CURRENT" );
|
|
printf(
|
|
"PDRV - priority of PRI5 is %" PRIdrtems_task_priority "\n",
|
|
previous_priority
|
|
);
|
|
}
|
|
}
|
|
}
|
|
|
|
status = rtems_task_wake_after( rtems_clock_get_ticks_per_second() );
|
|
directive_failed( status, "rtems_task_wake_after after loop" );
|
|
|
|
if ( priority_base == 0 ) {
|
|
for ( index = 1 ; index <= 5 ; index++ ) {
|
|
status = rtems_semaphore_release( Semaphore_id[ 2 ] );
|
|
directive_failed( status, "rtems_semaphore_release loop" );
|
|
}
|
|
}
|
|
|
|
if ( priority_base == PRIORITY_INHERIT_BASE_PRIORITY ) {
|
|
puts( "PDRV - rtems_task_resume - PRI5" );
|
|
status = rtems_task_resume( Priority_task_id[ 5 ] );
|
|
directive_failed( status, "rtems_task_resume" );
|
|
|
|
status = rtems_task_wake_after( rtems_clock_get_ticks_per_second() );
|
|
directive_failed( status, "rtems_task_wake_after so PRI5 can run" );
|
|
|
|
status = rtems_task_delete( Priority_task_id[ 5 ] );
|
|
directive_failed( status, "rtems_task_delete of PRI5" );
|
|
} else {
|
|
for ( index = 1 ; index <= 5 ; index++ ) {
|
|
status = rtems_task_delete( Priority_task_id[ index ] );
|
|
directive_failed( status, "rtems_task_delete loop" );
|
|
}
|
|
}
|
|
}
|