source: xtideuniversalbios/trunk/BIOS_Drive_Information_Tool/Src/AtaInfo.asm @ 612

; Project name  :   BIOS Drive Information Tool
; Description   :   Reads and prints information from ATA ID.

;
; XTIDE Universal BIOS and Associated Tools
; Copyright (C) 2009-2010 by Tomi Tilli, 2011-2013 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


;--------------------------------------------------------------------
; AtaInfo_DisplayAtaInformationForDriveDL
;   Parameters:
;       DL:     Drive Number
;   Returns:
;       Nothing
;   Corrupts registers:
;       All, except CX and DX
;--------------------------------------------------------------------
AtaInfo_DisplayAtaInformationForDriveDL:
    push    cx
    push    dx

    ; Read ATA Information from the drive
    call    Bios_ReadAtaInfoFromDriveDLtoBX
    call    Print_ErrorMessageFromAHifError ; AH=25h is not available on many BIOSes
    jc      SHORT .SkipAtaInfoSinceError

    ; Print Drive Name
    call    Print_NameFromAtaInfoInBX

    ; Print Drive P-CHS parameters
    call    DisplayPCHSusingAtaInfoFromDSBX

    ; Print Drive CHS sector count
    test    WORD [bx+ATA1.wFields], A1_wFields_54to58
    jz      SHORT .SkipChsSectors
    call    DisplayPCHSsectorCountUsingAtaInfoFromDXBX
.SkipChsSectors:

    ; Print Drive LBA28 sector count
    test    WORD [bx+ATA1.wCaps], A1_wCaps_LBA
    jz      SHORT .SkipLBA28
    call    DisplayLBA28sectorCountUsingAtaInfoFromDSBX
.SkipLBA28:

    ; Print Drive LBA48 sector count
    test    WORD [bx+ATA6.wSetSup83], A6_wSetSup83_LBA48
    jz      SHORT .SkipLBA48
    call    DisplayLBA48sectorCountUsingAtaInfoFromDSBX
.SkipLBA48:

    ; Print block mode information
    call    DisplayBlockModeInformationUsingAtaInfoFromDSBX

    ; Print PIO mode information
    call    DisplayPioModeInformationUsingAtaInfoFromDSBX

    ; Print L-CHS generated by XTIDE Universal BIOS
    call    DisplayXUBcompatibilityInfoUsingAtaInfoFromDSBX

.SkipAtaInfoSinceError:
    pop     dx
    pop     cx
    ret


;--------------------------------------------------------------------
; DisplayPCHSusingAtaInfoFromDSBX
;   Parameters:
;       BX:     Offset to ATA Information
;   Returns:
;       Nothing
;   Corrupts registers:
;       AX, CX, DX, BP, SI, DI
;--------------------------------------------------------------------
DisplayPCHSusingAtaInfoFromDSBX:
    mov     si, bx          ; DS == ES
    call    AtaGeometry_GetPCHStoAXBLBHfromAtaInfoInESSI
    xchg    cx, ax
    eMOVZX  dx, bl
    eMOVZX  ax, bh
    call    Print_CHSfromCXDXAX
    mov     bx, si          ; Restore BX
    ret


;--------------------------------------------------------------------
; DisplayPCHSsectorCountUsingAtaInfoFromDXBX
;   Parameters:
;       BX:     Offset to ATA Information
;   Returns:
;       Nothing
;   Corrupts registers:
;       AX, DX, BP, SI, DI
;--------------------------------------------------------------------
DisplayPCHSsectorCountUsingAtaInfoFromDXBX:
    mov     si, g_szChsSectors
    call    Print_NullTerminatedStringFromSI

    mov     si, bx
    mov     ax, [si+ATA1.dwCurSCnt]
    mov     dx, [si+ATA1.dwCurSCnt+2]
    xor     bx, bx
    call    Print_TotalSectorsFromBXDXAX
    mov     bx, si          ; Restore BX
    ret


;--------------------------------------------------------------------
; DisplayLBA28sectorCountUsingAtaInfoFromDSBX
;   Parameters:
;       BX:     Offset to ATA Information
;   Returns:
;       Nothing
;   Corrupts registers:
;       AX, DX, BP, SI, DI
;--------------------------------------------------------------------
DisplayLBA28sectorCountUsingAtaInfoFromDSBX:
    mov     si, g_szLBA28
    call    Print_NullTerminatedStringFromSI

    mov     si, bx
    mov     ax, [si+ATA1.dwLBACnt]
    mov     dx, [si+ATA1.dwLBACnt+2]
    xor     bx, bx
    call    Print_TotalSectorsFromBXDXAX
    mov     bx, si          ; Restore BX
    ret


;--------------------------------------------------------------------
; DisplayLBA48sectorCountUsingAtaInfoFromDSBX
;   Parameters:
;       BX:     Offset to ATA Information
;   Returns:
;       Nothing
;   Corrupts registers:
;       AX, DX, BP, SI, DI
;--------------------------------------------------------------------
DisplayLBA48sectorCountUsingAtaInfoFromDSBX:
    mov     si, g_szLBA48
    call    Print_NullTerminatedStringFromSI

    mov     si, bx
    mov     ax, [si+ATA6.qwLBACnt]
    mov     dx, [si+ATA6.qwLBACnt+2]
    mov     bx, [si+ATA6.qwLBACnt+4]
    call    Print_TotalSectorsFromBXDXAX
    mov     bx, si          ; Restore BX
    ret


;--------------------------------------------------------------------
; DisplayBlockModeInformationUsingAtaInfoFromDSBX
;   Parameters:
;       BX:     Offset to ATA Information
;   Returns:
;       Nothing
;   Corrupts registers:
;       AX, DX, BP, SI, DI
;--------------------------------------------------------------------
DisplayBlockModeInformationUsingAtaInfoFromDSBX:
    eMOVZX  ax, [bx+ATA1.bBlockSel] ; ATA2+ has flag on high word
    cwd
    mov     dl, [bx+ATA1.bBlckSize]
    mov     si, g_szBlockMode
    jmp     Print_FormatStringFromSIwithParametersInAXDX


;--------------------------------------------------------------------
; DisplayPioModeInformationUsingAtaInfoFromDSBX
;   Parameters:
;       BX:     Offset to ATA Information
;   Returns:
;       Nothing
;   Corrupts registers:
;       AX, CX, DX, BP, SI, DI
;--------------------------------------------------------------------
DisplayPioModeInformationUsingAtaInfoFromDSBX:
    ; Load standard timings (up to PIO-2)
    mov     al, [bx+ATA1.bPioMode]
    cbw
    mov     si, ax
    eSHL_IM si, 1       ; Shift for WORD lookup
    mov     dx, [si+.rgwStandardPioTimings] ; Load min cycle time
    mov     cx, -1      ; IORDY not supported

    ; Replace with advanced mode timings (PIO-3 and up)
    test    BYTE [bx+ATA2.wFields], A2_wFields_64to70
    jz      SHORT .NoAdvancedPioModesSupported

    mov     si, 0FFh
    and     si, [bx+ATA2.bPIOSupp]  ; Advanced mode flags
    jz      SHORT .NoAdvancedPioModesSupported
.IncrementPioMode:
    inc     ax
    shr     si, 1
    jnz     SHORT .IncrementPioMode
    mov     dx, [bx+ATA2.wPIOMinCy]
    mov     cx, [bx+ATA2.wPIOMinCyF]

.NoAdvancedPioModesSupported:
    mov     si, g_szPIO
    jmp     Print_FormatStringFromSIwithParametersInAXDXCX

.rgwStandardPioTimings:
    dw      PIO_0_MIN_CYCLE_TIME_NS
    dw      PIO_1_MIN_CYCLE_TIME_NS
    dw      PIO_2_MIN_CYCLE_TIME_NS


;--------------------------------------------------------------------
; DisplayXUBcompatibilityInfoUsingAtaInfoFromDSBX
;   Parameters:
;       BX:     Offset to ATA Information
;   Returns:
;       Nothing
;   Corrupts registers:
;       AX, BX, CX, DX, BP, SI, DI
;--------------------------------------------------------------------
DisplayXUBcompatibilityInfoUsingAtaInfoFromDSBX:
    ; Display header
    mov     ax, g_szXUBversion
    mov     si, g_szXUB
    call    Print_FormatStringFromSIwithParameterInAX

    ; Display translation mode and L-CHS
    mov     si, bx              ; DS == ES
    mov     dx, TRANSLATEMODE_AUTO
    call    AtaGeometry_GetLCHStoAXBLBHfromAtaInfoInESSIwithTranslateModeInDX
    MIN_U   ax, MAX_LCHS_CYLINDERS
    jmp     Print_ModeFromDLandCHSfromAXLBH