WebSVN – Kolibri OS – Diff – /programs/fs/kfm/trunk/kfm.asm


;*****************************************************************************
; KFM - Kolibri File Manager
; Copyright (c) 2006 - 2014, Marat Zakiyanov aka Mario79, aka Mario
; All rights reserved.
;
; Redistribution and use in source and binary forms, with or without
; modification, are permitted provided that the following conditions are met:
;        * Redistributions of source code must retain the above copyright
;          notice, this list of conditions and the following disclaimer.
;        * Redistributions in binary form must reproduce the above copyright
;          notice, this list of conditions and the following disclaimer in the
;          documentation and/or other materials provided with the distribution.
;        * Neither the name of the  nor the
;          names of its contributors may be used to endorse or promote products
;          derived from this software without specific prior written permission.
;
; THIS SOFTWARE IS PROVIDED BY Marat Zakiyanov ''AS IS'' AND ANY
; EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
; DISCLAIMED. IN NO EVENT SHALL  BE LIABLE FOR ANY
; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
; (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
; ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
; (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
;*****************************************************************************
; KFM v0.48d 23/12/2021
;---------------------------------------------------------------------
use32
org     0x0
 
    db    'MENUET01'
    dd    0x01
    dd    START
    dd    I_END
    dd    mem
    dd    stacktop
    dd    0x0
    dd    path
 
;include   'lang.inc'
;include   'kglobals.inc'
;include   'macros.inc'
include '../../../macros.inc'
include '../../../config.inc'           ;for nightbuild
;include '../../../debug.inc'           ;for nightbuild
 
;define __DEBUG__ 1
;define __DEBUG_LEVEL__ 1
;include '../../../debug-fdo.inc'
 
include   'editbox.inc'
;use_edit_box
use_edit_box procinfo
;include   'ASCGL.INC'
;---------------------------------------------------------------------
include   'files.inc'
;---------------------------------------------------------------------
STRLEN = 1024
;---------------------------------------------------------------------
START:
        mcall   9,procinfo,-1
        mov     ecx,[ebx+30]    ; PID
        mcall   18,21
        mov     [active_process],eax    ; WINDOW SLOT
    mov   [appl_memory],mem
    mov   ax,[select_disk_char]
    mov   [read_folder_name],ax
    mov   [read_folder_1_name],ax
    call  load_initiation_file
    call  add_memory_for_folders
    call  device_detect_f70
    call  select_starting_directories
    mcall 66, 1, 1
    mov   eax,1
    mov   [left_sort_flag],eax
    mov   [right_sort_flag],eax
 
    call  proc_read_left_folder
    test  eax,eax
    jz    @f
 
    cmp   eax,6
    jne   read_folder_error
@@:
    call  proc_read_right_folder
    test  eax,eax
    jz    @f
 
    cmp   eax,6
    je    @f
; if /hd read error for start then use /rd
    mov   esi,retrieved_devices_table+1
    call  copy_folder_name_1
    call  proc_read_right_folder
    test  eax,eax
    jz    @f
 
    cmp   eax,6
    jne   read_folder_1_error
@@:
        mcall 40, 0x27
        jmp   red_1
;---------------------------------------------------------------------
red:
    call  get_window_param
    test  [window_status],10b
    jnz   red_1   ;still
    test  [window_status],100b
    jnz   red_1
    cmp   [window_high],180
    ja    @f
    mov   esi,180
    mcall 67,-1,ebx,ebx
@@:
    cmp   [window_width],495
    ja    red_1
    mov   edx,495
    mcall 67,-1,ebx, ,ebx
red_1:
    call  draw_window
;---------------------------------------------------------------------
still:
    mcall 10
 
    call  check_active_process_for_clear_all_flags
 
    cmp   eax,1
    je    red
    cmp   eax,2
    je    key
    cmp   eax,3
    je    button
    cmp   eax,6
    je    mouse
    jmp   still
;---------------------------------------------------------------------
check_active_process_for_clear_all_flags:
        push    eax
        mcall   18,7
        cmp     [active_process],eax
        je      .exit
        
        xor     eax,eax
        cmp     [shift_flag],al
        jne     .clear_all_flags
        
        cmp     [ctrl_flag],al
        jne     .clear_all_flags
        
        cmp     [ctrl_flag],al
        je      .exit
;--------------------------------------
.clear_all_flags:
        mov     [shift_flag],al
        mov     [ctrl_flag],al
        mov     [alt_flag],al
        call    erase_fbutton
        call    draw_fbutton
;--------------------------------------    
.exit:
        pop     eax
        ret
;---------------------------------------------------------------------
get_window_param:
    mcall 9, procinfo, -1
    mov   eax,[ebx+46]
    mov   [window_high],eax
    mov   eax,[ebx+42]
    mov   [window_width],eax
    mov   eax,[ebx+70]
    mov   [window_status],eax
    mcall 48,4
    mov   [skin_high],eax
    ret
;---------------------------------------------------------------------
draw_window:
    mcall 12, 1
        xor     esi,esi
    mcall 0, <20,728>, <20,460>, 0x43cccccc   ; 0x805080D0, 0x005080D0
    call  get_window_param
 
    mcall 71, 1, header_text
 
        test    [window_status],100b    ; window is rolled up
        jnz     .exit
 
        test    [window_status],10b     ; window is minimized to panel
        jnz     .exit
 
    ; create_dir_name
    ; start_parameter
    ; file_name
    ; [temp_edi]
    ; header
    ; delete_file_data.name
    ; start_file_data.name
    ; start_parameter
     ; start_file_data.name
      ; read_icon_file.name
                ; read_file_features.name ;path ;header
 
    cmp   [window_high],180
    jb    .exit
    cmp   [window_width],495
    jb    .exit
 
    call  draw_fbutton
    call  draw_left_panel
    call  draw_right_panel
    call  draw_device_button
    call  draw_left_select_disk_button
    call  draw_left_sort_button
    call  draw_right_select_disk_button
    call  draw_right_sort_button
    call  draw_menu_bar
    call  draw_buttons_panel
.exit:
    mcall 12, 2
    ret
;---------------------------------------------------------------------
prepare_load_data:
    mov   esi,path
    mov   edi,file_name
    call  copy_path
    call  get_file_size
    test  eax,eax
    ret
;---------------------------------------------------------------------
prepare_load_data_1:
    mov   [read_file.return],eax
    mov   ebp,eax
prepare_load_data_4:
    call  load_file
    test  eax,eax
    ret
;---------------------------------------------------------------------
prepare_load_data_2:
    call  add_application_memory
prepare_load_data_3:
    call  add_application_memory
    mov   eax,[file_features_temp_area+32]
    mov   [read_file.size],eax
    ret
;---------------------------------------------------------------------
load_initiation_file:
    mov   ebx,ini_file_name
    call  prepare_load_data
    jnz   initiation_error
    call  prepare_load_data_3
    mov   eax,[appl_memory]
    mov   [left_folder_data],eax
    sub   eax,[read_file.size]
    mov   [read_file.return],eax
    mov   [ini_file_start],eax
    call  load_file
    test  eax,eax
    jnz   initiation_error
    mov   ebp,icons_associations
    call  search_star_and_end_tags
    mov   eax,[end_tag]
    mov   [icons_end_tag],eax
    ret
;---------------------------------------------------------------------
add_memory_for_folders:
    mov   ecx,[appl_memory]
    add   ecx,304*32+32
    mov   [right_folder_data],ecx
    add   ecx,304*32+32
    mov   [appl_memory],ecx
    mcall 64,1
 
    mov   eax,[left_folder_data]
    mov   [read_folder.return],eax 
    mov   eax,[right_folder_data]
    mov   [read_folder_1.return],eax
    ret
;---------------------------------------------------------------------
copy_path:
    xor   eax,eax
@@:
    cld
    lodsb
    stosb
    test  eax,eax
    jnz   @b
    mov   esi,edi
@@:
    std
    lodsb
    cmp   al,'/'
    jnz   @b
    mov   edi,esi
    add   edi,2
    mov   esi,ebx
@@:
    cld
    lodsb
    stosb
    test  eax,eax
    jnz   @b
    ret
;---------------------------------------------------------------------
copy_path_1:
    xor   eax,eax
@@:
    cld
    lodsb
    stosb
    test  eax,eax
    jnz   @b
    mov   esi,ebx
    mov   [edi-1],byte '/'
@@:
    cld
    lodsb
    stosb
    test  eax,eax
    jnz   @b
    ret
;---------------------------------------------------------------------
add_application_memory:
    mov   ecx,[file_features_temp_area+32]
.1:
    add   ecx,[appl_memory]
    mov   [appl_memory],ecx
    mcall 64,1
    ret
;---------------------------------------------------------------------
sub_application_memory:
    mov   ecx,[appl_memory]
    sub   ecx,[file_features_temp_area+32]
.1:
    mov   [appl_memory],ecx
    mcall 64,1
    ret
;---------------------------------------------------------------------
exit_apl:
    mov  [confirmation_type],exit_type
    call confirmation_action
    cmp  [work_confirmation_yes],1
    jne  red
    mcall -1
;---------------------------------------------------------------------
include   'key.inc'
;---------------------------------------------------------------------
include   'markfile.inc'
;---------------------------------------------------------------------
include   'button.inc'
;---------------------------------------------------------------------
include   'mouse.inc'
;---------------------------------------------------------------------
include   'openfile.inc'
;---------------------------------------------------------------------
include   'draw.inc'
;---------------------------------------------------------------------
include   'drw_dbut.inc'
;---------------------------------------------------------------------
include   'menu_bar.inc'
;---------------------------------------------------------------------
include   'menu_drv.inc'
;---------------------------------------------------------------------
include   'delete.inc'
;---------------------------------------------------------------------
include   'copy.inc'
;---------------------------------------------------------------------
include   'creatdir.inc'
;---------------------------------------------------------------------
include   'creatfile.inc'
;---------------------------------------------------------------------
include   'confirm.inc'
;---------------------------------------------------------------------
include   'err_wind.inc'
;---------------------------------------------------------------------
include   'detect.inc'
;---------------------------------------------------------------------
include   'tran_ini.inc'
;---------------------------------------------------------------------
include   'help.inc'
;---------------------------------------------------------------------
include   'convchar.inc'
;---------------------------------------------------------------------
include   'sort.inc'
;---------------------------------------------------------------------
include   'progrbar.inc'
;---------------------------------------------------------------------
include   'scroll.inc'
;---------------------------------------------------------------------
include   'file_inf.inc'
;---------------------------------------------------------------------
include   'text.inc'
;---------------------------------------------------------------------
 
;include_debug_strings
I_END:
;---------------------------------------------------------------------
include   'data.inc'
;---------------------------------------------------------------------
mem:

Rev 9461	Rev 9691
1	;*****************************************************************************	1	;*****************************************************************************
2	; KFM - Kolibri File Manager	2	; KFM - Kolibri File Manager
3	; Copyright (c) 2006 - 2014, Marat Zakiyanov aka Mario79, aka Mario	3	; Copyright (c) 2006 - 2014, Marat Zakiyanov aka Mario79, aka Mario
4	; All rights reserved.	4	; All rights reserved.
5	;	5	;
6	; Redistribution and use in source and binary forms, with or without	6	; Redistribution and use in source and binary forms, with or without
7	; modification, are permitted provided that the following conditions are met:	7	; modification, are permitted provided that the following conditions are met:
8	; * Redistributions of source code must retain the above copyright	8	; * Redistributions of source code must retain the above copyright
9	; notice, this list of conditions and the following disclaimer.	9	; notice, this list of conditions and the following disclaimer.
10	; * Redistributions in binary form must reproduce the above copyright	10	; * Redistributions in binary form must reproduce the above copyright
11	; notice, this list of conditions and the following disclaimer in the	11	; notice, this list of conditions and the following disclaimer in the
12	; documentation and/or other materials provided with the distribution.	12	; documentation and/or other materials provided with the distribution.
13	; * Neither the name of the nor the	13	; * Neither the name of the nor the
14	; names of its contributors may be used to endorse or promote products	14	; names of its contributors may be used to endorse or promote products
15	; derived from this software without specific prior written permission.	15	; derived from this software without specific prior written permission.
16	;	16	;
17	; THIS SOFTWARE IS PROVIDED BY Marat Zakiyanov ''AS IS'' AND ANY	17	; THIS SOFTWARE IS PROVIDED BY Marat Zakiyanov ''AS IS'' AND ANY
18	; EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED	18	; EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
19	; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE	19	; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
20	; DISCLAIMED. IN NO EVENT SHALL BE LIABLE FOR ANY	20	; DISCLAIMED. IN NO EVENT SHALL BE LIABLE FOR ANY
21	; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES	21	; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
22	; (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;	22	; (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
23	; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND	23	; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
24	; ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT	24	; ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25	; (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS	25	; (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
26	; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.	26	; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27	;*****************************************************************************	27	;*****************************************************************************
28	; KFM v0.48d 23/12/2021	28	; KFM v0.48d 23/12/2021
29	;---------------------------------------------------------------------	29	;---------------------------------------------------------------------
30	use32	30	use32
31	org 0x0	31	org 0x0
32		32
33	db 'MENUET01'	33	db 'MENUET01'
34	dd 0x01	34	dd 0x01
35	dd START	35	dd START
36	dd I_END	36	dd I_END
37	dd mem	37	dd mem
38	dd stacktop	38	dd stacktop
39	dd 0x0	39	dd 0x0
40	dd path	40	dd path
41		41
42	;include 'lang.inc'	42	;include 'lang.inc'
43	;include 'kglobals.inc'	43	;include 'kglobals.inc'
44	;include 'macros.inc'	44	;include 'macros.inc'
45	include '../../../macros.inc'	45	include '../../../macros.inc'
46	include '../../../config.inc' ;for nightbuild	46	include '../../../config.inc' ;for nightbuild
47	;include '../../../debug.inc' ;for nightbuild	47	;include '../../../debug.inc' ;for nightbuild
48		48
49	;define __DEBUG__ 1	49	;define __DEBUG__ 1
50	;define __DEBUG_LEVEL__ 1	50	;define __DEBUG_LEVEL__ 1
51	;include '../../../debug-fdo.inc'	51	;include '../../../debug-fdo.inc'
52		52
53	include 'editbox.inc'	53	include 'editbox.inc'
54	;use_edit_box	54	;use_edit_box
55	use_edit_box procinfo	55	use_edit_box procinfo
56	;include 'ASCGL.INC'	56	;include 'ASCGL.INC'
57	;---------------------------------------------------------------------	57	;---------------------------------------------------------------------
58	include 'files.inc'	58	include 'files.inc'
59	;---------------------------------------------------------------------	59	;---------------------------------------------------------------------
60	STRLEN = 1024	60	STRLEN = 1024
61	;---------------------------------------------------------------------	61	;---------------------------------------------------------------------
62	START:	62	START:
63	mcall 9,procinfo,-1	63	mcall 9,procinfo,-1
64	mov ecx,[ebx+30] ; PID	64	mov ecx,[ebx+30] ; PID
65	mcall 18,21	65	mcall 18,21
66	mov [active_process],eax ; WINDOW SLOT	66	mov [active_process],eax ; WINDOW SLOT
67	mov [appl_memory],mem	67	mov [appl_memory],mem
68	mov ax,[select_disk_char]	68	mov ax,[select_disk_char]
69	mov [read_folder_name],ax	69	mov [read_folder_name],ax
70	mov [read_folder_1_name],ax	70	mov [read_folder_1_name],ax
71	call load_initiation_file	71	call load_initiation_file
72	call add_memory_for_folders	72	call add_memory_for_folders
73	call device_detect_f70	73	call device_detect_f70
74	call select_starting_directories	74	call select_starting_directories
75	mcall 66, 1, 1	75	mcall 66, 1, 1
76	mov eax,1	76	mov eax,1
77	mov [left_sort_flag],eax	77	mov [left_sort_flag],eax
78	mov [right_sort_flag],eax	78	mov [right_sort_flag],eax
79		79
80	call proc_read_left_folder	80	call proc_read_left_folder
81	test eax,eax	81	test eax,eax
82	jz @f	82	jz @f
83		83
84	cmp eax,6	84	cmp eax,6
85	jne read_folder_error	85	jne read_folder_error
86	@@:	86	@@:
87	call proc_read_right_folder	87	call proc_read_right_folder
88	test eax,eax	88	test eax,eax
89	jz @f	89	jz @f
90		90
91	cmp eax,6	91	cmp eax,6
92	je @f	92	je @f
93	; if /hd read error for start then use /rd	93	; if /hd read error for start then use /rd
94	mov esi,retrieved_devices_table+1	94	mov esi,retrieved_devices_table+1
95	call copy_folder_name_1	95	call copy_folder_name_1
96	call proc_read_right_folder	96	call proc_read_right_folder
97	test eax,eax	97	test eax,eax
98	jz @f	98	jz @f
99		99
100	cmp eax,6	100	cmp eax,6
101	jne read_folder_1_error	101	jne read_folder_1_error
102	@@:	102	@@:
103	mcall 40, 0x27	103	mcall 40, 0x27
104	jmp red_1	104	jmp red_1
105	;---------------------------------------------------------------------	105	;---------------------------------------------------------------------
106	red:	106	red:
107	call get_window_param	107	call get_window_param
108	test [window_status],10b	108	test [window_status],10b
109	jnz red_1 ;still	109	jnz red_1 ;still
110	test [window_status],100b	110	test [window_status],100b
111	jnz red_1	111	jnz red_1
112	cmp [window_high],180	112	cmp [window_high],180
113	ja @f	113	ja @f
114	mov esi,180	114	mov esi,180
115	mcall 67,-1,ebx,ebx	115	mcall 67,-1,ebx,ebx
116	@@:	116	@@:
117	cmp [window_width],495	117	cmp [window_width],495
118	ja red_1	118	ja red_1
119	mov edx,495	119	mov edx,495
120	mcall 67,-1,ebx, ,ebx	120	mcall 67,-1,ebx, ,ebx
121	red_1:	121	red_1:
122	call draw_window	122	call draw_window
123	;---------------------------------------------------------------------	123	;---------------------------------------------------------------------
124	still:	124	still:
125	mcall 10	125	mcall 10
126		126
127	call check_active_process_for_clear_all_flags	127	call check_active_process_for_clear_all_flags
128		128
129	cmp eax,1	129	cmp eax,1
130	je red	130	je red
131	cmp eax,2	131	cmp eax,2
132	je key	132	je key
133	cmp eax,3	133	cmp eax,3
134	je button	134	je button
135	cmp eax,6	135	cmp eax,6
136	je mouse	136	je mouse
137	jmp still	137	jmp still
138	;---------------------------------------------------------------------	138	;---------------------------------------------------------------------
139	check_active_process_for_clear_all_flags:	139	check_active_process_for_clear_all_flags:
140	push eax	140	push eax
141	mcall 18,7	141	mcall 18,7
142	cmp [active_process],eax	142	cmp [active_process],eax
143	je .exit	143	je .exit
144		144
145	xor eax,eax	145	xor eax,eax
146	cmp [shift_flag],al	146	cmp [shift_flag],al
147	jne .clear_all_flags	147	jne .clear_all_flags
148		148
149	cmp [ctrl_flag],al	149	cmp [ctrl_flag],al
150	jne .clear_all_flags	150	jne .clear_all_flags
151		151
152	cmp [ctrl_flag],al	152	cmp [ctrl_flag],al
153	je .exit	153	je .exit
154	;--------------------------------------	154	;--------------------------------------
155	.clear_all_flags:	155	.clear_all_flags:
156	mov [shift_flag],al	156	mov [shift_flag],al
157	mov [ctrl_flag],al	157	mov [ctrl_flag],al
158	mov [alt_flag],al	158	mov [alt_flag],al
159	call erase_fbutton	159	call erase_fbutton
160	call draw_fbutton	160	call draw_fbutton
161	;--------------------------------------	161	;--------------------------------------
162	.exit:	162	.exit:
163	pop eax	163	pop eax
164	ret	164	ret
165	;---------------------------------------------------------------------	165	;---------------------------------------------------------------------
166	get_window_param:	166	get_window_param:
167	mcall 9, procinfo, -1	167	mcall 9, procinfo, -1
168	mov eax,[ebx+46]	168	mov eax,[ebx+46]
169	mov [window_high],eax	169	mov [window_high],eax
170	mov eax,[ebx+42]	170	mov eax,[ebx+42]
171	mov [window_width],eax	171	mov [window_width],eax
172	mov eax,[ebx+70]	172	mov eax,[ebx+70]
173	mov [window_status],eax	173	mov [window_status],eax
174	mcall 48,4	174	mcall 48,4
175	mov [skin_high],eax	175	mov [skin_high],eax
176	ret	176	ret
177	;---------------------------------------------------------------------	177	;---------------------------------------------------------------------
178	draw_window:	178	draw_window:
179	mcall 12, 1	179	mcall 12, 1
180	xor esi,esi	180	xor esi,esi
181	mcall 0, <20,728>, <20,460>, 0x43cccccc ; 0x805080D0, 0x005080D0	181	mcall 0, <20,728>, <20,460>, 0x43cccccc ; 0x805080D0, 0x005080D0
182	call get_window_param	182	call get_window_param
183		183
184	mcall 71, 1, header_text	184	mcall 71, 1, header_text
185		185
186	test [window_status],100b ; window is rolled up	186	test [window_status],100b ; window is rolled up
187	jnz .exit	187	jnz .exit
188		188
189	test [window_status],10b ; window is minimized to panel	189	test [window_status],10b ; window is minimized to panel
190	jnz .exit	190	jnz .exit
191		191
192	; create_dir_name	192	; create_dir_name
193	; start_parameter	193	; start_parameter
194	; file_name	194	; file_name
195	; [temp_edi]	195	; [temp_edi]
196	; header	196	; header
197	; delete_file_data.name	197	; delete_file_data.name
198	; start_file_data.name	198	; start_file_data.name
199	; start_parameter	199	; start_parameter
200	; start_file_data.name	200	; start_file_data.name
201	; read_icon_file.name	201	; read_icon_file.name
202	; read_file_features.name ;path ;header	202	; read_file_features.name ;path ;header
203		203
204	cmp [window_high],180	204	cmp [window_high],180
205	jb .exit	205	jb .exit
206	cmp [window_width],495	206	cmp [window_width],495
207	jb .exit	207	jb .exit
208		208
209	call draw_fbutton	209	call draw_fbutton
210	call draw_left_panel	210	call draw_left_panel
211	call draw_right_panel	211	call draw_right_panel
212	call draw_device_button	212	call draw_device_button
213	call draw_left_select_disk_button	213	call draw_left_select_disk_button
214	call draw_left_sort_button	214	call draw_left_sort_button
215	call draw_right_select_disk_button	215	call draw_right_select_disk_button
216	call draw_right_sort_button	216	call draw_right_sort_button
217	call draw_menu_bar	217	call draw_menu_bar
218	call draw_buttons_panel	218	call draw_buttons_panel
219	.exit:	219	.exit:
220	mcall 12, 2	220	mcall 12, 2
221	ret	221	ret
222	;---------------------------------------------------------------------	222	;---------------------------------------------------------------------
223	prepare_load_data:	223	prepare_load_data:
224	mov esi,path	224	mov esi,path
225	mov edi,file_name	225	mov edi,file_name
226	call copy_path	226	call copy_path
227	call get_file_size	227	call get_file_size
228	test eax,eax	228	test eax,eax
229	ret	229	ret
230	;---------------------------------------------------------------------	230	;---------------------------------------------------------------------
231	prepare_load_data_1:	231	prepare_load_data_1:
232	mov [read_file.return],eax	232	mov [read_file.return],eax
233	mov ebp,eax	233	mov ebp,eax
234	prepare_load_data_4:	234	prepare_load_data_4:
235	call load_file	235	call load_file
236	test eax,eax	236	test eax,eax
237	ret	237	ret
238	;---------------------------------------------------------------------	238	;---------------------------------------------------------------------
239	prepare_load_data_2:	239	prepare_load_data_2:
240	call add_application_memory	240	call add_application_memory
241	prepare_load_data_3:	241	prepare_load_data_3:
242	call add_application_memory	242	call add_application_memory
243	mov eax,[file_features_temp_area+32]	243	mov eax,[file_features_temp_area+32]
244	mov [read_file.size],eax	244	mov [read_file.size],eax
245	ret	245	ret
246	;---------------------------------------------------------------------	246	;---------------------------------------------------------------------
247	load_initiation_file:	247	load_initiation_file:
248	mov ebx,ini_file_name	248	mov ebx,ini_file_name
249	call prepare_load_data	249	call prepare_load_data
250	jnz initiation_error	250	jnz initiation_error
251	call prepare_load_data_3	251	call prepare_load_data_3
252	mov eax,[appl_memory]	252	mov eax,[appl_memory]
253	mov [left_folder_data],eax	253	mov [left_folder_data],eax
254	sub eax,[read_file.size]	254	sub eax,[read_file.size]
255	mov [read_file.return],eax	255	mov [read_file.return],eax
256	mov [ini_file_start],eax	256	mov [ini_file_start],eax
257	call load_file	257	call load_file
258	test eax,eax	258	test eax,eax
259	jnz initiation_error	259	jnz initiation_error
260	mov ebp,icons_associations	260	mov ebp,icons_associations
261	call search_star_and_end_tags	261	call search_star_and_end_tags
262	mov eax,[end_tag]	262	mov eax,[end_tag]
263	mov [icons_end_tag],eax	263	mov [icons_end_tag],eax
264	ret	264	ret
265	;---------------------------------------------------------------------	265	;---------------------------------------------------------------------
266	add_memory_for_folders:	266	add_memory_for_folders:
267	mov ecx,[appl_memory]	267	mov ecx,[appl_memory]
268	add ecx,304*32+32	268	add ecx,304*32+32
269	mov [right_folder_data],ecx	269	mov [right_folder_data],ecx
270	add ecx,304*32+32	270	add ecx,304*32+32
271	mov [appl_memory],ecx	271	mov [appl_memory],ecx
272	mcall 64,1	272	mcall 64,1
273		273
274	mov eax,[left_folder_data]	274	mov eax,[left_folder_data]
275	mov [read_folder.return],eax	275	mov [read_folder.return],eax
276	mov eax,[right_folder_data]	276	mov eax,[right_folder_data]
277	mov [read_folder_1.return],eax	277	mov [read_folder_1.return],eax
278	ret	278	ret
279	;---------------------------------------------------------------------	279	;---------------------------------------------------------------------
280	copy_path:	280	copy_path:
281	xor eax,eax	281	xor eax,eax
282	@@:	282	@@:
283	cld	283	cld
284	lodsb	284	lodsb
285	stosb	285	stosb
286	test eax,eax	286	test eax,eax
287	jnz @b	287	jnz @b
288	mov esi,edi	288	mov esi,edi
289	@@:	289	@@:
290	std	290	std
291	lodsb	291	lodsb
292	cmp al,'/'	292	cmp al,'/'
293	jnz @b	293	jnz @b
294	mov edi,esi	294	mov edi,esi
295	add edi,2	295	add edi,2
296	mov esi,ebx	296	mov esi,ebx
297	@@:	297	@@:
298	cld	298	cld
299	lodsb	299	lodsb
300	stosb	300	stosb
301	test eax,eax	301	test eax,eax
302	jnz @b	302	jnz @b
303	ret	303	ret
304	;---------------------------------------------------------------------	304	;---------------------------------------------------------------------
305	copy_path_1:	305	copy_path_1:
306	xor eax,eax	306	xor eax,eax
307	@@:	307	@@:
308	cld	308	cld
309	lodsb	309	lodsb
310	stosb	310	stosb
311	test eax,eax	311	test eax,eax
312	jnz @b	312	jnz @b
313	mov esi,ebx	313	mov esi,ebx
314	mov [edi-1],byte '/'	314	mov [edi-1],byte '/'
315	@@:	315	@@:
316	cld	316	cld
317	lodsb	317	lodsb
318	stosb	318	stosb
319	test eax,eax	319	test eax,eax
320	jnz @b	320	jnz @b
321	ret	321	ret
322	;---------------------------------------------------------------------	322	;---------------------------------------------------------------------
323	add_application_memory:	323	add_application_memory:
324	mov ecx,[file_features_temp_area+32]	324	mov ecx,[file_features_temp_area+32]
325	.1:	325	.1:
326	add ecx,[appl_memory]	326	add ecx,[appl_memory]
327	mov [appl_memory],ecx	327	mov [appl_memory],ecx
328	mcall 64,1	328	mcall 64,1
329	ret	329	ret
330	;---------------------------------------------------------------------	330	;---------------------------------------------------------------------
331	sub_application_memory:	331	sub_application_memory:
332	mov ecx,[appl_memory]	332	mov ecx,[appl_memory]
333	sub ecx,[file_features_temp_area+32]	333	sub ecx,[file_features_temp_area+32]
334	.1:	334	.1:
335	mov [appl_memory],ecx	335	mov [appl_memory],ecx
336	mcall 64,1	336	mcall 64,1
337	ret	337	ret
338	;---------------------------------------------------------------------	338	;---------------------------------------------------------------------
339	exit_apl:	339	exit_apl:
340	mov [confirmation_type],exit_type	340	mov [confirmation_type],exit_type
341	call confirmation_action	341	call confirmation_action
342	cmp [work_confirmation_yes],1	342	cmp [work_confirmation_yes],1
343	jne red	343	jne red
344	mcall -1	344	mcall -1
345	;---------------------------------------------------------------------	345	;---------------------------------------------------------------------
346	include 'key.inc'	346	include 'key.inc'
347	;---------------------------------------------------------------------	347	;---------------------------------------------------------------------
348	include 'markfile.inc'	348	include 'markfile.inc'
349	;---------------------------------------------------------------------	349	;---------------------------------------------------------------------
350	include 'button.inc'	350	include 'button.inc'
351	;---------------------------------------------------------------------	351	;---------------------------------------------------------------------
352	include 'mouse.inc'	352	include 'mouse.inc'
353	;---------------------------------------------------------------------	353	;---------------------------------------------------------------------
354	include 'openfile.inc'	354	include 'openfile.inc'
355	;---------------------------------------------------------------------	355	;---------------------------------------------------------------------
356	include 'draw.inc'	356	include 'draw.inc'
357	;---------------------------------------------------------------------	357	;---------------------------------------------------------------------
358	include 'drw_dbut.inc'	358	include 'drw_dbut.inc'
359	;---------------------------------------------------------------------	359	;---------------------------------------------------------------------
360	include 'menu_bar.inc'	360	include 'menu_bar.inc'
361	;---------------------------------------------------------------------	361	;---------------------------------------------------------------------
362	include 'menu_drv.inc'	362	include 'menu_drv.inc'
363	;---------------------------------------------------------------------	363	;---------------------------------------------------------------------
364	include 'delete.inc'	364	include 'delete.inc'
365	;---------------------------------------------------------------------	365	;---------------------------------------------------------------------
366	include 'copy.inc'	366	include 'copy.inc'
367	;---------------------------------------------------------------------	367	;---------------------------------------------------------------------
368	include 'creatdir.inc'	368	include 'creatdir.inc'
369	;---------------------------------------------------------------------	369	;---------------------------------------------------------------------
370	include 'creatfile.inc'	370	include 'creatfile.inc'
371	;---------------------------------------------------------------------	371	;---------------------------------------------------------------------
372	include 'confirm.inc'	372	include 'confirm.inc'
373	;---------------------------------------------------------------------	373	;---------------------------------------------------------------------
374	include 'err_wind.inc'	374	include 'err_wind.inc'
375	;---------------------------------------------------------------------	375	;---------------------------------------------------------------------
376	include 'detect.inc'	376	include 'detect.inc'
377	;---------------------------------------------------------------------	377	;---------------------------------------------------------------------
378	include 'tran_ini.inc'	378	include 'tran_ini.inc'
379	;---------------------------------------------------------------------	379	;---------------------------------------------------------------------
380	include 'help.inc'	380	include 'help.inc'
381	;---------------------------------------------------------------------	381	;---------------------------------------------------------------------
382	include 'convchar.inc'	382	include 'convchar.inc'
383	;---------------------------------------------------------------------	383	;---------------------------------------------------------------------
384	include 'sort.inc'	384	include 'sort.inc'
385	;---------------------------------------------------------------------	385	;---------------------------------------------------------------------
386	include 'progrbar.inc'	386	include 'progrbar.inc'
387	;---------------------------------------------------------------------	387	;---------------------------------------------------------------------
388	include 'scroll.inc'	388	include 'scroll.inc'
389	;---------------------------------------------------------------------	389	;---------------------------------------------------------------------
390	include 'file_inf.inc'	390	include 'file_inf.inc'
391	;---------------------------------------------------------------------	391	;---------------------------------------------------------------------
392	include 'text.inc'	392	include 'text.inc'
393	;---------------------------------------------------------------------	393	;---------------------------------------------------------------------
394	I_END:	-
395	;include_debug_strings	394	;include_debug_strings
-		395	I_END:
396	;---------------------------------------------------------------------	396	;---------------------------------------------------------------------
397	include 'data.inc'	397	include 'data.inc'
398	;---------------------------------------------------------------------	398	;---------------------------------------------------------------------
399	mem:	399	mem:

Subversion Repositories Kolibri OS

(root)/programs/fs/kfm/trunk/kfm.asm @ 3840 – Rev 9461 → 9691