;; File: kbd.inc ;; ;; Usefull links: ;; - KBD_STATP = 0x64 KBD_ATAP = 0x60 KBS_DIB = 0x01 ;; function: kbd_probe ;; ;; Out: ;; AL - 0 if not found kbd_probe: mov al, CMOS_INSTALLED_EQUIPMENT out CMOS_COMMAND, al in al, CMOS_DATA and al, 0x4 ret kbd_init: call kbd_probe or al, al jz @f mov esi, szMsgKbdFound call klog @@: ret kbd_open: ret kbd_close: ret kbd_getc: in al, KBD_STATP and al, KBS_DIB jz @f in al, KBD_ATAP mov ah, al and ah, 0x80 jnz @f mov edx, aKbdNormalMap movzx eax, al add edx, eax mov byte al, [edx] call cga_putc @@: ret kbd_irq: pusha mov al, PIC_EOI out PIC1_COMMAND, al call kbd_getc popa iret szMsgKbdFound db "KBD: found", 0 aKbdNormalMap: db 0, 0x1B, '1', '2', '3', '4', '5', '6', '7', '8', '9', '0' db '-', '=', 0x08, 0x09, 'q', 'w', 'e', 'r', 't', 'y', 'u', 'i' db 'o', 'p', '[', ']', LF, 0, 'a', 's', 'd', 'f', 'g', 'h' db 'j', 'k', 'l', ';', "'", '`', 0, '\', 'z', 'x', 'c', 'v' db 'b', 'n', 'm', ',', '.', '/', 0, '*', 0, ' ', 0, 0 db 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, '7' db '8', '9', '-', '4', '5', '6', '+', '1', '2', '3', '0', '.' db 0, 0, 0, 0, 0, 0, 0, 0 kbd_device: db 'kbd', 0, 0, 0, 0, 0 dd kbd_init kbd_cdevws: dd 0 dd 0 dd 0