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


$Revision: 514 $
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;                                                              ;;
;; Copyright (C) KolibriOS team 2004-2007. All rights reserved. ;;
;; Copyright (C) MenuetOS 2000-2004 Ville Mikael Turjanmaa      ;;
;; Distributed under terms of the GNU General Public License    ;;
;;                                                              ;;
;;  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
 
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
}
 
boot_read_floppy:
        push    si
        xor     si, si
        mov     ah, 2   ; read
@@:
        push    ax
        int     0x13
        pop     ax
        jnc     @f
        inc     si
        cmp     si, 10
        jb      @b
        mov     si, badsect
sayerr_plain:
        call    printplain
        jmp     $
@@:
        pop     si
        ret
 
;=========================================================================
;
;                           16 BIT CODE
;
;=========================================================================
 
 
start_of_code:
        cld
; \begin{diamond}[02.12.2005]
; if bootloader sets ax = 'KL', then ds:si points to loader block
        cmp     ax, 'KL'
        jnz     @f
        mov     word [cs:cfgmanager.loader_block], si
        mov     word [cs:cfgmanager.loader_block+2], ds
@@:
; \end{diamond}[02.12.2005]
 
; if bootloader sets cx = 'HA' and dx = 'RD', then bx contains identifier of source hard disk
; (see comment to bx_from_load)
        cmp     cx, 'HA'
        jnz     no_hd_load
        cmp     dx,'RD'
        jnz     no_hd_load
        mov     word [cs:bx_from_load], bx              ; {SPraid}[13.03.2007]
no_hd_load:
 
; 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
 
if lang eq ru
 ; Load & set russian VGA font (RU.INC)
        mov     bp, RU_FNT1             ; 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             ; 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
else if lang eq et
        mov     bp, ET_FNT              ; ET_FNT1
        mov     bx, 1000h               ;
        mov     cx, 255                 ; 256 symbols
        xor     dx, dx                  ; 0 - position of first symbol
        mov     ax, 1100h
        int     10h
end if
 
; draw frames
        push    0xb800
        pop     es
        xor     di, di
        mov     ah, 1*16+15
 
; draw top
        mov     si, d80x25_top
        mov     cx, d80x25_top_num * 80
@@:
        lodsb
        stosw
        loop    @b
; draw spaces
        mov     si, space_msg
        mov     dx, 25 - d80x25_top_num - d80x25_bottom_num
dfl1:
 
        push    si
        mov     cx, 80
@@:
        lodsb
        stosw
        loop    @b
        pop     si
        dec     dx
        jnz     dfl1
; draw bottom
        mov     si, d80x25_bottom
        mov     cx, d80x25_bottom_num * 80
@@:
        lodsb
        stosw
        loop    @b
 
        mov     byte [space_msg+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
sayerr:
        call    print
        jmp     $
     cpugood:
 
        push    0
        popf
        sti
 
; set up esp
        movzx   esp, sp
 
        push    0
        pop     es
        and     word [es:0x9031], 0
; \begin{Mario79}
; find HDD IDE DMA PCI device
; check for PCI BIOS
        mov     ax, 0xB101
        int     0x1A
        jc      .nopci
        cmp     edx, 'PCI '
        jnz     .nopci
; find PCI class code
; class 1 = mass storage
; subclass 1 = IDE controller
; a) class 1, subclass 1, programming interface 0x80
        mov     ax, 0xB103
        mov     ecx, 1*10000h + 1*100h + 0x80
        xor     si, si  ; device index = 0
        int     0x1A
        jnc     .found
; b) class 1, subclass 1, programming interface 0x8A
        mov     ax, 0xB103
        mov     ecx, 1*10000h + 1*100h + 0x8A
        xor     si, si  ; device index = 0
        int     0x1A
        jnc     .found
; c) class 1, subclass 1, programming interface 0x85
        mov     ax, 0xB103
        mov     ecx, 1*10000h + 1*100h + 0x85
        xor     si, si
        int     0x1A
        jc      .nopci
.found:
; get memory base
        mov     ax, 0xB10A
        mov     di, 0x20        ; memory base is config register at 0x20
        int     0x1A
        jc      .nopci
        and     cx, 0xFFF0      ; clear address decode type
        mov     [es:0x9031], cx
.nopci:
; \end{Mario79}
 
        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
 
; --------------- APM ---------------------
 
 
        and     word [es:0x9044], 0     ; ver = 0.0 (APM not found)
        mov     ax, 0x5300
        xor     bx, bx
        int     0x15
        jc      apm_end                 ; APM not found
        test    cx, 2
        jz      apm_end                 ; APM 32-bit protected-mode interface not supported
        mov     [es:0x9044], ax         ; Save APM Version
        mov     [es:0x9046], cx         ; Save APM flags
 
        ; Write APM ver ----
        and     ax, 0xf0f
        add     ax, '00'
        mov     si, msg_apm
        mov     [si + 5], ah
        mov     [si + 7], al
        _setcursor 0, 3
        call    printplain
        ; ------------------
 
        mov     ax, 0x5304              ; Disconnect interface
        xor     bx, bx
        int     0x15
        mov     ax, 0x5303              ; Connect 32 bit mode interface
        xor     bx, bx
        int     0x15
 
 
 
 
        mov     [es:0x9040], ebx
        mov     [es:0x9050], ax
        mov     [es:0x9052], cx
        mov     [es:0x9054], dx
 
apm_end:
        _setcursor d80x25_top_num, 0
 
; DISPLAY VESA INFORMATION
 
 
 
        mov     ax, 0x4f00
        mov     di, 0xa000
        int     0x10
        cmp     ax, 0x004f
        mov     si, novesa
        jnz     @f
 
 
 
        mov     ax, [es:di+4]
        add     ax, '0'*256+'0'
        mov     si, vervesa
        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_dma  = use DMA access?
; c) preboot_vrrm = use VRR?
; d) preboot_device = from what boot?
        mov     di, preboot_graph
; check bootloader block
        cmp     [.loader_block], -1
        jz      .noloaderblock
        les     bx, [.loader_block]
        cmp     byte [es:bx], 1
        mov     si, loader_block_error
        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], 0
        cmp     byte [di], 0
        jnz     .preboot_gr_end
        mov     [di+preboot_gprobe-preboot_graph], 0
        mov     al, [vervesa+vervesa_off]
        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:
; following 6 lines set variables to 1 if its current value is 0
        cmp     [di+preboot_dma-preboot_graph], 1
        adc     [di+preboot_dma-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
        call    print
        mov     si, start_msg
        call    print
        mov     si, time_msg
        call    print
; get start time
        call    .gettime
        mov     [.starttime], eax
        mov     word [.timer], .newtimer
        mov     word [.timer+2], cs
.printcfg:
        _setcursor 9,0
        mov     si, current_cfg_msg
        call    print
        mov     si, curvideo_msg
        call    print
        mov     al, [preboot_graph]
        cmp     al, 8
        ja      .pnovesa
        mov     dl, al
        and     eax, 3
        mov     si, [modes_msg+eax*2]
        call    printplain
        mov     si, modevesa20
        cmp     dl, 4
        jbe     @f
        mov     si, modevesa12
@@:
        call    printplain
        cmp     dl, 4
        ja      .x
        mov     si, probeno_msg
        cmp     [preboot_gprobe], 2
        jnz     @f
        mov     si, probeok_msg
@@:
        call    printplain
.x:
        jmp     .c
.pnovesa:
        cmp     al, 9
        mov     si, mode9
        jz      @b
        mov     si, mode10
        jmp     @b
.c:
        mov     si, linef
        call    printplain
        mov     si, dma_msg
        call    print
        cmp     [preboot_dma], 2
        mov     si, on_msg
        jb      @f
        mov     si, off_msg
        ja      @f
        mov     si, readonly_msg
@@:
        call    printplain
        mov     si, vrrm_msg
        cmp     [preboot_vrrm], 1
        call    .say_on_off
        mov     si, preboot_device_msg
        call    print
        mov     al, [preboot_device]
        and     eax, 3
        mov     si, [preboot_device_msgs+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], eax
        mov     eax, [.timer]
        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]
        mov     [es:8*4], eax
        mov     [.timer], eax
        _setcursor 7,0
        mov     si, space_msg
        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
        call    print
        mov     bx, '13'
        call    getkey
        mov     [preboot_device], al
        _setcursor 13,0
.d:
        mov     [.bSettingsChanged], 1
        mov     si, space_msg
        call    printplain
        _setcursor 15,0
        mov     cx, 6
@@:
        call    printplain
        loop    @b
        jmp    .printcfg
.change_a:
        _setcursor 15,0
        mov     si, gr_mode
        call    printplain
        mov     bx, '09'
        call    getkey
        mov     [preboot_graph], al
        cmp     al, 4
        ja      @f
        mov     si, probetext
        call    printplain
        mov     bx, '12'
        call    getkey
        mov     [preboot_gprobe], al
@@:
        _setcursor 10,0
        jmp    .d
.change_b:
        _setcursor 15,0
        mov     si, ask_dma
        call    print
        mov     bx, '13'
        call    getkey
        mov     [preboot_dma], al
        _setcursor 11,0
        jmp     .d
.change_c:
        _setcursor 15,0
        mov     si, vrrmprint
        call    print
        mov     bx, '12'
        call    getkey
        mov     [preboot_vrrm], al
        _setcursor 12,0
        jmp     .d
.say_on_off:
        pushf
        call    print
        mov     si, on_msg
        popf
        jz      @f
        mov     si, off_msg
@@:     jmp     printplain
 
; 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 -1
.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]
        pushad
        call    .gettime
        sub     eax, [.starttime]
        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], cl
else if lang eq et
        cmp     al, 1
        ja      @f
        mov     [time_str+9], ' '
        mov     [time_str+10],' '
@@:
else
; wait 5/4/3/2 seconds, 1 second
        cmp     al, 1
        mov     cl, 's'
        ja      @f
        mov     cl, ' '
@@:     mov     [time_str+9], cl
end if
        add     al, '0'
        mov     [time_str+1], al
        mov     si, time_msg
        _setcursor 7,0
        call    print
        _setcursor 25,0
        popad
        pop     ds
        iret
.timergo:
        push    0
        pop     es
        mov     eax, [.oldtimer]
        mov     [es:8*4], eax
        mov     sp, 0EC00h
.continue:
        sti
        _setcursor 6,0
        mov     si, space_msg
        call    printplain
        call    printplain
        _setcursor 6,0
        mov     si, loading_msg
        call    print
        _setcursor 15,0
        cmp     [.bSettingsChanged], 0
        jz      .load
        cmp     [.loader_block], -1
        jz      .load
        les     bx, [.loader_block]
        mov     eax, [es:bx+3]
        push    ds
        pop     es
        test    eax, eax
        jz      .load
        push    eax
        mov     si, save_quest
        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+80], 186
        pop     eax
        push    cs
        push    .cont
        push    eax
        retf
.loadc:
        pop     eax
.cont:
        push    cs
        pop     ds
        mov     si, space_msg
        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]
        push    0
        pop     es
; address is gr_table+6*(ax-1)
        add     ax, ax
        lea     si, [gr_table + 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
        or      dword [es:0x9018], 0xFFFFFFFF; 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], 1
        jz      noprobe
 
        mov     bx, 0x100
     newprobe:
        inc     bx
        cmp     bx, 0x17f
        mov     si, prnotfnd
        jz      invalid_video_mode
 
     probemore:
        push    cx
        mov     ax, 0x4f01
        mov     cx, bx
 
        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
        BytesPerLine equ 0x10
        mov     ax, [es:di+BytesPerLine]
        mov     [es:0x9001], ax
        ; BPP
        mov     al, byte [es:di+0x19]
        mov     [es:0x9000], al
nov:
        cmp     al, 24
        mov     si, bt24
        jz      bppl
        cmp     al, 32
        mov     si, bt32
        jz      bppl
        mov     si, btns
invalid_video_mode:
        call    print
        _setcursor (d80x25_top_num+2), 0
        mov     si, start_msg
        call    print
        jmp     cfgmanager.printcfg
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
; force yes
        mov     [es:0x901C], byte 1
 
; DMA ACCESS TO HD
 
        mov     al, [preboot_dma]
        mov     [es:0x901F], al
 
; VRR_M USE
 
        mov     al,[preboot_vrrm]
        mov     [es:0x9030], al
        mov     [es:0x901E], byte 1
 
; BOOT DEVICE
 
        mov     al, [preboot_device]
        dec     al
        mov     [boot_dev], al
 
; READ DISKETTE TO MEMORY
 
;        cmp     [boot_dev],0
        jne     no_sys_on_floppy
        mov     si,diskload
        call    print
        xor     ax, ax            ; reset drive
        xor     dx, dx
        int     0x13
; now load floppy image to memory
; at first load boot sector and first FAT table
        mov     cx, 0x0001      ; startcyl,startsector
        xor     dx, dx          ; starthead,drive
        mov     al, 1+9         ; no of sectors to read
        mov     bx, 0xB000      ; es:bx -> data area
        call    boot_read_floppy
; and copy them to extended memory
        mov     si, movedesc
        mov     [si+8*2+3], bh
        push    es
        push    ds
        pop     es
        mov     cx, 256*10
        mov     ah, 0x87
        int     0x15
        test    ah, ah
        jz      @f
sayerr_floppy:
        mov     dx, 0x3f2
        mov     al, 0
        out     dx, al
        mov     si, memmovefailed
        jmp     sayerr_plain
@@:
        add     dword [si+8*3+2], 512*10
; copy FAT to second copy
        mov     byte [si+8*2+3], 0xB2
        mov     cx, 256*9
        mov     ah, 0x87
        int     0x15
        pop     es
        test    ah, ah
        jnz     sayerr_floppy
        add     dword [si+8*3+2], 512*9
; calculate total number of sectors to read
        mov     ax, 1+9+14      ; boot+FAT+root
        mov     di, 0xB203
.calc_loop:
        test    word [es:di], 0xFFF
        jz      @f
        inc     ax
@@:
        test    word [es:di+1], 0xFFF0
        jz      @f
        inc     ax
@@:
        add     di, 3
        cmp     di, 0xB200+1440*3
        jb      .calc_loop
        push    ax
        mov     bp, 1+9         ; already read sectors
; now read rest
        mov     byte [si+8*2+3], 0xA0
        mov     di, 2-14        ; absolute sector-31
        mov     cx, 0x0002      ; cylinder=0, sector=2
        mov     dx, 0x0100      ; head=1, disk=0
.read_loop:
; determine whether sector must be read
        cmp     di, 2
        jl      .read
        mov     bx, di
        shr     bx, 1
        jnc     .even
        test    word [es:bx+di+0xB200], 0xFFF0
        jmp     @f
.even:
        test    word [es:bx+di+0xB200], 0xFFF
@@:
        jz      .skip
.read:
        mov     bx, 0xA000
        mov     al, 1           ; 1 sector
        call    boot_read_floppy
        inc     bp
        push    es
        push    ds
        pop     es
        pusha
        mov     cx, 256
        mov     ah, 0x87
        int     0x15
        test    ah, ah
        popa
        pop     es
        jnz     sayerr_floppy
.skip:
        add     dword [si+8*3+2], 512
        inc     cx
        cmp     cl, 19
        jnz     @f
        mov     cl, 1
        inc     dh
        cmp     dh, 2
        jnz     @f
        mov     dh, 0
        inc     ch
@@:
        pop     ax
        push    ax
        pusha
; draw percentage
; total sectors: ax
; read sectors: bp
        xchg    ax, bp
        mov     cx, 100
        mul     cx
        div     bp
        aam
        xchg    al, ah
        add     ax, '00'
        mov     si, pros
        cmp     [si], ax
        jz      @f
        mov     [si], ax
        call    printplain
@@:
        popa
        inc     di
        cmp     di, 2880-31
        jnz     .read_loop
 
;        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
        call    printplain
        mov     si, okt
        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
 
 
; SET GRAPHICS
 
        xor     ax, ax
        mov     es, ax
 
        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
        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 509	Rev 514
1	$Revision: 509 $	1	$Revision: 514 $
2	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	2	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
3	;; ;;	3	;; ;;
4	;; Copyright (C) KolibriOS team 2004-2007. All rights reserved. ;;	4	;; Copyright (C) KolibriOS team 2004-2007. All rights reserved. ;;
5	;; Copyright (C) MenuetOS 2000-2004 Ville Mikael Turjanmaa ;;	5	;; Copyright (C) MenuetOS 2000-2004 Ville Mikael Turjanmaa ;;
6	;; Distributed under terms of the GNU General Public License ;;	6	;; Distributed under terms of the GNU General Public License ;;
7	;; ;;	7	;; ;;
8	;; BOOTCODE.INC ;;	8	;; BOOTCODE.INC ;;
9	;; ;;	9	;; ;;
10	;; KolibriOS 16-bit loader, ;;	10	;; KolibriOS 16-bit loader, ;;
11	;; based on bootcode for MenuetOS ;;	11	;; based on bootcode for MenuetOS ;;
12	;; ;;	12	;; ;;
13	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	13	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
14		14
15		15
16		16
17	;==========================================================================	17	;==========================================================================
18	;	18	;
19	; 16 BIT FUNCTIONS	19	; 16 BIT FUNCTIONS
20	;	20	;
21	;==========================================================================	21	;==========================================================================
22		22
23		23
24	putchar:	24	putchar:
25	; in: al=character	25	; in: al=character
26	mov ah, 0Eh	26	mov ah, 0Eh
27	mov bh, 0	27	mov bh, 0
28	int 10h	28	int 10h
29	ret	29	ret
30		30
31	print:	31	print:
32	; in: si->string	32	; in: si->string
33	mov al, 186	33	mov al, 186
34	call putchar	34	call putchar
35	mov al, ' '	35	mov al, ' '
36	call putchar	36	call putchar
37		37
38	printplain:	38	printplain:
39	; in: si->string	39	; in: si->string
40	pusha	40	pusha
41	lodsb	41	lodsb
42	@@:	42	@@:
43	call putchar	43	call putchar
44	lodsb	44	lodsb
45	cmp al, 0	45	cmp al, 0
46	jnz @b	46	jnz @b
47	popa	47	popa
48	ret	48	ret
49		49
50	getkey:	50	getkey:
51	; get number in range [bl,bh] (bl,bh in ['0'..'9'])	51	; get number in range [bl,bh] (bl,bh in ['0'..'9'])
52	; in: bx=range	52	; in: bx=range
53	; out: ax=digit (1..9, 10 for 0)	53	; out: ax=digit (1..9, 10 for 0)
54	mov ah, 0	54	mov ah, 0
55	int 16h	55	int 16h
56	cmp al, bl	56	cmp al, bl
57	jb getkey	57	jb getkey
58	cmp al, bh	58	cmp al, bh
59	ja getkey	59	ja getkey
60	push ax	60	push ax
61	call putchar	61	call putchar
62	pop ax	62	pop ax
63	and ax, 0Fh	63	and ax, 0Fh
64	jnz @f	64	jnz @f
65	mov al, 10	65	mov al, 10
66	@@:	66	@@:
67	ret	67	ret
68		68
69	setcursor:	69	setcursor:
70	; in: dl=column, dh=row	70	; in: dl=column, dh=row
71	mov ah, 2	71	mov ah, 2
72	mov bh, 0	72	mov bh, 0
73	int 10h	73	int 10h
74	ret	74	ret
75		75
76	macro _setcursor row,column	76	macro _setcursor row,column
77	{	77	{
78	mov dx, row*256 + column	78	mov dx, row*256 + column
79	call setcursor	79	call setcursor
80	}	80	}
81		81
82	boot_read_floppy:	82	boot_read_floppy:
83	push si	83	push si
84	xor si, si	84	xor si, si
85	mov ah, 2 ; read	85	mov ah, 2 ; read
86	@@:	86	@@:
87	push ax	87	push ax
88	int 0x13	88	int 0x13
89	pop ax	89	pop ax
90	jnc @f	90	jnc @f
91	inc si	91	inc si
92	cmp si, 10	92	cmp si, 10
93	jb @b	93	jb @b
94	mov si, badsect	94	mov si, badsect
95	sayerr_plain:	95	sayerr_plain:
96	call printplain	96	call printplain
97	jmp $	97	jmp $
98	@@:	98	@@:
99	pop si	99	pop si
100	ret	100	ret
101		101
102	;=========================================================================	102	;=========================================================================
103	;	103	;
104	; 16 BIT CODE	104	; 16 BIT CODE
105	;	105	;
106	;=========================================================================	106	;=========================================================================
107		107
108		108
109	start_of_code:	109	start_of_code:
110	cld	110	cld
111	; \begin{diamond}[02.12.2005]	111	; \begin{diamond}[02.12.2005]
-		112	; if bootloader sets ax = 'KL', then ds:si points to loader block
112	cmp ax, 'KL'	113	cmp ax, 'KL'
113	jnz @f	114	jnz @f
114	mov word [cs:cfgmanager.loader_block], si	115	mov word [cs:cfgmanager.loader_block], si
115	mov word [cs:cfgmanager.loader_block+2], ds	116	mov word [cs:cfgmanager.loader_block+2], ds
116	@@:	117	@@:
117	; \end{diamond}[02.12.2005]	118	; \end{diamond}[02.12.2005]
118		119
-		120	; if bootloader sets cx = 'HA' and dx = 'RD', then bx contains identifier of source hard disk
-		121	; (see comment to bx_from_load)
119	cmp cx,'HA' ; ïî ðåãèñòðàì îïðåäåëÿåòñÿ çàãðóçêà ñ âèíòà	122	cmp cx, 'HA'
120	jnz no_hd_load	123	jnz no_hd_load
121	cmp dx,'RD'	124	cmp dx,'RD'
122	jnz no_hd_load	125	jnz no_hd_load
123	mov word [cs:bx_from_load], bx ; {SPraid}[13.03.2007]	126	mov word [cs:bx_from_load], bx ; {SPraid}[13.03.2007]
124	no_hd_load:	127	no_hd_load:
125		128
126	; set up stack	129	; set up stack
127	mov ax, 3000h	130	mov ax, 3000h
128	mov ss, ax	131	mov ss, ax
129	mov sp, 0EC00h	132	mov sp, 0EC00h
130	; set up segment registers	133	; set up segment registers
131	push cs	134	push cs
132	pop ds	135	pop ds
133	push cs	136	push cs
134	pop es	137	pop es
135		138
136	; set videomode	139	; set videomode
137	mov ax, 3	140	mov ax, 3
138	int 0x10	141	int 0x10
139		142
140	if lang eq ru	143	if lang eq ru
141	; Load & set russian VGA font (RU.INC)	144	; Load & set russian VGA font (RU.INC)
142	mov bp, RU_FNT1 ; RU_FNT1 - First part	145	mov bp, RU_FNT1 ; RU_FNT1 - First part
143	mov bx,1000h ; 768 bytes	146	mov bx, 1000h ; 768 bytes
144	mov cx,30h ; 48 symbols	147	mov cx, 30h ; 48 symbols
145	mov dx,80h ; 128 - position of first symbol	148	mov dx, 80h ; 128 - position of first symbol
146	mov ax,1100h	149	mov ax, 1100h
147	int 10h	150	int 10h
148		151
149	mov bp,RU_FNT2 ; RU_FNT2 -Second part	152	mov bp, RU_FNT2 ; RU_FNT2 -Second part
150	mov bx,1000h ; 512 bytes	153	mov bx, 1000h ; 512 bytes
151	mov cx,20h ; 32 symbols	154	mov cx, 20h ; 32 symbols
152	mov dx,0E0h ; 224 - position of first symbol	155	mov dx, 0E0h ; 224 - position of first symbol
153	mov ax,1100h	156	mov ax, 1100h
154	int 10h	157	int 10h
155	; End set VGA russian font	158	; End set VGA russian font
156	else if lang eq et	159	else if lang eq et
157	mov bp,ET_FNT ; ET_FNT1	160	mov bp, ET_FNT ; ET_FNT1
158	mov bx,1000h ;	161	mov bx, 1000h ;
159	mov cx,255 ; 256 symbols	162	mov cx, 255 ; 256 symbols
160	mov dx,0h ; 0 - position of first symbol	163	xor dx, dx ; 0 - position of first symbol
161	mov ax,1100h	164	mov ax, 1100h
162	int 10h	165	int 10h
163	end if	166	end if
164		167
165	; draw frames	168	; draw frames
166	push 0xb800	169	push 0xb800
167	pop es	170	pop es
168	xor di, di	171	xor di, di
169	mov ah, 1*16+15	172	mov ah, 1*16+15
170		173
171	; draw top	174	; draw top
172	mov si, d80x25_top	175	mov si, d80x25_top
173	mov cx, d80x25_top_num * 80	176	mov cx, d80x25_top_num * 80
174	@@:	177	@@:
175	lodsb	178	lodsb
176	stosw	179	stosw
177	loop @b	180	loop @b
178	; draw spaces	181	; draw spaces
179	mov si, space_msg	182	mov si, space_msg
180	mov cx, 25 - d80x25_top_num - d80x25_bottom_num	183	mov dx, 25 - d80x25_top_num - d80x25_bottom_num
181	dfl1:	184	dfl1:
182	push cx	-
183	push si	185	push si
184	mov cx, 80	186	mov cx, 80
185	@@:	187	@@:
186	lodsb	188	lodsb
187	stosw	189	stosw
188	loop @b	190	loop @b
189	pop si	191	pop si
190	pop cx	192	dec dx
191	loop dfl1	193	jnz dfl1
192	; draw bottom	194	; draw bottom
193	mov si, d80x25_bottom	195	mov si, d80x25_bottom
194	mov cx, d80x25_bottom_num * 80	196	mov cx, d80x25_bottom_num * 80
195	@@:	197	@@:
196	lodsb	198	lodsb
197	stosw	199	stosw
198	loop @b	200	loop @b
199		201
200	mov byte [space_msg+80], 0 ; now space_msg is null terminated	202	mov byte [space_msg+80], 0 ; now space_msg is null terminated
201		203
202	_setcursor d80x25_top_num,0	204	_setcursor d80x25_top_num,0
203		205
204		206
205	; TEST FOR 386+	207	; TEST FOR 386+
206		208
207	mov bx, 0x4000	209	mov bx, 0x4000
208	pushf	210	pushf
209	pop ax	211	pop ax
210	mov dx,ax	212	mov dx, ax
211	xor ax,bx	213	xor ax, bx
212	push ax	214	push ax
213	popf	215	popf
214	pushf	216	pushf
215	pop ax	217	pop ax
216	and ax,bx	218	and ax, bx
217	and dx,bx	219	and dx, bx
218	cmp ax,dx	220	cmp ax, dx
219	jnz cpugood	221	jnz cpugood
220	mov si,not386	222	mov si, not386
221	sayerr:	223	sayerr:
222	call print	224	call print
223	jmp $	225	jmp $
224	cpugood:	226	cpugood:
225		227
226	push 0	228	push 0
227	popf	229	popf
228	sti	230	sti
229		231
230	; set up esp	232	; set up esp
231	movzx esp, sp	233	movzx esp, sp
232		234
233	push 0	235	push 0
234	pop es	236	pop es
235	and word [es:0x9031], 0	237	and word [es:0x9031], 0
236	; \begin{Mario79}	238	; \begin{Mario79}
237	; find HDD IDE DMA PCI device	239	; find HDD IDE DMA PCI device
238	; check for PCI BIOS	240	; check for PCI BIOS
239	mov ax, 0xB101	241	mov ax, 0xB101
240	int 0x1A	242	int 0x1A
241	jc .nopci	243	jc .nopci
242	cmp edx, 'PCI '	244	cmp edx, 'PCI '
243	jnz .nopci	245	jnz .nopci
244	; find PCI class code	246	; find PCI class code
245	; class 1 = mass storage	247	; class 1 = mass storage
246	; subclass 1 = IDE controller	248	; subclass 1 = IDE controller
247	; a) class 1, subclass 1, programming interface 0x80	249	; a) class 1, subclass 1, programming interface 0x80
248	mov ax, 0xB103	250	mov ax, 0xB103
249	mov ecx, 110000h + 1100h + 0x80	251	mov ecx, 110000h + 1100h + 0x80
250	mov si, 0 ; device index = 0	252	xor si, si ; device index = 0
251	int 0x1A	253	int 0x1A
252	jnc .found	254	jnc .found
253	; b) class 1, subclass 1, programming interface 0x8A	255	; b) class 1, subclass 1, programming interface 0x8A
254	mov ax, 0xB103	256	mov ax, 0xB103
255	mov ecx, 110000h + 1100h + 0x8A	257	mov ecx, 110000h + 1100h + 0x8A
256	mov si, 0 ; device index = 0	258	xor si, si ; device index = 0
257	int 0x1A	259	int 0x1A
258	jnc .found	260	jnc .found
259	; c) class 1, subclass 1, programming interface 0x85	261	; c) class 1, subclass 1, programming interface 0x85
260	mov ax, 0xB103	262	mov ax, 0xB103
261	mov ecx, 110000h + 1100h + 0x85	263	mov ecx, 110000h + 1100h + 0x85
262	mov si, 0	264	xor si, si
263	int 0x1A	265	int 0x1A
264	jc .nopci	266	jc .nopci
265	.found:	267	.found:
266	; get memory base	268	; get memory base
267	mov ax, 0xB10A	269	mov ax, 0xB10A
268	mov di, 0x20 ; memory base is config register at 0x20	270	mov di, 0x20 ; memory base is config register at 0x20
269	int 0x1A	271	int 0x1A
270	jc .nopci	272	jc .nopci
271	and cx, 0xFFF0 ; clear address decode type	273	and cx, 0xFFF0 ; clear address decode type
272	mov [es:0x9031], cx	274	mov [es:0x9031], cx
273	.nopci:	275	.nopci:
274	; \end{Mario79}	276	; \end{Mario79}
275		277
276	mov al,0xf6 ; Ñáðîñ êëàâèàòóðû, ðàçðåøèòü ñêàíèðîâàíèå	278	mov al, 0xf6 ; Ñáðîñ êëàâèàòóðû, ðàçðåøèòü ñêàíèðîâàíèå
277	out 0x60,al	279	out 0x60, al
278	xor cx,cx	280	xor cx, cx
279	wait_loop: ; variant 2	281	wait_loop: ; variant 2
280	; reading state of port of 8042 controller	282	; reading state of port of 8042 controller
281	in al,64h	283	in al, 64h
282	and al,00000010b ; ready flag	284	and al, 00000010b ; ready flag
283	; wait until 8042 controller is ready	285	; wait until 8042 controller is ready
284	loopnz wait_loop	286	loopnz wait_loop
285		287
286	; --------------- APM ---------------------	288	; --------------- APM ---------------------
287	push 0	-
288	pop es	-
289	mov word [es : 0x9044], 0 ; ver = 0.0 (APM not found)	289	and word [es:0x9044], 0 ; ver = 0.0 (APM not found)
290	mov ax, 0x5300	290	mov ax, 0x5300
291	xor bx, bx	291	xor bx, bx
292	int 0x15	292	int 0x15
293	jc apm_end ; APM not found	293	jc apm_end ; APM not found
294	test cx, 2	294	test cx, 2
295	jz apm_end ; APM 32-bit protected-mode interface not supported	295	jz apm_end ; APM 32-bit protected-mode interface not supported
296	mov [es : 0x9044], ax ; Save APM Version	296	mov [es:0x9044], ax ; Save APM Version
297	mov [es : 0x9046], cx ; Save APM flags	297	mov [es:0x9046], cx ; Save APM flags
298		298
299	; Write APM ver ----	299	; Write APM ver ----
300	and ax, 0xf0f	300	and ax, 0xf0f
301	add ax, '00'	301	add ax, '00'
302	mov si, msg_apm	302	mov si, msg_apm
303	mov [si + 5], ah	303	mov [si + 5], ah
304	mov [si + 7], al	304	mov [si + 7], al
305	_setcursor 0, 3	305	_setcursor 0, 3
306	call printplain	306	call printplain
307	; ------------------	307	; ------------------
308		308
309	mov ax, 0x5304 ; Disconnect interface	309	mov ax, 0x5304 ; Disconnect interface
310	xor bx, bx	310	xor bx, bx
311	int 0x15	311	int 0x15
312	mov ax, 0x5303 ; Connect 32 bit mode interface	312	mov ax, 0x5303 ; Connect 32 bit mode interface
313	xor bx, bx	313	xor bx, bx
314	int 0x15	314	int 0x15
315		-
316	push 0	-
317	pop es	-
318		315
319	mov [es:0x9040], ebx	316	mov [es:0x9040], ebx
320	mov [es:0x9050], ax	317	mov [es:0x9050], ax
321	mov [es:0x9052], cx	318	mov [es:0x9052], cx
322	mov [es:0x9054], dx	319	mov [es:0x9054], dx
323		320
324	apm_end:	321	apm_end:
325	_setcursor d80x25_top_num, 0	322	_setcursor d80x25_top_num, 0
326		323
327	; DISPLAY VESA INFORMATION	324	; DISPLAY VESA INFORMATION
328		-
329	push 0	-
330	pop es	325
331	mov ax,0x4f00	326	mov ax, 0x4f00
332	mov di,0xa000	327	mov di, 0xa000
333	int 0x10	328	int 0x10
334	cmp ax,0x004f	329	cmp ax, 0x004f
335	mov si, novesa	330	mov si, novesa
336	jnz @f	331	jnz @f
337	mov bx, word [es:di+0x12]	-
338	shl ebx,16	-
339	mov [es:0x9050], ebx	-
340	mov ax,[es:di+4]	332	mov ax, [es:di+4]
341	add ax,'0'*256+'0'	333	add ax, '0'*256+'0'
342	mov si,vervesa	334	mov si, vervesa
343	mov [si+vervesa_off], ah	335	mov [si+vervesa_off], ah
344	mov [si+vervesa_off+2], al	336	mov [si+vervesa_off+2], al
345	@@: call print	337	@@: call print
346		338
347	; \begin{diamond}[30.11.2005]	339	; \begin{diamond}[30.11.2005]
348	cfgmanager:	340	cfgmanager:
349	; settings:	341	; settings:
350	; a) preboot_graph = graphical mode	342	; a) preboot_graph = graphical mode
351	; preboot_gprobe = probe this mode?	343	; preboot_gprobe = probe this mode?
352	; b) preboot_dma_write = use DMA write?	344	; b) preboot_dma = use DMA access?
353	; c) preboot_vrrm = use VRR?	345	; c) preboot_vrrm = use VRR?
354	; d) preboot_device = from what boot?	346	; d) preboot_device = from what boot?
355	mov di, preboot_graph	347	mov di, preboot_graph
356	; check bootloader block	348	; check bootloader block
357	cmp [.loader_block], -1	349	cmp [.loader_block], -1
358	jz .noloaderblock	350	jz .noloaderblock
359	les bx, [.loader_block]	351	les bx, [.loader_block]
360	cmp byte [es:bx], 1	352	cmp byte [es:bx], 1
361	mov si, loader_block_error	353	mov si, loader_block_error
362	jnz sayerr	354	jnz sayerr
363	test byte [es:bx+1], 1	355	test byte [es:bx+1], 1
364	jz @f	356	jz @f
365	; image in memory present	357	; image in memory present
366	cmp [di+preboot_device-preboot_graph], 0	358	cmp [di+preboot_device-preboot_graph], 0
367	jnz @f	359	jnz @f
368	mov [di+preboot_device-preboot_graph], 3	360	mov [di+preboot_device-preboot_graph], 3
369	@@:	361	@@:
370	.noloaderblock:	362	.noloaderblock:
371	; determine default settings	363	; determine default settings
372	mov [.bSettingsChanged], 0	364	mov [.bSettingsChanged], 0
373	cmp byte [di], 0	365	cmp byte [di], 0
374	jnz .preboot_gr_end	366	jnz .preboot_gr_end
375	mov [di+preboot_gprobe-preboot_graph], 0	367	mov [di+preboot_gprobe-preboot_graph], 0
376	mov al, [vervesa+vervesa_off]	368	mov al, [vervesa+vervesa_off]
377	cmp al, 'x'	369	cmp al, 'x'
378	jz .novesa	370	jz .novesa
379	cmp al, '1'	371	cmp al, '1'
380	jz .vesa12	372	jz .vesa12
381	mov [di+preboot_gprobe-preboot_graph], 2	373	mov [di+preboot_gprobe-preboot_graph], 2
382	mov al, 3	374	mov al, 3
383	jmp @f	375	jmp @f
384	.vesa12:	376	.vesa12:
385	mov al, 7	377	mov al, 7
386	jmp @f	378	jmp @f
387	.novesa:	379	.novesa:
388	mov al, 10	380	mov al, 10
389	@@:	381	@@:
390	mov [di], al	382	mov [di], al
391	.preboot_gr_end:	383	.preboot_gr_end:
-		384	; following 6 lines set variables to 1 if its current value is 0
392	cmp [di+preboot_dma_write-preboot_graph], 1	385	cmp [di+preboot_dma-preboot_graph], 1
393	adc [di+preboot_dma_write-preboot_graph], 0	386	adc [di+preboot_dma-preboot_graph], 0
394	cmp [di+preboot_vrrm-preboot_graph], 1	387	cmp [di+preboot_vrrm-preboot_graph], 1
395	adc [di+preboot_vrrm-preboot_graph], 0	388	adc [di+preboot_vrrm-preboot_graph], 0
396	cmp [di+preboot_device-preboot_graph], 1	389	cmp [di+preboot_device-preboot_graph], 1
397	adc [di+preboot_device-preboot_graph], 0	390	adc [di+preboot_device-preboot_graph], 0
398	; notify user	391	; notify user
399	mov si, linef	392	mov si, linef
400	call print	393	call print
401	mov si, start_msg	394	mov si, start_msg
402	call print	395	call print
403	mov si, time_msg	396	mov si, time_msg
404	call print	397	call print
405	; get start time	398	; get start time
406	call .gettime	399	call .gettime
407	mov [.starttime], eax	400	mov [.starttime], eax
408	mov word [.timer], .newtimer	401	mov word [.timer], .newtimer
409	mov word [.timer+2], cs	402	mov word [.timer+2], cs
410	.printcfg:	403	.printcfg:
411	_setcursor 9,0	404	_setcursor 9,0
412	mov si, current_cfg_msg	405	mov si, current_cfg_msg
413	call print	406	call print
414	mov si, curvideo_msg	407	mov si, curvideo_msg
415	call print	408	call print
416	mov al, [preboot_graph]	409	mov al, [preboot_graph]
417	cmp al, 8	410	cmp al, 8
418	ja .pnovesa	411	ja .pnovesa
419	mov dl, al	412	mov dl, al
420	and eax, 3	413	and eax, 3
421	mov si, [modes_msg+eax*2]	414	mov si, [modes_msg+eax*2]
422	call printplain	415	call printplain
423	mov si, modevesa20	416	mov si, modevesa20
424	cmp dl, 4	417	cmp dl, 4
425	jbe @f	418	jbe @f
426	mov si, modevesa12	419	mov si, modevesa12
427	@@:	420	@@:
428	call printplain	421	call printplain
429	cmp dl, 4	422	cmp dl, 4
430	ja .x	423	ja .x
431	mov si, probeno_msg	424	mov si, probeno_msg
432	cmp [preboot_gprobe], 2	425	cmp [preboot_gprobe], 2
433	jnz @f	426	jnz @f
434	mov si, probeok_msg	427	mov si, probeok_msg
435	@@:	428	@@:
436	call printplain	429	call printplain
437	.x:	430	.x:
438	jmp .c	431	jmp .c
439	.pnovesa:	432	.pnovesa:
440	cmp al, 9	433	cmp al, 9
441	mov si, mode9	434	mov si, mode9
442	jz @b	435	jz @b
443	mov si, mode10	436	mov si, mode10
444	jmp @b	437	jmp @b
445	.c:	438	.c:
446	mov si, linef	439	mov si, linef
447	call printplain	440	call printplain
448	mov si, dma_msg	441	mov si, dma_msg
-		442	call print
449	cmp [preboot_dma_write], 1	443	cmp [preboot_dma], 2
450	call .say_on_off	444	mov si, on_msg
-		445	jb @f
-		446	mov si, off_msg
-		447	ja @f
-		448	mov si, readonly_msg
-		449	@@:
-		450	call printplain
451	mov si, vrrm_msg	451	mov si, vrrm_msg
452	cmp [preboot_vrrm], 1	452	cmp [preboot_vrrm], 1
453	call .say_on_off	453	call .say_on_off
454	mov si, preboot_device_msg	454	mov si, preboot_device_msg
455	call print	455	call print
456	mov al, [preboot_device]	456	mov al, [preboot_device]
457	and eax, 3	457	and eax, 3
458	mov si, [preboot_device_msgs+eax*2]	458	mov si, [preboot_device_msgs+eax*2]
459	call printplain	459	call printplain
460	.wait:	460	.wait:
461	_setcursor 25,0 ; out of screen	461	_setcursor 25,0 ; out of screen
462	; set timer interrupt handler	462	; set timer interrupt handler
463	cli	463	cli
464	push 0	464	push 0
465	pop es	465	pop es
466	mov eax, [es:8*4]	466	mov eax, [es:8*4]
467	mov [.oldtimer], eax	467	mov [.oldtimer], eax
468	mov eax, [.timer]	468	mov eax, [.timer]
469	mov [es:8*4], eax	469	mov [es:8*4], eax
470	sti	470	sti
471	; wait for keypressed	471	; wait for keypressed
472	mov ah, 0	472	mov ah, 0
473	int 16h	473	int 16h
474	push ax	474	push ax
475	; restore timer interrupt	475	; restore timer interrupt
476	push 0	476	push 0
477	pop es	477	pop es
478	mov eax, [.oldtimer]	478	mov eax, [.oldtimer]
479	mov [es:8*4], eax	479	mov [es:8*4], eax
480	mov [.timer], eax	480	mov [.timer], eax
481	_setcursor 7,0	481	_setcursor 7,0
482	mov si, space_msg	482	mov si, space_msg
483	call printplain	483	call printplain
484	pop ax	484	pop ax
485	; switch on key	485	; switch on key
486	cmp al, 13	486	cmp al, 13
487	jz .continue	487	jz .continue
488	or al, 20h	488	or al, 20h
489	cmp al, 'a'	489	cmp al, 'a'

Subversion Repositories Kolibri OS

(root)/kernel/trunk/boot/bootcode.inc – Rev 509 → 514