add mouse support (WIP)
This commit is contained in:
Frater
parent
892da28db7
commit
91881695fb
10 changed files with 719 additions and 161 deletions
3
.gitignore
vendored
Normal file
3
.gitignore
vendored
Normal file
|
|
@ -0,0 +1,3 @@
|
||||||
|
build/
|
||||||
|
.vscode
|
||||||
|
.vscode/tasks.json
|
||||||
11
build-elf.bat
Normal file
11
build-elf.bat
Normal file
|
|
@ -0,0 +1,11 @@
|
||||||
|
@echo off
|
||||||
|
|
||||||
|
if not exist build mkdir build
|
||||||
|
cd src
|
||||||
|
echo compiling
|
||||||
|
"C:\Program Files\NASM\nasm.exe" -f elf32 -g -F dwarf boot.asm -o ..\build\bios.o
|
||||||
|
echo LD
|
||||||
|
ld -m elf_i386 -T link.ld -o build\bios.elf build\bios.o
|
||||||
|
echo ObjectCopy
|
||||||
|
objcopy -O binary build\bios.elf build\bios.bin
|
||||||
|
cd ..
|
||||||
BIN
roms/qemu-vgabios.bin
Normal file
BIN
roms/qemu-vgabios.bin
Normal file
Binary file not shown.
BIN
roms/vgabios.bin
Normal file
BIN
roms/vgabios.bin
Normal file
Binary file not shown.
39
src/bda.asm
39
src/bda.asm
|
|
@ -2,7 +2,6 @@
|
||||||
; Project : Custom BIOS / ROM
|
; Project : Custom BIOS / ROM
|
||||||
; File : bda.asm
|
; File : bda.asm
|
||||||
; Author : frater
|
; Author : frater
|
||||||
; Created : 06 jan 2026
|
|
||||||
;
|
;
|
||||||
; License : GNU General Public License v3.0 or later (GPL-3.0+)
|
; License : GNU General Public License v3.0 or later (GPL-3.0+)
|
||||||
;
|
;
|
||||||
|
|
@ -21,32 +20,31 @@
|
||||||
;
|
;
|
||||||
; =============================================================================
|
; =============================================================================
|
||||||
|
|
||||||
|
; compatible with IBM PC BIOS Data Area (BDA):
|
||||||
;
|
|
||||||
; https://wiki.nox-rhea.org/back2root/ibm-pc-ms-dos/hardware/informations/bios_data_area
|
; https://wiki.nox-rhea.org/back2root/ibm-pc-ms-dos/hardware/informations/bios_data_area
|
||||||
;
|
;
|
||||||
|
|
||||||
%define BDA_SEGMENT 0x0040 ; segment BDA
|
%define BDA_SEGMENT 0x0040 ; segment BDA
|
||||||
|
|
||||||
; custom var
|
; custom vars
|
||||||
%define BDA_INFO_MEM_SIZE 0x0014 ; Memory size in Kbytes
|
%define BDA_INFO_MEM_SIZE 0x0014 ; Memory size in Kbytes
|
||||||
%define BDA_INFO_MEM_SEG BDA_INFO_MEM_SIZE+2 ; highest Memory Segment
|
%define BDA_INFO_MEM_SEG BDA_INFO_MEM_SIZE+2 ; highest Memory Segment
|
||||||
|
|
||||||
; video related information (compatible with VGA bios)
|
; video related information (compatible with VGA bios)
|
||||||
%define BDA_VIDEO_CURR_MODE 0x0049
|
%define BDA_VIDEO_CURR_MODE 0x0049
|
||||||
%define BDA_VIDEO_COLUMNS 0x004A
|
%define BDA_VIDEO_COLUMNS 0x004A
|
||||||
%define BDA_VIDEO_BUF_SIZE 0x004C
|
%define BDA_VIDEO_BUF_SIZE 0x004C
|
||||||
%define BDA_VIDEO_OFS_PAGE 0x004E
|
%define BDA_VIDEO_OFS_PAGE 0x004E
|
||||||
|
|
||||||
|
|
||||||
; 40:50 8 words Cursor position of pages 1-8, high order byte=row low order byte=column; changing this data isn't reflected immediately on the display
|
; 40:50 8 words Cursor position of pages 1-8, high order byte=row low order byte=column;
|
||||||
; 40:60 byte Cursor ending (bottom) scan line (don't modify)
|
; changing this data isn't reflected immediately on the display
|
||||||
; 40:61 byte Cursor starting (top) scan line (don't modify)
|
; 40:60 byte Cursor ending (bottom) scan line (don't modify)
|
||||||
; 40:62 byte Active display page number
|
; 40:61 byte Cursor starting (top) scan line (don't modify)
|
||||||
; 40:63 word Base port address for active 6845 CRT controller 3B4h = mono, 3D4h = color
|
; 40:62 byte Active display page number
|
||||||
; 40:65 byte 6845 CRT mode control register value (port 3x8h) ; EGA/VGA values emulate those of the MDA/CGA
|
; 40:63 word Base port address for active 6845 CRT controller 3B4h = mono, 3D4h = color
|
||||||
; 40:66 byte CGA current color palette mask setting (port 3d9h) ; EGA and VGA values emulate the CGA
|
; 40:65 byte 6845 CRT mode control register value (port 3x8h) ; EGA/VGA values emulate those of the MDA/CGA
|
||||||
|
; 40:66 byte CGA current color palette mask setting (port 3d9h) ; EGA and VGA values emulate the CGA
|
||||||
|
|
||||||
;
|
;
|
||||||
; information relative à la souris
|
; information relative à la souris
|
||||||
|
|
@ -57,7 +55,18 @@
|
||||||
%define BDA_MOUSE_BUFFER 0x0000 ; dword; buffer (jusqu'à 4 octets)
|
%define BDA_MOUSE_BUFFER 0x0000 ; dword; buffer (jusqu'à 4 octets)
|
||||||
%define BDA_MOUSE_IDX 0x0004 ; byte 0..3
|
%define BDA_MOUSE_IDX 0x0004 ; byte 0..3
|
||||||
%define DBA_MOUSE_PACKETLEN 0x0005
|
%define DBA_MOUSE_PACKETLEN 0x0005
|
||||||
; 0x0006
|
%define DBA_CURSOR_MASK 0x0006 ; byte pixels mask (bit per pixel)
|
||||||
%define BDA_MOUSE_STATUS 0x0007 ; byte
|
%define BDA_MOUSE_STATUS 0x0007 ; byte
|
||||||
%define BDA_MOUSE_X 0x0008 ; word
|
%define BDA_MOUSE_X 0x0008 ; word
|
||||||
%define BDA_MOUSE_Y 0x000A ; word
|
%define BDA_MOUSE_Y 0x000A ; word
|
||||||
|
%define BDA_MOUSE_WHEEL 0x000C ; word
|
||||||
|
|
||||||
|
%define BDA_CURSOR_VISIBLE 0x000E ; byte (0/1)
|
||||||
|
%define BDA_CURSOR_OLDX 0x000F ; word
|
||||||
|
%define BDA_CURSOR_OLDY 0x0011 ; word
|
||||||
|
%define BDA_CURSOR_NEWX 0x0013 ; word
|
||||||
|
%define BDA_CURSOR_NEWY 0x0015 ; word
|
||||||
|
%define BDA_CURSOR_BITOFF 0x0017 ; byte 0..7 bits d'offset (x&7)
|
||||||
|
%define BDA_CURSOR_BYTES 0x0019 ; byte 2 ou 3 bytes as source for cursor image
|
||||||
|
%define BDA_CURSOR_SAVED 0x001A ; flag if image saved
|
||||||
|
%define BDA_CURSOR_BG 0x001B ; 48 bytes max (3*16)
|
||||||
|
|
|
||||||
43
src/boot.asm
43
src/boot.asm
|
|
@ -2,7 +2,6 @@
|
||||||
; Project : Custom BIOS / ROM
|
; Project : Custom BIOS / ROM
|
||||||
; File : boot.asm
|
; File : boot.asm
|
||||||
; Author : frater
|
; Author : frater
|
||||||
; Created : 06 jan 2026
|
|
||||||
;
|
;
|
||||||
; License : GNU General Public License v3.0 or later (GPL-3.0+)
|
; License : GNU General Public License v3.0 or later (GPL-3.0+)
|
||||||
;
|
;
|
||||||
|
|
@ -32,7 +31,7 @@ org 0
|
||||||
%define DEBUG_PORT 0xe9 ; 0x402 ou 0xe9
|
%define DEBUG_PORT 0xe9 ; 0x402 ou 0xe9
|
||||||
|
|
||||||
|
|
||||||
; initial stack
|
; initial stack
|
||||||
%define STACK_SEG 0x0030 ; compatible avec le BMM (Bios Memory Maps)
|
%define STACK_SEG 0x0030 ; compatible avec le BMM (Bios Memory Maps)
|
||||||
%define STACK_TOP 0x0100 ; choix commun en RAM basse (pile descendante)
|
%define STACK_TOP 0x0100 ; choix commun en RAM basse (pile descendante)
|
||||||
|
|
||||||
|
|
@ -45,12 +44,14 @@ org 0
|
||||||
jmp reset ; ce jump n'est pas sensé être executer, il est présent uniquement pour le debug
|
jmp reset ; ce jump n'est pas sensé être executer, il est présent uniquement pour le debug
|
||||||
|
|
||||||
; definition du BDA
|
; definition du BDA
|
||||||
%include ".\bda.asm"
|
%include "./bda.asm"
|
||||||
|
|
||||||
%include ".\drivers\debug.asm"
|
%include "./services/macros.asm"
|
||||||
%include ".\drivers\gfx_cgam.asm"
|
|
||||||
%include ".\drivers\mouse_ps2.asm"
|
%include "./drivers/debug.asm"
|
||||||
%include ".\services\generic.asm"
|
%include "./drivers/gfx_cgam.asm"
|
||||||
|
%include "./drivers/mouse_ps2.asm"
|
||||||
|
%include "./services/generic.asm"
|
||||||
|
|
||||||
err_vganok db 'VGA Not Initialized',0
|
err_vganok db 'VGA Not Initialized',0
|
||||||
err_end db 'code completed successfully',0
|
err_end db 'code completed successfully',0
|
||||||
|
|
@ -61,27 +62,29 @@ reset:
|
||||||
mov ax, STACK_SEG
|
mov ax, STACK_SEG
|
||||||
mov ss, ax
|
mov ss, ax
|
||||||
mov sp, STACK_TOP ; haut du segment, mot-aligné
|
mov sp, STACK_TOP ; haut du segment, mot-aligné
|
||||||
|
|
||||||
; detection de la mémoire totale
|
; detection de la mémoire totale
|
||||||
call setup_ram
|
call ram_setup
|
||||||
; modification du stack en "haut" de la RAM
|
; modification du stack en "haut" de la RAM
|
||||||
mov ax, dx
|
mov ax, dx
|
||||||
sub ax, 0x0400 ; réserver les 16 dernier KB
|
sub ax, 0x0400 ; réserver les 16 dernier KB
|
||||||
mov ss, ax
|
mov ss, ax
|
||||||
mov sp, 0x1000 ; sommet de pile
|
mov sp, 0x1000 ; sommet de pile
|
||||||
|
|
||||||
; installé une table d'interruption "dummy"
|
; installé une table d'interruption "dummy"
|
||||||
call setup_ivt
|
call ivt_setup
|
||||||
sti
|
sti
|
||||||
|
|
||||||
; load other Rom
|
; load other Rom
|
||||||
call setup_load_rom
|
call setup_load_rom
|
||||||
|
|
||||||
; on vérifie que le BIOS VGA a installer l'INT 10h
|
; on vérifie que le BIOS VGA a installer l'INT 10h
|
||||||
call setup_check_vga
|
call setup_check_vga
|
||||||
|
|
||||||
|
; on active le mode graphique
|
||||||
call gfx_init
|
call gfx_init
|
||||||
|
|
||||||
|
; test a line
|
||||||
mov cx,50
|
mov cx,50
|
||||||
.bcl: ; mov dx,cx
|
.bcl: ; mov dx,cx
|
||||||
mov bl,0
|
mov bl,0
|
||||||
|
|
@ -91,16 +94,16 @@ reset:
|
||||||
inc cx
|
inc cx
|
||||||
cmp cx,150
|
cmp cx,150
|
||||||
jle .bcl
|
jle .bcl
|
||||||
|
|
||||||
call mouse_init
|
call mouse_init
|
||||||
|
|
||||||
mov ax,cs
|
mov ax,cs
|
||||||
mov ds,ax
|
mov ds,ax
|
||||||
|
|
||||||
mov si, err_end
|
mov si, err_end
|
||||||
call debug_puts
|
call debug_puts
|
||||||
|
|
||||||
endless: hlt
|
endless: nop
|
||||||
jmp endless
|
jmp endless
|
||||||
|
|
||||||
; ------------------------------------------------------------------
|
; ------------------------------------------------------------------
|
||||||
|
|
@ -113,6 +116,6 @@ times 0xFFF0 - ($ - $$) db 0xFF
|
||||||
; ------------------------------------------------------------------
|
; ------------------------------------------------------------------
|
||||||
reset_vector:
|
reset_vector:
|
||||||
jmp far 0xF000:reset
|
jmp far 0xF000:reset
|
||||||
; filling
|
; filling
|
||||||
builddate db '06/01/2026',0
|
builddate db '06/01/2026',0
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -2,7 +2,6 @@
|
||||||
; Project : Custom BIOS / ROM
|
; Project : Custom BIOS / ROM
|
||||||
; File : gfx_cgam.asm
|
; File : gfx_cgam.asm
|
||||||
; Author : frater
|
; Author : frater
|
||||||
; Created : 06 jan 2026
|
|
||||||
;
|
;
|
||||||
; License : GNU General Public License v3.0 or later (GPL-3.0+)
|
; License : GNU General Public License v3.0 or later (GPL-3.0+)
|
||||||
;
|
;
|
||||||
|
|
@ -32,11 +31,10 @@
|
||||||
|
|
||||||
%define CGA_STRIDE 80
|
%define CGA_STRIDE 80
|
||||||
%define CGA_ODD_BANK 0x2000
|
%define CGA_ODD_BANK 0x2000
|
||||||
%define BG16_SIZE 48
|
|
||||||
|
|
||||||
; ------------------------------------------------------------
|
; ------------------------------------------------------------
|
||||||
; initialise le mode graphique (via l'int 10h)
|
; initialise le mode graphique (via l'int 10h)
|
||||||
;
|
;
|
||||||
; ce mode est entrelacé, un bit/pixel, 8 pixels par octet
|
; ce mode est entrelacé, un bit/pixel, 8 pixels par octet
|
||||||
; ------------------------------------------------------------
|
; ------------------------------------------------------------
|
||||||
gfx_init:
|
gfx_init:
|
||||||
|
|
@ -45,59 +43,65 @@ gfx_init:
|
||||||
mov al, GFX_MODE
|
mov al, GFX_MODE
|
||||||
int 0x10
|
int 0x10
|
||||||
|
|
||||||
|
mov [BDA_CURSOR_SAVED],0 ; flag image saved
|
||||||
|
|
||||||
|
; dessine un background "check-board"
|
||||||
call gfx_background
|
call gfx_background
|
||||||
|
|
||||||
ret
|
ret
|
||||||
|
|
||||||
|
; ------------------------------------------------------------
|
||||||
|
; Calcule DI + AH=mask pour (CX=x, DX=y) en mode CGA 640x200
|
||||||
|
;
|
||||||
|
; Out: ES=VIDEO_SEG, DI=offset, AH=bitmask (0x80 >> (x&7))
|
||||||
|
; ------------------------------------------------------------
|
||||||
|
gfx_calc_addr:
|
||||||
|
; calcul de l'offset 'y':
|
||||||
|
; si y est impaire, DI+=0x2000
|
||||||
|
; DI = (y>>1)*80 + (x>>3) + (y&1)*0x2000
|
||||||
|
mov ax, dx
|
||||||
|
shr ax, 1 ; ax = y/2
|
||||||
|
|
||||||
|
mov di, ax
|
||||||
|
shl di, 4 ; (y/2)*16
|
||||||
|
shl ax, 6 ; (y/2)*64
|
||||||
|
add di, ax ; *80
|
||||||
|
|
||||||
|
mov ax, cx
|
||||||
|
shr ax, 3
|
||||||
|
add di, ax
|
||||||
|
|
||||||
|
test dl, 1
|
||||||
|
jz .even
|
||||||
|
add di, CGA_ODD_BANK
|
||||||
|
.even:
|
||||||
|
; masque bit = 0x80 >> (x&7)
|
||||||
|
push cx
|
||||||
|
and cl, 7
|
||||||
|
mov ah, 080h
|
||||||
|
shr ah, cl
|
||||||
|
pop cx
|
||||||
|
ret
|
||||||
|
|
||||||
; ------------------------------------------------------------
|
; ------------------------------------------------------------
|
||||||
; Dessine un pixel, accès VRAM direct.
|
; Dessine un pixel, accès VRAM direct.
|
||||||
;
|
;
|
||||||
; In:
|
|
||||||
; CX = x (0..639)
|
; CX = x (0..639)
|
||||||
; DX = y (0..199)
|
; DX = y (0..199)
|
||||||
; BL = color (0=black, !=0=white)
|
; BL = color (0=black, !=0=white)
|
||||||
;
|
|
||||||
; ------------------------------------------------------------
|
; ------------------------------------------------------------
|
||||||
gfx_putpixel:
|
gfx_putpixel:
|
||||||
push ax
|
PUSH_ABCD
|
||||||
push di
|
push di
|
||||||
push es
|
push es
|
||||||
|
|
||||||
mov ax, VIDEO_SEG
|
mov ax, VIDEO_SEG
|
||||||
mov es,ax
|
mov es,ax
|
||||||
|
call gfx_calc_addr
|
||||||
; calcul de l'offset 'y':
|
|
||||||
; si y est impaire, DI+=0x2000
|
|
||||||
|
|
||||||
; DI = (y>>1)*80 + (x>>3) + (y&1)*0x2000
|
|
||||||
mov ax, dx
|
|
||||||
shr ax, 1 ; ax = y/2
|
|
||||||
|
|
||||||
mov di, ax ; di = y/2
|
|
||||||
shl di, 4 ; di = (y/2)*16
|
|
||||||
|
|
||||||
shl ax, 6 ; ax = (y/2)*64
|
|
||||||
add di, ax ; di = (y/2)*(16+64) = *80
|
|
||||||
|
|
||||||
mov ax, cx ; x
|
|
||||||
shr ax, 3 ; AX = x/8
|
|
||||||
add di, ax
|
|
||||||
|
|
||||||
; ligne paire/impaire
|
|
||||||
test dl, 1
|
|
||||||
jz .ligne_paire
|
|
||||||
add di, CGA_ODD_BANK
|
|
||||||
.ligne_paire:
|
|
||||||
|
|
||||||
; masque bit = 0x80 >> (x&7)
|
|
||||||
and cl, 7 ; cl = x&7
|
|
||||||
mov ah, 080h
|
|
||||||
shr ah, cl ; AH = bitmask
|
|
||||||
|
|
||||||
; write
|
; write
|
||||||
cmp bl, 0
|
cmp bl, 0
|
||||||
je .clear
|
je .clear
|
||||||
|
|
||||||
.set:
|
.set:
|
||||||
or byte [es:di], ah
|
or byte [es:di], ah
|
||||||
jmp .done
|
jmp .done
|
||||||
|
|
@ -109,6 +113,25 @@ gfx_putpixel:
|
||||||
.done:
|
.done:
|
||||||
pop es
|
pop es
|
||||||
pop di
|
pop di
|
||||||
|
POP_ABCD
|
||||||
|
ret
|
||||||
|
|
||||||
|
; ------------------------------------------------------------
|
||||||
|
; Lit un pixel (CX=x, DX=y)
|
||||||
|
; Out: AL=0/1
|
||||||
|
; ------------------------------------------------------------
|
||||||
|
gfx_getpixel:
|
||||||
|
push ax
|
||||||
|
push di
|
||||||
|
push es
|
||||||
|
|
||||||
|
call gfx_calc_addr
|
||||||
|
mov al, [es:di]
|
||||||
|
and al, ah
|
||||||
|
setnz al
|
||||||
|
|
||||||
|
pop es
|
||||||
|
pop di
|
||||||
pop ax
|
pop ax
|
||||||
ret
|
ret
|
||||||
|
|
||||||
|
|
@ -127,3 +150,403 @@ gfx_background:
|
||||||
mov cx,0x1000 ; 640/8/2
|
mov cx,0x1000 ; 640/8/2
|
||||||
rep stosw
|
rep stosw
|
||||||
ret
|
ret
|
||||||
|
|
||||||
|
; ------------------------------------------------------------
|
||||||
|
; Calcule les infos de l'alignement du curseur, basé sur cx=X
|
||||||
|
; il est important que DS pointe sur le BDA_MOUSE_SEG
|
||||||
|
; Out: BDA_CURSOR_BITOFF, BDA_CURSOR_BYTES
|
||||||
|
; ------------------------------------------------------------
|
||||||
|
gfx_cursor_calc_align:
|
||||||
|
mov al, cl
|
||||||
|
and al, 7 ; offset = x&7
|
||||||
|
mov [BDA_CURSOR_BITOFF], al
|
||||||
|
cmp al, 0
|
||||||
|
jne .unaligned
|
||||||
|
mov byte [BDA_CURSOR_BYTES], 2
|
||||||
|
ret
|
||||||
|
.unaligned:
|
||||||
|
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.
|
||||||
|
;
|
||||||
|
; CX = x (0..639)
|
||||||
|
; DX = y (0..199)
|
||||||
|
; BL = color (0=black, !=0=white)
|
||||||
|
; ------------------------------------------------------------
|
||||||
|
gfx_putpixel_fast:
|
||||||
|
cmp bl, 0
|
||||||
|
je .clear
|
||||||
|
.set:
|
||||||
|
or byte [es:di], ah
|
||||||
|
jmp .done
|
||||||
|
.clear:
|
||||||
|
not ah
|
||||||
|
and byte [es:di], ah
|
||||||
|
.done:
|
||||||
|
ret
|
||||||
|
|
||||||
|
; ------------------------------------------------------------
|
||||||
|
; Lit un pixel, en [ES:DI] accès VRAM direct.
|
||||||
|
;
|
||||||
|
; ------------------------------------------------------------
|
||||||
|
gfx_getpixel_fast:
|
||||||
|
mov al, [es:di]
|
||||||
|
and al, ah
|
||||||
|
setnz al
|
||||||
|
ret
|
||||||
|
|
||||||
|
; ------------------------------------------------------------
|
||||||
|
; Dessine le curseur 16x16 AND/XOR à [BDA_CURSOR_NEWX],[BDA_CURSOR_NEWY]
|
||||||
|
;
|
||||||
|
; CS:SI = base du sprite (AND[16] suivi de XOR[16] à +32 bytes)
|
||||||
|
; Uses: BDA_CURSOR_BITOFF/BDA_CURSOR_BYTES (via gfx_cursor_calc_align)
|
||||||
|
; ------------------------------------------------------------
|
||||||
|
gfx_cursor_draw:
|
||||||
|
pusha
|
||||||
|
|
||||||
|
mov ax, BDA_MOUSE_SEG
|
||||||
|
mov ds, ax
|
||||||
|
mov ax, VIDEO_SEG
|
||||||
|
mov es, ax
|
||||||
|
|
||||||
|
mov cx, [BDA_CURSOR_NEWX]
|
||||||
|
mov dx, [BDA_CURSOR_NEWY]
|
||||||
|
|
||||||
|
; calcule offset et bytes/ligne (2 ou 3)
|
||||||
|
call gfx_cursor_calc_align
|
||||||
|
mov bl, [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 dh, 8
|
||||||
|
.pair:
|
||||||
|
; ----- ligne row (bank courant) -----
|
||||||
|
push di
|
||||||
|
push si
|
||||||
|
call .draw_line ; utilise DI, row=BX
|
||||||
|
pop si
|
||||||
|
pop di
|
||||||
|
|
||||||
|
; ----- ligne row+1 (autre bank) -----
|
||||||
|
add di, bp
|
||||||
|
inc bx
|
||||||
|
push di
|
||||||
|
push si
|
||||||
|
call .draw_line
|
||||||
|
pop si
|
||||||
|
pop di
|
||||||
|
sub di, bp
|
||||||
|
|
||||||
|
; avancer de 2 lignes (dans le bank courant): +80 bytes
|
||||||
|
add di, CGA_STRIDE
|
||||||
|
|
||||||
|
inc bx
|
||||||
|
dec dh
|
||||||
|
jnz .pair
|
||||||
|
|
||||||
|
popa
|
||||||
|
ret
|
||||||
|
|
||||||
|
; ------------------------------------------------------------
|
||||||
|
; .draw_line: applique AND/XOR sur une ligne de 16 pixels à ES:DI
|
||||||
|
; row index dans BX (0..15)
|
||||||
|
; offset dans BL (0..7)
|
||||||
|
; sprite base CS:SI
|
||||||
|
; ------------------------------------------------------------
|
||||||
|
.draw_line:
|
||||||
|
push ax
|
||||||
|
push cx
|
||||||
|
push dx
|
||||||
|
push bp
|
||||||
|
push di
|
||||||
|
|
||||||
|
; charger masks de la ligne: AND = [SI + row*2], XOR = [SI + 32 + row*2]
|
||||||
|
mov ax, bx
|
||||||
|
shl ax, 1 ; row*2
|
||||||
|
|
||||||
|
push si
|
||||||
|
add si, ax
|
||||||
|
mov cx, [cs:si] ; AND mask
|
||||||
|
add si, 32
|
||||||
|
mov dx, [cs:si] ; XOR mask
|
||||||
|
pop si
|
||||||
|
|
||||||
|
; lire bytes source
|
||||||
|
mov al, [es:di] ; b0
|
||||||
|
inc di
|
||||||
|
mov ah, [es:di] ; b1
|
||||||
|
dec di
|
||||||
|
; w0 = (b0<<8)|b1 dans AX déjà
|
||||||
|
|
||||||
|
cmp bl, 0
|
||||||
|
je .aligned
|
||||||
|
|
||||||
|
; unaligned: besoin b2 et w1 = (b1<<8)|b2
|
||||||
|
add di, 2
|
||||||
|
mov dl, [es:di] ; b2
|
||||||
|
sub di, 2
|
||||||
|
mov dh, ah ; b1
|
||||||
|
; DX = w1 (b1<<8)|b2
|
||||||
|
|
||||||
|
; seg = (w0<<off) | (w1>>(8-off))
|
||||||
|
; off = BL, rshift = (8-BL)
|
||||||
|
push bx ; sauvegarde row/off
|
||||||
|
mov cl, bl
|
||||||
|
shl ax, cl ; AX = w0<<off
|
||||||
|
|
||||||
|
mov cl, 8
|
||||||
|
sub cl, bl ; cl = 8-off
|
||||||
|
shr dx, cl ; DX = w1>>(8-off)
|
||||||
|
|
||||||
|
or ax, dx ; AX = seg (16 bits alignés)
|
||||||
|
pop bx
|
||||||
|
|
||||||
|
jmp .apply_masks
|
||||||
|
|
||||||
|
.aligned:
|
||||||
|
; seg = w0 déjà dans AX
|
||||||
|
.apply_masks:
|
||||||
|
; newseg = (seg & AND) ^ XOR
|
||||||
|
and ax, cx
|
||||||
|
xor ax, dx ; AX = newseg
|
||||||
|
|
||||||
|
cmp bl, 0
|
||||||
|
je .write_aligned
|
||||||
|
|
||||||
|
; --- write unaligned: impact sur b0 (bas 8-off bits), b1 (tout), b2 (haut off bits) ---
|
||||||
|
; n = 8-off
|
||||||
|
mov cl, 8
|
||||||
|
sub cl, bl ; cl = n (1..7)
|
||||||
|
|
||||||
|
; val0 = newseg >> (8+off)
|
||||||
|
; (8+off) = 8 + BL
|
||||||
|
mov dx, ax
|
||||||
|
mov cl, bl
|
||||||
|
add cl, 8
|
||||||
|
shr dx, cl ; DL = val0 (0..(2^(8-off)-1))
|
||||||
|
|
||||||
|
; mask0 = (1<<n)-1
|
||||||
|
mov cl, 8
|
||||||
|
sub cl, bl ; cl = n
|
||||||
|
mov al, 1
|
||||||
|
shl al, cl
|
||||||
|
dec al ; AL = mask0
|
||||||
|
; b0 = (b0 & ~mask0) | val0
|
||||||
|
mov ah, [es:di] ; reload b0
|
||||||
|
not al
|
||||||
|
and ah, al
|
||||||
|
not al ; AL back to mask0
|
||||||
|
or ah, dl
|
||||||
|
mov [es:di], ah
|
||||||
|
|
||||||
|
; b1 = (newseg >> off) & 0xFF
|
||||||
|
mov dx, ax
|
||||||
|
mov cl, bl
|
||||||
|
shr dx, cl
|
||||||
|
inc di
|
||||||
|
mov [es:di], dl
|
||||||
|
dec di
|
||||||
|
|
||||||
|
; b2 high off bits = (newseg & ((1<<off)-1)) << (8-off)
|
||||||
|
; lowbits = newseg & ((1<<off)-1)
|
||||||
|
mov dx, ax
|
||||||
|
mov cl, bl
|
||||||
|
mov al, 1
|
||||||
|
shl al, cl
|
||||||
|
dec al ; AL=(1<<off)-1
|
||||||
|
and dl, al ; DL = lowbits
|
||||||
|
mov cl, 8
|
||||||
|
sub cl, bl ; cl = 8-off
|
||||||
|
shl dl, cl ; DL = bits pour b2 (dans le haut)
|
||||||
|
|
||||||
|
; mask2 = 0xFF << (8-off)
|
||||||
|
mov al, 0FFh
|
||||||
|
shl al, cl ; AL = mask2
|
||||||
|
add di, 2
|
||||||
|
mov ah, [es:di] ; b2 original
|
||||||
|
not al
|
||||||
|
and ah, al ; clear affected high bits
|
||||||
|
not al
|
||||||
|
or ah, dl
|
||||||
|
mov [es:di], ah
|
||||||
|
sub di, 2
|
||||||
|
|
||||||
|
jmp .done
|
||||||
|
|
||||||
|
.write_aligned:
|
||||||
|
; écrire 2 bytes seulement
|
||||||
|
mov [es:di], ah ; high
|
||||||
|
inc di
|
||||||
|
mov [es:di], al ; low
|
||||||
|
.done:
|
||||||
|
pop di
|
||||||
|
pop bp
|
||||||
|
pop dx
|
||||||
|
pop cx
|
||||||
|
pop ax
|
||||||
|
ret
|
||||||
|
|
|
||||||
|
|
@ -21,15 +21,13 @@
|
||||||
;
|
;
|
||||||
; =============================================================================
|
; =============================================================================
|
||||||
|
|
||||||
|
|
||||||
;
|
;
|
||||||
; controleur de souris via le i8042 (PC Classique)
|
; controleur de souris via le i8042 (PC Classique)
|
||||||
;
|
;
|
||||||
%define BDA_SEGMENT 0x0040
|
|
||||||
|
|
||||||
%define PS2_PORT_BUFFER 0x60
|
%define PS2_PORT_BUFFER 0x60
|
||||||
%define PS2_PORT_CTRL 0x64
|
%define PS2_PORT_CTRL 0x64
|
||||||
|
|
||||||
|
; commandes
|
||||||
%define MOUSE_CMD_RESET 0xFF
|
%define MOUSE_CMD_RESET 0xFF
|
||||||
%define MOUSE_CMD_DEFAULT 0xF6
|
%define MOUSE_CMD_DEFAULT 0xF6
|
||||||
%define MOUSE_EN_STREAM 0xF4
|
%define MOUSE_EN_STREAM 0xF4
|
||||||
|
|
@ -44,6 +42,9 @@
|
||||||
%define I8042_CMD_WR_CBYTE 0x60
|
%define I8042_CMD_WR_CBYTE 0x60
|
||||||
%define I8042_CMD_WRITE_AUX 0xD4
|
%define I8042_CMD_WRITE_AUX 0xD4
|
||||||
|
|
||||||
|
%define CURSOR_W 16
|
||||||
|
%define CURSOR_H 16
|
||||||
|
|
||||||
mouse_arrow:
|
mouse_arrow:
|
||||||
dw 1001111111111111b ; 0x9FFF
|
dw 1001111111111111b ; 0x9FFF
|
||||||
dw 1000111111111111b ; 0x8FFF
|
dw 1000111111111111b ; 0x8FFF
|
||||||
|
|
@ -79,32 +80,53 @@ mouse_arrow:
|
||||||
dw 0000000000000000b ; 0x0000
|
dw 0000000000000000b ; 0x0000
|
||||||
|
|
||||||
; ------------------------------------------------------------
|
; ------------------------------------------------------------
|
||||||
; initialise le i8042 keyboard and mouse (PS/2)
|
; remise a zero des valeurs internes du "drivers"
|
||||||
;
|
;
|
||||||
; ------------------------------------------------------------
|
; ------------------------------------------------------------
|
||||||
mouse_init:
|
mouse_reset:
|
||||||
; Activer le port souris
|
mov ax, BDA_MOUSE_SEG
|
||||||
mov ax, BDA_SEGMENT
|
|
||||||
mov ds,ax
|
mov ds,ax
|
||||||
|
|
||||||
; effacer les variables du drivers
|
; effacer les variables du drivers
|
||||||
mov [BDA_MOUSE_IDX],0
|
mov [BDA_MOUSE_IDX],0
|
||||||
mov dword [BDA_MOUSE_BUFFER],0
|
mov dword [BDA_MOUSE_BUFFER],0
|
||||||
mov byte [DBA_MOUSE_PACKETLEN],3
|
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
|
||||||
|
|
||||||
|
; experiemntal
|
||||||
|
mov word [BDA_MOUSE_WHEEL],0
|
||||||
|
ret
|
||||||
|
|
||||||
|
|
||||||
|
; ------------------------------------------------------------
|
||||||
|
; initialise le i8042 keyboard and mouse (PS/2)
|
||||||
|
;
|
||||||
|
; on envoit les commandes RESET/DEFAULT/STREAM
|
||||||
|
; ------------------------------------------------------------
|
||||||
|
mouse_init:
|
||||||
|
push ds
|
||||||
|
push ax
|
||||||
|
|
||||||
|
; reset des valeurs internes
|
||||||
|
call mouse_reset
|
||||||
|
|
||||||
|
; Activer le port souris
|
||||||
call ps2_flush_output
|
call ps2_flush_output
|
||||||
|
|
||||||
; Activer le port souris (AUX)
|
; Activer le port souris (AUX)
|
||||||
call ps2_wait_ready_write
|
call ps2_wait_ready_write
|
||||||
mov al, I8042_CMD_EN_AUX
|
mov al, I8042_CMD_EN_AUX
|
||||||
out PS2_PORT_CTRL, al
|
out PS2_PORT_CTRL, al
|
||||||
|
|
||||||
; Lire command byte
|
; Lire command byte
|
||||||
call ps2_wait_ready_write
|
call ps2_wait_ready_write
|
||||||
mov al, I8042_CMD_RD_CBYTE
|
mov al, I8042_CMD_RD_CBYTE
|
||||||
out PS2_PORT_CTRL, al
|
out PS2_PORT_CTRL, al
|
||||||
call ps2_read ; AL = command byte
|
call ps2_read ; AL = command byte
|
||||||
|
|
||||||
; Activer IRQ12 (bit 1)
|
; Activer IRQ12 (bit 1)
|
||||||
or al, 02h
|
or al, 02h
|
||||||
mov ah, al
|
mov ah, al
|
||||||
|
|
@ -119,66 +141,82 @@ mouse_init:
|
||||||
|
|
||||||
call ps2_flush_output
|
call ps2_flush_output
|
||||||
|
|
||||||
; --- RESET souris: FA, AA, ID
|
; --- Reset
|
||||||
|
; réponse attendue : 0xAA, [ID]
|
||||||
mov bl, MOUSE_CMD_RESET
|
mov bl, MOUSE_CMD_RESET
|
||||||
call mouse_sendcmd
|
call mouse_sendcmd
|
||||||
call ps2_read ; 0xAA attendu (self-test OK)
|
call ps2_read ; 0xAA attendu (self-test OK)
|
||||||
call ps2_read ; ID (souvent 0x00)
|
call ps2_read ; ID (souvent 0x00)
|
||||||
|
|
||||||
; Defaults: FA
|
; --- Default
|
||||||
mov bl, MOUSE_CMD_DEFAULT
|
mov bl, MOUSE_CMD_DEFAULT
|
||||||
call mouse_sendcmd
|
call mouse_sendcmd
|
||||||
|
|
||||||
; Enable streaming: FA
|
; --- streaming
|
||||||
mov bl, MOUSE_EN_STREAM
|
mov bl, MOUSE_EN_STREAM
|
||||||
call mouse_sendcmd
|
call mouse_sendcmd
|
||||||
|
|
||||||
; (option) détecter 3/4 bytes via F3 200/100/80 + F2
|
; détecter le packet size (3/4 bytes)
|
||||||
; call mouse_detect_packet_len
|
call mouse_detect_packet_len
|
||||||
|
|
||||||
; installer ISR IRQ12 (INT 74h)
|
; installer ISR IRQ12 (INT 74h)
|
||||||
; call mouse_install_isr
|
cli
|
||||||
|
|
||||||
|
mov si, 0x74 * 4
|
||||||
|
xor ax, ax
|
||||||
; installer le handler
|
mov ds, ax
|
||||||
|
|
||||||
|
mov word [ds:si], mouse_handler
|
||||||
|
add si, 2
|
||||||
|
mov word [ds:si], BDA_SEGMENT
|
||||||
|
|
||||||
|
sti
|
||||||
|
|
||||||
|
pop ax
|
||||||
|
pop ds
|
||||||
ret
|
ret
|
||||||
|
|
||||||
|
; ------------------------------------------------------------
|
||||||
|
; detect la taille du "payload" de la souris.
|
||||||
|
;
|
||||||
|
; On envois les commandes 200/100/
|
||||||
|
;
|
||||||
|
; ------------------------------------------------------------
|
||||||
mouse_detect_packet_len:
|
mouse_detect_packet_len:
|
||||||
mov byte [DBA_MOUSE_PACKETLEN], 3
|
mov byte [DBA_MOUSE_PACKETLEN], 3
|
||||||
|
|
||||||
; F3 200
|
; SET_RATE + 200
|
||||||
mov bl, MOUSE_SET_RATE
|
mov bl, MOUSE_SET_RATE
|
||||||
call mouse_sendcmd
|
call mouse_sendcmd
|
||||||
mov bl, 200
|
mov bl, 200
|
||||||
call mouse_sendcmd
|
call mouse_sendcmd
|
||||||
|
|
||||||
; F3 100
|
; SET_RATE + 100
|
||||||
mov bl, MOUSE_SET_RATE
|
mov bl, MOUSE_SET_RATE
|
||||||
call mouse_sendcmd
|
call mouse_sendcmd
|
||||||
mov bl, 100
|
mov bl, 100
|
||||||
call mouse_sendcmd
|
call mouse_sendcmd
|
||||||
|
|
||||||
; F3 80
|
; SET_RATE + 80
|
||||||
mov bl, MOUSE_SET_RATE
|
mov bl, MOUSE_SET_RATE
|
||||||
call mouse_sendcmd
|
call mouse_sendcmd
|
||||||
mov bl, 80
|
mov bl, 80
|
||||||
call mouse_sendcmd
|
call mouse_sendcmd
|
||||||
|
|
||||||
; F2 -> ID
|
; Get ID
|
||||||
mov bl, MOUSE_GET_ID
|
mov bl, MOUSE_GET_ID
|
||||||
call mouse_sendcmd
|
call mouse_sendcmd
|
||||||
call ps2_read ; AL = ID
|
call ps2_read ; AL = ID
|
||||||
|
|
||||||
cmp al, 03h
|
cmp al, 03h
|
||||||
je .is4
|
je .is4
|
||||||
cmp al, 04h
|
cmp al, 04h
|
||||||
je .is4
|
je .is4
|
||||||
ret
|
ret
|
||||||
.is4:
|
.is4:
|
||||||
mov byte [DBA_MOUSE_PACKETLEN], 4
|
mov byte [DBA_MOUSE_PACKETLEN], 4
|
||||||
ret
|
ret
|
||||||
|
|
||||||
; ------------------------------------------------------------
|
; ------------------------------------------------------------
|
||||||
; fonction de gestion du i8042
|
; fonction de gestion du i8042
|
||||||
;
|
;
|
||||||
|
|
@ -190,25 +228,25 @@ ps2_wait_ready_write:
|
||||||
in al, PS2_PORT_CTRL
|
in al, PS2_PORT_CTRL
|
||||||
test al, 02h ; IBF
|
test al, 02h ; IBF
|
||||||
jnz .wait
|
jnz .wait
|
||||||
ret
|
ret
|
||||||
|
|
||||||
; attendre que le 8042 soit pret a lire de l'information
|
; attendre que le 8042 soit pret a lire de l'information
|
||||||
ps2_wait_ready_read:
|
ps2_wait_ready_read:
|
||||||
.wait:
|
.wait:
|
||||||
in al, PS2_PORT_CTRL
|
in al, PS2_PORT_CTRL
|
||||||
test al, 01h ; OBF
|
test al, 01h ; OBF
|
||||||
jz .wait
|
jz .wait
|
||||||
ret
|
ret
|
||||||
|
|
||||||
; lire de l'information depuis le 8042
|
; lire de l'information depuis le 8042
|
||||||
ps2_read:
|
ps2_read:
|
||||||
call ps2_wait_ready_read
|
call ps2_wait_ready_read
|
||||||
in al, PS2_PORT_BUFFER
|
in al, PS2_PORT_BUFFER
|
||||||
ret
|
ret
|
||||||
|
|
||||||
; vide le buffer interne du 8042 (information(s) ignorée(s))
|
; vide le buffer interne du 8042 (information(s) ignorée(s))
|
||||||
ps2_flush_output:
|
ps2_flush_output:
|
||||||
.flush:
|
.flush:
|
||||||
in al, PS2_PORT_CTRL
|
in al, PS2_PORT_CTRL
|
||||||
test al, 01h
|
test al, 01h
|
||||||
jz .done
|
jz .done
|
||||||
|
|
@ -216,14 +254,12 @@ ps2_flush_output:
|
||||||
jmp .flush
|
jmp .flush
|
||||||
.done:
|
.done:
|
||||||
ret
|
ret
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
; ------------------------------------------------------------
|
; ------------------------------------------------------------
|
||||||
; envoye une commande souris
|
; envoye une commande souris et attends le ACK
|
||||||
;
|
;
|
||||||
; BL = commande souris (ou data après une commande F3)
|
; BL = commande souris (ou data après une commande F3)
|
||||||
;
|
;
|
||||||
; renvoi CF=0 si ACK, CF=1 sinon
|
; renvoi CF=0 si ACK, CF=1 sinon
|
||||||
; ------------------------------------------------------------
|
; ------------------------------------------------------------
|
||||||
mouse_sendcmd:
|
mouse_sendcmd:
|
||||||
|
|
@ -231,11 +267,11 @@ mouse_sendcmd:
|
||||||
|
|
||||||
mov al, I8042_CMD_WRITE_AUX
|
mov al, I8042_CMD_WRITE_AUX
|
||||||
out PS2_PORT_CTRL, al
|
out PS2_PORT_CTRL, al
|
||||||
|
|
||||||
call ps2_wait_ready_write
|
call ps2_wait_ready_write
|
||||||
mov al, bl
|
mov al, bl
|
||||||
out PS2_PORT_BUFFER, al
|
out PS2_PORT_BUFFER, al
|
||||||
|
|
||||||
call ps2_wait_ready_read ; AL = réponse
|
call ps2_wait_ready_read ; AL = réponse
|
||||||
cmp al, MOUSE_ACK
|
cmp al, MOUSE_ACK
|
||||||
jne .bad
|
jne .bad
|
||||||
|
|
@ -244,48 +280,75 @@ mouse_sendcmd:
|
||||||
.bad:
|
.bad:
|
||||||
stc
|
stc
|
||||||
ret
|
ret
|
||||||
|
|
||||||
; ------------------------------------------------------------
|
; ------------------------------------------------------------
|
||||||
; interrupt handler
|
; interrupt handler
|
||||||
;
|
;
|
||||||
; buffer[0] = status
|
; buffer[0] = status
|
||||||
; buffer[1] = déplacement x
|
; buffer[1] = déplacement x
|
||||||
; buffer[2] = déplacement y (inversé)
|
; buffer[2] = déplacement y (inversé)
|
||||||
;
|
; buffer[4] = molette (si PacketLen = 4)
|
||||||
|
;
|
||||||
|
; status byte :
|
||||||
|
; bit 0 = bouton gauche
|
||||||
|
; bit 1 = bouton droit
|
||||||
|
; bit 2 = bouton milieu
|
||||||
|
; bit 3 = toujours 1
|
||||||
|
; bit 4 = X sign
|
||||||
|
; bit 5 = Y sign
|
||||||
|
; bit 6 = X overflow
|
||||||
|
; bit 7 = Y overflow
|
||||||
; ------------------------------------------------------------
|
; ------------------------------------------------------------
|
||||||
mouse_handler:
|
mouse_handler:
|
||||||
push ax
|
PUSH_ABCD
|
||||||
push bx
|
|
||||||
|
|
||||||
; use BDA segment
|
|
||||||
push ds
|
push ds
|
||||||
mov ax,BDA_SEGMENT
|
|
||||||
|
; use BDA segment
|
||||||
|
mov ax,BDA_MOUSE_SEG
|
||||||
mov ds,ax
|
mov ds,ax
|
||||||
xor bx,bx
|
|
||||||
|
|
||||||
in al, PS2_PORT_BUFFER ; lire octet souris
|
in al, PS2_PORT_BUFFER ; lire octet souris
|
||||||
mov [BDA_MOUSE_BUFFER + BDA_MOUSE_IDX], al
|
mov [BDA_MOUSE_BUFFER + BDA_MOUSE_IDX], al
|
||||||
inc [BDA_MOUSE_IDX]
|
inc [BDA_MOUSE_IDX]
|
||||||
|
|
||||||
cmp [BDA_MOUSE_IDX], 3
|
mov al, [DBA_MOUSE_PACKETLEN]
|
||||||
|
cmp [BDA_MOUSE_IDX], al
|
||||||
jne .done
|
jne .done
|
||||||
|
|
||||||
mov [BDA_MOUSE_IDX], 0
|
mov [BDA_MOUSE_IDX], 0
|
||||||
; decode buffer
|
|
||||||
|
; decode buffer manuallement
|
||||||
|
mov al, [BDA_MOUSE_BUFFER]
|
||||||
|
mov [BDA_MOUSE_STATUS], al
|
||||||
|
|
||||||
mov al, [BDA_MOUSE_BUFFER+1]
|
mov al, [BDA_MOUSE_BUFFER+1]
|
||||||
cbw
|
cbw
|
||||||
add [BDA_MOUSE_X], ax
|
add [BDA_MOUSE_X], ax
|
||||||
|
|
||||||
mov al, [BDA_MOUSE_BUFFER+2]
|
mov al, [BDA_MOUSE_BUFFER+2]
|
||||||
cbw
|
cbw
|
||||||
sub [BDA_MOUSE_Y], ax
|
sub [BDA_MOUSE_Y], ax
|
||||||
|
|
||||||
|
; si packetlen = 4, gérer la molette; experimental
|
||||||
|
mov al, [BDA_MOUSE_BUFFER+3]
|
||||||
|
cbw
|
||||||
|
sub [BDA_MOUSE_WHEEL], ax
|
||||||
|
|
||||||
|
; 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
|
||||||
|
|
||||||
.done:
|
.done:
|
||||||
mov al, 0x20
|
mov al, 0x20
|
||||||
out 0xA0, al ; EOI PIC esclave
|
out 0xA0, al ; EOI PIC esclave
|
||||||
out 0x20, al ; EOI PIC maître
|
out 0x20, al ; EOI PIC maître
|
||||||
|
|
||||||
pop ds
|
pop ds
|
||||||
pop bx
|
POP_ABCD
|
||||||
pop ax
|
|
||||||
iret
|
iret
|
||||||
|
|
@ -2,7 +2,6 @@
|
||||||
; Project : Custom BIOS / ROM
|
; Project : Custom BIOS / ROM
|
||||||
; File : generic.asm
|
; File : generic.asm
|
||||||
; Author : frater
|
; Author : frater
|
||||||
; Created : 06 jan 2026
|
|
||||||
;
|
;
|
||||||
; License : GNU General Public License v3.0 or later (GPL-3.0+)
|
; License : GNU General Public License v3.0 or later (GPL-3.0+)
|
||||||
;
|
;
|
||||||
|
|
@ -23,7 +22,7 @@
|
||||||
|
|
||||||
; ---------------------------------------------------------------------------
|
; ---------------------------------------------------------------------------
|
||||||
; Détection RAM conventionnelle
|
; Détection RAM conventionnelle
|
||||||
; Teste la RAM de MEM_SEG_DEB jusqu’à 0xA000 (640KB), par pas de 1KB.
|
; Teste la RAM de MEM_SEG_DEB -> MEM_SEG_END (0xA000, 640KB), par pas de 1KB.
|
||||||
; Méthode: sauvegarde 1 mot, écrit 2 patterns, relit, restaure.
|
; Méthode: sauvegarde 1 mot, écrit 2 patterns, relit, restaure.
|
||||||
;
|
;
|
||||||
; Résultats:
|
; Résultats:
|
||||||
|
|
@ -33,9 +32,9 @@
|
||||||
; Précautions:
|
; Précautions:
|
||||||
; - Ne testez PAS une zone où se trouve votre pile / variables.
|
; - Ne testez PAS une zone où se trouve votre pile / variables.
|
||||||
; - Si votre pile est à 0000:7C00 (phys 0x7C00), commencez au moins à 0x0800.
|
; - Si votre pile est à 0000:7C00 (phys 0x7C00), commencez au moins à 0x0800.
|
||||||
; - Ne testez pas au-delà de 0xA000 (début VGA/vidéo).
|
; - Ne testez pas au-delà de MEM_SEG_END (0xA000: début VGA/vidéo).
|
||||||
; ---------------------------------------------------------------------------
|
; ---------------------------------------------------------------------------
|
||||||
setup_ram:
|
ram_setup:
|
||||||
xor ax, ax ; AX = compteur KB trouvés
|
xor ax, ax ; AX = compteur KB trouvés
|
||||||
mov dx, MEM_SEG_DEB ; DX = segment courant testé
|
mov dx, MEM_SEG_DEB ; DX = segment courant testé
|
||||||
mov cx, MEM_SEG_END ; CX = segment fin (exclu)
|
mov cx, MEM_SEG_END ; CX = segment fin (exclu)
|
||||||
|
|
@ -155,7 +154,7 @@ setup_check_vga:
|
||||||
; ---------------------------------------------------------------------------
|
; ---------------------------------------------------------------------------
|
||||||
; IVT install (8088, mode réel) - remplit les 256 vecteurs avec un handler IRET
|
; IVT install (8088, mode réel) - remplit les 256 vecteurs avec un handler IRET
|
||||||
; ---------------------------------------------------------------------------
|
; ---------------------------------------------------------------------------
|
||||||
setup_ivt:
|
ivt_setup:
|
||||||
; installation de la table d'interrupts
|
; installation de la table d'interrupts
|
||||||
xor ax, ax
|
xor ax, ax
|
||||||
mov es, ax ; ES = 0000h -> base IVT
|
mov es, ax ; ES = 0000h -> base IVT
|
||||||
|
|
@ -177,11 +176,11 @@ setup_ivt:
|
||||||
; ---------------------------------------------------------------------------
|
; ---------------------------------------------------------------------------
|
||||||
; IVT install (8088, mode réel) - installe un handler a une interrupt calculée
|
; IVT install (8088, mode réel) - installe un handler a une interrupt calculée
|
||||||
;
|
;
|
||||||
; ax = int ide
|
; ax = int id
|
||||||
; dx = segment handler
|
; dx = segment handler
|
||||||
; bx = offset handler
|
; bx = offset handler
|
||||||
; ---------------------------------------------------------------------------
|
; ---------------------------------------------------------------------------
|
||||||
setup_setvector:
|
ivt_setvector:
|
||||||
push es
|
push es
|
||||||
push di
|
push di
|
||||||
|
|
||||||
|
|
@ -192,9 +191,11 @@ setup_setvector:
|
||||||
mov es, ax ; ES = 0000h -> base IVT
|
mov es, ax ; ES = 0000h -> base IVT
|
||||||
|
|
||||||
mov ax, bx ; offset du handler
|
mov ax, bx ; offset du handler
|
||||||
|
cli
|
||||||
stosw ; write offset (AX) -> [ES:DI], DI += 2
|
stosw ; write offset (AX) -> [ES:DI], DI += 2
|
||||||
xchg ax, dx ; AX = segment, DX = offset
|
xchg ax, dx ; AX = segment, DX = offset
|
||||||
stosw ; write segment (AX) -> [ES:DI], DI += 2
|
stosw ; write segment (AX) -> [ES:DI], DI += 2
|
||||||
|
sti
|
||||||
|
|
||||||
pop di
|
pop di
|
||||||
pop es
|
pop es
|
||||||
|
|
|
||||||
45
src/services/macros.asm
Normal file
45
src/services/macros.asm
Normal file
|
|
@ -0,0 +1,45 @@
|
||||||
|
; =============================================================================
|
||||||
|
; Project : Custom BIOS / ROM
|
||||||
|
; File : macros.asm
|
||||||
|
; Author : frater
|
||||||
|
;
|
||||||
|
; License : GNU General Public License v3.0 or later (GPL-3.0+)
|
||||||
|
;
|
||||||
|
; 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
|
||||||
|
; the Free Software Foundation, either version 3 of the License, or
|
||||||
|
; (at your option) any later version.
|
||||||
|
;
|
||||||
|
; This program is distributed in the hope that it will be useful,
|
||||||
|
; but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
|
; GNU General Public License for more details.
|
||||||
|
;
|
||||||
|
; You should have received a copy of the GNU General Public License
|
||||||
|
; along with this program. If not, see <https://www.gnu.org/licenses/>.
|
||||||
|
;
|
||||||
|
; =============================================================================
|
||||||
|
|
||||||
|
%macro PUSH_ABCD 0
|
||||||
|
push ax
|
||||||
|
push bx
|
||||||
|
push cx
|
||||||
|
push dx
|
||||||
|
%endmacro
|
||||||
|
|
||||||
|
%macro PUSH_ID 0
|
||||||
|
push di
|
||||||
|
push si
|
||||||
|
%endmacro
|
||||||
|
|
||||||
|
%macro POP_ABCD 0
|
||||||
|
pop dx
|
||||||
|
pop cx
|
||||||
|
pop bx
|
||||||
|
pop ax
|
||||||
|
%endmacro
|
||||||
|
|
||||||
|
%macro POP_ID 0
|
||||||
|
pop si
|
||||||
|
pop di
|
||||||
|
%endmacro
|
||||||
Loading…
Reference in a new issue