forked from KolibriOS/kolibrios
224 lines
5.1 KiB
PHP
224 lines
5.1 KiB
PHP
|
;// mike.dld [
|
||
|
|
|
||
|
|
VKEY_LSHIFT = 0000000000000001b
|
||
|
|
VKEY_RSHIFT = 0000000000000010b
|
||
|
|
VKEY_LCONTROL = 0000000000000100b
|
||
|
|
VKEY_RCONTROL = 0000000000001000b
|
||
|
|
VKEY_LALT = 0000000000010000b
|
||
|
|
VKEY_RALT = 0000000000100000b
|
||
|
|
VKEY_CAPSLOCK = 0000000001000000b
|
||
|
|
VKEY_NUMLOCK = 0000000010000000b
|
||
|
|
VKEY_SCRLOCK = 0000000100000000b
|
||
|
|
|
||
|
|
VKEY_SHIFT = 0000000000000011b
|
||
|
|
VKEY_CONTROL = 0000000000001100b
|
||
|
|
VKEY_ALT = 0000000000110000b
|
||
|
|
|
||
|
|
uglobal
|
||
|
|
align 4
|
||
|
|
kb_state dd 0
|
||
|
|
ext_code db 0
|
||
|
|
|
||
|
|
keyboard_mode db 0
|
||
|
|
keyboard_data db 0
|
||
|
|
|
||
|
|
altmouseb db 0
|
||
|
|
ctrl_alt_del db 0
|
||
|
|
|
||
|
|
kb_lights db 0
|
||
|
|
endg
|
||
|
|
|
||
|
|
align 4
|
||
|
|
irq1:
|
||
|
|
|
||
|
|
call restore_caller
|
||
|
|
|
||
|
|
movzx eax,word[0x3004] ; top window process
|
||
|
|
movzx eax,word[0xC400+eax*2]
|
||
|
|
shl eax,8
|
||
|
|
mov al,[0x800B4+eax]
|
||
|
|
mov [keyboard_mode],al
|
||
|
|
|
||
|
|
in al,0x60
|
||
|
|
mov [keyboard_data],al
|
||
|
|
|
||
|
|
mov ch,al
|
||
|
|
cmp al,0xE0
|
||
|
|
je @f
|
||
|
|
cmp al,0xE1
|
||
|
|
jne .normal_code
|
||
|
|
@@: mov [ext_code],al
|
||
|
|
jmp .no_key.end
|
||
|
|
.normal_code:
|
||
|
|
mov cl,[ext_code]
|
||
|
|
mov [ext_code],0
|
||
|
|
and al,0x7F
|
||
|
|
@@: cmp al,0x2A
|
||
|
|
jne @f
|
||
|
|
cmp cl,0xE0
|
||
|
|
je .no_key.end
|
||
|
|
mov eax,VKEY_LSHIFT
|
||
|
|
jmp .no_key
|
||
|
|
@@: cmp al,0x36
|
||
|
|
jne @f
|
||
|
|
cmp cl,0xE0
|
||
|
|
je .no_key.end
|
||
|
|
mov eax,VKEY_RSHIFT
|
||
|
|
jmp .no_key
|
||
|
|
@@: cmp al,0x38
|
||
|
|
jne @f
|
||
|
|
cmp cl,0xE0
|
||
|
|
je .alt.r
|
||
|
|
mov eax,VKEY_LALT
|
||
|
|
jmp .no_key
|
||
|
|
.alt.r:
|
||
|
|
mov eax,VKEY_RALT
|
||
|
|
jmp .no_key
|
||
|
|
@@: cmp al,0x1D
|
||
|
|
jne @f
|
||
|
|
cmp cl,0
|
||
|
|
jne .ctrl.r
|
||
|
|
mov eax,VKEY_LCONTROL
|
||
|
|
jmp .no_key
|
||
|
|
.ctrl.r:
|
||
|
|
cmp cl,0xE1
|
||
|
|
jne .ctrl.r.2
|
||
|
|
mov [ext_code],cl
|
||
|
|
jmp .no_key.end
|
||
|
|
.ctrl.r.2:
|
||
|
|
mov eax,VKEY_RCONTROL
|
||
|
|
jmp .no_key
|
||
|
|
@@: cmp al,0x3A
|
||
|
|
jne @f
|
||
|
|
mov bl,4
|
||
|
|
mov eax,VKEY_CAPSLOCK
|
||
|
|
jmp .no_key.xor
|
||
|
|
@@: cmp al,0x45
|
||
|
|
jne @f
|
||
|
|
cmp cl,0
|
||
|
|
jne .no_key.end
|
||
|
|
mov bl,2
|
||
|
|
mov eax,VKEY_NUMLOCK
|
||
|
|
jmp .no_key.xor
|
||
|
|
@@: cmp al,0x46
|
||
|
|
jne @f
|
||
|
|
mov bl,1
|
||
|
|
mov eax,VKEY_SCRLOCK
|
||
|
|
jmp .no_key.xor
|
||
|
|
@@:
|
||
|
|
test ch,0x80
|
||
|
|
jnz .no_key.end
|
||
|
|
movzx eax,ch ; plain key
|
||
|
|
mov bl,[keymap+eax]
|
||
|
|
mov edx,[kb_state]
|
||
|
|
test dl,VKEY_CONTROL ; ctrl alt del
|
||
|
|
jz .noctrlaltdel
|
||
|
|
test dl,VKEY_ALT
|
||
|
|
jz .noctrlaltdel
|
||
|
|
cmp bl,134+48
|
||
|
|
jne .noctrlaltdel
|
||
|
|
mov [ctrl_alt_del],1
|
||
|
|
jmp .no_key.end
|
||
|
|
.noctrlaltdel:
|
||
|
|
test dl,VKEY_CONTROL ; ctrl on ?
|
||
|
|
jz @f
|
||
|
|
sub bl,0x60
|
||
|
|
@@: test dl,VKEY_SHIFT ; shift on ?
|
||
|
|
jz @f
|
||
|
|
mov bl,[keymap_shift+eax]
|
||
|
|
@@: test dl,VKEY_ALT ; alt on ?
|
||
|
|
jz @f
|
||
|
|
mov bl,[keymap_alt+eax]
|
||
|
|
; alt mouse ?
|
||
|
|
xor edx,edx
|
||
|
|
cmp bl,178
|
||
|
|
jnz .no_alt.up
|
||
|
|
mov edx,5*65536
|
||
|
|
jmp .mouse.change
|
||
|
|
.no_alt.up:
|
||
|
|
cmp bl,177
|
||
|
|
jnz .no_alt.down
|
||
|
|
mov edx,251*65536
|
||
|
|
jmp .mouse.change
|
||
|
|
.no_alt.down:
|
||
|
|
cmp bl,176
|
||
|
|
jnz .no_alt.left
|
||
|
|
mov edx,251*256
|
||
|
|
jmp .mouse.change
|
||
|
|
.no_alt.left:
|
||
|
|
cmp bl,179
|
||
|
|
jnz .no_alt.right
|
||
|
|
mov edx,5*256
|
||
|
|
jmp .mouse.change
|
||
|
|
.no_alt.right:
|
||
|
|
cmp bl,' '
|
||
|
|
jne @f
|
||
|
|
xor [altmouseb],1
|
||
|
|
.mouse.change:
|
||
|
|
mov byte[0xF604],1; ps2 data
|
||
|
|
mov byte[0xFB00],0; ps2 chunk count
|
||
|
|
mov word[0x2E0000+4096*12],3; mouse data count
|
||
|
|
mov dl,[altmouseb]
|
||
|
|
mov [0x2E0000+4096*12+0x10],edx
|
||
|
|
mov bl,0
|
||
|
|
@@:
|
||
|
|
cmp [keyboard_mode],0 ; return from keymap
|
||
|
|
jne .no_key.end
|
||
|
|
mov [keyboard_mode_sys],0
|
||
|
|
cmp bl,0
|
||
|
|
je .no_key.end
|
||
|
|
movzx eax,byte[0xF400]
|
||
|
|
cmp al,120
|
||
|
|
jae .no_key.end
|
||
|
|
inc al
|
||
|
|
mov [0xF400],al
|
||
|
|
mov [0xF400+eax],bl
|
||
|
|
|
||
|
|
jmp .no_key.end
|
||
|
|
|
||
|
|
.no_key:
|
||
|
|
test ch,0x80
|
||
|
|
jz .no_key.down
|
||
|
|
not eax
|
||
|
|
and [kb_state],eax
|
||
|
|
jmp .no_key.end
|
||
|
|
.no_key.xor:
|
||
|
|
test ch,0x80
|
||
|
|
jnz .no_key.end
|
||
|
|
xor [kb_state],eax
|
||
|
|
xor [kb_lights],bl
|
||
|
|
call set_lights
|
||
|
|
jmp .no_key.end
|
||
|
|
.no_key.down:
|
||
|
|
or [kb_state],eax
|
||
|
|
.no_key.end:
|
||
|
|
cmp [keyboard_mode],1 ; return scancode
|
||
|
|
jne .no_scancode
|
||
|
|
mov [keyboard_mode_sys],1
|
||
|
|
movzx eax,byte[0xF400]
|
||
|
|
cmp al,120
|
||
|
|
jae .no_scancode
|
||
|
|
inc al
|
||
|
|
mov [0xF400],al
|
||
|
|
mov [0xF400+eax],ch
|
||
|
|
.no_scancode:
|
||
|
|
|
||
|
|
.exit.irq1:
|
||
|
|
mov [check_idle_semaphore],5
|
||
|
|
|
||
|
|
mov al,0x20 ; ready for next irq
|
||
|
|
out 0x20,al
|
||
|
|
|
||
|
|
call return_to_caller
|
||
|
|
|
||
|
|
jmp irq1
|
||
|
|
|
||
|
|
set_lights:
|
||
|
|
mov al,0xED
|
||
|
|
call kb_write
|
||
|
|
mov al,[kb_lights]
|
||
|
|
call kb_write
|
||
|
|
ret
|
||
|
|
|
||
|
|
;// mike.dld ]
|