2 * PROJECT: ReactOS Kernel
3 * LICENSE: GPL - See COPYING in the top level directory
4 * FILE: ntoskrnl/kd64/kdinit.c
5 * PURPOSE: KD64 Initialization Code
6 * PROGRAMMERS: Alex Ionescu (alex.ionescu@reactos.org)
7 * Stefan Ginsberg (stefan.ginsberg@reactos.org)
10 /* INCLUDES ******************************************************************/
16 /* FUNCTIONS *****************************************************************/
20 KdUpdateDataBlock(VOID
)
22 /* Update the KeUserCallbackDispatcher pointer */
23 KdDebuggerDataBlock
.KeUserCallbackDispatcher
=
24 (ULONG_PTR
)KeUserCallbackDispatcher
;
29 KdRegisterDebuggerDataBlock(IN ULONG Tag
,
30 IN PDBGKD_DEBUG_DATA_HEADER64 DataHeader
,
34 PLIST_ENTRY NextEntry
;
35 PDBGKD_DEBUG_DATA_HEADER64 CurrentHeader
;
37 /* Acquire the Data Lock */
38 KeAcquireSpinLock(&KdpDataSpinLock
, &OldIrql
);
40 /* Loop the debugger data list */
41 NextEntry
= KdpDebuggerDataListHead
.Flink
;
42 while (NextEntry
!= &KdpDebuggerDataListHead
)
44 /* Get the header for this entry */
45 CurrentHeader
= CONTAINING_RECORD(NextEntry
,
46 DBGKD_DEBUG_DATA_HEADER64
,
49 /* Move to the next one */
50 NextEntry
= NextEntry
->Flink
;
52 /* Check if we already have this data block */
53 if ((CurrentHeader
== DataHeader
) || (CurrentHeader
->OwnerTag
== Tag
))
55 /* Release the lock and fail */
56 KeReleaseSpinLock(&KdpDataSpinLock
, OldIrql
);
61 /* Setup the header */
62 DataHeader
->OwnerTag
= Tag
;
63 DataHeader
->Size
= Size
;
65 /* Insert it into the list and release the lock */
66 InsertTailList(&KdpDebuggerDataListHead
, (PLIST_ENTRY
)&DataHeader
->List
);
67 KeReleaseSpinLock(&KdpDataSpinLock
, OldIrql
);
73 KdInitSystem(IN ULONG BootPhase
,
74 IN PLOADER_PARAMETER_BLOCK LoaderBlock
)
76 BOOLEAN EnableKd
, DisableKdAfterInit
= FALSE
, BlockEnable
;
77 LPSTR CommandLine
, DebugLine
, DebugOptionStart
, DebugOptionEnd
;
79 PLDR_DATA_TABLE_ENTRY LdrEntry
;
80 PLIST_ENTRY NextEntry
;
82 SIZE_T DebugOptionLength
;
91 /* Check if this is Phase 1 */
94 /* Just query the performance counter */
95 KeQueryPerformanceCounter(&KdPerformanceCounterRate
);
99 /* Check if we already initialized once */
100 if (KdDebuggerEnabled
) return TRUE
;
102 /* Set the Debug Routine as the Stub for now */
103 KiDebugRoutine
= KdpStub
;
105 /* Disable break after symbol load for now */
106 KdBreakAfterSymbolLoad
= FALSE
;
108 /* Check if the Debugger Data Block was already initialized */
109 if (!KdpDebuggerDataListHead
.Flink
)
111 /* It wasn't...Initialize the KD Data Listhead */
112 InitializeListHead(&KdpDebuggerDataListHead
);
114 /* Register the Debugger Data Block */
115 KdRegisterDebuggerDataBlock(KDBG_TAG
,
116 &KdDebuggerDataBlock
.Header
,
117 sizeof(KdDebuggerDataBlock
));
119 /* Fill out the KD Version Block */
120 KdVersionBlock
.MajorVersion
= (USHORT
)((DBGKD_MAJOR_NT
<< 8) | (NtBuildNumber
>> 28));
121 KdVersionBlock
.MinorVersion
= (USHORT
)(NtBuildNumber
& 0xFFFF);
124 /* This is an MP Build */
125 KdVersionBlock
.Flags
|= DBGKD_VERS_FLAG_MP
;
128 /* Save Pointers to Loaded Module List and Debugger Data */
129 KdVersionBlock
.PsLoadedModuleList
= (ULONG64
)(LONG_PTR
)&PsLoadedModuleList
;
130 KdVersionBlock
.DebuggerDataList
= (ULONG64
)(LONG_PTR
)&KdpDebuggerDataListHead
;
132 /* Set protocol limits */
133 KdVersionBlock
.MaxStateChange
= DbgKdMaximumStateChange
-
134 DbgKdMinimumStateChange
;
135 KdVersionBlock
.MaxManipulate
= DbgKdMaximumManipulate
-
136 DbgKdMinimumManipulate
;
137 KdVersionBlock
.Unused
[0] = 0;
139 /* Link us in the KPCR */
140 KeGetPcr()->KdVersionBlock
= &KdVersionBlock
;
143 /* Check if we have a loader block */
146 /* Get the image entry */
147 LdrEntry
= CONTAINING_RECORD(LoaderBlock
->LoadOrderListHead
.Flink
,
148 LDR_DATA_TABLE_ENTRY
,
151 /* Save the Kernel Base */
152 PsNtosImageBase
= (ULONG_PTR
)LdrEntry
->DllBase
;
153 KdVersionBlock
.KernBase
= (ULONG64
)(LONG_PTR
)LdrEntry
->DllBase
;
155 /* Check if we have a command line */
156 CommandLine
= LoaderBlock
->LoadOptions
;
160 _strupr(CommandLine
);
162 /* Assume we'll disable KD */
165 /* Check for CRASHDEBUG, NODEBUG and just DEBUG */
166 if (strstr(CommandLine
, "CRASHDEBUG"))
168 /* Don't enable KD now, but allow it to be enabled later */
169 KdPitchDebugger
= FALSE
;
171 else if (strstr(CommandLine
, "NODEBUG"))
173 /* Don't enable KD and don't let it be enabled later */
174 KdPitchDebugger
= TRUE
;
176 else if ((DebugLine
= strstr(CommandLine
, "DEBUG")) != NULL
)
181 /* Check if there are any options */
182 if (DebugLine
[5] == '=')
185 DebugOptionStart
= DebugOptionEnd
= &DebugLine
[6];
187 /* Scan the string for debug options */
190 /* Loop until we reach the end of the string */
191 while (*DebugOptionEnd
!= ANSI_NULL
)
193 /* Check if this is a comma, a space or a tab */
194 if ((*DebugOptionEnd
== ',') ||
195 (*DebugOptionEnd
== ' ') ||
196 (*DebugOptionEnd
== '\t'))
199 * We reached the end of the option or
200 * the end of the string, break out
206 /* Move on to the next character */
211 /* Calculate the length of the current option */
212 DebugOptionLength
= (DebugOptionEnd
- DebugOptionStart
);
215 * Break out if we reached the last option
216 * or if there were no options at all
218 if (!DebugOptionLength
) break;
220 /* Now check which option this is */
221 if ((DebugOptionLength
== 10) &&
222 !(strncmp(DebugOptionStart
, "AUTOENABLE", 10)))
225 * Disable the debugger, but
226 * allow it to be reenabled
228 DisableKdAfterInit
= TRUE
;
230 KdAutoEnableOnEvent
= TRUE
;
232 else if ((DebugOptionLength
== 7) &&
233 !(strncmp(DebugOptionStart
, "DISABLE", 7)))
235 /* Disable the debugger */
236 DisableKdAfterInit
= TRUE
;
238 KdAutoEnableOnEvent
= FALSE
;
240 else if ((DebugOptionLength
== 6) &&
241 !(strncmp(DebugOptionStart
, "NOUMEX", 6)))
243 /* Ignore user mode exceptions */
244 KdIgnoreUmExceptions
= TRUE
;
248 * If there are more options then
249 * the next character should be a comma
251 if (*DebugOptionEnd
!= ',')
253 /* It isn't, break out */
257 /* Move on to the next option */
259 DebugOptionStart
= DebugOptionEnd
;
266 /* No command line options? Disable debugger by default */
267 KdPitchDebugger
= TRUE
;
273 /* Called from a bugcheck or a re-enable. Save the Kernel Base */
274 KdVersionBlock
.KernBase
= (ULONG64
)(LONG_PTR
)PsNtosImageBase
;
276 /* Unconditionally enable KD */
280 /* Set the Kernel Base in the Data Block */
281 KdDebuggerDataBlock
.KernBase
= (ULONG_PTR
)KdVersionBlock
.KernBase
;
283 /* Initialize the debugger if requested */
284 if ((EnableKd
) && (NT_SUCCESS(KdDebuggerInitialize0(LoaderBlock
))))
286 /* Now set our real KD routine */
287 KiDebugRoutine
= KdpTrap
;
289 /* Check if we've already initialized our structures */
290 if (!KdpDebuggerStructuresInitialized
)
292 /* Set the Debug Switch Routine and Retries*/
293 KdpContext
.KdpDefaultRetries
= 20;
294 KiDebugSwitchRoutine
= KdpSwitchProcessor
;
296 /* Initialize the Time Slip DPC */
297 KeInitializeDpc(&KdpTimeSlipDpc
, KdpTimeSlipDpcRoutine
, NULL
);
298 KeInitializeTimer(&KdpTimeSlipTimer
);
299 ExInitializeWorkItem(&KdpTimeSlipWorkItem
, KdpTimeSlipWork
, NULL
);
301 /* First-time initialization done! */
302 KdpDebuggerStructuresInitialized
= TRUE
;
305 /* Initialize the timer */
306 KdTimerStart
.QuadPart
= 0;
308 /* Officially enable KD */
309 KdPitchDebugger
= FALSE
;
310 KdDebuggerEnabled
= TRUE
;
312 /* Let user-mode know that it's enabled as well */
313 SharedUserData
->KdDebuggerEnabled
= TRUE
;
315 /* Check if the debugger should be disabled initially */
316 if (DisableKdAfterInit
)
319 KdDisableDebuggerWithLock(FALSE
);
322 * Save the enable block state and return initialized
323 * (the debugger is active but disabled).
325 KdBlockEnable
= BlockEnable
;
329 /* Check if we have a loader block */
332 /* Loop boot images */
333 NextEntry
= LoaderBlock
->LoadOrderListHead
.Flink
;
335 while ((NextEntry
!= &LoaderBlock
->LoadOrderListHead
) && (i
< 2))
337 /* Get the image entry */
338 LdrEntry
= CONTAINING_RECORD(NextEntry
,
339 LDR_DATA_TABLE_ENTRY
,
342 /* Generate the image name */
343 Name
= LdrEntry
->FullDllName
.Buffer
;
344 Length
= LdrEntry
->FullDllName
.Length
/ sizeof(WCHAR
);
348 /* Do cheap Unicode to ANSI conversion */
349 NameBuffer
[j
++] = (CHAR
)*Name
++;
350 } while (j
< Length
);
353 NameBuffer
[j
] = ANSI_NULL
;
355 /* Load symbols for image */
356 RtlInitString(&ImageName
, NameBuffer
);
357 DbgLoadImageSymbols(&ImageName
,
359 (ULONG_PTR
)PsGetCurrentProcessId());
361 /* Go to the next entry */
362 NextEntry
= NextEntry
->Flink
;
367 /* Check for incoming breakin and break on symbol load if we have it */
368 KdBreakAfterSymbolLoad
= KdPollBreakIn();
372 /* Disable debugger */
373 KdDebuggerNotPresent
= TRUE
;
376 /* Return initialized */