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


use32
    org     0
    db	    'MENUET01'
    dd	    1, @ENTRY, @end, @memory, @stack, @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, @params
    cmpne   byte [@params], 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 2048
 
 @memory:

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

Subversion Repositories Kolibri OS

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