source: xtideuniversalbios/trunk/XTIDE_Universal_BIOS/Src/Boot/BootMenuEvent.asm @ 183

; Project name  :   XTIDE Universal BIOS
; Description   :   Boot Menu event handler for menu library callbacks.

; Section containing code
SECTION .text

struc ITEM_TYPE_REFRESH
    .HardDisk           resb    2
    .FloppyDrive        resb    2
endstruc


;--------------------------------------------------------------------
; BootMenuEvent_Handler
;   Common parameters for all events:
;       BX:         Menu event (anything from MENUEVENT struct)
;       SS:BP:      Menu library handle
;   Common return values for all events:
;       CF:         Set if event processed
;                   Cleared if event not processed
;   Corrupts registers:
;       All
;--------------------------------------------------------------------
ALIGN JUMP_ALIGN
BootMenuEvent_Handler:
        
%ifdef MENUEVENT_INLINE_OFFSETS
        
    add     bx, BootMenuEvent_Handler
    jmp     bx
        
%else
        
    cmp     bx, BYTE MENUEVENT.RefreshItemFromCX    ; Above last supported item?
    ja      SHORT .EventNotHandled
    jmp     [cs:bx+.rgfnEventSpecificHandlers]
        
%endif
        
.EventNotHandled:
    clc
    ret

%ifdef MENUEVENT_INLINE_OFFSETS
        
MENUEVENT_InitializeMenuinitFromDSSI equ  (BootMenuEvent_Handler.InitializeMenuinitFromDSSI - BootMenuEvent_Handler)
MENUEVENT_ExitMenu equ  (BootMenuEvent_Handler.EventCompleted - BootMenuEvent_Handler)
MENUEVENT_IdleProcessing equ (BootMenuEvent_Handler.EventNotHandled - BootMenuEvent_Handler)
MENUEVENT_ItemHighlightedFromCX equ (BootMenuEvent_Handler.ItemHighlightedFromCX - BootMenuEvent_Handler)
MENUEVENT_ItemSelectedFromCX equ (BootMenuEvent_Handler.ItemSelectedFromCX - BootMenuEvent_Handler)
MENUEVENT_KeyStrokeInAX equ (BootMenuEvent_Handler.KeyStrokeInAX - BootMenuEvent_Handler)
MENUEVENT_RefreshTitle equ (BootMenuPrint_TitleStrings - BootMenuEvent_Handler)
MENUEVENT_RefreshInformation equ (BootMenuEvent_Handler.RefreshInformation - BootMenuEvent_Handler)
MENUEVENT_RefreshItemFromCX equ (BootMenuEvent_Handler.RefreshItemFromCX - BootMenuEvent_Handler)

%else
        
ALIGN WORD_ALIGN
.rgfnEventSpecificHandlers:
    dw      .InitializeMenuinitFromDSSI ; MENUEVENT.InitializeMenuinitFromDSSI
    dw      .EventCompleted             ; MENUEVENT.ExitMenu
    dw      .EventNotHandled            ; MENUEVENT.IdleProcessing
    dw      .ItemHighlightedFromCX      ; MENUEVENT.ItemHighlightedFromCX
    dw      .ItemSelectedFromCX         ; MENUEVENT.ItemSelectedFromCX
    dw      .KeyStrokeInAX              ; MENUEVENT.KeyStrokeInAX
    dw      BootMenuPrint_TitleStrings  ; MENUEVENT.RefreshTitle
    dw      .RefreshInformation         ; MENUEVENT.RefreshInformation
    dw      .RefreshItemFromCX          ; MENUEVENT.RefreshItemFromCX
        
%endif


; Parameters:
;   DS:SI:      Ptr to MENUINIT struct to initialize
; Returns:
;   DS:SI:      Ptr to initialized MENUINIT struct
ALIGN JUMP_ALIGN
.InitializeMenuinitFromDSSI:
    push    ds
    call    RamVars_GetSegmentToDS
    call    .GetDefaultMenuitemToDX
    call    BootMenu_GetMenuitemCountToAX
    pop     ds
    mov     [si+MENUINIT.wItems], ax
    mov     [si+MENUINIT.wHighlightedItem], dx
    mov     WORD [si+MENUINIT.wTitleAndInfoLines], BOOT_MENU_TITLE_AND_INFO_LINES
    mov     BYTE [si+MENUINIT.bWidth], BOOT_MENU_WIDTH
    call    BootMenu_GetHeightToAHwithItemCountInAL
    mov     [si+MENUINIT.bHeight], ah
    mov     ax, [cs:ROMVARS.wBootTimeout]
    CALL_MENU_LIBRARY StartSelectionTimeoutWithTicksInAX
    stc
    ret

ALIGN JUMP_ALIGN
.GetDefaultMenuitemToDX:
    mov     dl, [cs:ROMVARS.bBootDrv]   ; Default boot drive
    call    BootMenu_IsDriveInSystem
    jnc     SHORT .DoNotSetDefaultMenuitem
    call    DriveXlate_SetDriveToSwap
    jmp     BootMenu_GetMenuitemToDXforDriveInDL
ALIGN JUMP_ALIGN
.DoNotSetDefaultMenuitem:
    xor     dx, dx                      ; Whatever appears first on boot menu
    ret


; Parameters:
;   CX:         Index of new highlighted item
;   DX:         Index of previously highlighted item or NO_ITEM_HIGHLIGHTED
ALIGN JUMP_ALIGN
.ItemHighlightedFromCX:
    push    cx
    call    RamVars_GetSegmentToDS
    call    DriveXlate_Reset
    call    BootMenu_GetDriveToDXforMenuitemInCX
    call    DriveXlate_SetDriveToSwap

    xor     ax, ax  ; Update first floppy drive (for translated drive number)
    CALL_MENU_LIBRARY RefreshItemFromAX
    mov     dl, 80h
    call    BootMenu_GetMenuitemToDXforDriveInDL
    xchg    ax, dx  ; Update first hard disk (for translated drive number)
    CALL_MENU_LIBRARY RefreshItemFromAX
    pop     ax      ; Update new item (for translated drive number)
    CALL_MENU_LIBRARY RefreshItemFromAX
    CALL_MENU_LIBRARY RefreshInformation
    stc
    ret


; Parameters:
;   AL:         ASCII character for the key
;   AH:         Keyboard library scan code for the key
ALIGN JUMP_ALIGN
.KeyStrokeInAX:
    cmp     ah, ROM_BOOT_HOTKEY_SCANCODE
    jne     SHORT .CheckDriveHotkeys
    jmp     Int19hMenu_RomBoot
ALIGN JUMP_ALIGN
.CheckDriveHotkeys:
    call    BootMenu_GetMenuitemToAXforAsciiHotkeyInAL
    cmp     ax, [bp+MENUINIT.wItems]
    jae     SHORT .EventCompleted   ; Invalid key
    CALL_MENU_LIBRARY HighlightItemFromAX
    ; Fall to .ItemSelectedFromCX


; Parameters:
;   CX:         Index of selected item
ALIGN JUMP_ALIGN
.ItemSelectedFromCX:
    CALL_MENU_LIBRARY Close
.EventCompleted:
    stc
    ret


; Parameters:
;   CX:         Index of item to refresh
;   Cursor has been positioned to the beginning of item line
ALIGN JUMP_ALIGN
.RefreshItemFromCX:
    mov     bx, .rgwItemTypeRefresh
    jmp     SHORT .RefreshItemOrInformationWithJumpTableInCSBX


; Parameters:
;   CX:         Index of highlighted item
;   Cursor has been positioned to the beginning of first line
ALIGN JUMP_ALIGN
.RefreshInformation:
    mov     bx, .rgwInformationItemTypeRefresh
    ; Fall to .RefreshItemOrInformationWithJumpTableInCSBX

;--------------------------------------------------------------------
; RefreshItemOrInformationWithJumpTableInCSBX
;   Parameters:
;       CX:     Index of selected menuitem
;       CS:BX:  Ptr to ITEM_TYPE_REFRESH jump table
;   Returns:
;       CF:     set since event processed
;--------------------------------------------------------------------
.RefreshItemOrInformationWithJumpTableInCSBX:
    cmp     cl, NO_ITEM_HIGHLIGHTED
    je      SHORT .EventCompleted

    call    RamVars_GetSegmentToDS
    call    BootMenu_GetDriveToDXforMenuitemInCX
    test    dl, dl                  ; Floppy drive?
    jns     SHORT .DrawFloppyDrive
    jmp     [cs:bx+ITEM_TYPE_REFRESH.HardDisk]
ALIGN JUMP_ALIGN
.DrawFloppyDrive:
    jmp     [cs:bx+ITEM_TYPE_REFRESH.FloppyDrive]

; Jump tables for .RefreshItemOrInformationWithJumpTableInCSBX
ALIGN WORD_ALIGN
.rgwItemTypeRefresh:
istruc ITEM_TYPE_REFRESH
    at  ITEM_TYPE_REFRESH.HardDisk,         dw  BootMenuPrint_HardDiskMenuitem
    at  ITEM_TYPE_REFRESH.FloppyDrive,      dw  BootMenuPrint_FloppyMenuitem
iend
.rgwInformationItemTypeRefresh:
istruc ITEM_TYPE_REFRESH
    at  ITEM_TYPE_REFRESH.HardDisk,         dw  BootMenuPrint_HardDiskMenuitemInformation
    at  ITEM_TYPE_REFRESH.FloppyDrive,      dw  BootMenuPrint_FloppyMenuitemInformation
iend