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


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;                                                        ;;
;;  BOOTCODE.INC                                          ;;
;;                                                        ;;
;;  KolibriOS 16-bit loader,                              ;;
;;                        based on bootcode for MenuetOS  ;;
;;                                                        ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 
 
;==========================================================================
;
;                           16 BIT FUNCTIONS
;
;==========================================================================
 
putchar:
; in: al=character
	mov	ah, 0Eh
	mov	bh, 0
	int	10h
	ret
 
print:
; in: si->string
	mov	al, 186
	call	putchar
	mov	al, ' '
	call	putchar
 
printplain:
; in: si->string
	pusha
	lodsb
@@:
	call	putchar
	lodsb
	cmp	al, 0
	jnz	@b
	popa
	ret
 
; Now int 16 is used for keyboard support.
; This is shorter, simpler and more reliable.
if 0
getkey:      push  ecx
             push  edx
             add   ebx,0x0101
             xor   eax,eax
 
           gk1:
             in    al,0x60
             mov   cl,al
           gk0:
             in    al,0x60
             cmp   al,cl
             je    gk0
             cmp   ax,11
             jg    gk0
             gk0_1:
             mov   cl,al
 
;             add   al,47
;             mov   [ds:keyinbs-0x10000],al
;             mov   si,keyinbs-0x10000
;             call  printplain
 
           gk12:
             in    al,0x60
             cmp   al,cl
             je    gk12
             cmp   ax,240
             jne   gk13
             mov   al,cl
             jmp   gk14
           gk13:
             add   cl,128
             cmp   al,cl
             jne   gk1
             sub   al,128
           gk14:
 
             movzx edx,bl
             cmp   eax,edx
             jb    gk1
             movzx edx,bh
             cmp   eax,edx
             jg    gk1
             test  ebx,0x010000
             jnz   gk3
             mov   cx,0x1000
             mov   dx,cx
             add   eax,47
             mov   cx,ax
             cmp   cx,58
             jb    gk_nozero
             sub   cx,10
           gk_nozero:
             mov   [ds:keyin-0x10000],cl
             mov   si,keyin-0x10000
             call  printplain
           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
}
 
pagetable_set:
	or	al, 7
@@:
	stosd
	add	eax, 1000h
	loop	@b
	ret
 
; 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
	mov	word [cs:cfgmanager.loader_block-0x10000], si
	mov	word [cs:cfgmanager.loader_block+2-0x10000], ds
@@:
; \end{diamond}[02.12.2005]
 
; set up stack
	mov	ax, 3000h
	mov	ss, ax
	mov	sp, 0EC00h
; set up segment registers
	push	cs
	pop	ds
	push	cs
	pop	es
 
; set videomode
	mov	ax, 3
        int  0x10
 
 ; Load & set russian VGA font (RU.INC)
        mov  bp,RU_FNT1-10000h   ; RU_FNT1 - First part
          mov  bx,1000h            ; 768 bytes
          mov  cx,30h              ; 48 symbols
          mov  dx,80h              ; 128 - position of first symbol
        mov  ax,1100h
          int  10h
 
        mov  bp,RU_FNT2-10000h   ; RU_FNT2 -Second part
        mov  bx,1000h            ; 512 bytes
        mov  cx,20h              ; 32 symbols
        mov  dx,0E0h             ; 224 - position of first symbol
        mov  ax,1100h
          int  10h
 ; End set VGA russian font
 
; draw frames
	push	0xb800
	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
	mov	si, d80x25_top - 0x10000
	mov	cx, d80x25_top_num * 80
@@:
	lodsb
	stosw
	loop	@b
; draw spaces
	mov	si, space_msg - 0x10000
	mov	cx, 25 - d80x25_top_num - d80x25_bottom_num
dfl1:
	push	cx
	push	si
	mov	cx, 80
@@:
	lodsb
	stosw
	loop	@b
	pop	si
	pop	cx
	loop	dfl1
; draw bottom
	mov	si, d80x25_bottom - 0x10000
	mov	cx, d80x25_bottom_num * 80
@@:
	lodsb
	stosw
	loop	@b
 
	mov	byte [space_msg-0x10000+80], 0	; now space_msg is null terminated
 
	_setcursor d80x25_top_num,0
 
 
; TEST FOR 386+
 
	mov	bx, 0x4000
        pushf
        pop     ax
        mov     dx,ax
        xor     ax,bx
        push    ax
        popf
        pushf
        pop     ax
        and     ax,bx
        and     dx,bx
        cmp     ax,dx
        jnz     cpugood
        mov     si,not386-0x10000
sayerr:
        call    print
        jmp     $
     cpugood:
 
; set up esp
	movzx	esp, sp
 
; FLUSH 8042 KEYBOARD CONTROLLER
 
;// mike.dld [
 ;       mov     al,0xED
 ;       out     0x60,al
 ;       or      cx,-1
 ;     @@:
 ;       in      al,0x64
 ;       test    al,2
 ;       jz      @f
 ;       loop    @b
 ;     @@:
 ;       mov     al,0
 ;       out     0x60,al
 ;       or      cx,-1
 ;     @@:
 ;       in      al,0x64
 ;       test    al,2
 ;       jz      @f
 ;       loop    @b
 ;     @@:
;// mike.dld ]
 
;       mov     ecx,10000
;      fl1:
;       in      al,0x64
;       loop    fl1
;       test    al,1
;       jz      fl2
;       in      al,0x60
;       jmp     fl1
;      fl2:
 
;****************************************************************
; The function is modified Mario79
;*****************************************************************
; wait_kbd:        ; variant 1
;       mov      cx,2500h  ;çàäåðæêà ïîðÿäêà 10 ìñåê
; test_kbd:
;       in       al,64h    ;÷èòàåì ñîñòîÿíèå êëàâèàòóðû
;       test     al,2      ;ïðîâåðêà áèòà ãîòîâíîñòè
;       loopnz   test_kbd
 
    mov   al,0xf6         ; Ñáðîñ êëàâèàòóðû, ðàçðåøèòü ñêàíèðîâàíèå
    out   0x60,al
    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
 
	push	0
	pop	es
        mov     ax,0x4f00
        mov     di,0xa000
        int     0x10
        cmp     ax,0x004f
        mov	si, novesa-0x10000
        jnz	@f
        mov     ax,[es:di+4]
        add     ax,'0'*256+'0'
 
 
        mov	si,vervesa-0x10000
        mov     [si+vervesa_off], ah
        mov     [si+vervesa_off+2], al
@@:     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	di, preboot_graph-0x10000
; check bootloader block
	cmp	[.loader_block-0x10000], 0
	jz	.noloaderblock
	les	bx, [.loader_block-0x10000]
	cmp	byte [es:bx], 1
 
	mov	si, loader_block_error-0x10000
 
	jnz	sayerr
 
	test	byte [es:bx+1], 1
	jz	@f
; image in memory present
	cmp	[di+preboot_device-preboot_graph], 0
	jnz	@f
	mov	[di+preboot_device-preboot_graph], 3
@@:
.noloaderblock:
; determine default settings
	mov	[.bSettingsChanged-0x10000], 0
	cmp	byte [di], 0
	jnz	.preboot_gr_end
	mov	[di+preboot_gprobe-preboot_graph], 0
	mov	al, [vervesa+vervesa_off-0x10000]
	cmp	al, 'x'
	jz	.novesa
	cmp	al, '1'
	jz	.vesa12
	mov	[di+preboot_gprobe-preboot_graph], 2
	mov	al, 3
	jmp	@f
.vesa12:
	mov	al, 7
	jmp	@f
.novesa:
	mov	al, 10
@@:
	mov	[di], al
.preboot_gr_end:
	cmp	[di+preboot_mtrr-preboot_graph], 1
	adc	[di+preboot_mtrr-preboot_graph], 0
	cmp	[di+preboot_vrrm-preboot_graph], 1
	adc	[di+preboot_vrrm-preboot_graph], 0
	cmp	[di+preboot_device-preboot_graph], 1
	adc	[di+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
	mov	word [.timer-0x10000], .newtimer-0x10000
	mov	word [.timer-0x10000+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
 
 
	cmp	[preboot_mtrr-0x10000], 1
 
 
 
	call	.say_on_off
	mov	si, vrrm_msg-0x10000
 
 
	cmp	[preboot_vrrm-0x10000], 1
 
 
 
	call	.say_on_off
	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:
 
	_setcursor 25,0		; out of screen
; set timer interrupt handler
	cli
	push	0
	pop	es
	mov	eax, [es:8*4]
	mov	[.oldtimer-0x10000], eax
	mov	eax, [.timer-0x10000]
	mov	[es:8*4], eax
	sti
; wait for keypressed
	mov	ah, 0
	int	16h
	push	ax
; restore timer interrupt
	push	0
	pop	es
	mov	eax, [.oldtimer-0x10000]
	mov	[es:8*4], eax
	mov	[.timer-0x10000], eax
	_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    print
	mov     bx,'13'
	call    getkey
	mov	[preboot_device-0x10000], al
	_setcursor 13,0
.d:
	mov	[.bSettingsChanged-0x10000], 1
	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	print
	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	print
	mov	bx, '12'
	call	getkey
	mov	[preboot_vrrm-0x10000], al
	_setcursor 12,0
	jmp	.d
.say_on_off:
	pushf
	call	print
	mov	si, on_msg-0x10000
	popf
	jz	@f
	mov	si, off_msg-0x10000
@@:	call	printplain
	ret
; novesa and vervesa strings are not used at the moment of executing this code
virtual at novesa
.oldtimer dd ?
.starttime dd ?
.bSettingsChanged db ?
.timer dd ?
end virtual
.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
	mov	byte [space_msg-0x10000+80], 186
	pop	eax
	push	cs
	push	.cont-0x10000
	push	eax
	retf
.loadc:
	pop	eax
.cont:
	push	cs
	pop	ds
 
 
	mov	si, space_msg-0x10000
	mov	byte [si+80], 0
	_setcursor 15,0
	call	printplain
	_setcursor 15,0
.load:
; \end{diamond}[02.12.2005]
 
; ASK GRAPHICS MODE
 
	movzx	ax, [preboot_graph-0x10000]
 
 
 
 
 
 
 
	push	0
	pop	es
; address is gr_table+6*(ax-1)-0x10000
        add	ax, ax
        lea	si, [gr_table-0x10000 + eax + eax*2 - 6]
        mov     bx,[si+0]
        mov     cx,[si+2]
        mov     dx,[si+4]
        cmp	al, 9*2
        mov	al, 32	; BPP
        jb	@f
        mov	[es:0x9000], al
        mov	dword [es:0x9018], 0x800000
       @@:
        mov     [es:0x9008],bx
        mov     [es:0x900A],cx
        mov     [es:0x900C],dx
 
        test	bh, bh
        jz	nov
 
; USE DEFAULTS OR PROBE
 
; bx - mode : cx - x size : dx - y size
 
 
	cmp	[preboot_gprobe-0x10000], 1
 
 
 
 
 
	jz	noprobe
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
        mov     bx,0x100
 
     newprobe:
        inc     bx
 
 
        cmp     bx,0x17f
 
 
        mov	si,prnotfnd-0x10000
        jz	sayerr
 
     probemore:
     	push	cx
        mov     ax,0x4f01
        mov     cx,bx
        and     cx,0xfff
        mov     di,0xa000
        int     0x10
        pop	cx
 
	test	byte [es:di], 80h	; lfb?
	jz	newprobe
	cmp	[es:di+0x12], cx	; x size?
 
	jnz	newprobe
	cmp	[es:di+0x14], dx	; y size?
	jnz	newprobe
	cmp	byte [es:di+0x19], 32 ;24
	jb	newprobe
 
;       add     bx,0100000000000000b
	or	bh, 40h
 
        mov     [es:0x9008],bx
 
     noprobe:
 
 
; FIND VESA 2.0 LFB & BPP
 
        mov     ax,0x4f01
        mov     cx,bx
        and     cx,0xfff
        mov     di,0xa000
        int     0x10
        ; LFB
        mov     eax,[es:di+0x28]
        mov     [es:0x9018],eax
        ; ---- vbe voodoo
        BytesPerScanLine equ 0x10
        mov ax, [es:di+BytesPerScanLine]
        mov [es:0x9001],ax
        ; BPP
        mov     al,byte [es:di+0x19]
        mov     [es:0x9000],al
       nov:
        cmp     al,24
        mov	si,bt24-0x10000
        jz	bppl
        cmp     al,32
        mov     si,bt32-0x10000
        jz     bppl
        mov     si,btns-0x10000
 
        jmp	sayerr
       bppl:
        call    print
 
 
; FIND VESA 1.2 PM BANK SWITCH ADDRESS
 
	push	es
        mov     ax,0x4f0A
        xor	bx, bx
        int     0x10
        xor     eax,eax
        mov     ax,es
        shl     eax,4
        movzx   ebx,di
        add     eax,ebx
        mov     bx,[es:di]
        add     eax,ebx
        pop     es
        mov     [es:0x9014],eax
 
 
; GRAPHICS ACCELERATION
 
        mov     al, [preboot_mtrr-0x10000]
 
 
 
 
 
 
 
        mov     [es:0x901C],al
 
 
 
 
 
; VRR_M USE
 
        mov     al,[preboot_vrrm-0x10000]
 
 
 
 
 
 
 
        mov     [es:0x9030],al
 
 
 
 
 
; MEMORY MODEL
 
;        movzx   eax,byte [es:preboot_memory-0x10000]
;        cmp     eax,0
;        jne     pre_mem
;;;;;;;;;;;;;;;;;;;;;;;;;
; mario79 - memory size ;
;;;;;;;;;;;;;;;;;;;;;;;;;
;           mov ax,0E801h
;;;           xor bx,bx    ; thanks to Alexei for bugfix [18.07.2004]
;           xor cx, cx
;           xor dx, dx
;           int 0x15
;           movzx ebx, dx ;bx
;           movzx eax, cx ;ax
;           shl   ebx,6   ; ïåðåâîä â êèëîáàéòû (x64)
;           add   eax,ebx
;           add eax, 1000h ;440h
;           cmp eax,40000h ; 256?
;           jge mem_256_z
;           cmp eax,20000h ; 128?
;           jge mem_128_z
;           cmp eax,10000h ; 64?
;           jge mem_64_z
;           cmp eax,8000h ; 32?
;           jge mem_32_z
;           jmp mem_16_z
;
;mem_256_z: mov     si,memokz256-0x10000
;           call    printplain
;           mov eax,5
;           jmp pre_mem
;mem_128_z: mov     si,memokz128-0x10000
;           call    printplain
;           mov eax,4
;           jmp pre_mem
;mem_64_z:  mov     si,memokz64-0x10000
;           call    printplain
;           mov eax,3
;           jmp pre_mem
;mem_32_z:  mov     si,memokz32-0x10000
;           call    printplain
;           mov eax,2
;           jmp pre_mem
;mem_16_z:  mov     si,memokz16-0x10000
;           call    printplain
;           mov eax,1
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;      pre_mem:
;        push    word 0x0000
;        pop     es
;        mov     [es:0x9030],al
;        push    word 0x1000
;        pop     es
;        mov     si,linef-0x10000
;        call    printplain
 
 
 
 
; DIRECT WRITE TO LFB, PAGING DISABLED
 
;        movzx   eax,byte [es:preboot_lfb-0x10000]
;        mov     eax,1                             ; paging disabled
;        cmp     eax,0
;        jne     pre_lfb
;        mov     si,gr_direct-0x10000
;        call    printplain
;        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
        mov     [es:0x901E],byte 1
 
 
 
; BOOT DEVICE
 
	mov	al, [preboot_device-0x10000]
 
 
 
 
 
 
 
        dec     al
        mov     [boot_dev-0x10000],al
 
 
 
 
 
 
; READ DISKETTE TO MEMORY
 
;        cmp     [boot_dev-0x10000],0
        jne     no_sys_on_floppy
        mov     si,diskload-0x10000
        call    print
        xor	ax, ax			; reset drive
        xor	dx, dx
        int     0x13
        mov     cx,0x0001               ; startcyl,startsector
        xor	dx, dx			; starthead,drive
        push    word 80*2               ; read no of sect
       reads:
        pusha
        xor     si,si
       newread:
        mov     bx,0xa000               ; es:bx -> data area
        mov     ax,0x0200+18            ; read, no of sectors to read
        int     0x13
        test	ah, ah
        jz      goodread
        inc	si
        cmp     si,10
        jnz     newread
        mov     si,badsect-0x10000
sayerr_plain:
        call    printplain
        jmp     $
       goodread:
        ; move -> 1mb
        mov     si,movedesc-0x10000
        push	es
        push	ds
        pop     es
        mov     cx,256*18
        mov     ah,0x87
        int     0x15
        pop	es
 
        test    ah,ah                  ; was the move successfull ?
        je      goodmove
        mov     dx,0x3f2              ; floppy motor off
        mov     al,0
        out     dx,al
        mov     si,memmovefailed-0x10000
        jmp	sayerr_plain
 
      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
	shr	ch, 2
	mov	al, '5'
	test	ch, 1
	jnz	@f
	mov	al, '0'
@@:
	mov	[si+1], al
	shr	ch, 1
	add	ch, '0'
	mov	[si], ch
        call    printplain
        popa
       bb2:
        pop     ax
        dec     ax
        push    ax
        jnz     reads
       readdone:
        pop     ax
        mov     si,backspace2-0x10000
 
        call    printplain
        mov     si,okt-0x10000
        call    printplain
       no_sys_on_floppy:
        xor	ax, ax		; reset drive
        xor	dx, dx
        int     0x13
       mov dx,0x3f2 ; floppy motor off
       mov al,0
       out dx,al
 
	push	es
; PAGE TABLE
 
	push	dword [es:0x9018]
 
        map_mem equ 64                ; amount of memory to map
 
        push	0x6000
        pop	es                    ; es:di = 6000:0
        xor     di,di
        mov     cx,256*map_mem         ; Map (mapmem) M
;        mov     eax,7
;       pt2:
;        cmp     cx,256*(map_mem-8)     ; 8 M map to LFB
;        jnz     pt3
;        pop     eax
;        add     eax,7
;       pt3:
;        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
; initialize as identity mapping
	xor	eax, eax
	call	pagetable_set
; 8M..12M map to LFB
	pop	eax
 
 
 
;	mov	cx, 256*4
 
	mov	ch, 4
	mov	di, 2000h
 
	call	pagetable_set
 
	push	0x7100
	pop	es
        xor     di,di
        mov     eax,8*0x100000
        mov     cx,256*4
 
 
        call	pagetable_set
 
        
; 4 KB PAGE DIRECTORY
 
	push	0x7F00
	pop	es                ; es:di = 7F00:0
        xor     di, di
        mov     cx, 64 / 4
        mov     eax, 0x60007            ; for 0 M
 
 
        call	pagetable_set
 
        mov     dword [es:0x800],0x71007   ;map region 0x80000000-0x803FFFFF to 0x800000-0xCFFFFF
        xor     si,si
        mov     di,second_base_address shr 20
        mov     cx,64/2
        rep     movs word [es:di], [es:si]
       
        mov     eax, 0x7F000 +8+16      ; Page directory and enable caches
        mov     cr3, eax
 
; SET GRAPHICS
 
	pop	es
        mov     ax,[es:0x9008]		; vga & 320x200
        mov	bx, ax
 
        cmp     ax,0x13
        je      setgr
        cmp     ax,0x12
        je      setgr
        mov     ax,0x4f02            ; Vesa
       setgr:
        int     0x10
        test	ah,ah
 
        mov	si, fatalsel-0x10000
 
        jnz	sayerr
 
 
; set mode 0x12 graphics registers:
        cmp     bx,0x12
        jne     gmok2
 
        mov     al,0x05
        mov     dx,0x03ce
        push    dx
        out     dx,al      ; select GDC mode register
        mov     al,0x02
        inc	dx
        out     dx,al      ; set write mode 2
 
        mov     al,0x02
        mov     dx,0x03c4
        out     dx,al      ; select VGA sequencer map mask register
        mov     al,0x0f
        inc	dx
        out     dx,al      ; set mask for all planes 0-3
 
        mov     al,0x08
        pop	dx
        out     dx,al      ; select GDC bit mask register
                           ; for writes to 0x03cf
 
       gmok2:
        push	ds
        pop	es

Rev 34	Rev 40
1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2	;; ;;	2	;; ;;
3	;; BOOTCODE.INC ;;	3	;; BOOTCODE.INC ;;
4	;; ;;	4	;; ;;
5	;; KolibriOS 16-bit loader, ;;	5	;; KolibriOS 16-bit loader, ;;
6	;; based on bootcode for MenuetOS ;;	6	;; based on bootcode for MenuetOS ;;
7	;; ;;	7	;; ;;
8	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	8	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
9		9
10		10
11		11
12	;==========================================================================	12	;==========================================================================
13	;	13	;
14	; 16 BIT FUNCTIONS	14	; 16 BIT FUNCTIONS
15	;	15	;
16	;==========================================================================	16	;==========================================================================
17		17
18	putchar:	18	putchar:
19	; in: al=character	19	; in: al=character
20	mov ah, 0Eh	20	mov ah, 0Eh
21	mov bh, 0	21	mov bh, 0
22	int 10h	22	int 10h
23	ret	23	ret
24		24
25	print:	25	print:
26	; in: si->string	26	; in: si->string
27	mov al, 186	27	mov al, 186
28	call putchar	28	call putchar
29	mov al, ' '	29	mov al, ' '
30	call putchar	30	call putchar
31		31
32	printplain:	32	printplain:
33	; in: si->string	33	; in: si->string
34	pusha	34	pusha
35	lodsb	35	lodsb
36	@@:	36	@@:
37	call putchar	37	call putchar
38	lodsb	38	lodsb
39	cmp al, 0	39	cmp al, 0
40	jnz @b	40	jnz @b
41	popa	41	popa
42	ret	42	ret
43		43
44	; Now int 16 is used for keyboard support.	44	; Now int 16 is used for keyboard support.
45	; This is shorter, simpler and more reliable.	45	; This is shorter, simpler and more reliable.
46	if 0	46	if 0
47	getkey: push ecx	47	getkey: push ecx
48	push edx	48	push edx
49	add ebx,0x0101	49	add ebx,0x0101
50	xor eax,eax	50	xor eax,eax
51		51
52	gk1:	52	gk1:
53	in al,0x60	53	in al,0x60
54	mov cl,al	54	mov cl,al
55	gk0:	55	gk0:
56	in al,0x60	56	in al,0x60
57	cmp al,cl	57	cmp al,cl
58	je gk0	58	je gk0
59	cmp ax,11	59	cmp ax,11
60	jg gk0	60	jg gk0
61	gk0_1:	61	gk0_1:
62	mov cl,al	62	mov cl,al
63		63
64	; add al,47	64	; add al,47
65	; mov [ds:keyinbs-0x10000],al	65	; mov [ds:keyinbs-0x10000],al
66	; mov si,keyinbs-0x10000	66	; mov si,keyinbs-0x10000
67	; call printplain	67	; call printplain
68		68
69	gk12:	69	gk12:
70	in al,0x60	70	in al,0x60
71	cmp al,cl	71	cmp al,cl
72	je gk12	72	je gk12
73	cmp ax,240	73	cmp ax,240
74	jne gk13	74	jne gk13
75	mov al,cl	75	mov al,cl
76	jmp gk14	76	jmp gk14
77	gk13:	77	gk13:
78	add cl,128	78	add cl,128
79	cmp al,cl	79	cmp al,cl
80	jne gk1	80	jne gk1
81	sub al,128	81	sub al,128
82	gk14:	82	gk14:
83		83
84	movzx edx,bl	84	movzx edx,bl
85	cmp eax,edx	85	cmp eax,edx
86	jb gk1	86	jb gk1
87	movzx edx,bh	87	movzx edx,bh
88	cmp eax,edx	88	cmp eax,edx
89	jg gk1	89	jg gk1
90	test ebx,0x010000	90	test ebx,0x010000
91	jnz gk3	91	jnz gk3
92	mov cx,0x1000	92	mov cx,0x1000
93	mov dx,cx	93	mov dx,cx
94	add eax,47	94	add eax,47
95	mov cx,ax	95	mov cx,ax
96	cmp cx,58	96	cmp cx,58
97	jb gk_nozero	97	jb gk_nozero
98	sub cx,10	98	sub cx,10
99	gk_nozero:	99	gk_nozero:
100	mov [ds:keyin-0x10000],cl	100	mov [ds:keyin-0x10000],cl
101	mov si,keyin-0x10000	101	mov si,keyin-0x10000
102	call printplain	102	call printplain
103	gk3:	103	gk3:
104	sub eax,48	104	sub eax,48
105	pop edx	105	pop edx
106	pop ecx	106	pop ecx
107	ret	107	ret
108	end if	108	end if
109		109
110	getkey:	110	getkey:
111	; get number in range [bl,bh] (bl,bh in ['0'..'9'])	111	; get number in range [bl,bh] (bl,bh in ['0'..'9'])
112	; in: bx=range	112	; in: bx=range
113	; out: ax=digit (1..9, 10 for 0)	113	; out: ax=digit (1..9, 10 for 0)
114	mov ah, 0	114	mov ah, 0
115	int 16h	115	int 16h
116	cmp al, bl	116	cmp al, bl
117	jb getkey	117	jb getkey
118	cmp al, bh	118	cmp al, bh
119	ja getkey	119	ja getkey
120	push ax	120	push ax
121	call putchar	121	call putchar
122	pop ax	122	pop ax
123	and ax, 0Fh	123	and ax, 0Fh
124	jnz @f	124	jnz @f
125	mov al, 10	125	mov al, 10
126	@@:	126	@@:
127	ret	127	ret
128		128
129	setcursor:	129	setcursor:
130	; in: dl=column, dh=row	130	; in: dl=column, dh=row
131	mov ah, 2	131	mov ah, 2
132	mov bh, 0	132	mov bh, 0
133	int 10h	133	int 10h
134	ret	134	ret
135		135
136	macro _setcursor row,column	136	macro _setcursor row,column
137	{	137	{
138	mov dx, row*256 + column	138	mov dx, row*256 + column
139	call setcursor	139	call setcursor
140	}	140	}
-		141
-		142	pagetable_set:
-		143	or al, 7
-		144	@@:
-		145	stosd
-		146	add eax, 1000h
-		147	loop @b
-		148	ret
141		149
142	; 16-bit data	150	; 16-bit data
143	; videomodes table	151	; videomodes table
144	gr_table:	152	gr_table:
145	dw 0x112+0100000000000000b , 640 , 480 ; 1	153	dw 0x112+0100000000000000b , 640 , 480 ; 1
146	dw 0x115+0100000000000000b , 800 , 600 ; 2	154	dw 0x115+0100000000000000b , 800 , 600 ; 2
147	dw 0x118+0100000000000000b , 1024 , 768 ; 3	155	dw 0x118+0100000000000000b , 1024 , 768 ; 3
148	dw 0x11B+0100000000000000b , 1280 , 1024 ; 4	156	dw 0x11B+0100000000000000b , 1280 , 1024 ; 4
149	dw 0x112 , 640 , 480 ; 5	157	dw 0x112 , 640 , 480 ; 5
150	dw 0x115 , 800 , 600 ; 6	158	dw 0x115 , 800 , 600 ; 6
151	dw 0x118 , 1024 , 768 ; 7	159	dw 0x118 , 1024 , 768 ; 7
152	dw 0x11B , 1280 ,1024 ; 8	160	dw 0x11B , 1280 ,1024 ; 8
153	dw 0x13, 320, 200 ; 9	161	dw 0x13, 320, 200 ; 9
154	dw 0x12, 640, 480 ; 0	162	dw 0x12, 640, 480 ; 0
155		163
156	; table for move to extended memory (int 15h, ah=87h)	164	; table for move to extended memory (int 15h, ah=87h)
157	movedesc:	165	movedesc:
158	db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0	166	db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
159	db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0	167	db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
160		168
161	db 0xff,0xff,0x0,0xa0,0x00,0x93,0x0,0x0	169	db 0xff,0xff,0x0,0xa0,0x00,0x93,0x0,0x0
162	db 0xff,0xff,0x0,0x00,0x10,0x93,0x0,0x0	170	db 0xff,0xff,0x0,0x00,0x10,0x93,0x0,0x0
163		171
164	db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0	172	db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
165	db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0	173	db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
166	db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0	174	db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
167	db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0	175	db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
168		176
169	;=========================================================================	177	;=========================================================================
170	;	178	;
171	; 16 BIT CODE	179	; 16 BIT CODE
172	;	180	;
173	;=========================================================================	181	;=========================================================================
174		182
175		183
176	start_of_code:	184	start_of_code:
177	cld	185	cld
178	; \begin{diamond}[02.12.2005]	186	; \begin{diamond}[02.12.2005]
179	cmp ax, 'KL'	187	cmp ax, 'KL'
180	jnz @f	188	jnz @f
181	mov word [cs:cfgmanager.loader_block-0x10000], si	189	mov word [cs:cfgmanager.loader_block-0x10000], si
182	mov word [cs:cfgmanager.loader_block+2-0x10000], ds	190	mov word [cs:cfgmanager.loader_block+2-0x10000], ds
183	@@:	191	@@:
184	; \end{diamond}[02.12.2005]	192	; \end{diamond}[02.12.2005]
185		193
186	; set up stack	194	; set up stack
187	mov ax, 3000h	195	mov ax, 3000h
188	mov ss, ax	196	mov ss, ax
189	mov sp, 0EC00h	197	mov sp, 0EC00h
190	; set up segment registers	198	; set up segment registers
191	push cs	199	push cs
192	pop ds	200	pop ds
193	push cs	201	push cs
194	pop es	202	pop es
195		203
196	; set videomode	204	; set videomode
197	mov ax, 3	205	mov ax, 3
198	int 0x10	206	int 0x10
199		207
200	; Load & set russian VGA font (RU.INC)	208	; Load & set russian VGA font (RU.INC)
201	mov bp,RU_FNT1-10000h ; RU_FNT1 - First part	209	mov bp,RU_FNT1-10000h ; RU_FNT1 - First part
202	mov bx,1000h ; 768 bytes	210	mov bx,1000h ; 768 bytes
203	mov cx,30h ; 48 symbols	211	mov cx,30h ; 48 symbols
204	mov dx,80h ; 128 - position of first symbol	212	mov dx,80h ; 128 - position of first symbol
205	mov ax,1100h	213	mov ax,1100h
206	int 10h	214	int 10h
207		215
208	mov bp,RU_FNT2-10000h ; RU_FNT2 -Second part	216	mov bp,RU_FNT2-10000h ; RU_FNT2 -Second part
209	mov bx,1000h ; 512 bytes	217	mov bx,1000h ; 512 bytes
210	mov cx,20h ; 32 symbols	218	mov cx,20h ; 32 symbols
211	mov dx,0E0h ; 224 - position of first symbol	219	mov dx,0E0h ; 224 - position of first symbol
212	mov ax,1100h	220	mov ax,1100h
213	int 10h	221	int 10h
214	; End set VGA russian font	222	; End set VGA russian font
215		223
216	; draw frames	224	; draw frames
217	push 0xb800	225	push 0xb800
218	pop es	226	pop es
219	xor di, di	227	xor di, di
220	; mov si,d80x25-0x10000	228	; mov si,d80x25-0x10000
221	; mov cx,80*25	229	; mov cx,80*25
222	; mov ah,1*16+15	230	; mov ah,1*16+15
223	; dfl1:	231	; dfl1:
224	; lodsb	232	; lodsb
225	; stosw	233	; stosw
226	; loop dfl1	234	; loop dfl1
227	mov ah, 1*16+15	235	mov ah, 1*16+15
228	; draw top	236	; draw top
229	mov si, d80x25_top - 0x10000	237	mov si, d80x25_top - 0x10000
230	mov cx, d80x25_top_num * 80	238	mov cx, d80x25_top_num * 80
231	@@:	239	@@:
232	lodsb	240	lodsb
233	stosw	241	stosw
234	loop @b	242	loop @b
235	; draw spaces	243	; draw spaces
236	mov si, space_msg - 0x10000	244	mov si, space_msg - 0x10000
237	mov cx, 25 - d80x25_top_num - d80x25_bottom_num	245	mov cx, 25 - d80x25_top_num - d80x25_bottom_num
238	dfl1:	246	dfl1:
239	push cx	247	push cx
240	push si	248	push si
241	mov cx, 80	249	mov cx, 80
242	@@:	250	@@:
243	lodsb	251	lodsb
244	stosw	252	stosw
245	loop @b	253	loop @b
246	pop si	254	pop si
247	pop cx	255	pop cx
248	loop dfl1	256	loop dfl1
249	; draw bottom	257	; draw bottom
250	mov si, d80x25_bottom - 0x10000	258	mov si, d80x25_bottom - 0x10000
251	mov cx, d80x25_bottom_num * 80	259	mov cx, d80x25_bottom_num * 80
252	@@:	260	@@:
253	lodsb	261	lodsb
254	stosw	262	stosw
255	loop @b	263	loop @b
256		264
257	mov byte [space_msg-0x10000+80], 0 ; now space_msg is null terminated	265	mov byte [space_msg-0x10000+80], 0 ; now space_msg is null terminated
258		266
259	_setcursor d80x25_top_num,0	267	_setcursor d80x25_top_num,0
260		268
261		269
262	; TEST FOR 386+	270	; TEST FOR 386+
263		271
264	mov bx, 0x4000	272	mov bx, 0x4000
265	pushf	273	pushf
266	pop ax	274	pop ax
267	mov dx,ax	275	mov dx,ax
268	xor ax,bx	276	xor ax,bx
269	push ax	277	push ax
270	popf	278	popf
271	pushf	279	pushf
272	pop ax	280	pop ax
273	and ax,bx	281	and ax,bx
274	and dx,bx	282	and dx,bx
275	cmp ax,dx	283	cmp ax,dx
276	jnz cpugood	284	jnz cpugood
277	mov si,not386-0x10000	285	mov si,not386-0x10000
-		286	sayerr:
278	call print	287	call print
279	jmp $	288	jmp $
280	cpugood:	289	cpugood:
281		290
282	; set up esp	291	; set up esp
283	movzx esp, sp	292	movzx esp, sp
284		293
285	; FLUSH 8042 KEYBOARD CONTROLLER	294	; FLUSH 8042 KEYBOARD CONTROLLER
286		295
287	;// mike.dld [	296	;// mike.dld [
288	; mov al,0xED	297	; mov al,0xED
289	; out 0x60,al	298	; out 0x60,al
290	; or cx,-1	299	; or cx,-1
291	; @@:	300	; @@:
292	; in al,0x64	301	; in al,0x64
293	; test al,2	302	; test al,2
294	; jz @f	303	; jz @f
295	; loop @b	304	; loop @b
296	; @@:	305	; @@:
297	; mov al,0	306	; mov al,0
298	; out 0x60,al	307	; out 0x60,al
299	; or cx,-1	308	; or cx,-1
300	; @@:	309	; @@:
301	; in al,0x64	310	; in al,0x64
302	; test al,2	311	; test al,2
303	; jz @f	312	; jz @f
304	; loop @b	313	; loop @b
305	; @@:	314	; @@:
306	;// mike.dld ]	315	;// mike.dld ]
307		316
308	; mov ecx,10000	317	; mov ecx,10000
309	; fl1:	318	; fl1:
310	; in al,0x64	319	; in al,0x64
311	; loop fl1	320	; loop fl1
312	; test al,1	321	; test al,1
313	; jz fl2	322	; jz fl2
314	; in al,0x60	323	; in al,0x60
315	; jmp fl1	324	; jmp fl1
316	; fl2:	325	; fl2:
317		326
318	;****************************************************************	327	;****************************************************************
319	; The function is modified Mario79	328	; The function is modified Mario79
320	;*****************************************************************	329	;*****************************************************************
321	; wait_kbd: ; variant 1	330	; wait_kbd: ; variant 1
322	; mov cx,2500h ;çàäåðæêà ïîðÿäêà 10 ìñåê	331	; mov cx,2500h ;çàäåðæêà ïîðÿäêà 10 ìñåê
323	; test_kbd:	332	; test_kbd:
324	; in al,64h ;÷èòàåì ñîñòîÿíèå êëàâèàòóðû	333	; in al,64h ;÷èòàåì ñîñòîÿíèå êëàâèàòóðû
325	; test al,2 ;ïðîâåðêà áèòà ãîòîâíîñòè	334	; test al,2 ;ïðîâåðêà áèòà ãîòîâíîñòè
326	; loopnz test_kbd	335	; loopnz test_kbd
327		336
328	mov al,0xf6 ; Ñáðîñ êëàâèàòóðû, ðàçðåøèòü ñêàíèðîâàíèå	337	mov al,0xf6 ; Ñáðîñ êëàâèàòóðû, ðàçðåøèòü ñêàíèðîâàíèå
329	out 0x60,al	338	out 0x60,al
330	xor cx,cx	339	xor cx,cx
331	wait_loop: ; variant 2	340	wait_loop: ; variant 2
332	; reading state of port of 8042 controller	341	; reading state of port of 8042 controller
333	in al,64h	342	in al,64h
334	and al,00000010b ; ready flag	343	and al,00000010b ; ready flag
335	; wait until 8042 controller is ready	344	; wait until 8042 controller is ready
336	loopnz wait_loop	345	loopnz wait_loop
337		346
338	; DISPLAY VESA INFORMATION	347	; DISPLAY VESA INFORMATION
339		348
340	push 0	349	push 0
341	pop es	350	pop es
342	mov ax,0x4f00	351	mov ax,0x4f00
343	mov di,0xa000	352	mov di,0xa000
344	int 0x10	353	int 0x10
345	cmp ax,0x004f	354	cmp ax,0x004f
346	mov si, novesa-0x10000	355	mov si, novesa-0x10000
347	jnz @f	356	jnz @f
348	mov ax,[es:di+4]	357	mov ax,[es:di+4]
349	add ax,'0'*256+'0'	358	add ax,'0'*256+'0'
350	mov [vervesa+vervesa_off-0x10000], ah	-
351	mov [vervesa+vervesa_off+2-0x10000], al	-
352	mov si,vervesa-0x10000	359	mov si,vervesa-0x10000
-		360	mov [si+vervesa_off], ah
-		361	mov [si+vervesa_off+2], al
353	@@: call print	362	@@: call print
354		363
355	; \begin{diamond}[30.11.2005]	364	; \begin{diamond}[30.11.2005]
356	cfgmanager:	365	cfgmanager:
357	; settings:	366	; settings:
358	; a) preboot_graph = graphical mode	367	; a) preboot_graph = graphical mode
359	; preboot_gprobe = probe this mode?	368	; preboot_gprobe = probe this mode?
360	; b) preboot_mtrr = use hardware acceleration?	369	; b) preboot_mtrr = use hardware acceleration?
361	; c) preboot_vrrm = use VRR?	370	; c) preboot_vrrm = use VRR?
362	; d) preboot_device = from what boot?	371	; d) preboot_device = from what boot?
363	mov si, preboot_graph-0x10000	372	mov di, preboot_graph-0x10000
364	; check bootloader block	373	; check bootloader block
365	cmp [.loader_block-0x10000], 0	374	cmp [.loader_block-0x10000], 0
366	jz .noloaderblock	375	jz .noloaderblock
367	les bx, [.loader_block-0x10000]	376	les bx, [.loader_block-0x10000]
368	cmp byte [es:bx], 1	377	cmp byte [es:bx], 1
369	jz @f	-
370	mov si, loader_block_error-0x10000	378	mov si, loader_block_error-0x10000
371	call print	-
372	jmp $	379	jnz sayerr
373	@@:	-
374	test byte [es:bx+1], 1	380	test byte [es:bx+1], 1
375	jz @f	381	jz @f
376	; image in memory present	382	; image in memory present
377	cmp [si+preboot_device-preboot_graph], 0	383	cmp [di+preboot_device-preboot_graph], 0
378	jnz @f	384	jnz @f
379	mov [si+preboot_device-preboot_graph], 3	385	mov [di+preboot_device-preboot_graph], 3
380	@@:	386	@@:
381	.noloaderblock:	387	.noloaderblock:
382	; determine default settings	388	; determine default settings
383	mov [.bSettingsChanged-0x10000], 0	389	mov [.bSettingsChanged-0x10000], 0
384	cmp byte [si], 0	390	cmp byte [di], 0
385	jnz .preboot_gr_end	391	jnz .preboot_gr_end
386	mov [si+preboot_gprobe-preboot_graph], 0	392	mov [di+preboot_gprobe-preboot_graph], 0
387	mov al, [vervesa+vervesa_off-0x10000]	393	mov al, [vervesa+vervesa_off-0x10000]
388	cmp al, 'x'	394	cmp al, 'x'
389	jz .novesa	395	jz .novesa
390	cmp al, '1'	396	cmp al, '1'
391	jz .vesa12	397	jz .vesa12
392	mov [si+preboot_gprobe-preboot_graph], 2	398	mov [di+preboot_gprobe-preboot_graph], 2
393	mov al, 3	399	mov al, 3
394	jmp @f	400	jmp @f
395	.vesa12:	401	.vesa12:
396	mov al, 7	402	mov al, 7
397	jmp @f	403	jmp @f
398	.novesa:	404	.novesa:
399	mov al, 10	405	mov al, 10
400	@@:	406	@@:
401	mov [si], al	407	mov [di], al
402	.preboot_gr_end:	408	.preboot_gr_end:
403	cmp [si+preboot_mtrr-preboot_graph], 1	409	cmp [di+preboot_mtrr-preboot_graph], 1
404	adc [si+preboot_mtrr-preboot_graph], 0	410	adc [di+preboot_mtrr-preboot_graph], 0
405	cmp [si+preboot_vrrm-preboot_graph], 1	411	cmp [di+preboot_vrrm-preboot_graph], 1
406	adc [si+preboot_vrrm-preboot_graph], 0	412	adc [di+preboot_vrrm-preboot_graph], 0
407	cmp [si+preboot_device-preboot_graph], 1	413	cmp [di+preboot_device-preboot_graph], 1
408	adc [si+preboot_device-preboot_graph], 0	414	adc [di+preboot_device-preboot_graph], 0
409	; notify user	415	; notify user
410	mov si, linef-0x10000	416	mov si, linef-0x10000
411	call print	417	call print
412	mov si, start_msg-0x10000	418	mov si, start_msg-0x10000
413	call print	419	call print
414	mov si, time_msg-0x10000	420	mov si, time_msg-0x10000
415	call print	421	call print
416	; get start time	422	; get start time
417	call .gettime	423	call .gettime
418	mov [.starttime-0x10000], eax	424	mov [.starttime-0x10000], eax
419	mov word [.timer-0x10000], .newtimer-0x10000	425	mov word [.timer-0x10000], .newtimer-0x10000
420	mov word [.timer-0x10000+2], cs	426	mov word [.timer-0x10000+2], cs
421	.printcfg:	427	.printcfg:
422	_setcursor 9,0	428	_setcursor 9,0
423	mov si, current_cfg_msg-0x10000	429	mov si, current_cfg_msg-0x10000
424	call print	430	call print
425	mov si, curvideo_msg-0x10000	431	mov si, curvideo_msg-0x10000
426	call print	432	call print
427	mov al, [preboot_graph-0x10000]	433	mov al, [preboot_graph-0x10000]
428	cmp al, 8	434	cmp al, 8
429	ja .pnovesa	435	ja .pnovesa
430	mov dl, al	436	mov dl, al
431	and eax, 3	437	and eax, 3
432	mov si, [modes_msg-0x10000+eax*2]	438	mov si, [modes_msg-0x10000+eax*2]
433	call printplain	439	call printplain
434	mov si, modevesa20-0x10000	440	mov si, modevesa20-0x10000
435	cmp dl, 4	441	cmp dl, 4
436	jbe @f	442	jbe @f
437	mov si, modevesa12-0x10000	443	mov si, modevesa12-0x10000
438	@@:	444	@@:
439	call printplain	445	call printplain
440	cmp dl, 4	446	cmp dl, 4
441	ja .x	447	ja .x
442	mov si, probeno_msg-0x10000	448	mov si, probeno_msg-0x10000
443	cmp [preboot_gprobe-0x10000], 2	449	cmp [preboot_gprobe-0x10000], 2
444	jnz @f	450	jnz @f
445	mov si, probeok_msg-0x10000	451	mov si, probeok_msg-0x10000
446	@@:	452	@@:
447	call printplain	453	call printplain
448	.x:	454	.x:
449	jmp .c	455	jmp .c
450	.pnovesa:	456	.pnovesa:
451	cmp al, 9	457	cmp al, 9
452	mov si, mode9-0x10000	458	mov si, mode9-0x10000
453	jz @b	459	jz @b
454	mov si, mode10-0x10000	460	mov si, mode10-0x10000
455	jmp @b	461	jmp @b
456	.c:	462	.c:
457	mov si, linef-0x10000	463	mov si, linef-0x10000
458	call printplain	464	call printplain
459	mov si, mtrr_msg-0x10000	465	mov si, mtrr_msg-0x10000
460	call print	-
461	mov si, on_msg-0x10000	-
462	cmp [preboot_mtrr-0x10000], 1	466	cmp [preboot_mtrr-0x10000], 1
463	jz @f	-
464	mov si, off_msg-0x10000	-
465	@@:	-
466	call printplain	467	call .say_on_off
467	mov si, vrrm_msg-0x10000	468	mov si, vrrm_msg-0x10000
468	call print	-
469	mov si, on_msg-0x10000	-
470	cmp [preboot_vrrm-0x10000], 1	469	cmp [preboot_vrrm-0x10000], 1
471	jz @f	-
472	mov si, off_msg-0x10000	-
473	@@:	-
474	call printplain	470	call .say_on_off
475	mov si, preboot_device_msg-0x10000	471	mov si, preboot_device_msg-0x10000
476	call print	472	call print
477	mov al, [preboot_device-0x10000]	473	mov al, [preboot_device-0x10000]
478	and eax, 3	474	and eax, 3
479	mov si, [preboot_device_msgs-0x10000+eax*2]	475	mov si, [preboot_device_msgs-0x10000+eax*2]
480	call printplain	476	call printplain
481	.wait:	477	.wait:
482	; empty BIOS keyboard buffer	-
483	_setcursor 25,0 ; out of screen	478	_setcursor 25,0 ; out of screen
484	; set timer interrupt handler	479	; set timer interrupt handler
485	cli	480	cli
486	push 0	481	push 0
487	pop es	482	pop es
488	mov eax, [es:8*4]	483	mov eax, [es:8*4]
489	mov [.oldtimer-0x10000], eax	484	mov [.oldtimer-0x10000], eax

Subversion Repositories Kolibri OS

(root)/kernel/trunk/boot/bootcode.inc – Rev 34 → 40