ab3cfbcaa240288df2bab349ff3a484ad7494dbe
[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_softint);
50         //ENV_CREATE(user_badsegment);
51         //ENV_CREATE(user_divzero);
52         //ENV_CREATE(user_hello);
53 #endif // TEST*
54
55         // We only have one user environment for now, so just run it.
56         env_run(&envs[0]);
57 }
58
59
60 /*
61  * Variable panicstr contains argument to first call to panic; used as flag
62  * to indicate that the kernel has already called panic.
63  */
64 static const char *NTS panicstr;
65
66 /*
67  * Panic is called on unresolvable fatal errors.
68  * It prints "panic: mesg", and then enters the kernel monitor.
69  */
70 void _panic(const char *file, int line, const char *fmt,...)
71 {
72         va_list ap;
73
74         if (panicstr)
75                 goto dead;
76         panicstr = fmt;
77
78         va_start(ap, fmt);
79         cprintf("kernel panic at %s:%d: ", file, line);
80         vcprintf(fmt, ap);
81         cprintf("\n");
82         va_end(ap);
83
84 dead:
85         /* break into the kernel monitor */
86         while (1)
87                 monitor(NULL);
88 }
89
90 /* like panic, but don't */
91 void _warn(const char *file, int line, const char *fmt,...) 
92 {
93         va_list ap;
94
95         va_start(ap, fmt);
96         cprintf("kernel warning at %s:%d: ", file, line);
97         vcprintf(fmt, ap);
98         cprintf("\n");
99         va_end(ap);
100 }
101
102 void print_cpuinfo(void) {
103         int func_num;
104         char vendor_id[13];
105
106         asm volatile ("subl    %0, %0;
107                    cpuid;
108                    movl    %%ebx, (%1);
109                    movl    %%edx, 4(%1);
110                    movl    %%ecx, 8(%1)"
111                       : "=a"(func_num) 
112                                   : "D"(vendor_id)
113                       : "%ebx", "%ecx", "%edx");
114
115         vendor_id[12] = '\0';
116         cprintf("Largest Standard Function Number Supported: %d\n", func_num);
117         cprintf("Vendor ID: %s\n", vendor_id);
118 }
119
120
121         /* Backup of old shit that i hoard for no reason
122          *
123          * all of this was in kernel_init
124         cprintf("6828 decimal is %o octal!\n", 6828);
125         cprintf("Symtab section should begin at: 0x%x \n", stab);
126
127         // double check
128         mboot_info = (multiboot_info_t*)(0xc0000000 + (char*)mboot_info);
129         cprintf("Mboot info address: %p\n", mboot_info);
130         elf_section_header_table_t *elf_head= &(mboot_info->u.elf_sec);
131         cprintf("elf sec info address: %p\n", elf_head);
132     cprintf ("elf_sec: num = %u, size = 0x%x, addr = 0x%x, shndx = 0x%x\n",
133             elf_head->num, elf_head->size,
134             elf_head->addr, elf_head->shndx);
135         
136         struct Secthdr *elf_sym = (struct Secthdr*)(0xc0000000 + elf_head->addr + elf_head->size * 3);
137
138         cprintf("Symtab multiboot struct address: %p\n", elf_sym);
139         cprintf("Symtab multiboot address: %p\n", elf_sym->sh_addr);
140
141         // this walks a symtable, but we don't have one...
142         Elf32_Sym* symtab = (Elf32_Sym*)stab;
143         Elf32_Sym* oldsymtab = symtab;
144         for (; symtab < oldsymtab + 10 ; symtab++) {
145                 cprintf("Symbol name index = 0x%x\n", symtab->st_name);
146                 //cprintf("Symbol name = %s\n", stabstr + symtab->st_name);
147                 cprintf("Symbol vale = 0x%x\n", symtab->st_value);
148         }
149         */
150         /*
151         extern stab_t stab[], estab[];
152         extern char stabstr[];
153         stab_t* symtab;
154         // Spits out the stabs for functions
155         for (symtab = stab; symtab < estab; symtab++) {
156                 // gives us only functions.  not really needed if we scan by address
157                 if (symtab->n_type != 36)
158                         continue;
159                 cprintf("Symbol name = %s\n", stabstr + symtab->n_strx);
160                 cprintf("Symbol type = %d\n", symtab->n_type);
161                 cprintf("Symbol value = 0x%x\n", symtab->n_value);
162                 cprintf("\n");
163         }
164         */
165
166