105966137c7d500ac13ff4180cdc752527995527
[reactos.git] / reactos / boot / freeldr / freeldr / windows / winldr.c
1 /*
2 * FreeLoader
3 *
4 * Copyright (C) 1998-2003 Brian Palmer <brianp@sginet.com>
5 * Copyright (C) 2006 Aleksey Bragin <aleksey@reactos.org>
6 *
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or
10 * (at your option) any later version.
11 *
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20 */
21
22 #include <freeldr.h>
23
24 #include <ndk/ldrtypes.h>
25 #include <debug.h>
26
27 // TODO: Move to .h
28 void WinLdrSetupForNt(PLOADER_PARAMETER_BLOCK LoaderBlock,
29 PVOID *GdtIdt,
30 ULONG *PcrBasePage,
31 ULONG *TssBasePage);
32
33 //FIXME: Do a better way to retrieve Arc disk information
34 extern ULONG reactos_disk_count;
35 extern ARC_DISK_SIGNATURE reactos_arc_disk_info[];
36 extern char reactos_arc_strings[32][256];
37
38 extern BOOLEAN UseRealHeap;
39 extern ULONG LoaderPagesSpanned;
40
41 BOOLEAN
42 WinLdrCheckForLoadedDll(IN OUT PLOADER_PARAMETER_BLOCK WinLdrBlock,
43 IN PCH DllName,
44 OUT PLDR_DATA_TABLE_ENTRY *LoadedEntry);
45
46 // debug stuff
47 VOID DumpMemoryAllocMap(VOID);
48 VOID WinLdrpDumpMemoryDescriptors(PLOADER_PARAMETER_BLOCK LoaderBlock);
49 VOID WinLdrpDumpBootDriver(PLOADER_PARAMETER_BLOCK LoaderBlock);
50 VOID WinLdrpDumpArcDisks(PLOADER_PARAMETER_BLOCK LoaderBlock);
51
52
53 // Init "phase 0"
54 VOID
55 AllocateAndInitLPB(PLOADER_PARAMETER_BLOCK *OutLoaderBlock)
56 {
57 PLOADER_PARAMETER_BLOCK LoaderBlock;
58
59 /* Allocate and zero-init the LPB */
60 LoaderBlock = MmHeapAlloc(sizeof(LOADER_PARAMETER_BLOCK));
61 RtlZeroMemory(LoaderBlock, sizeof(LOADER_PARAMETER_BLOCK));
62
63 /* Init three critical lists, used right away */
64 InitializeListHead(&LoaderBlock->LoadOrderListHead);
65 InitializeListHead(&LoaderBlock->MemoryDescriptorListHead);
66 InitializeListHead(&LoaderBlock->BootDriverListHead);
67
68 /* Alloc space for NLS (it will be converted to VA in WinLdrLoadNLS) */
69 LoaderBlock->NlsData = MmHeapAlloc(sizeof(NLS_DATA_BLOCK));
70 if (LoaderBlock->NlsData == NULL)
71 {
72 UiMessageBox("Failed to allocate memory for NLS table data!");
73 return;
74 }
75 RtlZeroMemory(LoaderBlock->NlsData, sizeof(NLS_DATA_BLOCK));
76
77 *OutLoaderBlock = LoaderBlock;
78 }
79
80 // Init "phase 1"
81 VOID
82 WinLdrInitializePhase1(PLOADER_PARAMETER_BLOCK LoaderBlock,
83 PCHAR Options,
84 PCHAR SystemRoot,
85 PCHAR BootPath,
86 USHORT VersionToBoot)
87 {
88 /* Examples of correct options and paths */
89 //CHAR Options[] = "/DEBUGPORT=COM1 /BAUDRATE=115200";
90 //CHAR Options[] = "/NODEBUG";
91 //CHAR SystemRoot[] = "\\WINNT\\";
92 //CHAR ArcBoot[] = "multi(0)disk(0)rdisk(0)partition(1)";
93
94 CHAR HalPath[] = "\\";
95 CHAR ArcBoot[256];
96 CHAR MiscFiles[256];
97 ULONG i, PathSeparator;
98 PLOADER_PARAMETER_EXTENSION Extension;
99
100 /* Construct SystemRoot and ArcBoot from SystemPath */
101 PathSeparator = strstr(BootPath, "\\") - BootPath;
102 strncpy(ArcBoot, BootPath, PathSeparator);
103 ArcBoot[PathSeparator] = 0;
104
105 DPRINTM(DPRINT_WINDOWS, "ArcBoot: %s\n", ArcBoot);
106 DPRINTM(DPRINT_WINDOWS, "SystemRoot: %s\n", SystemRoot);
107 DPRINTM(DPRINT_WINDOWS, "Options: %s\n", Options);
108
109 /* Fill Arc BootDevice */
110 LoaderBlock->ArcBootDeviceName = MmHeapAlloc(strlen(ArcBoot)+1);
111 strcpy(LoaderBlock->ArcBootDeviceName, ArcBoot);
112 LoaderBlock->ArcBootDeviceName = PaToVa(LoaderBlock->ArcBootDeviceName);
113
114 /* Fill Arc HalDevice, it matches ArcBoot path */
115 LoaderBlock->ArcHalDeviceName = MmHeapAlloc(strlen(ArcBoot)+1);
116 strcpy(LoaderBlock->ArcHalDeviceName, ArcBoot);
117 LoaderBlock->ArcHalDeviceName = PaToVa(LoaderBlock->ArcHalDeviceName);
118
119 /* Fill SystemRoot */
120 LoaderBlock->NtBootPathName = MmHeapAlloc(strlen(SystemRoot)+1);
121 strcpy(LoaderBlock->NtBootPathName, SystemRoot);
122 LoaderBlock->NtBootPathName = PaToVa(LoaderBlock->NtBootPathName);
123
124 /* Fill NtHalPathName */
125 LoaderBlock->NtHalPathName = MmHeapAlloc(strlen(HalPath)+1);
126 strcpy(LoaderBlock->NtHalPathName, HalPath);
127 LoaderBlock->NtHalPathName = PaToVa(LoaderBlock->NtHalPathName);
128
129 /* Fill load options */
130 LoaderBlock->LoadOptions = MmHeapAlloc(strlen(Options)+1);
131 strcpy(LoaderBlock->LoadOptions, Options);
132 LoaderBlock->LoadOptions = PaToVa(LoaderBlock->LoadOptions);
133
134 /* Arc devices */
135 LoaderBlock->ArcDiskInformation = (PARC_DISK_INFORMATION)MmHeapAlloc(sizeof(ARC_DISK_INFORMATION));
136 InitializeListHead(&LoaderBlock->ArcDiskInformation->DiskSignatureListHead);
137
138 /* Convert ARC disk information from freeldr to a correct format */
139 for (i = 0; i < reactos_disk_count; i++)
140 {
141 PARC_DISK_SIGNATURE ArcDiskInfo;
142
143 /* Get the ARC structure */
144 ArcDiskInfo = (PARC_DISK_SIGNATURE)MmHeapAlloc(sizeof(ARC_DISK_SIGNATURE));
145 RtlZeroMemory(ArcDiskInfo, sizeof(ARC_DISK_SIGNATURE));
146
147 /* Copy the data over */
148 ArcDiskInfo->Signature = reactos_arc_disk_info[i].Signature;
149 ArcDiskInfo->CheckSum = reactos_arc_disk_info[i].CheckSum;
150
151 /* Copy the ARC Name */
152 ArcDiskInfo->ArcName = (PCHAR)MmHeapAlloc(sizeof(CHAR)*256);
153 strcpy(ArcDiskInfo->ArcName, reactos_arc_disk_info[i].ArcName);
154 ArcDiskInfo->ArcName = (PCHAR)PaToVa(ArcDiskInfo->ArcName);
155
156 /* Mark partition table as valid */
157 ArcDiskInfo->ValidPartitionTable = TRUE;
158
159 /* Insert into the list */
160 InsertTailList(&LoaderBlock->ArcDiskInformation->DiskSignatureListHead,
161 &ArcDiskInfo->ListEntry);
162 }
163
164 /* Convert all list's to Virtual address */
165
166 /* Convert the ArcDisks list to virtual address */
167 List_PaToVa(&LoaderBlock->ArcDiskInformation->DiskSignatureListHead);
168 LoaderBlock->ArcDiskInformation = PaToVa(LoaderBlock->ArcDiskInformation);
169
170 /* Convert configuration entries to VA */
171 ConvertConfigToVA(LoaderBlock->ConfigurationRoot);
172 LoaderBlock->ConfigurationRoot = PaToVa(LoaderBlock->ConfigurationRoot);
173
174 /* Convert all DTE into virtual addresses */
175 List_PaToVa(&LoaderBlock->LoadOrderListHead);
176
177 /* this one will be converted right before switching to
178 virtual paging mode */
179 //List_PaToVa(&LoaderBlock->MemoryDescriptorListHead);
180
181 /* Convert list of boot drivers */
182 List_PaToVa(&LoaderBlock->BootDriverListHead);
183
184 /* Initialize Extension now */
185 Extension = MmHeapAlloc(sizeof(LOADER_PARAMETER_EXTENSION));
186 if (Extension == NULL)
187 {
188 UiMessageBox("Failed to allocate LPB Extension!");
189 return;
190 }
191 RtlZeroMemory(Extension, sizeof(LOADER_PARAMETER_EXTENSION));
192
193 /* Fill LPB extension */
194 Extension->Size = sizeof(LOADER_PARAMETER_EXTENSION);
195 Extension->MajorVersion = (VersionToBoot & 0xFF00) >> 8;
196 Extension->MinorVersion = VersionToBoot & 0xFF;
197 Extension->Profile.Status = 2;
198
199 /* Load drivers database */
200 strcpy(MiscFiles, BootPath);
201 strcat(MiscFiles, "AppPatch\\drvmain.sdb");
202 Extension->DrvDBImage = PaToVa(WinLdrLoadModule(MiscFiles,
203 &Extension->DrvDBSize, LoaderRegistryData));
204
205 /* Convert extension and setup block pointers */
206 LoaderBlock->Extension = PaToVa(Extension);
207
208 if (LoaderBlock->SetupLdrBlock)
209 LoaderBlock->SetupLdrBlock = PaToVa(LoaderBlock->SetupLdrBlock);
210 }
211
212 BOOLEAN
213 WinLdrLoadDeviceDriver(PLOADER_PARAMETER_BLOCK LoaderBlock,
214 LPSTR BootPath,
215 PUNICODE_STRING FilePath,
216 ULONG Flags,
217 PLDR_DATA_TABLE_ENTRY *DriverDTE)
218 {
219 CHAR FullPath[1024];
220 CHAR DriverPath[1024];
221 CHAR DllName[1024];
222 PCHAR DriverNamePos;
223 BOOLEAN Status;
224 PVOID DriverBase;
225
226 // Separate the path to file name and directory path
227 sprintf(DriverPath, "%S", FilePath->Buffer);
228 DriverNamePos = strrchr(DriverPath, '\\');
229 if (DriverNamePos != NULL)
230 {
231 // Copy the name
232 strcpy(DllName, DriverNamePos+1);
233
234 // Cut out the name from the path
235 *(DriverNamePos+1) = 0;
236 }
237 else
238 {
239 // There is no directory in the path
240 strcpy(DllName, DriverPath);
241 DriverPath[0] = 0;
242 }
243
244 DPRINTM(DPRINT_WINDOWS, "DriverPath: %s, DllName: %s, LPB %p\n", DriverPath, DllName, LoaderBlock);
245
246
247 // Check if driver is already loaded
248 Status = WinLdrCheckForLoadedDll(LoaderBlock, DllName, DriverDTE);
249 if (Status)
250 {
251 // We've got the pointer to its DTE, just return success
252 return TRUE;
253 }
254
255 // It's not loaded, we have to load it
256 sprintf(FullPath,"%s%S", BootPath, FilePath->Buffer);
257 Status = WinLdrLoadImage(FullPath, LoaderBootDriver, &DriverBase);
258 if (!Status)
259 return FALSE;
260
261 // Allocate a DTE for it
262 Status = WinLdrAllocateDataTableEntry(LoaderBlock, DllName, DllName, DriverBase, DriverDTE);
263 if (!Status)
264 {
265 DPRINTM(DPRINT_WINDOWS, "WinLdrAllocateDataTableEntry() failed\n");
266 return FALSE;
267 }
268
269 // Modify any flags, if needed
270 (*DriverDTE)->Flags |= Flags;
271
272 // Look for any dependencies it may have, and load them too
273 sprintf(FullPath,"%s%s", BootPath, DriverPath);
274 Status = WinLdrScanImportDescriptorTable(LoaderBlock, FullPath, *DriverDTE);
275 if (!Status)
276 {
277 DPRINTM(DPRINT_WINDOWS, "WinLdrScanImportDescriptorTable() failed for %s\n",
278 FullPath);
279 return FALSE;
280 }
281
282 return TRUE;
283 }
284
285 BOOLEAN
286 WinLdrLoadBootDrivers(PLOADER_PARAMETER_BLOCK LoaderBlock,
287 LPSTR BootPath)
288 {
289 PLIST_ENTRY NextBd;
290 PBOOT_DRIVER_LIST_ENTRY BootDriver;
291 BOOLEAN Status;
292
293 // Walk through the boot drivers list
294 NextBd = LoaderBlock->BootDriverListHead.Flink;
295
296 while (NextBd != &LoaderBlock->BootDriverListHead)
297 {
298 BootDriver = CONTAINING_RECORD(NextBd, BOOT_DRIVER_LIST_ENTRY, Link);
299
300 DPRINTM(DPRINT_WINDOWS, "BootDriver %wZ DTE %08X RegPath: %wZ\n", &BootDriver->FilePath,
301 BootDriver->LdrEntry, &BootDriver->RegistryPath);
302
303 // Paths are relative (FIXME: Are they always relative?)
304
305 // Load it
306 Status = WinLdrLoadDeviceDriver(LoaderBlock, BootPath, &BootDriver->FilePath,
307 0, &BootDriver->LdrEntry);
308
309 // If loading failed - cry loudly
310 //FIXME: Maybe remove it from the list and try to continue?
311 if (!Status)
312 {
313 UiMessageBox("Can't load boot driver!");
314 return FALSE;
315 }
316
317 // Convert the RegistryPath and DTE addresses to VA since we are not going to use it anymore
318 BootDriver->RegistryPath.Buffer = PaToVa(BootDriver->RegistryPath.Buffer);
319 BootDriver->LdrEntry = PaToVa(BootDriver->LdrEntry);
320
321 NextBd = BootDriver->Link.Flink;
322 }
323
324 return TRUE;
325 }
326
327 PVOID WinLdrLoadModule(PCSTR ModuleName, ULONG *Size,
328 TYPE_OF_MEMORY MemoryType)
329 {
330 ULONG FileId;
331 PVOID PhysicalBase;
332 FILEINFORMATION FileInfo;
333 ULONG FileSize;
334 ULONG Status;
335 ULONG BytesRead;
336
337 //CHAR ProgressString[256];
338
339 /* Inform user we are loading files */
340 //sprintf(ProgressString, "Loading %s...", FileName);
341 //UiDrawProgressBarCenter(1, 100, ProgressString);
342
343 DPRINTM(DPRINT_WINDOWS, "Loading module %s\n", ModuleName);
344 *Size = 0;
345
346 /* Open the image file */
347 Status = ArcOpen((PCHAR)ModuleName, OpenReadOnly, &FileId);
348 if (Status != ESUCCESS)
349 {
350 /* In case of errors, we just return, without complaining to the user */
351 return NULL;
352 }
353
354 /* Get this file's size */
355 Status = ArcGetFileInformation(FileId, &FileInfo);
356 if (Status != ESUCCESS)
357 {
358 ArcClose(FileId);
359 return NULL;
360 }
361 FileSize = FileInfo.EndingAddress.LowPart;
362 *Size = FileSize;
363
364 /* Allocate memory */
365 PhysicalBase = MmAllocateMemoryWithType(FileSize, MemoryType);
366 if (PhysicalBase == NULL)
367 {
368 ArcClose(FileId);
369 return NULL;
370 }
371
372 /* Load whole file */
373 Status = ArcRead(FileId, PhysicalBase, FileSize, &BytesRead);
374 ArcClose(FileId);
375 if (Status != ESUCCESS)
376 {
377 return NULL;
378 }
379
380 DPRINTM(DPRINT_WINDOWS, "Loaded %s at 0x%x with size 0x%x\n", ModuleName, PhysicalBase, FileSize);
381
382 return PhysicalBase;
383 }
384
385
386 VOID
387 LoadAndBootWindows(PCSTR OperatingSystemName, USHORT OperatingSystemVersion)
388 {
389 CHAR MsgBuffer[256];
390 CHAR FullPath[MAX_PATH], SystemRoot[MAX_PATH], BootPath[MAX_PATH];
391 CHAR FileName[MAX_PATH];
392 CHAR BootOptions[256];
393 PCHAR PathSeparator;
394 PVOID NtosBase = NULL, HalBase = NULL, KdComBase = NULL;
395 BOOLEAN Status;
396 ULONG SectionId;
397 PLOADER_PARAMETER_BLOCK LoaderBlock, LoaderBlockVA;
398 KERNEL_ENTRY_POINT KiSystemStartup;
399 PLDR_DATA_TABLE_ENTRY KernelDTE, HalDTE, KdComDTE = NULL;
400 // Mm-related things
401 PVOID GdtIdt;
402 ULONG PcrBasePage=0;
403 ULONG TssBasePage=0;
404
405 //sprintf(MsgBuffer,"Booting Microsoft(R) Windows(R) OS version '%04x' is not implemented yet", OperatingSystemVersion);
406 //UiMessageBox(MsgBuffer);
407
408 // Open the operating system section
409 // specified in the .ini file
410 if (!IniOpenSection(OperatingSystemName, &SectionId))
411 {
412 sprintf(MsgBuffer,"Operating System section '%s' not found in freeldr.ini", OperatingSystemName);
413 UiMessageBox(MsgBuffer);
414 return;
415 }
416
417 UiDrawBackdrop();
418 UiDrawStatusText("Detecting Hardware...");
419 UiDrawProgressBarCenter(1, 100, "Loading Windows...");
420
421 /* Make sure the system path is set in the .ini file */
422 if (!IniReadSettingByName(SectionId, "SystemPath", FullPath, sizeof(FullPath)))
423 {
424 UiMessageBox("System path not specified for selected operating system.");
425 return;
426 }
427
428 /* Special case for LiveCD */
429 if (!_strnicmp(FullPath, "LiveCD", strlen("LiveCD")))
430 {
431 strcpy(BootPath, FullPath + strlen("LiveCD"));
432 MachDiskGetBootPath(FullPath, sizeof(FullPath));
433 strcat(FullPath, BootPath);
434 }
435
436 /* Convert FullPath to SystemRoot */
437 PathSeparator = strstr(FullPath, "\\");
438 strcpy(SystemRoot, PathSeparator);
439 strcat(SystemRoot, "\\");
440
441 /* Read booting options */
442 if (!IniReadSettingByName(SectionId, "Options", BootOptions, sizeof(BootOptions)))
443 {
444 /* Nothing read, make the string empty */
445 strcpy(BootOptions, "");
446 }
447
448 /* Let user know we started loading */
449 UiDrawStatusText("Loading...");
450
451 /* append a backslash */
452 strcpy(BootPath, FullPath);
453 if ((strlen(BootPath)==0) ||
454 BootPath[strlen(BootPath)] != '\\')
455 strcat(BootPath, "\\");
456
457 DPRINTM(DPRINT_WINDOWS,"BootPath: '%s'\n", BootPath);
458
459 /* Allocate and minimalistic-initialize LPB */
460 AllocateAndInitLPB(&LoaderBlock);
461
462 /* Detect hardware */
463 UseRealHeap = TRUE;
464 LoaderBlock->ConfigurationRoot = MachHwDetect();
465
466 /* Load kernel */
467 strcpy(FileName, BootPath);
468 strcat(FileName, "SYSTEM32\\NTOSKRNL.EXE");
469 Status = WinLdrLoadImage(FileName, LoaderSystemCode, &NtosBase);
470 DPRINTM(DPRINT_WINDOWS, "Ntos loaded with status %d at %p\n", Status, NtosBase);
471
472 /* Load HAL */
473 strcpy(FileName, BootPath);
474 strcat(FileName, "SYSTEM32\\HAL.DLL");
475 Status = WinLdrLoadImage(FileName, LoaderHalCode, &HalBase);
476 DPRINTM(DPRINT_WINDOWS, "HAL loaded with status %d at %p\n", Status, HalBase);
477
478 /* Load kernel-debugger support dll */
479 if (OperatingSystemVersion > _WIN32_WINNT_WIN2K)
480 {
481 strcpy(FileName, BootPath);
482 strcat(FileName, "SYSTEM32\\KDCOM.DLL");
483 Status = WinLdrLoadImage(FileName, LoaderBootDriver, &KdComBase);
484 DPRINTM(DPRINT_WINDOWS, "KdCom loaded with status %d at %p\n", Status, KdComBase);
485 }
486
487 /* Allocate data table entries for above-loaded modules */
488 WinLdrAllocateDataTableEntry(LoaderBlock, "ntoskrnl.exe",
489 "WINDOWS\\SYSTEM32\\NTOSKRNL.EXE", NtosBase, &KernelDTE);
490 WinLdrAllocateDataTableEntry(LoaderBlock, "hal.dll",
491 "WINDOWS\\SYSTEM32\\HAL.DLL", HalBase, &HalDTE);
492 if (OperatingSystemVersion > _WIN32_WINNT_WIN2K)
493 {
494 WinLdrAllocateDataTableEntry(LoaderBlock, "kdcom.dll",
495 "WINDOWS\\SYSTEM32\\KDCOM.DLL", KdComBase, &KdComDTE);
496 }
497
498 /* Load all referenced DLLs for kernel, HAL and kdcom.dll */
499 strcpy(FileName, BootPath);
500 strcat(FileName, "SYSTEM32\\");
501 WinLdrScanImportDescriptorTable(LoaderBlock, FileName, KernelDTE);
502 WinLdrScanImportDescriptorTable(LoaderBlock, FileName, HalDTE);
503 if (KdComDTE)
504 WinLdrScanImportDescriptorTable(LoaderBlock, FileName, KdComDTE);
505
506 /* Load Hive, and then NLS data, OEM font, and prepare boot drivers list */
507 Status = WinLdrLoadAndScanSystemHive(LoaderBlock, BootPath);
508 DPRINTM(DPRINT_WINDOWS, "SYSTEM hive loaded and scanned with status %d\n", Status);
509
510 /* Load boot drivers */
511 Status = WinLdrLoadBootDrivers(LoaderBlock, BootPath);
512 DPRINTM(DPRINT_WINDOWS, "Boot drivers loaded with status %d\n", Status);
513
514 /* Alloc PCR, TSS, do magic things with the GDT/IDT */
515 WinLdrSetupForNt(LoaderBlock, &GdtIdt, &PcrBasePage, &TssBasePage);
516
517 /* Initialize Phase 1 - no drivers loading anymore */
518 WinLdrInitializePhase1(LoaderBlock, BootOptions, SystemRoot, BootPath, OperatingSystemVersion);
519
520 /* Save entry-point pointer and Loader block VAs */
521 KiSystemStartup = (KERNEL_ENTRY_POINT)KernelDTE->EntryPoint;
522 LoaderBlockVA = PaToVa(LoaderBlock);
523
524 /* "Stop all motors", change videomode */
525 if (OperatingSystemVersion < _WIN32_WINNT_WIN2K)
526 MachPrepareForReactOS(TRUE);
527 else
528 MachPrepareForReactOS(FALSE);
529
530 /* Debugging... */
531 //DumpMemoryAllocMap();
532
533 /* Turn on paging mode of CPU*/
534 WinLdrTurnOnPaging(LoaderBlock, PcrBasePage, TssBasePage, GdtIdt);
535
536 /* Save final value of LoaderPagesSpanned */
537 LoaderBlock->Extension->LoaderPagesSpanned = LoaderPagesSpanned;
538
539 DPRINTM(DPRINT_WINDOWS, "Hello from paged mode, KiSystemStartup %p, LoaderBlockVA %p!\n",
540 KiSystemStartup, LoaderBlockVA);
541
542 WinLdrpDumpMemoryDescriptors(LoaderBlockVA);
543 WinLdrpDumpBootDriver(LoaderBlockVA);
544 WinLdrpDumpArcDisks(LoaderBlockVA);
545
546 //FIXME: If I substitute this debugging checkpoint, GCC will "optimize away" the code below
547 //while (1) {};
548 /*asm(".intel_syntax noprefix\n");
549 asm("test1:\n");
550 asm("jmp test1\n");
551 asm(".att_syntax\n");*/
552
553 /* Pass control */
554 (*KiSystemStartup)(LoaderBlockVA);
555
556 return;
557 }
558
559 VOID
560 WinLdrpDumpMemoryDescriptors(PLOADER_PARAMETER_BLOCK LoaderBlock)
561 {
562 PLIST_ENTRY NextMd;
563 PMEMORY_ALLOCATION_DESCRIPTOR MemoryDescriptor;
564
565 NextMd = LoaderBlock->MemoryDescriptorListHead.Flink;
566
567 while (NextMd != &LoaderBlock->MemoryDescriptorListHead)
568 {
569 MemoryDescriptor = CONTAINING_RECORD(NextMd, MEMORY_ALLOCATION_DESCRIPTOR, ListEntry);
570
571 DPRINTM(DPRINT_WINDOWS, "BP %08X PC %04X MT %d\n", MemoryDescriptor->BasePage,
572 MemoryDescriptor->PageCount, MemoryDescriptor->MemoryType);
573
574 NextMd = MemoryDescriptor->ListEntry.Flink;
575 }
576 }
577
578 VOID
579 WinLdrpDumpBootDriver(PLOADER_PARAMETER_BLOCK LoaderBlock)
580 {
581 PLIST_ENTRY NextBd;
582 PBOOT_DRIVER_LIST_ENTRY BootDriver;
583
584 NextBd = LoaderBlock->BootDriverListHead.Flink;
585
586 while (NextBd != &LoaderBlock->BootDriverListHead)
587 {
588 BootDriver = CONTAINING_RECORD(NextBd, BOOT_DRIVER_LIST_ENTRY, Link);
589
590 DPRINTM(DPRINT_WINDOWS, "BootDriver %wZ DTE %08X RegPath: %wZ\n", &BootDriver->FilePath,
591 BootDriver->LdrEntry, &BootDriver->RegistryPath);
592
593 NextBd = BootDriver->Link.Flink;
594 }
595 }
596
597 VOID
598 WinLdrpDumpArcDisks(PLOADER_PARAMETER_BLOCK LoaderBlock)
599 {
600 PLIST_ENTRY NextBd;
601 PARC_DISK_SIGNATURE ArcDisk;
602
603 NextBd = LoaderBlock->ArcDiskInformation->DiskSignatureListHead.Flink;
604
605 while (NextBd != &LoaderBlock->ArcDiskInformation->DiskSignatureListHead)
606 {
607 ArcDisk = CONTAINING_RECORD(NextBd, ARC_DISK_SIGNATURE, ListEntry);
608
609 DPRINTM(DPRINT_WINDOWS, "ArcDisk %s checksum: 0x%X, signature: 0x%X\n",
610 ArcDisk->ArcName, ArcDisk->CheckSum, ArcDisk->Signature);
611
612 NextBd = ArcDisk->ListEntry.Flink;
613 }
614 }
615
616