source: rtems/testsuites/sptests/spfatal_support/init.c @ ac85d56

4.104.115
Last change on this file since ac85d56 was ac85d56, checked in by Joel Sherrill <joel.sherrill@…>, on Sep 26, 2009 at 3:47:16 PM

2009-09-26 Joel Sherrill <joel.sherrill@…>

  • sp04/tswitch.c, sp07/system.h, sp07/taskexit.c, sp07/tdelete.c, sp07/tstart.c, spfatal_support/init.c, spfatal_support/system.h: Eliminate use of deprecated rtems_extension.
  • Property mode set to 100644
File size: 5.1 KB
Line 
1/*  Init
2 *
3 *  This routine is the initialization task for this test program.
4 *  It is a user initialization task and has the responsibility for creating
5 *  and starting the tasks that make up the test.  If the time of day
6 *  clock is required for the test, it should also be set to a known
7 *  value by this function.
8 *
9 *  Input parameters:
10 *    argument - task argument
11 *
12 *  Output parameters:  NONE
13 *
14 *  COPYRIGHT (c) 1989-2009.
15 *  On-Line Applications Research Corporation (OAR).
16 *
17 *  The license and distribution terms for this file may be
18 *  found in the file LICENSE in this distribution or at
19 *  http://www.rtems.com/license/LICENSE.
20 *
21 *  $Id$
22 */
23
24#define CONFIGURE_INIT
25#include "system.h"
26
27rtems_task Init(
28  rtems_task_argument argument
29)
30{
31  printk( "\n\n\n*** TEST FATAL " FATAL_ERROR_TEST_NAME " ***\n" );
32  force_error();
33  printk( "Fatal error (%s) NOT hit\n", FATAL_ERROR_DESCRIPTION );
34  rtems_test_exit(0);
35}
36
37char *Sources[] = {
38  "INTERNAL_ERROR_CORE",
39  "INTERNAL_ERROR_RTEMS_API",
40  "INTERNAL_ERROR_POSIX_API",
41  "INTERNAL_ERROR_ITRON_API"
42};
43
44
45char *Errors_Rtems[] = {
46  "RTEMS_SUCCESSFUL",               /* successful completion */
47  "RTEMS_TASK_EXITTED",             /* returned from a task */
48  "RTEMS_MP_NOT_CONFIGURED",        /* multiprocessing not configured */
49  "RTEMS_INVALID_NAME",             /* invalid object name */
50  "RTEMS_INVALID_ID",               /* invalid object id */
51  "RTEMS_TOO_MANY",                 /* too many */
52  "RTEMS_TIMEOUT",                  /* timed out waiting */
53  "RTEMS_OBJECT_WAS_DELETED",       /* object was deleted while waiting */
54  "RTEMS_INVALID_SIZE",             /* specified size was invalid */
55  "RTEMS_INVALID_ADDRESS",          /* address specified is invalid */
56  "RTEMS_INVALID_NUMBER",           /* number was invalid */
57  "RTEMS_NOT_DEFINED",              /* item has not been initialized */
58  "RTEMS_RESOURCE_IN_USE",          /* resources still outstanding */
59  "RTEMS_UNSATISFIED",              /* request not satisfied */
60  "RTEMS_INCORRECT_STATE",          /* task is in wrong state */
61  "RTEMS_ALREADY_SUSPENDED",        /* task already in state */
62  "RTEMS_ILLEGAL_ON_SELF",          /* illegal operation on calling task */
63  "RTEMS_ILLEGAL_ON_REMOTE_OBJECT", /* illegal operation for remote object */
64  "RTEMS_CALLED_FROM_ISR",          /* called from ISR */
65  "RTEMS_INVALID_PRIORITY",         /* invalid task priority */
66  "RTEMS_INVALID_CLOCK",            /* invalid date/time */
67  "RTEMS_INVALID_NODE",             /* invalid node id */
68  "RTEMS_NOT_OWNER_OF_RESOURCE",    /* not owner of resource */
69  "RTEMS_NOT_CONFIGURED",           /* directive not configured */
70  "RTEMS_NOT_IMPLEMENTED"           /* directive not implemented */
71};
72
73char *Errors_Core[] = {
74  "INTERNAL_ERROR_NO_CONFIGURATION_TABLE",
75  "INTERNAL_ERROR_NO_CPU_TABLE",
76  "INTERNAL_ERROR_INVALID_WORKSPACE_ADDRESS",
77  "INTERNAL_ERROR_TOO_LITTLE_WORKSPACE",
78  "INTERNAL_ERROR_WORKSPACE_ALLOCATION",
79  "INTERNAL_ERROR_INTERRUPT_STACK_TOO_SMALL",
80  "INTERNAL_ERROR_THREAD_EXITTED",
81  "INTERNAL_ERROR_INCONSISTENT_MP_INFORMATION",
82  "INTERNAL_ERROR_INVALID_NODE",
83  "INTERNAL_ERROR_NO_MPCI",
84  "INTERNAL_ERROR_BAD_PACKET",
85  "INTERNAL_ERROR_OUT_OF_PACKETS",
86  "INTERNAL_ERROR_OUT_OF_GLOBAL_OBJECTS",
87  "INTERNAL_ERROR_OUT_OF_PROXIES",
88  "INTERNAL_ERROR_INVALID_GLOBAL_ID",
89  "INTERNAL_ERROR_BAD_STACK_HOOK",
90  "INTERNAL_ERROR_BAD_ATTRIBUTES",
91  "INTERNAL_ERROR_IMPLEMENTATION_KEY_CREATE_INCONSISTENCY",
92  "INTERNAL_ERROR_IMPLEMENTATION_BLOCKING_OPERATION_CANCEL",
93  "INTERNAL_ERROR_MUTEX_OBTAIN_FROM_BAD_STATE"
94};
95
96void Put_Error( uint32_t source, uint32_t error )
97{
98  if ( source == INTERNAL_ERROR_CORE ) {
99    if ( error >  INTERNAL_ERROR_MUTEX_OBTAIN_FROM_BAD_STATE )
100      printk("Unknown Internal Core Error (%d)", error);
101    else
102      printk( Errors_Core[ error ] );
103  }
104  else if (source == INTERNAL_ERROR_RTEMS_API ){
105    if (error >  RTEMS_NOT_IMPLEMENTED )
106      printk("Unknown Internal Rtems Error (%d)", error);
107    else
108      printk( Errors_Rtems[ error ] );
109  }
110}
111
112void Put_Source( uint32_t source )
113{
114  if ( source > INTERNAL_ERROR_ITRON_API )
115    printk("Unknown Source (%d)", source);
116  else
117    printk( Sources[ source ] );
118}
119
120
121void Fatal_extension(
122  uint32_t   source,
123  bool       is_internal,
124  uint32_t   error
125)
126{
127  printk( "Fatal error (%s) hit\n", FATAL_ERROR_DESCRIPTION );
128
129  if ( source != FATAL_ERROR_EXPECTED_SOURCE ){
130    printk( "ERROR==> Fatal Extension source Expected (");
131    Put_Source( FATAL_ERROR_EXPECTED_SOURCE );
132    printk( ") received (");
133    Put_Source( source );
134    printk( ")\n" );
135  }
136
137  if ( is_internal !=  FATAL_ERROR_EXPECTED_IS_INTERNAL )
138  {
139    if ( is_internal == TRUE )
140      printk( "ERROR==> Fatal Extension is internal set to TRUE expected FALSE\n" );
141    else
142      printk( "ERROR==> Fatal Extension is internal set to FALSE expected TRUE\n" );
143  }
144 
145  if ( error !=  FATAL_ERROR_EXPECTED_ERROR ) {
146    printk( "ERROR==> Fatal Error Expected (");
147    Put_Error( source, FATAL_ERROR_EXPECTED_ERROR );
148    printk( ") received (");
149    Put_Error( source, error );
150    printk( ")\n" );
151  }
152
153  /* return and let the CPU halt */
154}
155
Note: See TracBrowser for help on using the repository browser.