WebSVN – Kolibri OS – Diff – /programs/system/notify3/notify.asm


use32
    org     0
    db      'MENUET01'
    dd      1, @ENTRY, @end, @memory, @stack
M01header.params:
    dd      @params, 0
 
    include "../../macros.inc"
    include "../../proc32.inc"
    include "../../dll.inc"
;    include "../../debug.inc"
    include "../../string.inc"
    
    include "notify.inc"
 
 LINEH      equ 12
 MARGIN     equ 12
 ICONS      equ 11
 
;-------------------------------------------------------------------------------
 
 @ENTRY:
;; INIT HEAP
    mcall   68, 11
 
;; SAVE FOCUSED WINDOW
    mcall   18, 7
    mov     ecx, eax
    mcall   9, buffer
    m2m     dword [prev_pid], dword [buffer + 30]
 
;; MAKE IT ALWAYS ON TOP
    mcall   18, 25, 2, -1, 1
 
;; SET STD PARAMS, IF IT NEEDS
    mov     eax, [M01header.params]
    cmpne   byte [eax], 0, @f
    mov     eax, sz_std
  @@:
    mov     [params.source], eax
 
;; PARSE ARGUMENTS
    mov     esi, 0
    call    parse_text
    call    parse_flags
    movzx   ebx, [params.icon]
 
;; GET PID
    mcall   9, buffer, -1
    mov     eax, dword [buffer + 30]
 
;; CONVERT PID TO STR
    mov     ebx, 10
    mov     ecx, 0
  @@:
    mov     edx, 0
    div     ebx
    push    edx
    inc     ecx
    cmpne   eax, 0, @b
 
    mov     ebx, ctrl.name
  @@:
    pop     eax
    add     al, "0"
    mov     [ebx], al
    inc     ebx
    loop    @b
 
    mov     dword [ebx + 0], "-NOT"
    mov     dword [ebx + 4], "IFY"
 
;; LOAD LIBRARIES
    stdcall dll.Load, @imports
 
;; GET SIZE OF ICONS
    mcall   70, fi
    mov     edx, dword [buffer + 32]
    shl     edx, 2
 
;; ALLOCATE MEMORY FOR THIS
    stdcall mem.Alloc, edx
    mov     [img_data.file], eax
 
;; READ ICONS
    mov     dword [fi + 00], 0
    mov     dword [fi + 12], edx
    mov     dword [fi + 16], eax
    mcall   70, fi
 
;; DECODE ICONS
    stdcall dword [img.decode], dword [img_data.file], ebx, 0
    mov     dword [img_data.obj], eax
 
;; CALC HEIGHT
    mov     eax, [text.lines]
    add     eax, 2
    imul    eax, LINEH
    mov     [window.height], eax
 
;; CALC OFFSET OF TEXT
    mov     dword [text.offset], MARGIN
    cmpe    byte [params.icon], 0, @f
    add     dword [text.offset], MARGIN + 24
  @@:
 
;; CALC WIDTH
    mov     eax, [text.max_len]
    imul    eax, 6
    add     eax, MARGIN
    add     eax, [text.offset]
    mov     [window.width], eax
 
    mcall   14
    mov     ebx, eax
    movzx   ebx, bx
    mov     [scr.height], ebx
    shr     eax, 16
    mov     [scr.width], eax
    sub     eax, [window.width]
    sub     eax, LINEH
    mov     [window.x], eax
 
;; CALC PBAR
    mov     eax, [window.width]
    sub     eax, [text.offset]
    sub     eax, MARGIN
    mov     [pbar.width], eax
 
;; CALC Y
    mcall   68, 22, sz_shname, 256 + 512, 4 + 1 ;OPEN_ALWAYS AND WRITE
    add     eax, 512
    mov     [shm], eax
 
 s_search:
    mov     eax, [shm]
 
    mov     ebx, 0
    mov     ecx, [text.lines]
    add     ecx, 3
 
    push    eax ebx
 
    mov     eax, [scr.height]
    mov     edx, 0
    mov     ebx, LINEH
    div     ebx
    mov     edx, eax
    add     edx, [shm]
    sub     edx, ecx
    inc     edx
 
    pop     ebx eax
 
 s_area:
    cmpe    [eax], byte 1, .is_1
 
 .is_0:
    inc     ebx
    cmpe    ebx, ecx, s_ok
    jmp     .next
 
 .is_1:
    mov     ebx, 0
 
 .next:
    inc     eax
    cmple   eax, edx, s_area
 
    mcall   5, 10
    jmp     s_search
 
 s_ok:
    sub     eax, ecx
    inc     eax
    mov     [shm.our], eax
 
    mov     edx, eax
    sub     edx, [shm]
    inc     edx
    imul    edx, LINEH
    mov     [window.y], edx
 
    push    eax ebx
    mcall   48, 5
    shr     ebx, 16
    add     [window.y], ebx
    pop     ebx eax
 
  @@:
    mov     [eax], byte 1
    inc     eax
    loop    @b
 
 ;----------------------------
 
;; SET EVENT MASK
    mcall   40, 101b
 
;; INIT TIMER
    mov     eax, 60
    imul    eax, [text.lines]
    mov     [timer], eax
    mov     dword [timer.step], 1
    cmpne   byte [params.atcl], 1, @f
    mov     dword [timer.step], 0
  @@:
 
;; INIT WINDOW
    call    init_window
 
;; RESTORE FOCUS
    mcall   18, 21, [prev_pid]
    mov     ecx, eax
    mcall   18, 3
 
    jmp     redraw
 
 ;----------------------------
 
 update:
    mcall   23, 10
    cmpe    al, EV_REDRAW, redraw
    cmpe    al, EV_BUTTON, button
 
    mov     edi, update
 
;; TRY OPEN CONTROLLER
    cmpe    byte [params.ctrl], 1, .fail_controller_open
    mcall   68, 22, ctrl.name, , 0x01
    cmpe    eax, 0, .fail_controller_open
    mov     byte [params.ctrl], 1
    mov     [ctrl.addr], eax
 
;; COPY TEXT TO CTRL
    add     eax, NTCTRL_TEXT
    mov     ebx, text.buffer
 
    mov     ecx, [text.lines]
    cmpne   byte [params.pbar], 1, @f
    dec     ecx
  @@:
 
 .copy_start:
    cmpe     ecx, 0, .copy_end
    mov      dl, [ebx]
    cmpne    dl, 0, @f
    mov      dl, 10
    dec      ecx
  @@:
    mov      [eax], dl
    inc      eax
    inc      ebx
    jmp      .copy_start
 .copy_end:
    mov      byte [eax - 1], 0
 
;; COPY FLAGS TO CTRL
    mov      eax, [ctrl.addr]
    add      eax, NTCTRL_ICON
    mov      dl, [params.icon]
    mov      [eax], dl
 
    mov      eax, [ctrl.addr]
    add      eax, NTCTRL_TITLE
    mov      dl,  [params.title]
    mov      [eax], dl
 
;; SET CONTROLLER READY
    mov     eax, [ctrl.addr]
    add     eax, NTCTRL_READY
    mov     byte [eax], 1
 .fail_controller_open:
 
 
    cmpe    [params.ctrl], 0, .no_ctrl
;; TEST TEXT
    mov     eax, [ctrl.addr]
    add     eax, NTCTRL_APPLY_TEXT
    cmpne   byte [eax], 1, @f
    mov     byte [eax], 0
 
    mov     eax, [ctrl.addr]
    add     eax, NTCTRL_TEXT
    mov     esi, 1
    call    parse_text
 
    mov     edi, redraw
  @@:
 
;; TEST ICON
    mov     eax, [ctrl.addr]
    add     eax, NTCTRL_APPLY_ICON
    cmpne   byte [eax], 1, @f
    mov     byte [eax], 0
 
    mov     eax, [ctrl.addr]
    add     eax, NTCTRL_ICON
    mov     dl, [eax]
    mov     [params.icon], dl
 
    mov     edi, redraw
  @@:
 
;; TEST TITLE
    mov     eax, [ctrl.addr]
    add     eax, NTCTRL_APPLY_TITLE
    cmpne   byte [eax], 1, @f
    mov     byte [eax], 0
 
    mov     eax, [ctrl.addr]
    add     eax, NTCTRL_TITLE
    mov     dl, [eax]
    mov     [params.title], dl
 
    mov     edi, redraw
  @@:
 
;; TEST PBAR
    mov     eax, [ctrl.addr]
    add     eax, NTCTRL_APPLY_PBAR
    cmpne   byte [eax], 1, @f
    mov     byte [eax], 0
 
    mov     eax, [ctrl.addr]
    add     eax, NTCTRL_PBAR_CUR
    mov     edx, [eax]
    mov     [pbar.cur_val], edx
 
    mov     eax, [ctrl.addr]
    add     eax, NTCTRL_PBAR_MAX
    mov     edx, [eax]
    mov     [pbar.max_val], edx
 
    call    calc_fill_width
 
    mov     edi, redraw
  @@:
 
;; TEST CLOSE
    mov     eax, [ctrl.addr]
    add     eax, NTCTRL_CLOSE
    cmpe    byte [eax], 1, exit
 
 .no_ctrl:
 
    mov     eax, [timer.step]
    sub     [timer], eax
    cmpe    [timer], dword 0, exit
    jmp     edi
 
 ;----------------------------
 
 exit:
    mov     eax, [shm.our]
    mov     ecx, [text.lines]
    add     ecx, 3
  @@:
    mov     [eax], byte 0
    inc     eax
    loop    @b
 
    mcall   68, 23, sz_shname
 
    mcall   -1
 
 ;----------------------------
 
 button:
    mcall   17
    cmpe    byte [params.clcl], 0, exit
    jmp     update
 
 ;----------------------------
 
 redraw:
    call    draw_window
    call    draw_text
    call    draw_pbar
 
    jmp     update
 
 ;----------------------------
 
 draw_window:
    call    init_window
 
    movzx   ebx, bx
    movzx   ecx, cx
    inc     ebx
    inc     ecx
    mcall   8, , , 0x61000001
 
    mov     eax, 13
    mov     ebx, [window.width]
    mov     edx, 0x222222
 
    cmpe    [first_draw], byte 1, .draw_full
    mov     [first_draw], byte 1
    mov     esi, [window.height]
    mov     ecx, LINEH
  @@:
    mcall
    add     ecx, LINEH shl 16
    sub     esi, LINEH
    push    eax ebx
    mcall   5, 1
    pop     ebx eax
    cmpne   esi, 0, @b
 
 .draw_full:
    mcall
 
    mcall   , , 1, 0x121212
 
    mov     ecx, [window.height]
    dec     ecx
    shl     ecx, 16
    inc     ecx
    mcall
 
    mcall   , 1, [window.width]
 
    mov     ebx, [window.width]
    dec     ebx
    shl     ebx, 16
    inc     ebx
    mcall
 
    mcall   1, 1, 1
    mov     ebx, [window.width]
    sub     ebx, 2
    mcall
    mov     ecx, [window.height]
    sub     ecx, 2
    mcall
    mov     ebx, 1
    mcall
 
 ;-----
 
    mov     ecx, [scr.width]
    inc     ecx
 
    mov     eax, 35
    mov     ebx, ecx
    imul    ebx, [window.y]
    add     ebx, [window.x]
    dec     ebx
    mcall
    push    eax
 
    mov     eax, 35
    add     ebx, [window.width]
    add     ebx, 2
    mcall
    push    eax
 
    mov     eax, 35
    mov     edx, ecx
    mov     esi, [window.height]
    dec     esi
    imul    edx, esi
    add     ebx, edx
    mcall
    push    eax
 
    mov     eax, 35
    sub     ebx, [window.width]
    sub     ebx, 2
    mcall
    push    eax
 
 ;-----
 
    mov     eax, 1
 
    pop     edx
    mov     ecx, [window.height]
    dec     ecx
    mcall   , 0
 
    pop     edx
    mov     ebx, [window.width]
    dec     ebx
    mcall
 
    pop     edx
    mcall   , , 0
 
    pop     edx
    mcall   , 0
 
 ;-----
 
    cmpe    byte [params.icon], 0, @f
    movzx   ebx, byte [params.icon]
    dec     ebx
    imul    ebx, 24
 
    mov     edx, [window.height]
    shr     edx, 1
    sub     edx, 12
        
        stdcall dword [img.draw], dword [img_data.obj], 12, edx, 24, 24, 0, ebx
  @@:
 
    ret
 
 ;----------------------------
 
 draw_text:
    mov     esi, [text.lines]
 
    cmpne   byte [params.pbar], 1, @f
    dec     esi
  @@:
 
    mov     eax, 4
    mov     ebx, [text.offset]
    shl     ebx, 16
    add     ebx, LINEH + (LINEH - 6) / 2
    mov     edx, text.buffer
 
 .draw_lines:
    mov     ecx, 0x80111111
 
    add     ebx, 0x00010000
    dec     ebx
    mcall
    add     ebx, 2
    mcall
    sub     ebx, 0x00020000
    mcall
    sub     ebx, 2
    mcall
 
    add     ebx, 0x00010001
    mov     ecx, 0x80D0D0D0
    mcall
 
    add     ebx, LINEH
    dec     esi
    cmpe    esi, 0, .draw_lines.end
 
    inc     edx
  @@:
    cmpe    [edx], byte 0, @f
    inc     edx
    jmp     @b
  @@:
    inc     edx
    jmp     .draw_lines
 
 .draw_lines.end:
 
    cmpne   byte [params.title], 1, @f
    mov     edx, text.buffer
    mov     ecx, 0x80111111
    and     ebx, 0xFFFF0000
    add     ebx, 1 shl 16 + LINEH + (LINEH - 6) / 2
    mcall
 
    mov     ecx, 0x80FFFFFF
    sub     ebx, 0x00010000
    mcall
  @@:
 
    ret
 
 ;----------------------------
 
 draw_pbar:
    cmpne   byte [params.pbar], 1, .exit
    mov     esi, 0xFF0000
    mov     ecx, LINEH
    imul    ecx, [text.lines]
    shl     ecx, 16
    add     ecx, (LINEH / 2) shl 16 + 8
    mcall   13, <[text.offset], [pbar.width]>, , 0x555555
 
    sub     ecx, -(1 shl 16) + 2
 
    mov     bx, word [pbar.f_width]
    add     ebx, 1 shl 16
 
    mcall     , , , 0x999999
    mov     cx, 1
    mcall     , , , 0xAAAAAA
    mov     cx, 6
    mov     bx, 1
    mcall
 .exit:
    ret
 
 ;----------------------------
 
 init_window:
    dec     dword [window.width]
    dec     dword [window.height]
    mcall   0, <[window.x], [window.width]>, <[window.y], [window.height]>, 0x61000000
    inc     dword [window.width]
    inc     dword [window.height]
 
    ret
 
 ;----------------------------
 
 parse_text:
    mov     dword [text.lines], 1
    cmpne   byte [params.pbar], 1, @f
    inc     dword [text.lines]
  @@:
 
    mov     dword [text.max_len], 0
    mov     ebx, text.buffer
    mov     ecx, 0
    mov     dl, 0
    mov     dh, 0
 
    cmpe    esi, 1, .parse_loop
    cmpne   byte [eax], "'", @f
    mov     dl, "'"
    mov     dh, 1
  @@:
    cmpne   byte [eax], '"', @f
    mov     dl, '"'
    mov     dh, 1
  @@:
    cmpne   dh, 1, @f
    inc     eax
  @@:
 
 .parse_loop:
    cmpe    byte [eax],  0, .parse_loop.end
    cmpe    byte [eax], dl, .parse_loop.end
 
    cmpe    byte [eax], 10, .newline
    cmpe    esi, 1, .next_set_char
    cmpne   byte [eax], "\", @f
    cmpe    byte [eax + 1], dl, .quote
    cmpe    byte [eax + 1], "n", .newline_esc
    jmp     @f
 
 .quote:
    inc     eax
    jmp     .next_set_char
 
 .newline_esc:
    inc     eax
 
 .newline:
    mov     byte [ebx], 0
    cmple   ecx, dword [text.max_len], .skip_max_len
    mov     dword [text.max_len], ecx
 .skip_max_len:
    mov     ecx, 0
    inc     dword [text.lines]
    jmp     .next
  @@:
 
 .next_set_char:
    mov     dh, [eax]
    mov     [ebx], dh
 
 .next:
    inc     eax
    inc     ebx
    inc     ecx
    jmp     .parse_loop
 .parse_loop.end:
 
    cmple   ecx, dword [text.max_len], @f
    mov     dword [text.max_len], ecx
  @@:
 
    cmpge   [text.max_len], dword 25, @f
    mov     [text.max_len], dword 25
  @@:
 
    mov     [ebx], byte 0
 
    ret
 
 ;----------------------------
 
 parse_flags:
    mov     byte [params.atcl], 0
    mov     byte [params.title], 0
    mov     byte [params.icon], 0
 
 .loop:
    mov     dl, [eax]
 
    cmpe    dl, 0, .exit
    cmpe    dl, "d", .set_atcl
    cmpe    dl, "c", .set_clcl
    cmpe    dl, "t", .set_title
    cmpe    dl, "p", .set_pbar
 
    mov     bl, 1
    mov     ecx, sz_icons
  @@:
    cmpe    dl, [ecx], .set_icon
    inc     bl
    inc     ecx
    cmpne   [ecx], byte 0, @b
    jmp     .next_char
 
 .set_atcl:
    mov     byte [params.atcl], 1
    jmp     .next_char
 
 .set_clcl:
    mov     byte [params.clcl], 1
    jmp     .next_char
 
 .set_title:
    mov     byte [params.title], 1
    jmp     .next_char
 
 .set_pbar:
    mov     byte [params.pbar], 1
    inc     dword [text.lines]
    jmp     .next_char
 
 .set_icon:
    mov     [params.icon], bl
 
 .next_char:
    inc     eax
    jmp     .loop
 
 .exit:
    ret
 
 ;----------------------------
 
 calc_fill_width:
    mov     eax, [pbar.cur_val]
    cmpng   eax, [pbar.max_val], @f
    mov     eax, [pbar.max_val]
  @@:
    cmpnl   eax, 0, @f
    mov     eax, 0
  @@:
 
    mov     ebx, [pbar.width]
    sub     ebx, 2
    imul    eax, ebx
    mov     edx, 0
    mov     ebx, [pbar.max_val]
    div     ebx
    mov     [pbar.f_width], eax
    ret
 
 ;----------------------------
 
 @imports:
    library img, "libimg.obj"
    import  img, img.to_rgb,  "img_to_rgb2", \
                 img.decode,  "img_decode",  \
                 img.draw, "img_draw"
 
 ;----------------------------
 
 sz_icons   db "AEWONIFCMDS", 0
 sz_ifile   db "/sys/notify3.png", 0
 sz_shname  db "notify-mem-v01", 0
 sz_std     db "'NOTIFY 3\n",                 \
               "d - disable auto-closing\n",  \
               "c - disable click-closing\n", \
               "p - use progressbar\n",       \
               "t - title\n",                 \
               " \n",                         \
               "ICONS:\n",                    \
               "A - application\n",           \
               "E - error\n",                 \
               "W - warning\n",               \
               "O - ok\n",                    \
               "N - network\n",               \
               "I - info\n",                  \
               "F - folder\n",                \
               "C - component\n",             \
               "M - mail\n",                  \
               "D - download\n",              \
               "S - audio player",            \
               "' -td", 0
 
 fi:
            dd 5
            dd 0, 0, 0
            dd buffer
            db 0
            dd sz_ifile
 
 ;----------------------------
 
 @end:
 
;=====================================================================
 
 window:
 .x        rd 1
 .y        rd 1
 .width    rd 1
 .height   rd 1
 
 scr:
 .width    rd 1
 .height   rd 1
 
 text:
 .buffer   rb 2048
 .lines    rd 1
 .max_len  rd 1
 .offset   rd 1
 
 params:
 .source   rd 1
 .atcl     rb 1
 .clcl     rb 1
 .title    rb 1
 .pbar     rb 1
 .icon     rb 1
 .ctrl     rb 1
 
 img_data:
 .file  rd 1
 .obj      rd 1
 
 timer:
 .value    rd 1
 .step     rd 1
 
 shm:
 .addr     rd 1
 .our      rd 1
 
 ctrl:
 .name     rb 31
 .addr     rd 1
 
 pbar:
 .width    rd 1
 .cur_val  rd 1
 .max_val  rd 1
 .f_width  rd 1
 
 buffer     rb 1024
 first_draw rb 1
 prev_pid   rd 1
 
;=====================================================================
            rb 2048
 @stack:
 @params    rb 256
 
 @memory:

Rev 7988	Rev 10017
1	use32	1	use32
2	org 0	2	org 0
3	db 'MENUET01'	3	db 'MENUET01'
4	dd 1, @ENTRY, @end, @memory, @stack, @params, 0	4	dd 1, @ENTRY, @end, @memory, @stack
-		5	M01header.params:
-		6	dd @params, 0
5		7
6	include "../../macros.inc"	8	include "../../macros.inc"
7	include "../../proc32.inc"	9	include "../../proc32.inc"
8	include "../../dll.inc"	10	include "../../dll.inc"
9	; include "../../debug.inc"	11	; include "../../debug.inc"
10	include "../../string.inc"	12	include "../../string.inc"
11		13
12	include "notify.inc"	14	include "notify.inc"
13		15
14	LINEH equ 12	16	LINEH equ 12
15	MARGIN equ 12	17	MARGIN equ 12
16	ICONS equ 11	18	ICONS equ 11
17		19
18	;-------------------------------------------------------------------------------	20	;-------------------------------------------------------------------------------
19		21
20	@ENTRY:	22	@ENTRY:
21	;; INIT HEAP	23	;; INIT HEAP
22	mcall 68, 11	24	mcall 68, 11
23		25
24	;; SAVE FOCUSED WINDOW	26	;; SAVE FOCUSED WINDOW
25	mcall 18, 7	27	mcall 18, 7
26	mov ecx, eax	28	mov ecx, eax
27	mcall 9, buffer	29	mcall 9, buffer
28	m2m dword [prev_pid], dword [buffer + 30]	30	m2m dword [prev_pid], dword [buffer + 30]
29		31
30	;; MAKE IT ALWAYS ON TOP	32	;; MAKE IT ALWAYS ON TOP
31	mcall 18, 25, 2, -1, 1	33	mcall 18, 25, 2, -1, 1
32		34
33	;; SET STD PARAMS, IF IT NEEDS	35	;; SET STD PARAMS, IF IT NEEDS
34	mov eax, @params	36	mov eax, [M01header.params]
35	cmpne byte [@params], 0, @f	37	cmpne byte [eax], 0, @f
36	mov eax, sz_std	38	mov eax, sz_std
37	@@:	39	@@:
38	mov [params.source], eax	40	mov [params.source], eax
39		41
40	;; PARSE ARGUMENTS	42	;; PARSE ARGUMENTS
41	mov esi, 0	43	mov esi, 0
42	call parse_text	44	call parse_text
43	call parse_flags	45	call parse_flags
44	movzx ebx, [params.icon]	46	movzx ebx, [params.icon]
45		47
46	;; GET PID	48	;; GET PID
47	mcall 9, buffer, -1	49	mcall 9, buffer, -1
48	mov eax, dword [buffer + 30]	50	mov eax, dword [buffer + 30]
49		51
50	;; CONVERT PID TO STR	52	;; CONVERT PID TO STR
51	mov ebx, 10	53	mov ebx, 10
52	mov ecx, 0	54	mov ecx, 0
53	@@:	55	@@:
54	mov edx, 0	56	mov edx, 0
55	div ebx	57	div ebx
56	push edx	58	push edx
57	inc ecx	59	inc ecx
58	cmpne eax, 0, @b	60	cmpne eax, 0, @b
59		61
60	mov ebx, ctrl.name	62	mov ebx, ctrl.name
61	@@:	63	@@:
62	pop eax	64	pop eax
63	add al, "0"	65	add al, "0"
64	mov [ebx], al	66	mov [ebx], al
65	inc ebx	67	inc ebx
66	loop @b	68	loop @b
67		69
68	mov dword [ebx + 0], "-NOT"	70	mov dword [ebx + 0], "-NOT"
69	mov dword [ebx + 4], "IFY"	71	mov dword [ebx + 4], "IFY"
70		72
71	;; LOAD LIBRARIES	73	;; LOAD LIBRARIES
72	stdcall dll.Load, @imports	74	stdcall dll.Load, @imports
73		75
74	;; GET SIZE OF ICONS	76	;; GET SIZE OF ICONS
75	mcall 70, fi	77	mcall 70, fi
76	mov edx, dword [buffer + 32]	78	mov edx, dword [buffer + 32]
77	shl edx, 2	79	shl edx, 2
78		80
79	;; ALLOCATE MEMORY FOR THIS	81	;; ALLOCATE MEMORY FOR THIS
80	stdcall mem.Alloc, edx	82	stdcall mem.Alloc, edx
81	mov [img_data.file], eax	83	mov [img_data.file], eax
82		84
83	;; READ ICONS	85	;; READ ICONS
84	mov dword [fi + 00], 0	86	mov dword [fi + 00], 0
85	mov dword [fi + 12], edx	87	mov dword [fi + 12], edx
86	mov dword [fi + 16], eax	88	mov dword [fi + 16], eax
87	mcall 70, fi	89	mcall 70, fi
88		90
89	;; DECODE ICONS	91	;; DECODE ICONS
90	stdcall dword [img.decode], dword [img_data.file], ebx, 0	92	stdcall dword [img.decode], dword [img_data.file], ebx, 0
91	mov dword [img_data.obj], eax	93	mov dword [img_data.obj], eax
92		94
93	;; CALC HEIGHT	95	;; CALC HEIGHT
94	mov eax, [text.lines]	96	mov eax, [text.lines]
95	add eax, 2	97	add eax, 2
96	imul eax, LINEH	98	imul eax, LINEH
97	mov [window.height], eax	99	mov [window.height], eax
98		100
99	;; CALC OFFSET OF TEXT	101	;; CALC OFFSET OF TEXT
100	mov dword [text.offset], MARGIN	102	mov dword [text.offset], MARGIN
101	cmpe byte [params.icon], 0, @f	103	cmpe byte [params.icon], 0, @f
102	add dword [text.offset], MARGIN + 24	104	add dword [text.offset], MARGIN + 24
103	@@:	105	@@:
104		106
105	;; CALC WIDTH	107	;; CALC WIDTH
106	mov eax, [text.max_len]	108	mov eax, [text.max_len]
107	imul eax, 6	109	imul eax, 6
108	add eax, MARGIN	110	add eax, MARGIN
109	add eax, [text.offset]	111	add eax, [text.offset]
110	mov [window.width], eax	112	mov [window.width], eax
111		113
112	mcall 14	114	mcall 14
113	mov ebx, eax	115	mov ebx, eax
114	movzx ebx, bx	116	movzx ebx, bx
115	mov [scr.height], ebx	117	mov [scr.height], ebx
116	shr eax, 16	118	shr eax, 16
117	mov [scr.width], eax	119	mov [scr.width], eax
118	sub eax, [window.width]	120	sub eax, [window.width]
119	sub eax, LINEH	121	sub eax, LINEH
120	mov [window.x], eax	122	mov [window.x], eax
121		123
122	;; CALC PBAR	124	;; CALC PBAR
123	mov eax, [window.width]	125	mov eax, [window.width]
124	sub eax, [text.offset]	126	sub eax, [text.offset]
125	sub eax, MARGIN	127	sub eax, MARGIN
126	mov [pbar.width], eax	128	mov [pbar.width], eax
127		129
128	;; CALC Y	130	;; CALC Y
129	mcall 68, 22, sz_shname, 256 + 512, 4 + 1 ;OPEN_ALWAYS AND WRITE	131	mcall 68, 22, sz_shname, 256 + 512, 4 + 1 ;OPEN_ALWAYS AND WRITE
130	add eax, 512	132	add eax, 512
131	mov [shm], eax	133	mov [shm], eax
132		134
133	s_search:	135	s_search:
134	mov eax, [shm]	136	mov eax, [shm]
135		137
136	mov ebx, 0	138	mov ebx, 0
137	mov ecx, [text.lines]	139	mov ecx, [text.lines]
138	add ecx, 3	140	add ecx, 3
139		141
140	push eax ebx	142	push eax ebx
141		143
142	mov eax, [scr.height]	144	mov eax, [scr.height]
143	mov edx, 0	145	mov edx, 0
144	mov ebx, LINEH	146	mov ebx, LINEH
145	div ebx	147	div ebx
146	mov edx, eax	148	mov edx, eax
147	add edx, [shm]	149	add edx, [shm]
148	sub edx, ecx	150	sub edx, ecx
149	inc edx	151	inc edx
150		152
151	pop ebx eax	153	pop ebx eax
152		154
153	s_area:	155	s_area:
154	cmpe [eax], byte 1, .is_1	156	cmpe [eax], byte 1, .is_1
155		157
156	.is_0:	158	.is_0:
157	inc ebx	159	inc ebx
158	cmpe ebx, ecx, s_ok	160	cmpe ebx, ecx, s_ok
159	jmp .next	161	jmp .next
160		162
161	.is_1:	163	.is_1:
162	mov ebx, 0	164	mov ebx, 0
163		165
164	.next:	166	.next:
165	inc eax	167	inc eax
166	cmple eax, edx, s_area	168	cmple eax, edx, s_area
167		169
168	mcall 5, 10	170	mcall 5, 10
169	jmp s_search	171	jmp s_search
170		172
171	s_ok:	173	s_ok:
172	sub eax, ecx	174	sub eax, ecx
173	inc eax	175	inc eax
174	mov [shm.our], eax	176	mov [shm.our], eax
175		177
176	mov edx, eax	178	mov edx, eax
177	sub edx, [shm]	179	sub edx, [shm]
178	inc edx	180	inc edx
179	imul edx, LINEH	181	imul edx, LINEH
180	mov [window.y], edx	182	mov [window.y], edx
181		183
182	push eax ebx	184	push eax ebx
183	mcall 48, 5	185	mcall 48, 5
184	shr ebx, 16	186	shr ebx, 16
185	add [window.y], ebx	187	add [window.y], ebx
186	pop ebx eax	188	pop ebx eax
187		189
188	@@:	190	@@:
189	mov [eax], byte 1	191	mov [eax], byte 1
190	inc eax	192	inc eax
191	loop @b	193	loop @b
192		194
193	;----------------------------	195	;----------------------------
194		196
195	;; SET EVENT MASK	197	;; SET EVENT MASK
196	mcall 40, 101b	198	mcall 40, 101b
197		199
198	;; INIT TIMER	200	;; INIT TIMER
199	mov eax, 60	201	mov eax, 60
200	imul eax, [text.lines]	202	imul eax, [text.lines]
201	mov [timer], eax	203	mov [timer], eax
202	mov dword [timer.step], 1	204	mov dword [timer.step], 1
203	cmpne byte [params.atcl], 1, @f	205	cmpne byte [params.atcl], 1, @f
204	mov dword [timer.step], 0	206	mov dword [timer.step], 0
205	@@:	207	@@:
206		208
207	;; INIT WINDOW	209	;; INIT WINDOW
208	call init_window	210	call init_window
209		211
210	;; RESTORE FOCUS	212	;; RESTORE FOCUS
211	mcall 18, 21, [prev_pid]	213	mcall 18, 21, [prev_pid]
212	mov ecx, eax	214	mov ecx, eax
213	mcall 18, 3	215	mcall 18, 3
214		216
215	jmp redraw	217	jmp redraw
216		218
217	;----------------------------	219	;----------------------------
218		220
219	update:	221	update:
220	mcall 23, 10	222	mcall 23, 10
221	cmpe al, EV_REDRAW, redraw	223	cmpe al, EV_REDRAW, redraw
222	cmpe al, EV_BUTTON, button	224	cmpe al, EV_BUTTON, button
223		225
224	mov edi, update	226	mov edi, update
225		227
226	;; TRY OPEN CONTROLLER	228	;; TRY OPEN CONTROLLER
227	cmpe byte [params.ctrl], 1, .fail_controller_open	229	cmpe byte [params.ctrl], 1, .fail_controller_open
228	mcall 68, 22, ctrl.name, , 0x01	230	mcall 68, 22, ctrl.name, , 0x01
229	cmpe eax, 0, .fail_controller_open	231	cmpe eax, 0, .fail_controller_open
230	mov byte [params.ctrl], 1	232	mov byte [params.ctrl], 1
231	mov [ctrl.addr], eax	233	mov [ctrl.addr], eax
232		234
233	;; COPY TEXT TO CTRL	235	;; COPY TEXT TO CTRL
234	add eax, NTCTRL_TEXT	236	add eax, NTCTRL_TEXT
235	mov ebx, text.buffer	237	mov ebx, text.buffer
236		238
237	mov ecx, [text.lines]	239	mov ecx, [text.lines]
238	cmpne byte [params.pbar], 1, @f	240	cmpne byte [params.pbar], 1, @f
239	dec ecx	241	dec ecx
240	@@:	242	@@:
241		243
242	.copy_start:	244	.copy_start:
243	cmpe ecx, 0, .copy_end	245	cmpe ecx, 0, .copy_end
244	mov dl, [ebx]	246	mov dl, [ebx]
245	cmpne dl, 0, @f	247	cmpne dl, 0, @f
246	mov dl, 10	248	mov dl, 10
247	dec ecx	249	dec ecx
248	@@:	250	@@:
249	mov [eax], dl	251	mov [eax], dl
250	inc eax	252	inc eax
251	inc ebx	253	inc ebx
252	jmp .copy_start	254	jmp .copy_start
253	.copy_end:	255	.copy_end:
254	mov byte [eax - 1], 0	256	mov byte [eax - 1], 0
255		257
256	;; COPY FLAGS TO CTRL	258	;; COPY FLAGS TO CTRL
257	mov eax, [ctrl.addr]	259	mov eax, [ctrl.addr]
258	add eax, NTCTRL_ICON	260	add eax, NTCTRL_ICON
259	mov dl, [params.icon]	261	mov dl, [params.icon]
260	mov [eax], dl	262	mov [eax], dl
261		263
262	mov eax, [ctrl.addr]	264	mov eax, [ctrl.addr]
263	add eax, NTCTRL_TITLE	265	add eax, NTCTRL_TITLE
264	mov dl, [params.title]	266	mov dl, [params.title]
265	mov [eax], dl	267	mov [eax], dl
266		268
267	;; SET CONTROLLER READY	269	;; SET CONTROLLER READY
268	mov eax, [ctrl.addr]	270	mov eax, [ctrl.addr]
269	add eax, NTCTRL_READY	271	add eax, NTCTRL_READY
270	mov byte [eax], 1	272	mov byte [eax], 1
271	.fail_controller_open:	273	.fail_controller_open:
272		274
273		275
274	cmpe [params.ctrl], 0, .no_ctrl	276	cmpe [params.ctrl], 0, .no_ctrl
275	;; TEST TEXT	277	;; TEST TEXT
276	mov eax, [ctrl.addr]	278	mov eax, [ctrl.addr]
277	add eax, NTCTRL_APPLY_TEXT	279	add eax, NTCTRL_APPLY_TEXT
278	cmpne byte [eax], 1, @f	280	cmpne byte [eax], 1, @f
279	mov byte [eax], 0	281	mov byte [eax], 0
280		282
281	mov eax, [ctrl.addr]	283	mov eax, [ctrl.addr]
282	add eax, NTCTRL_TEXT	284	add eax, NTCTRL_TEXT
283	mov esi, 1	285	mov esi, 1
284	call parse_text	286	call parse_text
285		287
286	mov edi, redraw	288	mov edi, redraw
287	@@:	289	@@:
288		290
289	;; TEST ICON	291	;; TEST ICON
290	mov eax, [ctrl.addr]	292	mov eax, [ctrl.addr]
291	add eax, NTCTRL_APPLY_ICON	293	add eax, NTCTRL_APPLY_ICON
292	cmpne byte [eax], 1, @f	294	cmpne byte [eax], 1, @f
293	mov byte [eax], 0	295	mov byte [eax], 0
294		296
295	mov eax, [ctrl.addr]	297	mov eax, [ctrl.addr]
296	add eax, NTCTRL_ICON	298	add eax, NTCTRL_ICON
297	mov dl, [eax]	299	mov dl, [eax]
298	mov [params.icon], dl	300	mov [params.icon], dl
299		301
300	mov edi, redraw	302	mov edi, redraw
301	@@:	303	@@:
302		304
303	;; TEST TITLE	305	;; TEST TITLE
304	mov eax, [ctrl.addr]	306	mov eax, [ctrl.addr]
305	add eax, NTCTRL_APPLY_TITLE	307	add eax, NTCTRL_APPLY_TITLE
306	cmpne byte [eax], 1, @f	308	cmpne byte [eax], 1, @f
307	mov byte [eax], 0	309	mov byte [eax], 0
308		310
309	mov eax, [ctrl.addr]	311	mov eax, [ctrl.addr]
310	add eax, NTCTRL_TITLE	312	add eax, NTCTRL_TITLE
311	mov dl, [eax]	313	mov dl, [eax]
312	mov [params.title], dl	314	mov [params.title], dl
313		315
314	mov edi, redraw	316	mov edi, redraw
315	@@:	317	@@:
316		318
317	;; TEST PBAR	319	;; TEST PBAR
318	mov eax, [ctrl.addr]	320	mov eax, [ctrl.addr]
319	add eax, NTCTRL_APPLY_PBAR	321	add eax, NTCTRL_APPLY_PBAR
320	cmpne byte [eax], 1, @f	322	cmpne byte [eax], 1, @f
321	mov byte [eax], 0	323	mov byte [eax], 0
322		324
323	mov eax, [ctrl.addr]	325	mov eax, [ctrl.addr]
324	add eax, NTCTRL_PBAR_CUR	326	add eax, NTCTRL_PBAR_CUR
325	mov edx, [eax]	327	mov edx, [eax]
326	mov [pbar.cur_val], edx	328	mov [pbar.cur_val], edx
327		329
328	mov eax, [ctrl.addr]	330	mov eax, [ctrl.addr]
329	add eax, NTCTRL_PBAR_MAX	331	add eax, NTCTRL_PBAR_MAX
330	mov edx, [eax]	332	mov edx, [eax]
331	mov [pbar.max_val], edx	333	mov [pbar.max_val], edx
332		334
333	call calc_fill_width	335	call calc_fill_width
334		336
335	mov edi, redraw	337	mov edi, redraw
336	@@:	338	@@:
337		339
338	;; TEST CLOSE	340	;; TEST CLOSE
339	mov eax, [ctrl.addr]	341	mov eax, [ctrl.addr]
340	add eax, NTCTRL_CLOSE	342	add eax, NTCTRL_CLOSE
341	cmpe byte [eax], 1, exit	343	cmpe byte [eax], 1, exit
342		344
343	.no_ctrl:	345	.no_ctrl:
344		346
345	mov eax, [timer.step]	347	mov eax, [timer.step]
346	sub [timer], eax	348	sub [timer], eax
347	cmpe [timer], dword 0, exit	349	cmpe [timer], dword 0, exit
348	jmp edi	350	jmp edi
349		351
350	;----------------------------	352	;----------------------------
351		353
352	exit:	354	exit:
353	mov eax, [shm.our]	355	mov eax, [shm.our]
354	mov ecx, [text.lines]	356	mov ecx, [text.lines]
355	add ecx, 3	357	add ecx, 3
356	@@:	358	@@:
357	mov [eax], byte 0	359	mov [eax], byte 0
358	inc eax	360	inc eax
359	loop @b	361	loop @b
360		362
361	mcall 68, 23, sz_shname	363	mcall 68, 23, sz_shname
362		364
363	mcall -1	365	mcall -1
364		366
365	;----------------------------	367	;----------------------------
366		368
367	button:	369	button:
368	mcall 17	370	mcall 17
369	cmpe byte [params.clcl], 0, exit	371	cmpe byte [params.clcl], 0, exit
370	jmp update	372	jmp update
371		373
372	;----------------------------	374	;----------------------------
373		375
374	redraw:	376	redraw:
375	call draw_window	377	call draw_window
376	call draw_text	378	call draw_text
377	call draw_pbar	379	call draw_pbar
378		380
379	jmp update	381	jmp update
380		382
381	;----------------------------	383	;----------------------------
382		384
383	draw_window:	385	draw_window:
384	call init_window	386	call init_window
385		387
386	movzx ebx, bx	388	movzx ebx, bx
387	movzx ecx, cx	389	movzx ecx, cx
388	inc ebx	390	inc ebx
389	inc ecx	391	inc ecx
390	mcall 8, , , 0x61000001	392	mcall 8, , , 0x61000001
391		393
392	mov eax, 13	394	mov eax, 13
393	mov ebx, [window.width]	395	mov ebx, [window.width]
394	mov edx, 0x222222	396	mov edx, 0x222222
395		397
396	cmpe [first_draw], byte 1, .draw_full	398	cmpe [first_draw], byte 1, .draw_full
397	mov [first_draw], byte 1	399	mov [first_draw], byte 1
398	mov esi, [window.height]	400	mov esi, [window.height]
399	mov ecx, LINEH	401	mov ecx, LINEH
400	@@:	402	@@:
401	mcall	403	mcall
402	add ecx, LINEH shl 16	404	add ecx, LINEH shl 16
403	sub esi, LINEH	405	sub esi, LINEH
404	push eax ebx	406	push eax ebx
405	mcall 5, 1	407	mcall 5, 1
406	pop ebx eax	408	pop ebx eax
407	cmpne esi, 0, @b	409	cmpne esi, 0, @b
408		410
409	.draw_full:	411	.draw_full:
410	mcall	412	mcall
411		413
412	mcall , , 1, 0x121212	414	mcall , , 1, 0x121212
413		415
414	mov ecx, [window.height]	416	mov ecx, [window.height]
415	dec ecx	417	dec ecx
416	shl ecx, 16	418	shl ecx, 16
417	inc ecx	419	inc ecx
418	mcall	420	mcall
419		421
420	mcall , 1, [window.width]	422	mcall , 1, [window.width]
421		423
422	mov ebx, [window.width]	424	mov ebx, [window.width]
423	dec ebx	425	dec ebx
424	shl ebx, 16	426	shl ebx, 16
425	inc ebx	427	inc ebx
426	mcall	428	mcall
427		429
428	mcall 1, 1, 1	430	mcall 1, 1, 1
429	mov ebx, [window.width]	431	mov ebx, [window.width]
430	sub ebx, 2	432	sub ebx, 2
431	mcall	433	mcall
432	mov ecx, [window.height]	434	mov ecx, [window.height]
433	sub ecx, 2	435	sub ecx, 2
434	mcall	436	mcall
435	mov ebx, 1	437	mov ebx, 1
436	mcall	438	mcall
437		439
438	;-----	440	;-----
439		441
440	mov ecx, [scr.width]	442	mov ecx, [scr.width]
441	inc ecx	443	inc ecx
442		444
443	mov eax, 35	445	mov eax, 35
444	mov ebx, ecx	446	mov ebx, ecx
445	imul ebx, [window.y]	447	imul ebx, [window.y]
446	add ebx, [window.x]	448	add ebx, [window.x]
447	dec ebx	449	dec ebx
448	mcall	450	mcall
449	push eax	451	push eax
450		452
451	mov eax, 35	453	mov eax, 35
452	add ebx, [window.width]	454	add ebx, [window.width]
453	add ebx, 2	455	add ebx, 2
454	mcall	456	mcall
455	push eax	457	push eax
456		458
457	mov eax, 35	459	mov eax, 35
458	mov edx, ecx	460	mov edx, ecx
459	mov esi, [window.height]	461	mov esi, [window.height]
460	dec esi	462	dec esi
461	imul edx, esi	463	imul edx, esi
462	add ebx, edx	464	add ebx, edx
463	mcall	465	mcall
464	push eax	466	push eax
465		467
466	mov eax, 35	468	mov eax, 35
467	sub ebx, [window.width]	469	sub ebx, [window.width]
468	sub ebx, 2	470	sub ebx, 2
469	mcall	471	mcall
470	push eax	472	push eax
471		473
472	;-----	474	;-----
473		475
474	mov eax, 1	476	mov eax, 1
475		477
476	pop edx	478	pop edx
477	mov ecx, [window.height]	479	mov ecx, [window.height]
478	dec ecx	480	dec ecx
479	mcall , 0	481	mcall , 0
480		482
481	pop edx	483	pop edx
482	mov ebx, [window.width]	484	mov ebx, [window.width]
483	dec ebx	485	dec ebx
484	mcall	486	mcall
485		487
486	pop edx	488	pop edx
487	mcall , , 0	489	mcall , , 0
488		490
489	pop edx	491	pop edx
490	mcall , 0	492	mcall , 0
491		493
492	;-----	494	;-----
493		495
494	cmpe byte [params.icon], 0, @f	496	cmpe byte [params.icon], 0, @f
495	movzx ebx, byte [params.icon]	497	movzx ebx, byte [params.icon]
496	dec ebx	498	dec ebx
497	imul ebx, 24	499	imul ebx, 24
498		500

Subversion Repositories Kolibri OS

(root)/programs/system/notify3/notify.asm @ 7785 – Rev 7988 → 10017