fix init PIC + enable IRQ1 & 12 handeling

This commit is contained in:
Frater 2026-01-19 22:11:51 +01:00
commit 82724598ee
7 changed files with 438 additions and 288 deletions

View file

@ -48,7 +48,7 @@
; information relative à la souris
;
%define BDA_MOUSE_SEG 0x0050
%define BDA_DATA_SEG 0x0050
%define BDA_MOUSE_BUFFER 0x0000 ; dword; buffer (jusqu'à 4 octets)
%define BDA_MOUSE_IDX 0x0004 ; byte 0..3
@ -104,6 +104,9 @@
%define i8259_MASTER_INT 0x08
%define i8259_SLAVE_INT 0x70
%define IRQ_ENABLED 0x00
%define IRQ_DISABLED 0x01
; -----------------------------------------------------------------------------------
; bda_setup
; Initialise la BDA à zéro
@ -112,18 +115,10 @@ bda_setup:
pusha
push ds
mov ax, BDA_SEGMENT
mov ax, BDA_DATA_SEG
mov es, ax
mov ax, 0
mov cx,0xFF
xor di, di
rep stosb ; clear BDA area
mov ax, BDA_MOUSE_SEG
mov es, ax
mov ax, 0
mov ax, 0x5F
mov cx,0xFF
xor di, di
rep stosb ; clear BDA area

209
src/boot-test.asm Normal file
View file

@ -0,0 +1,209 @@
; Compilation: nasm -f bin bios.asm -o bios.bin
; Taille: 64 KB
BITS 16
section .text
org 0x0000
%define BIOS_DATA_SEG 0x0050
; ------------------------------------------------------------------
; POINT D'ENTRÉE DU BIOS (Cible du jump du reset vector)
; ------------------------------------------------------------------
start:
cli
cld
xor ax, ax
mov ds, ax
mov es, ax
mov ss, ax
mov sp, 0x7000
; Créer une table "cohérente" de handler
call setup_ivt
; Initialisation du PIC (Indispensable pour IRQ0/IRQ1)
mov al, 0x11
out 0x20, al
out 0xA0, al
mov al, 0x08 ; IRQ0-7 -> INT 08h-0Fh
out 0x21, al
mov al, 0x70 ; IRQ8-15 -> INT 70h-77h
out 0xA1, al
mov al, 0x04
out 0x21, al
mov al, 0x02
out 0xA1, al
mov al, 0x01
out 0x21, al
out 0xA1, al
; Scan et Initialisation des options ROMS (VGA BIOS, etc)
call setup_load_rom
; initialise l'écran en mode texte
mov ax,0x0003
int 0x10
; Installation des ISR
mov word [0x08*4], timer_isr
mov word [0x08*4+2], 0xF000
mov word [0x09*4], keyboard_isr
mov word [0x09*4+2], 0xF000
; Démasquer IRQ0 et IRQ1
mov al, 0xFC
out 0x21, al
sti
mov ax, BIOS_DATA_SEG
mov es, ax
mov di, 0x0 ; Adresse physique de tes variables
mov cx, 4
xor ax,ax
rep stosb ; Met 4 octets à zéro
main_loop:
mov ax,BIOS_DATA_SEG
mov fs,ax
mov al, [fs:0x00] ; Timer
mov di, 0
call draw_hex_byte
mov al, [fs:0x01] ; Clavier
mov di, 6
call draw_hex_byte
mov al, [fs:0x02] ; Clavier
mov di, 12
call draw_hex_byte
jmp main_loop
; ------------------------------------------------------------------
; HANDLERS & HELPERS
; ------------------------------------------------------------------
default_isr:
iret
timer_isr:
push ax
push gs
mov ax, BIOS_DATA_SEG
mov gs, ax
inc byte [gs:0x00]
mov al, 0x20
out 0x20, al
pop gs
pop ax
iret
keyboard_isr:
push ax
push gs
mov ax, BIOS_DATA_SEG
mov gs, ax
in al, 0x60 ; Ack clavier
mov byte [gs:0x02],al
inc byte [gs:0x01]
mov al, 0x20
out 0x20, al
pop gs
pop ax
iret
draw_hex_byte:
push ax
mov bx, 0xb800
mov es,bx
shr al, 4
call .draw_nibble
pop ax
; add di, 2
.draw_nibble:
and al, 0x0F
add al, '0'
cmp al, '9'
jbe .print
add al, 7
.print:
mov ah, 0x0F ; Blanc sur Noir
stosw
ret
; ----------------------------------------------------------------------------
; construire une table "vide" de pointeur ISR
; ----------------------------------------------------------------------------
setup_ivt:
; installation de la table d'interrupts
xor ax, ax
mov es, ax ; ES = 0000h -> base IVT
xor di, di ; DI = 0000h -> offset IVT
mov ax, default_isr ; offset du handler
mov dx, cs ; segment du handler (ROM)
mov cx, 256 ; 256 vecteurs
.fill:
stosw ; write offset (AX) -> [ES:DI], DI += 2
xchg ax, dx ; AX = segment, DX = offset
stosw ; write segment (AX) -> [ES:DI], DI += 2
xchg ax, dx ; AX = offset, DX = segment
loop .fill
; fin de la table d'interrupt
ret
; ---------------------------------------------------------------------------
; Détection les ROM supplementaires
; Teste la RAM de 0xC000 jusquà 0xE000, par pas de 2KB.
;
; Si une ROM est détectée, le code de la ROM sera appelé.
; ---------------------------------------------------------------------------
setup_load_rom:
mov bx, 0xC000
.scanloop:
mov gs, bx
cmp word[gs:0x0000],0xAA55 ; ROM signature
jne .nextblock
; appel le code (en 0x0003) de la ROM
push cs
push word .nextblock ; address de retour
push bx ; segment
push 0x0003 ; offset entry rom
retf ; call far ds:0x0003
.nextblock:
add bx, 0x80 ; add 2kb
cmp bx, 0xE000
jbe .scanloop
ret
; ------------------------------------------------------------------
; Padding jusqu'au reset vector
; ------------------------------------------------------------------
times 0xFFF0 - ($ - $$) db 0xFF
reset_vector:
jmp 0xF000:start
db '06/01/2026'
db 0 ; le stub tient dans 16 octets (ou moins)

View file

@ -29,26 +29,19 @@ bits 16
%define DEBUG_PORT 0xe9 ; 0x402 ou 0xe9
; initial stack
%define STACK_SEG 0x0030 ; compatible avec le BMM (Bios Memory Maps)
%define STACK_TOP 0x0100 ; choix commun en RAM basse (pile descendante)
%define MEM_SEG_DEB 0x0800 ; 0x0800:0000 = 0x8000 (32KB) évite IVT/BDA + stack 7C00
%define MEM_SEG_END 0xA000 ; 0xA000:0000 = 0xA0000 (début zone vidéo)
%define MEM_SEG_STEP 0x0040 ; 1KB = 0x400 bytes = 0x40 paragraphs
%define STACK_SEG 0x1000 ; segment de base
section .text
bits 16
jmp reset ; ce jump n'est pas sensé être executer, il est présent uniquement pour le debug
; definition du BDA
%include "./bda.asm"
%include "./services/macros.asm"
; %include "./services/macros.asm"
%include "./drivers/debug.asm"
%include "./drivers/gfx_cgam.asm"
;%include "./drivers/mouse_ps2.asm"
;%include "./drivers/keyboard_ps2.asm"
%include "./drivers/mouse_ps2.asm"
%include "./drivers/keyboard_ps2.asm"
%include "./services/generic.asm"
err_vganok db 'VGA Not Initialized',0
@ -56,27 +49,29 @@ err_vganok db 'VGA Not Initialized',0
reset:
cli
cld
; il n'existe aucun 'stack' par défaut
mov ax, STACK_SEG
mov ss, ax
mov sp, STACK_TOP ; haut du segment, mot-aligné
; detection de la mémoire totale
call ram_setup
sti
; modification du stack en "haut" de la RAM
mov ax, dx
sub ax, 0x0400 ; réserver les 16 dernier KB
mov ss, ax
mov sp, 0x1000 ; sommet de pile
; initialisation du BDA
call bda_setup
mov sp, 0xFFFE ; haut du segment (64ko de stack), mot-aligné
; installé une table d'interruption "dummy"
call ivt_setup
call bda_setup
; test IRQ 0
mov ax,cs
mov dx,ax
mov bx,test_isr
mov ax,i8259_MASTER_INT
call ivt_setvector
; initialisation des PIC 8259A
call pic_init
; load Roms
call setup_load_rom
@ -87,18 +82,13 @@ reset:
mov ax, 0x0003
int 10h
cli
; initialisation des PIC 8259A
call pic_init
; call kbd_init
; enable IRQ 0
mov ah,IRQ_ENABLED
mov al,0
call pic_set_irq_mask
; test IRQ 0
mov ax,cs
mov dx,ax
mov bx,test_isr
mov ax,i8259_MASTER_INT
call kbd_init
call ivt_setvector
sti
@ -106,18 +96,11 @@ reset:
; call gfx_init
;call mouse_reset
;call mouse_init
call mouse_init
endless:
mov ax,0x0050
mov ax,BDA_DATA_SEG
mov ds,ax
; in al, 0x64
; test al, 1 ; OBF
; jz .no
; in al, 0x60 ; scancode dans AL
; mov byte [0x0001],al
;.no:
mov dx,0
call scr_gotoxy
@ -153,21 +136,22 @@ endless:
; Keyboard ISR (IRQ -> INT)
; -----------------------------------------------------------
test_isr:
pusha
push ds
push ax
push fs
mov ax,0x0050
mov ds,ax
inc byte [0x0005]
mov ax,BDA_DATA_SEG
mov fs,ax
inc byte [fs:0x000F]
inc byte [fs:0x0005]
mov al, PIC_EOI ; EOI master
out i8259_MASTER_CMD, al
pop ds
popa
pop fs
pop ax
iret
; ------------------------------------------------------------------
; Padding jusqu'au reset vector
; ------------------------------------------------------------------
@ -184,6 +168,6 @@ reset_vector:
; code minimal au reset
jmp 0xF000:reset
builddate db '06/01/2026'
times 16-($-$$) db 0 ; le stub tient dans 16 octets (ou moins)
times 16-($-$$) db 0 ; le stub tient dans 16 octets (ou moins)

View file

@ -91,7 +91,7 @@ gfx_calc_addr:
; BL = color (0=black, !=0=white)
; ------------------------------------------------------------
gfx_putpixel:
PUSH_ABCD
pusha
push di
push es
@ -113,7 +113,7 @@ gfx_putpixel:
.done:
pop es
pop di
POP_ABCD
popa
ret
; ------------------------------------------------------------
@ -206,7 +206,7 @@ gfx_getpixel_fast:
gfx_cursor_draw:
pusha
mov ax, BDA_MOUSE_SEG
mov ax, BDA_DATA_SEG
mov ds, ax
mov ax, VIDEO_SEG
mov es, ax
@ -411,7 +411,7 @@ gfx_cursor_draw:
gfx_cursor_savebg:
pusha ; sauvegarde registres
mov ax, BDA_MOUSE_SEG
mov ax, BDA_DATA_SEG
mov ds, ax
mov ax, VIDEO_SEG
@ -491,7 +491,7 @@ gfx_cursor_savebg:
gfx_cursor_restorebg:
pusha ; sauvegarde registres
mov ax, BDA_MOUSE_SEG
mov ax, BDA_DATA_SEG
mov ds, ax
mov ax, VIDEO_SEG

View file

@ -21,50 +21,21 @@
;
; =============================================================================
kbc_wait_in_empty:
in al, i8042_PS2_CTRL
test al, 0x02 ; IBF
jnz kbc_wait_in_empty
ret
kbc_wait_out_full:
in al, i8042_PS2_CTRL
test al, 0x01 ; OBF
jz kbc_wait_out_full
ret
kbc_flush_output:
in al, i8042_PS2_CTRL
test al, 0x01 ; OBF ?
kbd_flush:
in al, 0x64 ; Lire le Status Register
test al, 1 ; Est-ce qu'il y a une donnée (Output Buffer Full) ?
jz .done
in al, i8042_PS2_DATA; jette la donnée
jmp kbc_flush_output
in al, 0x60 ; Lire et ignorer la donnée
jmp kbd_flush
.done:
ret
kbc_read_cmdbyte:
call kbc_wait_in_empty
mov al, 0x20
out i8042_PS2_CTRL, al
call kbc_wait_out_full
in al, i8042_PS2_DATA
ret
kbc_write_cmdbyte:
; entrée: AL = nouveau command byte
push ax
call kbc_wait_in_empty
mov al, 0x60
out i8042_PS2_CTRL, al
call kbc_wait_in_empty
pop ax
out i8042_PS2_DATA, al
ret
kbd_init:
push ds
push ax
call kbd_flush
; gestion du buffer clavier
mov ax, BDA_SEGMENT
mov ds, ax
@ -72,55 +43,19 @@ kbd_init:
mov byte [BDA_KBD_TAIL], 0
mov byte [BDA_KBD_FLAGS], 0
cli
mov ax,cs
mov dx,ax
mov bx,kbd_isr
; call kbc_wait_in_empty
; mov al, 0x20
; out i8042_PS2_CTRL, al
;
; call kbc_wait_out_full
; in al, i8042_PS2_DATA ; AL = command byte
;
; or al, 0x01 ; bit0: enable IRQ1
; and al, 0xEF ; bit4: 0 = keyboard enabled
;
; mov ah, al ; save new cmd byte
;
; ; write command byte
; call kbc_wait_in_empty
; mov al, 0x60
; out i8042_PS2_CTRL, al
;
; call kbc_wait_in_empty
; mov al, ah
; out i8042_PS2_DATA, al
;
; ; unmask IRQ1 & IRQ2 (master bit 1 & 2 = 0) bit 1 = IRQ 1
; in al, i8259_MASTER_DATA
; and al, 0xF9 ; 11111001b
; out i8259_MASTER_DATA, al
; setup Interrupt Table
; installer IRQ1 : MASTER_OFFSET + 1
mov ax, i8259_MASTER_INT ; base offset IRQ0
inc ax ; IRQ 1
shl ax,2 ; vect * 4
mov si, ax
xor ax, ax ; segment 0x0000
mov ds, ax
mov word [ds:si], kbd_isr
mov ax, cs
mov word [ds:si+2], ax
call ivt_setvector
mov si, 0x09*4
xor ax, ax
mov ds, ax
mov word [ds:si], kbd_isr
mov ax, cs
mov word [ds:si+2], ax
sti
; enable IRQ 1
mov ah,IRQ_ENABLED
mov al,1
call pic_set_irq_mask
pop ax
pop ds
@ -135,7 +70,7 @@ kbd_isr:
in al, 0x60 ; consomme scancode (obligatoire)
mov ax,0x0050
mov ax,BDA_DATA_SEG
mov ds,ax
inc byte [0x0000]

View file

@ -34,8 +34,11 @@
%define I8042_CMD_EN_AUX 0xA8
%define I8042_CMD_RD_CBYTE 0x20
%define I8042_CMD_WR_CBYTE 0x60
%define I8042_CMD_DIS_KBD 0xAD
%define I8042_CMD_DIS_MOUSE 0xA7
%define I8042_CMD_WRITE_AUX 0xD4
%define CURSOR_W 16
%define CURSOR_H 16
@ -78,7 +81,7 @@ mouse_arrow:
;
; ------------------------------------------------------------
mouse_reset:
mov ax, BDA_MOUSE_SEG
mov ax, BDA_DATA_SEG
mov ds,ax
; effacer les variables du drivers
@ -112,8 +115,18 @@ mouse_init:
; reset des valeurs internes
call mouse_reset
; Activer le port souris
call ps2_flush_output
cli
call ps2_wait_ready_write
mov al, I8042_CMD_DIS_KBD ; Disable Keyboard
out i8042_PS2_CTRL, al
call ps2_wait_ready_write
mov al, I8042_CMD_DIS_MOUSE ; Disable Mouse
out i8042_PS2_CTRL, al
; Vider tout ce qui traîne
call ps2_flush_output
; Activer le port souris (AUX)
call ps2_wait_ready_write
@ -124,6 +137,7 @@ mouse_init:
call ps2_wait_ready_write
mov al, I8042_CMD_RD_CBYTE
out i8042_PS2_CTRL, al
call ps2_read ; AL = command byte
; Activer IRQ12 (bit 1)
@ -159,24 +173,22 @@ mouse_init:
call mouse_detect_packet_len
; installer ISR IRQ12 (INT 74h)
cli
mov si, 0x74 * 4
xor ax, ax
mov ds, ax
mov ax,cs
mov dx,ax
mov bx, isr_mouse_handler
mov word [ds:si], mouse_handler
add si, 2
mov ax, cs
mov word [ds:si], cs
mov ax, i8259_SLAVE_INT ; base offset IRQ8
add ax,4 ; IRQ 12
call ivt_setvector
; enable IRQ 1
mov ah,IRQ_ENABLED
mov al, 12
call pic_set_irq_mask
sti
mov dx, 0x00E9
mov al, '!'
out dx, al
pop ax
pop ds
ret
@ -229,10 +241,15 @@ mouse_detect_packet_len:
; attendre que le 8042 soit pret a recevoir de l'information
ps2_wait_ready_write:
push cx
mov cx, 1000
.wait:
in al, i8042_PS2_CTRL
test al, 02h ; IBF
jnz .wait
jz .ok
loop .wait
.ok:
pop cx
ret
; attendre que le 8042 soit pret a lire de l'information
@ -304,38 +321,19 @@ mouse_sendcmd:
; bit 6 = X overflow
; bit 7 = Y overflow
; ------------------------------------------------------------
mouse_handler:
pusha
push ds
; vider le byte qui a déclenché IRQ12
in al, i8042_PS2_DATA
mov dx, 0xE9 ; debugcon
mov al, '*'
out dx, al ; imprime directement
; EOI PIC (slave puis master)
mov al, 0x20
out 0xA0, al
out 0x20, al
pop ds
popa
iret
isr_mouse_handler:
; sauvegarder tout les registres
pusha
push ds
; use BDA segment
mov ax,BDA_MOUSE_SEG
mov ax,BDA_DATA_SEG
mov ds,ax
; lire un octet depuis le contrôleur
; et le stocker dans le buffer
; lire un octet depuis le contrôleur et le stocker dans le buffer
in al, i8042_PS2_DATA ; lire octet souris
mov byte [BDA_MOUSE_BUFFER + BDA_MOUSE_IDX], al
movzx bx, byte [BDA_MOUSE_IDX]
mov byte [BDA_MOUSE_BUFFER + bx], al
inc byte [BDA_MOUSE_IDX]
; vérifier si le packet est complet
@ -345,10 +343,6 @@ mouse_handler:
; packet complet, on decode les données
mov byte [BDA_MOUSE_IDX], 0
mov al,'*' ; pour debug
call debug_putc
mov al, [BDA_MOUSE_BUFFER] ; status
mov [BDA_MOUSE_STATUS], al
@ -385,17 +379,17 @@ mouse_handler:
mov word [BDA_MOUSE_Y], 199
.y_ok_high:
; restaurer l'ancien arrière plan du curseur
call gfx_cursor_restorebg
;call gfx_cursor_restorebg
; sauvegarder le nouvel arrière plan du curseur
call gfx_cursor_savebg
;call gfx_cursor_savebg
call gfx_cursor_draw
;call gfx_cursor_draw
.done:
mov al, 0x20
out 0xA0, al ; EOI PIC esclave
out 0x20, al ; EOI PIC maître
out i8259_SLAVE_CMD, al ; EOI PIC esclave
out i8259_MASTER_CMD, al ; EOI PIC maître
; restaurer tous les registres
pop ds

View file

@ -20,7 +20,9 @@
;
; =============================================================================
%define MEM_SEG_DEB 0x0800 ; 0x0800:0000 = 0x8000 (32KB) évite IVT/BDA + stack 7C00
%define MEM_SEG_END 0xA000 ; 0xA000:0000 = 0xA0000 (début zone vidéo)
%define MEM_SEG_STEP 0x0040 ; 1KB = 0x400 bytes = 0x40 paragraphs
; ---------------------------------------------------------------------------
; Détection RAM conventionnelle
@ -70,7 +72,7 @@ ram_setup:
.fail_restore:
; restaurer avant de sortir
mov [es:di], bx
mov [es:di], bx
.done:
; AX contient le nb de KB valides *à partir de MEM_SEG_DEB*.
@ -87,7 +89,7 @@ ram_setup:
mov bx, BDA_SEGMENT
mov ds, bx
mov [BDA_INFO_MEM_SIZE], ax
mov [BDA_INFO_MEM_SEG],dx
mov [BDA_INFO_MEM_SEG], dx
ret
@ -98,27 +100,23 @@ ram_setup:
; Si une ROM est détectée, le code de la ROM sera appelé.
; ---------------------------------------------------------------------------
setup_load_rom:
mov bx, 0xC000
mov bx, 0xC000
.scanloop:
mov ds, bx
cmp word[0x0000],0xAA55 ; ROM signature
jne .norom
; Debug
mov al,'.'
call debug_putc
mov ds, bx
cmp word[0x0000],0xAA55 ; ROM signature
jne .norom
; appel le code (en 0x0003) de la ROM
push cs
push word .norom ; address de retour
push cs
push word .norom ; address de retour
push ds
push 0x0003
push ds
push 0x0003
retf ; call far ds:0x0003
.norom:
add bx, 0x80 ; add 2kb
cmp bx, 0xE000
jbe .scanloop
add bx, 0x80 ; add 2kb
cmp bx, 0xE000
jbe .scanloop
.end:
ret
@ -130,25 +128,22 @@ setup_load_rom:
; ---------------------------------------------------------------------------
setup_check_vga:
; vérification de l'offset 0x0000:0x0040 qui DOIT etre différent de @default_isr
xor ax,ax
mov es,ax
xor ax,ax
mov es,ax
; Lire INT10: offset+segment depuis 0000:0040
mov bx, [es:0x0040] ; BX = offset INT10
mov cx, [es:0x0042] ; CX = segment INT10
mov ax, cs
mov bx, [es:0x0040] ; BX = offset INT10
mov cx, [es:0x0042] ; CX = segment INT10
mov ax, cs
; Comparer avec default_isr (offset) et CS (segment)
mov dx, default_isr ; DX = offset default_isr (dans notre CS)
cmp bx, dx
jne .init_ok ; vecteur different, bios initialisé
cmp cx, ax
jne .init_ok
mov dx, default_isr ; DX = offset default_isr (dans notre CS)
cmp bx, dx
jne .init_ok ; vecteur different, bios initialisé
cmp cx, ax
jne .init_ok
mov ax,cs ; vecteur identique, sans doute pas d'initialisation
mov ds,ax
mov si, err_vganok
call debug_puts
mov ax,cs ; vecteur identique, sans doute pas d'initialisation
mov ds,ax
.init_ok:
ret
@ -158,20 +153,20 @@ setup_check_vga:
; ---------------------------------------------------------------------------
ivt_setup:
; installation de la table d'interrupts
xor ax, ax
mov es, ax ; ES = 0000h -> base IVT
xor di, di ; DI = 0000h -> offset IVT
xor ax, ax
mov es, ax ; ES = 0000h -> base IVT
xor di, di ; DI = 0000h -> offset IVT
mov ax, default_isr ; offset du handler
mov dx, cs ; segment du handler (ROM)
mov ax, default_isr ; offset du handler
mov dx, cs ; segment du handler (ROM)
mov cx, 256 ; 256 vecteurs
mov cx, 256 ; 256 vecteurs
.fill:
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
xchg ax, dx ; AX = offset, DX = segment
loop .fill
xchg ax, dx ; AX = offset, DX = segment
loop .fill
; fin de la table d'interrupt
ret
@ -183,29 +178,29 @@ ivt_setup:
; bx = offset handler
; ---------------------------------------------------------------------------
ivt_setvector:
push es
push di
push es
push di
shl ax,2 ; ax=id *4
mov di,ax
shl ax,2 ; ax=id *4
mov di,ax
xor ax,ax
mov es, ax ; ES = 0000h -> base IVT
xor ax,ax
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
xchg ax, dx ; AX = segment, DX = offset
xchg ax, dx ; AX = segment, DX = offset
stosw ; write segment (AX) -> [ES:DI], DI += 2
sti
pop di
pop es
pop di
pop es
ret
io_wait:
xor al,al
out 0x80,al
xor al,al
out 0x80,al
ret
; ---------------------------------------------------------------------------
@ -216,52 +211,90 @@ io_wait:
; https://wiki.nox-rhea.org/back2root/ibm-pc-ms-dos/hardware/8259
; ---------------------------------------------------------------------------
pic_init:
push ax
cli
push ax
; force un End Of Interrupt sur les 2 PIC
mov al, 0x20
out i8259_SLAVE_CMD, al ; EOI PIC esclave
out i8259_MASTER_CMD, al ; EOI PIC maître
; starts the initialization sequence (in cascade mode)
mov al, ICW1_INIT | ICW1_ICW4
out i8259_MASTER_CMD, al
call io_wait
mov al, ICW1_INIT | ICW1_ICW4
out i8259_MASTER_CMD, al
out i8259_SLAVE_CMD, al
mov al, ICW1_INIT | ICW1_ICW4
out i8259_SLAVE_CMD, al
call io_wait
mov al, i8259_MASTER_INT
out i8259_MASTER_DATA, al ; ICW2: Master PIC vector offset
call io_wait
mov al, i8259_SLAVE_INT
out i8259_SLAVE_DATA, al ; ICW2: Slave PIC vector offset
call io_wait
mov al, i8259_MASTER_INT
out i8259_MASTER_DATA, al ; ICW2: Master PIC vector offset
mov al, i8259_SLAVE_INT
out i8259_SLAVE_DATA, al ; ICW2: Slave PIC vector offset
; Master: cascade (IRQ2 => 1 << IRQ2 = 0x04)
mov al, 0x04 ; master: slave on IRQ2: 0100b
out i8259_MASTER_DATA, al ; ICW3: tell Master PIC that there is a slave PIC at IRQ2
call io_wait
mov al, 0x04 ; master: slave on IRQ2: 0100b
out i8259_MASTER_DATA, al ; ICW3: tell Master PIC that there is a slave PIC at IRQ2
; Slave: numéro de ligne sur master (2)
mov al, 0x02 ; slave: cascade identity 2
out i8259_SLAVE_DATA, al ; ICW3: tell Slave PIC its cascade identity (0000 0010)
call io_wait
mov al, 0x02 ; slave: cascade identity 2
out i8259_SLAVE_DATA, al ; ICW3: tell Slave PIC its cascade identity (0000 0010)
; ICW4: 8086 mode
mov al, ICW4_8086
out i8259_MASTER_DATA, al
call io_wait
mov al, ICW4_8086
out i8259_MASTER_DATA, al
out i8259_SLAVE_DATA, al
mov al, ICW4_8086
out i8259_SLAVE_DATA, al
call io_wait
; Unmask both PICs.
xor al,al
out i8259_MASTER_DATA, al
out i8259_SLAVE_DATA, al
pop ax
pop ax
ret
; ------------------------------------------------------------------
; set_irq_mask
; AH = 0 (Enable/Unmask) ou 1 (Disable/Mask)
; AL = Numéro de l'IRQ (0 à 15)
; ------------------------------------------------------------------
pic_set_irq_mask:
push bx
push cx
push dx
push ax ; Sauvegarde AX pour récupérer AH plus tard
mov cl, al ; CL = numéro d'IRQ
; Par défaut, PIC Maître (Data port)
mov dx, i8259_MASTER_DATA
cmp cl, 8
jl .is_master
; Si IRQ >= 8, on passe sur le PIC Esclave
sub cl, 8 ; Ajuste l'index du bit (8-15 -> 0-7)
; Port Data du PIC Esclave
mov dx, i8259_SLAVE_DATA
.is_master:
; Préparation du masque de bit
mov bl, 1
shl bl, cl ; BL contient maintenant le bit correspondant (ex: IRQ 3 -> 00001000)
in al, dx ; Lire l'IMR actuel depuis le port (0x21 ou 0xA1)
test ah, ah ; AH est-il à 1 (Disable) ?
jnz .do_disable
.do_enable:
not bl ; Inverser le masque (ex: 11110111)
and al, bl ; Mettre le bit à 0 (Unmask)
jmp .write_back
.do_disable:
or al, bl ; Mettre le bit à 1 (Mask)
.write_back:
out dx, al ; Écrire le nouveau masque dans l'IMR
pop ax ; Restaurer AX
pop dx
pop cx
pop bx
ret
; ---------------------------------------------------------------------------
; Handler par défaut: fait juste IRET
; IMPORTANT: doit être FAR (appelé par le CPU via IVT), et terminer par IRET