|
|
1.1 root 1: /*
2: * head.s contains the 32-bit startup code.
3: *
4: * NOTE!!! Startup happens at absolute address 0x00000000, which is also where
5: * the page directory will exist. The startup code will be overwritten by
6: * the page directory.
7: */
8: .text
9: .globl _idt,_gdt,_pg_dir
10: _pg_dir:
11: startup_32:
12: movl $0x10,%eax
13: mov %ax,%ds
14: mov %ax,%es
15: mov %ax,%fs
16: mov %ax,%gs
17: lss _stack_start,%esp
18: call setup_idt
19: call setup_gdt
20: movl $0x10,%eax # reload all the segment registers
21: mov %ax,%ds # after changing gdt. CS was already
22: mov %ax,%es # reloaded in 'setup_gdt'
23: mov %ax,%fs
24: mov %ax,%gs
25: lss _stack_start,%esp
26: xorl %eax,%eax
27: 1: incl %eax # check that A20 really IS enabled
28: movl %eax,0x000000
29: cmpl %eax,0x100000
30: je 1b
31: movl %cr0,%eax # check math chip
32: andl $0x80000011,%eax # Save PG,ET,PE
33: testl $0x10,%eax
34: jne 1f # ET is set - 387 is present
35: orl $4,%eax # else set emulate bit
36: 1: movl %eax,%cr0
37: jmp after_page_tables
38:
39: /*
40: * setup_idt
41: *
42: * sets up a idt with 256 entries pointing to
43: * ignore_int, interrupt gates. It then loads
44: * idt. Everything that wants to install itself
45: * in the idt-table may do so themselves. Interrupts
46: * are enabled elsewhere, when we can be relatively
47: * sure everything is ok. This routine will be over-
48: * written by the page tables.
49: */
50: setup_idt:
51: lea ignore_int,%edx
52: movl $0x00080000,%eax
53: movw %dx,%ax /* selector = 0x0008 = cs */
54: movw $0x8E00,%dx /* interrupt gate - dpl=0, present */
55:
56: lea _idt,%edi
57: mov $256,%ecx
58: rp_sidt:
59: movl %eax,(%edi)
60: movl %edx,4(%edi)
61: addl $8,%edi
62: dec %ecx
63: jne rp_sidt
64: lidt idt_descr
65: ret
66:
67: /*
68: * setup_gdt
69: *
70: * This routines sets up a new gdt and loads it.
71: * Only two entries are currently built, the same
72: * ones that were built in init.s. The routine
73: * is VERY complicated at two whole lines, so this
74: * rather long comment is certainly needed :-).
75: * This routine will beoverwritten by the page tables.
76: */
77: setup_gdt:
78: lgdt gdt_descr
79: ret
80:
81: .org 0x1000
82: pg0:
83:
84: .org 0x2000
85: pg1:
86:
87: .org 0x3000
88: pg2: # This is not used yet, but if you
89: # want to expand past 8 Mb, you'll have
90: # to use it.
91:
92: .org 0x4000
93: after_page_tables:
94: pushl $0 # These are the parameters to main :-)
95: pushl $0
96: pushl $0
97: pushl $L6 # return address for main, if it decides to.
98: pushl $_main
99: jmp setup_paging
100: L6:
101: jmp L6 # main should never return here, but
102: # just in case, we know what happens.
103:
104: /* This is the default interrupt "handler" :-) */
105: .align 2
106: ignore_int:
107: incb 0xb8000+160 # put something on the screen
108: movb $2,0xb8000+161 # so that we know something
109: iret # happened
110:
111:
112: /*
113: * Setup_paging
114: *
115: * This routine sets up paging by setting the page bit
116: * in cr0. The page tables are set up, identity-mapping
117: * the first 8MB. The pager assumes that no illegal
118: * addresses are produced (ie >4Mb on a 4Mb machine).
119: *
120: * NOTE! Although all physical memory should be identity
121: * mapped by this routine, only the kernel page functions
122: * use the >1Mb addresses directly. All "normal" functions
123: * use just the lower 1Mb, or the local data space, which
124: * will be mapped to some other place - mm keeps track of
125: * that.
126: *
127: * For those with more memory than 8 Mb - tough luck. I've
128: * not got it, why should you :-) The source is here. Change
129: * it. (Seriously - it shouldn't be too difficult. Mostly
130: * change some constants etc. I left it at 8Mb, as my machine
131: * even cannot be extended past that (ok, but it was cheap :-)
132: * I've tried to show which constants to change by having
133: * some kind of marker at them (search for "8Mb"), but I
134: * won't guarantee that's all :-( )
135: */
136: .align 2
137: setup_paging:
138: movl $1024*3,%ecx
139: xorl %eax,%eax
140: xorl %edi,%edi /* pg_dir is at 0x000 */
141: cld;rep;stosl
142: movl $pg0+7,_pg_dir /* set present bit/user r/w */
143: movl $pg1+7,_pg_dir+4 /* --------- " " --------- */
144: movl $pg1+4092,%edi
145: movl $0x7ff007,%eax /* 8Mb - 4096 + 7 (r/w user,p) */
146: std
147: 1: stosl /* fill pages backwards - more efficient :-) */
148: subl $0x1000,%eax
149: jge 1b
150: xorl %eax,%eax /* pg_dir is at 0x0000 */
151: movl %eax,%cr3 /* cr3 - page directory start */
152: movl %cr0,%eax
153: orl $0x80000000,%eax
154: movl %eax,%cr0 /* set paging (PG) bit */
155: ret /* this also flushes prefetch-queue */
156:
157: .align 2
158: .word 0
159: idt_descr:
160: .word 256*8-1 # idt contains 256 entries
161: .long _idt
162: .align 2
163: .word 0
164: gdt_descr:
165: .word 256*8-1 # so does gdt (not that that's any
166: .long _gdt # magic number, but it works for me :^)
167:
168: .align 3
169: _idt: .fill 256,8,0 # idt is uninitialized
170:
171: _gdt: .quad 0x0000000000000000 /* NULL descriptor */
172: .quad 0x00c09a00000007ff /* 8Mb */
173: .quad 0x00c09200000007ff /* 8Mb */
174: .quad 0x0000000000000000 /* TEMPORARY - don't use */
175: .fill 252,8,0 /* space for LDT's and TSS's etc */
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.