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

Subversion Repositories Kolibri OS

(root)/kernel/trunk/gui/window.inc @ 9941 – Rev 2648