WebSVN – Kolibri OS – Diff – /kernel/trunk/boot/bootcode.inc

 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;                                                        ;;
 ;;  BOOTCODE.INC                                          ;;
 ;;                                                        ;;
-;;  16 bit bootcode for MenuetOS                          ;;
-;;                                                        ;;
+;;  KolibriOS 16-bit loader,                              ;;
-;;  Copyright 2002 Ville Turjanmaa                        ;;
-;;                                                        ;;
+;;                        based on bootcode for MenuetOS  ;;
-;;  See file COPYING for details                          ;;
 ;;                                                        ;;
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;
 ;                           16 BIT FUNCTIONS
+;
 ;==========================================================================
-print:       push  si
+putchar:
-             mov   si,leftpr-0x10000
+; in: al=character
-             call  printplain
+	mov	ah, 0Eh
+	mov	bh, 0
+	int	10h
+	ret
-             pop   si
+print:
+; in: si->string
-printplain:  pusha
+	mov	al, 186
-             mov   dx,0x1000
+	call	putchar
+	mov	al, ' '
-             mov   es,dx
+	call	putchar
-             cmp   byte [es:display_atboot-0x10000],2
-             je    printplain_exit
+printplain:
-             mov   ds,dx
+; in: si->string
-             cld
+	pusha
-             lodsb
-           prpl1:
-             mov   ah,0xe
+	lodsb
-             xor   bh,bh
+@@:
-             int   0x10
+	call	putchar
-             lodsb
+	lodsb
-             cmp   al,0
-             jne   prpl1
+	cmp	al, 0
-           printplain_exit:
+	jnz	@b
-             popa
-             ret
+	popa
+	ret
-setbase1000: push ax
-             mov  ax,0x1000
-             mov  es,ax
-             mov  ds,ax
-             pop  ax
+; Now int 16 is used for keyboard support.
-             ret
+; This is shorter, simpler and more reliable.
 if 0
 getkey:      push  ecx
            gk3:
              sub   eax,48
              pop   edx
              pop   ecx
              ret
+end if
+getkey:
+; get number in range [bl,bh] (bl,bh in ['0'..'9'])
+; in: bx=range
+; out: ax=digit (1..9, 10 for 0)
+	mov	ah, 0
+	int	16h
+	cmp	al, bl
+	jb	getkey
+	cmp	al, bh
+	ja	getkey
+	push	ax
+	call	putchar
+	pop	ax
+	and	ax, 0Fh
+	jnz	@f
+	mov	al, 10
+@@:
+	ret
+setcursor:
+; in: dl=column, dh=row
+	mov	ah, 2
+	mov	bh, 0
+	int	10h
+	ret
+macro _setcursor row,column
+{
+	mov	dx, row*256 + column
+	call	setcursor
+}
+; 16-bit data
+; videomodes table
+gr_table:
+	dw      0x112+0100000000000000b ,  640 ,  480		; 1
+	dw      0x115+0100000000000000b ,  800 ,  600		; 2
+	dw      0x118+0100000000000000b , 1024 ,  768		; 3
+	dw      0x11B+0100000000000000b , 1280 , 1024		; 4
+	dw      0x112 ,  640 , 480				; 5
+	dw      0x115 ,  800 , 600				; 6
+	dw      0x118 , 1024 , 768				; 7
+	dw      0x11B , 1280 ,1024				; 8
+	dw	0x13, 320, 200					; 9
+	dw	0x12, 640, 480					; 0
+; table for move to extended memory (int 15h, ah=87h)
+       movedesc:
+        db      0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
+        db      0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
+        db      0xff,0xff,0x0,0xa0,0x00,0x93,0x0,0x0
+        db      0xff,0xff,0x0,0x00,0x10,0x93,0x0,0x0
+        db      0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
+        db      0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
+        db      0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
         db      0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
 ;=========================================================================
+;
 ;                           16 BIT CODE
+;
+;=========================================================================
+start_of_code:
+	cld
+; \begin{diamond}[02.12.2005]
+	cmp	ax, 'KL'
+	jnz	@f
-;=========================================================================
-start_of_code:
+	mov	word [cs:cfgmanager.loader_block-0x10000], si
-; RESET 16 BIT SELECTORS/REGISTERS/STACK
+	mov	word [cs:cfgmanager.loader_block+2-0x10000], ds
-        mov  ax,0x1000
+@@:
-        mov  es,ax
+; \end{diamond}[02.12.2005]
-        mov  ds,ax
-        mov  ax,0x3000
-        mov  ss,ax
+; set up stack
-        mov  sp,0xec00
+	mov	ax, 3000h
+	mov	ss, ax
-        xor  ax,ax
-        xor  bx,bx
-        xor  cx,cx
-        xor  dx,dx
-        xor  si,si
-        xor  di,di
+	mov	sp, 0EC00h
-        xor  bp,bp
-; DRAW FRAMES
-        call setbase1000
+; set up segment registers
+	push	cs
-        cmp  byte [es:display_atboot-0x10000],2
+	pop	ds
-        je   no_mode_atboot
-        mov  ax,0x0003
+	push	cs
-        mov  bx,0x0000
+	pop	es
         mov  dx,0x0000
-        int  0x10
+; set videomode
 	mov	ax, 3
-   no_mode_atboot:
+        int  0x10
- ; Load & set russian VGA font (RU.INC)
         mov  bp,RU_FNT1-10000h   ; RU_FNT1 - First part
-          mov  bx,1000h            ; 768 bytes
+ ; Load & set russian VGA font (RU.INC)
-          mov  cx,30h              ; 48 symbols
+        mov  bp,RU_FNT1-10000h   ; RU_FNT1 - First part
-          mov  dx,80h              ; 128 - position of first symbol
+          mov  bx,1000h            ; 768 bytes
-        mov  ax,1100h
+          mov  cx,30h              ; 48 symbols
-          push cs
+          mov  dx,80h              ; 128 - position of first symbol
-          pop  es
-          int  10h
         mov  ax,1100h
-        mov  bp,RU_FNT2-10000h   ; RU_FNT2 -Second part
+          int  10h
+        mov  bp,RU_FNT2-10000h   ; RU_FNT2 -Second part
+        mov  bx,1000h            ; 512 bytes
+        mov  cx,20h              ; 32 symbols
-        mov  bx,1000h            ; 512 bytes
+        mov  dx,0E0h             ; 224 - position of first symbol
-        mov  cx,20h              ; 32 symbols
+        mov  ax,1100h
-        mov  dx,0E0h             ; 224 - position of first symbol
+          int  10h
+ ; End set VGA russian font
-        mov  ax,1100h
-          push cs
+; draw frames
-          pop  es
+	push	0xb800
-          int  10h
+	pop	es
+	xor	di, di
+;        mov  si,d80x25-0x10000
+;        mov  cx,80*25
+;        mov  ah,1*16+15
+;       dfl1:
+;        lodsb
+;        stosw
+;        loop dfl1
+	mov	ah, 1*16+15
+; draw top
- ; End set VGA russian font
+	mov	si, d80x25_top - 0x10000
+	mov	cx, d80x25_top_num * 80
+@@:
+	lodsb
+	stosw
-        call setbase1000
+	loop	@b
-        mov  ax,0xb800
+; draw spaces
+	mov	si, space_msg - 0x10000
+	mov	cx, 25 - d80x25_top_num - d80x25_bottom_num
+dfl1:
-        mov  es,ax
+	push	cx
+	push	si
+	mov	cx, 80
+@@:
+	lodsb
+	stosw
+	loop	@b
+	pop	si
-        mov  di,0
+	pop	cx
-        mov  si,d80x25-0x10000
-        mov  cx,80*25
-        mov  ah,1*16+15
-       dfl1:
-        cld
+	loop	dfl1
-        lodsb
-        stosw
-        loop dfl1
+; draw bottom
+	mov	si, d80x25_bottom - 0x10000
 	mov	cx, d80x25_bottom_num * 80
-        call setbase1000
+@@:
 	lodsb
+	stosw
-; SAY HI TO USER
+	loop	@b
-        mov     si,linef2-0x10000
+	mov	byte [space_msg-0x10000+80], 0	; now space_msg is null terminated
         call    printplain
-        mov     si,version-0x10000
+	_setcursor d80x25_top_num,0
-        call    print
 ; TEST FOR 386+
 ; TEST FOR 386+
 	mov	bx, 0x4000
         pushf
         pop     ax
-        mov     dx,ax
-        xor     ax,0x4000
-        push    ax
-        popf
+        mov     dx,ax
-        pushf
-        pop     ax
-        and     ax,0x4000
-        and     dx,0x4000
-        cmp     ax,dx
-        jnz     cpugood
-        mov     si,not386-0x10000
-        call    print
-        jmp     $
-     cpugood:
+        xor     ax,bx
-; RESET 32 BIT SELECTORS/REGISTERS/SELECTORS
-        mov  ax,0x1000
-        mov  es,ax
-        mov  ds,ax
+        push    ax
         popf
-        mov  ax,0x3000
+        pushf
 ;       test     al,2      ;ïðîâåðêà áèòà ãîòîâíîñòè
 ;       loopnz   test_kbd
     mov   al,0xf6         ; Ñáðîñ êëàâèàòóðû, ðàçðåøèòü ñêàíèðîâàíèå
     out   0x60,al
-        mov     cx,0
+    xor   cx,cx
 wait_loop:       ; variant 2
 ; reading state of port of 8042 controller
         in      al,64h
         and     al,00000010b  ; ready flag
 ; wait until 8042 controller is ready
         loopnz  wait_loop
 ; DISPLAY VESA INFORMATION
-        mov     ax,0x0
+	push	0
-        mov     es,ax
+	pop	es
         mov     ax,0x4f00
-        mov     di,0xa000
-        int     0x10
-        cmp     ax,0x004f
-        je      vesaok2
+        mov     di,0xa000
-        mov     dx,0x1000
-        mov     es,dx
-        mov     si,novesa-0x10000
-        call    print
+        int     0x10
-        mov     ax,16
+        cmp     ax,0x004f
-        jmp     novesafound
-       vesaok2:
+        mov	si, novesa-0x10000
-        mov     ax,[es:di+4]
-        mov     dx,ax
-        add     ax,'0'*256+'0'
+        jnz	@f
-        push    word 0x1000
+        mov     ax,[es:di+4]
-        pop     es
-        mov     [es:vervesa+vervesa_off-0x10000], ah
-        mov     [es:vervesa+vervesa_off+2-0x10000], al
-        ; ivan 24/11/2004 begin
+        add     ax,'0'*256+'0'
-        ;push    ax
+        mov     [vervesa+vervesa_off-0x10000], ah
-        ; ivan 24/11/2004 end
-        mov     si,vervesa-0x10000
-        call    print
-      novesafound:
-        call    setbase1000
+        mov     [vervesa+vervesa_off+2-0x10000], al
+        mov     si,vervesa-0x10000
+@@:     call    print
+; \begin{diamond}[30.11.2005]
+cfgmanager:
+; settings:
+; a) preboot_graph = graphical mode
+;    preboot_gprobe = probe this mode?
+; b) preboot_mtrr = use hardware acceleration?
+; c) preboot_vrrm = use VRR?
+; d) preboot_device = from what boot?
+	mov	si, preboot_graph-0x10000
+; check bootloader block
+	cmp	[.loader_block-0x10000], 0
+	jz	.noloaderblock
+	les	bx, [.loader_block-0x10000]
+	cmp	byte [es:bx], 1
+	jz	@f
+	mov	si, loader_block_error-0x10000
+	call	print
+	jmp	$
+@@:
+	test	byte [es:bx+1], 1
+	jz	@f
+; image in memory present
+	cmp	[si+preboot_device-preboot_graph], 0
+	jnz	@f
+	mov	[si+preboot_device-preboot_graph], 3
+@@:
+.noloaderblock:
+; determine default settings
+	mov	[.bSettingsChanged-0x10000], 0
+	cmp	byte [si], 0
+	jnz	.preboot_gr_end
+	mov	[si+preboot_gprobe-preboot_graph], 0
+	mov	al, [vervesa+vervesa_off-0x10000]
+	cmp	al, 'x'
+	jz	.novesa
+	cmp	al, '1'
+	jz	.vesa12
+	mov	[si+preboot_gprobe-preboot_graph], 2
+	mov	al, 3
+	jmp	@f
+.vesa12:
+	mov	al, 7
+	jmp	@f
+.novesa:
+	mov	al, 10
+@@:
+	mov	[si], al
+.preboot_gr_end:
+	cmp	[si+preboot_mtrr-preboot_graph], 1
+	adc	[si+preboot_mtrr-preboot_graph], 0
+	cmp	[si+preboot_vrrm-preboot_graph], 1
+	adc	[si+preboot_vrrm-preboot_graph], 0
+	cmp	[si+preboot_device-preboot_graph], 1
+	adc	[si+preboot_device-preboot_graph], 0
+; notify user
+	mov	si, linef-0x10000
+	call	print
+	mov	si, start_msg-0x10000
+	call	print
+	mov	si, time_msg-0x10000
+	call	print
+; get start time
+	call	.gettime
+	mov	[.starttime-0x10000], eax
+; set timer interrupt handler
+	cli
+	push	0
+	pop	es
+	mov	eax, [es:8*4]
+	mov	[.oldtimer-0x10000], eax
+	mov	word [es:8*4], .newtimer-0x10000
+	mov	[es:8*4+2], cs
+.printcfg:
+	_setcursor 9,0
+	mov	si, current_cfg_msg-0x10000
+	call	print
+	mov	si, curvideo_msg-0x10000
+	call	print
+	mov	al, [preboot_graph-0x10000]
+	cmp	al, 8
+	ja	.pnovesa
+	mov	dl, al
+	and	eax, 3
+	mov	si, [modes_msg-0x10000+eax*2]
+	call	printplain
+	mov	si, modevesa20-0x10000
+	cmp	dl, 4
+	jbe	@f
+	mov	si, modevesa12-0x10000
+@@:
+	call	printplain
+	cmp	dl, 4
+	ja	.x
+	mov	si, probeno_msg-0x10000
+	cmp	[preboot_gprobe-0x10000], 2
+	jnz	@f
+	mov	si, probeok_msg-0x10000
+@@:
+	call	printplain
+.x:
+	jmp	.c
+.pnovesa:
+	cmp	al, 9
+	mov	si, mode9-0x10000
+	jz	@b
+	mov	si, mode10-0x10000
+	jmp	@b
+.c:
+	mov	si, linef-0x10000
+	call	printplain
+	mov	si, mtrr_msg-0x10000
+	call	print
+	mov	si, on_msg-0x10000
+	cmp	[preboot_mtrr-0x10000], 1
+	jz	@f
+	mov	si, off_msg-0x10000
+@@:
+	call	printplain
+	mov	si, vrrm_msg-0x10000
+	call	print
+	mov	si, on_msg-0x10000
+	cmp	[preboot_vrrm-0x10000], 1
+	jz	@f
+	mov	si, off_msg-0x10000
+@@:
+	call	printplain
+	mov	si, preboot_device_msg-0x10000
+	call	print
+	mov	al, [preboot_device-0x10000]
+	and	eax, 3
+	mov	si, [preboot_device_msgs-0x10000+eax*2]
+	call	printplain
+.wait:
+; empty BIOS keyboard buffer
+	_setcursor 25,0		; out of screen
+; wait for keypressed
+	mov	ah, 0
+	int	16h
+	push	ax
+; restore timer interrupt
+	push	0
+	pop	es
+	mov	ecx, [.oldtimer-0x10000]
+	mov	[es:8*4], ecx
+	_setcursor 7,0
+	mov	si, space_msg-0x10000
+	call	printplain
+	pop	ax
+; switch on key
+	cmp	al, 13
+	jz	.continue
+	or	al, 20h
+	cmp	al, 'a'
+	jz	.change_a
+	cmp	al, 'b'
+	jz	.change_b
+	cmp	al, 'c'
+	jz	.change_c
+	cmp	al, 'd'
+	jnz	.wait
+	_setcursor 15,0
+	mov     si,bdev-0x10000
+	call    printplain
+	mov     bx,'13'
+	call    getkey
+	mov	[preboot_device-0x10000], al
+	_setcursor 13,0
+.d:
+	mov	[.bSettingsChanged-0x10000], al
+	mov	si, space_msg-0x10000
+	call	printplain
+	_setcursor 15,0
+	mov	cx, 6
+@@:
+	call	printplain
+	loop	@b
+	jmp	.printcfg
+.change_a:
+	_setcursor 15,0
+	mov	si, gr_mode-0x10000
+	call    printplain
+	mov     bx, '09'
+	call    getkey
+	mov	[preboot_graph-0x10000], al
+	cmp	al, 4
+	ja	@f
+	mov	si, probetext-0x10000
+	call	printplain
+	mov	bx, '12'
+	call	getkey
+	mov	[preboot_gprobe-0x10000], al
+@@:
+	_setcursor 10,0
+	jmp	.d
+.change_b:
+	_setcursor 15,0
+	mov	si, gr_acc-0x10000
+	call	printplain
+	mov	bx, '12'
+	call	getkey
+	mov	[preboot_mtrr-0x10000], al
+	_setcursor 11,0
+	jmp	.d
+.change_c:
+	_setcursor 15,0
+	mov	si, vrrmprint-0x10000
+	call	printplain
+	mov	bx, '12'
+	call	getkey
+	mov	[preboot_vrrm-0x10000], al
+	_setcursor 12,0
+	jmp	.d
+.oldtimer dd ?
+.starttime dd ?
+.bSettingsChanged db ?
+.loader_block dd 0
+.gettime:
+	mov	ah, 0
+	int	1Ah
+	xchg	ax, cx
+	shl	eax, 10h
+	xchg	ax, dx
+	ret
+.newtimer:
+	push	ds
+	push	cs
+	pop	ds
+	pushf
+	call	[.oldtimer-0x10000]
+	pushad
+	call	.gettime
+	sub	eax, [.starttime-0x10000]
+	sub	ax, 18*5
+	jae	.timergo
+	neg	ax
+	add	ax, 18-1
+	mov	bx, 18
+	xor	dx, dx
+	div	bx
+if lang eq ru
+; ¯®¤®¦¤¨â¥ 5 á¥ªã¤, 4/3/2 á¥ªã¤ë, 1 á¥ªã¤ã
+	cmp	al, 5
+	mov	cl, ' '
+	jae	@f
+	cmp	al, 1
+	mov	cl, 'ã'
+	jz	@f
+	mov	cl, 'ë'
+@@:	mov	[time_str+9-0x10000], cl
+else
+; wait 5/4/3/2 seconds, 1 second
+	cmp	al, 1
+	mov	cl, 's'
+	ja	@f
+	mov	cl, ' '
+@@:	mov	[time_str+9-0x10000], cl
+end if
+	add	al, '0'
+	mov	[time_str+1-0x10000], al
+	mov	si, time_msg-0x10000
+	_setcursor 7,0
+	call	print
+	_setcursor 25,0
+	popad
+	pop	ds
+	iret
+.timergo:
+	push	0
+	pop	es
+	mov	eax, [.oldtimer-0x10000]
+	mov	[es:8*4], eax
+	mov	sp, 0EC00h
+.continue:
+	sti
+	_setcursor 6,0
+	mov	si, space_msg-0x10000
+	call	printplain
+	call	printplain
+	_setcursor 6,0
+	mov	si, loading_msg-0x10000
+	call	print
+	_setcursor 15,0
+	cmp	[.bSettingsChanged-0x10000], 0
+	jz	.load
+	cmp	[.loader_block-0x10000], 0
+	jz	.load
+	les	bx, [.loader_block-0x10000]
+	mov	eax, [es:bx+3]
+	push	ds
+	pop	es
+	test	eax, eax
+	jz	.load
+	push	eax
+	mov	si, save_quest-0x10000
+	call	print
+.waityn:
+	mov	ah, 0
+	int	16h
+	or	al, 20h
+	cmp	al, 'n'
+	jz	.loadc
+	cmp	al, 'y'
+	jnz	.waityn
+	call	putchar
+	pop	eax
+	push	cs
+	push	.cont-0x10000
+	push	eax
+	retf
+.loadc:
+	pop	eax
+.cont:
+	push	cs
+	pop	ds
+	_setcursor 15,0
+	mov	si, space_msg-0x10000
-        ; ivan 24/11/2004 begin
+	call	printplain
-        ;pop     bx
+	_setcursor 15,0
-        ; ivan 24/11/2004 end
+.load:
 ; \end{diamond}[02.12.2005]
 ; ASK GRAPHICS MODE
-        movzx   eax,byte [es:preboot_graph-0x10000]
-        cmp     eax,0
+	movzx	ax, [preboot_graph-0x10000]
-        jne     pre_graph
+	test	ax, ax
-        mov     si,gr_mode-0x10000
-        call    printplain
-       gml0:
-        mov     ebx,0x0A01
-        call    getkey
-       pre_graph:
-        cmp     eax,1
-        jl      sgml1
-        cmp     eax,8
-        jg      sgml1
-        mov     si,ax
-        sub     si,1
-        shl     si,4
+        jne     pre_graph
-        add     si,gr_table-0x10000
-        mov     bx,[es:si+0]
-        mov     cx,[es:si+4]
-        mov     dx,[es:si+8]
-        jmp     gml10
-       sgml1:
-        cmp     al,9
-        jnz     gml00
-        mov     bx,0x13
-        mov     cx,640
-        mov     dx,480
-        push    word 0x0
-        pop     es
-        mov     [es:0x9000],byte 32
-        mov     dword [es:0x9018],0x800000
-        push    word 0x1000
-        pop     es
-        jmp     gml10
-       gml00:
-        cmp     al,0xa
+        mov     si,gr_mode-0x10000
+        call    printplain
+        mov     bx,'09'
+        call    getkey
+       pre_graph:
+	push	0
+	pop	es
+; address is gr_table+6*(ax-1)-0x10000
+        add	ax, ax
-        jnz     gml02
+        lea	si, [gr_table-0x10000 + eax + eax*2 - 6]
-        mov     bx,0x12
+        mov     bx,[si+0]
-        mov     cx,640
-        mov     dx,480
-        push    word 0x0
-        pop     es
+        mov     cx,[si+2]
-        mov     [es:0x9000],byte 32
-        mov     dword [es:0x9018],0x800000
-        push    word 0x1000
-        pop     es
-        jmp     gml10
-       gml02:
-        jmp     gml0
-       gr_table:
-        dd      0x112+0100000000000000b ,  640 ,  480 , 0
-        dd      0x115+0100000000000000b ,  800 ,  600 , 0
-        dd      0x118+0100000000000000b , 1024 ,  768 , 0
-        dd      0x11B+0100000000000000b , 1280 , 1024 , 0
-        dd      0x112 ,  640 , 480 , 0
-        dd      0x115 ,  800 , 600 , 0
+        mov     dx,[si+4]
-        dd      0x118 , 1024 , 768 , 0
+        cmp	al, 9*2
-        dd      0x11B , 1280 ,1024 , 0
+        jb	@f
-       gml10:
-        push    word 0x0000
-        pop     es
+        mov	byte [es:0x9000], 32
-        mov     [es:0x9008],bx
-        mov     [es:0x900A],cx
+        mov	dword [es:0x9018], 0x800000
-        mov     [es:0x900C],dx
-        push    word 0x1000
+       @@:
-        pop     es
-        mov     ax,32
+        mov     [es:0x9008],bx
-        cmp     bx,0x13
+        mov     [es:0x900A],cx
-        je      nov
+        mov     [es:0x900C],dx
-        cmp     bx,0x12
+        mov     ax,32
-        je      nov
+        test	bh, bh
         jz	nov
 ; USE DEFAULTS OR PROBE
 ; bx - mode : cx - x size : dx - y size
      ;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
-        movzx   ax,[es:preboot_gprobe-0x10000]
+        movzx   ax,[preboot_gprobe-0x10000]
         test    ax,ax
         jne     pre_probe
      ;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
         test    bx,0100000000000000b
         jz      noprobe
      probemore:
         mov     ax,0x4f01
         mov     cx,bx
-        and     cx,0xfff
-        push    word 0x0000
-        pop     es
+        and     cx,0xfff
         mov     di,0xa000
         int     0x10
         mov     eax,[es:di]       ; lfb ?
-        test    eax,10000000b
-        jz      newprobe
+	test	byte [es:di], 80h	; lfb?
+	jz	newprobe
-        mov     eax,[es:di+0x12]  ; x size ?
+	mov	ax, [es:di+0x12]	; x size?
-        cmp     ax,word [esp+2]
-        jne     newprobe
+	cmp	ax, [esp+2]
-        mov     eax,[es:di+0x14]  ; y size ?
+	jnz	newprobe
-        cmp     ax,dx
-        jne     newprobe
+	cmp	[es:di+0x14], dx	; y size?
-        movzx   eax,byte [es:di+0x19]
+	jnz	newprobe
-        cmp     eax,32 ;24
-        jb      newprobe
 	cmp	byte [es:di+0x19], 32 ;24
-        push    word 0x0000        ; save probed mode
+	jb	newprobe
-        pop     es
-        add     bx,0100000000000000b
-        mov     [es:0x9008],bx
-        push    word 0x1000
-        pop     es
-        push    bx
-        mov     si,prid-0x10000
-        call    printplain
+        add     bx,0100000000000000b
         mov     [es:0x9008],bx
-        pop     bx dx cx
+        pop	dx cx
      noprobe:
 ; FIND VESA 2.0 LFB & BPP
-        mov     ax,0x4f01
+; FIND VESA 2.0 LFB & BPP
         mov     cx,bx
-        and     cx,0xfff
+        mov     ax,0x4f01
-        push    word 0x0000
-        pop     es
-        mov     di,0xa000
-        int     0x10
+        mov     cx,bx
-        ; LFB
+        and     cx,0xfff
-        mov     ecx,[es:di+0x28]
-        mov     [es:0x9018],ecx
+        mov     di,0xa000
-        ; BPP
+        int     0x10
-        movzx   ax,byte [es:di+0x19]
+        ; LFB
+        mov     ecx,[es:di+0x28]
-        mov     [es:0x9000],ax
+        mov     [es:0x9018],ecx
         ; ---- vbe voodoo
         BytesPerScanLine equ 0x10
-        push ax
         mov ax, [es:di+BytesPerScanLine]
         mov [es:0x9001],ax
-        pop ax
-        ; -----
+        ; BPP
-       nov:
-        cmp     ax,24
+        movzx   ax,byte [es:di+0x19]
-        jnz     nbpp24
+        mov     [es:0x9000],al
-        mov     si,bt24-0x10000
-        jmp     bppl
+       nov:
-       nbpp24:
+        cmp     ax,24
-        cmp     ax,32
+        mov	si,bt24-0x10000
-        jnz     nbpp32
+        jz	bppl
-        mov     si,bt32-0x10000
+        cmp     ax,32
-        jmp     bppl
+        mov     si,bt32-0x10000
+        jz     bppl
-       nbpp32:
+        mov     si,btns-0x10000
-        mov     si,btns-0x10000
+        call    print
-        call    print
+        jmp     $
-        jmp     $
+       bppl:
-       bppl:
         call    printplain
 ; FIND VESA 1.2 PM BANK SWITCH ADDRESS
         mov     ax,0x4f0A
-        mov     bx,0x0
+	push	es
-        int     0x10
-        xor     eax,eax
+        mov     ax,0x4f0A
-        xor     ebx,ebx
+        xor	bx, bx
-        mov     ax,es
-        shl     eax,4
-        mov     bx,di
-        add     eax,ebx
+        int     0x10
-        xor     ebx,ebx
+        xor     eax,eax
-        mov     bx,[es:di]
+        mov     ax,es
-        add     eax,ebx
+        shl     eax,4
-        push    word 0x0
+        movzx   ebx,di
-        pop     es
+        add     eax,ebx
-        mov     [es:0x9014],eax
+        mov     bx,[es:di]
-        push    word 0x1000
+        add     eax,ebx
         pop     es
         mov     [es:0x9014],eax
-; GRAPHICS ACCELERATION
-        mov     al, [es:preboot_mtrr-0x10000]
-        test    al,al
+; GRAPHICS ACCELERATION
         jne     pre_mtrr
-        mov     si,gr_acc-0x10000
+        mov     al, [preboot_mtrr-0x10000]
-        call    printplain
+        test    al,al
-        mov     ebx,0x0201
+        jne     pre_mtrr
-        call    getkey
+        mov     si,gr_acc-0x10000
-      pre_mtrr:
+        call    printplain
-        push    word 0x0000
+        mov     bx,'12'
-        pop     es
+        call    getkey
-        mov     [es:0x901C],al
+      pre_mtrr:
-        push    word 0x1000
-        pop     es
-        mov     si,linef-0x10000
+        mov     [es:0x901C],al
-        call    printplain
+; commented by diamond - newlines are not used now
+;        mov     si,linef-0x10000
-; VRR_M USE
+;        call    printplain
         mov     al,[es:preboot_vrrm-0x10000]
 ;        mov     eax,1                             ; paging disabled
 ;        cmp     eax,0
 ;        jne     pre_lfb
 ;        mov     si,gr_direct-0x10000
 ;        call    printplain
-;        mov     ebx,0x0201
+;        mov     ebx,'12'
 ;        call    getkey
 ;      pre_lfb:
 ;        push    word 0x0000
 ;        pop     es
 ;        mov     [es:0x901E],al
 ;        mov     ax,0x1000
 ;        mov     es,ax
 ;        mov     si,linef-0x10000
 ;        call    printplain
-        push    0
-        pop     es
         mov     [es:0x901E],byte 1
-        push    0x1000
-        pop     es
 ; BOOT DEVICE
-        movzx   eax,byte [es:preboot_device-0x10000]
+	mov	al, [preboot_device-0x10000]
-        cmp     eax,0
+	test	al, al
-        jne     pre_device
+	jnz	pre_device
         mov     si,bdev-0x10000
         call    printplain
-        mov     ebx,0x0301
+        mov     bx,'13'
+        call    getkey
-        call    getkey
+      pre_device:
-      pre_device:
+        dec     ax
-        dec     al
+        mov     [boot_dev-0x10000],al
-        mov     [es:boot_dev-0x10000],al
+; commented by diamond - newlines are not used now
-        mov     si,linef-0x10000
+;        mov     si,linef-0x10000
-        call    printplain
+;        call    printplain
 ; READ DISKETTE TO MEMORY
         cmp     [boot_dev-0x10000],0
         jne     no_sys_on_floppy
         mov     si,diskload-0x10000
         call    print
-        mov     ax,0x0000               ; reset drive
+        xor	ax, ax			; reset drive
-        mov     dx,0x0000
+        xor	dx, dx
-        int     0x13
-        mov     cx,0x0001               ; startcyl,startsector
-        mov     dx,0x0000               ; starthead,drive
+        int     0x13
-        push    word 80*2               ; read no of sect
+        mov     cx,0x0001               ; startcyl,startsector
-       reads:
+        xor	dx, dx			; starthead,drive
-        pusha
+        push    word 80*2               ; read no of sect
-        xor     si,si
+       reads:
-       newread:
+        pusha
-        push    word 0x0
+        xor     si,si
-        pop     es
+       newread:
         mov     bx,0xa000               ; es:bx -> data area
         mov     ax,0x0200+18            ; read, no of sectors to read
         int     0x13
-        cmp     ah,0
+        test	ah, ah
         jz      goodread
-        add     si,1
+        inc	si
+        cmp     si,10
-        cmp     si,10
+        jnz     newread
-        jnz     newread
+        mov     si,badsect-0x10000
-        mov     si,badsect-0x10000
+        call    printplain
-        call    printplain
+        jmp     $
-        jmp     $
+       goodread:
+        ; move -> 1mb
-       goodread:
+        mov     si,movedesc-0x10000
-        ; move -> 1mb
+        push	es
-        mov     si,movedesc-0x10000
+        push	ds
-        push    word 0x1000
+        pop     es
-        pop     es
+        mov     cx,256*18
-        mov     cx,256*18
+        mov     ah,0x87
-        mov     ah,0x87
+        int     0x15
-        int     0x15
+        pop	es
-        cmp     ah,0                  ; was the move successfull ?
-        je      goodmove
-        mov     dx,0x3f2              ; floppy motor off
+        test    ah,ah                  ; was the move successfull ?
-        mov     al,0
+        je      goodmove
-        out     dx,al
+        mov     dx,0x3f2              ; floppy motor off
-        mov     si,memmovefailed-0x10000
+        mov     al,0
-        call    print
+        out     dx,al
-        jmp     $
+        mov     si,memmovefailed-0x10000
-      goodmove:
+        call    print
         jmp     $
-        mov     eax,[es:movedesc-0x10000+0x18+2]
-        add     eax,512*18
-        mov     [es:movedesc-0x10000+0x18+2],eax
-        popa
-        inc     dh
-        cmp     dh,2
-        jnz     bb2
-        mov     dh,0
-        inc     ch
-        pusha                        ; print prosentage
-        push    word 0x1000
-        pop     es
-        xor     eax,eax  ; 5
-        mov     al,ch
-        shr     eax,2
-        and     eax,1
+      goodmove:
+	add	dword [movedesc-0x10000+0x18+2], 512*18
+        popa
+        inc     dh
+        cmp     dh,2
+        jnz     bb2
+        mov     dh,0
+        inc     ch
+        pusha                        ; print prosentage
+        mov     si,pros-0x10000
-        mov     ebx,5
+	shr	ch, 2
-        mul     bx
+	mov	al, '5'
-        add     al,48
+	test	ch, 1
-        mov     [es:pros+1-0x10000],al
+	jnz	@f
-        xor     eax,eax  ; 10
+	mov	al, '0'
-        mov     al,ch
+@@:
-        shr     eax,3
-        add     al,48
-        mov     [es:pros-0x10000],al
-        mov     si,pros-0x10000
-        call    printplain
+	mov	[si+1], al
-        popa
-       bb2:
-        pop     ax
-        dec     ax
-        push    ax
-        cmp     ax,0
-        jnz     rs
-        jmp     readdone
-       rs:
-        jmp     reads
-       movedesc:
-        db      0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
+	shr	ch, 1
-        db      0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
+	add	ch, '0'
-        db      0xff,0xff,0x0,0xa0,0x00,0x93,0x0,0x0
-        db      0xff,0xff,0x0,0x00,0x10,0x93,0x0,0x0
 	mov	[si], ch
-        db      0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
+        call    printplain
-        db      0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
+        popa
-        db      0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
+       bb2:
-        db      0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
+        pop     ax
-       readdone:
+        dec     ax
-        pop     ax
+        push    ax
-        mov     dx,0x3f2             ; floppy motor off
+        jnz     reads
-        mov     al,0
+       readdone:
-        out     dx,al
+        pop     ax
         mov     si,backspace-0x10000
         call    printplain
         call    printplain
         mov     si,okt-0x10000
-        call    printplain
-       no_sys_on_floppy:
-        mov     ax,0x0000               ; reset drive
+        call    printplain
-        mov     dx,0x0000
-        int     0x13
+       no_sys_on_floppy:
-       mov dx,0x3f2 ; floppy motor off
+        xor	ax, ax		; reset drive
-       mov al,0
+        xor	dx, dx
-       out dx,al
+        int     0x13
+       mov dx,0x3f2 ; floppy motor off
        mov al,0
-; PAGE TABLE
        out dx,al
-        push    word 0x0000
-        pop     es
+	push	es
-        mov     ecx,[es:0x9018]
+; PAGE TABLE
         push    ecx
 	push	dword [es:0x9018]
-        map_mem equ 64                ; amount of memory to map
         map_mem equ 64                ; amount of memory to map
         mov     bx,0x6000
-        mov     es,bx                   ; [es:di] = 6000:0
+        push	0x6000
-        xor     edi,edi
+        pop	es                    ; es:di = 6000:0
-        mov     ecx,256*map_mem         ; Map (mapmem) M
+        xor     di,di
-        mov     eax,7
+        mov     cx,256*map_mem         ; Map (mapmem) M
-        cld
+        mov     eax,7
        pt2:
-        cmp     ecx,256*(map_mem-8)     ; 8 M map to LFB
+        cmp     cx,256*(map_mem-8)     ; 8 M map to LFB
         jnz     pt3
         pop     eax
         add     eax,7
        pt3:
-        cmp     ecx,256*(map_mem-12)    ; 12 M back to linear = physical
+        cmp     cx,256*(map_mem-12)    ; 12 M back to linear = physical
         jnz     pt4
         mov     eax,12*0x100000 + 7
        pt4:
         stosd
         add     eax,4096
         loop    pt2
-        mov     bx,0x7100
-        mov     es,bx
+	push	0x7100
-        xor     edi,edi
+	pop	es
-        mov     eax,8*0x100000+7
+        xor     di,di
-        mov     ecx,256*4
+        mov     eax,8*0x100000+7
-      pt5:
+        mov     cx,256*4
-        stosd
+      pt5:
-        add     eax,0x1000
+        stosd
-        loop    pt5
+        add     eax,0x1000
-; 4 KB PAGE DIRECTORY
+        loop    pt5
-        mov     bx , 0x7F00
-        mov     es , bx                 ; [es:di] = 7000:0
         xor     edi, edi
-        mov     ecx, 64 / 4
+; 4 KB PAGE DIRECTORY
         mov     eax, 0x60007            ; for 0 M
+	push	0x7F00
-        cld
+	pop	es                ; es:di = 7F00:0
-      pd4k:
+        xor     di, di
-        stosd
+        mov     cx, 64 / 4
-        add     eax, 0x1000
-        loop    pd4k
+        mov     eax, 0x60007            ; for 0 M
-        mov     dword [es:0x800],0x71007   ;map region 0x80000000-0x803FFFFF to 0x800000-0xCFFFFF
+      pd4k:
-        xor     esi,esi
+        stosd
-        mov     edi,second_base_address shr 20
+        add     eax, 0x1000
-        mov     ecx,64/4
+        loop    pd4k
-        mov     bx,0x7F00
+        mov     dword [es:0x800],0x71007   ;map region 0x80000000-0x803FFFFF to 0x800000-0xCFFFFF
-        mov     ds,bx
+        xor     si,si
-        rep     movsd
+        mov     di,second_base_address shr 20
-        mov     bx,0x1000
+        mov     cx,64/4
-        mov     ds,bx
+        rep     movs dword [es:di], [es:si]
         mov     eax, 0x7F000 +8+16      ; Page directory and enable caches
         mov     cr3, eax
-; SET GRAPHICS
         mov     dx,0x0000
-        mov     es,dx
-        mov     bx,[es:0x9008]
+; SET GRAPHICS
         mov     ax,bx                ; vga & 320x200
-        cmp     ax,0x13
+	pop	es
-        je      setgr
+        mov     bx,[es:0x9008]		; vga & 320x200
-        cmp     ax,0x12
+        mov	ax, bx
-        je      setgr
+	push	ax
-        mov     ax,0x4f02            ; Vesa
+        cmp     ax,0x13
-       setgr:
+        je      setgr
-        int     0x10
+        cmp     ax,0x12
-        cmp     ah,0
+        je      setgr
-        jz      gmok
+        mov     ax,0x4f02            ; Vesa
-        mov     si,fatalsel-0x10000
+       setgr:
-        call    print
+        int     0x10
-        jmp     $
+        test	ah,ah
         jz      gmok
-       gmok:
+        mov     si,fatalsel-0x10000
-        mov     dx,0x1000
+        call    print
-        mov     es,dx
+        jmp     $
-; set mode 0x12 graphics registers:
+       gmok:
+; set mode 0x12 graphics registers:

Subversion Repositories Kolibri OS

(root)/kernel/trunk/boot/bootcode.inc – Rev 12 → 29