source: rtems/testsuites/psxtests/psxfatal_support/init.c @ f0157b8

4.104.114.9
Last change on this file since f0157b8 was f0157b8, checked in by Ralf Corsepius <ralf.corsepius@…>, on Sep 6, 2008 at 3:39:58 AM

Convert to "bool".

  • Property mode set to 100644
File size: 5.1 KB
Line 
1/*  POSIX_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-2008.
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
27void *POSIX_Init(
28  void *argument
29)
30{
31  force_error();
32  printk( "Fatal error (%s) NOT hit\n", FATAL_ERROR_DESCRIPTION );
33  rtems_test_exit(0);
34}
35
36char *Sources[] = {
37  "INTERNAL_ERROR_CORE",
38  "INTERNAL_ERROR_RTEMS_API",
39  "INTERNAL_ERROR_POSIX_API",
40  "INTERNAL_ERROR_ITRON_API"
41};
42
43char *Errors_Rtems[] = {
44  "RTEMS_SUCCESSFUL",               /* successful completion */
45  "RTEMS_TASK_EXITTED",             /* returned from a task */
46  "RTEMS_MP_NOT_CONFIGURED",        /* multiprocessing not configured */
47  "RTEMS_INVALID_NAME",             /* invalid object name */
48  "RTEMS_INVALID_ID",               /* invalid object id */
49  "RTEMS_TOO_MANY",                 /* too many */
50  "RTEMS_TIMEOUT",                  /* timed out waiting */
51  "RTEMS_OBJECT_WAS_DELETED",       /* object was deleted while waiting */
52  "RTEMS_INVALID_SIZE",             /* specified size was invalid */
53  "RTEMS_INVALID_ADDRESS",          /* address specified is invalid */
54  "RTEMS_INVALID_NUMBER",           /* number was invalid */
55  "RTEMS_NOT_DEFINED",              /* item has not been initialized */
56  "RTEMS_RESOURCE_IN_USE",          /* resources still outstanding */
57  "RTEMS_UNSATISFIED",              /* request not satisfied */
58  "RTEMS_INCORRECT_STATE",          /* task is in wrong state */
59  "RTEMS_ALREADY_SUSPENDED",        /* task already in state */
60  "RTEMS_ILLEGAL_ON_SELF",          /* illegal operation on calling task */
61  "RTEMS_ILLEGAL_ON_REMOTE_OBJECT", /* illegal operation for remote object */
62  "RTEMS_CALLED_FROM_ISR",          /* called from ISR */
63  "RTEMS_INVALID_PRIORITY",         /* invalid task priority */
64  "RTEMS_INVALID_CLOCK",            /* invalid date/time */
65  "RTEMS_INVALID_NODE",             /* invalid node id */
66  "RTEMS_NOT_OWNER_OF_RESOURCE",    /* not owner of resource */
67  "RTEMS_NOT_CONFIGURED",           /* directive not configured */
68  "RTEMS_NOT_IMPLEMENTED"           /* directive not implemented */
69};
70
71char *Errors_Core[] = {
72  "INTERNAL_ERROR_NO_CONFIGURATION_TABLE",
73  "INTERNAL_ERROR_NO_CPU_TABLE",
74  "INTERNAL_ERROR_INVALID_WORKSPACE_ADDRESS",
75  "INTERNAL_ERROR_TOO_LITTLE_WORKSPACE",
76  "INTERNAL_ERROR_WORKSPACE_ALLOCATION",
77  "INTERNAL_ERROR_INTERRUPT_STACK_TOO_SMALL",
78  "INTERNAL_ERROR_THREAD_EXITTED",
79  "INTERNAL_ERROR_INCONSISTENT_MP_INFORMATION",
80  "INTERNAL_ERROR_INVALID_NODE",
81  "INTERNAL_ERROR_NO_MPCI",
82  "INTERNAL_ERROR_BAD_PACKET",
83  "INTERNAL_ERROR_OUT_OF_PACKETS",
84  "INTERNAL_ERROR_OUT_OF_GLOBAL_OBJECTS",
85  "INTERNAL_ERROR_OUT_OF_PROXIES",
86  "INTERNAL_ERROR_INVALID_GLOBAL_ID",
87  "INTERNAL_ERROR_BAD_STACK_HOOK",
88  "INTERNAL_ERROR_BAD_ATTRIBUTES",
89  "INTERNAL_ERROR_IMPLEMENTATION_KEY_CREATE_INCONSISTENCY",
90  "INTERNAL_ERROR_IMPLEMENTATION_BLOCKING_OPERATION_CANCEL",
91  "INTERNAL_ERROR_MUTEX_OBTAIN_FROM_BAD_STATE"
92};
93
94void Put_Error( uint32_t source, uint32_t error )
95{
96  if ( source == INTERNAL_ERROR_CORE ) {
97    if ( error >  INTERNAL_ERROR_MUTEX_OBTAIN_FROM_BAD_STATE )
98      printk("Unknown Internal Core Error (%d)", error);
99    else
100      printk( Errors_Core[ error ] );
101  }
102  else if (source == INTERNAL_ERROR_RTEMS_API ){
103    if (error >  RTEMS_NOT_IMPLEMENTED )
104      printk("Unknown Internal Rtems Error (%d)", error);
105    else
106      printk( Errors_Rtems[ error ] );
107  }
108  else if (source == INTERNAL_ERROR_POSIX_API ) {
109      printk( "SOURCE=%d ERROR=%d %s", source, error, strerror( error ) );
110  }
111}
112
113void Put_Source( uint32_t source )
114{
115  if ( source > INTERNAL_ERROR_ITRON_API )
116    printk("Unknown Source (%d)", source);
117  else
118    printk( Sources[ source ] );
119}
120
121
122rtems_extension Fatal_extension(
123  uint32_t   source,
124  bool       is_internal,
125  uint32_t   error
126)
127{
128  printk( "Fatal error (%s) hit\n", FATAL_ERROR_DESCRIPTION );
129
130  if ( source != FATAL_ERROR_EXPECTED_SOURCE ){
131    printk( "ERROR==> Fatal Extension source Expected (");
132    Put_Source( FATAL_ERROR_EXPECTED_SOURCE );
133    printk( ") received (");
134    Put_Source( source );
135    printk( ")\n" );
136  }
137
138  if ( is_internal !=  FATAL_ERROR_EXPECTED_IS_INTERNAL )
139  {
140    if ( is_internal == TRUE )
141      printk( "ERROR==> Fatal Extension is internal set to TRUE expected FALSE\n" );
142    else
143      printk( "ERROR==> Fatal Extension is internal set to FALSE expected TRUE\n" );
144  }
145 
146  if ( error !=  FATAL_ERROR_EXPECTED_ERROR ) {
147    printk( "ERROR==> Fatal Error Expected (");
148    Put_Error( source, FATAL_ERROR_EXPECTED_ERROR );
149    printk( ") received (");
150    Put_Error( source, error );
151    printk( ")\n" );
152  }
153
154  /* return and let the CPU halt */
155}
156
Note: See TracBrowser for help on using the repository browser.