mirror of
https://github.com/KolibriOS/kolibrios.git
synced 2024-11-28 11:43:09 +03:00
MENU - Support for boot parameters.
git-svn-id: svn://kolibrios.org@2618 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
parent
f5c6b33aac
commit
caaeede667
137
programs/system/menu/trunk/debug.inc
Normal file
137
programs/system/menu/trunk/debug.inc
Normal file
@ -0,0 +1,137 @@
|
|||||||
|
macro debug_print str
|
||||||
|
{
|
||||||
|
local ..string, ..label
|
||||||
|
|
||||||
|
jmp ..label
|
||||||
|
..string db str,0
|
||||||
|
..label:
|
||||||
|
|
||||||
|
pushf
|
||||||
|
pushad
|
||||||
|
mov edx,..string
|
||||||
|
call debug_outstr
|
||||||
|
popad
|
||||||
|
popf
|
||||||
|
}
|
||||||
|
|
||||||
|
dps fix debug_print
|
||||||
|
|
||||||
|
macro debug_print_dec arg
|
||||||
|
{
|
||||||
|
pushf
|
||||||
|
pushad
|
||||||
|
if ~arg eq eax
|
||||||
|
mov eax,arg
|
||||||
|
end if
|
||||||
|
call debug_outdec
|
||||||
|
popad
|
||||||
|
popf
|
||||||
|
}
|
||||||
|
|
||||||
|
dpd fix debug_print_dec
|
||||||
|
|
||||||
|
;---------------------------------
|
||||||
|
debug_outdec: ;(eax - num, edi-str)
|
||||||
|
push 10 ;2
|
||||||
|
pop ecx ;1
|
||||||
|
push -'0' ;2
|
||||||
|
.l0:
|
||||||
|
xor edx,edx ;2
|
||||||
|
div ecx ;2
|
||||||
|
push edx ;1
|
||||||
|
test eax,eax ;2
|
||||||
|
jnz .l0 ;2
|
||||||
|
.l1:
|
||||||
|
pop eax ;1
|
||||||
|
add al,'0' ;2
|
||||||
|
call debug_outchar ; stosb
|
||||||
|
jnz .l1 ;2
|
||||||
|
ret ;1
|
||||||
|
;---------------------------------
|
||||||
|
|
||||||
|
debug_outchar: ; al - char
|
||||||
|
pushf
|
||||||
|
pushad
|
||||||
|
mov cl,al
|
||||||
|
mov eax,63
|
||||||
|
mov ebx,1
|
||||||
|
int 0x40
|
||||||
|
popad
|
||||||
|
popf
|
||||||
|
ret
|
||||||
|
|
||||||
|
debug_outstr:
|
||||||
|
mov eax,63
|
||||||
|
mov ebx,1
|
||||||
|
@@:
|
||||||
|
mov cl,[edx]
|
||||||
|
test cl,cl
|
||||||
|
jz @f
|
||||||
|
int 40h
|
||||||
|
inc edx
|
||||||
|
jmp @b
|
||||||
|
@@:
|
||||||
|
ret
|
||||||
|
|
||||||
|
_debug_crlf db 13, 10, 0
|
||||||
|
|
||||||
|
macro newline
|
||||||
|
{
|
||||||
|
pushf
|
||||||
|
pushad
|
||||||
|
mov edx, _debug_crlf
|
||||||
|
call debug_outstr
|
||||||
|
popad
|
||||||
|
popf
|
||||||
|
}
|
||||||
|
|
||||||
|
macro print message
|
||||||
|
{
|
||||||
|
dps message
|
||||||
|
newline
|
||||||
|
}
|
||||||
|
|
||||||
|
macro pregs
|
||||||
|
{
|
||||||
|
dps "EAX: "
|
||||||
|
dpd eax
|
||||||
|
dps " EBX: "
|
||||||
|
dpd ebx
|
||||||
|
newline
|
||||||
|
dps "ECX: "
|
||||||
|
dpd ecx
|
||||||
|
dps " EDX: "
|
||||||
|
dpd edx
|
||||||
|
newline
|
||||||
|
}
|
||||||
|
|
||||||
|
macro debug_print_hex arg
|
||||||
|
{
|
||||||
|
pushf
|
||||||
|
pushad
|
||||||
|
if ~arg eq eax
|
||||||
|
mov eax, arg
|
||||||
|
end if
|
||||||
|
call debug_outhex
|
||||||
|
popad
|
||||||
|
popf
|
||||||
|
}
|
||||||
|
dph fix debug_print_hex
|
||||||
|
|
||||||
|
debug_outhex:
|
||||||
|
; eax - number
|
||||||
|
mov edx, 8
|
||||||
|
.new_char:
|
||||||
|
rol eax, 4
|
||||||
|
movzx ecx, al
|
||||||
|
and cl, 0x0f
|
||||||
|
mov cl, [__hexdigits + ecx]
|
||||||
|
pushad
|
||||||
|
mcall 63, 1
|
||||||
|
popad
|
||||||
|
dec edx
|
||||||
|
jnz .new_char
|
||||||
|
ret
|
||||||
|
|
||||||
|
__hexdigits:
|
||||||
|
db '0123456789ABCDEF'
|
@ -1,6 +1,10 @@
|
|||||||
;******************************************************************************
|
;******************************************************************************
|
||||||
; MAIN MENU
|
; MAIN MENU
|
||||||
;******************************************************************************
|
;******************************************************************************
|
||||||
|
; last update: 17/04/2012
|
||||||
|
; changed by: Marat Zakiyanov aka Mario79, aka Mario
|
||||||
|
; changes: Support for boot parameters.
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
; last update: 22/03/2012
|
; last update: 22/03/2012
|
||||||
; changed by: Marat Zakiyanov aka Mario79, aka Mario
|
; changed by: Marat Zakiyanov aka Mario79, aka Mario
|
||||||
; changes: Global optimization! The program uses
|
; changes: Global optimization! The program uses
|
||||||
@ -16,15 +20,12 @@
|
|||||||
;
|
;
|
||||||
; Compile with FASM for Menuet
|
; Compile with FASM for Menuet
|
||||||
;******************************************************************************
|
;******************************************************************************
|
||||||
include "lang.inc"
|
|
||||||
include "..\..\..\macros.inc"
|
|
||||||
|
|
||||||
BTN_HEIGHT = 22
|
BTN_HEIGHT = 22
|
||||||
TXT_Y = (BTN_HEIGHT)/2-5
|
TXT_Y = (BTN_HEIGHT)/2-5
|
||||||
|
|
||||||
PANEL_HEIGHT = 20
|
PANEL_HEIGHT = 20
|
||||||
MENU_BOTTON_X_POS = 10
|
MENU_BOTTON_X_POS = 10
|
||||||
MENU_BOTTON_X_SIZE = 60
|
MENU_BOTTON_X_SIZE = 50
|
||||||
;------------------------------------------------------------------------------
|
;------------------------------------------------------------------------------
|
||||||
use32
|
use32
|
||||||
org 0x0
|
org 0x0
|
||||||
@ -35,14 +36,105 @@
|
|||||||
dd IM_END ; size of image
|
dd IM_END ; size of image
|
||||||
dd mem_end ; memory for app
|
dd mem_end ; memory for app
|
||||||
dd stack_area ; esp
|
dd stack_area ; esp
|
||||||
dd 0x0 ; boot parameters
|
dd bootparam ; boot parameters
|
||||||
dd 0x0 ; path
|
dd 0x0 ; path
|
||||||
;------------------------------------------------------------------------------
|
;------------------------------------------------------------------------------
|
||||||
|
include "lang.inc"
|
||||||
|
include "..\..\..\macros.inc"
|
||||||
;include "DEBUG.INC" ; debug macros
|
;include "DEBUG.INC" ; debug macros
|
||||||
;------------------------------------------------------------------------------
|
;------------------------------------------------------------------------------
|
||||||
align 4
|
align 4
|
||||||
|
conversion_ASCII_to_HEX:
|
||||||
|
xor ebx,ebx
|
||||||
|
cld
|
||||||
|
lodsd
|
||||||
|
mov ecx,4
|
||||||
|
;--------------------------------------
|
||||||
|
align 4
|
||||||
|
.loop:
|
||||||
|
cmp al,0x60 ; check for ABCDEF
|
||||||
|
ja @f
|
||||||
|
sub al,0x30 ; 0-9
|
||||||
|
jmp .store
|
||||||
|
;--------------------------------------
|
||||||
|
align 4
|
||||||
|
@@:
|
||||||
|
sub al,0x57 ; A-F
|
||||||
|
;--------------------------------------
|
||||||
|
align 4
|
||||||
|
.store:
|
||||||
|
and al,0xf
|
||||||
|
rol ebx,4
|
||||||
|
add bl,al
|
||||||
|
ror eax,8
|
||||||
|
dec ecx
|
||||||
|
jnz .loop
|
||||||
|
|
||||||
|
ret
|
||||||
|
;------------------------------------------------------------------------------
|
||||||
|
align 4
|
||||||
START: ; start of execution
|
START: ; start of execution
|
||||||
mcall 68,11
|
mcall 68,11
|
||||||
|
|
||||||
|
mov esi,bootparam
|
||||||
|
cmp [esi],byte 0
|
||||||
|
je .no_boot_parameters
|
||||||
|
; boot params - hex
|
||||||
|
; db '9999' ; +0 Menu button X
|
||||||
|
; db '9999' ; +4 Menu button X size
|
||||||
|
; db '9999' ; +8 Menu button Y
|
||||||
|
; db '9999' ; +12 Menu button Y size
|
||||||
|
; db '9999' ; +16 Panel height
|
||||||
|
; db '1000' ; +20 Panel attachment
|
||||||
|
|
||||||
|
; mov edx,bootparam
|
||||||
|
; call debug_outstr
|
||||||
|
; newline
|
||||||
|
|
||||||
|
call conversion_ASCII_to_HEX
|
||||||
|
mov [menu_button_x.start],ebx
|
||||||
|
|
||||||
|
; dps "menu_button_x.start: "
|
||||||
|
; dpd ebx
|
||||||
|
; newline
|
||||||
|
|
||||||
|
call conversion_ASCII_to_HEX
|
||||||
|
mov [menu_button_x.size],ebx
|
||||||
|
|
||||||
|
; dps "menu_button_x.size: "
|
||||||
|
; dpd ebx
|
||||||
|
; newline
|
||||||
|
|
||||||
|
call conversion_ASCII_to_HEX
|
||||||
|
mov [menu_button_y.start],ebx
|
||||||
|
|
||||||
|
; dps "menu_button_y.start: "
|
||||||
|
; dpd ebx
|
||||||
|
; newline
|
||||||
|
|
||||||
|
call conversion_ASCII_to_HEX
|
||||||
|
mov [menu_button_y.size],ebx
|
||||||
|
|
||||||
|
; dps "menu_button_y.size: "
|
||||||
|
; dpd ebx
|
||||||
|
; newline
|
||||||
|
|
||||||
|
call conversion_ASCII_to_HEX
|
||||||
|
mov [panel_height],ebx
|
||||||
|
|
||||||
|
; dps "panel_height: "
|
||||||
|
; dpd ebx
|
||||||
|
; newline
|
||||||
|
|
||||||
|
call conversion_ASCII_to_HEX
|
||||||
|
mov [panel_attachment],ebx
|
||||||
|
|
||||||
|
; dps "panel_attachment: "
|
||||||
|
; dpd ebx
|
||||||
|
; newline
|
||||||
|
;--------------------------------------
|
||||||
|
align 4
|
||||||
|
.no_boot_parameters:
|
||||||
call program_exist
|
call program_exist
|
||||||
mcall 14
|
mcall 14
|
||||||
mov [screen_size],eax
|
mov [screen_size],eax
|
||||||
@ -132,7 +224,15 @@ endprocess:
|
|||||||
align 4
|
align 4
|
||||||
search_end1:
|
search_end1:
|
||||||
mcall 14
|
mcall 14
|
||||||
sub ax,20
|
cmp [panel_attachment],byte 1
|
||||||
|
je @f
|
||||||
|
xor ax,ax
|
||||||
|
jmp .store
|
||||||
|
;--------------------------------------
|
||||||
|
align 4
|
||||||
|
@@:
|
||||||
|
sub ax,[panel_height] ;20
|
||||||
|
.store:
|
||||||
mov ebx,[menu_data]
|
mov ebx,[menu_data]
|
||||||
mov [ebx + y_end],ax
|
mov [ebx + y_end],ax
|
||||||
mov [ebx + x_start],5
|
mov [ebx + x_start],5
|
||||||
@ -418,14 +518,36 @@ click:
|
|||||||
jne still
|
jne still
|
||||||
; checking for pressing 'MENU' on the taskbar
|
; checking for pressing 'MENU' on the taskbar
|
||||||
mov eax,[screen_mouse_position]
|
mov eax,[screen_mouse_position]
|
||||||
|
|
||||||
|
cmp [panel_attachment],byte 1
|
||||||
|
je @f
|
||||||
|
|
||||||
|
xor ebx,ebx
|
||||||
|
jmp .check_y
|
||||||
|
;--------------------------------------
|
||||||
|
align 4
|
||||||
|
@@:
|
||||||
mov ebx,[screen_size]
|
mov ebx,[screen_size]
|
||||||
sub bx,PANEL_HEIGHT
|
sub bx,word [panel_height] ;PANEL_HEIGHT
|
||||||
|
;--------------------------------------
|
||||||
|
align 4
|
||||||
|
.check_y:
|
||||||
|
add bx,word [menu_button_y.start]
|
||||||
cmp bx,ax
|
cmp bx,ax
|
||||||
ja close
|
ja close
|
||||||
|
|
||||||
|
add bx,word [menu_button_y.size]
|
||||||
|
cmp bx,ax
|
||||||
|
jb close
|
||||||
|
|
||||||
shr eax,16
|
shr eax,16
|
||||||
cmp ax,MENU_BOTTON_X_SIZE
|
|
||||||
|
mov ebx,[menu_button_x.start]
|
||||||
|
cmp bx,ax ; MENU_BOTTON_X_SIZE
|
||||||
ja close
|
ja close
|
||||||
cmp ax,MENU_BOTTON_X_POS
|
|
||||||
|
add bx,[menu_button_x.size]
|
||||||
|
cmp bx,ax ; MENU_BOTTON_X_POS
|
||||||
ja still
|
ja still
|
||||||
;------------------------------------------------------------------------------
|
;------------------------------------------------------------------------------
|
||||||
align 4
|
align 4
|
||||||
@ -578,22 +700,63 @@ align 4
|
|||||||
; *********************************************
|
; *********************************************
|
||||||
align 4
|
align 4
|
||||||
draw_window:
|
draw_window:
|
||||||
|
mcall 48,5
|
||||||
|
mov [x_working_area],eax
|
||||||
|
mov [y_working_area],ebx
|
||||||
|
|
||||||
mcall 12,1 ; 1,start of draw
|
mcall 12,1 ; 1,start of draw
|
||||||
movzx ebx,[edi + rows]
|
movzx ebx,[edi + rows]
|
||||||
imul eax,ebx,BTN_HEIGHT ; eax = height of window
|
imul eax,ebx,BTN_HEIGHT ; eax = height of window
|
||||||
movzx ecx,[edi + y_end]
|
movzx ecx,[edi + y_end]
|
||||||
|
cmp [panel_attachment],byte 1
|
||||||
|
je @f
|
||||||
|
; add ecx,eax
|
||||||
|
; sub ecx,BTN_HEIGHT
|
||||||
|
jmp .1
|
||||||
|
;--------------------------------------
|
||||||
|
align 4
|
||||||
|
@@:
|
||||||
sub ecx,eax ; ecx = Y_START
|
sub ecx,eax ; ecx = Y_START
|
||||||
|
;--------------------------------------
|
||||||
|
align 4
|
||||||
|
.1:
|
||||||
shl ecx,16
|
shl ecx,16
|
||||||
add ecx,eax ; ecx = [ Y_START | Y_SIZE ]
|
add ecx,eax ; ecx = [ Y_START | Y_SIZE ]
|
||||||
dec ecx
|
dec ecx
|
||||||
|
|
||||||
movzx ebx,[edi + x_start]
|
movzx ebx,[edi + x_start]
|
||||||
shl ebx,16
|
shl ebx,16
|
||||||
mov bx,140 ; ebx = [ X_START | X_SIZE ]
|
mov bx,140 ; ebx = [ X_START | X_SIZE ]
|
||||||
mov edx,0x01000000 ; color of work area RRGGBB,8->color gl
|
mov edx,0x01000000 ; color of work area RRGGBB,8->color gl
|
||||||
mov esi,edx ; unmovable window
|
mov esi,edx ; unmovable window
|
||||||
|
|
||||||
|
mov eax,[y_working_area]
|
||||||
|
shr eax,16
|
||||||
|
ror ecx,16
|
||||||
|
test cx,0x8000
|
||||||
|
jz @f
|
||||||
|
mov cx,ax
|
||||||
|
;--------------------------------------
|
||||||
|
align 4
|
||||||
|
@@:
|
||||||
|
cmp cx,ax
|
||||||
|
ja @f
|
||||||
|
mov cx,ax
|
||||||
|
;--------------------------------------
|
||||||
|
align 4
|
||||||
|
@@:
|
||||||
|
rol ecx,16
|
||||||
xor eax,eax ; function 0 : define and draw window
|
xor eax,eax ; function 0 : define and draw window
|
||||||
mcall
|
mcall
|
||||||
|
|
||||||
|
; dps "[ Y_START | Y_SIZE ] : "
|
||||||
|
; dph ecx
|
||||||
|
; newline
|
||||||
|
|
||||||
|
; dps "[ X_START | X_SIZE ] : "
|
||||||
|
; dph ebx
|
||||||
|
; newline
|
||||||
|
|
||||||
call draw_all_buttons
|
call draw_all_buttons
|
||||||
mcall 12,2
|
mcall 12,2
|
||||||
ret
|
ret
|
||||||
@ -699,6 +862,17 @@ free_my_area dd 0
|
|||||||
|
|
||||||
processes dd 0
|
processes dd 0
|
||||||
;--------------------------------------
|
;--------------------------------------
|
||||||
|
menu_button_x:
|
||||||
|
.start: dd MENU_BOTTON_X_POS
|
||||||
|
.size: dd MENU_BOTTON_X_SIZE
|
||||||
|
;--------------------------------------
|
||||||
|
menu_button_y:
|
||||||
|
.start: dd 2
|
||||||
|
.size: dd 18
|
||||||
|
;--------------------------------------
|
||||||
|
panel_height: dd PANEL_HEIGHT
|
||||||
|
panel_attachment: dd 1
|
||||||
|
;--------------------------------------
|
||||||
align 4
|
align 4
|
||||||
fileinfo:
|
fileinfo:
|
||||||
.subfunction dd 5 ; 5 - file info; 0 - file read
|
.subfunction dd 5 ; 5 - file info; 0 - file read
|
||||||
@ -738,6 +912,13 @@ screen_size:
|
|||||||
.y dw ?
|
.y dw ?
|
||||||
.x dw ?
|
.x dw ?
|
||||||
;--------------------------------------
|
;--------------------------------------
|
||||||
|
x_working_area:
|
||||||
|
.right: dw ?
|
||||||
|
.left: dw ?
|
||||||
|
y_working_area:
|
||||||
|
.bottom: dw ?
|
||||||
|
.top: dw ?
|
||||||
|
;--------------------------------------
|
||||||
sc system_colors
|
sc system_colors
|
||||||
;--------------------------------------
|
;--------------------------------------
|
||||||
last_key db ?
|
last_key db ?
|
||||||
@ -758,6 +939,7 @@ virtual at 0 ; PROCESSES TABLE (located at menu_data)
|
|||||||
end virtual
|
end virtual
|
||||||
;------------------------------------------------------------------------------
|
;------------------------------------------------------------------------------
|
||||||
align 4
|
align 4
|
||||||
|
bootparam:
|
||||||
procinfo:
|
procinfo:
|
||||||
rb 1024
|
rb 1024
|
||||||
;------------------------------------------------------------------------------
|
;------------------------------------------------------------------------------
|
||||||
|
Loading…
Reference in New Issue
Block a user