WebSVN – Kolibri OS – Blame – /kernel/branches/Kolibri-acpi/hid/mousedrv.inc

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

Subversion Repositories Kolibri OS

(root)/kernel/branches/Kolibri-acpi/hid/mousedrv.inc – Rev 2434