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