WebSVN – Kolibri OS – Blame – /kernel/trunk/hid/mousedrv.inc

Rev	Author	Line No.	Line
2288	clevermous	1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		2	;; ;;
		3	;; Copyright (C) KolibriOS team 2004-2008. All rights reserved. ;;
		4	;; Distributed under terms of the GNU General Public License ;;
		5	;; ;;
		6	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		7
		8	$Revision: 2430 $
		9
		10
		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
2430	mario79	25	;--------------------------------------
		26	align 4
2288	clevermous	27	mousecount dd 0x0
		28	mousedata dd 0x0
2430	mario79	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
2288	clevermous	37	endg
		38
		39	iglobal
2430	mario79	40	;--------------------------------------
		41	align 4
2288	clevermous	42	mouse_delay dd 10
		43	mouse_speed_factor:
		44	dd 3
		45	mouse_timer_ticks dd 0
		46	endg
2430	mario79	47	;-----------------------------------------------------------------------------
		48	align 4
2288	clevermous	49	draw_mouse_under:
		50	; return old picture
		51	cmp [_display.restore_cursor], 0
		52	je @F
		53
		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
2430	mario79	60	;--------------------------------------
		61	align 4
2288	clevermous	62	@@:
		63	pushad
		64	xor ecx, ecx
		65	xor edx, edx
2430	mario79	66	;--------------------------------------
		67	align 4
2288	clevermous	68	mres:
		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
2430	mario79	85	mov edi, 1 ; force
		86	or ecx, 0x04000000 ; don't save to mouseunder area
2288	clevermous	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
2430	mario79	99	;-----------------------------------------------------------------------------
		100	align 4
2288	clevermous	101	save_draw_mouse:
		102	cmp [_display.move_cursor], 0
		103	je .no_hw_cursor
		104	pushad
		105
		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
		112
		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]
		120
		121	cmp esi, [current_cursor]
		122	je .draw
		123
		124	push esi
		125	call [_display.select_cursor]
		126	mov [current_cursor], esi
2430	mario79	127	;--------------------------------------
		128	align 4
2288	clevermous	129	.draw:
		130	stdcall [_display.move_cursor], esi
		131	popad
		132	ret
2430	mario79	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
2288	clevermous	143	.no_hw_cursor:
		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
2430	mario79	152	;--------------------------------------
		153	align 4
2288	clevermous	154	drm:
		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
2430	mario79	164	or ecx, 0x04000000 ; don't load to mouseunder area
2288	clevermous	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]
2430	mario79	174	and ebx, 0xffffff
2288	clevermous	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
2430	mario79	189	and ecx, 0xffffff
2288	clevermous	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]
2430	mario79	200	mov edi, 1 ; force
		201	or ecx, 0x04000000 ; don't save to mouseunder area
2288	clevermous	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
2430	mario79	216	;-----------------------------------------------------------------------------
		217	align 4
2288	clevermous	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) )
		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
2430	mario79	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]
2288	clevermous	297
2430	mario79	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]
2288	clevermous	309	cmp eax, ecx
2430	mario79	310	jb .no_mouse_area
		311	add ecx, 15 ; mouse cursor X size
2288	clevermous	312	cmp eax, ecx
2430	mario79	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
2288	clevermous	327	ret
2430	mario79	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)
2288	clevermous	368
2430	mario79	369	pop ecx
		370
		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
2288	clevermous	402	ret
2430	mario79	403	;--------------------------------------
		404	align 4
		405	.no_mouse_area:
2288	clevermous	406	pop eax
		407	ret
2430	mario79	408	;-----------------------------------------------------------------------------
		409	align 4
		410	__sys_draw_pointer:
2288	clevermous	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
2430	mario79	419	je nodmp
		420	;--------------------------------------
		421	align 4
2288	clevermous	422	redrawmouse:
		423	pushfd
		424	cli
		425	call draw_mouse_under
		426	call save_draw_mouse
2430	mario79	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
		448	@@:
2288	clevermous	449	popfd
2430	mario79	450	;--------------------------------------
		451	align 4
2288	clevermous	452	nodmp:
		453	popad
		454	ret
2430	mario79	455	;-----------------------------------------------------------------------------
		456	align 4
2288	clevermous	457	proc set_mouse_data stdcall, BtnState:dword, XMoving:dword, YMoving:dword, VScroll:dword, HScroll:dword
		458
		459	mov eax, [BtnState]
		460	mov [BTN_DOWN], eax
		461
		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
2430	mario79	469	;--------------------------------------
		470	align 4
2288	clevermous	471	@@M1:
		472	cmp ax, [Screen_Max_X];ScreenLength
		473	jl @@M2
		474	mov ax, [Screen_Max_X];ScreenLength-1
2430	mario79	475	;--------------------------------------
		476	align 4
2288	clevermous	477	@@M2:
		478	mov [MOUSE_X], ax;[XCoordinate]
		479
		480	mov eax, [YMoving]
		481	neg eax
		482	call mouse_acceleration
		483
		484	add ax, [MOUSE_Y];[YCoordinate]
		485	cmp ax, 0
		486	jge @@M3
		487	mov ax, 0
		488	jmp @@M4
2430	mario79	489	;--------------------------------------
		490	align 4
2288	clevermous	491	@@M3:
		492	cmp ax, [Screen_Max_Y];ScreenHeigth
		493	jl @@M4
		494	mov ax, [Screen_Max_Y];ScreenHeigth-1
2430	mario79	495	;--------------------------------------
		496	align 4
2288	clevermous	497	@@M4:
		498	mov [MOUSE_Y], ax;[YCoordinate]
		499
		500	mov eax, [VScroll]
		501	add [MOUSE_SCROLL_V], ax
		502
		503	mov eax, [HScroll]
		504	add [MOUSE_SCROLL_H], ax
		505
		506	mov [mouse_active], 1
		507	mov eax, [timer_ticks]
		508	mov [mouse_timer_ticks], eax
		509	ret
		510	endp
2430	mario79	511	;-----------------------------------------------------------------------------
		512	align 4
2288	clevermous	513	mouse_acceleration:
		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
2430	mario79	523	;--------------------------------------
		524	align 4
2288	clevermous	525	@@:
		526	ret
2430	mario79	527	;-----------------------------------------------------------------------------

Subversion Repositories Kolibri OS

(root)/kernel/trunk/hid/mousedrv.inc – Rev 2430