URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [rtos/] [rtems/] [c/] [src/] [tests/] [mptests/] [mp13/] [task2.c] - Rev 593
Go to most recent revision | Compare with Previous | Blame | View Log
/* Test_task2 * * This task attempts to receive control of a global semaphore. * If running on the node on which the semaphore resides, the wait is * forever, otherwise it times out on a remote semaphore. * * Input parameters: * argument - task argument * * 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: task2.c,v 1.2 2001-09-27 12:02:22 chris Exp $ */ #include "system.h" rtems_task Test_task2( rtems_task_argument argument ) { rtems_status_code status; puts( "Getting SMID of semaphore" ); do { status = rtems_semaphore_ident( Semaphore_name[ 1 ], RTEMS_SEARCH_ALL_NODES, &Semaphore_id[ 1 ] ); } while ( !rtems_is_status_successful( status ) ); directive_failed( status, "rtems_semaphore_ident" ); if ( Multiprocessing_configuration.node == 1 ) { status = rtems_task_wake_after( TICKS_PER_SECOND ); directive_failed( status, "rtems_task_wake_after" ); puts( "Releasing semaphore ..." ); status = rtems_semaphore_release( Semaphore_id[ 1 ] ); directive_failed( status, "rtems_semaphore_release" ); status = rtems_task_wake_after( TICKS_PER_SECOND / 2 ); directive_failed( status, "rtems_task_wake_after" ); puts( "Getting semaphore ..." ); status = rtems_semaphore_obtain( Semaphore_id[ 1 ], RTEMS_DEFAULT_OPTIONS, RTEMS_NO_TIMEOUT ); directive_failed( status, "rtems_semaphore_obtain" ); puts( "Getting semaphore ..." ); status = rtems_semaphore_obtain( Semaphore_id[ 1 ], RTEMS_DEFAULT_OPTIONS, RTEMS_NO_TIMEOUT ); puts( "How did I get back from here????" ); directive_failed( status, "rtems_semaphore_obtain" ); } /* status = rtems_task_wake_after( TICKS_PER_SECOND / 2 ); directive_failed( status, "rtems_task_wake_after" ); */ puts( "Getting semaphore ..." ); status = rtems_semaphore_obtain( Semaphore_id[ 1 ], RTEMS_DEFAULT_OPTIONS, RTEMS_NO_TIMEOUT ); directive_failed( status, "rtems_semaphore_obtain" ); puts( "Releasing semaphore ..." ); status = rtems_semaphore_release( Semaphore_id[ 1 ] ); directive_failed( status, "rtems_semaphore_release" ); status = rtems_task_wake_after( TICKS_PER_SECOND ); directive_failed( status, "rtems_task_wake_after" ); puts( "Getting semaphore ..." ); status = rtems_semaphore_obtain( Semaphore_id[ 1 ], RTEMS_DEFAULT_OPTIONS, 2 * TICKS_PER_SECOND ); fatal_directive_status( status, RTEMS_TIMEOUT, "rtems_semaphore_obtain" ); puts( "rtems_semaphore_obtain correctly returned RTEMS_TIMEOUT" ); puts( "*** END OF TEST 13 ***" ); exit( 0 ); }
Go to most recent revision | Compare with Previous | Blame | View Log