WebSVN – Kolibri OS – Blame – /kernel/trunk/video/blitter.inc

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

Subversion Repositories Kolibri OS

(root)/kernel/trunk/video/blitter.inc – Rev 9926