WebSVN – Kolibri OS – Blame – /kernel/branches/Kolibri-acpi/gui/window.inc

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

Subversion Repositories Kolibri OS

(root)/kernel/branches/Kolibri-acpi/gui/window.inc – Rev 4288