frater/bios-OS
Watch
1
0
Fork
You've already forked bios-OS
 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Move to API

Browse source
This commit is contained in:
saintfrater 2026-02-09 11:51:58 +01:00
commit 3df0ede39e
3 changed files with 169 additions and 174 deletions
Download patch file Download diff file Expand all files Collapse all files

78
src/boot.asm
View file

@ -59,7 +59,7 @@ section .text
%include "./gui/lib.asm"
%include "./gui/draw.asm"
reset:
entrycode:
cli
; il n'existe aucun 'stack' par défaut
mov ax, STACK_SEG
@ -112,7 +112,7 @@ reset:
main_loop:
call gui_process_all
GUI GUI_GET_VAL, 5 ; slider
GUI OBJ_GET_VAL, 5 ; slider
;GFX GOTOXY, 5, 20
;call print_word_hex
@ -131,77 +131,23 @@ build_interface:
; mais on configure DS=GUI_RAM_SEG pour l'allocation
; Créer Bouton 1 "QUITTER"
call gui_alloc_widget ; Retourne SI = Pointeur nouveau slot
jc .mem_full
; Remplir les propriétés
mov word [gs:si + widget.x], 10
mov word [gs:si + widget.y], 10
mov word [gs:si + widget.w], 80
mov word [gs:si + widget.h], 16
mov word [gs:si + widget.text_ofs], str_quit
; mov byte [gs:si + widget.user_id], 1 ; Style "Bouton par défaut" (OK)
mov word [gs:si + widget.text_seg], cs ; Texte est dans la ROM
mov word [gs:si + widget.event_click], on_click_quit ; Fonction à appeler
mov byte [gs:si + widget.type], WIDGET_TYPE_ROUND_BUTTON
GUI OBJ_CREATE, OBJ_TYPE_BUTTON_ROUNDED, 10, 10, 80, 16, str_quit, cs
; Créer Bouton 2 "HELLO"
call gui_alloc_widget
jc .mem_full
mov word [gs:si + widget.x], 100
mov word [gs:si + widget.y], 50
mov word [gs:si + widget.w], 80
mov word [gs:si + widget.h], 16
mov word [gs:si + widget.text_ofs], str_hello
mov word [gs:si + widget.text_seg], cs
mov byte [gs:si + widget.type], WIDGET_TYPE_ROUND_BUTTON
GUI OBJ_CREATE, OBJ_TYPE_BUTTON_ROUNDED, 100, 50, 80, 16, str_hello, cs
; Créer checkbox 3 "option 1"
call gui_alloc_widget
jc .mem_full
GUI OBJ_CREATE, OBJ_TYPE_CHECKBOX, 200, 50, 100, 15, str_option1, cs
GUI OBJ_CREATE, OBJ_TYPE_CHECKBOX, 200, 50+16, 100, 15, str_option2, cs
GUI OBJ_CREATE, OBJ_TYPE_CHECKBOX, 200, 50+16*2, 100, 15, str_option3, cs
mov word [gs:si + widget.x], 200
mov word [gs:si + widget.y], 50
mov word [gs:si + widget.w], 100
mov word [gs:si + widget.h], 15
mov word [gs:si + widget.text_ofs], str_option1
mov word [gs:si + widget.text_seg], cs
mov byte [gs:si + widget.type], WIDGET_TYPE_CHECKBOX
; Pas de callback
; Créer checkbox 3 "option 2"
call gui_alloc_widget
jc .mem_full
mov word [gs:si + widget.x], 200
mov word [gs:si + widget.y], 50+16
mov word [gs:si + widget.w], 100
mov word [gs:si + widget.h], 15
mov word [gs:si + widget.text_ofs], str_option2
mov word [gs:si + widget.text_seg], cs
mov byte [gs:si + widget.type], WIDGET_TYPE_CHECKBOX
; Créer checkbox 3 "option 2"
call gui_alloc_widget
jc .mem_full
mov word [gs:si + widget.x], 200
mov word [gs:si + widget.y], 50+16*2
mov word [gs:si + widget.w], 100
mov word [gs:si + widget.h], 15
mov word [gs:si + widget.text_ofs], str_option3
mov word [gs:si + widget.text_seg], cs
mov byte [gs:si + widget.type], WIDGET_TYPE_CHECKBOX
; Créer Slider (Drag)
; Créer Slider (Drag)
; GUI OBJ_CREATE, OBJ_TYPE_SLIDER,
call gui_alloc_widget
jc .mem_full
mov word [gs:si + widget.x], 10
mov word [gs:si + widget.y], 100
mov word [gs:si + widget.w], 150
mov word [gs:si + widget.h], 12
mov byte [gs:si + widget.type], WIDGET_TYPE_SLIDER
mov byte [gs:si + widget.type],OBJ_TYPE_SLIDER
mov byte [gs:si + widget.attr_mode], SLIDER_HORIZONTAL
mov word [gs:si + widget.attr_min], 10 ; X Min
mov word [gs:si + widget.attr_max], 140 ; X Max (Widget.x + W - ThumbW)
@ -216,7 +162,7 @@ build_interface:
mov word [gs:si + widget.y], 10
mov word [gs:si + widget.w], 16
mov word [gs:si + widget.h], 150
mov byte [gs:si + widget.type], WIDGET_TYPE_SLIDER
mov byte [gs:si + widget.type], OBJ_TYPE_SLIDER
mov byte [gs:si + widget.attr_mode], SLIDER_VERTICAL
mov word [gs:si + widget.attr_min], 10 ; X Min
mov word [gs:si + widget.attr_max], 140 ; X Max (Widget.x + W - ThumbW)
@ -268,7 +214,7 @@ global reset_vector
reset_vector:
; code minimal au reset
jmp 0xF000:reset
jmp 0xF000:entrycode
builddate:
db __DATE__

13
src/gui/draw.asm
View file

@ -51,25 +51,30 @@ gui_draw_single_widget:
mov [gs:si + widget.y2], dx
; Dispatch selon le type
cmp byte [gs:si + widget.type], WIDGET_TYPE_SLIDER
cmp byte [gs:si + widget.type], OBJ_TYPE_LABEL
jne .case_1
jmp .done
.case_1:
cmp byte [gs:si + widget.type], OBJ_TYPE_SLIDER
jne .case_2
call draw_slider
jmp .done
.case_2:
cmp byte [gs:si + widget.type], WIDGET_TYPE_BUTTON
cmp byte [gs:si + widget.type], OBJ_TYPE_BUTTON
jne .case_3
call draw_button
jmp .done
.case_3:
cmp byte [gs:si + widget.type], WIDGET_TYPE_ROUND_BUTTON
cmp byte [gs:si + widget.type], OBJ_TYPE_BUTTON_ROUNDED
jne .case_4
call draw_round_button
jmp .done
.case_4:
cmp byte [gs:si + widget.type], WIDGET_TYPE_CHECKBOX
cmp byte [gs:si + widget.type], OBJ_TYPE_CHECKBOX
jne .case_5
call draw_checkbox
jmp .done

252
src/gui/lib.asm
View file

@ -35,13 +35,14 @@
%define GUI_STATE_DISABLED 4 ; Grisé
; --- Types de Widgets ---
%define WIDGET_TYPE_BUTTON 0
%define WIDGET_TYPE_SLIDER 1
%define WIDGET_TYPE_LABEL 2
%define WIDGET_TYPE_ROUND_BUTTON 3
%define WIDGET_TYPE_CHECKBOX 4
%define OBJ_TYPE_LABEL 0
%define OBJ_TYPE_BUTTON 1
%define OBJ_TYPE_SLIDER 2
%define OBJ_TYPE_BUTTON_ROUNDED 3
%define OBJ_TYPE_CHECKBOX 4
; --- Widgets attributs ---
%define BUTTON_DEFAULT 0
%define BUTTON_OK 1
%define SLIDER_HORIZONTAL 1
@ -51,18 +52,18 @@
; SECTION : API ACTIONS
; =============================================================================
%define GUI_CREATE 0
%define GUI_DESTROY 1
%define GUI_GET_STATE 2
%define GUI_GET_TYPE 3
%define GUI_GET_VAL 4
%define OBJ_CREATE 0
%define OBJ_DESTROY 1
%define OBJ_GET_STATE 2
%define OBJ_GET_TYPE 3
%define OBJ_GET_VAL 4
gui_api_table:
dw gui_api_create
dw gui_api_create
dw gui_api_destroy
dw gui_api_get_state
dw gui_api_get_type
dw gui_api_get_val
dw gui_api_get_state
dw gui_api_get_type
dw gui_api_get_val
; --- Structure d'un OBJET (Bouton, etc) ---
struc widget
@ -97,34 +98,75 @@ endstruc
; actuellement 34 octets
%macro GUI 1-*
%rep %0 - 1
%rotate -1
push %1
%endrep
%rotate -1
call word [cs:gui_api_table + ((%1)*2)]
add sp, (%0 - 1) * 2
%rep %0 - 1
%rotate -1
push %1
%endrep
%rotate -1
call word [cs:gui_api_table + ((%1)*2)]
add sp, (%0 - 1) * 2
%endmacro
; -----------------------------------------------------------------------------
; gui_api_create
; Crée un widget et retourne son ID
; Out: AX = ID ou -1 si erreur
;
; widget_type, x, y, w, h, text_ofs, text_seg
;
; -----------------------------------------------------------------------------
%define .type word [bp+4]
%define .x word [bp+6]
%define .y word [bp+8]
%define .w word [bp+10]
%define .h word [bp+12]
%define .text_ofs word [bp+14]
%define .text_seg word [bp+16]
gui_api_create:
call gui_alloc_widget ; Returns GS:SI
jc .error
push bp
mov bp, sp
push gs
; ID = SI / widget_size
mov ax, si
xor dx, dx
mov cx, widget_size
div cx
ret
mov ax, GUI_RAM_SEG
mov gs, ax
call gui_alloc_widget ; Returns GS:SI
mov ax, -1
jc .done
.error:
mov ax, -1
ret
; ID = SI / widget_size
mov ax, si
xor dx, dx
mov cx, widget_size
div cx
mov ax, .type
mov byte [gs:si + widget.type], al
mov ax, .x
mov word [gs:si + widget.x], ax
mov ax, .y
mov word [gs:si + widget.y], ax
mov ax, .w
mov word [gs:si + widget.w], ax
mov ax, .h
mov word [gs:si + widget.h], ax
mov ax, .text_ofs
mov word [gs:si + widget.text_ofs], ax
mov ax, .text_seg
mov word [gs:si + widget.text_seg], ax
mov byte [gs:si + widget.state], GUI_STATE_NORMAL
mov byte [gs:si + widget.oldstate], 0
.done:
leave
pop gs
ret
%undef .type
%undef .x
%undef .y
%undef .w
%undef .h
%undef .text_ofs
%undef .text_seg
; -----------------------------------------------------------------------------
; gui_api_get_state
@ -133,22 +175,22 @@ gui_api_create:
; -----------------------------------------------------------------------------
%define .id word [bp+4]
gui_api_get_state:
push bp
mov bp, sp
push bp
mov bp, sp
mov ax, .id ; ID
call gui_get_widget_ptr
jc .err
mov ax, .id ; ID
call gui_get_widget_ptr
jc .err
xor ax, ax
mov al, [gs:si + widget.state]
jmp .done
xor ax, ax
mov al, [gs:si + widget.state]
jmp .done
.err:
mov ax, -1
mov ax, -1
.done:
leave
ret
leave
ret
%undef .id
; -----------------------------------------------------------------------------
@ -158,22 +200,22 @@ gui_api_get_state:
; -----------------------------------------------------------------------------
%define .id word [bp+4]
gui_api_get_type:
push bp
mov bp, sp
push bp
mov bp, sp
mov ax, .id ; ID
call gui_get_widget_ptr
jc .err
mov ax, .id ; ID
call gui_get_widget_ptr
jc .err
xor ax, ax
mov al, [gs:si + widget.type]
jmp .done
xor ax, ax
mov al, [gs:si + widget.type]
jmp .done
.err:
mov ax, -1
mov ax, -1
.done:
leave
ret
leave
ret
%undef .id
; -----------------------------------------------------------------------------
@ -183,22 +225,22 @@ gui_api_get_type:
; -----------------------------------------------------------------------------
%define .id word [bp+4]
gui_api_get_val:
push bp
mov bp, sp
push bp
mov bp, sp
mov ax, .id ; ID
call gui_get_widget_ptr
jc .err
mov ax, .id ; ID
call gui_get_widget_ptr
jc .err
mov ax, [gs:si + widget.attr_val]
jmp .done
mov ax, [gs:si + widget.attr_val]
jmp .done
.err:
mov ax, -1
mov ax, -1
.done:
leave
ret
leave
ret
%undef .id
; -----------------------------------------------------------------------------
@ -209,22 +251,22 @@ gui_api_get_val:
; -----------------------------------------------------------------------------
%define .id word [bp+4]
gui_api_destroy:
push bp
mov bp, sp
push bp
mov bp, sp
mov ax, .id ; ID
call gui_get_widget_ptr
jc .err
mov ax, .id ; ID
call gui_get_widget_ptr
jc .err
call gui_free_widget
xor ax, ax
jmp .done
call gui_free_widget
xor ax, ax
jmp .done
.err:
mov ax, -1
mov ax, -1
.done:
leave
ret
leave
ret
%undef .id
; -----------------------------------------------------------------------------
@ -235,28 +277,28 @@ gui_api_destroy:
; -----------------------------------------------------------------------------
%define .id word [bp+4]
gui_get_widget_ptr:
push bp
mov bp, sp
push bp
mov bp, sp
mov ax, .id
stc
cmp ax, GUI_MAX_WIDGETS
je .done
cmp ax, GUI_MAX_WIDGETS
je .done
push dx
mov cx, widget_size
mul cx ; AX = Offset
mov si, ax
pop dx
push dx
mov cx, widget_size
mul cx ; AX = Offset
mov si, ax
pop dx
mov ax, GUI_RAM_SEG
mov gs, ax
mov ax, GUI_RAM_SEG
mov gs, ax
clc
clc
.done:
leave
ret
ret
; =============================================================================
; SECTION : GESTION MÉMOIRE (ALLOCATION / LIBÉRATION)
@ -319,7 +361,7 @@ gui_alloc_widget:
.found:
; On initialise le slot trouvé
mov byte [gs:si + widget.state], GUI_STATE_NORMAL ; Marquer comme occupé
mov byte [gs:si + widget.type], WIDGET_TYPE_BUTTON ; Type par défaut
mov byte [gs:si + widget.type], OBJ_TYPE_BUTTON ; Type par défaut
mov byte [gs:si + widget.oldstate], 0 ; doit etre dessiné
; Reset des champs critiques pour éviter les déchets
@ -475,43 +517,41 @@ gui_update_logic:
mov bl, [BDA_MOUSE + mouse.status]
.case_0:
cmp byte [gs:si + widget.type], OBJ_TYPE_LABEL
jne .case_1
call gui_logic_label
jmp .done
.case_1:
; Dispatch selon le type
cmp byte [gs:si + widget.type], WIDGET_TYPE_SLIDER
cmp byte [gs:si + widget.type], OBJ_TYPE_SLIDER
jne .case_2
call gui_logic_slider
jmp .done
.case_2:
cmp byte [gs:si + widget.type], WIDGET_TYPE_BUTTON
cmp byte [gs:si + widget.type], OBJ_TYPE_BUTTON
jne .case_3
call gui_logic_button
jmp .done
.case_3:
cmp byte [gs:si + widget.type], WIDGET_TYPE_ROUND_BUTTON
cmp byte [gs:si + widget.type], OBJ_TYPE_BUTTON_ROUNDED
jne .case_4
call gui_logic_button
jmp .done
.case_4:
cmp byte [gs:si + widget.type], WIDGET_TYPE_CHECKBOX
cmp byte [gs:si + widget.type], OBJ_TYPE_CHECKBOX
jne .case_5
call gui_logic_checkbox
jmp .done
.case_5:
jmp .done
.miss:
; Si on n'est plus dessus, mais qu'on l'était avant (HOVER/PRESSED), il faut redessiner !
cmp byte [gs:si + widget.state], GUI_STATE_NORMAL
je .done ; Déjà normal, rien à faire
; Cas particulier : si c'est un slider en cours de drag, on continue la logique
; cmp byte [gs:si + widget.type], WIDGET_TYPE_SLIDER
; jne .reset_state
; cmp byte [gs:si + widget.state], GUI_STATE_PRESSED
; je .gui_logic_slider
.reset_state:
mov byte [gs:si + widget.state], GUI_STATE_NORMAL
xor ax, ax
@ -519,6 +559,10 @@ gui_update_logic:
pop ds
ret
; --- Logique spécifique LABEL ---
gui_logic_label:
ret
; --- Logique spécifique Bouton ---
gui_logic_button:
test bl, 1 ; Clic gauche ?