Subversion Repositories Kolibri OS

Rev

Rev 5865 | Rev 5870 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

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