WebSVN – Kolibri OS – Diff – /kernel/branches/kolibri-process/hid/mousedrv.inc


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;                                                              ;;
;; Copyright (C) KolibriOS team 2004-2012. All rights reserved. ;;
;; Distributed under terms of the GNU General Public License    ;;
;;                                                              ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
$Revision: 3606 $
 
 
;   check mouse
;
;
;   FB00  ->   FB0F   mouse memory 00 chunk count - FB0A-B x - FB0C-D y
;   FB10  ->   FB17   mouse color mem
;   FB21              x move
;   FB22              y move
;   FB30              color temp
;   FB28              high bits temp
;   FB4A  ->   FB4D   FB4A-B x-under - FB4C-D y-under
;   FC00  ->   FCFE   com1/ps2 buffer
;   FCFF              com1/ps2 buffer count starting from FC00
 
uglobal
;--------------------------------------
align 4
  mousecount  dd  0x0
  mousedata   dd  0x0
Y_UNDER_sub_CUR_hot_y_add_curh:
        dw 0
Y_UNDER_subtraction_CUR_hot_y:
        dw 0
X_UNDER_sub_CUR_hot_x_add_curh:
        dw 0
X_UNDER_subtraction_CUR_hot_x:
        dw 0
endg
 
iglobal
;--------------------------------------
align 4
mouse_delay        dd 10
mouse_speed_factor:
                    dd 3
mouse_timer_ticks  dd 0
endg
;-----------------------------------------------------------------------------
align 4
draw_mouse_under:
        ; return old picture
        cmp     [_display.restore_cursor], 0
        je      @F
 
        pushad
        movzx   eax, word [X_UNDER]
        movzx   ebx, word [Y_UNDER]
        stdcall [_display.restore_cursor], eax, ebx
        popad
        ret
;--------------------------------------
align 4
@@:
        pushad
        xor     ecx, ecx
        xor     edx, edx
;--------------------------------------
align 4
mres:
        movzx   eax, word [X_UNDER]
        movzx   ebx, word [Y_UNDER]
        add     eax, ecx
        add     ebx, edx
        push    ecx
        push    edx
        push    eax
        push    ebx
        mov     eax, edx
        shl     eax, 6
        shl     ecx, 2
        add     eax, ecx
        add     eax, mouseunder
        mov     ecx, [eax]
        pop     ebx
        pop     eax
        mov     edi, 1 ; force
        or      ecx, 0x04000000  ; don't save to mouseunder area
;        call    [putpixel]
        call    __sys_putpixel
        pop     edx
        pop     ecx
        inc     ecx
        cmp     ecx, 16
        jnz     mres
        xor     ecx, ecx
        inc     edx
        cmp     edx, 24
        jnz     mres
        popad
        ret
;-----------------------------------------------------------------------------
align 4
save_draw_mouse:
        cmp     [_display.move_cursor], 0
        je      .no_hw_cursor
        pushad
 
        mov     [X_UNDER], ax
        mov     [Y_UNDER], bx
        movzx   eax, word [MOUSE_Y]
        movzx   ebx, word [MOUSE_X]
        push    eax
        push    ebx
 
;        mov     ecx, [Screen_Max_X]
;        inc     ecx
;        mul     ecx
        mov     eax, [d_width_calc_area + eax*4]
 
        add     eax, [_WinMapAddress]
        movzx   edx, byte [ebx+eax]
        shl     edx, 8
        mov     esi, [edx+SLOT_BASE+APPDATA.cursor]
 
        cmp     esi, [current_cursor]
        je      .draw
 
        mov     eax, [TASK_COUNT]
        movzx   eax, word [WIN_POS+eax*2]
        shl     eax, 8
 
        cmp     eax, edx
        je      @F
 
        mov     esi, [def_cursor]
        cmp     esi, [current_cursor]
        je      .draw
 
@@:
        push    esi
        call    [_display.select_cursor]
        mov     [current_cursor], esi
;--------------------------------------
align 4
.draw:
        stdcall [_display.move_cursor], esi
        popad
        ret
;--------------------------------------
;align 4
;.fail:
;        mov     ecx, [def_cursor]
;        mov     [edx+SLOT_BASE+APPDATA.cursor], ecx
;        stdcall [_display.move_cursor], ecx        ; stdcall: [esp]=ebx,eax
;        popad
;        ret
;--------------------------------------
align 4
.no_hw_cursor:
        pushad
        ; save & draw
        mov     [X_UNDER], ax
        mov     [Y_UNDER], bx
        push    eax
        push    ebx
        mov     ecx, 0
        mov     edx, 0
;--------------------------------------
align 4
drm:
        push    eax
        push    ebx
        push    ecx
        push    edx
        ; helloworld
        push    ecx
        add     eax, ecx; save picture under mouse
        add     ebx, edx
        push    ecx
        or      ecx, 0x04000000  ; don't load to mouseunder area
        call    getpixel
        mov     [COLOR_TEMP], ecx
        pop     ecx
        mov     eax, edx
        shl     eax, 6
        shl     ecx, 2
        add     eax, ecx
        add     eax, mouseunder
        mov     ebx, [COLOR_TEMP]
        and     ebx, 0xffffff
        mov     [eax], ebx
        pop     ecx
        mov     edi, edx     ; y cycle
        shl     edi, 4     ; *16 bytes per row
        add     edi, ecx     ; x cycle
        mov     esi, edi
        add     edi, esi
        add     edi, esi      ; *3
        add     edi, [MOUSE_PICTURE]    ; we have our str address
        mov     esi, edi
        add     esi, 16*24*3
        push    ecx
        mov     ecx, [COLOR_TEMP]
        call    combine_colors
        and     ecx, 0xffffff
        mov     [MOUSE_COLOR_MEM], ecx
        pop     ecx
        pop     edx
        pop     ecx
        pop     ebx
        pop     eax
        add     eax, ecx     ; we have x coord+cycle
        add     ebx, edx     ; and y coord+cycle
        push    ecx
        mov     ecx, [MOUSE_COLOR_MEM]
        mov     edi, 1 ; force
        or      ecx, 0x04000000  ; don't save to mouseunder area
;        call    [putpixel]
        call    __sys_putpixel
        pop     ecx
        mov     ebx, [esp+0]    ; pure y coord again
        mov     eax, [esp+4]    ; and x
        inc     ecx         ; +1 cycle
        cmp     ecx, 16     ; if more than 16
        jnz     drm
        xor     ecx, ecx
        inc     edx
        cmp     edx, 24
        jnz     drm
        add     esp, 8
        popad
        ret
;-----------------------------------------------------------------------------
align 4
combine_colors:
      ; in
      ; ecx - color ( 00 RR GG BB )
      ; edi - ref to new color byte
      ; esi - ref to alpha byte
      ;
      ; out
      ; ecx - new color ( roughly (ecx*[esi]>>8)+([edi]*[esi]>>8) )
        push    eax
        push    ebx
        push    edx
        push    ecx
        xor     ecx, ecx
         ; byte 2
        mov     eax, 0xff
        sub     al, [esi+0]
        mov     ebx, [esp]
        shr     ebx, 16
        and     ebx, 0xff
        mul     ebx
        shr     eax, 8
        add     ecx, eax
        xor     eax, eax
        xor     ebx, ebx
        mov     al, [edi+0]
        mov     bl, [esi+0]
        mul     ebx
        shr     eax, 8
        add     ecx, eax
        shl     ecx, 8
         ; byte 1
        mov     eax, 0xff
        sub     al, [esi+1]
        mov     ebx, [esp]
        shr     ebx, 8
        and     ebx, 0xff
        mul     ebx
        shr     eax, 8
        add     ecx, eax
        xor     eax, eax
        xor     ebx, ebx
        mov     al, [edi+1]
        mov     bl, [esi+1]
        mul     ebx
        shr     eax, 8
        add     ecx, eax
        shl     ecx, 8
         ; byte 2
        mov     eax, 0xff
        sub     al, [esi+2]
        mov     ebx, [esp]
        and     ebx, 0xff
        mul     ebx
        shr     eax, 8
        add     ecx, eax
        xor     eax, eax
        xor     ebx, ebx
        mov     al, [edi+2]
        mov     bl, [esi+2]
        mul     ebx
        shr     eax, 8
        add     ecx, eax
        pop     eax
        pop     edx
        pop     ebx
        pop     eax
        ret
;-----------------------------------------------------------------------------
align 4
check_mouse_area_for_getpixel:
; in:
; eax = x
; ebx = y
; out:
; ecx = new color
        push    eax ebx
; check for Y
        xor     ecx, ecx
        mov     cx, [Y_UNDER]  ; [MOUSE_Y]
 
        cmp     ebx, ecx
        jb      .no_mouse_area
        add     ecx, 23  ; mouse cursor Y size
        cmp     ebx, ecx
        ja      .no_mouse_area
; offset Y
        sub     bx, [Y_UNDER]  ;[MOUSE_Y]
;--------------------------------------
; check for X
        xor     ecx, ecx
        mov     cx, [X_UNDER]  ;[MOUSE_X]
        cmp     eax, ecx
        jb      .no_mouse_area
        add     ecx, 15  ; mouse cursor X size
        cmp     eax, ecx
        ja      .no_mouse_area
; offset X
        sub     ax, [X_UNDER]  ;[MOUSE_X]
;--------------------------------------
; eax = offset x
; ebx = offset y
        shl     ebx, 6  ;y
        shl     eax, 2  ;x
        add     eax, ebx
        add     eax, mouseunder
        mov     ecx, [eax]
        and     ecx, 0xffffff
        or      ecx, 0xff000000
        pop     ebx eax
        ret
;--------------------------------------
align 4
.no_mouse_area:
        xor     ecx, ecx
        pop     ebx eax
        ret
;-----------------------------------------------------------------------------
align 4
check_mouse_area_for_putpixel:
; in:
; ecx = x shl 16 + y
; eax = color
; out:
; eax = new color
        push    eax
; check for Y
        mov     ax, [Y_UNDER]  ; [MOUSE_Y]
        cmp     cx, ax
        jb      .no_mouse_area
        add     ax, 23  ; mouse cursor Y size
        cmp     cx, ax
        ja      .no_mouse_area
; offset Y
        sub     cx, [Y_UNDER]  ;[MOUSE_Y]
        mov     ax, cx
        shl     eax, 16
;--------------------------------------
; check for X
        mov     ax, [X_UNDER]  ;[MOUSE_X]
        shr     ecx, 16
        cmp     cx, ax
        jb      .no_mouse_area
        add     ax, 15  ; mouse cursor X size
        cmp     cx, ax
        ja      .no_mouse_area
; offset X
        sub     cx, [X_UNDER]  ;[MOUSE_X]
        mov     ax, cx
;--------------------------------------
; eax = (offset y) shl 16 + (offset x)
 
        pop     ecx
 
        push    eax ebx
 
        mov     ebx, eax
        shr     ebx, 16        ;y
        and     eax, 0xffff    ;x
 
        shl     ebx, 6
        shl     eax, 2
        add     eax, ebx
        add     eax, mouseunder
        and     ecx, 0xFFFFFF
        mov     [eax], ecx
 
        pop     ebx eax
 
        push    esi edi
        rol     eax, 16
        movzx   edi, ax     ; y cycle
        shl     edi, 4     ; *16 bytes per row
        shr     eax, 16
        add     edi, eax     ; x cycle
        lea     edi, [edi*3]
        add     edi, [MOUSE_PICTURE]    ; we have our str address
        mov     esi, edi
        add     esi, 16*24*3
        call    combine_colors
        pop     edi esi
;--------------------------------------
align 4
.end:
        mov     eax, ecx
        ret
;--------------------------------------
align 4
.no_mouse_area:
        pop     eax
        ret
;-----------------------------------------------------------------------------
align 4
__sys_draw_pointer:
        pushad
        movzx   ecx, word [X_UNDER]
        movzx   edx, word [Y_UNDER]
        movzx   ebx, word [MOUSE_Y]
        movzx   eax, word [MOUSE_X]
        cmp     [redrawmouse_unconditional], 0
        je      @f
        mov     [redrawmouse_unconditional], 0
        jmp     redrawmouse
;--------------------------------------
align 4
@@:
        cmp     eax, ecx
        jne     redrawmouse
        cmp     ebx, edx
        je      nodmp
;--------------------------------------
align 4
redrawmouse:
        pushfd
        cli
        call    draw_mouse_under
        call    save_draw_mouse
 
;        mov     eax, [_display.select_cursor]
;        test    eax, eax
;        jz      @f
        cmp     [_display.select_cursor], select_cursor
        jne     @f
 
        xor     eax, eax
        mov     esi, [current_cursor]
 
        mov     ax, [Y_UNDER]
        sub     eax, [esi+CURSOR.hot_y]
        mov     [Y_UNDER_subtraction_CUR_hot_y], ax
        add     eax, [cur.h]
        mov     [Y_UNDER_sub_CUR_hot_y_add_curh], ax
 
        mov     ax, [X_UNDER]
        sub     eax, [esi+CURSOR.hot_x]
        mov     [X_UNDER_subtraction_CUR_hot_x], ax
        add     eax, [cur.w]
        mov     [X_UNDER_sub_CUR_hot_x_add_curh], ax
;--------------------------------------
align 4
@@:
        popfd
;--------------------------------------
align 4
nodmp:
        popad
        ret
;-----------------------------------------------------------------------------
align 4
proc set_mouse_data stdcall, BtnState:dword, XMoving:dword, YMoving:dword, VScroll:dword, HScroll:dword
 
        mov     eax, [BtnState]
        and     eax, 0x3FFFFFFF ; Top 2 bits are used to flag absolute movements
        mov     [BTN_DOWN], eax
 
        mov     eax, [XMoving]
        test    [BtnState], 0x80000000
        jnz     @@M1
        call    mouse_acceleration
        add     ax, [MOUSE_X];[XCoordinate]
        cmp     ax, 0
        jge     @@M1
        mov     eax, 0
        jmp     @@M2
;--------------------------------------
align 4
@@M1:
        cmp     ax, word [Screen_Max_X];ScreenLength
        jl      @@M2
        mov     ax, word [Screen_Max_X];ScreenLength-1
;--------------------------------------
align 4
@@M2:
        mov     [MOUSE_X], ax;[XCoordinate]
 
        mov     eax, [YMoving]
        test    [BtnState], 0x40000000
        jnz     @@M3
        neg     eax
        call    mouse_acceleration
 
        add     ax, [MOUSE_Y];[YCoordinate]
        cmp     ax, 0
        jge     @@M3
        mov     ax, 0
        jmp     @@M4
;--------------------------------------
align 4
@@M3:
        cmp     ax, word [Screen_Max_Y];ScreenHeigth
        jl      @@M4
        mov     ax, word [Screen_Max_Y];ScreenHeigth-1
;--------------------------------------
align 4
@@M4:
        mov     [MOUSE_Y], ax;[YCoordinate]
 
        mov     eax, [VScroll]
        add     [MOUSE_SCROLL_V], ax
 
        mov     eax, [HScroll]
        add     [MOUSE_SCROLL_H], ax
 
        mov     [mouse_active], 1
        mov     eax, [timer_ticks]
        mov     [mouse_timer_ticks], eax
        call    wakeup_osloop
        ret
endp
;-----------------------------------------------------------------------------
align 4
mouse_acceleration:
        push    eax
        mov     eax, [timer_ticks]
        sub     eax, [mouse_timer_ticks]
        cmp     eax, [mouse_delay]
        pop     eax
        ja      @f
        ;push  edx
        imul    eax, [mouse_speed_factor]
        ;pop   edx
;--------------------------------------
align 4
@@:
        ret
;-----------------------------------------------------------------------------

Rev 4429	Rev 4587
1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2	;; ;;	2	;; ;;
3	;; Copyright (C) KolibriOS team 2004-2012. All rights reserved. ;;	3	;; Copyright (C) KolibriOS team 2004-2012. All rights reserved. ;;
4	;; Distributed under terms of the GNU General Public License ;;	4	;; Distributed under terms of the GNU General Public License ;;
5	;; ;;	5	;; ;;
6	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	6	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
7		7
8	$Revision: 3606 $	8	$Revision: 3606 $
9		9
10		10
11	; check mouse	11	; check mouse
12	;	12	;
13	;	13	;
14	; FB00 -> FB0F mouse memory 00 chunk count - FB0A-B x - FB0C-D y	14	; FB00 -> FB0F mouse memory 00 chunk count - FB0A-B x - FB0C-D y
15	; FB10 -> FB17 mouse color mem	15	; FB10 -> FB17 mouse color mem
16	; FB21 x move	16	; FB21 x move
17	; FB22 y move	17	; FB22 y move
18	; FB30 color temp	18	; FB30 color temp
19	; FB28 high bits temp	19	; FB28 high bits temp
20	; FB4A -> FB4D FB4A-B x-under - FB4C-D y-under	20	; FB4A -> FB4D FB4A-B x-under - FB4C-D y-under
21	; FC00 -> FCFE com1/ps2 buffer	21	; FC00 -> FCFE com1/ps2 buffer
22	; FCFF com1/ps2 buffer count starting from FC00	22	; FCFF com1/ps2 buffer count starting from FC00
23		23
24	uglobal	24	uglobal
25	;--------------------------------------	25	;--------------------------------------
26	align 4	26	align 4
27	mousecount dd 0x0	27	mousecount dd 0x0
28	mousedata dd 0x0	28	mousedata dd 0x0
29	Y_UNDER_sub_CUR_hot_y_add_curh:	29	Y_UNDER_sub_CUR_hot_y_add_curh:
30	dw 0	30	dw 0
31	Y_UNDER_subtraction_CUR_hot_y:	31	Y_UNDER_subtraction_CUR_hot_y:
32	dw 0	32	dw 0
33	X_UNDER_sub_CUR_hot_x_add_curh:	33	X_UNDER_sub_CUR_hot_x_add_curh:
34	dw 0	34	dw 0
35	X_UNDER_subtraction_CUR_hot_x:	35	X_UNDER_subtraction_CUR_hot_x:
36	dw 0	36	dw 0
37	endg	37	endg
38		38
39	iglobal	39	iglobal
40	;--------------------------------------	40	;--------------------------------------
41	align 4	41	align 4
42	mouse_delay dd 10	42	mouse_delay dd 10
43	mouse_speed_factor:	43	mouse_speed_factor:
44	dd 3	44	dd 3
45	mouse_timer_ticks dd 0	45	mouse_timer_ticks dd 0
46	endg	46	endg
47	;-----------------------------------------------------------------------------	47	;-----------------------------------------------------------------------------
48	align 4	48	align 4
49	draw_mouse_under:	49	draw_mouse_under:
50	; return old picture	50	; return old picture
51	cmp [_display.restore_cursor], 0	51	cmp [_display.restore_cursor], 0
52	je @F	52	je @F
53		53
54	pushad	54	pushad
55	movzx eax, word [X_UNDER]	55	movzx eax, word [X_UNDER]
56	movzx ebx, word [Y_UNDER]	56	movzx ebx, word [Y_UNDER]
57	stdcall [_display.restore_cursor], eax, ebx	57	stdcall [_display.restore_cursor], eax, ebx
58	popad	58	popad
59	ret	59	ret
60	;--------------------------------------	60	;--------------------------------------
61	align 4	61	align 4
62	@@:	62	@@:
63	pushad	63	pushad
64	xor ecx, ecx	64	xor ecx, ecx
65	xor edx, edx	65	xor edx, edx
66	;--------------------------------------	66	;--------------------------------------
67	align 4	67	align 4
68	mres:	68	mres:
69	movzx eax, word [X_UNDER]	69	movzx eax, word [X_UNDER]
70	movzx ebx, word [Y_UNDER]	70	movzx ebx, word [Y_UNDER]
71	add eax, ecx	71	add eax, ecx
72	add ebx, edx	72	add ebx, edx
73	push ecx	73	push ecx
74	push edx	74	push edx
75	push eax	75	push eax
76	push ebx	76	push ebx
77	mov eax, edx	77	mov eax, edx
78	shl eax, 6	78	shl eax, 6
79	shl ecx, 2	79	shl ecx, 2
80	add eax, ecx	80	add eax, ecx
81	add eax, mouseunder	81	add eax, mouseunder
82	mov ecx, [eax]	82	mov ecx, [eax]
83	pop ebx	83	pop ebx
84	pop eax	84	pop eax
85	mov edi, 1 ; force	85	mov edi, 1 ; force
86	or ecx, 0x04000000 ; don't save to mouseunder area	86	or ecx, 0x04000000 ; don't save to mouseunder area
87	; call [putpixel]	87	; call [putpixel]
88	call __sys_putpixel	88	call __sys_putpixel
89	pop edx	89	pop edx
90	pop ecx	90	pop ecx
91	inc ecx	91	inc ecx
92	cmp ecx, 16	92	cmp ecx, 16
93	jnz mres	93	jnz mres
94	xor ecx, ecx	94	xor ecx, ecx
95	inc edx	95	inc edx
96	cmp edx, 24	96	cmp edx, 24
97	jnz mres	97	jnz mres
98	popad	98	popad
99	ret	99	ret
100	;-----------------------------------------------------------------------------	100	;-----------------------------------------------------------------------------
101	align 4	101	align 4
102	save_draw_mouse:	102	save_draw_mouse:
103	cmp [_display.move_cursor], 0	103	cmp [_display.move_cursor], 0
104	je .no_hw_cursor	104	je .no_hw_cursor
105	pushad	105	pushad
106		106
107	mov [X_UNDER], ax	107	mov [X_UNDER], ax
108	mov [Y_UNDER], bx	108	mov [Y_UNDER], bx
109	movzx eax, word [MOUSE_Y]	109	movzx eax, word [MOUSE_Y]
110	movzx ebx, word [MOUSE_X]	110	movzx ebx, word [MOUSE_X]
111	push eax	111	push eax
112	push ebx	112	push ebx
113		113
114	; mov ecx, [Screen_Max_X]	114	; mov ecx, [Screen_Max_X]
115	; inc ecx	115	; inc ecx
116	; mul ecx	116	; mul ecx
117	mov eax, [d_width_calc_area + eax*4]	117	mov eax, [d_width_calc_area + eax*4]
118		118
119	add eax, [_WinMapAddress]	119	add eax, [_WinMapAddress]
120	movzx edx, byte [ebx+eax]	120	movzx edx, byte [ebx+eax]
121	shl edx, 8	121	shl edx, 8
122	mov esi, [edx+SLOT_BASE+APPDATA.cursor]	122	mov esi, [edx+SLOT_BASE+APPDATA.cursor]
123		123
124	cmp esi, [current_cursor]	124	cmp esi, [current_cursor]
125	je .draw	125	je .draw
126		126
127	mov eax, [TASK_COUNT]	127	mov eax, [TASK_COUNT]
128	movzx eax, word [WIN_POS+eax*2]	128	movzx eax, word [WIN_POS+eax*2]
129	shl eax, 8	129	shl eax, 8
130		130
131	cmp eax, edx	131	cmp eax, edx
132	je @F	132	je @F
133		133
134	mov esi, [def_cursor]	134	mov esi, [def_cursor]
135	cmp esi, [current_cursor]	135	cmp esi, [current_cursor]
136	je .draw	136	je .draw
137		137
138	@@:	138	@@:
139	push esi	139	push esi
140	call [_display.select_cursor]	140	call [_display.select_cursor]
141	mov [current_cursor], esi	141	mov [current_cursor], esi
142	;--------------------------------------	142	;--------------------------------------
143	align 4	143	align 4
144	.draw:	144	.draw:
145	stdcall [_display.move_cursor], esi	145	stdcall [_display.move_cursor], esi
146	popad	146	popad
147	ret	147	ret
148	;--------------------------------------	148	;--------------------------------------
149	;align 4	149	;align 4
150	;.fail:	150	;.fail:
151	; mov ecx, [def_cursor]	151	; mov ecx, [def_cursor]
152	; mov [edx+SLOT_BASE+APPDATA.cursor], ecx	152	; mov [edx+SLOT_BASE+APPDATA.cursor], ecx
153	; stdcall [_display.move_cursor], ecx ; stdcall: [esp]=ebx,eax	153	; stdcall [_display.move_cursor], ecx ; stdcall: [esp]=ebx,eax
154	; popad	154	; popad
155	; ret	155	; ret
156	;--------------------------------------	156	;--------------------------------------
157	align 4	157	align 4
158	.no_hw_cursor:	158	.no_hw_cursor:
159	pushad	159	pushad
160	; save & draw	160	; save & draw
161	mov [X_UNDER], ax	161	mov [X_UNDER], ax
162	mov [Y_UNDER], bx	162	mov [Y_UNDER], bx
163	push eax	163	push eax
164	push ebx	164	push ebx
165	mov ecx, 0	165	mov ecx, 0
166	mov edx, 0	166	mov edx, 0
167	;--------------------------------------	167	;--------------------------------------
168	align 4	168	align 4
169	drm:	169	drm:
170	push eax	170	push eax
171	push ebx	171	push ebx
172	push ecx	172	push ecx
173	push edx	173	push edx
174	; helloworld	174	; helloworld
175	push ecx	175	push ecx
176	add eax, ecx; save picture under mouse	176	add eax, ecx; save picture under mouse
177	add ebx, edx	177	add ebx, edx
178	push ecx	178	push ecx
179	or ecx, 0x04000000 ; don't load to mouseunder area	179	or ecx, 0x04000000 ; don't load to mouseunder area
180	call getpixel	180	call getpixel
181	mov [COLOR_TEMP], ecx	181	mov [COLOR_TEMP], ecx
182	pop ecx	182	pop ecx
183	mov eax, edx	183	mov eax, edx
184	shl eax, 6	184	shl eax, 6
185	shl ecx, 2	185	shl ecx, 2
186	add eax, ecx	186	add eax, ecx
187	add eax, mouseunder	187	add eax, mouseunder
188	mov ebx, [COLOR_TEMP]	188	mov ebx, [COLOR_TEMP]
189	and ebx, 0xffffff	189	and ebx, 0xffffff
190	mov [eax], ebx	190	mov [eax], ebx
191	pop ecx	191	pop ecx
192	mov edi, edx ; y cycle	192	mov edi, edx ; y cycle
193	shl edi, 4 ; *16 bytes per row	193	shl edi, 4 ; *16 bytes per row
194	add edi, ecx ; x cycle	194	add edi, ecx ; x cycle
195	mov esi, edi	195	mov esi, edi
196	add edi, esi	196	add edi, esi
197	add edi, esi ; *3	197	add edi, esi ; *3
198	add edi, [MOUSE_PICTURE] ; we have our str address	198	add edi, [MOUSE_PICTURE] ; we have our str address
199	mov esi, edi	199	mov esi, edi
200	add esi, 16243	200	add esi, 16243
201	push ecx	201	push ecx
202	mov ecx, [COLOR_TEMP]	202	mov ecx, [COLOR_TEMP]
203	call combine_colors	203	call combine_colors
204	and ecx, 0xffffff	204	and ecx, 0xffffff
205	mov [MOUSE_COLOR_MEM], ecx	205	mov [MOUSE_COLOR_MEM], ecx
206	pop ecx	206	pop ecx
207	pop edx	207	pop edx
208	pop ecx	208	pop ecx
209	pop ebx	209	pop ebx
210	pop eax	210	pop eax
211	add eax, ecx ; we have x coord+cycle	211	add eax, ecx ; we have x coord+cycle
212	add ebx, edx ; and y coord+cycle	212	add ebx, edx ; and y coord+cycle
213	push ecx	213	push ecx
214	mov ecx, [MOUSE_COLOR_MEM]	214	mov ecx, [MOUSE_COLOR_MEM]
215	mov edi, 1 ; force	215	mov edi, 1 ; force
216	or ecx, 0x04000000 ; don't save to mouseunder area	216	or ecx, 0x04000000 ; don't save to mouseunder area
217	; call [putpixel]	217	; call [putpixel]
218	call __sys_putpixel	218	call __sys_putpixel
219	pop ecx	219	pop ecx
220	mov ebx, [esp+0] ; pure y coord again	220	mov ebx, [esp+0] ; pure y coord again
221	mov eax, [esp+4] ; and x	221	mov eax, [esp+4] ; and x
222	inc ecx ; +1 cycle	222	inc ecx ; +1 cycle
223	cmp ecx, 16 ; if more than 16	223	cmp ecx, 16 ; if more than 16
224	jnz drm	224	jnz drm
225	xor ecx, ecx	225	xor ecx, ecx
226	inc edx	226	inc edx
227	cmp edx, 24	227	cmp edx, 24
228	jnz drm	228	jnz drm
229	add esp, 8	229	add esp, 8
230	popad	230	popad
231	ret	231	ret
232	;-----------------------------------------------------------------------------	232	;-----------------------------------------------------------------------------
233	align 4	233	align 4
234	combine_colors:	234	combine_colors:
235	; in	235	; in
236	; ecx - color ( 00 RR GG BB )	236	; ecx - color ( 00 RR GG BB )
237	; edi - ref to new color byte	237	; edi - ref to new color byte
238	; esi - ref to alpha byte	238	; esi - ref to alpha byte
239	;	239	;
240	; out	240	; out
241	; ecx - new color ( roughly (ecx[esi]>>8)+([edi][esi]>>8) )	241	; ecx - new color ( roughly (ecx[esi]>>8)+([edi][esi]>>8) )
242	push eax	242	push eax
243	push ebx	243	push ebx
244	push edx	244	push edx
245	push ecx	245	push ecx
246	xor ecx, ecx	246	xor ecx, ecx
247	; byte 2	247	; byte 2
248	mov eax, 0xff	248	mov eax, 0xff
249	sub al, [esi+0]	249	sub al, [esi+0]
250	mov ebx, [esp]	250	mov ebx, [esp]
251	shr ebx, 16	251	shr ebx, 16
252	and ebx, 0xff	252	and ebx, 0xff
253	mul ebx	253	mul ebx
254	shr eax, 8	254	shr eax, 8
255	add ecx, eax	255	add ecx, eax
256	xor eax, eax	256	xor eax, eax
257	xor ebx, ebx	257	xor ebx, ebx
258	mov al, [edi+0]	258	mov al, [edi+0]
259	mov bl, [esi+0]	259	mov bl, [esi+0]
260	mul ebx	260	mul ebx
261	shr eax, 8	261	shr eax, 8
262	add ecx, eax	262	add ecx, eax
263	shl ecx, 8	263	shl ecx, 8
264	; byte 1	264	; byte 1
265	mov eax, 0xff	265	mov eax, 0xff
266	sub al, [esi+1]	266	sub al, [esi+1]
267	mov ebx, [esp]	267	mov ebx, [esp]
268	shr ebx, 8	268	shr ebx, 8
269	and ebx, 0xff	269	and ebx, 0xff
270	mul ebx	270	mul ebx
271	shr eax, 8	271	shr eax, 8
272	add ecx, eax	272	add ecx, eax
273	xor eax, eax	273	xor eax, eax
274	xor ebx, ebx	274	xor ebx, ebx
275	mov al, [edi+1]	275	mov al, [edi+1]
276	mov bl, [esi+1]	276	mov bl, [esi+1]
277	mul ebx	277	mul ebx
278	shr eax, 8	278	shr eax, 8
279	add ecx, eax	279	add ecx, eax
280	shl ecx, 8	280	shl ecx, 8
281	; byte 2	281	; byte 2
282	mov eax, 0xff	282	mov eax, 0xff
283	sub al, [esi+2]	283	sub al, [esi+2]
284	mov ebx, [esp]	284	mov ebx, [esp]
285	and ebx, 0xff	285	and ebx, 0xff
286	mul ebx	286	mul ebx
287	shr eax, 8	287	shr eax, 8
288	add ecx, eax	288	add ecx, eax
289	xor eax, eax	289	xor eax, eax
290	xor ebx, ebx	290	xor ebx, ebx
291	mov al, [edi+2]	291	mov al, [edi+2]
292	mov bl, [esi+2]	292	mov bl, [esi+2]
293	mul ebx	293	mul ebx
294	shr eax, 8	294	shr eax, 8
295	add ecx, eax	295	add ecx, eax
296	pop eax	296	pop eax
297	pop edx	297	pop edx
298	pop ebx	298	pop ebx
299	pop eax	299	pop eax
300	ret	300	ret
301	;-----------------------------------------------------------------------------	301	;-----------------------------------------------------------------------------
302	align 4	302	align 4
303	check_mouse_area_for_getpixel:	303	check_mouse_area_for_getpixel:
304	; in:	304	; in:
305	; eax = x	305	; eax = x
306	; ebx = y	306	; ebx = y
307	; out:	307	; out:
308	; ecx = new color	308	; ecx = new color
309	push eax ebx	309	push eax ebx
310	; check for Y	310	; check for Y
311	xor ecx, ecx	311	xor ecx, ecx
312	mov cx, [Y_UNDER] ; [MOUSE_Y]	312	mov cx, [Y_UNDER] ; [MOUSE_Y]
313		313
314	cmp ebx, ecx	314	cmp ebx, ecx
315	jb .no_mouse_area	315	jb .no_mouse_area
316	add ecx, 23 ; mouse cursor Y size	316	add ecx, 23 ; mouse cursor Y size
317	cmp ebx, ecx	317	cmp ebx, ecx
318	ja .no_mouse_area	318	ja .no_mouse_area
319	; offset Y	319	; offset Y
320	sub bx, [Y_UNDER] ;[MOUSE_Y]	320	sub bx, [Y_UNDER] ;[MOUSE_Y]
321	;--------------------------------------	321	;--------------------------------------
322	; check for X	322	; check for X
323	xor ecx, ecx	323	xor ecx, ecx
324	mov cx, [X_UNDER] ;[MOUSE_X]	324	mov cx, [X_UNDER] ;[MOUSE_X]
325	cmp eax, ecx	325	cmp eax, ecx
326	jb .no_mouse_area	326	jb .no_mouse_area
327	add ecx, 15 ; mouse cursor X size	327	add ecx, 15 ; mouse cursor X size
328	cmp eax, ecx	328	cmp eax, ecx
329	ja .no_mouse_area	329	ja .no_mouse_area
330	; offset X	330	; offset X
331	sub ax, [X_UNDER] ;[MOUSE_X]	331	sub ax, [X_UNDER] ;[MOUSE_X]
332	;--------------------------------------	332	;--------------------------------------
333	; eax = offset x	333	; eax = offset x
334	; ebx = offset y	334	; ebx = offset y
335	shl ebx, 6 ;y	335	shl ebx, 6 ;y
336	shl eax, 2 ;x	336	shl eax, 2 ;x
337	add eax, ebx	337	add eax, ebx
338	add eax, mouseunder	338	add eax, mouseunder
339	mov ecx, [eax]	339	mov ecx, [eax]
340	and ecx, 0xffffff	340	and ecx, 0xffffff
341	or ecx, 0xff000000	341	or ecx, 0xff000000
342	pop ebx eax	342	pop ebx eax
343	ret	343	ret
344	;--------------------------------------	344	;--------------------------------------
345	align 4	345	align 4
346	.no_mouse_area:	346	.no_mouse_area:
347	xor ecx, ecx	347	xor ecx, ecx
348	pop ebx eax	348	pop ebx eax
349	ret	349	ret
350	;-----------------------------------------------------------------------------	350	;-----------------------------------------------------------------------------
351	align 4	351	align 4
352	check_mouse_area_for_putpixel:	352	check_mouse_area_for_putpixel:
353	; in:	353	; in:
354	; ecx = x shl 16 + y	354	; ecx = x shl 16 + y
355	; eax = color	355	; eax = color
356	; out:	356	; out:
357	; eax = new color	357	; eax = new color
358	push eax	358	push eax
359	; check for Y	359	; check for Y
360	mov ax, [Y_UNDER] ; [MOUSE_Y]	360	mov ax, [Y_UNDER] ; [MOUSE_Y]
361	cmp cx, ax	361	cmp cx, ax
362	jb .no_mouse_area	362	jb .no_mouse_area
363	add ax, 23 ; mouse cursor Y size	363	add ax, 23 ; mouse cursor Y size
364	cmp cx, ax	364	cmp cx, ax
365	ja .no_mouse_area	365	ja .no_mouse_area
366	; offset Y	366	; offset Y
367	sub cx, [Y_UNDER] ;[MOUSE_Y]	367	sub cx, [Y_UNDER] ;[MOUSE_Y]
368	mov ax, cx	368	mov ax, cx
369	shl eax, 16	369	shl eax, 16
370	;--------------------------------------	370	;--------------------------------------
371	; check for X	371	; check for X
372	mov ax, [X_UNDER] ;[MOUSE_X]	372	mov ax, [X_UNDER] ;[MOUSE_X]
373	shr ecx, 16	373	shr ecx, 16
374	cmp cx, ax	374	cmp cx, ax
375	jb .no_mouse_area	375	jb .no_mouse_area
376	add ax, 15 ; mouse cursor X size	376	add ax, 15 ; mouse cursor X size
377	cmp cx, ax	377	cmp cx, ax
378	ja .no_mouse_area	378	ja .no_mouse_area
379	; offset X	379	; offset X
380	sub cx, [X_UNDER] ;[MOUSE_X]	380	sub cx, [X_UNDER] ;[MOUSE_X]
381	mov ax, cx	381	mov ax, cx
382	;--------------------------------------	382	;--------------------------------------
383	; eax = (offset y) shl 16 + (offset x)	383	; eax = (offset y) shl 16 + (offset x)
384		384
385	pop ecx	385	pop ecx
386		386
387	push eax ebx	387	push eax ebx
388		388
389	mov ebx, eax	389	mov ebx, eax
390	shr ebx, 16 ;y	390	shr ebx, 16 ;y
391	and eax, 0xffff ;x	391	and eax, 0xffff ;x
392		392
393	shl ebx, 6	393	shl ebx, 6
394	shl eax, 2	394	shl eax, 2
395	add eax, ebx	395	add eax, ebx
396	add eax, mouseunder	396	add eax, mouseunder
397	and ecx, 0xFFFFFF	397	and ecx, 0xFFFFFF
398	mov [eax], ecx	398	mov [eax], ecx
399		399
400	pop ebx eax	400	pop ebx eax
401		401
402	push esi edi	402	push esi edi
403	rol eax, 16	403	rol eax, 16
404	movzx edi, ax ; y cycle	404	movzx edi, ax ; y cycle
405	shl edi, 4 ; *16 bytes per row	405	shl edi, 4 ; *16 bytes per row
406	shr eax, 16	406	shr eax, 16
407	add edi, eax ; x cycle	407	add edi, eax ; x cycle
408	lea edi, [edi*3]	408	lea edi, [edi*3]
409	add edi, [MOUSE_PICTURE] ; we have our str address	409	add edi, [MOUSE_PICTURE] ; we have our str address
410	mov esi, edi	410	mov esi, edi
411	add esi, 16243	411	add esi, 16243
412	call combine_colors	412	call combine_colors
413	pop edi esi	413	pop edi esi
414	;--------------------------------------	414	;--------------------------------------
415	align 4	415	align 4
416	.end:	416	.end:
417	mov eax, ecx	417	mov eax, ecx
418	ret	418	ret
419	;--------------------------------------	419	;--------------------------------------
420	align 4	420	align 4
421	.no_mouse_area:	421	.no_mouse_area:
422	pop eax	422	pop eax
423	ret	423	ret
424	;-----------------------------------------------------------------------------	424	;-----------------------------------------------------------------------------
425	align 4	425	align 4
426	__sys_draw_pointer:	426	__sys_draw_pointer:
427	pushad	427	pushad
428	movzx ecx, word [X_UNDER]	428	movzx ecx, word [X_UNDER]
429	movzx edx, word [Y_UNDER]	429	movzx edx, word [Y_UNDER]
430	movzx ebx, word [MOUSE_Y]	430	movzx ebx, word [MOUSE_Y]
431	movzx eax, word [MOUSE_X]	431	movzx eax, word [MOUSE_X]
432	cmp [redrawmouse_unconditional], 0	432	cmp [redrawmouse_unconditional], 0
433	je @f	433	je @f
434	mov [redrawmouse_unconditional], 0	434	mov [redrawmouse_unconditional], 0
435	jmp redrawmouse	435	jmp redrawmouse
436	;--------------------------------------	436	;--------------------------------------
437	align 4	437	align 4
438	@@:	438	@@:
439	cmp eax, ecx	439	cmp eax, ecx
440	jne redrawmouse	440	jne redrawmouse
441	cmp ebx, edx	441	cmp ebx, edx
442	je nodmp	442	je nodmp
443	;--------------------------------------	443	;--------------------------------------
444	align 4	444	align 4
445	redrawmouse:	445	redrawmouse:
446	pushfd	446	pushfd
447	cli	447	cli
448	call draw_mouse_under	448	call draw_mouse_under
449	call save_draw_mouse	449	call save_draw_mouse
450		450
451	; mov eax, [_display.select_cursor]	451	; mov eax, [_display.select_cursor]
452	; test eax, eax	452	; test eax, eax
453	; jz @f	453	; jz @f
454	cmp [_display.select_cursor], select_cursor	454	cmp [_display.select_cursor], select_cursor
455	jne @f	455	jne @f
456		456
457	xor eax, eax	457	xor eax, eax
458	mov esi, [current_cursor]	458	mov esi, [current_cursor]
459		459
460	mov ax, [Y_UNDER]	460	mov ax, [Y_UNDER]
461	sub eax, [esi+CURSOR.hot_y]	461	sub eax, [esi+CURSOR.hot_y]
462	mov [Y_UNDER_subtraction_CUR_hot_y], ax	462	mov [Y_UNDER_subtraction_CUR_hot_y], ax
463	add eax, [cur.h]	463	add eax, [cur.h]
464	mov [Y_UNDER_sub_CUR_hot_y_add_curh], ax	464	mov [Y_UNDER_sub_CUR_hot_y_add_curh], ax
465		465
466	mov ax, [X_UNDER]	466	mov ax, [X_UNDER]
467	sub eax, [esi+CURSOR.hot_x]	467	sub eax, [esi+CURSOR.hot_x]
468	mov [X_UNDER_subtraction_CUR_hot_x], ax	468	mov [X_UNDER_subtraction_CUR_hot_x], ax
469	add eax, [cur.w]	469	add eax, [cur.w]
470	mov [X_UNDER_sub_CUR_hot_x_add_curh], ax	470	mov [X_UNDER_sub_CUR_hot_x_add_curh], ax
471	;--------------------------------------	471	;--------------------------------------
472	align 4	472	align 4
473	@@:	473	@@:
474	popfd	474	popfd
475	;--------------------------------------	475	;--------------------------------------
476	align 4	476	align 4
477	nodmp:	477	nodmp:
478	popad	478	popad
479	ret	479	ret
480	;-----------------------------------------------------------------------------	480	;-----------------------------------------------------------------------------
481	align 4	481	align 4
482	proc set_mouse_data stdcall, BtnState:dword, XMoving:dword, YMoving:dword, VScroll:dword, HScroll:dword	482	proc set_mouse_data stdcall, BtnState:dword, XMoving:dword, YMoving:dword, VScroll:dword, HScroll:dword
483		483
484	mov eax, [BtnState]	484	mov eax, [BtnState]
-		485	and eax, 0x3FFFFFFF ; Top 2 bits are used to flag absolute movements
485	mov [BTN_DOWN], eax	486	mov [BTN_DOWN], eax
486		487
487	mov eax, [XMoving]	488	mov eax, [XMoving]
-		489	test [BtnState], 0x80000000
-		490	jnz @@M1
488	call mouse_acceleration	491	call mouse_acceleration
489	add ax, [MOUSE_X];[XCoordinate]	492	add ax, [MOUSE_X];[XCoordinate]
490	cmp ax, 0	493	cmp ax, 0
491	jge @@M1	494	jge @@M1
492	mov eax, 0	495	mov eax, 0
493	jmp @@M2	496	jmp @@M2
494	;--------------------------------------	497	;--------------------------------------
495	align 4	498	align 4
496	@@M1:	499	@@M1:
497	cmp ax, word [Screen_Max_X];ScreenLength	500	cmp ax, word [Screen_Max_X];ScreenLength

Subversion Repositories Kolibri OS

(root)/kernel/branches/kolibri-process/hid/mousedrv.inc – Rev 4429 → 4587