forked from Imagelibrary/rtems
* spfatal01/spfatal01.scn, spfatal01/testcase.h, spfatal02/spfatal02.scn, spfatal02/testcase.h, spfatal03/spfatal03.scn, spfatal03/testcase.h, spfatal04/spfatal04.scn, spfatal04/testcase.h, spfatal05/spfatal05.scn, spfatal05/testcase.h, spfatal06/spfatal06.scn, spfatal06/testcase.h, spfatal07/spfatal07.scn, spfatal07/testcase.h, spfatal08/spfatal08.scn, spfatal08/testcase.h, spfatal09/spfatal09.scn, spfatal09/testcase.h, spfatal10/Makefile.am, spfatal10/spfatal10.scn, spfatal11/Makefile.am, spfatal11/spfatal11.scn, spfatal12/Makefile.am, spfatal12/spfatal12.scn, spfatal_support/init.c: Make all fatal error tests use testcase.h and spfatal_support framework. Print test name herald in all cases. * spfatal10/testcase.h, spfatal11/testcase.h, spfatal12/testcase.h: New files. * spfatal10/init.c, spfatal11/init.c, spfatal12/init.c: Removed.
51 lines
1.3 KiB
C
51 lines
1.3 KiB
C
/*
|
|
* Semaphore Obtain in Critical Section
|
|
*
|
|
* COPYRIGHT (c) 1989-2009.
|
|
* 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$
|
|
*/
|
|
|
|
#define CONFIGURE_RTEMS_INIT_TASKS_TABLE
|
|
|
|
#define CONFIGURE_MAXIMUM_SEMAPHORES 10
|
|
|
|
#define FATAL_ERROR_TEST_NAME "3"
|
|
#define FATAL_ERROR_DESCRIPTION "Core Mutex obtain in critical section"
|
|
#define FATAL_ERROR_EXPECTED_SOURCE INTERNAL_ERROR_CORE
|
|
#define FATAL_ERROR_EXPECTED_IS_INTERNAL FALSE
|
|
#define FATAL_ERROR_EXPECTED_ERROR INTERNAL_ERROR_MUTEX_OBTAIN_FROM_BAD_STATE
|
|
|
|
void force_error(void)
|
|
{
|
|
|
|
rtems_status_code status;
|
|
rtems_id mutex;
|
|
|
|
status = rtems_semaphore_create(
|
|
rtems_build_name( 'S','0',' ',' '),
|
|
1,
|
|
RTEMS_LOCAL|
|
|
RTEMS_SIMPLE_BINARY_SEMAPHORE,
|
|
0,
|
|
&mutex
|
|
);
|
|
directive_failed( status, "rtems_semaphore_create of S0");
|
|
puts("Create semaphore S0");
|
|
|
|
puts("Obtain semaphore in dispatching critical section");
|
|
_Thread_Disable_dispatch();
|
|
status = rtems_semaphore_obtain( mutex, RTEMS_DEFAULT_OPTIONS, 0 );
|
|
/* !!! SHOULD NOT RETURN FROM THE ABOVE CALL */
|
|
|
|
_Thread_Enable_dispatch();
|
|
puts("ERROR -- Obtain semaphore should not have returned");
|
|
|
|
/* we will not run this far */
|
|
}
|