[471] | 1 | ; Project name : XTIDE Universal BIOS
|
---|
| 2 | ; Description : Int 13h function AH=1Eh, Lo-tech XT-CF features.
|
---|
| 3 |
|
---|
| 4 | ;
|
---|
| 5 | ; XTIDE Universal BIOS and Associated Tools
|
---|
| 6 | ; Copyright (C) 2009-2010 by Tomi Tilli, 2011-2012 by XTIDE Universal BIOS Team.
|
---|
| 7 | ;
|
---|
| 8 | ; This program is free software; you can redistribute it and/or modify
|
---|
| 9 | ; it under the terms of the GNU General Public License as published by
|
---|
| 10 | ; the Free Software Foundation; either version 2 of the License, or
|
---|
| 11 | ; (at your option) any later version.
|
---|
| 12 | ;
|
---|
| 13 | ; This program is distributed in the hope that it will be useful,
|
---|
| 14 | ; but WITHOUT ANY WARRANTY; without even the implied warranty of
|
---|
| 15 | ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
---|
| 16 | ; GNU General Public License for more details.
|
---|
| 17 | ; Visit http://www.gnu.org/licenses/old-licenses/gpl-2.0.html
|
---|
| 18 | ;
|
---|
| 19 |
|
---|
| 20 | ; Section containing code
|
---|
| 21 | SECTION .text
|
---|
| 22 |
|
---|
| 23 | ;--------------------------------------------------------------------
|
---|
| 24 | ; Int 13h function AH=1Eh, Lo-tech XT-CF features.
|
---|
| 25 | ; This function is supported only by XTIDE Universal BIOS.
|
---|
| 26 | ;
|
---|
| 27 | ; AH1Eh_HandlerForXTCFfeatures
|
---|
| 28 | ; Parameters:
|
---|
| 29 | ; AL, CX: Same as in INTPACK
|
---|
| 30 | ; DL: Translated Drive number
|
---|
| 31 | ; DS:DI: Ptr to DPT (in RAMVARS segment)
|
---|
| 32 | ; SS:BP: Ptr to IDEPACK
|
---|
| 33 | ; Parameters on INTPACK:
|
---|
| 34 | ; AL: XT-CF subcommand (see XTCF.inc for more info)
|
---|
| 35 | ; Returns with INTPACK:
|
---|
| 36 | ; AH: Int 13h return status
|
---|
| 37 | ; CF: 0 if successful, 1 if error
|
---|
| 38 | ;--------------------------------------------------------------------
|
---|
| 39 | AH1Eh_HandlerForXTCFfeatures:
|
---|
| 40 | %ifndef USE_186
|
---|
[475] | 41 | call ProcessXTCFsubcommandFromAL
|
---|
[471] | 42 | jmp Int13h_ReturnFromHandlerAfterStoringErrorCodeFromAH
|
---|
| 43 | %else
|
---|
| 44 | push Int13h_ReturnFromHandlerAfterStoringErrorCodeFromAH
|
---|
[475] | 45 | ; Fall to ProcessXTCFsubcommandFromAL
|
---|
[471] | 46 | %endif
|
---|
| 47 |
|
---|
| 48 |
|
---|
| 49 | ;--------------------------------------------------------------------
|
---|
[475] | 50 | ; ProcessXTCFsubcommandFromAL
|
---|
[471] | 51 | ; Parameters:
|
---|
[473] | 52 | ; AL: XT-CF subcommand (see XTCF.inc for more info)
|
---|
[471] | 53 | ; DS:DI: Ptr to DPT (in RAMVARS segment)
|
---|
| 54 | ; SS:BP: Ptr to IDEPACK
|
---|
| 55 | ; Returns:
|
---|
| 56 | ; AH: Int 13h return status
|
---|
| 57 | ; CF: 0 if successful, 1 if error
|
---|
| 58 | ; Corrupts registers:
|
---|
[473] | 59 | ; AL, BX, CX, DX, SI
|
---|
[471] | 60 | ;--------------------------------------------------------------------
|
---|
[475] | 61 | ProcessXTCFsubcommandFromAL:
|
---|
[472] | 62 | ; IS_THIS_DRIVE_XTCF. We check this for all commands.
|
---|
[473] | 63 | call AccessDPT_IsThisDeviceXTCF
|
---|
| 64 | jne SHORT XTCFnotFound
|
---|
| 65 | and ax, BYTE 7Fh ; Subcommand now in AX
|
---|
| 66 | jz SHORT .ReturnWithSuccess ; IS_THIS_DRIVE_XTCF
|
---|
[472] | 67 |
|
---|
| 68 | ; READ_XTCF_CONTROL_REGISTER_TO_DH
|
---|
[473] | 69 | dec ax ; Subcommand
|
---|
[472] | 70 | jnz SHORT .SkipReadXtcfControlRegisterToDH
|
---|
[473] | 71 | mov dx, [di+DPT.wBasePort]
|
---|
| 72 | add dl, XTCF_CONTROL_REGISTER
|
---|
[472] | 73 | in al, dx
|
---|
| 74 | mov [bp+IDEPACK.intpack+INTPACK.dh], al
|
---|
[473] | 75 | .ReturnWithSuccess:
|
---|
| 76 | xor ah, ah
|
---|
| 77 | ret
|
---|
[472] | 78 | .SkipReadXtcfControlRegisterToDH:
|
---|
| 79 |
|
---|
| 80 | ; WRITE_DH_TO_XTCF_CONTROL_REGISTER
|
---|
[473] | 81 | dec ax ; Subcommand
|
---|
[472] | 82 | jnz SHORT XTCFnotFound ; Invalid subcommand
|
---|
| 83 | mov al, [bp+IDEPACK.intpack+INTPACK.dh]
|
---|
[473] | 84 | ; Fall to AH1Eh_ChangeXTCFmodeBasedOnControlRegisterInAL
|
---|
| 85 |
|
---|
| 86 |
|
---|
| 87 | ;--------------------------------------------------------------------
|
---|
| 88 | ; AH1Eh_ChangeXTCFmodeBasedOnControlRegisterInAL
|
---|
| 89 | ; Parameters:
|
---|
| 90 | ; AL: XT-CF Control Register
|
---|
| 91 | ; DS:DI: Ptr to DPT (in RAMVARS segment)
|
---|
| 92 | ; SS:BP: Ptr to IDEPACK
|
---|
| 93 | ; Returns:
|
---|
| 94 | ; AH: Int 13h return status
|
---|
| 95 | ; CF: 0 if successful, 1 if error
|
---|
| 96 | ; Corrupts registers:
|
---|
| 97 | ; AL, BX, CX, DX, SI
|
---|
| 98 | ;--------------------------------------------------------------------
|
---|
| 99 | AH1Eh_ChangeXTCFmodeBasedOnControlRegisterInAL:
|
---|
| 100 | ; Output Control Register
|
---|
| 101 | mov dx, [di+DPT.wBasePort]
|
---|
| 102 | add dl, XTCF_CONTROL_REGISTER
|
---|
[472] | 103 | out dx, al
|
---|
| 104 |
|
---|
[473] | 105 | ; Convert Control Register Contents to device code
|
---|
| 106 | test al, al
|
---|
| 107 | jz SHORT .Set8bitPioMode
|
---|
| 108 | cmp al, XTCF_MEMORY_MAPPED_MODE
|
---|
| 109 | jae SHORT .SetMemoryMappedMode
|
---|
[472] | 110 |
|
---|
[473] | 111 | ; Set DMA Mode
|
---|
| 112 | mov BYTE [di+DPT_ATA.bDevice], DEVICE_8BIT_XTCF_DMA
|
---|
[474] | 113 | mov al, [di+DPT_ATA.bBlockSize]
|
---|
[477] | 114 | call AH24h_SetBlockSize ; AH=24h limits block size if necessary
|
---|
| 115 | jmp SHORT .Enable8bitPioMode
|
---|
[473] | 116 |
|
---|
| 117 | .SetMemoryMappedMode:
|
---|
| 118 | mov BYTE [di+DPT_ATA.bDevice], DEVICE_8BIT_XTCF_MEMMAP
|
---|
[474] | 119 | jmp SHORT .Enable8bitPioMode
|
---|
[473] | 120 |
|
---|
| 121 | .Set8bitPioMode:
|
---|
| 122 | mov BYTE [di+DPT_ATA.bDevice], DEVICE_8BIT_XTCF_PIO8
|
---|
[477] | 123 | ; Fall to .Enable8bitPioMode
|
---|
| 124 |
|
---|
| 125 | ; We always need to enable 8-bit mode since 16-bit mode is restored
|
---|
| 126 | ; when controller is reset (AH=0h or Dh)
|
---|
[474] | 127 | .Enable8bitPioMode:
|
---|
[473] | 128 | jmp AH23h_Enable8bitPioMode
|
---|
| 129 |
|
---|
| 130 |
|
---|
[472] | 131 | ;--------------------------------------------------------------------
|
---|
| 132 | ; AH1Eh_DetectXTCFwithBasePortInDX
|
---|
| 133 | ; Parameters:
|
---|
| 134 | ; DX: Base I/O port address to check
|
---|
| 135 | ; Returns:
|
---|
| 136 | ; AH: RET_HD_SUCCESS if XT-CF is found from port
|
---|
| 137 | ; RET_HD_INVALID if XT-CF is not found
|
---|
| 138 | ; CF: Cleared if XT-CF found
|
---|
| 139 | ; Set if XT-CF not found
|
---|
| 140 | ; Corrupts registers:
|
---|
[473] | 141 | ; AL
|
---|
[472] | 142 | ;--------------------------------------------------------------------
|
---|
| 143 | AH1Eh_DetectXTCFwithBasePortInDX:
|
---|
[473] | 144 | push dx
|
---|
[472] | 145 | add dl, XTCT_CONTROL_REGISTER_INVERTED_in ; set DX to XT-CF config register (inverted)
|
---|
| 146 | in al, dx ; get value
|
---|
| 147 | mov ah, al ; save in ah
|
---|
| 148 | inc dx ; set DX to XT-CF config register (non-inverted)
|
---|
| 149 | in al, dx ; get value
|
---|
[473] | 150 | not al ; invert value
|
---|
| 151 | pop dx
|
---|
[472] | 152 | sub ah, al ; do they match? (clear AH if they do)
|
---|
| 153 | jz SHORT XTCFfound
|
---|
| 154 |
|
---|
| 155 | XTCFnotFound:
|
---|
[473] | 156 | AH1Eh_LoadInvalidCommandToAHandSetCF:
|
---|
[472] | 157 | stc ; set carry flag since XT-CF not found
|
---|
| 158 | mov ah, RET_HD_INVALID
|
---|
| 159 | XTCFfound:
|
---|
| 160 | ret ; and return
|
---|