source: xtideuniversalbios/trunk/XTIDE_Universal_BIOS/Src/Initialization/DetectPrint.asm @ 386

; Project name  :   XTIDE Universal BIOS
; Description   :   Functions for printing drive detection strings.

;
; XTIDE Universal BIOS and Associated Tools 
; Copyright (C) 2009-2010 by Tomi Tilli, 2011-2012 by XTIDE Universal BIOS Team.
;
; This program is free software; you can redistribute it and/or modify
; it under the terms of the GNU General Public License as published by
; the Free Software Foundation; either version 2 of the License, or
; (at your option) any later version.
; 
; This program is distributed in the hope that it will be useful,
; but WITHOUT ANY WARRANTY; without even the implied warranty of
; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
; GNU General Public License for more details.      
; Visit http://www.gnu.org/licenses/old-licenses/gpl-2.0.html
;       

; Section containing code
SECTION .text

;--------------------------------------------------------------------
; BootMenuPrint_InitializeDisplayContext
;   Parameters:
;       Nothing
;   Returns:
;       Nothing
;   Corrupts registers:
;       AX, DI
;--------------------------------------------------------------------
BootMenuPrint_InitializeDisplayContext:
    CALL_DISPLAY_LIBRARY InitializeDisplayContext
    ret


;--------------------------------------------------------------------
; Prints BIOS name and segment address where it is found.
;
; DetectPrint_RomFoundAtSegment
;   Parameters:
;       Nothing
;   Returns:
;       Nothing
;   Corrupts registers:
;       AX, SI, DI
;--------------------------------------------------------------------
DetectPrint_RomFoundAtSegment:
    push    bp
    mov     bp, sp
    mov     si, g_szRomAt
    ePUSH_T ax, ROMVARS.szTitle         ; Bios title string
    push    cs                          ; BIOS segment

    jmp     DetectPrint_FormatCSSIfromParamsInSSBP


;--------------------------------------------------------------------
; DetectPrint_StartDetectWithMasterOrSlaveStringInCXandIdeVarsInCSBP
;   Parameters:
;       CS:CX:  Ptr to "Master" or "Slave" string
;       CS:BP:  Ptr to IDEVARS
;       SI:     Ptr to template string
;   Returns:
;       Nothing
;   Corrupts registers:
;       AX, SI, DI, CX
;--------------------------------------------------------------------
DetectPrint_StartDetectWithMasterOrSlaveStringInCXandIdeVarsInCSBP:
    mov     ax, [cs:bp+IDEVARS.wPort]       ; for IDE: AX=port address, DH=.bDevice
    mov     dx, [cs:bp+IDEVARS.bDevice-1]   ; for Serial: AL=port address>>2, AH=baud rate
                                            ;             DL=COM number character, DH=.bDevice
%ifdef MODULE_JRIDE
    cmp     dh, DEVICE_JRIDE_ISA
    eCMOVE  ax, cs                          ; Use segment address for JR-IDE/ISA
%endif

    push    bp                              ; setup stack for call to
    mov     bp, sp                          ; BootMenuPrint_FormatCSSIfromParamsInSSBP

    push    cx                              ; Push "Master" or "Slave"

    mov     cl, (g_szDetectPort-$$) & 0xff  ; Setup print string for standard IDE
                                            ; Note that we modify only the low order bits of CX a lot here,
                                            ; saving code space rather than reloading CX completely.
                                            ; This optimization requires that all the g_szDetect* strings are
                                            ; on the same 256 byte page, which is checked in strings.asm.

%ifdef MODULE_SERIAL
    cmp     dh, DEVICE_SERIAL_PORT          ; Check if this is a serial device

    jnz     .pushAndPrint                   ; CX = string to print, AX = port address, DX won't be used

    mov     cl, (g_szDetectCOM-$$) & 0xff   ; Setup print string for COM ports
    push    cx                              ; And push now.  We use the fact that format strings can contain
                                            ; themselves format strings.

    push    dx                              ; Push COM number character
                                            ; If the string is going to be "Auto", we will push a NULL (zero)
                                            ; here for the COM port number, which will be eaten by the
                                            ; print routine (DisplayPrint_CharacterFromAL), resulting in
                                            ; just "COM" being printed without a character after it.

    mov     cl, (g_szDetectCOMAuto-$$) & 0xff   ; Setup secondary print string for "Auto"

    test    dl, dl                          ; Check if serial port "Auto"
    jz      .pushAndPrintSerial             ; CX = string to print, AX and DX won't be used

    mov     cl, (g_szDetectCOMLarge-$$) & 0xff  ; Setup secondary print string for "COMn/xx.yK"

    mov     al,ah                           ; baud rate divisor to AL
    cbw                                     ; clear AH, AL will always be less than 128
    xchg    si,ax                           ; move AX to SI for divide
    mov     ax,1152                         ; baud rate to display is 115200/divisor, the "00" is handled
                                            ; in the print strings
    cwd                                     ; clear top 16-bits of dividend
    div     si                              ; and divide...  Now AX = baud rate/100, DX = 0 (always a clean divide)

    mov     si,10                           ; Now separate the whole portion from the fractional for "K" display
    div     si                              ; and divide...  Now AX = baud rate/1000, DX = low order digit

    cmp     ax,si                           ; < 10: "2400", "9600", etc.; >= 10: "19.2K", "38.4K", etc.
    jae     .pushAndPrintSerial

    mov     cl, (g_szDetectCOMSmall-$$) & 0xff  ; Setup secondary print string for "COMn/XXy00"

.pushAndPrintSerial:
.pushAndPrint:
%endif

    push    cx                              ; Push print string
    push    ax                              ; Push high order digits, or port address, or N/A
    push    dx                              ; Push low order digit, or N/A

    mov     si, g_szDetectOuter             ; Load SI with default wrapper string "IDE %s at %s: "

    jmp     SHORT DetectPrint_FormatCSSIfromParamsInSSBP


;--------------------------------------------------------------------
; DetectPrint_DriveNameFromBootnfoInESBX
;   Parameters:
;       ES:BX:  Ptr to BOOTMENUINFO (if drive found)
;   Returns:
;       Nothing
;   Corrupts registers:
;       AX, SI
;--------------------------------------------------------------------
DetectPrint_DriveNameFromBootnfoInESBX:
    push    di
    push    bx

    lea     si, [bx+BOOTMENUINFO.szDrvName]
    mov     bx, es
    CALL_DISPLAY_LIBRARY PrintNullTerminatedStringFromBXSI
    CALL_DISPLAY_LIBRARY PrintNewlineCharacters

    pop     bx
    pop     di
    ret

;--------------------------------------------------------------------
; DetectPrint_FailedToLoadFirstSector
;   Parameters:
;       AH:     INT 13h error code
;   Returns:
;       Nothing
;   Corrupts registers:
;       AX, CX, SI, DI
;--------------------------------------------------------------------
DetectPrint_FailedToLoadFirstSector:
    push    bp
    mov     bp, sp
    eMOVZX  cx, ah
    push    cx                  ; Push INT 13h error code
    mov     si, g_szReadError
    jmp     SHORT DetectPrint_FormatCSSIfromParamsInSSBP


;--------------------------------------------------------------------
; DetectPrint_TryToBootFromDL
;   Parameters:
;       DL:     Drive to boot from (translated, 00h or 80h)
;       DS:     RAMVARS segment
;   Returns:
;       Nothing
;   Corrupts registers:
;       AX, SI, DI
;--------------------------------------------------------------------
DetectPrint_TryToBootFromDL:
    push    bp
    mov     bp, sp

    mov     ax, g_szHDD
    test    dl, dl
    js      SHORT .NotFDD
    mov     ax, g_szFDD
.NotFDD:
    push    ax

    call    DriveXlate_ToOrBack
    push    dx                  ; Push untranslated drive number
    call    DriveXlate_ToOrBack
    push    dx                  ; Push translated drive number

    mov     si, g_szTryToBoot
    jmp     SHORT DetectPrint_FormatCSSIfromParamsInSSBP    


;--------------------------------------------------------------------
; DetectPrint_NullTerminatedStringFromCSSIandSetCF
;   Parameters:
;       CS:SI:  Ptr to NULL terminated string to print
;   Returns:
;       CF:     Set since menu event was handled successfully
;   Corrupts registers:
;       AX, DI
;--------------------------------------------------------------------
DetectPrint_NullTerminatedStringFromCSSIandSetCF:
;
; We send all CSSI strings through the Format routine for the case of
; compressed strings, but this doesn't hurt in the non-compressed case either
; (perhaps a little slower, but shouldn't be noticeable to the user)
; and results in smaller code size.
;
    push    bp
    mov     bp,sp
    ; Fall to BootMenuPrint_FormatCSSIfromParamsInSSBP

;--------------------------------------------------------------------
; DetectPrint_FormatCSSIfromParamsInSSBP
;   Parameters:
;       CS:SI:  Ptr to string to format
;       BP:     SP before pushing parameters
;   Returns:
;       BP:     Popped from stack
;       CF:     Set since menu event was handled successfully
;   Corrupts registers:
;       AX, DI
;--------------------------------------------------------------------
DetectPrint_FormatCSSIfromParamsInSSBP:
    CALL_DISPLAY_LIBRARY FormatNullTerminatedStringFromCSSI
    stc             ; Successful return from menu event
    pop     bp
    ret