OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [rtems/] [c/] [src/] [exec/] [score/] [src/] [interr.c] - Blame information for rev 1765

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 158 chris
/*
2
 *  Internal Error Handler
3
 *
4
 *  COPYRIGHT (c) 1989-1999.
5
 *  On-Line Applications Research Corporation (OAR).
6
 *
7
 *  The license and distribution terms for this file may be
8
 *  found in the file LICENSE in this distribution or at
9
 *  http://www.OARcorp.com/rtems/license.html.
10
 *
11 208 chris
 *  $Id: interr.c,v 1.2 2001-09-27 11:59:34 chris Exp $
12 158 chris
 */
13
 
14
#include <rtems/system.h>
15
#include <rtems/score/interr.h>
16
#include <rtems/score/sysstate.h>
17
#include <rtems/score/userext.h>
18
 
19
/*PAGE
20
 *
21
 *  _Internal_error_Occurred
22
 *
23
 *  This routine will invoke the fatal error handler supplied by the user
24
 *  followed by the the default one provided by the executive.  The default
25
 *  error handler assumes no hardware is present to help inform the user
26
 *  of the problem.  Halt stores the error code in a known register,
27
 *  disables interrupts, and halts the CPU.  If the CPU does not have a
28
 *  halt instruction, it will loop to itself.
29
 *
30
 *  Input parameters:
31
 *    the_source  - what subsystem the error originated in
32
 *    is_internal - if the error was internally generated
33
 *    the_error   - fatal error status code
34
 *
35
 *  Output parameters:
36
 *    As much information as possible is stored in a CPU dependent fashion.
37
 *    See the CPU dependent code for more information.
38
 *
39
 *  NOTE: The the_error is not necessarily a directive status code.
40
 */
41
 
42
void volatile _Internal_error_Occurred(
43
  Internal_errors_Source  the_source,
44
  boolean                 is_internal,
45
  unsigned32              the_error
46
)
47
{
48
 
49
  Internal_errors_What_happened.the_source  = the_source;
50
  Internal_errors_What_happened.is_internal = is_internal;
51
  Internal_errors_What_happened.the_error   = the_error;
52
 
53
  _User_extensions_Fatal( the_source, is_internal, the_error );
54
 
55
  _System_state_Set( SYSTEM_STATE_FAILED );
56
 
57
  _CPU_Fatal_halt( the_error );
58
 
59
  /* will not return from this routine */
60
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.