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: 9715 $
		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
6790	0CodErr	274	mov eax, [current_slot]
		275	add ebx, [eax + APPDATA.wnd_clientbox.left]
		276	add ebp, [eax + APPDATA.wnd_clientbox.top]
		277	.no_client_relative:
		278
2430	mario79	279	mov ecx, ebx
9715	Doczom	280	add ecx, [esp + BLITTER.w]
2430	mario79	281	shl ecx, 16
		282	mov cx, bp
9715	Doczom	283	add ecx, [esp + BLITTER.h]
2430	mario79	284
4444	clevermous	285	mov eax, ebx
		286	shl eax, 16
		287	mov ax, bp
9715	Doczom	288	mov [esp + .position], eax
4444	clevermous	289
2288	clevermous	290	mov edi, ebp
1894	serge	291
2480	mario79	292	; imul edi, [_display.pitch]
		293	mov edi, [BPSLine_calc_area+edi*4]
2446	mario79	294	; imul ebp, [_display.width]
2480	mario79	295	mov ebp, [d_width_calc_area+ebp*4]
2446	mario79	296
2288	clevermous	297	add ebp, ebx
5351	serge	298	add ebp, [_display.win_map]
1894	serge	299
9715	Doczom	300	mov eax, [esp + BLITTER.src_y]
		301	imul eax, [esp + BLITTER.stride]
		302	mov esi, [esp + BLITTER.src_x]
		303	lea esi, [eax + esi*4]
		304	add esi, [esp + BLITTER.bitmap]
1894	serge	305
2430	mario79	306	mov eax, ecx
9715	Doczom	307	mov ecx, [esp + BLITTER.h]
		308	mov edx, [esp + BLITTER.w]
1894	serge	309
2288	clevermous	310	test ecx, ecx ;FIXME check clipping
		311	jz .L57
1894	serge	312
2288	clevermous	313	test edx, edx
		314	jz .L57
1894	serge	315
5154	hidnplayr	316	cmp [_display.bits_per_pixel], 32
2288	clevermous	317	jne .core_24
1894	serge	318
9715	Doczom	319	lea edi, [edi + ebx*4]
1894	serge	320
8869	rgimad	321	mov ebx, [current_slot_idx]
4444	clevermous	322	; check for hardware cursor
		323	cmp [_display.select_cursor], select_cursor
		324	je .core_32.software_cursor
		325	cmp [_display.select_cursor], 0
		326	jne .core_32.hardware_cursor
		327	;--------------------------------------
		328	.core_32.software_cursor:
1894	serge	329	align 4
		330	.outer32:
		331
		332	align 4
		333	.inner32:
4444	clevermous	334	cmp [ebp], bl
2449	mario79	335	jne .skip
2430	mario79	336	;--------------------------------------
4444	clevermous	337	mov eax, [esi]
1894	serge	338
9715	Doczom	339	mov ecx, [esp + .position]
2430	mario79	340
		341	; check mouse area for putpixel
		342	call [_display.check_mouse]
2448	mario79	343	;--------------------------------------
2430	mario79	344	; store to real LFB
9715	Doczom	345	mov [LFB_BASE + edi], eax
2430	mario79	346	;--------------------------------------
		347	align 4
2449	mario79	348	.skip:
4444	clevermous	349	add esi, 4
		350	add edi, 4
		351	inc ebp
9715	Doczom	352	add [esp + .position], 1 shl 16
2288	clevermous	353	dec edx
		354	jnz .inner32
1894	serge	355
9715	Doczom	356	add esi, [esp + BLITTER.stride]
5351	serge	357	add edi, [_display.lfb_pitch]
2288	clevermous	358	add ebp, [_display.width]
1894	serge	359
9715	Doczom	360	mov edx, [esp + BLITTER.w]
4444	clevermous	361	mov eax, edx
		362	inc [esp+.position]
		363	sub ebp, edx
		364	shl eax, 2
		365	sub esi, eax
		366	sub edi, eax
		367	shl eax, 16-2
9715	Doczom	368	sub [esp + .position], eax
		369	dec [esp + BLITTER.h]
2288	clevermous	370	jnz .outer32
4444	clevermous	371	jmp .done
		372	.core_32.hardware_cursor:
		373	align 4
		374	.hw.outer32:
		375	xor ecx, ecx
1894	serge	376
4444	clevermous	377	align 4
		378	.hw.inner32:
9715	Doczom	379	cmp [ebp + ecx], bl
4444	clevermous	380	jne .hw.skip
9715	Doczom	381	mov eax, [esi + ecx*4]
		382	mov [LFB_BASE + edi + ecx*4], eax
4444	clevermous	383
		384	align 4
		385	.hw.skip:
		386	inc ecx
		387	dec edx
		388	jnz .hw.inner32
		389
9715	Doczom	390	add esi, [esp + BLITTER.stride]
5351	serge	391	add edi, [_display.lfb_pitch]
4444	clevermous	392	add ebp, [_display.width]
		393
9715	Doczom	394	mov edx, [esp + BLITTER.w]
		395	dec [esp + BLITTER.h]
4444	clevermous	396	jnz .hw.outer32
		397
1894	serge	398	.done:
2453	mario79	399	; call [draw_pointer]
2988	Serge	400	; call __sys_draw_pointer
1894	serge	401	.L57:
4444	clevermous	402	add esp, .local_vars_size
2288	clevermous	403	pop ebx
		404	pop esi
		405	pop edi
		406	pop ebp
1894	serge	407	ret
		408
		409	.core_24:
5161	hidnplayr	410	cmp [_display.bits_per_pixel], 24
		411	jne .core_16
		412
9715	Doczom	413	lea ebx, [ebx + ebx*2]
		414	lea edi, [LFB_BASE + edi + ebx]
8869	rgimad	415	mov ebx, [current_slot_idx]
1894	serge	416
		417	align 4
		418	.outer24:
9715	Doczom	419	mov [esp + .extra_var1], edi
2288	clevermous	420	xor ecx, ecx
1894	serge	421
		422	align 4
		423	.inner24:
9715	Doczom	424	cmp [ebp + ecx], bl ; Does the process own this pixel?
2449	mario79	425	jne .skip_1
2430	mario79	426	;--------------------------------------
		427	push eax
9715	Doczom	428	mov eax, [esi + ecx*4]
1894	serge	429
9715	Doczom	430	lea edi, [edi + ecx*2]
2430	mario79	431
2448	mario79	432	; check for hardware cursor
2451	mario79	433	cmp [_display.select_cursor], select_cursor
		434	je @f
2448	mario79	435	cmp [_display.select_cursor], 0
		436	jne .no_mouseunder_1
		437	;--------------------------------------
		438	align 4
		439	@@:
2430	mario79	440	push ecx
		441
		442	mov ecx, [esp+4]
		443	ror ecx, 16
		444	sub ecx, edx
		445	rol ecx, 16
9715	Doczom	446	sub ecx, [esp + BLITTER.h + 8]
2430	mario79	447
		448	; check mouse area for putpixel
		449	call [_display.check_mouse]
		450	pop ecx
2448	mario79	451	;--------------------------------------
		452	align 4
		453	.no_mouseunder_1:
9715	Doczom	454	mov [edi + ecx], ax
2288	clevermous	455	shr eax, 16
9715	Doczom	456	mov [edi + ecx+2], al
2430	mario79	457
		458	pop eax
		459	;--------------------------------------
		460	align 4
2449	mario79	461	.skip_1:
9715	Doczom	462	mov edi, [esp + .extra_var1]
2288	clevermous	463	inc ecx
		464	dec edx
		465	jnz .inner24
1894	serge	466
9715	Doczom	467	add esi, [esp + BLITTER.stride]
5351	serge	468	add edi, [_display.lfb_pitch]
2288	clevermous	469	add ebp, [_display.width]
1894	serge	470
9715	Doczom	471	mov edx, [esp + BLITTER.w]
		472	dec [esp + BLITTER.h]
2288	clevermous	473	jnz .outer24
1894	serge	474
2288	clevermous	475	jmp .done
5161	hidnplayr	476
		477
		478	.core_16:
9715	Doczom	479	lea edi, [LFB_BASE + edi + ebx*2]
8869	rgimad	480	mov ebx, [current_slot_idx]
5161	hidnplayr	481
5164	hidnplayr	482	.outer16:
9715	Doczom	483	mov [esp + .extra_var1], edi
5161	hidnplayr	484	xor ecx, ecx
		485
5164	hidnplayr	486	.inner16:
9715	Doczom	487	cmp [ebp + ecx], bl ; Does the process own this pixel?
5161	hidnplayr	488	jne .skip_2
		489	;--------------------------------------
		490	push eax
9715	Doczom	491	mov eax, [esi + ecx*4]
5161	hidnplayr	492
		493	; check for hardware cursor
		494	cmp [_display.select_cursor], select_cursor
		495	je @f
		496	cmp [_display.select_cursor], 0
		497	jne .no_mouseunder_2
		498	;--------------------------------------
5164	hidnplayr	499	@@:
5161	hidnplayr	500	push ecx
		501
		502	mov ecx, [esp+4]
		503	ror ecx, 16
		504	sub ecx, edx
		505	rol ecx, 16
9715	Doczom	506	sub ecx, [esp + BLITTER.h + 8]
5161	hidnplayr	507
		508	; check mouse area for putpixel
		509	call [_display.check_mouse]
		510	pop ecx
		511	;--------------------------------------
5164	hidnplayr	512	.no_mouseunder_2:
5161	hidnplayr	513	; convert to 16 bpp and store to LFB
		514	and eax, 00000000111110001111110011111000b
		515	shr ah, 2
		516	shr ax, 3
		517	ror eax, 8
		518	add al, ah
		519	rol eax, 8
9715	Doczom	520	mov [edi + ecx*2], ax
5161	hidnplayr	521	pop eax
		522	;--------------------------------------
5164	hidnplayr	523	.skip_2:
9715	Doczom	524	mov edi, [esp + .extra_var1]
5161	hidnplayr	525	inc ecx
		526	dec edx
		527	jnz .inner16
		528
9715	Doczom	529	add esi, [esp + BLITTER.stride]
5351	serge	530	add edi, [_display.lfb_pitch]
5161	hidnplayr	531	add ebp, [_display.width]
		532
9715	Doczom	533	mov edx, [esp + BLITTER.w]
		534	dec [esp + BLITTER.h]
5161	hidnplayr	535	jnz .outer16
		536
		537	jmp .done
		538

Subversion Repositories Kolibri OS

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