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


$Revision: 509 $
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;                                                              ;;
;; 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]
    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]
 
    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
        mov  dx,0h              ; 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    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
    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
        mov     si, 0   ; 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
        mov     si, 0   ; 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
        mov     si, 0
        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 ---------------------
    push    0
    pop    es
    mov    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
 
    push 0
    pop es
 
    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
 
    push    0
    pop    es
        mov     ax,0x4f00
        mov     di,0xa000
        int     0x10
        cmp     ax,0x004f
        mov    si, novesa
        jnz    @f
        mov bx, word [es:di+0x12]
        shl ebx,16
        mov [es:0x9050], ebx
        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_write  = use DMA write?
; 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:
    cmp    [di+preboot_dma_write-preboot_graph], 1
    adc    [di+preboot_dma_write-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
    cmp    [preboot_dma_write], 1
    call    .say_on_off
    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, '12'
    call    getkey
    mov    [preboot_dma_write], 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
@@:    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 -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
        mov    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    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
        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
        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
; force yes
        mov     [es:0x901C], byte 1
 
; DMA WRITE
 
        mov     al, [preboot_dma_write]
        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 488	Rev 509
1	$Revision: 488 $	1	$Revision: 509 $
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	cmp ax, 'KL'	112	cmp ax, 'KL'
113	jnz @f	113	jnz @f
114	mov word [cs:cfgmanager.loader_block], si	114	mov word [cs:cfgmanager.loader_block], si
115	mov word [cs:cfgmanager.loader_block+2], ds	115	mov word [cs:cfgmanager.loader_block+2], ds
116	@@:	116	@@:
117	; \end{diamond}[02.12.2005]	117	; \end{diamond}[02.12.2005]
118		118
119	cmp cx,'HA' ; ïî ðåãèñòðàì îïðåäåëÿåòñÿ çàãðóçêà ñ âèíòà	119	cmp cx,'HA' ; ïî ðåãèñòðàì îïðåäåëÿåòñÿ çàãðóçêà ñ âèíòà
120	jnz no_hd_load	120	jnz no_hd_load
121	cmp dx,'RD'	121	cmp dx,'RD'
122	jnz no_hd_load	122	jnz no_hd_load
123	mov word [bx_from_load], bx ; {SPraid}[13.03.2007]	123	mov word [cs:bx_from_load], bx ; {SPraid}[13.03.2007]
124	jmp load_next	-
125	no_hd_load:	124	no_hd_load:
126	mov word [bx_from_load], 'r1' ; if work with floppy	-
127	load_next:	-
128		125
129	; set up stack	126	; set up stack
130	mov ax, 3000h	127	mov ax, 3000h
131	mov ss, ax	128	mov ss, ax
132	mov sp, 0EC00h	129	mov sp, 0EC00h
133	; set up segment registers	130	; set up segment registers
134	push cs	131	push cs
135	pop ds	132	pop ds
136	push cs	133	push cs
137	pop es	134	pop es
138		135
139	; set videomode	136	; set videomode
140	mov ax, 3	137	mov ax, 3
141	int 0x10	138	int 0x10
142		139
143	if lang eq ru	140	if lang eq ru
144	; Load & set russian VGA font (RU.INC)	141	; Load & set russian VGA font (RU.INC)
145	mov bp, RU_FNT1 ; RU_FNT1 - First part	142	mov bp, RU_FNT1 ; RU_FNT1 - First part
146	mov bx,1000h ; 768 bytes	143	mov bx,1000h ; 768 bytes
147	mov cx,30h ; 48 symbols	144	mov cx,30h ; 48 symbols
148	mov dx,80h ; 128 - position of first symbol	145	mov dx,80h ; 128 - position of first symbol
149	mov ax,1100h	146	mov ax,1100h
150	int 10h	147	int 10h
151		148
152	mov bp,RU_FNT2 ; RU_FNT2 -Second part	149	mov bp,RU_FNT2 ; RU_FNT2 -Second part
153	mov bx,1000h ; 512 bytes	150	mov bx,1000h ; 512 bytes
154	mov cx,20h ; 32 symbols	151	mov cx,20h ; 32 symbols
155	mov dx,0E0h ; 224 - position of first symbol	152	mov dx,0E0h ; 224 - position of first symbol
156	mov ax,1100h	153	mov ax,1100h
157	int 10h	154	int 10h
158	; End set VGA russian font	155	; End set VGA russian font
159	else if lang eq et	156	else if lang eq et
160	mov bp,ET_FNT ; ET_FNT1	157	mov bp,ET_FNT ; ET_FNT1
161	mov bx,1000h ;	158	mov bx,1000h ;
162	mov cx,255 ; 256 symbols	159	mov cx,255 ; 256 symbols
163	mov dx,0h ; 0 - position of first symbol	160	mov dx,0h ; 0 - position of first symbol
164	mov ax,1100h	161	mov ax,1100h
165	int 10h	162	int 10h
166	end if	163	end if
167		164
168	; draw frames	165	; draw frames
169	push 0xb800	166	push 0xb800
170	pop es	167	pop es
171	xor di, di	168	xor di, di
172	mov ah, 1*16+15	169	mov ah, 1*16+15
173		170
174	; draw top	171	; draw top
175	mov si, d80x25_top	172	mov si, d80x25_top
176	mov cx, d80x25_top_num * 80	173	mov cx, d80x25_top_num * 80
177	@@:	174	@@:
178	lodsb	175	lodsb
179	stosw	176	stosw
180	loop @b	177	loop @b
181	; draw spaces	178	; draw spaces
182	mov si, space_msg	179	mov si, space_msg
183	mov cx, 25 - d80x25_top_num - d80x25_bottom_num	180	mov cx, 25 - d80x25_top_num - d80x25_bottom_num
184	dfl1:	181	dfl1:
185	push cx	182	push cx
186	push si	183	push si
187	mov cx, 80	184	mov cx, 80
188	@@:	185	@@:
189	lodsb	186	lodsb
190	stosw	187	stosw
191	loop @b	188	loop @b
192	pop si	189	pop si
193	pop cx	190	pop cx
194	loop dfl1	191	loop dfl1
195	; draw bottom	192	; draw bottom
196	mov si, d80x25_bottom	193	mov si, d80x25_bottom
197	mov cx, d80x25_bottom_num * 80	194	mov cx, d80x25_bottom_num * 80
198	@@:	195	@@:
199	lodsb	196	lodsb
200	stosw	197	stosw
201	loop @b	198	loop @b
202		199
203	mov byte [space_msg+80], 0 ; now space_msg is null terminated	200	mov byte [space_msg+80], 0 ; now space_msg is null terminated
204		201
205	_setcursor d80x25_top_num,0	202	_setcursor d80x25_top_num,0
206		203
207		204
208	; TEST FOR 386+	205	; TEST FOR 386+
209		206
210	mov bx, 0x4000	207	mov bx, 0x4000
211	pushf	208	pushf
212	pop ax	209	pop ax
213	mov dx,ax	210	mov dx,ax
214	xor ax,bx	211	xor ax,bx
215	push ax	212	push ax
216	popf	213	popf
217	pushf	214	pushf
218	pop ax	215	pop ax
219	and ax,bx	216	and ax,bx
220	and dx,bx	217	and dx,bx
221	cmp ax,dx	218	cmp ax,dx
222	jnz cpugood	219	jnz cpugood
223	mov si,not386	220	mov si,not386
224	sayerr:	221	sayerr:
225	call print	222	call print
226	jmp $	223	jmp $
227	cpugood:	224	cpugood:
228		225
229	push 0	226	push 0
230	popf	227	popf
231	sti	228	sti
232		229
233	; set up esp	230	; set up esp
234	movzx esp, sp	231	movzx esp, sp
235		232
236	push 0	233	push 0
237	pop es	234	pop es
238	and word [es:0x9031], 0	235	and word [es:0x9031], 0
239	; \begin{Mario79}	236	; \begin{Mario79}
240	; find HDD IDE DMA PCI device	237	; find HDD IDE DMA PCI device
241	; check for PCI BIOS	238	; check for PCI BIOS
242	mov ax, 0xB101	239	mov ax, 0xB101
243	int 0x1A	240	int 0x1A
244	jc .nopci	241	jc .nopci
245	cmp edx, 'PCI '	242	cmp edx, 'PCI '
246	jnz .nopci	243	jnz .nopci
247	; find PCI class code	244	; find PCI class code
248	; class 1 = mass storage	245	; class 1 = mass storage
249	; subclass 1 = IDE controller	246	; subclass 1 = IDE controller
250	; a) class 1, subclass 1, programming interface 0x80	247	; a) class 1, subclass 1, programming interface 0x80
251	mov ax, 0xB103	248	mov ax, 0xB103
252	mov ecx, 110000h + 1100h + 0x80	249	mov ecx, 110000h + 1100h + 0x80
253	mov si, 0 ; device index = 0	250	mov si, 0 ; device index = 0
254	int 0x1A	251	int 0x1A
255	jnc .found	252	jnc .found
256	; b) class 1, subclass 1, programming interface 0x8A	253	; b) class 1, subclass 1, programming interface 0x8A
257	mov ax, 0xB103	254	mov ax, 0xB103
258	mov ecx, 110000h + 1100h + 0x8A	255	mov ecx, 110000h + 1100h + 0x8A
259	mov si, 0 ; device index = 0	256	mov si, 0 ; device index = 0
260	int 0x1A	257	int 0x1A
261	jnc .found	258	jnc .found
262	; c) class 1, subclass 1, programming interface 0x85	259	; c) class 1, subclass 1, programming interface 0x85
263	mov ax, 0xB103	260	mov ax, 0xB103
264	mov ecx, 110000h + 1100h + 0x85	261	mov ecx, 110000h + 1100h + 0x85
265	mov si, 0	262	mov si, 0
266	int 0x1A	263	int 0x1A
267	jc .nopci	264	jc .nopci
268	.found:	265	.found:
269	; get memory base	266	; get memory base
270	mov ax, 0xB10A	267	mov ax, 0xB10A
271	mov di, 0x20 ; memory base is config register at 0x20	268	mov di, 0x20 ; memory base is config register at 0x20
272	int 0x1A	269	int 0x1A
273	jc .nopci	270	jc .nopci
274	and cx, 0xFFF0 ; clear address decode type	271	and cx, 0xFFF0 ; clear address decode type
275	mov [es:0x9031], cx	272	mov [es:0x9031], cx
276	.nopci:	273	.nopci:
277	; \end{Mario79}	274	; \end{Mario79}
278		275
279	mov al,0xf6 ; Ñáðîñ êëàâèàòóðû, ðàçðåøèòü ñêàíèðîâàíèå	276	mov al,0xf6 ; Ñáðîñ êëàâèàòóðû, ðàçðåøèòü ñêàíèðîâàíèå
280	out 0x60,al	277	out 0x60,al
281	xor cx,cx	278	xor cx,cx
282	wait_loop: ; variant 2	279	wait_loop: ; variant 2
283	; reading state of port of 8042 controller	280	; reading state of port of 8042 controller
284	in al,64h	281	in al,64h
285	and al,00000010b ; ready flag	282	and al,00000010b ; ready flag
286	; wait until 8042 controller is ready	283	; wait until 8042 controller is ready
287	loopnz wait_loop	284	loopnz wait_loop
288		285
289	; --------------- APM ---------------------	286	; --------------- APM ---------------------
290	push 0	287	push 0
291	pop es	288	pop es
292	mov word [es : 0x9044], 0 ; ver = 0.0 (APM not found)	289	mov word [es : 0x9044], 0 ; ver = 0.0 (APM not found)
293	mov ax, 0x5300	290	mov ax, 0x5300
294	xor bx, bx	291	xor bx, bx
295	int 0x15	292	int 0x15
296	jc apm_end ; APM not found	293	jc apm_end ; APM not found
297	test cx, 2	294	test cx, 2
298	jz apm_end ; APM 32-bit protected-mode interface not supported	295	jz apm_end ; APM 32-bit protected-mode interface not supported
299	mov [es : 0x9044], ax ; Save APM Version	296	mov [es : 0x9044], ax ; Save APM Version
300	mov [es : 0x9046], cx ; Save APM flags	297	mov [es : 0x9046], cx ; Save APM flags
301		298
302	; Write APM ver ----	299	; Write APM ver ----
303	and ax, 0xf0f	300	and ax, 0xf0f
304	add ax, '00'	301	add ax, '00'
305	mov si, msg_apm	302	mov si, msg_apm
306	mov [si + 5], ah	303	mov [si + 5], ah
307	mov [si + 7], al	304	mov [si + 7], al
308	_setcursor 0, 3	305	_setcursor 0, 3
309	call printplain	306	call printplain
310	; ------------------	307	; ------------------
311		308
312	mov ax, 0x5304 ; Disconnect interface	309	mov ax, 0x5304 ; Disconnect interface
313	xor bx, bx	310	xor bx, bx
314	int 0x15	311	int 0x15
315	mov ax, 0x5303 ; Connect 32 bit mode interface	312	mov ax, 0x5303 ; Connect 32 bit mode interface
316	xor bx, bx	313	xor bx, bx
317	int 0x15	314	int 0x15
318		315
319	push 0	316	push 0
320	pop es	317	pop es
321		318
322	mov [es:0x9040], ebx	319	mov [es:0x9040], ebx
323	mov [es:0x9050], ax	320	mov [es:0x9050], ax
324	mov [es:0x9052], cx	321	mov [es:0x9052], cx
325	mov [es:0x9054], dx	322	mov [es:0x9054], dx
326		323
327	apm_end:	324	apm_end:
328	_setcursor d80x25_top_num, 0	325	_setcursor d80x25_top_num, 0
329		326
330	; DISPLAY VESA INFORMATION	327	; DISPLAY VESA INFORMATION
331		328
332	push 0	329	push 0
333	pop es	330	pop es
334	mov ax,0x4f00	331	mov ax,0x4f00
335	mov di,0xa000	332	mov di,0xa000
336	int 0x10	333	int 0x10
337	cmp ax,0x004f	334	cmp ax,0x004f
338	mov si, novesa	335	mov si, novesa
339	jnz @f	336	jnz @f
340	mov bx, word [es:di+0x12]	337	mov bx, word [es:di+0x12]
341	shl ebx,16	338	shl ebx,16
342	mov [es:0x9050], ebx	339	mov [es:0x9050], ebx
343	mov ax,[es:di+4]	340	mov ax,[es:di+4]
344	add ax,'0'*256+'0'	341	add ax,'0'*256+'0'
345	mov si,vervesa	342	mov si,vervesa
346	mov [si+vervesa_off], ah	343	mov [si+vervesa_off], ah
347	mov [si+vervesa_off+2], al	344	mov [si+vervesa_off+2], al
348	@@: call print	345	@@: call print
349		346
350	; \begin{diamond}[30.11.2005]	347	; \begin{diamond}[30.11.2005]
351	cfgmanager:	348	cfgmanager:
352	; settings:	349	; settings:
353	; a) preboot_graph = graphical mode	350	; a) preboot_graph = graphical mode
354	; preboot_gprobe = probe this mode?	351	; preboot_gprobe = probe this mode?
355	; b) preboot_dma_write = use DMA write?	352	; b) preboot_dma_write = use DMA write?
356	; c) preboot_vrrm = use VRR?	353	; c) preboot_vrrm = use VRR?
357	; d) preboot_device = from what boot?	354	; d) preboot_device = from what boot?
358	mov di, preboot_graph	355	mov di, preboot_graph
359	; check bootloader block	356	; check bootloader block
360	cmp [.loader_block], -1	357	cmp [.loader_block], -1
361	jz .noloaderblock	358	jz .noloaderblock
362	les bx, [.loader_block]	359	les bx, [.loader_block]
363	cmp byte [es:bx], 1	360	cmp byte [es:bx], 1
364	mov si, loader_block_error	361	mov si, loader_block_error
365	jnz sayerr	362	jnz sayerr
366	test byte [es:bx+1], 1	363	test byte [es:bx+1], 1
367	jz @f	364	jz @f
368	; image in memory present	365	; image in memory present
369	cmp [di+preboot_device-preboot_graph], 0	366	cmp [di+preboot_device-preboot_graph], 0
370	jnz @f	367	jnz @f
371	mov [di+preboot_device-preboot_graph], 3	368	mov [di+preboot_device-preboot_graph], 3
372	@@:	369	@@:
373	.noloaderblock:	370	.noloaderblock:
374	; determine default settings	371	; determine default settings
375	mov [.bSettingsChanged], 0	372	mov [.bSettingsChanged], 0
376	cmp byte [di], 0	373	cmp byte [di], 0
377	jnz .preboot_gr_end	374	jnz .preboot_gr_end
378	mov [di+preboot_gprobe-preboot_graph], 0	375	mov [di+preboot_gprobe-preboot_graph], 0
379	mov al, [vervesa+vervesa_off]	376	mov al, [vervesa+vervesa_off]
380	cmp al, 'x'	377	cmp al, 'x'
381	jz .novesa	378	jz .novesa
382	cmp al, '1'	379	cmp al, '1'
383	jz .vesa12	380	jz .vesa12
384	mov [di+preboot_gprobe-preboot_graph], 2	381	mov [di+preboot_gprobe-preboot_graph], 2
385	mov al, 3	382	mov al, 3
386	jmp @f	383	jmp @f
387	.vesa12:	384	.vesa12:
388	mov al, 7	385	mov al, 7
389	jmp @f	386	jmp @f
390	.novesa:	387	.novesa:
391	mov al, 10	388	mov al, 10
392	@@:	389	@@:
393	mov [di], al	390	mov [di], al
394	.preboot_gr_end:	391	.preboot_gr_end:
395	cmp [di+preboot_dma_write-preboot_graph], 1	392	cmp [di+preboot_dma_write-preboot_graph], 1
396	adc [di+preboot_dma_write-preboot_graph], 0	393	adc [di+preboot_dma_write-preboot_graph], 0
397	cmp [di+preboot_vrrm-preboot_graph], 1	394	cmp [di+preboot_vrrm-preboot_graph], 1
398	adc [di+preboot_vrrm-preboot_graph], 0	395	adc [di+preboot_vrrm-preboot_graph], 0
399	cmp [di+preboot_device-preboot_graph], 1	396	cmp [di+preboot_device-preboot_graph], 1
400	adc [di+preboot_device-preboot_graph], 0	397	adc [di+preboot_device-preboot_graph], 0
401	; notify user	398	; notify user
402	mov si, linef	399	mov si, linef
403	call print	400	call print
404	mov si, start_msg	401	mov si, start_msg
405	call print	402	call print
406	mov si, time_msg	403	mov si, time_msg
407	call print	404	call print
408	; get start time	405	; get start time
409	call .gettime	406	call .gettime
410	mov [.starttime], eax	407	mov [.starttime], eax
411	mov word [.timer], .newtimer	408	mov word [.timer], .newtimer
412	mov word [.timer+2], cs	409	mov word [.timer+2], cs
413	.printcfg:	410	.printcfg:
414	_setcursor 9,0	411	_setcursor 9,0
415	mov si, current_cfg_msg	412	mov si, current_cfg_msg
416	call print	413	call print
417	mov si, curvideo_msg	414	mov si, curvideo_msg
418	call print	415	call print
419	mov al, [preboot_graph]	416	mov al, [preboot_graph]
420	cmp al, 8	417	cmp al, 8
421	ja .pnovesa	418	ja .pnovesa
422	mov dl, al	419	mov dl, al
423	and eax, 3	420	and eax, 3
424	mov si, [modes_msg+eax*2]	421	mov si, [modes_msg+eax*2]
425	call printplain	422	call printplain
426	mov si, modevesa20	423	mov si, modevesa20
427	cmp dl, 4	424	cmp dl, 4
428	jbe @f	425	jbe @f
429	mov si, modevesa12	426	mov si, modevesa12
430	@@:	427	@@:
431	call printplain	428	call printplain
432	cmp dl, 4	429	cmp dl, 4
433	ja .x	430	ja .x
434	mov si, probeno_msg	431	mov si, probeno_msg
435	cmp [preboot_gprobe], 2	432	cmp [preboot_gprobe], 2
436	jnz @f	433	jnz @f
437	mov si, probeok_msg	434	mov si, probeok_msg
438	@@:	435	@@:
439	call printplain	436	call printplain
440	.x:	437	.x:
441	jmp .c	438	jmp .c
442	.pnovesa:	439	.pnovesa:
443	cmp al, 9	440	cmp al, 9
444	mov si, mode9	441	mov si, mode9
445	jz @b	442	jz @b
446	mov si, mode10	443	mov si, mode10
447	jmp @b	444	jmp @b
448	.c:	445	.c:
449	mov si, linef	446	mov si, linef
450	call printplain	447	call printplain
451	mov si, dma_msg	448	mov si, dma_msg
452	cmp [preboot_dma_write], 1	449	cmp [preboot_dma_write], 1
453	call .say_on_off	450	call .say_on_off
454	mov si, vrrm_msg	451	mov si, vrrm_msg
455	cmp [preboot_vrrm], 1	452	cmp [preboot_vrrm], 1
456	call .say_on_off	453	call .say_on_off
457	mov si, preboot_device_msg	454	mov si, preboot_device_msg
458	call print	455	call print
459	mov al, [preboot_device]	456	mov al, [preboot_device]
460	and eax, 3	457	and eax, 3
461	mov si, [preboot_device_msgs+eax*2]	458	mov si, [preboot_device_msgs+eax*2]
462	call printplain	459	call printplain
463	.wait:	460	.wait:
464	_setcursor 25,0 ; out of screen	461	_setcursor 25,0 ; out of screen
465	; set timer interrupt handler	462	; set timer interrupt handler
466	cli	463	cli
467	push 0	464	push 0
468	pop es	465	pop es
469	mov eax, [es:8*4]	466	mov eax, [es:8*4]
470	mov [.oldtimer], eax	467	mov [.oldtimer], eax
471	mov eax, [.timer]	468	mov eax, [.timer]
472	mov [es:8*4], eax	469	mov [es:8*4], eax
473	sti	470	sti
474	; wait for keypressed	471	; wait for keypressed
475	mov ah, 0	472	mov ah, 0
476	int 16h	473	int 16h
477	push ax	474	push ax
478	; restore timer interrupt	475	; restore timer interrupt
479	push 0	476	push 0
480	pop es	477	pop es
481	mov eax, [.oldtimer]	478	mov eax, [.oldtimer]
482	mov [es:8*4], eax	479	mov [es:8*4], eax
483	mov [.timer], eax	480	mov [.timer], eax
484	_setcursor 7,0	481	_setcursor 7,0
485	mov si, space_msg	482	mov si, space_msg
486	call printplain	483	call printplain
487	pop ax	484	pop ax
488	; switch on key	485	; switch on key
489	cmp al, 13	486	cmp al, 13
490	jz .continue	487	jz .continue
491	or al, 20h	488	or al, 20h
492	cmp al, 'a'	489	cmp al, 'a'
493	jz .change_a	490	jz .change_a
494	cmp al, 'b'	491	cmp al, 'b'
495	jz .change_b	492	jz .change_b
496	cmp al, 'c'	493	cmp al, 'c'
497	jz .change_c	494	jz .change_c
498	cmp al, 'd'	495	cmp al, 'd'
499	jnz .wait	496	jnz .wait
500	_setcursor 15,0	497	_setcursor 15,0

Subversion Repositories Kolibri OS

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