kolibrios-fun/trunk/detect/commouse.inc
ha d8e9ce1559 Kolibri 5 initial checkout
git-svn-id: svn://kolibrios.org@1 a494cfbc-eb01-0410-851d-a64ba20cac60
2005-10-06 17:56:22 +00:00

122 lines
3.5 KiB
HTML
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

;**************************************************
;* ПОИСК МЫШИ ПО ПОСЛЕДОВАТЕЛЬНЫМ ПОРТАМ *
;* Процедура подготавливает глобальные переменные *
;* COMPortNum и COMPortBaseAddr для подпрограммы *
;* установки обработчика прерывания *
;**************************************************
; Автор исходного текста Кулаков Владимир Геннадьевич.
; Адаптация и доработка Mario79
MSMouseSearch:
pusha
; Запретить прерывание COM1 и COM2
cli
in AL,21h ;прочитать маску прерываний
or AL,18h ;запретить IRQ3 и IRQ4
out 21h,AL ;заменить маску
sti
; ПОИСК МЫШИ ЧЕРЕЗ COM-ПОРТЫ
MouseSearch:
; Устанавливаем скорость
; приема/передачи 1200 бод
mov DX,[COMPortBaseAddr]
add DX,3
in AL,DX
or AL,80h ;установить бит DLAB
out DX,AL
mov DX,[COMPortBaseAddr]
mov AL,60h ;1200 бод
out DX,AL
inc DX
mov AL,0
out DX,AL
; Установить длину слова 7 бит, 1 стоповый бит,
; четность не контролировать
mov DX,[COMPortBaseAddr]
add DX,3
mov AL,00000010b
out DX,AL
; Запретить все прерывания
mov DX,[COMPortBaseAddr]
inc DX
mov AL,0
out DX,AL
; Проверить, что устройство подключено и является
; мышью типа MSMouse
; Отключить питание мыши и прерывания
mov DX,[COMPortBaseAddr]
add DX,4 ;регистр управления модемом
mov AL,0 ;сбросить DTR, RTS и OUT2
out DX,AL
; Ожидать 5 "тиков" (0,2 с)
mov ecx,0xffff
dT_1:
dec ecx
cmp ecx,0
jne dT_1
mov ecx,0xffff
; Включить питание мыши
mov AL,11b ;установить DTR и RTS
out DX,AL
; Очистить регистр данных
mov DX,[COMPortBaseAddr]
in AL,DX
; Цикл опроса порта
WaitData:
; Ожидать еще 10 "тиков"
dec ecx
cmp ecx,0
je NoMouse
; Проверить наличие идентификационного байта
mov DX,[COMPortBaseAddr]
add DX,5
in AL,DX
test AL,1 ;Данные готовы?
jz WaitData
; Ввести данные
mov DX,[COMPortBaseAddr]
in AL,DX
; Устройство является мышью?
cmp AL,'M'
je EndDetect
NoMouse:
inc [COMPortNum]
cmp [COMPortNum],1
ja EndDetect
sub [COMPortBaseAddr],100h
jmp MouseSearch
iglobal
COMPortBaseAddr dw 3F8h
COMPortNum dw 0
endg
iglobal
boot_setmouse_type db 'No COM mouse, set PS2',0
db 'Detected - COM1 mouse',0
db 'Detected - COM2 mouse',0
endg
EndDetect:
cmp [COMPortNum],0 ;номер порта меньше 0?
jl ComMouseNotFound ;мышь не найдена
cmp [COMPortNum],1 ;номер порта больше 1?
ja ComMouseNotFound ;мышь не найдена
mov ax,[COMPortNum]
add al,2
jmp set_detecting_mouse
ComMouseNotFound:
mov al,1
set_detecting_mouse:
mov [0xF604],al
dec al
movzx eax,al
imul eax,22
mov esi,boot_setmouse_type
add esi,eax
call boot_log
popa