]>
Commit | Line | Data |
---|---|---|
1 | #include "console.h" | |
2 | #include <minilib.h> | |
3 | #include <io.h> | |
4 | #include <smram.h> | |
5 | #include <multiboot.h> | |
6 | #include <smi.h> | |
7 | ||
8 | #define INFO_SIGNATURE 0x5754454E | |
9 | ||
10 | extern char _binary_realmode_bin_start[]; | |
11 | extern int _binary_realmode_bin_size; | |
12 | ||
13 | ||
14 | ||
15 | struct info_section | |
16 | { | |
17 | unsigned int signature; | |
18 | void (*firstrun)(); | |
19 | }; | |
20 | ||
21 | void panic(const char *msg) | |
22 | { | |
23 | puts("PANIC: "); | |
24 | puts(msg); | |
25 | puts("\nSystem halted\n"); | |
26 | while(1) asm("hlt"); | |
27 | } | |
28 | ||
29 | void c_start(unsigned int magic, struct mb_info *mbinfo) | |
30 | { | |
31 | struct mod_info *mods = mbinfo->mods; | |
32 | unsigned short *grubptr = (unsigned short *)0x7CFE; | |
33 | unsigned char smramc; | |
34 | int i; | |
35 | ||
36 | void (*realmode)() = (void (*)()) 0x4000; | |
37 | ||
38 | show_cursor(); | |
39 | puts("NetWatch loader\n"); | |
40 | ||
41 | if (magic != MULTIBOOT_LOADER_MAGIC) | |
42 | panic("Bootloader was not multiboot compliant; cannot continue."); | |
43 | ||
44 | for (i = 0; i < mbinfo->mod_cnt; i++) | |
45 | { | |
46 | puts("Module found:\n"); | |
47 | puts(" Start: "); puthex(mods[i].mod_start); puts("\n"); | |
48 | puts(" Size: "); puthex(mods[i].mod_end - mods[i].mod_start); puts("\n"); | |
49 | puts(" Name: "); puts(mods[i].mod_string); puts("\n"); | |
50 | } | |
51 | ||
52 | if (mbinfo->mod_cnt != 1) | |
53 | panic("Expected exactly one module; cannot continue."); | |
54 | ||
55 | puts("Current USB state is: "); puthex(pci_read16(0, 31, 2, 0xC0)); puts(" "); puthex(pci_read16(0, 31, 4, 0xC0)); puts("\n"); | |
56 | puts("Current SMI state is: "); puthex(inl(0x830)); puts("\n"); | |
57 | puts("Current SMRAMC state is: "); puthex(pci_read8(0, 0, 0, 0x70)); puts("\n"); | |
58 | ||
59 | smi_disable(); | |
60 | ||
61 | /* Try really hard to shut up USB_LEGKEY. */ | |
62 | pci_write16(0, 31, 2, 0xC0, pci_read16(0, 31, 2, 0xC0)); | |
63 | pci_write16(0, 31, 2, 0xC0, 0); | |
64 | pci_write16(0, 31, 4, 0xC0, pci_read16(0, 31, 4, 0xC0)); | |
65 | pci_write16(0, 31, 4, 0xC0, 0); | |
66 | ||
67 | /* Open the SMRAM aperture and load our ELF. */ | |
68 | smram_state_t old_smramc = smram_save_state(); | |
69 | ||
70 | if (smram_aseg_set_state(SMRAM_ASEG_OPEN) != 0) | |
71 | panic("Opening SMRAM failed; cannot load ELF."); | |
72 | ||
73 | load_elf(mods[0].mod_start, mods[0].mod_end - mods[0].mod_start); | |
74 | ||
75 | struct info_section * info = (struct info_section *)0x10000; | |
76 | if (info->signature != INFO_SIGNATURE) | |
77 | { | |
78 | smram_restore_state(old_smramc); /* Restore so that video ram is touchable again. */ | |
79 | panic("Info section signature mismatch."); | |
80 | } | |
81 | ||
82 | info->firstrun(); | |
83 | smram_restore_state(old_smramc); | |
84 | ||
85 | puts("Waiting for a bit before returning to real mode..."); | |
86 | for (i=0; i<0x500000; i++) | |
87 | { | |
88 | if ((i % 0x100000) == 0) | |
89 | puts("."); | |
90 | inb(0x80); | |
91 | } | |
92 | puts("\n"); | |
93 | ||
94 | puts("Now returning to real mode.\n"); | |
95 | memcpy(0x4000, _binary_realmode_bin_start, (int)&_binary_realmode_bin_size); | |
96 | realmode(); // goodbye! | |
97 | } |