WebSVN – Kolibri OS – Blame – /kernel/trunk/gui/window.inc

Rev	Author	Line No.	Line
1362	mikedld	1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		2	;; ;;
2455	mario79	3	;; Copyright (C) KolibriOS team 2004-2012. All rights reserved. ;;
1362	mikedld	4	;; Copyright (C) MenuetOS 2000-2004 Ville Mikael Turjanmaa ;;
		5	;; Distributed under terms of the GNU General Public License ;;
		6	;; ;;
		7	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		8
		9	$Revision: 4779 $
		10
		11	;==============================================================================
		12	;///// public functions ///////////////////////////////////////////////////////
		13	;==============================================================================
		14
1391	mikedld	15	window.BORDER_SIZE = 5
		16
		17	macro FuncTable name, table_name, [label]
1362	mikedld	18	{
		19	common
		20	align 4
1391	mikedld	21	\label name#.#table_name dword
1362	mikedld	22	forward
		23	dd name#.#label
		24	common
1391	mikedld	25	name#.sizeof.#table_name = $ - name#.#table_name
1362	mikedld	26	}
		27
		28	uglobal
4778	Akyltist	29	common_colours rd 48
1391	mikedld	30	draw_limits RECT
1362	mikedld	31	endg
		32
		33	align 4
		34	;------------------------------------------------------------------------------
1391	mikedld	35	syscall_draw_window: ;///// system function 0 /////////////////////////////////
		36	;------------------------------------------------------------------------------
4779	Akyltist	37	;? .
1391	mikedld	38	;------------------------------------------------------------------------------
		39	mov eax, edx
		40	shr eax, 24
		41	and al, 0x0f
		42	cmp al, 5
		43	jae .exit
		44
		45	push eax
		46	call window._.sys_set_window
		47	pop eax
		48
		49	or al, al
		50	jnz @f
		51
		52	; type I - original style
		53	call drawwindow_I
		54	jmp window._.draw_window_caption.2
2436	mario79	55	;--------------------------------------
		56	align 4
		57	@@:
2288	clevermous	58	dec al
1391	mikedld	59	jnz @f
		60
		61	; type II - only reserve area, no draw
2436	mario79	62	; call sys_window_mouse
2453	mario79	63	; call [draw_pointer]
		64	call __sys_draw_pointer
1391	mikedld	65	jmp .exit
2436	mario79	66	;--------------------------------------
		67	align 4
		68	@@:
2288	clevermous	69	dec al
1391	mikedld	70	jnz @f
		71
		72	; type III - new style
		73	call drawwindow_III
		74	jmp window._.draw_window_caption.2
		75
		76	; type IV & V - skinned window (resizable & not)
2436	mario79	77	;--------------------------------------
		78	align 4
		79	@@:
2288	clevermous	80	mov eax, [TASK_COUNT]
1391	mikedld	81	movzx eax, word[WIN_POS + eax * 2]
		82	cmp eax, [CURRENT_TASK]
		83	setz al
		84	movzx eax, al
		85	push eax
		86	call drawwindow_IV
		87	jmp window._.draw_window_caption.2
2436	mario79	88	;--------------------------------------
		89	align 4
		90	.exit:
1391	mikedld	91	ret
2436	mario79	92	;------------------------------------------------------------------------------
1391	mikedld	93	align 4
		94	;------------------------------------------------------------------------------
1362	mikedld	95	syscall_display_settings: ;///// system function 48 ///////////////////////////
		96	;------------------------------------------------------------------------------
		97	;; Redraw screen:
		98	;< ebx = 0
		99	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		100	;; Set button style:
		101	;< ebx = 1
		102	;< ecx = 0 (flat) or 1 (with gradient)
		103	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		104	;; Set system color palette:
		105	;< ebx = 2
		106	;< ecx = pointer to color table
		107	;< edx = size of color table
		108	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		109	;; Get system color palette:
		110	;< ebx = 3
		111	;< ecx = pointer to color table buffer
		112	;< edx = size of color table buffer
		113	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		114	;; Get skinned caption height:
		115	;< ebx = 4
		116	;> eax = height in pixels
		117	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		118	;; Get screen working area:
		119	;< ebx = 5
		120	;> eax = pack[16(left), 16(right)]
		121	;> ebx = pack[16(top), 16(bottom)]
		122	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		123	;; Set screen working area:
		124	;< ebx = 6
		125	;< ecx = pack[16(left), 16(right)]
		126	;< edx = pack[16(top), 16(bottom)]
		127	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		128	;; Get skin margins:
		129	;< ebx = 7
		130	;> eax = pack[16(left), 16(right)]
		131	;> ebx = pack[16(top), 16(bottom)]
		132	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		133	;; Set skin:
		134	;< ebx = 8
		135	;< ecx = pointer to FileInfoBlock struct
		136	;> eax = FS error code
		137	;------------------------------------------------------------------------------
		138	cmp ebx, .sizeof.ftable / 4
		139	ja @f
		140	jmp [.ftable + ebx * 4]
2436	mario79	141	;--------------------------------------
		142	align 4
		143	@@:
2288	clevermous	144	ret
2436	mario79	145	;------------------------------------------------------------------------------
1362	mikedld	146	align 4
		147	syscall_display_settings.00:
		148	xor eax, eax
		149	inc ebx
		150	cmp [windowtypechanged], ebx
		151	jne .exit
		152	mov [windowtypechanged], eax
		153
		154	jmp syscall_display_settings._.redraw_whole_screen
2436	mario79	155	;--------------------------------------
		156	align 4
		157	.exit:
1362	mikedld	158	ret
2436	mario79	159	;------------------------------------------------------------------------------
1362	mikedld	160	align 4
		161	syscall_display_settings.01:
		162	and ecx, 1
		163	cmp ecx, [buttontype]
		164	je .exit
		165	mov [buttontype], ecx
		166	mov [windowtypechanged], ebx
2436	mario79	167	;--------------------------------------
		168	align 4
1362	mikedld	169	.exit:
		170	ret
2436	mario79	171	;------------------------------------------------------------------------------
1362	mikedld	172	align 4
		173	syscall_display_settings.02:
		174	dec ebx
		175	mov esi, ecx
4778	Akyltist	176	and edx, 255
1362	mikedld	177	mov edi, common_colours
		178	mov ecx, edx
2288	clevermous	179	rep movsb
1362	mikedld	180	mov [windowtypechanged], ebx
		181	ret
2436	mario79	182	;------------------------------------------------------------------------------
1362	mikedld	183	align 4
		184	syscall_display_settings.03:
		185	mov edi, ecx
4778	Akyltist	186	and edx, 255
1362	mikedld	187	mov esi, common_colours
		188	mov ecx, edx
2288	clevermous	189	rep movsb
1362	mikedld	190	ret
2436	mario79	191	;------------------------------------------------------------------------------
1362	mikedld	192	align 4
		193	syscall_display_settings.04:
		194	mov eax, [_skinh]
		195	mov [esp + 32], eax
		196	ret
2436	mario79	197	;------------------------------------------------------------------------------
1362	mikedld	198	align 4
		199	syscall_display_settings.05:
		200	mov eax, [screen_workarea.left - 2]
		201	mov ax, word[screen_workarea.right]
		202	mov [esp + 32], eax
		203	mov eax, [screen_workarea.top - 2]
		204	mov ax, word[screen_workarea.bottom]
		205	mov [esp + 20], eax
		206	ret
2436	mario79	207	;------------------------------------------------------------------------------
1362	mikedld	208	align 4
		209	syscall_display_settings.06:
		210	xor esi, esi
		211
		212	mov edi, [Screen_Max_X]
		213	mov eax, ecx
		214	movsx ebx, ax
		215	sar eax, 16
		216	cmp eax, ebx
		217	jge .check_horizontal
		218	inc esi
		219	or eax, eax
		220	jge @f
		221	xor eax, eax
2436	mario79	222	;--------------------------------------
		223	align 4
		224	@@:
2288	clevermous	225	mov [screen_workarea.left], eax
1362	mikedld	226	cmp ebx, edi
		227	jle @f
		228	mov ebx, edi
2436	mario79	229	;--------------------------------------
		230	align 4
		231	@@:
2288	clevermous	232	mov [screen_workarea.right], ebx
2436	mario79	233	;--------------------------------------
		234	align 4
		235	.check_horizontal:
1362	mikedld	236	mov edi, [Screen_Max_Y]
		237	mov eax, edx
		238	movsx ebx, ax
		239	sar eax, 16
		240	cmp eax, ebx
		241	jge .check_if_redraw_needed
		242	inc esi
		243	or eax, eax
		244	jge @f
		245	xor eax, eax
2436	mario79	246	;--------------------------------------
		247	align 4
		248	@@:
2288	clevermous	249	mov [screen_workarea.top], eax
1362	mikedld	250	cmp ebx, edi
		251	jle @f
		252	mov ebx, edi
2436	mario79	253	;--------------------------------------
		254	align 4
		255	@@:
2288	clevermous	256	mov [screen_workarea.bottom], ebx
2436	mario79	257	;--------------------------------------
		258	align 4
		259	.check_if_redraw_needed:
1362	mikedld	260	or esi, esi
		261	jz .exit
		262
		263	call repos_windows
		264	jmp syscall_display_settings._.calculate_whole_screen
2436	mario79	265	;--------------------------------------
		266	align 4
		267	.exit:
1362	mikedld	268	ret
2436	mario79	269	;------------------------------------------------------------------------------
1362	mikedld	270	align 4
		271	syscall_display_settings.07:
		272	mov eax, [_skinmargins + 0]
		273	mov [esp + 32], eax
		274	mov eax, [_skinmargins + 4]
		275	mov [esp + 20], eax
		276	ret
2436	mario79	277	;------------------------------------------------------------------------------
1362	mikedld	278	align 4
		279	syscall_display_settings.08:
		280	mov ebx, ecx
		281	call read_skin_file
		282	mov [esp + 32], eax
		283	test eax, eax
		284	jnz .exit
		285
		286	call syscall_display_settings._.calculate_whole_screen
		287	jmp syscall_display_settings._.redraw_whole_screen
2436	mario79	288	;--------------------------------------
		289	align 4
		290	.exit:
1362	mikedld	291	ret
2436	mario79	292	;------------------------------------------------------------------------------
		293	align 4
1362	mikedld	294	syscall_display_settings._.calculate_whole_screen:
		295	xor eax, eax
		296	xor ebx, ebx
		297	mov ecx, [Screen_Max_X]
		298	mov edx, [Screen_Max_Y]
		299	jmp calculatescreen
2436	mario79	300	;------------------------------------------------------------------------------
		301	align 4
1362	mikedld	302	syscall_display_settings._.redraw_whole_screen:
		303	xor eax, eax
		304	mov [draw_limits.left], eax
		305	mov [draw_limits.top], eax
		306	mov eax, [Screen_Max_X]
		307	mov [draw_limits.right], eax
		308	mov eax, [Screen_Max_Y]
		309	mov [draw_limits.bottom], eax
		310	mov eax, window_data
		311	jmp redrawscreen
2436	mario79	312	;------------------------------------------------------------------------------
1362	mikedld	313	align 4
		314	;------------------------------------------------------------------------------
		315	syscall_set_window_shape: ;///// system function 50 ///////////////////////////
		316	;------------------------------------------------------------------------------
		317	;; Set window shape address:
1369	Lrz	318	;> ebx = 0
		319	;> ecx = shape data address
1362	mikedld	320	; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
		321	;; Set window shape scale:
1369	Lrz	322	;> ebx = 1
		323	;> ecx = scale power (resulting scale is 2^ebx)
1362	mikedld	324	;------------------------------------------------------------------------------
		325	mov edi, [current_slot]
		326
1369	Lrz	327	test ebx, ebx
1362	mikedld	328	jne .shape_scale
1369	Lrz	329	mov [edi + APPDATA.wnd_shape], ecx
2436	mario79	330	;--------------------------------------
		331	align 4
		332	.shape_scale:
1369	Lrz	333	dec ebx
1362	mikedld	334	jnz .exit
1369	Lrz	335	mov [edi + APPDATA.wnd_shape_scale], ecx
2436	mario79	336	;--------------------------------------
		337	align 4
		338	.exit:
1362	mikedld	339	ret
2436	mario79	340	;------------------------------------------------------------------------------
1362	mikedld	341	align 4
		342	;------------------------------------------------------------------------------
1391	mikedld	343	syscall_move_window: ;///// system function 67 ////////////////////////////////
		344	;------------------------------------------------------------------------------
		345	;?
		346	;------------------------------------------------------------------------------
		347	mov edi, [CURRENT_TASK]
		348	shl edi, 5
		349	add edi, window_data
		350
1563	diamond	351	test [edi + WDATA.fl_wdrawn], 1
		352	jz .exit
		353
1391	mikedld	354	test [edi + WDATA.fl_wstate], WSTATE_MAXIMIZED
		355	jnz .exit
		356
		357	cmp ebx, -1
		358	jne @f
		359	mov ebx, [edi + WDATA.box.left]
2436	mario79	360	;--------------------------------------
		361	align 4
		362	@@:
2288	clevermous	363	cmp ecx, -1
1391	mikedld	364	jne @f
		365	mov ecx, [edi + WDATA.box.top]
2436	mario79	366	;--------------------------------------
		367	align 4
		368	@@:
2288	clevermous	369	cmp edx, -1
1391	mikedld	370	jne @f
		371	mov edx, [edi + WDATA.box.width]
2436	mario79	372	;--------------------------------------
		373	align 4
		374	@@:
2288	clevermous	375	cmp esi, -1
1391	mikedld	376	jne @f
		377	mov esi, [edi + WDATA.box.height]
2436	mario79	378	;--------------------------------------
		379	align 4
		380	@@:
2288	clevermous	381	push esi edx ecx ebx
1391	mikedld	382	mov eax, esp
		383	mov bl, [edi + WDATA.fl_wstate]
3452	mario79	384	;--------------------------------------
		385	align 4
		386	@@:
		387	cmp [REDRAW_BACKGROUND], byte 0
		388	jz @f
		389	call change_task
		390	jmp @b
		391	;--------------------------------------
		392	align 4
		393	@@:
1391	mikedld	394	call window._.set_window_box
2381	hidnplayr	395	add esp, sizeof.BOX
1391	mikedld	396
		397	; NOTE: do we really need this? to be reworked
		398	; mov byte[DONT_DRAW_MOUSE], 0 ; mouse pointer
		399	; mov byte[MOUSE_BACKGROUND], 0 ; no mouse under
		400	; mov byte[MOUSE_DOWN], 0 ; react to mouse up/down
		401
		402	; NOTE: do we really need this? to be reworked
		403	; call [draw_pointer]
2436	mario79	404	;--------------------------------------
		405	align 4
		406	.exit:
1391	mikedld	407	ret
2436	mario79	408	;------------------------------------------------------------------------------
1391	mikedld	409	align 4
		410	;------------------------------------------------------------------------------
		411	syscall_window_settings: ;///// system function 71 /////////////////////////////
		412	;------------------------------------------------------------------------------
		413	;?
		414	;------------------------------------------------------------------------------
		415	dec ebx ; subfunction #1 - set window caption
		416	jnz .exit_fail
		417
		418	; NOTE: only window owner thread can set its caption,
		419	; so there's no parameter for PID/TID
		420
		421	mov edi, [CURRENT_TASK]
		422	shl edi, 5
		423
		424	mov [edi * 8 + SLOT_BASE + APPDATA.wnd_caption], ecx
		425	or [edi + window_data + WDATA.fl_wstyle], WSTYLE_HASCAPTION
		426
		427	call window._.draw_window_caption
		428
		429	xor eax, eax ; eax = 0 (success)
		430	ret
		431
		432	; .get_window_caption:
		433	; dec eax ; subfunction #2 - get window caption
		434	; jnz .exit_fail
		435
		436	; not implemented yet
2436	mario79	437	;--------------------------------------
		438	align 4
		439	.exit_fail:
1391	mikedld	440	xor eax, eax
		441	inc eax ; eax = 1 (fail)
		442	ret
2436	mario79	443	;------------------------------------------------------------------------------
1391	mikedld	444	align 4
		445	;------------------------------------------------------------------------------
1362	mikedld	446	set_window_defaults: ;/////////////////////////////////////////////////////////
		447	;------------------------------------------------------------------------------
		448	;?
		449	;------------------------------------------------------------------------------
1540	diamond	450	mov byte [window_data + 0x20 + WDATA.cl_titlebar + 3], 1 ; desktop is not movable
1362	mikedld	451	push eax ecx
		452	xor eax, eax
		453	mov ecx, WIN_STACK
2436	mario79	454	;--------------------------------------
		455	align 4
		456	@@:
2288	clevermous	457	inc eax
1362	mikedld	458	add ecx, 2
		459	; process no
		460	mov [ecx + 0x000], ax
		461	; positions in stack
		462	mov [ecx + 0x400], ax
		463	cmp ecx, WIN_POS - 2
		464	jne @b
		465	pop ecx eax
		466	ret
2436	mario79	467	;------------------------------------------------------------------------------
1362	mikedld	468	align 4
		469	;------------------------------------------------------------------------------
		470	calculatescreen: ;/////////////////////////////////////////////////////////////
		471	;------------------------------------------------------------------------------
		472	;? Scan all windows from bottom to top, calling `setscreen` for each one
		473	;? intersecting given screen area
		474	;------------------------------------------------------------------------------
		475	;> eax = left
		476	;> ebx = top
		477	;> ecx = right
		478	;> edx = bottom
		479	;------------------------------------------------------------------------------
		480	push esi
		481	pushfd
		482	cli
		483
		484	mov esi, 1
		485	call window._.set_screen
		486
		487	push ebp
		488
		489	mov ebp, [TASK_COUNT]
		490	cmp ebp, 1
		491	jbe .exit
		492
		493	push edx ecx ebx eax
2436	mario79	494	;--------------------------------------
		495	align 4
		496	.next_window:
1362	mikedld	497	movzx edi, word[WIN_POS + esi * 2]
		498	shl edi, 5
		499
		500	cmp [CURRENT_TASK + edi + TASKDATA.state], TSTATE_FREE
		501	je .skip_window
		502
		503	add edi, window_data
		504	test [edi + WDATA.fl_wstate], WSTATE_MINIMIZED
		505	jnz .skip_window
		506
		507	mov eax, [edi + WDATA.box.left]
		508	cmp eax, [esp + RECT.right]
1368	mikedld	509	jg .skip_window
1362	mikedld	510	mov ebx, [edi + WDATA.box.top]
		511	cmp ebx, [esp + RECT.bottom]
1368	mikedld	512	jg .skip_window
1362	mikedld	513	mov ecx, [edi + WDATA.box.width]
		514	add ecx, eax
		515	cmp ecx, [esp + RECT.left]
1368	mikedld	516	jl .skip_window
1362	mikedld	517	mov edx, [edi + WDATA.box.height]
		518	add edx, ebx
		519	cmp edx, [esp + RECT.top]
1368	mikedld	520	jl .skip_window
1362	mikedld	521
		522	cmp eax, [esp + RECT.left]
		523	jae @f
		524	mov eax, [esp + RECT.left]
2436	mario79	525	;--------------------------------------
		526	align 4
		527	@@:
2288	clevermous	528	cmp ebx, [esp + RECT.top]
1362	mikedld	529	jae @f
		530	mov ebx, [esp + RECT.top]
2436	mario79	531	;--------------------------------------
		532	align 4
		533	@@:
2288	clevermous	534	cmp ecx, [esp + RECT.right]
1362	mikedld	535	jbe @f
		536	mov ecx, [esp + RECT.right]
2436	mario79	537	;--------------------------------------
		538	align 4
		539	@@:
2288	clevermous	540	cmp edx, [esp + RECT.bottom]
1362	mikedld	541	jbe @f
		542	mov edx, [esp + RECT.bottom]
2436	mario79	543	;--------------------------------------
		544	align 4
		545	@@:
2288	clevermous	546	push esi
1362	mikedld	547	movzx esi, word[WIN_POS + esi * 2]
		548	call window._.set_screen
		549	pop esi
2436	mario79	550	;--------------------------------------
		551	align 4
		552	.skip_window:
1362	mikedld	553	inc esi
		554	dec ebp
		555	jnz .next_window
		556
		557	pop eax ebx ecx edx
2436	mario79	558	;--------------------------------------
		559	align 4
		560	.exit:
1362	mikedld	561	pop ebp
2443	Serge	562	inc [_display.mask_seqno]
1362	mikedld	563	popfd
		564	pop esi
		565	ret
2436	mario79	566	;------------------------------------------------------------------------------
1362	mikedld	567	align 4
		568	;------------------------------------------------------------------------------
		569	repos_windows: ;///////////////////////////////////////////////////////////////
		570	;------------------------------------------------------------------------------
		571	;?
		572	;------------------------------------------------------------------------------
		573	mov ecx, [TASK_COUNT]
2381	hidnplayr	574	mov edi, window_data + sizeof.WDATA * 2
1362	mikedld	575	call force_redraw_background
		576	dec ecx
		577	jle .exit
2436	mario79	578	;--------------------------------------
		579	align 4
		580	.next_window:
1362	mikedld	581	mov [edi + WDATA.fl_redraw], 1
		582	test [edi + WDATA.fl_wstate], WSTATE_MAXIMIZED
		583	jnz .fix_maximized
		584
		585	mov eax, [edi + WDATA.box.left]
		586	add eax, [edi + WDATA.box.width]
		587	mov ebx, [Screen_Max_X]
		588	cmp eax, ebx
		589	jle .fix_vertical
		590	mov eax, [edi + WDATA.box.width]
		591	sub eax, ebx
		592	jle @f
		593	mov [edi + WDATA.box.width], ebx
2436	mario79	594	;--------------------------------------
		595	align 4
		596	@@:
2288	clevermous	597	sub ebx, [edi + WDATA.box.width]
1362	mikedld	598	mov [edi + WDATA.box.left], ebx
2436	mario79	599	;--------------------------------------
		600	align 4
		601	.fix_vertical:
1362	mikedld	602	mov eax, [edi + WDATA.box.top]
		603	add eax, [edi + WDATA.box.height]
		604	mov ebx, [Screen_Max_Y]
		605	cmp eax, ebx
		606	jle .fix_client_box
		607	mov eax, [edi + WDATA.box.height]
		608	sub eax, ebx
		609	jle @f
		610	mov [edi + WDATA.box.height], ebx
2436	mario79	611	;--------------------------------------
		612	align 4
		613	@@:
2288	clevermous	614	sub ebx, [edi + WDATA.box.height]
1362	mikedld	615	mov [edi + WDATA.box.top], ebx
2436	mario79	616	;--------------------------------------
		617	align 4
		618	.fix_client_box:
		619	call window._.set_window_clientbox
		620	add edi, sizeof.WDATA
		621	loop .next_window
		622	;--------------------------------------
		623	align 4
		624	.exit:
		625	ret
		626	;--------------------------------------
		627	align 4
		628	.fix_maximized:
1362	mikedld	629	mov eax, [screen_workarea.left]
		630	mov [edi + WDATA.box.left], eax
		631	sub eax, [screen_workarea.right]
		632	neg eax
		633	mov [edi + WDATA.box.width], eax
		634	mov eax, [screen_workarea.top]
		635	mov [edi + WDATA.box.top], eax
		636	test [edi + WDATA.fl_wstate], WSTATE_ROLLEDUP
		637	jnz .fix_client_box
		638	sub eax, [screen_workarea.bottom]
		639	neg eax
		640	mov [edi + WDATA.box.height], eax
2436	mario79	641	jmp .fix_client_box
1362	mikedld	642	;------------------------------------------------------------------------------
2436	mario79	643	;align 4
1362	mikedld	644	;------------------------------------------------------------------------------
2436	mario79	645	;sys_window_mouse: ;////////////////////////////////////////////////////////////
		646	;------------------------------------------------------------------------------
1362	mikedld	647	;?
		648	;------------------------------------------------------------------------------
1391	mikedld	649	; NOTE: commented out since doesn't provide necessary functionality
		650	; anyway, to be reworked
		651	; push eax
		652	;
		653	; mov eax, [timer_ticks]
		654	; cmp [new_window_starting], eax
		655	; jb .exit
		656	;
		657	; mov byte[MOUSE_BACKGROUND], 0
		658	; mov byte[DONT_DRAW_MOUSE], 0
		659	;
		660	; mov [new_window_starting], eax
		661	;
		662	; .exit:
		663	; pop eax
2436	mario79	664	; ret
		665	;------------------------------------------------------------------------------
1362	mikedld	666	align 4
		667	;------------------------------------------------------------------------------
		668	draw_rectangle: ;//////////////////////////////////////////////////////////////
		669	;------------------------------------------------------------------------------
		670	;> eax = pack[16(left), 16(right)]
		671	;> ebx = pack[16(top), 16(bottom)]
		672	;> esi = color
2423	mario79	673	; ?? RR GG BB ; 0x01000000 negation
		674	; ; 0x02000000 used for draw_rectangle without top line
		675	; ; for example drawwindow_III and drawwindow_IV
1362	mikedld	676	;------------------------------------------------------------------------------
		677	push eax ebx ecx edi
		678
		679	xor edi, edi
2436	mario79	680	;--------------------------------------
		681	align 4
		682	.flags_set:
1362	mikedld	683	push ebx
		684
		685	; set line color
		686	mov ecx, esi
		687	; draw top border
		688	rol ebx, 16
		689	push ebx
		690	rol ebx, 16
		691	pop bx
2423	mario79	692	test ecx, 1 shl 25
		693	jnz @f
		694	sub ecx, 1 shl 25
2453	mario79	695	; call [draw_line]
		696	call __sys_draw_line
2436	mario79	697	;--------------------------------------
		698	align 4
2423	mario79	699	@@:
1362	mikedld	700	; draw bottom border
		701	mov ebx, [esp - 2]
		702	pop bx
2453	mario79	703	; call [draw_line]
		704	call __sys_draw_line
1362	mikedld	705
		706	pop ebx
		707	add ebx, 1 * 65536 - 1
		708
		709	; draw left border
		710	rol eax, 16
		711	push eax
		712	rol eax, 16
		713	pop ax
2453	mario79	714	; call [draw_line]
		715	call __sys_draw_line
1362	mikedld	716
		717	; draw right border
		718	mov eax, [esp - 2]
		719	pop ax
2453	mario79	720	; call [draw_line]
		721	call __sys_draw_line
1362	mikedld	722
		723	pop edi ecx ebx eax
		724	ret
2436	mario79	725	;--------------------------------------
		726	align 4
		727	.forced:
1362	mikedld	728	push eax ebx ecx edi
		729	xor edi, edi
		730	inc edi
		731	jmp .flags_set
2436	mario79	732	;------------------------------------------------------------------------------
1362	mikedld	733	align 4
		734	;------------------------------------------------------------------------------
		735	drawwindow_I_caption: ;////////////////////////////////////////////////////////
		736	;------------------------------------------------------------------------------
		737	;?
		738	;------------------------------------------------------------------------------
		739	push [edx + WDATA.cl_titlebar]
		740	mov esi, edx
		741
		742	mov edx, [esi + WDATA.box.top]
		743	mov eax, edx
		744	lea ebx, [edx + 21]
		745	inc edx
		746	add eax, [esi + WDATA.box.height]
		747
		748	cmp ebx, eax
		749	jbe @f
		750	mov ebx, eax
2436	mario79	751	;--------------------------------------
		752	align 4
		753	@@:
2288	clevermous	754	push ebx
1362	mikedld	755
		756	xor edi, edi
2436	mario79	757	;--------------------------------------
		758	align 4
		759	.next_line:
1362	mikedld	760	mov ebx, edx
		761	shl ebx, 16
		762	add ebx, edx
		763	mov eax, [esi + WDATA.box.left]
		764	inc eax
		765	shl eax, 16
		766	add eax, [esi + WDATA.box.left]
		767	add eax, [esi + WDATA.box.width]
		768	dec eax
		769	mov ecx, [esi + WDATA.cl_titlebar]
		770	test ecx, 0x80000000
		771	jz @f
		772	sub ecx, 0x00040404
		773	mov [esi + WDATA.cl_titlebar], ecx
2436	mario79	774	;--------------------------------------
		775	align 4
		776	@@:
2288	clevermous	777	and ecx, 0x00ffffff
2453	mario79	778	; call [draw_line]
		779	call __sys_draw_line
1362	mikedld	780	inc edx
		781	cmp edx, [esp]
		782	jb .next_line
		783
		784	add esp, 4
		785	pop [esi + WDATA.cl_titlebar]
		786	ret
2436	mario79	787	;------------------------------------------------------------------------------
1362	mikedld	788	align 4
		789	;------------------------------------------------------------------------------
		790	drawwindow_I: ;////////////////////////////////////////////////////////////////
		791	;------------------------------------------------------------------------------
		792	;?
		793	;------------------------------------------------------------------------------
		794	pushad
		795
		796	; window border
		797
		798	mov eax, [edx + WDATA.box.left - 2]
		799	mov ax, word[edx + WDATA.box.left]
		800	add ax, word[edx + WDATA.box.width]
		801	mov ebx, [edx + WDATA.box.top - 2]
		802	mov bx, word[edx + WDATA.box.top]
		803	add bx, word[edx + WDATA.box.height]
		804
		805	mov esi, [edx + WDATA.cl_frames]
		806	call draw_rectangle
		807
		808	; window caption
		809
		810	call drawwindow_I_caption
		811
		812	; window client area
		813
		814	; do we need to draw it?
		815	mov edi, [esi + WDATA.cl_workarea]
		816	test edi, 0x40000000
		817	jnz .exit
		818
		819	; does client area have a positive size on screen?
4572	clevermous	820	cmp [esi + WDATA.box.height], 21
		821	jle .exit
1362	mikedld	822
		823	; okay, let's draw it
		824	mov eax, 1
		825	mov ebx, 21
		826	mov ecx, [esi + WDATA.box.width]
		827	mov edx, [esi + WDATA.box.height]
2453	mario79	828	; call [drawbar]
		829	call vesa20_drawbar
2436	mario79	830	;--------------------------------------
		831	align 4
		832	.exit:
1362	mikedld	833	popad
		834	ret
2436	mario79	835	;------------------------------------------------------------------------------
1362	mikedld	836	align 4
		837	;------------------------------------------------------------------------------
		838	drawwindow_III_caption: ;/////////////////////////////////////////////////////
		839	;------------------------------------------------------------------------------
		840	;?
		841	;------------------------------------------------------------------------------
		842	mov ecx, [edx + WDATA.cl_titlebar]
		843	push ecx
		844	mov esi, edx
		845	mov edx, [esi + WDATA.box.top]
		846	add edx, 4
		847	mov ebx, [esi + WDATA.box.top]
		848	add ebx, 20
		849	mov eax, [esi + WDATA.box.top]
		850	add eax, [esi + WDATA.box.height]
		851
		852	cmp ebx, eax
		853	jb @f
		854	mov ebx, eax
2436	mario79	855	;--------------------------------------
		856	align 4
		857	@@:
2288	clevermous	858	push ebx
1362	mikedld	859
		860	xor edi, edi
2436	mario79	861	;--------------------------------------
		862	align 4
		863	.next_line:
1362	mikedld	864	mov ebx, edx
		865	shl ebx, 16
		866	add ebx, edx
		867	mov eax, [esi + WDATA.box.left]
		868	shl eax, 16
		869	add eax, [esi + WDATA.box.left]
		870	add eax, [esi + WDATA.box.width]
		871	add eax, 4 * 65536 - 4
		872	mov ecx, [esi + WDATA.cl_titlebar]
		873	test ecx, 0x40000000
		874	jz @f
		875	add ecx, 0x00040404
2436	mario79	876	;--------------------------------------
		877	align 4
		878	@@:
2288	clevermous	879	test ecx, 0x80000000
1362	mikedld	880	jz @f
		881	sub ecx, 0x00040404
2436	mario79	882	;--------------------------------------
		883	align 4
		884	@@:
2288	clevermous	885	mov [esi + WDATA.cl_titlebar], ecx
1362	mikedld	886	and ecx, 0x00ffffff
2453	mario79	887	; call [draw_line]
		888	call __sys_draw_line
1362	mikedld	889	inc edx
		890	cmp edx, [esp]
		891	jb .next_line
		892
		893	add esp, 4
		894	pop [esi + WDATA.cl_titlebar]
		895	ret
2436	mario79	896	;------------------------------------------------------------------------------
1362	mikedld	897	align 4
		898	;------------------------------------------------------------------------------
		899	drawwindow_III: ;//////////////////////////////////////////////////////////////
		900	;------------------------------------------------------------------------------
		901	;?
		902	;------------------------------------------------------------------------------
		903	pushad
		904
		905	; window border
		906
		907	mov eax, [edx + WDATA.box.left - 2]
		908	mov ax, word[edx + WDATA.box.left]
		909	add ax, word[edx + WDATA.box.width]
		910	mov ebx, [edx + WDATA.box.top - 2]
		911	mov bx, word[edx + WDATA.box.top]
		912	add bx, word[edx + WDATA.box.height]
		913
		914	mov esi, [edx + WDATA.cl_frames]
		915	shr esi, 1
		916	and esi, 0x007f7f7f
		917	call draw_rectangle
		918
		919	push esi
		920	mov ecx, 3
		921	mov esi, [edx + WDATA.cl_frames]
2436	mario79	922	;--------------------------------------
		923	align 4
		924	.next_frame:
1362	mikedld	925	add eax, 1 * 65536 - 1
2458	mario79	926	add ebx, 1 * 65536 - 1
1362	mikedld	927	call draw_rectangle
		928	dec ecx
		929	jnz .next_frame
		930
		931	pop esi
		932	add eax, 1 * 65536 - 1
2458	mario79	933	add ebx, 1 * 65536 - 1
1362	mikedld	934	call draw_rectangle
		935
		936	; window caption
		937
		938	call drawwindow_III_caption
		939
		940	; window client area
		941
		942	; do we need to draw it?
		943	mov edi, [esi + WDATA.cl_workarea]
		944	test edi, 0x40000000
		945	jnz .exit
		946
		947	; does client area have a positive size on screen?
		948	mov edx, [esi + WDATA.box.top]
		949	add edx, 21 + 5
		950	mov ebx, [esi + WDATA.box.top]
		951	add ebx, [esi + WDATA.box.height]
		952	cmp edx, ebx
		953	jg .exit
		954
		955	; okay, let's draw it
		956	mov eax, 5
		957	mov ebx, 20
		958	mov ecx, [esi + WDATA.box.width]
		959	mov edx, [esi + WDATA.box.height]
		960	sub ecx, 4
		961	sub edx, 4
2453	mario79	962	; call [drawbar]
		963	call vesa20_drawbar
2436	mario79	964	;--------------------------------------
		965	align 4
		966	.exit:
1362	mikedld	967	popad
		968	ret
2436	mario79	969	;------------------------------------------------------------------------------
1362	mikedld	970	align 4
		971	;------------------------------------------------------------------------------
		972	waredraw: ;////////////////////////////////////////////////////////////////////
		973	;------------------------------------------------------------------------------
		974	;? Activate window, redrawing if necessary
		975	;------------------------------------------------------------------------------
1465	mario79	976	push -1
1391	mikedld	977	mov eax, [TASK_COUNT]
		978	lea eax, [WIN_POS + eax * 2]
		979	cmp eax, esi
1465	mario79	980	pop eax
1391	mikedld	981	je .exit
		982
1362	mikedld	983	; is it overlapped by another window now?
		984	push ecx
		985	call window._.check_window_draw
		986	test ecx, ecx
		987	pop ecx
		988	jz .do_not_draw
		989
		990	; yes it is, activate and update screen buffer
		991	call window._.window_activate
		992
		993	pushad
		994	mov edi, [TASK_COUNT]
		995	movzx esi, word[WIN_POS + edi * 2]
		996	shl esi, 5
		997	add esi, window_data
		998
		999	mov eax, [esi + WDATA.box.left]
		1000	mov ebx, [esi + WDATA.box.top]
		1001	mov ecx, [esi + WDATA.box.width]
		1002	mov edx, [esi + WDATA.box.height]
		1003
		1004	add ecx, eax
		1005	add edx, ebx
		1006
		1007	mov edi, [TASK_COUNT]
		1008	movzx esi, word[WIN_POS + edi * 2]
		1009	call window._.set_screen
2443	Serge	1010	inc [_display.mask_seqno]
1362	mikedld	1011	popad
		1012
		1013	; tell application to redraw itself
		1014	mov [edi + WDATA.fl_redraw], 1
1391	mikedld	1015	xor eax, eax
		1016	jmp .exit
2436	mario79	1017	;--------------------------------------
		1018	align 4
		1019	.do_not_draw:
1362	mikedld	1020	; no it's not, just activate the window
		1021	call window._.window_activate
1391	mikedld	1022	xor eax, eax
3576	Serge	1023	ret
		1024
2436	mario79	1025	;--------------------------------------
		1026	align 4
		1027	.exit:
1391	mikedld	1028	inc eax
1362	mikedld	1029	ret
2436	mario79	1030	;------------------------------------------------------------------------------
1362	mikedld	1031	align 4
		1032	;------------------------------------------------------------------------------
2648	mario79	1033	minimize_all_window:
		1034	push ebx ecx edx esi edi
		1035	pushfd
		1036	cli
		1037	xor edx, edx
		1038	mov eax, 2 ; we do not minimize the kernel thread N1
		1039	mov ebx, [TASK_COUNT]
		1040	;--------------------------------------
		1041	align 4
		1042	.loop:
		1043	movzx edi, word[WIN_POS + eax * 2]
		1044	shl edi, 5
		1045	; it is a unused slot?
		1046	cmp dword [edi+CURRENT_TASK+TASKDATA.state], 9
		1047	je @f
		1048	; it is a hidden thread?
		1049	lea esi, [edi*8+SLOT_BASE+APPDATA.app_name]
		1050	cmp [esi], byte '@'
		1051	je @f
		1052	; is it already minimized?
		1053	test [edi + window_data+WDATA.fl_wstate], WSTATE_MINIMIZED
		1054	jnz @f
		1055	; no it's not, let's do that
		1056	or [edi + window_data+WDATA.fl_wstate], WSTATE_MINIMIZED
		1057	inc edx
		1058	;--------------------------------------
		1059	align 4
		1060	@@:
		1061	inc eax
		1062	cmp eax, ebx
		1063	jbe .loop
		1064	; If nothing has changed
		1065	test edx, edx
		1066	jz @f
		1067
		1068	push edx
		1069	call syscall_display_settings._.calculate_whole_screen
		1070	call syscall_display_settings._.redraw_whole_screen
		1071	pop edx
		1072	;--------------------------------------
		1073	align 4
		1074	@@:
		1075	mov eax, edx
		1076	popfd
		1077	pop edi esi edx ecx ebx
		1078	ret
		1079	;------------------------------------------------------------------------------
		1080	align 4
		1081	;------------------------------------------------------------------------------
1362	mikedld	1082	minimize_window: ;/////////////////////////////////////////////////////////////
		1083	;------------------------------------------------------------------------------
		1084	;> eax = window number on screen
		1085	;------------------------------------------------------------------------------
		1086	;# corrupts [dl*]
		1087	;------------------------------------------------------------------------------
		1088	push edi
		1089	pushfd
		1090	cli
		1091
		1092	; is it already minimized?
		1093	movzx edi, word[WIN_POS + eax * 2]
		1094	shl edi, 5
		1095	add edi, window_data
		1096	test [edi + WDATA.fl_wstate], WSTATE_MINIMIZED
		1097	jnz .exit
		1098
		1099	push eax ebx ecx edx esi
		1100
		1101	; no it's not, let's do that
		1102	or [edi + WDATA.fl_wstate], WSTATE_MINIMIZED
2620	mario79	1103	; If the window width is 0, then the action is not needed.
		1104	cmp [edi + WDATA.box.width], dword 0
		1105	je @f
		1106	; If the window height is 0, then the action is not needed.
		1107	cmp [edi + WDATA.box.height], dword 0
		1108	je @f
		1109
1362	mikedld	1110	mov eax, [edi + WDATA.box.left]
		1111	mov [draw_limits.left], eax
		1112	mov ecx, eax
		1113	add ecx, [edi + WDATA.box.width]
		1114	mov [draw_limits.right], ecx
		1115	mov ebx, [edi + WDATA.box.top]
		1116	mov [draw_limits.top], ebx
		1117	mov edx, ebx
		1118	add edx, [edi + WDATA.box.height]
		1119	mov [draw_limits.bottom], edx
2620	mario79	1120
		1121	; DEBUGF 1, "K : minimize_window\n"
		1122	; DEBUGF 1, "K : dl_left %x\n",[draw_limits.left]
		1123	; DEBUGF 1, "K : dl_right %x\n",[draw_limits.right]
		1124	; DEBUGF 1, "K : dl_top %x\n",[draw_limits.top]
		1125	; DEBUGF 1, "K : dl_bottom %x\n",[draw_limits.bottom]
1362	mikedld	1126	call calculatescreen
2620	mario79	1127	; xor esi, esi
		1128	; xor eax, eax
		1129	mov eax, edi
1362	mikedld	1130	call redrawscreen
2620	mario79	1131	;--------------------------------------
		1132	align 4
		1133	@@:
1362	mikedld	1134	pop esi edx ecx ebx eax
2436	mario79	1135	;--------------------------------------
		1136	align 4
		1137	.exit:
1362	mikedld	1138	popfd
		1139	pop edi
		1140	ret
2436	mario79	1141	;------------------------------------------------------------------------------
1362	mikedld	1142	align 4
		1143	;------------------------------------------------------------------------------
		1144	restore_minimized_window: ;////////////////////////////////////////////////////
		1145	;------------------------------------------------------------------------------
		1146	;> eax = window number on screen
		1147	;------------------------------------------------------------------------------
		1148	;# corrupts [dl*]
		1149	;------------------------------------------------------------------------------
		1150	pushad
		1151	pushfd
		1152	cli
		1153
		1154	; is it already restored?
		1155	movzx esi, word[WIN_POS + eax * 2]
		1156	mov edi, esi
		1157	shl edi, 5
		1158	add edi, window_data
		1159	test [edi + WDATA.fl_wstate], WSTATE_MINIMIZED
		1160	jz .exit
		1161
		1162	; no it's not, let's do that
		1163	mov [edi + WDATA.fl_redraw], 1
		1164	and [edi + WDATA.fl_wstate], not WSTATE_MINIMIZED
		1165	mov ebp, window._.set_screen
		1166	cmp eax, [TASK_COUNT]
		1167	jz @f
		1168	mov ebp, calculatescreen
2436	mario79	1169	;--------------------------------------
		1170	align 4
		1171	@@:
2288	clevermous	1172	mov eax, [edi + WDATA.box.left]
1362	mikedld	1173	mov ebx, [edi + WDATA.box.top]
		1174	mov ecx, [edi + WDATA.box.width]
		1175	mov edx, [edi + WDATA.box.height]
		1176	add ecx, eax
		1177	add edx, ebx
		1178	call ebp
2443	Serge	1179	inc [_display.mask_seqno]
2436	mario79	1180	;--------------------------------------
		1181	align 4
		1182	.exit:
1362	mikedld	1183	popfd
		1184	popad
		1185	ret
2436	mario79	1186	;------------------------------------------------------------------------------
1362	mikedld	1187	align 4
1391	mikedld	1188	; TODO: remove this proc
1362	mikedld	1189	;------------------------------------------------------------------------------
1391	mikedld	1190	window_check_events: ;/////////////////////////////////////////////////////////
1362	mikedld	1191	;------------------------------------------------------------------------------
1391	mikedld	1192	;?
1362	mikedld	1193	;------------------------------------------------------------------------------
		1194	; do we have window minimize/restore request?
		1195	cmp [window_minimize], 0
1391	mikedld	1196	je .exit
1362	mikedld	1197
		1198	; okay, minimize or restore top-most window and exit
		1199	mov eax, [TASK_COUNT]
		1200	mov bl, 0
		1201	xchg [window_minimize], bl
		1202	dec bl
		1203	jnz @f
		1204	call minimize_window
1391	mikedld	1205	jmp .exit
2436	mario79	1206	;--------------------------------------
		1207	align 4
		1208	@@:
2288	clevermous	1209	call restore_minimized_window
2436	mario79	1210	;--------------------------------------
		1211	align 4
		1212	.exit:
1391	mikedld	1213	ret
2436	mario79	1214	;------------------------------------------------------------------------------
1391	mikedld	1215	align 4
		1216	;------------------------------------------------------------------------------
		1217	sys_window_maximize_handler: ;/////////////////////////////////////////////////
		1218	;------------------------------------------------------------------------------
		1219	;?
		1220	;------------------------------------------------------------------------------
		1221	;> esi = process slot
		1222	;------------------------------------------------------------------------------
		1223	mov edi, esi
		1224	shl edi, 5
		1225	add edi, window_data
1362	mikedld	1226
1391	mikedld	1227	; can window change its height?
1526	diamond	1228	; only types 2 and 3 can be resized
1391	mikedld	1229	mov dl, [edi + WDATA.fl_wstyle]
1526	diamond	1230	test dl, 2
		1231	jz .exit
1362	mikedld	1232
1391	mikedld	1233	; toggle normal/maximized window state
		1234	mov bl, [edi + WDATA.fl_wstate]
		1235	xor bl, WSTATE_MAXIMIZED
1362	mikedld	1236
1391	mikedld	1237	; calculate and set appropriate window bounds
		1238	test bl, WSTATE_MAXIMIZED
		1239	jz .restore_size
1362	mikedld	1240
1391	mikedld	1241	mov eax, [screen_workarea.left]
		1242	mov ecx, [screen_workarea.top]
		1243	push [screen_workarea.bottom] \
		1244	[screen_workarea.right] \
		1245	ecx \
		1246	eax
		1247	sub [esp + BOX.width], eax
		1248	sub [esp + BOX.height], ecx
		1249	mov eax, esp
		1250	jmp .set_box
2436	mario79	1251	;--------------------------------------
		1252	align 4
		1253	.restore_size:
1391	mikedld	1254	mov eax, esi
		1255	shl eax, 8
		1256	add eax, SLOT_BASE + APPDATA.saved_box
		1257	push [eax + BOX.height] \
		1258	[eax + BOX.width] \
		1259	[eax + BOX.top] \
		1260	[eax + BOX.left]
		1261	mov eax, esp
2436	mario79	1262	;--------------------------------------
		1263	align 4
		1264	.set_box:
1391	mikedld	1265	test bl, WSTATE_ROLLEDUP
		1266	jz @f
1362	mikedld	1267
1391	mikedld	1268	xchg eax, ecx
		1269	call window._.get_rolledup_height
		1270	mov [ecx + BOX.height], eax
		1271	xchg eax, ecx
2436	mario79	1272	;--------------------------------------
		1273	align 4
		1274	@@:
2288	clevermous	1275	call window._.set_window_box
2381	hidnplayr	1276	add esp, sizeof.BOX
2436	mario79	1277	;--------------------------------------
		1278	align 4
		1279	.exit:
2443	Serge	1280	inc [_display.mask_seqno]
1391	mikedld	1281	ret
2436	mario79	1282	;------------------------------------------------------------------------------
1391	mikedld	1283	align 4
		1284	;------------------------------------------------------------------------------
		1285	sys_window_rollup_handler: ;///////////////////////////////////////////////////
		1286	;------------------------------------------------------------------------------
		1287	;?
		1288	;------------------------------------------------------------------------------
		1289	;> esi = process slot
		1290	;------------------------------------------------------------------------------
		1291	mov edx, esi
		1292	shl edx, 8
		1293	add edx, SLOT_BASE
1362	mikedld	1294
1391	mikedld	1295	; toggle normal/rolled up window state
		1296	mov bl, [edi + WDATA.fl_wstate]
		1297	xor bl, WSTATE_ROLLEDUP
1362	mikedld	1298
1391	mikedld	1299	; calculate and set appropriate window bounds
		1300	test bl, WSTATE_ROLLEDUP
		1301	jz .restore_size
1362	mikedld	1302
1391	mikedld	1303	call window._.get_rolledup_height
		1304	push eax \
		1305	[edi + WDATA.box.width] \
		1306	[edi + WDATA.box.top] \
		1307	[edi + WDATA.box.left]
		1308	mov eax, esp
		1309	jmp .set_box
2436	mario79	1310	;--------------------------------------
		1311	align 4
		1312	.restore_size:
1391	mikedld	1313	test bl, WSTATE_MAXIMIZED
		1314	jnz @f
2381	hidnplayr	1315	add esp, -sizeof.BOX
1391	mikedld	1316	lea eax, [edx + APPDATA.saved_box]
		1317	jmp .set_box
2436	mario79	1318	;--------------------------------------
		1319	align 4
		1320	@@:
2288	clevermous	1321	mov eax, [screen_workarea.top]
1391	mikedld	1322	push [screen_workarea.bottom] \
		1323	[edi + WDATA.box.width] \
		1324	eax \
		1325	[edi + WDATA.box.left]
		1326	sub [esp + BOX.height], eax
		1327	mov eax, esp
2436	mario79	1328	;--------------------------------------
		1329	align 4
		1330	.set_box:
1391	mikedld	1331	call window._.set_window_box
2381	hidnplayr	1332	add esp, sizeof.BOX
1391	mikedld	1333	ret
2436	mario79	1334	;------------------------------------------------------------------------------
1391	mikedld	1335	align 4
		1336	;------------------------------------------------------------------------------
2669	mario79	1337	;sys_window_start_moving_handler: ;/////////////////////////////////////////////
1391	mikedld	1338	;------------------------------------------------------------------------------
		1339	;?
		1340	;------------------------------------------------------------------------------
		1341	;> eax = old (original) window box
		1342	;> esi = process slot
		1343	;------------------------------------------------------------------------------
2669	mario79	1344	; mov edi, eax
		1345	; call window._.draw_negative_box
		1346	; ret
2436	mario79	1347	;------------------------------------------------------------------------------
1391	mikedld	1348	align 4
		1349	;------------------------------------------------------------------------------
		1350	sys_window_end_moving_handler: ;///////////////////////////////////////////////
		1351	;------------------------------------------------------------------------------
		1352	;?
		1353	;------------------------------------------------------------------------------
		1354	;> eax = old (original) window box
		1355	;> ebx = new (final) window box
		1356	;> esi = process slot
		1357	;------------------------------------------------------------------------------
2669	mario79	1358	; mov edi, ebx
		1359	; call window._.end_moving__box
1362	mikedld	1360
1391	mikedld	1361	mov edi, esi
		1362	shl edi, 5
		1363	add edi, window_data
1362	mikedld	1364
1391	mikedld	1365	mov eax, ebx
		1366	mov bl, [edi + WDATA.fl_wstate]
		1367	call window._.set_window_box
		1368	ret
2436	mario79	1369	;------------------------------------------------------------------------------
1391	mikedld	1370	align 4
		1371	;------------------------------------------------------------------------------
		1372	sys_window_moving_handler: ;///////////////////////////////////////////////////
		1373	;------------------------------------------------------------------------------
		1374	;?
		1375	;------------------------------------------------------------------------------
		1376	;> eax = old (from previous call) window box
		1377	;> ebx = new (current) window box
		1378	;> esi = process_slot
		1379	;------------------------------------------------------------------------------
		1380	mov edi, eax
		1381	call window._.draw_negative_box
		1382	mov edi, ebx
		1383	call window._.draw_negative_box
		1384	ret
		1385	;==============================================================================
		1386	;///// private functions //////////////////////////////////////////////////////
		1387	;==============================================================================
1362	mikedld	1388
1391	mikedld	1389	iglobal
		1390	FuncTable syscall_display_settings, ftable, \
		1391	00, 01, 02, 03, 04, 05, 06, 07, 08
1362	mikedld	1392
1391	mikedld	1393	align 4
		1394	window_topleft dd \
		1395	1, 21, \ ;type 0
		1396	0, 0, \ ;type 1
		1397	5, 20, \ ;type 2
		1398	5, ?, \ ;type 3 {set by skin}
		1399	5, ? ;type 4 {set by skin}
		1400	endg
1362	mikedld	1401
1391	mikedld	1402	;uglobal
		1403	; NOTE: commented out since doesn't provide necessary functionality anyway,
		1404	; to be reworked
		1405	; new_window_starting dd ?
		1406	;endg
2436	mario79	1407	;------------------------------------------------------------------------------
1391	mikedld	1408	align 4
		1409	;------------------------------------------------------------------------------
		1410	window._.invalidate_screen: ;//////////////////////////////////////////////////
		1411	;------------------------------------------------------------------------------
		1412	;?
		1413	;------------------------------------------------------------------------------
		1414	;> eax = old (original) window box
		1415	;> ebx = new (final) window box
		1416	;> edi = pointer to WDATA struct
		1417	;------------------------------------------------------------------------------
1362	mikedld	1418	push eax ebx
		1419
1391	mikedld	1420	; TODO: do we really need `draw_limits`?
1550	diamond	1421	; Yes, they are used by background drawing code.
2514	mario79	1422
		1423	; we need only to restore the background windows at the old place!
		1424	mov ecx, [ebx + BOX.left]
2288	clevermous	1425	mov [draw_limits.left], ecx
2514	mario79	1426	add ecx, [ebx + BOX.width]
2288	clevermous	1427	mov [draw_limits.right], ecx
2514	mario79	1428	mov ecx, [ebx + BOX.top]
2288	clevermous	1429	mov [draw_limits.top], ecx
2514	mario79	1430	add ecx, [ebx + BOX.height]
2288	clevermous	1431	mov [draw_limits.bottom], ecx
2514	mario79	1432	; recalculate screen buffer at old position
1391	mikedld	1433	push ebx
		1434	mov edx, [eax + BOX.height]
		1435	mov ecx, [eax + BOX.width]
		1436	mov ebx, [eax + BOX.top]
		1437	mov eax, [eax + BOX.left]
		1438	add ecx, eax
		1439	add edx, ebx
		1440	call calculatescreen
		1441	pop eax
2514	mario79	1442	; recalculate screen buffer at new position
1391	mikedld	1443	mov edx, [eax + BOX.height]
		1444	mov ecx, [eax + BOX.width]
		1445	mov ebx, [eax + BOX.top]
		1446	mov eax, [eax + BOX.left]
		1447	add ecx, eax
		1448	add edx, ebx
		1449	call calculatescreen
1362	mikedld	1450
1391	mikedld	1451	mov eax, edi
		1452	call redrawscreen
1362	mikedld	1453
1391	mikedld	1454	; tell window to redraw itself
		1455	mov [edi + WDATA.fl_redraw], 1
1362	mikedld	1456
1391	mikedld	1457	pop ebx eax
		1458	ret
2436	mario79	1459	;------------------------------------------------------------------------------
1391	mikedld	1460	align 4
		1461	;------------------------------------------------------------------------------
		1462	window._.set_window_box: ;/////////////////////////////////////////////////////
		1463	;------------------------------------------------------------------------------
		1464	;?
		1465	;------------------------------------------------------------------------------
		1466	;> eax = pointer to BOX struct
		1467	;> bl = new window state flags
		1468	;> edi = pointer to WDATA struct
		1469	;------------------------------------------------------------------------------
		1470	push eax ebx esi
1362	mikedld	1471
1474	diamond	1472	; don't do anything if the new box is identical to the old
2288	clevermous	1473	cmp bl, [edi + WDATA.fl_wstate]
		1474	jnz @f
		1475	mov esi, eax
		1476	push edi
1474	diamond	1477	if WDATA.box
2288	clevermous	1478	add edi, WDATA.box
1474	diamond	1479	end if
2288	clevermous	1480	mov ecx, 4
		1481	repz cmpsd
		1482	pop edi
		1483	jz .exit
2436	mario79	1484	;--------------------------------------
		1485	align 4
1474	diamond	1486	@@:
2381	hidnplayr	1487	add esp, -sizeof.BOX
1391	mikedld	1488	mov ebx, esp
1424	diamond	1489	if WDATA.box
1391	mikedld	1490	lea esi, [edi + WDATA.box]
1424	diamond	1491	else
2288	clevermous	1492	mov esi, edi ; optimization for WDATA.box = 0
1424	diamond	1493	end if
1391	mikedld	1494	xchg eax, esi
2381	hidnplayr	1495	mov ecx, sizeof.BOX
1391	mikedld	1496	call memmove
		1497	xchg eax, esi
		1498	xchg ebx, esi
		1499	call memmove
1424	diamond	1500	mov eax, ebx
		1501	mov ebx, esi
1362	mikedld	1502
1391	mikedld	1503	call window._.check_window_position
		1504	call window._.set_window_clientbox
		1505	call window._.invalidate_screen
1362	mikedld	1506
2381	hidnplayr	1507	add esp, sizeof.BOX
1362	mikedld	1508
1391	mikedld	1509	mov cl, [esp + 4]
		1510	mov ch, cl
		1511	xchg cl, [edi + WDATA.fl_wstate]
1362	mikedld	1512
1391	mikedld	1513	or cl, ch
		1514	test cl, WSTATE_MAXIMIZED
		1515	jnz .exit
1362	mikedld	1516
1391	mikedld	1517	mov eax, edi
		1518	sub eax, window_data
		1519	shl eax, 3
		1520	add eax, SLOT_BASE
1362	mikedld	1521
1391	mikedld	1522	lea ebx, [edi + WDATA.box]
		1523	xchg esp, ebx
1362	mikedld	1524
1391	mikedld	1525	pop [eax + APPDATA.saved_box.left] \
		1526	[eax + APPDATA.saved_box.top] \
		1527	[eax + APPDATA.saved_box.width] \
		1528	edx
1362	mikedld	1529
1391	mikedld	1530	xchg esp, ebx
1362	mikedld	1531
1391	mikedld	1532	test ch, WSTATE_ROLLEDUP
		1533	jnz .exit
1362	mikedld	1534
1391	mikedld	1535	mov [eax + APPDATA.saved_box.height], edx
2436	mario79	1536	;--------------------------------------
		1537	align 4
		1538	.exit:
1391	mikedld	1539	pop esi ebx eax
		1540	ret
2436	mario79	1541	;------------------------------------------------------------------------------
1391	mikedld	1542	align 4
		1543	;------------------------------------------------------------------------------
		1544	window._.set_window_clientbox: ;///////////////////////////////////////////////
		1545	;------------------------------------------------------------------------------
		1546	;?
		1547	;------------------------------------------------------------------------------
		1548	;> edi = pointer to WDATA struct
		1549	;------------------------------------------------------------------------------
		1550	push eax ecx edi
1362	mikedld	1551
1391	mikedld	1552	mov eax, [_skinh]
		1553	mov [window_topleft + 8 * 3 + 4], eax
		1554	mov [window_topleft + 8 * 4 + 4], eax
1362	mikedld	1555
1391	mikedld	1556	mov ecx, edi
		1557	sub edi, window_data
		1558	shl edi, 3
		1559	test [ecx + WDATA.fl_wstyle], WSTYLE_CLIENTRELATIVE
		1560	jz .whole_window
1362	mikedld	1561
1391	mikedld	1562	movzx eax, [ecx + WDATA.fl_wstyle]
		1563	and eax, 0x0F
		1564	mov eax, [eax * 8 + window_topleft + 0]
		1565	mov [edi + SLOT_BASE + APPDATA.wnd_clientbox.left], eax
		1566	shl eax, 1
		1567	neg eax
		1568	add eax, [ecx + WDATA.box.width]
		1569	mov [edi + SLOT_BASE + APPDATA.wnd_clientbox.width], eax
1362	mikedld	1570
1391	mikedld	1571	movzx eax, [ecx + WDATA.fl_wstyle]
		1572	and eax, 0x0F
		1573	push [eax * 8 + window_topleft + 0]
		1574	mov eax, [eax * 8 + window_topleft + 4]
		1575	mov [edi + SLOT_BASE + APPDATA.wnd_clientbox.top], eax
		1576	neg eax
		1577	sub eax, [esp]
		1578	add eax, [ecx + WDATA.box.height]
		1579	mov [edi + SLOT_BASE + APPDATA.wnd_clientbox.height], eax
		1580	add esp, 4
		1581	jmp .exit
2436	mario79	1582	;--------------------------------------
		1583	align 4
		1584	.whole_window:
1391	mikedld	1585	xor eax, eax
		1586	mov [edi + SLOT_BASE + APPDATA.wnd_clientbox.left], eax
		1587	mov [edi + SLOT_BASE + APPDATA.wnd_clientbox.top], eax
		1588	mov eax, [ecx + WDATA.box.width]
		1589	mov [edi + SLOT_BASE + APPDATA.wnd_clientbox.width], eax
		1590	mov eax, [ecx + WDATA.box.height]
		1591	mov [edi + SLOT_BASE + APPDATA.wnd_clientbox.height], eax
2436	mario79	1592	;--------------------------------------
		1593	align 4
		1594	.exit:
1391	mikedld	1595	pop edi ecx eax
		1596	ret
2436	mario79	1597	;------------------------------------------------------------------------------
1391	mikedld	1598	align 4
		1599	;------------------------------------------------------------------------------
		1600	window._.sys_set_window: ;/////////////////////////////////////////////////////
		1601	;------------------------------------------------------------------------------
		1602	;?
		1603	;------------------------------------------------------------------------------
		1604	;< edx = pointer to WDATA struct
		1605	;------------------------------------------------------------------------------
		1606	mov eax, [CURRENT_TASK]
		1607	shl eax, 5
		1608	add eax, window_data
1362	mikedld	1609
1391	mikedld	1610	; save window colors
		1611	mov [eax + WDATA.cl_workarea], edx
		1612	mov [eax + WDATA.cl_titlebar], esi
		1613	mov [eax + WDATA.cl_frames], edi
1362	mikedld	1614
1391	mikedld	1615	mov edi, eax
1362	mikedld	1616
1391	mikedld	1617	; was it already defined before?
		1618	test [edi + WDATA.fl_wdrawn], 1
		1619	jnz .set_client_box
1563	diamond	1620	or [edi + WDATA.fl_wdrawn], 1
2503	mario79	1621	; After first draw_window we need redraw mouse necessarily!
		1622	; Otherwise the user can see cursor specified by f.37.5 from another window.
		1623	; He will be really unhappy! He is terrible in rage - usually he throws stones!
		1624	mov [redrawmouse_unconditional], 1
3534	clevermous	1625	call wakeup_osloop
1391	mikedld	1626	; NOTE: commented out since doesn't provide necessary functionality
		1627	; anyway, to be reworked
		1628	; mov eax, [timer_ticks] ; [0xfdf0]
		1629	; add eax, 100
		1630	; mov [new_window_starting], eax
		1631
		1632	; no it wasn't, performing initial window definition
		1633	movzx eax, bx
1362	mikedld	1634	mov [edi + WDATA.box.width], eax
1391	mikedld	1635	movzx eax, cx
1362	mikedld	1636	mov [edi + WDATA.box.height], eax
1391	mikedld	1637	sar ebx, 16
		1638	sar ecx, 16
		1639	mov [edi + WDATA.box.left], ebx
		1640	mov [edi + WDATA.box.top], ecx
1362	mikedld	1641
1391	mikedld	1642	call window._.check_window_position
1362	mikedld	1643
1391	mikedld	1644	push ecx edi
1362	mikedld	1645
1391	mikedld	1646	mov cl, [edi + WDATA.fl_wstyle]
		1647	mov eax, [edi + WDATA.cl_frames]
1362	mikedld	1648
1391	mikedld	1649	sub edi, window_data
		1650	shl edi, 3
		1651	add edi, SLOT_BASE
1362	mikedld	1652
1391	mikedld	1653	and cl, 0x0F
		1654	cmp cl, 3
		1655	je @f
		1656	cmp cl, 4
		1657	je @f
1362	mikedld	1658
1391	mikedld	1659	xor eax, eax
2436	mario79	1660	;--------------------------------------
		1661	align 4
		1662	@@:
2288	clevermous	1663	mov [edi + APPDATA.wnd_caption], eax
1362	mikedld	1664
1391	mikedld	1665	mov esi, [esp]
		1666	add edi, APPDATA.saved_box
		1667	movsd
		1668	movsd
		1669	movsd
		1670	movsd
1362	mikedld	1671
1391	mikedld	1672	pop edi ecx
		1673
		1674	mov esi, [CURRENT_TASK]
		1675	movzx esi, word[WIN_STACK + esi * 2]
		1676	lea esi, [WIN_POS + esi * 2]
		1677	call waredraw
		1678
1362	mikedld	1679	mov eax, [edi + WDATA.box.left]
		1680	mov ebx, [edi + WDATA.box.top]
		1681	mov ecx, [edi + WDATA.box.width]
		1682	mov edx, [edi + WDATA.box.height]
		1683	add ecx, eax
		1684	add edx, ebx
		1685	call calculatescreen
		1686
1391	mikedld	1687	mov byte[KEY_COUNT], 0 ; empty keyboard buffer
		1688	mov byte[BTN_COUNT], 0 ; empty button buffer
2436	mario79	1689	;--------------------------------------
		1690	align 4
		1691	.set_client_box:
1391	mikedld	1692	; update window client box coordinates
		1693	call window._.set_window_clientbox
1362	mikedld	1694
1391	mikedld	1695	; reset window redraw flag and exit
		1696	mov [edi + WDATA.fl_redraw], 0
		1697	mov edx, edi
		1698	ret
2436	mario79	1699	;------------------------------------------------------------------------------
1391	mikedld	1700	align 4
		1701	;------------------------------------------------------------------------------
		1702	window._.check_window_position: ;//////////////////////////////////////////////
		1703	;------------------------------------------------------------------------------
		1704	;? Check if window is inside screen area
		1705	;------------------------------------------------------------------------------
		1706	;> edi = pointer to WDATA
		1707	;------------------------------------------------------------------------------
		1708	push eax ebx ecx edx esi
1362	mikedld	1709
1391	mikedld	1710	mov eax, [edi + WDATA.box.left]
		1711	mov ebx, [edi + WDATA.box.top]
		1712	mov ecx, [edi + WDATA.box.width]
		1713	mov edx, [edi + WDATA.box.height]
1362	mikedld	1714
1391	mikedld	1715	mov esi, [Screen_Max_X]
		1716	cmp ecx, esi
		1717	ja .fix_width_high
2436	mario79	1718	;--------------------------------------
		1719	align 4
		1720	.check_left:
1391	mikedld	1721	or eax, eax
		1722	jl .fix_left_low
		1723	add eax, ecx
		1724	cmp eax, esi
		1725	jg .fix_left_high
2436	mario79	1726	;--------------------------------------
		1727	align 4
		1728	.check_height:
1391	mikedld	1729	mov esi, [Screen_Max_Y]
		1730	cmp edx, esi
		1731	ja .fix_height_high
2436	mario79	1732	;--------------------------------------
		1733	align 4
		1734	.check_top:
1391	mikedld	1735	or ebx, ebx
		1736	jl .fix_top_low
		1737	add ebx, edx
		1738	cmp ebx, esi
		1739	jg .fix_top_high
2436	mario79	1740	;--------------------------------------
		1741	align 4
		1742	.exit:
1391	mikedld	1743	pop esi edx ecx ebx eax
1362	mikedld	1744	ret
2436	mario79	1745	;--------------------------------------
		1746	align 4
		1747	.fix_width_high:
1391	mikedld	1748	mov ecx, esi
		1749	mov [edi + WDATA.box.width], esi
		1750	jmp .check_left
2436	mario79	1751	;--------------------------------------
		1752	align 4
		1753	.fix_left_low:
1391	mikedld	1754	xor eax, eax
		1755	mov [edi + WDATA.box.left], eax
		1756	jmp .check_height
2436	mario79	1757	;--------------------------------------
		1758	align 4
		1759	.fix_left_high:
1391	mikedld	1760	mov eax, esi
		1761	sub eax, ecx
		1762	mov [edi + WDATA.box.left], eax
		1763	jmp .check_height
2436	mario79	1764	;--------------------------------------
		1765	align 4
		1766	.fix_height_high:
1391	mikedld	1767	mov edx, esi
		1768	mov [edi + WDATA.box.height], esi
		1769	jmp .check_top
2436	mario79	1770	;--------------------------------------
		1771	align 4
		1772	.fix_top_low:
1391	mikedld	1773	xor ebx, ebx
		1774	mov [edi + WDATA.box.top], ebx
		1775	jmp .exit
2436	mario79	1776	;--------------------------------------
		1777	align 4
		1778	.fix_top_high:
1391	mikedld	1779	mov ebx, esi
		1780	sub ebx, edx
		1781	mov [edi + WDATA.box.top], ebx
		1782	jmp .exit
2436	mario79	1783	;------------------------------------------------------------------------------
1362	mikedld	1784	align 4
		1785	;------------------------------------------------------------------------------
		1786	window._.get_titlebar_height: ;////////////////////////////////////////////////
		1787	;------------------------------------------------------------------------------
1391	mikedld	1788	;?
		1789	;------------------------------------------------------------------------------
1362	mikedld	1790	;> edi = pointer to WDATA
		1791	;------------------------------------------------------------------------------
		1792	mov al, [edi + WDATA.fl_wstyle]
		1793	and al, 0x0f
		1794	cmp al, 0x03
		1795	jne @f
		1796	mov eax, [_skinh]
		1797	ret
2436	mario79	1798	;--------------------------------------
		1799	align 4
		1800	@@:
2288	clevermous	1801	mov eax, 21
1362	mikedld	1802	ret
2436	mario79	1803	;------------------------------------------------------------------------------
1362	mikedld	1804	align 4
		1805	;------------------------------------------------------------------------------
		1806	window._.get_rolledup_height: ;////////////////////////////////////////////////
		1807	;------------------------------------------------------------------------------
1391	mikedld	1808	;?
		1809	;------------------------------------------------------------------------------
1362	mikedld	1810	;> edi = pointer to WDATA
		1811	;------------------------------------------------------------------------------
		1812	mov al, [edi + WDATA.fl_wstyle]
		1813	and al, 0x0f
		1814	cmp al, 0x03
		1815	jb @f
		1816	mov eax, [_skinh]
		1817	add eax, 3
		1818	ret
2436	mario79	1819	;--------------------------------------
		1820	align 4
		1821	@@:
2288	clevermous	1822	or al, al
1362	mikedld	1823	jnz @f
		1824	mov eax, 21
		1825	ret
2436	mario79	1826	;--------------------------------------
		1827	align 4
		1828	@@:
2288	clevermous	1829	mov eax, 21 + 2
1362	mikedld	1830	ret
2436	mario79	1831	;------------------------------------------------------------------------------
1362	mikedld	1832	align 4
		1833	;------------------------------------------------------------------------------
		1834	window._.set_screen: ;/////////////////////////////////////////////////////////
		1835	;------------------------------------------------------------------------------
		1836	;? Reserve window area in screen buffer
		1837	;------------------------------------------------------------------------------
		1838	;> eax = left
		1839	;> ebx = top
		1840	;> ecx = right
		1841	;> edx = bottom
		1842	;> esi = process number
		1843	;------------------------------------------------------------------------------
		1844	virtual at esp
		1845	ff_x dd ?
		1846	ff_y dd ?
		1847	ff_width dd ?
		1848	ff_xsz dd ?
		1849	ff_ysz dd ?
		1850	ff_scale dd ?
		1851	end virtual
		1852
		1853	pushad
		1854
		1855	cmp esi, 1
		1856	jz .check_for_shaped_window
		1857	mov edi, esi
		1858	shl edi, 5
		1859	cmp [window_data + edi + WDATA.box.width], 0
		1860	jnz .check_for_shaped_window
		1861	cmp [window_data + edi + WDATA.box.height], 0
		1862	jz .exit
2436	mario79	1863	;--------------------------------------
		1864	align 4
		1865	.check_for_shaped_window:
1362	mikedld	1866	mov edi, esi
		1867	shl edi, 8
		1868	add edi, SLOT_BASE
		1869	cmp [edi + APPDATA.wnd_shape], 0
		1870	jne .shaped_window
		1871
		1872	; get x&y size
		1873	sub ecx, eax
		1874	sub edx, ebx
		1875	inc ecx
		1876	inc edx
		1877
		1878	; get WinMap start
1368	mikedld	1879	push esi
4424	Serge	1880	mov esi, [_display.width]
2446	mario79	1881	mov edi, [d_width_calc_area + ebx*4]
		1882
1362	mikedld	1883	add edi, eax
		1884	add edi, [_WinMapAddress]
1368	mikedld	1885	pop eax
		1886	mov ah, al
		1887	push ax
		1888	shl eax, 16
		1889	pop ax
2436	mario79	1890	;--------------------------------------
		1891	align 4
		1892	.next_line:
1362	mikedld	1893	push ecx
1368	mikedld	1894	shr ecx, 2
2288	clevermous	1895	rep stosd
1368	mikedld	1896	mov ecx, [esp]
		1897	and ecx, 3
2288	clevermous	1898	rep stosb
1362	mikedld	1899	pop ecx
1368	mikedld	1900	add edi, esi
1362	mikedld	1901	sub edi, ecx
		1902	dec edx
		1903	jnz .next_line
		1904
		1905	jmp .exit
2436	mario79	1906	;--------------------------------------
		1907	align 4
		1908	.shaped_window:
1362	mikedld	1909	; for (y=0; y <= x_size; y++)
		1910	; for (x=0; x <= x_size; x++)
		1911	; if (shape[coord(x,y,scale)]==1)
		1912	; set_pixel(x, y, process_number);
		1913
		1914	sub ecx, eax
		1915	sub edx, ebx
		1916	inc ecx
		1917	inc edx
		1918
		1919	push [edi + APPDATA.wnd_shape_scale] ; push scale first -> for loop
		1920
		1921	; get WinMap start -> ebp
		1922	push eax
2446	mario79	1923	mov eax, [d_width_calc_area + ebx*4]
		1924
1362	mikedld	1925	add eax, [esp]
		1926	add eax, [_WinMapAddress]
		1927	mov ebp, eax
		1928
		1929	mov edi, [edi + APPDATA.wnd_shape]
		1930	pop eax
		1931
		1932	; eax = x_start
		1933	; ebx = y_start
		1934	; ecx = x_size
		1935	; edx = y_size
		1936	; esi = process_number
		1937	; edi = &shape
		1938	; [scale]
		1939	push edx ecx ; for loop - x,y size
		1940
		1941	mov ecx, esi
		1942	shl ecx, 5
		1943	mov edx, [window_data + ecx + WDATA.box.top]
		1944	push [window_data + ecx + WDATA.box.width] ; for loop - width
		1945	mov ecx, [window_data + ecx + WDATA.box.left]
		1946	sub ebx, edx
		1947	sub eax, ecx
		1948	push ebx eax ; for loop - x,y
		1949
		1950	add [ff_xsz], eax
		1951	add [ff_ysz], ebx
		1952
		1953	mov ebx, [ff_y]
2436	mario79	1954	;--------------------------------------
		1955	align 4
		1956	.ff_new_y:
1362	mikedld	1957	mov edx, [ff_x]
2436	mario79	1958	;--------------------------------------
		1959	align 4
		1960	.ff_new_x:
1362	mikedld	1961	; -- body --
		1962	mov ecx, [ff_scale]
		1963	mov eax, [ff_width]
		1964	inc eax
		1965	shr eax, cl
		1966	push ebx edx
		1967	shr ebx, cl
		1968	shr edx, cl
		1969	imul eax, ebx
		1970	add eax, edx
		1971	pop edx ebx
		1972	add eax, edi
		1973	call .read_byte
2288	clevermous	1974	test al, al
1362	mikedld	1975	jz @f
		1976	mov eax, esi
		1977	mov [ebp], al
		1978	; -- end body --
2436	mario79	1979	;--------------------------------------
		1980	align 4
		1981	@@:
2288	clevermous	1982	inc ebp
1362	mikedld	1983	inc edx
		1984	cmp edx, [ff_xsz]
		1985	jb .ff_new_x
		1986
		1987	sub ebp, [ff_xsz]
		1988	add ebp, [ff_x]
		1989	add ebp, [Screen_Max_X] ; screen.x
		1990	inc ebp
		1991	inc ebx
		1992	cmp ebx, [ff_ysz]
		1993	jb .ff_new_y
		1994
		1995	add esp, 24
2436	mario79	1996	;--------------------------------------
		1997	align 4
		1998	.exit:
1362	mikedld	1999	popad
2443	Serge	2000	inc [_display.mask_seqno]
1362	mikedld	2001	ret
2436	mario79	2002	;--------------------------------------
		2003	align 4
		2004	.read_byte:
1362	mikedld	2005	; eax - address
		2006	; esi - slot
		2007	push eax ecx edx esi
		2008	xchg eax, esi
		2009	lea ecx, [esp + 12]
		2010	mov edx, 1
		2011	call read_process_memory
		2012	pop esi edx ecx eax
		2013	ret
2436	mario79	2014	;------------------------------------------------------------------------------
1362	mikedld	2015	align 4
		2016	;------------------------------------------------------------------------------
		2017	window._.window_activate: ;////////////////////////////////////////////////////
		2018	;------------------------------------------------------------------------------
		2019	;? Activate window
		2020	;------------------------------------------------------------------------------
		2021	;> esi = pointer to WIN_POS+ window data
		2022	;------------------------------------------------------------------------------
		2023	push eax ebx
		2024
		2025	; if type of current active window is 3 or 4, it must be redrawn
1368	mikedld	2026	mov ebx, [TASK_COUNT]
2288	clevermous	2027
		2028	; DEBUGF 1, "K : TASK_COUNT (0x%x)\n", ebx
		2029
1368	mikedld	2030	movzx ebx, word[WIN_POS + ebx * 2]
		2031	shl ebx, 5
1362	mikedld	2032	add eax, window_data
1368	mikedld	2033	mov al, [window_data + ebx + WDATA.fl_wstyle]
		2034	and al, 0x0f
		2035	cmp al, 0x03
1362	mikedld	2036	je .set_window_redraw_flag
1368	mikedld	2037	cmp al, 0x04
		2038	jne .move_others_down
2436	mario79	2039	;--------------------------------------
		2040	align 4
		2041	.set_window_redraw_flag:
1368	mikedld	2042	mov [window_data + ebx + WDATA.fl_redraw], 1
2436	mario79	2043	;--------------------------------------
		2044	align 4
		2045	.move_others_down:
1362	mikedld	2046	; ax <- process no
1368	mikedld	2047	movzx ebx, word[esi]
1362	mikedld	2048	; ax <- position in window stack
1368	mikedld	2049	movzx ebx, word[WIN_STACK + ebx * 2]
1362	mikedld	2050
		2051	; drop others
1368	mikedld	2052	xor eax, eax
2436	mario79	2053	;--------------------------------------
		2054	align 4
		2055	.next_stack_window:
1368	mikedld	2056	cmp eax, [TASK_COUNT]
1362	mikedld	2057	jae .move_self_up
1368	mikedld	2058	inc eax
2288	clevermous	2059
		2060	; push ebx
		2061	; xor ebx,ebx
		2062	; mov bx,[WIN_STACK + eax * 2]
		2063	; DEBUGF 1, "K : DEC WIN_STACK (0x%x)\n",ebx
		2064	; pop ebx
		2065
1368	mikedld	2066	cmp [WIN_STACK + eax * 2], bx
1362	mikedld	2067	jbe .next_stack_window
1368	mikedld	2068	dec word[WIN_STACK + eax * 2]
1362	mikedld	2069	jmp .next_stack_window
2436	mario79	2070	;--------------------------------------
		2071	align 4
		2072	.move_self_up:
1368	mikedld	2073	movzx ebx, word[esi]
1362	mikedld	2074	; number of processes
1368	mikedld	2075	mov ax, [TASK_COUNT]
1362	mikedld	2076	; this is the last (and the upper)
1368	mikedld	2077	mov [WIN_STACK + ebx * 2], ax
1362	mikedld	2078
		2079	; update on screen - window stack
1368	mikedld	2080	xor eax, eax
2436	mario79	2081	;--------------------------------------
		2082	align 4
		2083	.next_window_pos:
1368	mikedld	2084	cmp eax, [TASK_COUNT]
1362	mikedld	2085	jae .reset_vars
1368	mikedld	2086	inc eax
		2087	movzx ebx, word[WIN_STACK + eax * 2]
		2088	mov [WIN_POS + ebx * 2], ax
1362	mikedld	2089	jmp .next_window_pos
2436	mario79	2090	;--------------------------------------
		2091	align 4
		2092	.reset_vars:
1362	mikedld	2093	mov byte[KEY_COUNT], 0
		2094	mov byte[BTN_COUNT], 0
		2095	mov word[MOUSE_SCROLL_H], 0
		2096	mov word[MOUSE_SCROLL_V], 0
		2097
		2098	pop ebx eax
		2099	ret
2244	mario79	2100	;------------------------------------------------------------------------------
		2101	window._.window_deactivate: ;////////////////////////////////////////////////////
		2102	;------------------------------------------------------------------------------
		2103	;? Deactivate window
		2104	;------------------------------------------------------------------------------
		2105	;> esi = pointer to WIN_POS+ window data
		2106	;------------------------------------------------------------------------------
2288	clevermous	2107	push eax ebx
2436	mario79	2108	;--------------------------------------
		2109	align 4
2244	mario79	2110	.move_others_up:
2288	clevermous	2111	; ax <- process no
		2112	movzx ebx, word[esi]
		2113	; ax <- position in window stack
		2114	movzx ebx, word[WIN_STACK + ebx * 2]
		2115	; up others
		2116	xor eax, eax
2436	mario79	2117	;--------------------------------------
		2118	align 4
2244	mario79	2119	.next_stack_window:
2288	clevermous	2120	cmp eax, [TASK_COUNT]
		2121	jae .move_self_down
		2122	inc eax
		2123	cmp [WIN_STACK + eax * 2], bx
		2124	jae .next_stack_window
		2125	inc word[WIN_STACK + eax * 2]
		2126	jmp .next_stack_window
2436	mario79	2127	;--------------------------------------
		2128	align 4
2244	mario79	2129	.move_self_down:
2288	clevermous	2130	movzx ebx, word[esi]
		2131	; this is the last (and the low)
		2132	mov [WIN_STACK + ebx * 2], word 1
		2133	; update on screen - window stack
		2134	xor eax, eax
2436	mario79	2135	;--------------------------------------
		2136	align 4
2244	mario79	2137	.next_window_pos:
2288	clevermous	2138	cmp eax, [TASK_COUNT]
		2139	jae .reset_vars
		2140	inc eax
		2141	movzx ebx, word[WIN_STACK + eax * 2]
		2142	mov [WIN_POS + ebx * 2], ax
		2143	jmp .next_window_pos
2436	mario79	2144	;--------------------------------------
		2145	align 4
2244	mario79	2146	.reset_vars:
2288	clevermous	2147	mov byte[KEY_COUNT], 0
		2148	mov byte[BTN_COUNT], 0
		2149	mov word[MOUSE_SCROLL_H], 0
		2150	mov word[MOUSE_SCROLL_V], 0
		2151	pop ebx eax
		2152	ret
		2153	;------------------------------------------------------------------------------
1362	mikedld	2154	align 4
		2155	;------------------------------------------------------------------------------
		2156	window._.check_window_draw: ;//////////////////////////////////////////////////
		2157	;------------------------------------------------------------------------------
		2158	;? Check if window is necessary to draw
		2159	;------------------------------------------------------------------------------
		2160	;> edi = pointer to WDATA
		2161	;------------------------------------------------------------------------------
		2162	mov cl, [edi + WDATA.fl_wstyle]
		2163	and cl, 0x0f
1391	mikedld	2164	cmp cl, 3
1362	mikedld	2165	je .exit.redraw ; window type 3
1391	mikedld	2166	cmp cl, 4
1362	mikedld	2167	je .exit.redraw ; window type 4
		2168
		2169	push eax ebx edx esi
		2170
		2171	mov eax, edi
		2172	sub eax, window_data
		2173	shr eax, 5
		2174
		2175	movzx eax, word[WIN_STACK + eax * 2] ; get value of the curr process
		2176	lea esi, [WIN_POS + eax * 2] ; get address of this process at 0xC400
2436	mario79	2177	;--------------------------------------
		2178	align 4
		2179	.next_window:
1362	mikedld	2180	add esi, 2
		2181
		2182	mov eax, [TASK_COUNT]
		2183	lea eax, word[WIN_POS + eax * 2] ; number of the upper window
		2184
		2185	cmp esi, eax
		2186	ja .exit.no_redraw
		2187
		2188	movzx edx, word[esi]
		2189	shl edx, 5
		2190	cmp [CURRENT_TASK + edx + TASKDATA.state], TSTATE_FREE
		2191	je .next_window
		2192
		2193	mov eax, [edi + WDATA.box.top]
		2194	mov ebx, [edi + WDATA.box.height]
		2195	add ebx, eax
		2196
		2197	mov ecx, [window_data + edx + WDATA.box.top]
		2198	cmp ecx, ebx
		2199	jge .next_window
		2200	add ecx, [window_data + edx + WDATA.box.height]
		2201	cmp eax, ecx
		2202	jge .next_window
		2203
		2204	mov eax, [edi + WDATA.box.left]
		2205	mov ebx, [edi + WDATA.box.width]
		2206	add ebx, eax
		2207
		2208	mov ecx, [window_data + edx + WDATA.box.left]
		2209	cmp ecx, ebx
		2210	jge .next_window
		2211	add ecx, [window_data + edx + WDATA.box.width]
		2212	cmp eax, ecx
		2213	jge .next_window
		2214
		2215	pop esi edx ebx eax
2436	mario79	2216	;--------------------------------------
		2217	align 4
		2218	.exit.redraw:
1362	mikedld	2219	xor ecx, ecx
		2220	inc ecx
		2221	ret
2436	mario79	2222	;--------------------------------------
		2223	align 4
		2224	.exit.no_redraw:
1362	mikedld	2225	pop esi edx ebx eax
		2226	xor ecx, ecx
		2227	ret
2436	mario79	2228	;------------------------------------------------------------------------------
1362	mikedld	2229	align 4
		2230	;------------------------------------------------------------------------------
1391	mikedld	2231	window._.draw_window_caption: ;////////////////////////////////////////////////
1362	mikedld	2232	;------------------------------------------------------------------------------
1391	mikedld	2233	;?
1362	mikedld	2234	;------------------------------------------------------------------------------
1391	mikedld	2235	xor eax, eax
		2236	mov edx, [TASK_COUNT]
		2237	movzx edx, word[WIN_POS + edx * 2]
		2238	cmp edx, [CURRENT_TASK]
		2239	jne @f
		2240	inc eax
2436	mario79	2241	;--------------------------------------
		2242	align 4
		2243	@@:
2288	clevermous	2244	mov edx, [CURRENT_TASK]
1391	mikedld	2245	shl edx, 5
		2246	add edx, window_data
		2247	movzx ebx, [edx + WDATA.fl_wstyle]
		2248	and bl, 0x0F
		2249	cmp bl, 3
		2250	je .draw_caption_style_3
		2251	cmp bl, 4
		2252	je .draw_caption_style_3
1362	mikedld	2253
1391	mikedld	2254	jmp .not_style_3
2436	mario79	2255	;--------------------------------------
		2256	align 4
		2257	.draw_caption_style_3:
1391	mikedld	2258	push edx
		2259	call drawwindow_IV_caption
		2260	add esp, 4
		2261	jmp .2
2436	mario79	2262	;--------------------------------------
		2263	align 4
		2264	.not_style_3:
1391	mikedld	2265	cmp bl, 2
		2266	jne .not_style_2
		2267
		2268	call drawwindow_III_caption
		2269	jmp .2
2436	mario79	2270	;--------------------------------------
		2271	align 4
		2272	.not_style_2:
1391	mikedld	2273	cmp bl, 0
		2274	jne .2
		2275
		2276	call drawwindow_I_caption
2436	mario79	2277	;--------------------------------------
		2278	align 4
		2279	.2:
2288	clevermous	2280	mov edi, [CURRENT_TASK]
1391	mikedld	2281	shl edi, 5
		2282	test [edi + window_data + WDATA.fl_wstyle], WSTYLE_HASCAPTION
		2283	jz .exit
		2284	mov edx, [edi * 8 + SLOT_BASE + APPDATA.wnd_caption]
		2285	or edx, edx
		2286	jz .exit
		2287
		2288	movzx eax, [edi + window_data + WDATA.fl_wstyle]
		2289	and al, 0x0F
		2290	cmp al, 3
		2291	je .skinned
		2292	cmp al, 4
		2293	je .skinned
		2294
		2295	jmp .not_skinned
2436	mario79	2296	;--------------------------------------
		2297	align 4
		2298	.skinned:
1391	mikedld	2299	mov ebp, [edi + window_data + WDATA.box.left - 2]
		2300	mov bp, word[edi + window_data + WDATA.box.top]
		2301	movzx eax, word[edi + window_data + WDATA.box.width]
		2302	sub ax, [_skinmargins.left]
		2303	sub ax, [_skinmargins.right]
		2304	push edx
		2305	cwde
		2306	cdq
		2307	mov ebx, 6
		2308	idiv ebx
		2309	pop edx
		2310	or eax, eax
		2311	js .exit
		2312
		2313	mov esi, eax
		2314	mov ebx, dword[_skinmargins.left - 2]
		2315	mov bx, word[_skinh]
		2316	sub bx, [_skinmargins.bottom]
		2317	sub bx, [_skinmargins.top]
		2318	sar bx, 1
		2319	adc bx, 0
		2320	add bx, [_skinmargins.top]
		2321	add bx, -3
		2322	add ebx, ebp
		2323	jmp .dodraw
2436	mario79	2324	;--------------------------------------
		2325	align 4
		2326	.not_skinned:
1391	mikedld	2327	cmp al, 1
		2328	je .exit
		2329
		2330	mov ebp, [edi + window_data + WDATA.box.left - 2]
		2331	mov bp, word[edi + window_data + WDATA.box.top]
		2332	movzx eax, word[edi + window_data + WDATA.box.width]
		2333	sub eax, 16
		2334	push edx
		2335	cwde
		2336	cdq
		2337	mov ebx, 6
		2338	idiv ebx
		2339	pop edx
		2340	or eax, eax
		2341	js .exit
		2342
		2343	mov esi, eax
		2344	mov ebx, 0x00080007
		2345	add ebx, ebp
2436	mario79	2346	;--------------------------------------
		2347	align 4
		2348	.dodraw:
1391	mikedld	2349	mov ecx, [common_colours + 16]
		2350	or ecx, 0x80000000
		2351	xor edi, edi
		2352	call dtext_asciiz_esi
2436	mario79	2353	;--------------------------------------
		2354	align 4
		2355	.exit:
2453	mario79	2356	; call [draw_pointer]
		2357	call __sys_draw_pointer
1362	mikedld	2358	ret
2436	mario79	2359	;------------------------------------------------------------------------------
1391	mikedld	2360	align 4
		2361	;------------------------------------------------------------------------------
		2362	window._.draw_negative_box: ;//////////////////////////////////////////////////
		2363	;------------------------------------------------------------------------------
		2364	;? Draw negative box
		2365	;------------------------------------------------------------------------------
		2366	;> edi = pointer to BOX struct
		2367	;------------------------------------------------------------------------------
		2368	push eax ebx esi
2233	mario79	2369	mov esi, 0x01000000
2436	mario79	2370	;--------------------------------------
		2371	align 4
2233	mario79	2372	.1:
1391	mikedld	2373	mov eax, [edi + BOX.left - 2]
		2374	mov ax, word[edi + BOX.left]
		2375	add ax, word[edi + BOX.width]
		2376	mov ebx, [edi + BOX.top - 2]
		2377	mov bx, word[edi + BOX.top]
		2378	add bx, word[edi + BOX.height]
		2379	call draw_rectangle.forced
		2380	pop esi ebx eax
		2381	ret
2233	mario79	2382	;------------------------------------------------------------------------------
2669	mario79	2383	;align 4
2436	mario79	2384	;------------------------------------------------------------------------------
2669	mario79	2385	;window._.end_moving__box: ;//////////////////////////////////////////////////
2233	mario79	2386	;------------------------------------------------------------------------------
		2387	;? Draw positive box
		2388	;------------------------------------------------------------------------------
		2389	;> edi = pointer to BOX struct
		2390	;------------------------------------------------------------------------------
2669	mario79	2391	; push eax ebx esi
		2392	; xor esi, esi
		2393	; jmp window._.draw_negative_box.1
2341	Serge	2394	;------------------------------------------------------------------------------
2436	mario79	2395	align 4
		2396	;------------------------------------------------------------------------------
2341	Serge	2397	window._.get_rect: ;/////////////////////////////////////////////////////
		2398	;------------------------------------------------------------------------------
		2399	;? void __fastcall get_window_rect(struct RECT* rc);
		2400	;------------------------------------------------------------------------------
		2401	;> ecx = pointer to RECT
		2402	;------------------------------------------------------------------------------
		2403	mov eax, [TASK_BASE]
		2404
		2405	mov edx, [eax-twdw + WDATA.box.left]
		2406	mov [ecx+RECT.left], edx
		2407
		2408	add edx, [eax-twdw + WDATA.box.width]
		2409	mov [ecx+RECT.right], edx
		2410
		2411	mov edx, [eax-twdw + WDATA.box.top]
		2412	mov [ecx+RECT.top], edx
		2413
		2414	add edx, [eax-twdw + WDATA.box.height]
		2415	mov [ecx+RECT.bottom], edx
		2416	ret
2436	mario79	2417	;------------------------------------------------------------------------------

Subversion Repositories Kolibri OS

(root)/kernel/trunk/gui/window.inc – Rev 4779