]> git.saurik.com Git - apple/xnu.git/blame - osfmk/i386/startup64.c
xnu-1699.26.8.tar.gz
[apple/xnu.git] / osfmk / i386 / startup64.c
CommitLineData
0c530ab8
A
1/*
2 * Copyright (c) 2006 Apple Computer, Inc. All rights reserved.
3 *
2d21ac55 4 * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
0c530ab8 5 *
2d21ac55
A
6 * This file contains Original Code and/or Modifications of Original Code
7 * as defined in and that are subject to the Apple Public Source License
8 * Version 2.0 (the 'License'). You may not use this file except in
9 * compliance with the License. The rights granted to you under the License
10 * may not be used to create, or enable the creation or redistribution of,
11 * unlawful or unlicensed copies of an Apple operating system, or to
12 * circumvent, violate, or enable the circumvention or violation of, any
13 * terms of an Apple operating system software license agreement.
0c530ab8 14 *
2d21ac55
A
15 * Please obtain a copy of the License at
16 * http://www.opensource.apple.com/apsl/ and read it before using this file.
17 *
18 * The Original Code and all software distributed under the License are
19 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
0c530ab8
A
20 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
21 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
2d21ac55
A
22 * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
23 * Please see the License for the specific language governing rights and
24 * limitations under the License.
0c530ab8 25 *
2d21ac55 26 * @APPLE_OSREFERENCE_LICENSE_HEADER_END@
0c530ab8
A
27 */
28
29#include <string.h>
30
31#include <mach/machine/vm_types.h>
32
33#include <mach/boolean.h>
34#include <kern/thread.h>
35#include <kern/zalloc.h>
36
37#include <kern/lock.h>
38#include <kern/kalloc.h>
39#include <kern/spl.h>
40
41#include <vm/pmap.h>
42#include <vm/vm_map.h>
43#include <vm/vm_kern.h>
44#include <mach/vm_param.h>
45#include <mach/vm_prot.h>
46#include <vm/vm_object.h>
47#include <vm/vm_page.h>
48
49#include <mach/machine/vm_param.h>
50#include <machine/thread.h>
51
52#include <kern/misc_protos.h> /* prototyping */
53#include <i386/misc_protos.h>
54
55#include <i386/cpuid.h>
56#include <i386/cpu_data.h>
57#include <i386/mp.h>
58#include <i386/cpu_number.h>
59#include <i386/machine_cpu.h>
0c530ab8
A
60#include <i386/seg.h>
61
62#include <vm/vm_protos.h>
63
64#include <sys/kdebug.h>
65
66#include <i386/postcode.h>
67
b0d623f7 68#ifdef __i386__
0c530ab8
A
69void
70cpu_IA32e_enable(cpu_data_t *cdp)
71{
0c530ab8
A
72 assert(!ml_get_interrupts_enabled());
73
2d21ac55
A
74 if (!cdp->cpu_is64bit ||
75 (rdmsr64(MSR_IA32_EFER) & MSR_IA32_EFER_LMA) != 0)
76 return;
0c530ab8 77
2d21ac55 78 postcode(CPU_IA32_ENABLE_ENTRY);
0c530ab8 79
2d21ac55
A
80 /*
81 * The following steps are performed by inlines so that
82 * we can be assured we don't use the stack or any other
83 * non-identity mapped data while paging is turned off...
84 */
85 /* Turn paging off */
86 asm volatile(
87 "mov %%cr0, %%eax \n\t"
88 "andl %0, %%eax \n\t"
89 "mov %%eax, %%cr0 \n\t"
90 :
91 : "i" (~CR0_PG)
92 : "eax" );
93
94 /* Pop new top level phys pg addr into CR3 */
95 asm volatile(
96 "mov %%eax, %%cr3 \n\t"
97 :
98 : "a" ((uint32_t) kernel64_cr3));
99
100 /* Turn on the 64-bit mode bit */
101 asm volatile(
102 "rdmsr \n\t"
103 "orl %1, %%eax \n\t"
104 "wrmsr \n\t"
105 :
106 : "c" (MSR_IA32_EFER), "i" (MSR_IA32_EFER_LME)
107 : "eax", "edx");
108
109 /* Turn paging on again */
110 asm volatile(
111 "mov %%cr0, %%eax \n\t"
112 "orl %0, %%eax \n\t"
113 "mov %%eax, %%cr0 \n\t"
114 :
115 : "i" (CR0_PG)
116 : "eax" );
117
4a3eedf9 118#if ONLY_SAFE_FOR_LINDA_SERIAL
0c530ab8 119 kprintf("cpu_IA32e_enable(%p)\n", cdp);
4a3eedf9 120#endif
0c530ab8
A
121
122 if ((rdmsr64(MSR_IA32_EFER) & MSR_IA32_EFER_LMA) == 0)
123 panic("cpu_IA32e_enable() MSR_IA32_EFER_LMA not asserted");
124
125 cdp->cpu_kernel_cr3 = kernel64_cr3;
126
127 postcode(CPU_IA32_ENABLE_EXIT);
128}
129
130void
131cpu_IA32e_disable(cpu_data_t *cdp)
132{
0c530ab8
A
133 assert(!ml_get_interrupts_enabled());
134
135 postcode(CPU_IA32_DISABLE_ENTRY);
136
2d21ac55
A
137 if (!cdp->cpu_is64bit ||
138 (rdmsr64(MSR_IA32_EFER) & MSR_IA32_EFER_LMA) == 0)
139 return;
140
141 /*
142 * The following steps are performed by inlines so that
143 * we can be assured we don't use the stack or any other
144 * non-identity mapped data while paging is turned off...
145 */
146 /* Turn paging off */
147 asm volatile(
148 "mov %%cr0, %%eax \n\t"
149 "andl %0, %%eax \n\t"
150 "mov %%eax, %%cr0 \n\t"
151 :
152 : "i" (~CR0_PG)
153 : "eax" );
154
155 /* Pop legacy top level phys pg addr into CR3 */
156 asm volatile(
157 "mov %%eax, %%cr3 \n\t"
158 :
159 : "a" ((uint32_t) lo_kernel_cr3));
160
161 /* Turn off the 64-bit mode bit */
162 asm volatile(
163 "rdmsr \n\t"
164 "andl %1, %%eax \n\t"
165 "wrmsr \n\t"
166 :
167 : "c" (MSR_IA32_EFER), "i" (~MSR_IA32_EFER_LME)
168 : "eax", "edx");
169
170 /* Turn paging on again */
171 asm volatile(
172 "mov %%cr0, %%eax \n\t"
173 "orl %0, %%eax \n\t"
174 "mov %%eax, %%cr0 \n\t"
175 :
176 : "i" (CR0_PG)
177 : "eax" );
178
0c530ab8
A
179 kprintf("cpu_IA32e_disable(%p)\n", cdp);
180
181 if ((rdmsr64(MSR_IA32_EFER) & MSR_IA32_EFER_LMA) != 0)
182 panic("cpu_IA32e_disable() MSR_IA32_EFER_LMA not cleared");
183
184 cdp->cpu_kernel_cr3 = 0ULL;
185
186 postcode(CPU_IA32_DISABLE_EXIT);
187}
b0d623f7 188#endif
0c530ab8
A
189
190#if DEBUG
191extern void dump_gdt(void *);
192extern void dump_ldt(void *);
193extern void dump_idt(void *);
194extern void dump_tss(void *);
195extern void dump_frame32(x86_saved_state_compat32_t *scp);
196extern void dump_frame64(x86_saved_state64_t *sp);
197extern void dump_frame(x86_saved_state_t *sp);
198
199void
200dump_frame(x86_saved_state_t *sp)
201{
202 if (is_saved_state32(sp))
203 dump_frame32((x86_saved_state_compat32_t *) sp);
204 else if (is_saved_state64(sp))
205 dump_frame64(&sp->ss_64);
206 else
207 kprintf("dump_frame(%p) unknown type %d\n", sp, sp->flavor);
208}
209
210void
211dump_frame32(x86_saved_state_compat32_t *scp)
212{
213 unsigned int i;
214 uint32_t *ip = (uint32_t *) scp;
215
2d21ac55 216 kprintf("dump_frame32(%p):\n", scp);
0c530ab8
A
217
218 for (i = 0;
219 i < sizeof(x86_saved_state_compat32_t)/sizeof(uint32_t);
220 i++, ip++)
2d21ac55 221 kprintf("%p: 0x%08x\n", ip, *ip);
0c530ab8
A
222
223 kprintf("scp->isf64.err: 0x%016llx\n", scp->isf64.err);
224 kprintf("scp->isf64.rip: 0x%016llx\n", scp->isf64.rip);
225 kprintf("scp->isf64.cs: 0x%016llx\n", scp->isf64.cs);
226 kprintf("scp->isf64.rflags: 0x%016llx\n", scp->isf64.rflags);
227 kprintf("scp->isf64.rsp: 0x%016llx\n", scp->isf64.rsp);
228 kprintf("scp->isf64.ss: 0x%016llx\n", scp->isf64.ss);
229
230 kprintf("scp->iss32.tag: 0x%08x\n", scp->iss32.tag);
231 kprintf("scp->iss32.state.gs: 0x%08x\n", scp->iss32.state.gs);
232 kprintf("scp->iss32.state.fs: 0x%08x\n", scp->iss32.state.fs);
233 kprintf("scp->iss32.state.es: 0x%08x\n", scp->iss32.state.es);
234 kprintf("scp->iss32.state.ds: 0x%08x\n", scp->iss32.state.ds);
235 kprintf("scp->iss32.state.edi: 0x%08x\n", scp->iss32.state.edi);
236 kprintf("scp->iss32.state.esi: 0x%08x\n", scp->iss32.state.esi);
237 kprintf("scp->iss32.state.ebp: 0x%08x\n", scp->iss32.state.ebp);
238 kprintf("scp->iss32.state.cr2: 0x%08x\n", scp->iss32.state.cr2);
239 kprintf("scp->iss32.state.ebx: 0x%08x\n", scp->iss32.state.ebx);
240 kprintf("scp->iss32.state.edx: 0x%08x\n", scp->iss32.state.edx);
241 kprintf("scp->iss32.state.ecx: 0x%08x\n", scp->iss32.state.ecx);
242 kprintf("scp->iss32.state.eax: 0x%08x\n", scp->iss32.state.eax);
243 kprintf("scp->iss32.state.trapno: 0x%08x\n", scp->iss32.state.eax);
244 kprintf("scp->iss32.state.eip: 0x%08x\n", scp->iss32.state.eip);
245 kprintf("scp->iss32.state.cs: 0x%08x\n", scp->iss32.state.cs);
246 kprintf("scp->iss32.state.efl: 0x%08x\n", scp->iss32.state.efl);
247 kprintf("scp->iss32.state.uesp: 0x%08x\n", scp->iss32.state.uesp);
248 kprintf("scp->iss32.state.ss: 0x%08x\n", scp->iss32.state.ss);
249
250 postcode(0x99);
251}
252
253void
254dump_frame64(x86_saved_state64_t *sp)
255{
256 unsigned int i;
257 uint64_t *ip = (uint64_t *) sp;
258
259 kprintf("dump_frame64(%p):\n", sp);
260
261 for (i = 0;
262 i < sizeof(x86_saved_state64_t)/sizeof(uint64_t);
263 i++, ip++)
2d21ac55 264 kprintf("%p: 0x%016llx\n", ip, *ip);
0c530ab8
A
265
266 kprintf("sp->isf.trapno: 0x%08x\n", sp->isf.trapno);
b0d623f7 267 kprintf("sp->isf.trapfn: 0x%016llx\n", sp->isf.trapfn);
0c530ab8
A
268 kprintf("sp->isf.err: 0x%016llx\n", sp->isf.err);
269 kprintf("sp->isf.rip: 0x%016llx\n", sp->isf.rip);
270 kprintf("sp->isf.cs: 0x%016llx\n", sp->isf.cs);
271 kprintf("sp->isf.rflags: 0x%016llx\n", sp->isf.rflags);
272 kprintf("sp->isf.rsp: 0x%016llx\n", sp->isf.rsp);
273 kprintf("sp->isf.ss: 0x%016llx\n", sp->isf.ss);
274
275 kprintf("sp->fs: 0x%016x\n", sp->fs);
276 kprintf("sp->gs: 0x%016x\n", sp->gs);
277 kprintf("sp->rax: 0x%016llx\n", sp->rax);
278 kprintf("sp->rcx: 0x%016llx\n", sp->rcx);
279 kprintf("sp->rbx: 0x%016llx\n", sp->rbx);
280 kprintf("sp->rbp: 0x%016llx\n", sp->rbp);
281 kprintf("sp->r11: 0x%016llx\n", sp->r11);
282 kprintf("sp->r12: 0x%016llx\n", sp->r12);
283 kprintf("sp->r13: 0x%016llx\n", sp->r13);
284 kprintf("sp->r14: 0x%016llx\n", sp->r14);
285 kprintf("sp->r15: 0x%016llx\n", sp->r15);
286 kprintf("sp->cr2: 0x%016llx\n", sp->cr2);
287 kprintf("sp->v_arg8: 0x%016llx\n", sp->v_arg8);
288 kprintf("sp->v_arg7: 0x%016llx\n", sp->v_arg7);
289 kprintf("sp->v_arg6: 0x%016llx\n", sp->v_arg6);
290 kprintf("sp->r9: 0x%016llx\n", sp->r9);
291 kprintf("sp->r8: 0x%016llx\n", sp->r8);
292 kprintf("sp->r10: 0x%016llx\n", sp->r10);
293 kprintf("sp->rdx: 0x%016llx\n", sp->rdx);
294 kprintf("sp->rsi: 0x%016llx\n", sp->rsi);
295 kprintf("sp->rdi: 0x%016llx\n", sp->rdi);
296
297 postcode(0x98);
298}
299
300void
301dump_gdt(void *gdtp)
302{
303 unsigned int i;
304 uint32_t *ip = (uint32_t *) gdtp;
305
2d21ac55 306 kprintf("GDT:\n");
0c530ab8
A
307 for (i = 0; i < GDTSZ; i++, ip += 2) {
308 kprintf("%p: 0x%08x\n", ip+0, *(ip+0));
309 kprintf("%p: 0x%08x\n", ip+1, *(ip+1));
310 }
311}
312
313void
314dump_ldt(void *ldtp)
315{
316 unsigned int i;
317 uint32_t *ip = (uint32_t *) ldtp;
318
2d21ac55 319 kprintf("LDT:\n");
0c530ab8
A
320 for (i = 0; i < LDTSZ_MIN; i++, ip += 2) {
321 kprintf("%p: 0x%08x\n", ip+0, *(ip+0));
322 kprintf("%p: 0x%08x\n", ip+1, *(ip+1));
323 }
324}
325
326void
327dump_idt(void *idtp)
328{
329 unsigned int i;
330 uint32_t *ip = (uint32_t *) idtp;
331
2d21ac55 332 kprintf("IDT64:\n");
0c530ab8
A
333 for (i = 0; i < 16; i++, ip += 4) {
334 kprintf("%p: 0x%08x\n", ip+0, *(ip+0));
335 kprintf("%p: 0x%08x\n", ip+1, *(ip+1));
336 kprintf("%p: 0x%08x\n", ip+2, *(ip+2));
337 kprintf("%p: 0x%08x\n", ip+3, *(ip+3));
338 }
339}
340
341void
342dump_tss(void *tssp)
343{
344 unsigned int i;
345 uint32_t *ip = (uint32_t *) tssp;
346
2d21ac55 347 kprintf("TSS64:\n");
0c530ab8
A
348 for (i = 0; i < sizeof(master_ktss64)/sizeof(uint32_t); i++, ip++) {
349 kprintf("%p: 0x%08x\n", ip+0, *(ip+0));
350 }
351}
352#endif /* DEBUG */