mkinitrd-magellan/isolinux/highmem.inc

;; $Id: highmem.inc,v 1.1 2007-09-01 22:44:04 niro Exp $
;; -----------------------------------------------------------------------
;;   
;;   Copyright 1994-2004 H. Peter Anvin - All Rights Reserved
;;
;;   This program is free software; you can redistribute it and/or modify
;;   it under the terms of the GNU General Public License as published by
;;   the Free Software Foundation, Inc., 53 Temple Place Ste 330,
;;   Boston MA 02111-1307, USA; either version 2 of the License, or
;;   (at your option) any later version; incorporated herein by reference.
;;
;; -----------------------------------------------------------------------

;;
;; highmem.inc
;; 
;; Probe for the size of high memory.  This can be overridden by a
;; mem= command on the command line while booting a new kernel.
;;

		section .text

;
; This is set up as a subroutine; it will set up the global variable
; HighMemSize.  All registers are preserved.  Assumes DS == CS.
;
highmemsize:
		push es
		pushad

;
; First, try INT 15:E820 (get BIOS memory map)
;
get_e820:
		xor ebx,ebx			; Start with first record
		mov dword [E820Max],-(1 << 20)	; Max amount of high memory
		mov dword [E820Mem],ebx		; Detected amount of high memory
		mov es,bx			; Need ES = DS = 0 for now
		jmp short .do_e820		; Skip "at end" check first time!
.int_loop:	and ebx,ebx			; If we're back at beginning...
		jz .e820_done			; ... we're done
.do_e820:	mov eax,0000E820h
		mov edx,534D4150h		; "SMAP" backwards
		xor ecx,ecx
		mov cl,20			; ECX <- 20
		mov di,E820Buf
		int 15h
		jnc .no_carry
		; If carry, ebx == 0 means error, ebx != 0 means we're done
		and ebx,ebx
		jnz .e820_done
		jmp no_e820
.no_carry:
		cmp eax,534D4150h
		jne no_e820
;
; Look for a memory block starting at <= 1 MB and continuing upward
;
		cmp dword [E820Buf+4], byte 0
		ja .int_loop			; Start >= 4 GB?
		mov edx, (1 << 20)
		sub edx, [E820Buf]
		jnb .ram_range			; Start >= 1 MB?
		; If we get here, it starts > 1 MB but < 4 GB; if this is a
		; *non*-memory range, remember this as unusable; some BIOSes
		; get the length of primary RAM wrong!
		cmp dword [E820Buf+16], byte 1
		je .int_loop			; If it's memory, don't worry about it
		neg edx				; This means what for memory limit?
		cmp edx,[E820Max]		; Better or worse
		jnb .int_loop
		mov [E820Max],edx
		jmp .int_loop
		
.ram_range:
		stc
		sbb eax,eax			; eax <- 0xFFFFFFFF
		cmp dword [E820Buf+12], byte 0
		ja .huge			; Size >= 4 GB
		mov eax, [E820Buf+8]
.huge:		sub eax, edx			; Adjust size to start at 1 MB
		jbe .int_loop			; Completely below 1 MB?

		; Now EAX contains the size of memory 1 MB...up
		cmp dword [E820Buf+16], byte 1
		jne .int_loop			; High memory isn't usable memory!!!!

		; We're good!
		mov [E820Mem],eax
		jmp .int_loop			; Still need to add low 1 MB

.e820_done:
		mov eax,[E820Mem]
		and eax,eax
		jz no_e820			; Nothing found by E820?
		cmp eax,[E820Max]		; Make sure we're not limited
		jna got_highmem_add1mb
		mov eax,[E820Max]
		jmp got_highmem_add1mb

;
; INT 15:E820 failed.  Try INT 15:E801.
;
no_e820:
		mov ax,0e801h			; Query high memory (semi-recent)
		int 15h
		jc no_e801
		cmp ax,3c00h
		ja no_e801			; > 3C00h something's wrong with this call
		jb e801_hole			; If memory hole we can only use low part

		mov ax,bx
		shl eax,16			; 64K chunks
		add eax,(16 << 20)		; Add first 16M
		jmp short got_highmem				

;
; INT 15:E801 failed.  Try INT 15:88.
;
no_e801:
		mov ah,88h			; Query high memory (oldest)
		int 15h
		cmp ax,14*1024			; Don't trust memory >15M
		jna e801_hole
		mov ax,14*1024
e801_hole:
		and eax,0ffffh
		shl eax,10			; Convert from kilobytes
got_highmem_add1mb:
		add eax,(1 << 20)		; First megabyte
got_highmem:
%if HIGHMEM_SLOP != 0
		sub eax,HIGHMEM_SLOP
%endif
		mov [HighMemSize],eax
		popad
		pop es
		ret				; Done!

		section .bss
		alignb 4
E820Buf		resd 5			; INT 15:E820 data buffer
E820Mem		resd 1			; Memory detected by E820
E820Max		resd 1			; Is E820 memory capped?
HighMemSize	resd 1			; End of memory pointer (bytes)
1	;; $Id: highmem.inc,v 1.1 2007-09-01 22:44:04 niro Exp $
2	;; -----------------------------------------------------------------------
3	;;
4	;; Copyright 1994-2004 H. Peter Anvin - All Rights Reserved
5	;;
6	;; This program is free software; you can redistribute it and/or modify
7	;; it under the terms of the GNU General Public License as published by
8	;; the Free Software Foundation, Inc., 53 Temple Place Ste 330,
9	;; Boston MA 02111-1307, USA; either version 2 of the License, or
10	;; (at your option) any later version; incorporated herein by reference.
11	;;
12	;; -----------------------------------------------------------------------
13
14	;;
15	;; highmem.inc
16	;;
17	;; Probe for the size of high memory. This can be overridden by a
18	;; mem= command on the command line while booting a new kernel.
19	;;
20
21	section .text
22
23	;
24	; This is set up as a subroutine; it will set up the global variable
25	; HighMemSize. All registers are preserved. Assumes DS == CS.
26	;
27	highmemsize:
28	push es
29	pushad
30
31	;
32	; First, try INT 15:E820 (get BIOS memory map)
33	;
34	get_e820:
35	xor ebx,ebx ; Start with first record
36	mov dword [E820Max],-(1 << 20) ; Max amount of high memory
37	mov dword [E820Mem],ebx ; Detected amount of high memory
38	mov es,bx ; Need ES = DS = 0 for now
39	jmp short .do_e820 ; Skip "at end" check first time!
40	.int_loop: and ebx,ebx ; If we're back at beginning...
41	jz .e820_done ; ... we're done
42	.do_e820: mov eax,0000E820h
43	mov edx,534D4150h ; "SMAP" backwards
44	xor ecx,ecx
45	mov cl,20 ; ECX <- 20
46	mov di,E820Buf
47	int 15h
48	jnc .no_carry
49	; If carry, ebx == 0 means error, ebx != 0 means we're done
50	and ebx,ebx
51	jnz .e820_done
52	jmp no_e820
53	.no_carry:
54	cmp eax,534D4150h
55	jne no_e820
56	;
57	; Look for a memory block starting at <= 1 MB and continuing upward
58	;
59	cmp dword [E820Buf+4], byte 0
60	ja .int_loop ; Start >= 4 GB?
61	mov edx, (1 << 20)
62	sub edx, [E820Buf]
63	jnb .ram_range ; Start >= 1 MB?
64	; If we get here, it starts > 1 MB but < 4 GB; if this is a
65	; non-memory range, remember this as unusable; some BIOSes
66	; get the length of primary RAM wrong!
67	cmp dword [E820Buf+16], byte 1
68	je .int_loop ; If it's memory, don't worry about it
69	neg edx ; This means what for memory limit?
70	cmp edx,[E820Max] ; Better or worse
71	jnb .int_loop
72	mov [E820Max],edx
73	jmp .int_loop
74
75	.ram_range:
76	stc
77	sbb eax,eax ; eax <- 0xFFFFFFFF
78	cmp dword [E820Buf+12], byte 0
79	ja .huge ; Size >= 4 GB
80	mov eax, [E820Buf+8]
81	.huge: sub eax, edx ; Adjust size to start at 1 MB
82	jbe .int_loop ; Completely below 1 MB?
83
84	; Now EAX contains the size of memory 1 MB...up
85	cmp dword [E820Buf+16], byte 1
86	jne .int_loop ; High memory isn't usable memory!!!!
87
88	; We're good!
89	mov [E820Mem],eax
90	jmp .int_loop ; Still need to add low 1 MB
91
92	.e820_done:
93	mov eax,[E820Mem]
94	and eax,eax
95	jz no_e820 ; Nothing found by E820?
96	cmp eax,[E820Max] ; Make sure we're not limited
97	jna got_highmem_add1mb
98	mov eax,[E820Max]
99	jmp got_highmem_add1mb
100
101	;
102	; INT 15:E820 failed. Try INT 15:E801.
103	;
104	no_e820:
105	mov ax,0e801h ; Query high memory (semi-recent)
106	int 15h
107	jc no_e801
108	cmp ax,3c00h
109	ja no_e801 ; > 3C00h something's wrong with this call
110	jb e801_hole ; If memory hole we can only use low part
111
112	mov ax,bx
113	shl eax,16 ; 64K chunks
114	add eax,(16 << 20) ; Add first 16M
115	jmp short got_highmem
116
117	;
118	; INT 15:E801 failed. Try INT 15:88.
119	;
120	no_e801:
121	mov ah,88h ; Query high memory (oldest)
122	int 15h
123	cmp ax,14*1024 ; Don't trust memory >15M
124	jna e801_hole
125	mov ax,14*1024
126	e801_hole:
127	and eax,0ffffh
128	shl eax,10 ; Convert from kilobytes
129	got_highmem_add1mb:
130	add eax,(1 << 20) ; First megabyte
131	got_highmem:
132	%if HIGHMEM_SLOP != 0
133	sub eax,HIGHMEM_SLOP
134	%endif
135	mov [HighMemSize],eax
136	popad
137	pop es
138	ret ; Done!
139
140	section .bss
141	alignb 4
142	E820Buf resd 5 ; INT 15:E820 data buffer
143	E820Mem resd 1 ; Memory detected by E820
144	E820Max resd 1 ; Is E820 memory capped?
145	HighMemSize resd 1 ; End of memory pointer (bytes)