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

corrrection of draw cursor

Browse source
This commit is contained in:
Frater 2026-01-11 15:29:32 +01:00
commit 073e6e6fbf
11 changed files with 2790 additions and 230 deletions
Download patch file Download diff file Expand all files Collapse all files

46
src/drivers/debug.asm
View file

@ -23,19 +23,53 @@
debug_puts:
.next:
push dx
mov dx, DEBUG_PORT
lodsb ; AL = *SI++
test al, al
jz .done
mov dx, DEBUG_PORT
out dx, al
jmp .next
.done:
pop dx
ret
debug_putc:
.next:
push dx
mov dx, DEBUG_PORT
out dx, al
ret
pop dx
ret
; AL = 0..15 -> print hex digit
debug_puthex4:
and al, 0Fh
cmp al, 9
jbe .num
add al, 'A' - 10
jmp .pout
.num:
add al, '0'
.pout:
call debug_putc
ret
; AL = byte -> print 2 hex digits
debug_puthex8:
push ax
mov ah, al
shr al, 4
call debug_puthex4
mov al, ah
call debug_puthex4
pop ax
ret
; AX = word -> print 4 hex digits
debug_puthex16:
push ax
mov al, ah
call debug_puthex8
pop ax
call debug_puthex8
ret

330
src/drivers/gfx_cgam.asm
View file

@ -43,7 +43,7 @@ gfx_init:
mov al, GFX_MODE
int 0x10
mov [BDA_CURSOR_SAVED],0 ; flag image saved
mov byte [BDA_CURSOR_SAVED],0 ; flag image saved
; dessine un background "check-board"
call gfx_background
@ -159,7 +159,7 @@ gfx_background:
gfx_cursor_calc_align:
mov al, cl
and al, 7 ; offset = x&7
mov [BDA_CURSOR_BITOFF], al
mov byte [BDA_CURSOR_BITOFF], al
cmp al, 0
jne .unaligned
mov byte [BDA_CURSOR_BYTES], 2
@ -168,156 +168,6 @@ gfx_cursor_calc_align:
mov byte [BDA_CURSOR_BYTES], 3
ret
; ------------------------------------------------------------
; Sauvegarde le background (24x16) sous le curseur (cx=X,dx=Y)
;
; utilise les variables du BDA pour stocker
; ------------------------------------------------------------
gfx_cursor_savebg:
pusha ; sauvegarde registres
mov ax, BDA_MOUSE_SEG
mov ds, ax
mov ax, VIDEO_SEG
mov es, ax
cmp [BDA_CURSOR_SAVED], 0
jne .done ; déjà sauvé
mov [BDA_CURSOR_SAVED], 1 ; flag image saved
mov [BDA_CURSOR_NEWX], cx ; sauvegarde la nouvelle position
mov [BDA_CURSOR_NEWY], dx
call gfx_calc_addr ; ES:DI = byteaddr pour (X,Y)
mov dx,0x2000 ; offset pour lignes impaire
cmp di,dx
jl .no_odd_bank
neg dx ; Y est déja une ligne impaire, on retire l'offset
.no_odd_bank:
mov si, BDA_CURSOR_BG ; DS:SI = buffer de sauvegarde
mov bx, 8
and cx,0x0007 ; alignement X
jnz .row3
.row3: ; sauve 3 bytes/ligne
mov [BDA_CURSOR_BYTES], 3 ; 3 bytes/ligne
; ligne 'y', peut etre paire ou impaire
mov ax, word [es:di] ; charge first word
mov word [ds:si], ax ; sauvegarde
mov al, byte [es:di+2] ; charge 3ème byte
mov byte [ds:si+2], al
add si, 3
; ligne 'y'+1; si paire +0x2000, si impaire -0x2000
add di, dx ; charge first word other bank (+0x2000 ou -0x2000)
mov ax, word [es:di]
mov word [ds:si], ax
mov al, byte [es:di+2]
mov byte [ds:si+2], al
add si, 3
sub di, dx
add di, CGA_STRIDE
dec bx
jnz .row3
jmp .done
.row2: ; sauve 2 bytes/ligne
mov [BDA_CURSOR_BYTES], 2 ; par défaut
; ligne 'y', peut etre paire ou impaire
mov ax, word [es:di] ; charge first word
mov word [ds:si], ax ; sauvegarde
add si, 2
; ligne 'y'+1; si paire +0x2000, si impaire -0x2000
add di, dx ; charge first word other bank (+0x2000 ou -0x2000)
mov ax, word [es:di]
mov word [ds:si], ax
add si, 2
sub di, dx
add di, CGA_STRIDE
dec bx
jnz .row3
.done:
popa
ret
; ------------------------------------------------------------
; restore le background (24x16)
;
; utilise les variables du BDA pour stocker
; ------------------------------------------------------------
gfx_cursor_restorebg:
pusha ; sauvegarde registres
mov ax, BDA_MOUSE_SEG
mov ds, ax
mov ax, VIDEO_SEG
mov es, ax
cmp [BDA_CURSOR_SAVED], 0 ; pas de background sauvé
je .done
mov cx,[BDA_CURSOR_OLDX] ; restore de la position
mov dx,[BDA_CURSOR_OLDY]
mov [BDA_CURSOR_SAVED], 0 ; le background a été restauré
call gfx_calc_addr ; ES:DI = byteaddr pour (X,Y)
mov dx,0x2000 ; offset pour lignes impaire
cmp di,dx
jl .no_odd_bank
neg dx ; Y est déja une ligne impaire, on retire l'offset
.no_odd_bank:
mov si, BDA_CURSOR_BG ; DS:SI = buffer de sauvegarde
mov bx, 8
cmp [BDA_CURSOR_BYTES], 2 ; si la sauvegarde est en 2 bytes/ligne
je .row2
.row3: ; restore en 3 bytes/ligne
; ligne 'y', peut etre paire ou impaire
mov ax,word [ds:si] ; recupère le 1er word
mov word [es:di],ax
mov al,byte [ds:si+2] ; charge 3ème byte
mov byte [es:di+2],al
add si, 3
; ligne 'y'+1; si paire +0x2000, si impaire -0x2000
add di, dx ; charge first word other bank (+0x2000 ou -0x2000)
mov ax,word [ds:si] ; recupère le 1er word
mov word [es:di],ax
mov al,byte [ds:si+2] ; charge 3ème byte
mov byte [es:di+2],al
add si, 3
sub di, dx
add di, CGA_STRIDE
dec bx
jnz .row3
jmp .done
.row2: ; restore en 2 bytes/ligne
; ligne 'y', peut etre paire ou impaire
mov ax,word [ds:si] ; recupère le 1er word
mov word [es:di],ax
add si, 2
; ligne 'y'+1; si paire +0x2000, si impaire -0x2000
add di, dx ; charge first word other bank (+0x2000 ou -0x2000)
mov ax,word [ds:si] ; recupère le 1er word
mov word [es:di],ax
add si, 2
sub di, dx
add di, CGA_STRIDE
dec bx
jnz .row2
.done:
popa
ret
; ------------------------------------------------------------
; Dessine un pixel, en [ES:DI] accès VRAM direct.
;
@ -361,28 +211,28 @@ gfx_cursor_draw:
mov ax, VIDEO_SEG
mov es, ax
mov cx, [BDA_CURSOR_NEWX]
mov dx, [BDA_CURSOR_NEWY]
mov ax, word [BDA_CURSOR_PTR]
mov si, ax
mov cx, word [BDA_CURSOR_NEWX]
mov dx, word [BDA_CURSOR_NEWY]
; calcule offset et bytes/ligne (2 ou 3)
call gfx_cursor_calc_align
mov bl, [BDA_CURSOR_BITOFF] ; 0..7
mov bl, byte [BDA_CURSOR_BITOFF]; 0..7
; calcule DI de départ (attention: gfx_calc_addr modifie CL)
push cx
call gfx_calc_addr ; DI ok, AH ignoré
pop cx
; dxbank = +0x2000 si DI < 0x2000, sinon dxbank = -0x2000
mov bp, 02000h
cmp di, bp
jl .bank_ok
neg bp ; bp = -0x2000
.bank_ok:
; on va dessiner 16 lignes: 8 paires (ligne dans bank courant + ligne dans autre bank)
mov bx, 0 ; row index (0..15)
mov bh, 0 ; row index (0..15)
mov dh, 8
.pair:
; ----- ligne row (bank courant) -----
@ -394,7 +244,7 @@ gfx_cursor_draw:
; ----- ligne row+1 (autre bank) -----
add di, bp
inc bx
inc bh
push di
push si
call .draw_line
@ -405,7 +255,7 @@ gfx_cursor_draw:
; avancer de 2 lignes (dans le bank courant): +80 bytes
add di, CGA_STRIDE
inc bx
inc bh
dec dh
jnz .pair
@ -426,7 +276,8 @@ gfx_cursor_draw:
push di
; charger masks de la ligne: AND = [SI + row*2], XOR = [SI + 32 + row*2]
mov ax, bx
xor ax, ax
mov al, bh
shl ax, 1 ; row*2
push si
@ -550,3 +401,158 @@ gfx_cursor_draw:
pop cx
pop ax
ret
; ------------------------------------------------------------
; Sauvegarde le background (24x16) sous le curseur
;
; utilise les variables du BDA pour stocker
; ------------------------------------------------------------
gfx_cursor_savebg:
pusha ; sauvegarde registres
mov ax, BDA_MOUSE_SEG
mov ds, ax
mov ax, VIDEO_SEG
mov es, ax
cmp byte [BDA_CURSOR_SAVED], 0
jne .done ; déjà sauvé
mov cx, [BDA_MOUSE_X]
mov dx, [BDA_MOUSE_Y]
mov byte [BDA_CURSOR_SAVED], 1 ; flag image saved
mov word [BDA_CURSOR_NEWX], cx ; sauvegarde la nouvelle position
mov word [BDA_CURSOR_NEWY], dx
call gfx_calc_addr ; ES:DI = byteaddr pour (X,Y)
mov dx,0x2000 ; offset pour lignes impaire
cmp di,dx
jl .no_odd_bank
neg dx ; Y est déja une ligne impaire, on retire l'offset
.no_odd_bank:
mov si, BDA_CURSOR_BG ; DS:SI = buffer de sauvegarde
mov bx, 8
and cx,0x0007 ; alignement X
jnz .row3
.row3: ; sauve 3 bytes/ligne
mov byte [BDA_CURSOR_BYTES], 3 ; 3 bytes/ligne
; ligne 'y', peut etre paire ou impaire
mov ax, word [es:di] ; charge first word
mov word [ds:si], ax ; sauvegarde
mov al, byte [es:di+2] ; charge 3ème byte
mov byte [ds:si+2], al
add si, 3
; ligne 'y'+1; si paire +0x2000, si impaire -0x2000
add di, dx ; charge first word other bank (+0x2000 ou -0x2000)
mov ax, word [es:di]
mov word [ds:si], ax
mov al, byte [es:di+2]
mov byte [ds:si+2], al
add si, 3
sub di, dx
add di, CGA_STRIDE
dec bx
jnz .row3
jmp .done
.row2: ; sauve 2 bytes/ligne
mov byte [BDA_CURSOR_BYTES], 2 ; par défaut
; ligne 'y', peut etre paire ou impaire
mov ax, word [es:di] ; charge first word
mov word [ds:si], ax ; sauvegarde
add si, 2
; ligne 'y'+1; si paire +0x2000, si impaire -0x2000
add di, dx ; charge first word other bank (+0x2000 ou -0x2000)
mov ax, word [es:di]
mov word [ds:si], ax
add si, 2
sub di, dx
add di, CGA_STRIDE
dec bx
jnz .row3
.done:
popa
ret
; ------------------------------------------------------------
; restore le background (24x16)
;
; utilise les variables du BDA pour stocker
; ------------------------------------------------------------
gfx_cursor_restorebg:
pusha ; sauvegarde registres
mov ax, BDA_MOUSE_SEG
mov ds, ax
mov ax, VIDEO_SEG
mov es, ax
cmp byte [BDA_CURSOR_SAVED], 0 ; pas de background sauvé
je .done
mov cx,word [BDA_CURSOR_OLDX] ; restore de la position
mov dx,word [BDA_CURSOR_OLDY]
mov byte [BDA_CURSOR_SAVED], 0 ; le background a été restauré
call gfx_calc_addr ; ES:DI = byteaddr pour (X,Y)
mov dx,0x2000 ; offset pour lignes impaire
cmp di,dx
jl .no_odd_bank
neg dx ; Y est déja une ligne impaire, on retire l'offset
.no_odd_bank:
mov si, BDA_CURSOR_BG ; DS:SI = buffer de sauvegarde
mov bx, 8
cmp byte [BDA_CURSOR_BYTES], 2 ; si la sauvegarde est en 2 bytes/ligne
je .row2
.row3: ; restore en 3 bytes/ligne
; ligne 'y', peut etre paire ou impaire
mov ax,word [ds:si] ; recupère le 1er word
mov word [es:di],ax
mov al,byte [ds:si+2] ; charge 3ème byte
mov byte [es:di+2],al
add si, 3
; ligne 'y'+1; si paire +0x2000, si impaire -0x2000
add di, dx ; charge first word other bank (+0x2000 ou -0x2000)
mov ax,word [ds:si] ; recupère le 1er word
mov word [es:di],ax
mov al,byte [ds:si+2] ; charge 3ème byte
mov byte [es:di+2],al
add si, 3
sub di, dx
add di, CGA_STRIDE
dec bx
jnz .row3
jmp .done
.row2: ; restore en 2 bytes/ligne
; ligne 'y', peut etre paire ou impaire
mov ax,word [ds:si] ; recupère le 1er word
mov word [es:di],ax
add si, 2
; ligne 'y'+1; si paire +0x2000, si impaire -0x2000
add di, dx ; charge first word other bank (+0x2000 ou -0x2000)
mov ax,word [ds:si] ; recupère le 1er word
mov word [es:di],ax
add si, 2
sub di, dx
add di, CGA_STRIDE
dec bx
jnz .row2
.done:
popa
ret

63
src/drivers/mouse_ps2.asm
View file

@ -88,18 +88,23 @@ mouse_reset:
mov ds,ax
; effacer les variables du drivers
mov [BDA_MOUSE_IDX],0
mov byte [BDA_MOUSE_IDX],0
mov dword [BDA_MOUSE_BUFFER],0
mov byte [DBA_MOUSE_PACKETLEN],3
mov byte [BDA_MOUSE_STATUS],0
mov word [BDA_MOUSE_X],0 ; vous pouvez aussi préciser le centre
mov word [BDA_MOUSE_Y],0 ; vous pouvez aussi préciser le centre
mov word [BDA_MOUSE_X],320 ; vous pouvez aussi préciser le centre
mov word [BDA_MOUSE_Y],100 ; vous pouvez aussi préciser le centre
; experiemntal
mov word [BDA_MOUSE_WHEEL],0
ret
mov byte [BDA_CURSOR_VISIBLE], 1
mov word [BDA_CURSOR_OLDX], 0
mov word [BDA_CURSOR_OLDY], 0
mov word [BDA_CURSOR_PTR], mouse_arrow
ret
; ------------------------------------------------------------
; initialise le i8042 keyboard and mouse (PS/2)
@ -157,7 +162,7 @@ mouse_init:
call mouse_sendcmd
; détecter le packet size (3/4 bytes)
call mouse_detect_packet_len
call mouse_detect_packet_len
; installer ISR IRQ12 (INT 74h)
cli
@ -300,22 +305,22 @@ mouse_sendcmd:
; bit 7 = Y overflow
; ------------------------------------------------------------
mouse_handler:
PUSH_ABCD
push ds
; sauvegarder tout les registres
pusha
; use BDA segment
mov ax,BDA_MOUSE_SEG
mov ds,ax
in al, PS2_PORT_BUFFER ; lire octet souris
mov [BDA_MOUSE_BUFFER + BDA_MOUSE_IDX], al
inc [BDA_MOUSE_IDX]
mov byte [BDA_MOUSE_BUFFER + BDA_MOUSE_IDX], al
inc byte [BDA_MOUSE_IDX]
mov al, [DBA_MOUSE_PACKETLEN]
cmp [BDA_MOUSE_IDX], al
jne .done
mov [BDA_MOUSE_IDX], 0
mov byte [BDA_MOUSE_IDX], 0
; decode buffer manuallement
mov al, [BDA_MOUSE_BUFFER]
@ -332,14 +337,42 @@ mouse_handler:
; si packetlen = 4, gérer la molette; experimental
mov al, [BDA_MOUSE_BUFFER+3]
cbw
sub [BDA_MOUSE_WHEEL], ax
add word [BDA_MOUSE_WHEEL], ax
; debug: afficher les valeurs
mov si, BDA_MOUSE_BUFFER
mov cx, 4
.debug_loop:
mov al, [si]
call debug_puthex8
mov al, ' '
call debug_putc
inc si
loop .debug_loop
; clamp X
cmp word [BDA_MOUSE_X], 0
jge .x_ok_low
mov word [BDA_MOUSE_X], 0
.x_ok_low:
cmp word [BDA_MOUSE_X], 639
jle .x_ok_high
mov word [BDA_MOUSE_X], 639
.x_ok_high:
; clamp Y
cmp word [BDA_MOUSE_Y], 0
jge .y_ok_low
mov word [BDA_MOUSE_Y], 0
.y_ok_low:
cmp word [BDA_MOUSE_Y], 199
jle .y_ok_high
mov word [BDA_MOUSE_Y], 199
.y_ok_high:
; restaurer l'ancien arrière plan du curseur
call gfx_cursor_restorebg
; sauvegarder le nouvel arrière plan du curseur
mov cx, [BDA_MOUSE_X]
mov dx, [BDA_MOUSE_Y]
call gfx_cursor_savebg
call gfx_cursor_draw
@ -349,6 +382,6 @@ mouse_handler:
out 0xA0, al ; EOI PIC esclave
out 0x20, al ; EOI PIC maître
pop ds
POP_ABCD
; restaurer tous les registres
popa
iret