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


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

Subversion Repositories Kolibri OS

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