URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [rtos/] [rtems/] [c/] [src/] [tests/] [sptests/] [sp12/] [pridrv.c] - Rev 232
Go to most recent revision | Compare with Previous | Blame | View Log
/* Priority_test_driver * * This routine is the initialization task for this test program. * It is a user initialization task and has the responsibility for creating * and starting the tasks that make up the test. If the time of day * clock is required for the test, it should also be set to a known * value by this function. * * Input parameters: * priority_base - priority_base switch * * Output parameters: NONE * * 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: pridrv.c,v 1.2 2001-09-27 12:02:32 chris Exp $ */ #include "system.h" void Priority_test_driver( rtems_unsigned32 priority_base ) { rtems_task_priority previous_priority; rtems_unsigned32 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( TICKS_PER_SECOND ); directive_failed( status, "rtems_task_wake_after loop" ); if ( priority_base == 64 ) { if ( index == 4 ) { status = rtems_task_set_priority( Priority_task_id[ 5 ], priority_base + 4, &previous_priority ); printf( "PDRV - change priority of PRI5 from %d to %d\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 %d\n", previous_priority ); } } } status = rtems_task_wake_after( 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 == 64 ) { 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( 1 * 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" ); } } }
Go to most recent revision | Compare with Previous | Blame | View Log