Subversion Repositories HelenOS-historic

Rev

Rev 251 | Rev 275 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 251 Rev 273
1
#
1
#
2
# Copyright (C) 2001-2004 Ondrej Palkovsky
2
# Copyright (C) 2001-2004 Ondrej Palkovsky
3
# All rights reserved.
3
# All rights reserved.
4
#
4
#
5
# Redistribution and use in source and binary forms, with or without
5
# Redistribution and use in source and binary forms, with or without
6
# modification, are permitted provided that the following conditions
6
# modification, are permitted provided that the following conditions
7
# are met:
7
# are met:
8
#
8
#
9
# - Redistributions of source code must retain the above copyright
9
# - Redistributions of source code must retain the above copyright
10
#   notice, this list of conditions and the following disclaimer.
10
#   notice, this list of conditions and the following disclaimer.
11
# - Redistributions in binary form must reproduce the above copyright
11
# - Redistributions in binary form must reproduce the above copyright
12
#   notice, this list of conditions and the following disclaimer in the
12
#   notice, this list of conditions and the following disclaimer in the
13
#   documentation and/or other materials provided with the distribution.
13
#   documentation and/or other materials provided with the distribution.
14
# - The name of the author may not be used to endorse or promote products
14
# - The name of the author may not be used to endorse or promote products
15
#   derived from this software without specific prior written permission.
15
#   derived from this software without specific prior written permission.
16
#
16
#
17
# THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17
# THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18
# IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18
# IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19
# OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19
# OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20
# IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20
# IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21
# INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21
# INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22
# NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22
# NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23
# DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23
# DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24
# THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24
# THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25
# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25
# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26
# THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26
# THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27
#
27
#
28
 
28
 
29
#define __ASM__
29
#define __ASM__
30
 
30
 
31
#include <arch/mm/page.h>	
31
#include <arch/mm/page.h>	
32
#include <arch/mm/ptl.h>
32
#include <arch/mm/ptl.h>
33
#include <arch/pm.h>
33
#include <arch/pm.h>
34
#include <arch/cpu.h>
34
#include <arch/cpu.h>
35
 
35
 
36
#define START_STACK     0x7c00	
36
#define START_STACK     0x7c00	
37
#define START_STACK_64  0xffffffff80007c00
37
#define START_STACK_64  0xffffffff80007c00
38
					
38
					
39
#
39
#
40
# This is where we require any SPARTAN-kernel-compatible boot loader
40
# This is where we require any SPARTAN-kernel-compatible boot loader
41
# to pass control in real mode.
41
# to pass control in real mode.
42
#
42
#
43
# Protected mode tables are statically initialised during compile
43
# Protected mode tables are statically initialised during compile
44
# time. So we can just load the respective table registers and
44
# time. So we can just load the respective table registers and
45
# switch to protected mode.
45
# switch to protected mode.
46
#
46
#
47
.section K_TEXT_START
47
.section K_TEXT_START
48
.code16
48
.code16
49
.global kernel_image_start
49
.global kernel_image_start
50
kernel_image_start:
50
kernel_image_start:
51
	cli
51
	cli
52
	xorw %ax,%ax
52
	xorw %ax,%ax
53
	movw %ax,%ds
53
	movw %ax,%ds
54
	movw %ax,%ss            # initialize stack segment register
54
	movw %ax,%ss            # initialize stack segment register
55
	movl $(START_STACK),%esp	# initialize stack pointer
55
	movl $(START_STACK),%esp	# initialize stack pointer
56
	
56
	
57
	call memmap_arch_init
57
	call memmap_arch_init
58
	
58
	
59
	movl $0x80000000, %eax  
59
	movl $0x80000000, %eax  
60
	cpuid
60
	cpuid
61
	cmp $0x80000000, %eax 	# any function > 80000000h?
61
	cmp $0x80000000, %eax 	# any function > 80000000h?
62
	jbe no_long_mode
62
	jbe no_long_mode
63
	movl $0x80000001, %eax	# Extended function code 80000001
63
	movl $0x80000001, %eax	# Extended function code 80000001
64
	cpuid
64
	cpuid
65
	bt $29, %edx 		# Test if long mode is supported.
65
	bt $29, %edx 		# Test if long mode is supported.
66
	jnc no_long_mode
66
	jnc no_long_mode
67
 
67
 
68
	# Load gdtr, idtr
68
	# Load gdtr, idtr
69
	lgdt gdtr_inst
69
	lgdt bsp_bootstrap_gdtr
70
	# Load idtr, but it contains mess - we should not get interrupt
-
 
71
	# anyway
-
 
72
	lidt idtr_inst
-
 
73
	
70
	
74
	movl %cr0,%eax
71
	movl %cr0,%eax
75
	orl $0x1,%eax
72
	orl $0x1,%eax
76
	movl %eax,%cr0			# switch to protected mode
73
	movl %eax,%cr0			# switch to protected mode
77
 
74
 
78
	jmpl $gdtselector(KTEXT32_DES), $now_in_prot
75
	jmpl $gdtselector(KTEXT32_DES), $now_in_prot
79
 
76
 
80
no_long_mode:
77
no_long_mode:
81
1:
78
1:
82
	jmp 1b
79
	jmp 1b
83
 
80
 
84
# Protected 16-bit. We want to reuse the code-seg descriptor,
81
# Protected 16-bit. We want to reuse the code-seg descriptor,
85
# the Default operand size must not be 1 when entering long mode	
82
# the Default operand size must not be 1 when entering long mode	
86
now_in_prot:  
83
now_in_prot:  
87
	# Set up stack & data descriptors
84
	# Set up stack & data descriptors
88
	movw $gdtselector(KDATA_DES), %ax
85
	movw $gdtselector(KDATA_DES), %ax
89
	movw %ax, %ds
86
	movw %ax, %ds
90
	movw %ax, %fs
87
	movw %ax, %fs
91
	movw %ax, %gs
88
	movw %ax, %gs
92
	movw %ax, %ss
89
	movw %ax, %ss
93
 
90
 
94
	# Enable 64-bit page transaltion entries - CR4.PAE = 1.
91
	# Enable 64-bit page transaltion entries - CR4.PAE = 1.
95
	# Paging is not enabled until after long mode is enabled
92
	# Paging is not enabled until after long mode is enabled
96
	movl %cr4, %eax
93
	movl %cr4, %eax
97
	btsl $5, %eax
94
	btsl $5, %eax
98
	movl %eax, %cr4
95
	movl %eax, %cr4
99
 
96
 
100
	# Set up paging tables
97
	# Set up paging tables
101
	leal ptl_0, %eax
98
	leal ptl_0, %eax
102
	movl %eax, %cr3
99
	movl %eax, %cr3
103
		
100
		
104
	# Enable long mode
101
	# Enable long mode
105
	movl $EFER_MSR_NUM, %ecx   # EFER MSR number
102
	movl $EFER_MSR_NUM, %ecx   # EFER MSR number
106
	rdmsr                   # Read EFER
103
	rdmsr                   # Read EFER
107
	btsl $AMD_LME_FLAG, %eax            # Set LME=1
104
	btsl $AMD_LME_FLAG, %eax            # Set LME=1
108
	wrmsr                   # Write EFER
105
	wrmsr                   # Write EFER
109
	
106
	
110
	# Enable paging to activate long mode (set CR0.PG=1)
107
	# Enable paging to activate long mode (set CR0.PG=1)
111
	movl %cr0, %eax
108
	movl %cr0, %eax
112
	btsl $31, %eax
109
	btsl $31, %eax
113
	movl %eax, %cr0
110
	movl %eax, %cr0
114
	
111
	
115
	# At this point we are in compatibility mode
112
	# At this point we are in compatibility mode
116
	jmpl $gdtselector(KTEXT_DES), $start64
113
	jmpl $gdtselector(KTEXT_DES), $start64
117
 
114
 
118
.code64
115
.code64
119
start64:
116
start64:
120
	movq $(START_STACK_64), %rsp
117
	movq $(START_STACK_64), %rsp
121
	
118
	
122
	call main_bsp   # never returns
119
	call main_bsp   # never returns
123
1:
120
1:
124
	jmp 1b
121
	jmp 1b
125
				
122
				
126
.section K_DATA_START
123
.section K_DATA_START
127
.align 4096
124
.align 4096
128
 
125
 
129
# Identical mapping of first 16MB and the same of -2GB -> 0	
126
# Identical mapping of first 16MB and the same of -2GB -> 0	
130
.global ptl_2
127
.global ptl_2
131
ptl_2:	
128
ptl_2:	
132
	.quad 0x0 | (PTL_WRITABLE | PTL_PRESENT | PTL_2MB_PAGE)
129
	.quad 0x0 | (PTL_WRITABLE | PTL_PRESENT | PTL_2MB_PAGE)
133
	.quad 0x200000 | (PTL_WRITABLE | PTL_PRESENT | PTL_2MB_PAGE)
130
	.quad 0x200000 | (PTL_WRITABLE | PTL_PRESENT | PTL_2MB_PAGE)
134
	.quad 0x400000 | (PTL_WRITABLE | PTL_PRESENT | PTL_2MB_PAGE)
131
	.quad 0x400000 | (PTL_WRITABLE | PTL_PRESENT | PTL_2MB_PAGE)
135
	.quad 0x600000 | (PTL_WRITABLE | PTL_PRESENT | PTL_2MB_PAGE)
132
	.quad 0x600000 | (PTL_WRITABLE | PTL_PRESENT | PTL_2MB_PAGE)
136
	.quad 0x800000 | (PTL_WRITABLE | PTL_PRESENT | PTL_2MB_PAGE)
133
	.quad 0x800000 | (PTL_WRITABLE | PTL_PRESENT | PTL_2MB_PAGE)
137
	.quad 0xa00000 | (PTL_WRITABLE | PTL_PRESENT | PTL_2MB_PAGE)
134
	.quad 0xa00000 | (PTL_WRITABLE | PTL_PRESENT | PTL_2MB_PAGE)
138
	.quad 0xc00000 | (PTL_WRITABLE | PTL_PRESENT | PTL_2MB_PAGE)
135
	.quad 0xc00000 | (PTL_WRITABLE | PTL_PRESENT | PTL_2MB_PAGE)
139
	.quad 0xe00000 | (PTL_WRITABLE | PTL_PRESENT | PTL_2MB_PAGE)
136
	.quad 0xe00000 | (PTL_WRITABLE | PTL_PRESENT | PTL_2MB_PAGE)
140
	
137
	
141
.align 4096
138
.align 4096
142
.global ptl_1
139
.global ptl_1
143
ptl_1:
140
ptl_1:
144
	.quad ptl_2 + (PTL_WRITABLE | PTL_PRESENT)
141
	.quad ptl_2 + (PTL_WRITABLE | PTL_PRESENT)
145
	.fill 509,8,0
142
	.fill 509,8,0
146
	.quad ptl_2 + (PTL_WRITABLE | PTL_PRESENT)
143
	.quad ptl_2 + (PTL_WRITABLE | PTL_PRESENT)
147
	.fill 2,8,0
144
	.fill 2,8,0
148
	
145
	
149
.align 4096
146
.align 4096
150
.global ptl_0
147
.global ptl_0
151
ptl_0:
148
ptl_0:
152
	.quad ptl_1 + (PTL_WRITABLE | PTL_PRESENT)
149
	.quad ptl_1 + (PTL_WRITABLE | PTL_PRESENT)
153
	.fill 510,8,0
150
	.fill 510,8,0
154
	.quad ptl_1 + (PTL_WRITABLE | PTL_PRESENT)
151
	.quad ptl_1 + (PTL_WRITABLE | PTL_PRESENT)
155
 
152
 
156
.global gdtr_inst				
153
.global gdtr_inst				
157
gdtr_inst:
154
bsp_bootstrap_gdtr:
158
	.word gdtselector(GDT_ITEMS)
155
	.word gdtselector(GDT_ITEMS)
159
	.long KA2PA(gdt)
156
	.long KA2PA(gdt)
160
 
157
 
161
.global idtr_inst
158
.global ap_bootstrap_gdtr
162
idtr_inst:
159
ap_bootstrap_gdtr:
163
	.word idtselector(IDT_ITEMS)
160
	.word gdtselector(GDT_ITEMS)
164
	.long KA2PA(idt)
161
	.long KA2PA(gdt)
165
 
162
 
-
 
163

Generated by GNU Enscript 1.6.6.
-
 
164
 
-
 
165
 
-
 
166