[88] | 1 | ; Project name : XTIDE Universal BIOS |
---|
[3] | 2 | ; Description : Int 13h function AH=25h, Get Drive Information. |
---|
| 3 | |
---|
| 4 | ; Section containing code |
---|
| 5 | SECTION .text |
---|
| 6 | |
---|
| 7 | ;-------------------------------------------------------------------- |
---|
| 8 | ; Int 13h function AH=25h, Get Drive Information. |
---|
| 9 | ; |
---|
| 10 | ; AH25h_HandlerForGetDriveInformation |
---|
| 11 | ; Parameters: |
---|
| 12 | ; AH: Bios function 25h |
---|
| 13 | ; DL: Drive number |
---|
| 14 | ; ES:BX: Ptr to buffer to receive 512-byte drive information |
---|
| 15 | ; Parameters loaded by Int13h_Jump: |
---|
| 16 | ; DS: RAMVARS segment |
---|
| 17 | ; Returns: |
---|
| 18 | ; ES:BX: Ptr to 512-byte buffer to receive drive Information |
---|
| 19 | ; AH: Int 13h return status |
---|
| 20 | ; CF: 0 if succesfull, 1 if error |
---|
| 21 | ; IF: 1 |
---|
| 22 | ; Corrupts registers: |
---|
| 23 | ; Flags |
---|
| 24 | ;-------------------------------------------------------------------- |
---|
| 25 | ALIGN JUMP_ALIGN |
---|
| 26 | AH25h_HandlerForGetDriveInformation: |
---|
| 27 | push dx |
---|
| 28 | push cx |
---|
| 29 | push bx |
---|
| 30 | push ax |
---|
| 31 | push es |
---|
| 32 | |
---|
| 33 | ; Wait until previously selected drive is ready |
---|
| 34 | call FindDPT_ForDriveNumber ; DS:DI now points to DPT |
---|
| 35 | call HDrvSel_SelectDriveAndDisableIRQ |
---|
| 36 | jc SHORT .Return ; Return if error |
---|
| 37 | |
---|
| 38 | ; Get drive information |
---|
| 39 | call HPIO_NormalizeDataPointer |
---|
| 40 | push bx |
---|
| 41 | mov dx, [RAMVARS.wIdeBase] ; Load base port address |
---|
| 42 | eMOVZX bx, BYTE [di+DPT.bIdeOff] ; Load offset to IDEVARS |
---|
| 43 | mov bl, [cs:bx+IDEVARS.bBusType]; Load bus type to BL |
---|
| 44 | mov bh, [di+DPT.bDrvSel] ; Load drive sel byte to BH |
---|
| 45 | pop di ; Pop buffer offset to DI |
---|
| 46 | call AH25h_GetDriveInfo ; Get drive information |
---|
| 47 | .Return: |
---|
| 48 | pop es |
---|
| 49 | jmp Int13h_PopXRegsAndReturn |
---|
| 50 | |
---|
| 51 | |
---|
| 52 | ;-------------------------------------------------------------------- |
---|
| 53 | ; Gets drive information using Identify Device command. |
---|
| 54 | ; |
---|
| 55 | ; AH25h_GetDriveInfo |
---|
| 56 | ; Parameters: |
---|
| 57 | ; BH: Drive Select byte for Drive and Head Select Register |
---|
| 58 | ; BL: Bus type |
---|
| 59 | ; DX: IDE Controller base port address |
---|
| 60 | ; DS: Segment to RAMVARS |
---|
| 61 | ; ES:DI: Ptr to buffer to receive 512 byte drive information |
---|
| 62 | ; Returns: |
---|
| 63 | ; AH: Int 13h return status (will be stored to BDA) |
---|
| 64 | ; CF: 0 if succesfull, 1 if error |
---|
| 65 | ; Corrupts registers: |
---|
| 66 | ; AL, CX |
---|
| 67 | ;-------------------------------------------------------------------- |
---|
| 68 | ALIGN JUMP_ALIGN |
---|
| 69 | AH25h_GetDriveInfo: |
---|
| 70 | push di |
---|
| 71 | push dx |
---|
| 72 | push bx |
---|
| 73 | |
---|
| 74 | ; Select Master or Slave drive. |
---|
| 75 | ; DO NOT WAIT UNTIL CURRENTLY SELECTED IS READY! |
---|
| 76 | ; It makes slave drive detection impossible if master is not present. |
---|
| 77 | mov [RAMVARS.wIdeBase], dx ; Store IDE Base port to RAMVARS |
---|
| 78 | add dx, BYTE REG_IDE_DRVHD ; DX to Drive and Head Sel Register |
---|
| 79 | mov al, bh ; Drive Select byte to AL |
---|
| 80 | out dx, al ; Select Master or Slave drive |
---|
| 81 | sub dx, BYTE REG_IDE_DRVHD ; Back to IDE Base port |
---|
[120] | 82 | |
---|
| 83 | ; Wait until ready to accept commands |
---|
| 84 | xor bh, bh ; BX now contains bus type |
---|
| 85 | mov cl, B_TIMEOUT_DRVINFO ; Load short timeout |
---|
| 86 | cmp [RAMVARS.bDrvCnt], bh ; Detecting first drive? |
---|
| 87 | eCMOVE cl, B_TIMEOUT_RESET ; If so, load long timeout |
---|
[3] | 88 | call HStatus_WaitRdy ; Wait until ready to accept commands |
---|
| 89 | jc SHORT .Return ; Return if error |
---|
| 90 | |
---|
| 91 | ; Output command |
---|
| 92 | mov al, HCMD_ID_DEV ; Load Identify Device command to AL |
---|
| 93 | out dx, al ; Output command |
---|
| 94 | call HStatus_WaitDrqDefTime ; Wait until ready to transfer (no IRQ!) |
---|
| 95 | jc SHORT .Return ; Return if error |
---|
| 96 | |
---|
| 97 | ; Transfer data |
---|
| 98 | sub dx, BYTE REGR_IDE_ST ; DX to IDE Data Reg |
---|
| 99 | mov cx, 256 ; Transfer 256 words (single sector) |
---|
| 100 | cld ; INSW to increment DI |
---|
| 101 | call [cs:bx+g_rgfnPioRead] ; Read ID sector |
---|
| 102 | call HStatus_WaitRdyDefTime ; Wait until drive ready |
---|
| 103 | |
---|
| 104 | .Return: |
---|
| 105 | pop bx |
---|
| 106 | pop dx |
---|
| 107 | pop di |
---|
| 108 | ret |
---|