WebSVN – Kolibri OS – Diff – /kernel/branches/flat_kernel/boot/bootcode.inc


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

Subversion Repositories Kolibri OS

(root)/kernel/branches/flat_kernel/boot/bootcode.inc – Rev 419 → 420