First run at migrating from PIC to IOAPIC. Includes mptable parsing, moving pci to...
[akaros.git] / kern / src / init.c
1 /* See COPYRIGHT for copyright information. */
2
3 #ifdef __DEPUTY__
4 #pragma nodeputy
5 #endif
6
7 #ifdef __BSD_ON_CORE_0__
8 #include Everything For Free -- It just works!!
9 #else
10
11 #include <arch/x86.h>
12 #include <arch/apic.h>
13 #include <arch/console.h>
14 #include <arch/multiboot.h>
15 #include <arch/stab.h>
16 #include <arch/smp.h>
17
18 #include <atomic.h>
19 #include <stdio.h>
20 #include <string.h>
21 #include <assert.h>
22 #include <monitor.h>
23 #include <pmap.h>
24 #include <env.h>
25 #include <trap.h>
26 #include <testing.h>
27 #include <syscall.h>
28 #include <kclock.h>
29 #include <manager.h>
30
31 #include <rl8168.h>
32 #include <mptables.h>
33 #include <pci.h>
34
35 static void print_cpuinfo(void);
36
37 void kernel_init(multiboot_info_t *mboot_info)
38 {
39         extern char (BND(__this, end) edata)[], (SNT end)[];
40
41         // Before doing anything else, complete the ELF loading process.
42         // Clear the uninitialized global data (BSS) section of our program.
43         // This ensures that all static/global variables start out zero.
44         memset(edata, 0, end - edata);
45
46         // Initialize the console.
47         // Can't call cprintf until after we do this!
48         cons_init();
49
50         print_cpuinfo();
51
52         i386_detect_memory((multiboot_info_t*)((uint32_t)mboot_info + KERNBASE));
53         i386_print_memory_map((multiboot_info_t*)((uint32_t)mboot_info + KERNBASE));
54         i386_vm_init();
55         page_init();
56         page_check();
57
58         env_init();
59         idt_init();
60         sysenter_init();
61         timer_init();
62         mptables_parse();
63         pci_init();
64         // this returns when all other cores are done and ready to receive IPIs
65         smp_boot();
66         
67         nic_init();
68
69                 
70         /*
71         test_smp_call_functions();
72         test_checklists();
73         test_barrier();
74         test_print_info();
75         test_lapic_status_bit();
76         test_ipi_sending();
77         test_pit();
78         */
79         env_run(ENV_CREATE(parlib_matrix));     
80         //manager();
81 }
82
83 /*
84  * Panic is called on unresolvable fatal errors.
85  * It prints "panic: mesg", and then enters the kernel monitor.
86  */
87 void _panic(const char *file, int line, const char *fmt,...)
88 {
89         va_list ap;
90
91         va_start(ap, fmt);
92         cprintf("kernel panic at %s:%d, from core %d: ", file, line, lapic_get_id());
93         vcprintf(fmt, ap);
94         cprintf("\n");
95         va_end(ap);
96
97 dead:
98         /* break into the kernel monitor, if we're core 0 */
99         if (lapic_get_id()) {
100                 smp_idle();
101                 panic("should never see me");
102         }
103         while (1)
104                 monitor(NULL);
105 }
106
107 /* like panic, but don't */
108 void _warn(const char *file, int line, const char *fmt,...)
109 {
110         va_list ap;
111
112         va_start(ap, fmt);
113         cprintf("kernel warning at %s:%d, from core %d: ", file, line, lapic_get_id());
114         vcprintf(fmt, ap);
115         cprintf("\n");
116         va_end(ap);
117 }
118
119 static void print_cpuinfo(void) {
120         uint32_t eax, ebx, ecx, edx;
121         uint32_t model, family;
122         uint64_t msr_val;
123         char vendor_id[13];
124
125         asm volatile ("cpuid;"
126                   "movl    %%ebx, (%2);"
127                   "movl    %%edx, 4(%2);"
128                   "movl    %%ecx, 8(%2);"
129                       : "=a"(eax)
130                                   : "a"(0), "D"(vendor_id)
131                       : "%ebx", "%ecx", "%edx");
132
133         vendor_id[12] = '\0';
134         cprintf("Vendor ID: %s\n", vendor_id);
135         cprintf("Largest Standard Function Number Supported: %d\n", eax);
136         cpuid(0x80000000, &eax, 0, 0, 0);
137         cprintf("Largest Extended Function Number Supported: 0x%08x\n", eax);
138         cpuid(1, &eax, &ebx, &ecx, &edx);
139         family = ((eax & 0x0FF00000) >> 20) + ((eax & 0x00000F00) >> 8);
140         model = ((eax & 0x000F0000) >> 12) + ((eax & 0x000000F0) >> 4);
141         cprintf("Family: %d\n", family);
142         cprintf("Model: %d\n", model);
143         cprintf("Stepping: %d\n", eax & 0x0000000F);
144         // eventually can fill this out with SDM Vol3B App B info, or
145         // better yet with stepping info.  or cpuid 8000_000{2,3,4}
146         switch ( family << 8 | model ) {
147                 case(0x061a):
148                         cprintf("Processor: Core i7\n");
149                         break;
150                 case(0x060f):
151                         cprintf("Processor: Core 2 Duo or Similar\n");
152                         break;
153                 default:
154                         cprintf("Unknown or non-Intel CPU\n");
155         }
156         if (!(edx & 0x00000020))
157                 panic("MSRs not supported!");
158         if (!(edx & 0x00001000))
159                 panic("MTRRs not supported!");
160         if (!(edx & 0x00002000))
161                 panic("Global Pages not supported!");
162         if (!(edx & 0x00000200))
163                 panic("Local APIC Not Detected!");
164         if (ecx & 0x00200000)
165                 cprintf("x2APIC Detected\n");
166         else
167                 cprintf("x2APIC Not Detected\n");
168         cpuid(0x80000008, &eax, &ebx, &ecx, &edx);
169         cprintf("Physical Address Bits: %d\n", eax & 0x000000FF);
170         cprintf("Cores per Die: %d\n", (ecx & 0x000000FF) + 1);
171     cprintf("This core's Default APIC ID: 0x%08x\n", lapic_get_default_id());
172         msr_val = read_msr(IA32_APIC_BASE);
173         if (msr_val & MSR_APIC_ENABLE)
174                 cprintf("Local APIC Enabled\n");
175         else
176                 cprintf("Local APIC Disabled\n");
177         if (msr_val & 0x00000100)
178                 cprintf("I am the Boot Strap Processor\n");
179         else
180                 cprintf("I am an Application Processor\n");
181         cpuid(0x80000007, &eax, &ebx, &ecx, &edx);
182         if (edx & 0x00000100)
183                 printk("Invariant TSC present\n");
184         else
185                 printk("Invariant TSC not present\n");
186 }
187
188 #endif //Everything For Free