Use ULONG_PTR instead of ULONG when doing pointer arithmetics.
[reactos.git] / reactos / ntoskrnl / ke / bug.c
1 /*
2 * ReactOS kernel
3 * Copyright (C) 1998, 1999, 2000, 2001, 2002 ReactOS Team
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License
16 * along with this program; if not, write to the Free Software
17 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18 */
19 /* $Id: bug.c,v 1.22 2002/05/13 18:10:39 chorns Exp $
20 *
21 * PROJECT: ReactOS kernel
22 * FILE: ntoskrnl/ke/bug.c
23 * PURPOSE: Graceful system shutdown if a bug is detected
24 * PROGRAMMER: David Welch (welch@cwcom.net)
25 * PORTABILITY: Unchecked
26 * UPDATE HISTORY:
27 * Created 22/05/98
28 * Phillip Susi: 12/8/99: Minor fix
29 */
30
31 /* INCLUDES *****************************************************************/
32
33 #include <ddk/ntddk.h>
34 #include <internal/ke.h>
35 #include <internal/ps.h>
36
37 #include <internal/debug.h>
38
39 /* GLOBALS ******************************************************************/
40
41 static LIST_ENTRY BugcheckCallbackListHead = {NULL,NULL};
42 static ULONG InBugCheck;
43
44 VOID PsDumpThreads(VOID);
45
46 /* FUNCTIONS *****************************************************************/
47
48 VOID
49 KeInitializeBugCheck(VOID)
50 {
51 InitializeListHead(&BugcheckCallbackListHead);
52 InBugCheck = 0;
53 }
54
55 BOOLEAN STDCALL
56 KeDeregisterBugCheckCallback(PKBUGCHECK_CALLBACK_RECORD CallbackRecord)
57 {
58 UNIMPLEMENTED;
59 }
60
61 BOOLEAN STDCALL
62 KeRegisterBugCheckCallback(PKBUGCHECK_CALLBACK_RECORD CallbackRecord,
63 PKBUGCHECK_CALLBACK_ROUTINE CallbackRoutine,
64 PVOID Buffer,
65 ULONG Length,
66 PUCHAR Component)
67 {
68 InsertTailList(&BugcheckCallbackListHead, &CallbackRecord->Entry);
69 CallbackRecord->Length = Length;
70 CallbackRecord->Buffer = Buffer;
71 CallbackRecord->Component = Component;
72 CallbackRecord->CallbackRoutine = CallbackRoutine;
73 return(TRUE);
74 }
75
76 VOID STDCALL
77 KeBugCheckWithTf(ULONG BugCheckCode,
78 ULONG BugCheckParameter1,
79 ULONG BugCheckParameter2,
80 ULONG BugCheckParameter3,
81 ULONG BugCheckParameter4,
82 PKTRAP_FRAME Tf)
83 {
84 DbgPrint("Bug detected code: 0x%X\n", BugCheckCode);
85 KiDumpTrapFrame(Tf, BugCheckParameter1, BugCheckParameter2);
86 for(;;);
87 }
88
89 VOID STDCALL
90 KeBugCheckEx(ULONG BugCheckCode,
91 ULONG BugCheckParameter1,
92 ULONG BugCheckParameter2,
93 ULONG BugCheckParameter3,
94 ULONG BugCheckParameter4)
95 /*
96 * FUNCTION: Brings the system down in a controlled manner when an
97 * inconsistency that might otherwise cause corruption has been detected
98 * ARGUMENTS:
99 * BugCheckCode = Specifies the reason for the bug check
100 * BugCheckParameter[1-4] = Additional information about bug
101 * RETURNS: Doesn't
102 */
103 {
104 PRTL_MESSAGE_RESOURCE_ENTRY Message;
105 NTSTATUS Status;
106 KIRQL OldIrql;
107
108 KeRaiseIrql(HIGH_LEVEL, &OldIrql);
109
110 DbgPrint("Bug detected (code %x param %x %x %x %x)\n",
111 BugCheckCode,
112 BugCheckParameter1,
113 BugCheckParameter2,
114 BugCheckParameter3,
115 BugCheckParameter4);
116
117 Status = RtlFindMessage((PVOID)KERNEL_BASE, //0xC0000000,
118 11, //RT_MESSAGETABLE,
119 0x09, //0x409,
120 BugCheckCode,
121 &Message);
122 if (NT_SUCCESS(Status))
123 {
124 if (Message->Flags == 0)
125 DbgPrint(" %s\n", Message->Text);
126 else
127 DbgPrint(" %S\n", (PWSTR)Message->Text);
128 }
129 else
130 {
131 DbgPrint(" No message text found!\n\n");
132 }
133
134 if (InBugCheck == 1)
135 {
136 DbgPrint("Recursive bug check halting now\n");
137
138 if (KdDebuggerEnabled)
139 {
140 DbgBreakPoint();
141 }
142
143 for (;;)
144 {
145 __asm__("hlt\n\t");
146 }
147 }
148 InBugCheck = 1;
149
150 if (PsGetCurrentProcess() != NULL)
151 {
152 DbgPrint("Pid: %x <", PsGetCurrentProcess()->UniqueProcessId);
153 DbgPrint("%.8s> ", PsGetCurrentProcess()->ImageFileName);
154 }
155 if (PsGetCurrentThread() != NULL)
156 {
157 DbgPrint("Thrd: %x Tid: %x\n",
158 PsGetCurrentThread(),
159 PsGetCurrentThread()->Cid.UniqueThread);
160 }
161 KeDumpStackFrames((PULONG)__builtin_frame_address(0));
162
163 if (KdDebuggerEnabled)
164 {
165 DbgBreakPoint();
166 }
167
168 for(;;)
169 {
170 /* PJS: use HLT instruction, rather than busy wait */
171 __asm__("hlt\n\t");
172 }
173 }
174
175 VOID STDCALL
176 KeBugCheck(ULONG BugCheckCode)
177 /*
178 * FUNCTION: Brings the system down in a controlled manner when an
179 * inconsistency that might otherwise cause corruption has been detected
180 * ARGUMENTS:
181 * BugCheckCode = Specifies the reason for the bug check
182 * RETURNS: Doesn't
183 */
184 {
185 KeBugCheckEx(BugCheckCode, 0, 0, 0, 0);
186 }
187
188 /* EOF */