VESA library: add support for reading lss16 images
[profile/ivi/syslinux.git] / ui.inc
diff --git a/ui.inc b/ui.inc
index 33d7e59..0677733 100644 (file)
--- a/ui.inc
+++ b/ui.inc
@@ -1,6 +1,6 @@
 ;; -----------------------------------------------------------------------
 ;;
-;;   Copyright 1994-2005 H. Peter Anvin - All Rights Reserved
+;;   Copyright 1994-2008 H. Peter Anvin - All Rights Reserved
 ;;
 ;;   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
@@ -17,6 +17,33 @@ load_config_file:
                call parse_config               ; Parse configuration file
 no_config_file:
 
+               call adv_init
+;
+; Check for an ADV boot-once entry
+;
+               mov dl,ADV_BOOTONCE
+               call adv_get
+               jcxz .no_bootonce
+
+.have_bootone:
+               ; We apparently have a boot-once set; clear it and
+               ; then execute the boot-once...
+
+               ; Save the boot-once data; SI = data, CX = length
+               mov di,command_line
+               rep movsb
+               xor ax,ax
+               stosb
+
+               ; Clear the boot-once data from the ADV
+               xor cx,cx                       ; Set to zero = delete
+               call adv_set
+               jc .err
+               call adv_write
+.err:          jmp load_kernel
+
+.no_bootonce:
+
 ;
 ; Check whether or not we are supposed to display the boot prompt.
 ;
@@ -72,23 +99,21 @@ got_ascii:  cmp al,7Fh                      ; <DEL> == <BS>
                cmp di,command_line             ; Space must not be first
                je short get_char
 enter_char:    test byte [FuncFlag],1
-               jz .not_ctrl_f
-               mov byte [FuncFlag],0
-               cmp al,'0'
-               jb .not_ctrl_f
-               je ctrl_f_0
-               cmp al,'9'
-               jbe ctrl_f
-.not_ctrl_f:   cmp di,max_cmd_len+command_line ; Check there's space
+               jnz ctrl_f                      ; Keystroke after <Ctrl-F>
+               cmp di,max_cmd_len+command_line ; Check there's space
                jnb short get_char
                stosb                           ; Save it
                call writechr                   ; Echo to screen
                jmp short get_char
-not_ascii:     mov byte [FuncFlag],0
+not_ascii:
                cmp al,0Dh                      ; Enter
                je command_done
                cmp al,'F' & 1Fh                ; <Ctrl-F>
                je set_func_flag
+%if IS_PXELINUX
+               cmp al,'N' & 1Fh                ; <Ctrl-N>
+               je show_network_info
+%endif
                cmp al,'U' & 1Fh                ; <Ctrl-U>
                je kill_command                 ; Kill input line
                cmp al,'V' & 1Fh                ; <Ctrl-V>
@@ -102,7 +127,8 @@ backspace:  cmp di,command_line             ; Make sure there is anything
                dec di                          ; Unstore one character
                mov si,wipe_char                ; and erase it from the screen
                call cwritestr
-               jmp short get_char_2
+get_char_2:
+               jmp short get_char
 
 kill_command:
                call crlf
@@ -114,33 +140,55 @@ force_text_mode:
 
 set_func_flag:
                mov byte [FuncFlag],1
-get_char_2:
-               jmp short get_char
+               jmp short get_char_2
 
-ctrl_f_0:      add al,10                       ; <Ctrl-F>0 == F10
-ctrl_f:                sub al,'1'
+ctrl_f:
                xor ah,ah
-               jmp short show_help
+               mov [FuncFlag],ah
+               cmp al,'0'
+               jb get_char_2
+               je .zero                        ; <Ctrl-F>0 = F10
+               or al,20h                       ; Lower case
+               cmp al,'9'
+               jna .digit
+               cmp al,'a'                      ; F10-F12 = <Ctrl-F>A, B, C
+               jb get_char_2
+               cmp al,'c'
+               ja get_char_2
+               sub al,'a'-10
+               jmp show_help
+.zero:
+               mov al,10
+               jmp show_help
+.digit:
+               sub al,'1'
+               jmp show_help
 
 func_key:
                ; AL = 0 if we get here
                xchg al,ah
-               cmp al,68                       ; F10
-               ja short get_char_2
-               sub al,59                       ; F1
-               jb short get_char_2
-show_help:     ; AX = func key # (0 = F1, 9 = F10)
+               cmp al,44h                      ; F10
+               ja .f11_f12
+               sub al,3Bh                      ; F1
+               jb get_char_2
+               jmp show_help
+.f11_f12:
+               cmp al,85h                      ; F11
+               jb get_char_2
+               cmp al,86h                      ; F12
+               ja get_char_2
+               sub al,85h-10
+
+show_help:     ; AX = func key # (0 = F1, 9 = F10, 11 = F12)
                push di                         ; Save end-of-cmdline pointer
                shl ax,FILENAME_MAX_LG2         ; Convert to pointer
                add ax,FKeyName
                xchg di,ax
                cmp byte [di+NULLOFFSET],NULLFILE
                je short fk_nofile              ; Undefined F-key
-               call searchdir
+               call open
                jz short fk_nofile              ; File not found
-               push si
                call crlf
-               pop si
                call get_msg_file
                jmp short fk_wrcmd
 
@@ -170,7 +218,27 @@ fk_wrcmd:
                mov si,command_line
                call cwritestr                  ; Write command line so far
 fk_nofile:     pop di
-               jmp short get_char_2
+               jmp get_char
+
+;
+; Show network info (in the form of the ipappend strings)
+;
+%if IS_PXELINUX
+show_network_info:
+               push di                         ; Command line write pointer
+               call crlf
+               mov si,IPAppends                ; See comboot.doc
+               mov cx,numIPAppends
+.loop:
+               lodsw
+               push si
+               mov si,ax
+               call cwritestr
+               call crlf
+               pop si
+               loop .loop
+               jmp fk_wrcmd
+%endif
 
 ;
 ; Jump here to run the default command line
@@ -199,9 +267,7 @@ load_kernel:                                        ; Load the kernel now
                mov si,command_line
                 mov di,KernelName
                 push si
-                push di
                call mangle_name
-               pop di
                 pop si
 ;
 ; Fast-forward to first option (we start over from the beginning, since
@@ -231,19 +297,14 @@ clin_opt_ok:
 ; Now check if it is a "virtual kernel"
 ;
 vk_check:
-               xor si,si                       ; Beginning of vk_seg
+               mov esi,[HighMemSize]           ; Start from top of memory
 .scan:
-               cmp si,[VKernelBytes]
-               jae .not_vk
-
-               push ds
-               push word vk_seg
-               pop ds
+               cmp esi,[VKernelEnd]
+               jbe .not_vk
 
                mov di,VKernelBuf
                call rllunpack
-               pop ds
-               ; SI updated on return
+               ; ESI updated on return
 
                sub di,cx                       ; Return to beginning of buf
                push si
@@ -324,10 +385,6 @@ vk_check:
 ; Find the kernel on disk
 ;
 get_kernel:     mov byte [KernelName+FILENAME_MAX],0   ; Zero-terminate filename/extension
-%if IS_SYSLINUX || IS_MDSLINUX                 ; SYSLINUX has to deal with DOS mangled names...
-               mov eax,[KernelName+8]          ; Save initial extension
-               mov [exten_table_end],eax       ; Last case == initial ext.
-%else
                mov di,KernelName+4*IS_PXELINUX
                xor al,al
                mov cx,FILENAME_MAX-5           ; Need 4 chars + null
@@ -335,21 +392,16 @@ get_kernel:     mov byte [KernelName+FILENAME_MAX],0      ; Zero-terminate filename/e
                jne .no_skip
                dec di                          ; Point to final null
 .no_skip:      mov [KernelExtPtr],di
-%endif
                mov bx,exten_table
 .search_loop:  push bx
-                mov di,KernelName              ; Search on disk
+                mov di,KernelName              ; Search on disk
                 call searchdir
                pop bx
                 jnz kernel_good
                mov eax,[bx]                    ; Try a different extension
-%if IS_SYSLINUX || IS_MDSLINUX
-               mov [KernelName+8],eax
-%else
                mov si,[KernelExtPtr]
                mov [si],eax
                mov byte [si+4],0
-%endif
                add bx,byte 4
                cmp bx,exten_table_end
                jna .search_loop                ; allow == case (final case)
@@ -376,7 +428,7 @@ bad_kernel:
                 jmp abort_load                  ; Ask user for clue
 
 ;
-; on_error: bad kernel, but we have onerror set
+; on_error: bad kernel, but we have onerror set; CX = OnerrorLen
 ;
 on_error:
                mov si,Onerror
@@ -459,7 +511,7 @@ getchar_timeout:
 ; that decision on the file extension.  The following extensions are
 ; recognized; case insensitive:
 ;
-; .com         - COMBOOT image
+; .com - COMBOOT image
 ; .cbt - COMBOOT image
 ; .c32  - COM32 image
 ; .bs  - Boot sector
@@ -482,21 +534,22 @@ kernel_good_saved:
                ; COMBOOT function INT 22h, AX=0016h.
                mov si,[Kernel_SI]
                mov eax,[Kernel_EAX]
-               mov dx,[Kernel_EAX+2]
 
 kernel_good:
-               pusha
+               pushad
+
                mov si,KernelName
                mov di,KernelCName
                call unmangle_name
                sub di,KernelCName
                mov [KernelCNameLen],di
-               popa
 
-%if IS_SYSLINUX || IS_MDSLINUX
-               mov ecx,[KernelName+7]
-               mov cl,'.'
-%else
+               ; Default memory limit, can be overridden by image loaders
+               mov eax,[HighMemRsvd]
+               mov [MyHighMemSize],eax
+
+               popad
+
                push di
                push ax
                mov di,KernelName+4*IS_PXELINUX
@@ -508,10 +561,9 @@ kernel_good:
 .one_step:     mov ecx,[di-4]                  ; 4 bytes before end
                pop ax
                pop di
-%endif
 
 ;
-; At this point, DX:AX contains the size of the kernel, SI contains
+; At this point, EAX contains the size of the kernel, SI contains
 ; the file handle/cluster pointer, and ECX contains the extension (if any.)
 ;
                movzx di,byte [KernelType]
@@ -535,23 +587,22 @@ is_unknown_filetype:
                je is_bss_sector
                cmp ecx,'.bin'
                je is_bootsector
-%if IS_SYSLINUX || IS_MDSLINUX
-               cmp ecx,'.bs '
-               je is_bootsector
-               cmp ecx,'.0  '
-               je is_bootsector
-%else
                shr ecx,8
                cmp ecx,'.bs'
                je is_bootsector
                shr ecx,8
                cmp cx,'.0'
                je is_bootsector
-%endif
+
                ; Otherwise Linux kernel
                jmp is_linux_kernel
 
 is_config_file:
+               pusha
+               mov si,KernelCName              ; Save the config file name, for posterity
+               mov di,ConfigName
+               call strcpy
+               popa
                call openfd
                call reset_config
                jmp load_config_file
@@ -574,7 +625,12 @@ is_disk_image      equ is_bad_image
 %endif
 
                section .data
+boot_prompt    db 'boot: ', 0
+wipe_char      db BS, ' ', BS, 0
 err_badimage   db 'Invalid image type for this media type!', CR, LF, 0
+err_notfound   db 'Could not find kernel image: ',0
+err_notkernel  db CR, LF, 'Invalid or corrupt kernel image.', CR, LF, 0
+
 
                align 2, db 0
 kerneltype_table:
@@ -582,6 +638,7 @@ kerneltype_table:
                dw is_linux_kernel      ; VK_LINUX
                dw is_bootsector        ; VK_BOOT
                dw is_bss_sector        ; VK_BSS
+               dw is_bootsector        ; VK_PXE
                dw is_disk_image        ; VK_FDIMAGE
                dw is_comboot_image     ; VK_COMBOOT
                dw is_com32_image       ; VK_COM32
@@ -598,3 +655,29 @@ FuncFlag   resb 1                  ; Escape sequences received from keyboard
 KernelType     resb 1                  ; Kernel type, from vkernel, if known
 
                section .text
+;
+; Linux kernel loading code is common.
+;
+%include "runkernel.inc"
+
+;
+; COMBOOT-loading code
+;
+%include "comboot.inc"
+%include "com32.inc"
+%include "cmdline.inc"
+
+;
+; Boot sector loading code
+;
+%include "bootsect.inc"
+
+;
+; Abort loading code
+;
+%include "abort.inc"
+
+;
+; Hardware cleanup common code
+;
+%include "cleanup.inc"