Checks for PSE support, just for yucks.
[akaros.git] / kern / init.c
1 /* See COPYRIGHT for copyright information. */
2
3 #include <inc/stdio.h>
4 #include <inc/string.h>
5 #include <inc/assert.h>
6 #include <inc/multiboot.h>
7 #include <inc/stab.h>
8
9 #include <kern/monitor.h>
10 #include <kern/console.h>
11 #include <kern/pmap.h>
12 #include <kern/kclock.h>
13 #include <kern/env.h>
14 #include <kern/trap.h>
15
16 void print_cpuinfo(void);
17
18 void kernel_init(multiboot_info_t *mboot_info)
19 {
20         extern char (BND(__this, end) edata)[], (SNT end)[];
21
22         // Before doing anything else, complete the ELF loading process.
23         // Clear the uninitialized global data (BSS) section of our program.
24         // This ensures that all static/global variables start out zero.
25         memset(edata, 0, end - edata);
26
27         // Initialize the console.
28         // Can't call cprintf until after we do this!
29         cons_init();
30
31         print_cpuinfo();
32
33         // Lab 2 memory management initialization functions
34         i386_detect_memory();
35         i386_vm_init();
36         page_init();
37         page_check();
38
39         // Lab 3 user environment initialization functions
40         env_init();
41         idt_init();
42
43         // Temporary test code specific to LAB 3
44 #if defined(TEST)
45         // Don't touch -- used by grading script!
46         ENV_CREATE2(TEST, TESTSIZE);
47 #else
48         // Touch all you want.
49         ENV_CREATE(user_hello);
50 #endif // TEST*
51
52
53         // We only have one user environment for now, so just run it.
54         env_run(&envs[0]);
55 }
56
57
58 /*
59  * Variable panicstr contains argument to first call to panic; used as flag
60  * to indicate that the kernel has already called panic.
61  */
62 static const char *NTS panicstr;
63
64 /*
65  * Panic is called on unresolvable fatal errors.
66  * It prints "panic: mesg", and then enters the kernel monitor.
67  */
68 void _panic(const char *file, int line, const char *fmt,...)
69 {
70         va_list ap;
71
72         if (panicstr)
73                 goto dead;
74         panicstr = fmt;
75
76         va_start(ap, fmt);
77         cprintf("kernel panic at %s:%d: ", file, line);
78         vcprintf(fmt, ap);
79         cprintf("\n");
80         va_end(ap);
81
82 dead:
83         /* break into the kernel monitor */
84         while (1)
85                 monitor(NULL);
86 }
87
88 /* like panic, but don't */
89 void _warn(const char *file, int line, const char *fmt,...) 
90 {
91         va_list ap;
92
93         va_start(ap, fmt);
94         cprintf("kernel warning at %s:%d: ", file, line);
95         vcprintf(fmt, ap);
96         cprintf("\n");
97         va_end(ap);
98 }
99
100 void print_cpuinfo(void) {
101         int func_num;
102         char vendor_id[13];
103
104         asm volatile ("subl    %0, %0;
105                    cpuid;
106                    movl    %%ebx, (%1);
107                    movl    %%edx, 4(%1);
108                    movl    %%ecx, 8(%1)"
109                       : "=a"(func_num) 
110                                   : "D"(vendor_id)
111                       : "%ebx", "%ecx", "%edx");
112
113         vendor_id[12] = '\0';
114         cprintf("Largest Standard Function Number Supported: %d\n", func_num);
115         cprintf("Vendor ID: %s\n", vendor_id);
116 }
117
118
119         /* Backup of old shit that i hoard for no reason
120          *
121          * all of this was in kernel_init
122         cprintf("6828 decimal is %o octal!\n", 6828);
123         cprintf("Symtab section should begin at: 0x%x \n", stab);
124
125         // double check
126         mboot_info = (multiboot_info_t*)(0xc0000000 + (char*)mboot_info);
127         cprintf("Mboot info address: %p\n", mboot_info);
128         elf_section_header_table_t *elf_head= &(mboot_info->u.elf_sec);
129         cprintf("elf sec info address: %p\n", elf_head);
130     cprintf ("elf_sec: num = %u, size = 0x%x, addr = 0x%x, shndx = 0x%x\n",
131             elf_head->num, elf_head->size,
132             elf_head->addr, elf_head->shndx);
133         
134         struct Secthdr *elf_sym = (struct Secthdr*)(0xc0000000 + elf_head->addr + elf_head->size * 3);
135
136         cprintf("Symtab multiboot struct address: %p\n", elf_sym);
137         cprintf("Symtab multiboot address: %p\n", elf_sym->sh_addr);
138
139         // this walks a symtable, but we don't have one...
140         Elf32_Sym* symtab = (Elf32_Sym*)stab;
141         Elf32_Sym* oldsymtab = symtab;
142         for (; symtab < oldsymtab + 10 ; symtab++) {
143                 cprintf("Symbol name index = 0x%x\n", symtab->st_name);
144                 //cprintf("Symbol name = %s\n", stabstr + symtab->st_name);
145                 cprintf("Symbol vale = 0x%x\n", symtab->st_value);
146         }
147         */
148         /*
149         extern stab_t stab[], estab[];
150         extern char stabstr[];
151         stab_t* symtab;
152         // Spits out the stabs for functions
153         for (symtab = stab; symtab < estab; symtab++) {
154                 // gives us only functions.  not really needed if we scan by address
155                 if (symtab->n_type != 36)
156                         continue;
157                 cprintf("Symbol name = %s\n", stabstr + symtab->n_strx);
158                 cprintf("Symbol type = %d\n", symtab->n_type);
159                 cprintf("Symbol value = 0x%x\n", symtab->n_value);
160                 cprintf("\n");
161         }
162         */
163
164