WebSVN – Kolibri OS – Blame – /kernel/branches/Kolibri-acpi/video/blitter.inc

Rev	Author	Line No.	Line
2465	Serge	1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		2	;; ;;
5565	serge	3	;; Copyright (C) KolibriOS team 2011-2015. All rights reserved. ;;
2465	Serge	4	;; Distributed under terms of the GNU General Public License ;;
		5	;; ;;
		6	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2434	Serge	7
5596	serge	8	$Revision: 5363 $
5201	serge	9
		10
2434	Serge	11	struct BLITTER_BLOCK
		12	xmin dd ?
		13	ymin dd ?
		14	xmax dd ?
		15	ymax dd ?
		16	ends
		17
		18
		19	struct BLITTER
2467	Serge	20	dc RECT
		21	sc RECT
2434	Serge	22	dst_x dd ? ; 32
		23	dst_y dd ? ; 36
		24	src_x dd ? ; 40
		25	src_y dd ? ; 44
		26	w dd ? ; 48
		27	h dd ? ; 52
		28
		29	bitmap dd ? ; 56
		30	stride dd ? ; 60
		31	ends
		32
		33
2467	Serge	34
2434	Serge	35	align 4
2467	Serge	36	block_clip:
		37	;esi= clip RECT ptr
		38	;edi= RECT ptr
		39	;return code:
5596	serge	40	;CF= 0 - draw, 1 - don't draw
2434	Serge	41
		42	push ebx
		43
2467	Serge	44	mov eax, [edi+RECT.left]
		45	mov ebx, [edi+RECT.right]
		46	mov ecx, [esi+RECT.left] ;clip.left
		47	mov edx, [esi+RECT.right] ;clip.right
2434	Serge	48
2467	Serge	49	cmp eax, edx ;left >= clip.right
		50	jge .fail
2434	Serge	51
2467	Serge	52	cmp ebx, ecx ;right < clip.left
		53	jl .fail
2434	Serge	54
2467	Serge	55	cmp eax, ecx ;left >= clip.left
5596	serge	56	jge @F
2434	Serge	57
5596	serge	58	mov [edi+RECT.left], ecx
2467	Serge	59	@@:
		60	cmp ebx, edx ;right <= clip.right
		61	jle @f
5596	serge	62
		63	mov [edi+RECT.right], edx
2467	Serge	64	@@:
		65	mov eax, [edi+RECT.top]
		66	mov ebx, [edi+RECT.bottom]
		67	mov ecx, [esi+RECT.top] ;clip.top
		68	mov edx, [esi+RECT.bottom] ;clip.bottom
		69
		70	cmp eax, edx ;top >= clip.bottom
		71	jge .fail
		72
		73	cmp ebx, ecx ;bottom < clip.top
		74	jl .fail
		75
		76	cmp eax, ecx ;top >= clip.top
5596	serge	77	jge @F
2467	Serge	78
5596	serge	79	mov [edi+RECT.top], ecx
2467	Serge	80	@@:
		81	cmp ebx, edx ;bottom <= clip.bottom
		82	jle @f
5596	serge	83
		84	mov [edi+RECT.bottom], edx
2467	Serge	85	@@:
2434	Serge	86	pop ebx
5596	serge	87	clc
2434	Serge	88	ret
2467	Serge	89	.fail:
		90	pop ebx
5596	serge	91	stc
2467	Serge	92	ret
2434	Serge	93
2467	Serge	94
2434	Serge	95	align 4
		96	blit_clip:
		97
5596	serge	98	;return code:
		99	;CF= 0 - draw, 1 - don't draw
		100
2467	Serge	101	.sx0 equ 8
		102	.sy0 equ 12
		103	.sx1 equ 16
		104	.sy1 equ 20
2434	Serge	105
2467	Serge	106	.dx0 equ 24
		107	.dy0 equ 28
		108	.dx1 equ 32
		109	.dy1 equ 36
2434	Serge	110
		111
		112	push edi
		113	push esi
		114	push ebx
		115	sub esp, 40
		116
		117	mov ebx, ecx
		118	mov edx, [ecx+BLITTER.src_x]
		119	mov [esp+.sx0], edx
		120	mov eax, [ecx+BLITTER.src_y]
		121	mov [esp+.sy0], eax
		122	add edx, [ecx+BLITTER.w]
2467	Serge	123	add eax, [ecx+BLITTER.h]
2434	Serge	124	mov [esp+.sx1], edx
		125	mov [esp+.sy1], eax
		126
2467	Serge	127	lea edi, [esp+.sx0]
		128	lea esi, [ebx+BLITTER.sc]
2434	Serge	129
		130	call block_clip
5596	serge	131	jc .done
2434	Serge	132
		133	mov edi, [esp+.sx0]
		134	mov edx, [ebx+BLITTER.dst_x]
		135	add edx, edi
		136	sub edx, [ebx+BLITTER.src_x]
		137	mov [esp+.dx0], edx
		138
		139	mov ecx, [esp+.sy0]
		140	mov eax, [ebx+BLITTER.dst_y]
		141	add eax, ecx
		142	sub eax, [ebx+BLITTER.src_y]
		143	mov [esp+.dy0], eax
2467	Serge	144
2434	Serge	145	sub edx, edi
		146	add edx, [esp+.sx1]
		147	mov [esp+.dx1], edx
		148
		149	sub eax, ecx
		150	add eax, [esp+.sy1]
		151	mov [esp+.dy1], eax
		152
2467	Serge	153	lea edi, [esp+.dx0]
		154	lea esi, [ebx+BLITTER.dc]
2434	Serge	155	call block_clip
5596	serge	156	jc .done
2434	Serge	157
		158	mov edx, [esp+.dx0]
		159	mov eax, [esp+.dx1]
		160	sub eax, edx
		161	mov [ebx+BLITTER.w], eax
		162
		163	mov eax, [esp+.dy0]
		164	mov ecx, [esp+.dy1]
		165	sub ecx, eax
		166	mov [ebx+BLITTER.h], ecx
		167
		168	mov ecx, [ebx+BLITTER.src_x]
		169	add ecx, edx
		170	sub ecx, [ebx+BLITTER.dst_x]
		171	mov [ebx+BLITTER.src_x], ecx
		172
		173	mov ecx, [ebx+BLITTER.src_y]
		174	add ecx, eax
		175	sub ecx, [ebx+BLITTER.dst_y]
		176	mov [ebx+BLITTER.src_y], ecx
		177	mov [ebx+BLITTER.dst_x], edx
		178	mov [ebx+BLITTER.dst_y], eax
5596	serge	179	clc
2467	Serge	180	.done:
2434	Serge	181	add esp, 40
		182	pop ebx
		183	pop esi
		184	pop edi
		185
		186
		187	purge .sx0
		188	purge .sy0
		189	purge .sx1
		190	purge .sy1
		191
		192	purge .dx0
		193	purge .dy0
		194	purge .dx1
		195	purge .dy1
		196
		197	ret
		198
		199	align 4
		200	blit_32:
		201	push ebp
		202	push edi
		203	push esi
		204	push ebx
5596	serge	205	virtual at sizeof.BLITTER
		206	.position dd ? ; (x shl 16) + y
		207	; ???
		208	.extra_var1 dd ?
		209	.local_vars_size = $
		210	end virtual
		211	sub esp, .local_vars_size
2434	Serge	212
		213	mov eax, [TASK_BASE]
		214	mov ebx, [eax-twdw + WDATA.box.width]
		215	mov edx, [eax-twdw + WDATA.box.height]
2467	Serge	216	inc ebx
		217	inc edx
2434	Serge	218
		219	xor eax, eax
		220
2467	Serge	221	mov [esp+BLITTER.dc.left], eax
		222	mov [esp+BLITTER.dc.top], eax
		223	mov [esp+BLITTER.dc.right], ebx
		224	mov [esp+BLITTER.dc.bottom], edx
2434	Serge	225
2467	Serge	226	mov [esp+BLITTER.sc.left], eax
		227	mov [esp+BLITTER.sc.top], eax
2434	Serge	228	mov eax, [ecx+24]
2467	Serge	229
		230	mov [esp+BLITTER.sc.right], eax
2434	Serge	231	mov eax, [ecx+28]
		232
2467	Serge	233	mov [esp+BLITTER.sc.bottom], eax
		234
2434	Serge	235	mov eax, [ecx]
		236	mov [esp+BLITTER.dst_x], eax
		237	mov eax, [ecx+4]
		238	mov [esp+BLITTER.dst_y], eax
		239
		240	mov eax, [ecx+16]
		241	mov [esp+BLITTER.src_x], eax
		242	mov eax, [ecx+20]
		243	mov [esp+BLITTER.src_y], eax
		244	mov eax, [ecx+8]
		245	mov [esp+BLITTER.w], eax
		246	mov eax, [ecx+12]
		247	mov [esp+BLITTER.h], eax
		248
		249
		250	mov eax, [ecx+32]
5596	serge	251	mov [esp+BLITTER.bitmap], eax
2434	Serge	252	mov eax, [ecx+36]
5596	serge	253	mov [esp+BLITTER.stride], eax
2434	Serge	254
		255	mov ecx, esp
		256	call blit_clip
5596	serge	257	jc .L57
2434	Serge	258
		259	mov eax, [TASK_BASE]
		260
		261	mov ebx, [esp+BLITTER.dst_x]
		262	mov ebp, [esp+BLITTER.dst_y]
		263	add ebx, [eax-twdw + WDATA.box.left]
		264	add ebp, [eax-twdw + WDATA.box.top]
		265
		266	mov ecx, ebx
5596	serge	267	add ecx, [esp+BLITTER.w]
2434	Serge	268	shl ecx, 16
		269	mov cx, bp
5596	serge	270	add ecx, [esp+BLITTER.h]
2434	Serge	271
5596	serge	272	mov eax, ebx
		273	shl eax, 16
		274	mov ax, bp
		275	mov [esp+.position], eax
		276
2434	Serge	277	mov edi, ebp
		278
5596	serge	279	; imul edi, [_display.pitch]
2987	Serge	280	mov edi, [BPSLine_calc_area+edi*4]
5596	serge	281	; imul ebp, [_display.width]
2987	Serge	282	mov ebp, [d_width_calc_area+ebp*4]
2465	Serge	283
2434	Serge	284	add ebp, ebx
5577	serge	285	add ebp, [_display.win_map]
2434	Serge	286
		287	mov eax, [esp+BLITTER.src_y]
		288	imul eax, [esp+BLITTER.stride]
		289	mov esi, [esp+BLITTER.src_x]
		290	lea esi, [eax+esi*4]
		291	add esi, [esp+BLITTER.bitmap]
		292
5596	serge	293	mov eax, ecx
2434	Serge	294	mov ecx, [esp+BLITTER.h]
		295	mov edx, [esp+BLITTER.w]
		296
		297	test ecx, ecx ;FIXME check clipping
5596	serge	298	jz .L57
2434	Serge	299
		300	test edx, edx
5596	serge	301	jz .L57
2434	Serge	302
5596	serge	303	cmp [_display.bits_per_pixel], 32
		304	jne .core_24
		305
2434	Serge	306	lea edi, [edi+ebx*4]
		307
		308	mov ebx, [CURRENT_TASK]
5596	serge	309	; check for hardware cursor
		310	cmp [_display.select_cursor], select_cursor
		311	je .core_32.software_cursor
		312	cmp [_display.select_cursor], 0
		313	jne .core_32.hardware_cursor
		314	;--------------------------------------
		315	.core_32.software_cursor:
		316	align 4
		317	.outer32:
2987	Serge	318
5596	serge	319	align 4
		320	.inner32:
		321	cmp [ebp], bl
		322	jne .skip
		323	;--------------------------------------
		324	mov eax, [esi]
3232	Serge	325
5596	serge	326	mov ecx, [esp+.position]
		327
		328	; check mouse area for putpixel
		329	call [_display.check_mouse]
		330	;--------------------------------------
		331	; store to real LFB
		332	mov [LFB_BASE+edi], eax
		333	;--------------------------------------
2434	Serge	334	align 4
5596	serge	335	.skip:
		336	add esi, 4
		337	add edi, 4
		338	inc ebp
		339	add [esp+.position], 1 shl 16
		340	dec edx
		341	jnz .inner32
3232	Serge	342
5596	serge	343	add esi, [esp+BLITTER.stride]
		344	add edi, [_display.lfb_pitch]
		345	add ebp, [_display.width]
		346
		347	mov edx, [esp+BLITTER.w]
		348	mov eax, edx
		349	inc [esp+.position]
		350	sub ebp, edx
		351	shl eax, 2
		352	sub esi, eax
		353	sub edi, eax
		354	shl eax, 16-2
		355	sub [esp+.position], eax
		356	dec [esp+BLITTER.h]
		357	jnz .outer32
		358	jmp .done
		359	.core_32.hardware_cursor:
		360	align 4
		361	.hw.outer32:
		362	xor ecx, ecx
		363
		364	align 4
		365	.hw.inner32:
		366	cmp [ebp+ecx], bl
		367	jne .hw.skip
		368	mov eax, [esi+ecx*4]
		369	mov [LFB_BASE+edi+ecx*4], eax
		370
		371	align 4
		372	.hw.skip:
		373	inc ecx
		374	dec edx
		375	jnz .hw.inner32
		376
		377	add esi, [esp+BLITTER.stride]
		378	add edi, [_display.lfb_pitch]
		379	add ebp, [_display.width]
		380
		381	mov edx, [esp+BLITTER.w]
		382	dec [esp+BLITTER.h]
		383	jnz .hw.outer32
		384
3232	Serge	385	.done:
5596	serge	386	; call [draw_pointer]
		387	; call __sys_draw_pointer
		388	.L57:
		389	add esp, .local_vars_size
3232	Serge	390	pop ebx
		391	pop esi
		392	pop edi
		393	pop ebp
		394	ret
		395
5596	serge	396	.core_24:
		397	cmp [_display.bits_per_pixel], 24
		398	jne .core_16
3232	Serge	399
5596	serge	400	lea ebx, [ebx+ebx*2]
		401	lea edi, [LFB_BASE+edi+ebx]
		402	mov ebx, [CURRENT_TASK]
		403
3232	Serge	404	align 4
5596	serge	405	.outer24:
		406	mov [esp+.extra_var1], edi
		407	xor ecx, ecx
3232	Serge	408
2434	Serge	409	align 4
5596	serge	410	.inner24:
		411	cmp [ebp+ecx], bl ; Does the process own this pixel?
		412	jne .skip_1
2434	Serge	413	;--------------------------------------
5596	serge	414	push eax
2434	Serge	415	mov eax, [esi+ecx*4]
		416
5596	serge	417	lea edi, [edi+ecx*2]
		418
2465	Serge	419	; check for hardware cursor
		420	cmp [_display.select_cursor], select_cursor
		421	je @f
		422	cmp [_display.select_cursor], 0
5596	serge	423	jne .no_mouseunder_1
2465	Serge	424	;--------------------------------------
		425	align 4
		426	@@:
2434	Serge	427	push ecx
		428
5596	serge	429	mov ecx, [esp+4]
		430	ror ecx, 16
		431	sub ecx, edx
		432	rol ecx, 16
		433	sub ecx, [esp+BLITTER.h + 8]
		434
2434	Serge	435	; check mouse area for putpixel
		436	call [_display.check_mouse]
		437	pop ecx
2465	Serge	438	;--------------------------------------
		439	align 4
5596	serge	440	.no_mouseunder_1:
		441	mov [edi+ecx], ax
		442	shr eax, 16
		443	mov [edi+ecx+2], al
		444
		445	pop eax
2434	Serge	446	;--------------------------------------
		447	align 4
5596	serge	448	.skip_1:
2434	Serge	449	inc ecx
		450	dec edx
5596	serge	451	jnz .inner24
2434	Serge	452
		453	add esi, [esp+BLITTER.stride]
5596	serge	454	mov edi, [esp+.extra_var1]
5577	serge	455	add edi, [_display.lfb_pitch]
2434	Serge	456	add ebp, [_display.width]
		457
		458	mov edx, [esp+BLITTER.w]
		459	dec [esp+BLITTER.h]
5596	serge	460	jnz .outer24
2434	Serge	461
5596	serge	462	jmp .done
2434	Serge	463
2987	Serge	464
5596	serge	465	.core_16:
		466	lea edi, [LFB_BASE+edi+ebx*2]
		467	mov ebx, [CURRENT_TASK]
2434	Serge	468
5596	serge	469	.outer16:
		470	mov [esp+.extra_var1], edi
2434	Serge	471	xor ecx, ecx
		472
5596	serge	473	.inner16:
		474	cmp [ebp+ecx], bl ; Does the process own this pixel?
		475	jne .skip_2
2434	Serge	476	;--------------------------------------
5596	serge	477	push eax
2434	Serge	478	mov eax, [esi+ecx*4]
		479
2465	Serge	480	; check for hardware cursor
		481	cmp [_display.select_cursor], select_cursor
		482	je @f
		483	cmp [_display.select_cursor], 0
5596	serge	484	jne .no_mouseunder_2
2465	Serge	485	;--------------------------------------
5596	serge	486	@@:
2434	Serge	487	push ecx
		488
5596	serge	489	mov ecx, [esp+4]
		490	ror ecx, 16
		491	sub ecx, edx
		492	rol ecx, 16
		493	sub ecx, [esp+BLITTER.h + 8]
2434	Serge	494
		495	; check mouse area for putpixel
		496	call [_display.check_mouse]
		497	pop ecx
2465	Serge	498	;--------------------------------------
5596	serge	499	.no_mouseunder_2:
		500	; convert to 16 bpp and store to LFB
		501	and eax, 00000000111110001111110011111000b
		502	shr ah, 2
		503	shr ax, 3
		504	ror eax, 8
		505	add al, ah
		506	rol eax, 8
		507	mov [edi+ecx*2], ax
		508	pop eax
2434	Serge	509	;--------------------------------------
5596	serge	510	.skip_2:
2434	Serge	511	inc ecx
		512	dec edx
5596	serge	513	jnz .inner16
2434	Serge	514
		515	add esi, [esp+BLITTER.stride]
5596	serge	516	mov edi, [esp+.extra_var1]
5577	serge	517	add edi, [_display.lfb_pitch]
2434	Serge	518	add ebp, [_display.width]
		519
		520	mov edx, [esp+BLITTER.w]
		521	dec [esp+BLITTER.h]
5596	serge	522	jnz .outer16
2434	Serge	523
5596	serge	524	jmp .done
		525

Subversion Repositories Kolibri OS

(root)/kernel/branches/Kolibri-acpi/video/blitter.inc – Rev 5596