Rev 1837 | Go to most recent revision | Details | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
1792 | yogev_ezra | 1 | ;************************************************************** |
2 | ; KFM - Kolibri File Manager |
||
3 | ;************************************************************** |
||
4 | use32 |
||
5 | db 'MENUET01' |
||
6 | dd 0x01 |
||
7 | dd START |
||
8 | dd I_END |
||
9 | dd mem |
||
10 | dd stacktop |
||
11 | dd 0x0 |
||
12 | dd path |
||
13 | |||
14 | ;include 'lang.inc' |
||
15 | ;include 'kglobals.inc' |
||
16 | include 'macros.inc' |
||
17 | include 'editbox.inc' |
||
18 | ;use_edit_box |
||
19 | use_edit_box procinfo |
||
20 | ;include 'ASCGL.INC' |
||
21 | ;--------------------------------------------------------------------- |
||
22 | include 'files.inc' |
||
23 | ;--------------------------------------------------------------------- |
||
24 | STRLEN = 1024 |
||
25 | ;--------------------------------------------------------------------- |
||
26 | START: |
||
27 | mcall 9, procinfo, -1 |
||
28 | mov eax,[ebx+30] |
||
29 | mov [PID],eax |
||
30 | xor ecx,ecx |
||
31 | @@: |
||
32 | inc ecx |
||
33 | mcall 9, procinfo |
||
34 | mov eax,[PID] |
||
35 | cmp eax,[ebx+30] |
||
36 | jne @r |
||
37 | mov [active_process],ecx |
||
38 | mov [appl_memory],mem |
||
39 | mov ax,[select_disk_char] |
||
40 | mov [read_folder_name],ax |
||
41 | mov [read_folder_1_name],ax |
||
42 | call load_icon_and_convert_to_img |
||
43 | call load_buttons_and_convert_to_img |
||
44 | call load_initiation_file |
||
45 | call add_memory_for_folders |
||
46 | call device_detect |
||
47 | call device_detect_f70 |
||
48 | mcall 66, 1, 1 |
||
49 | ; call draw_window |
||
50 | ; xor eax,eax |
||
51 | mov eax,1 |
||
52 | mov [left_sort_flag],eax |
||
53 | mov [right_sort_flag],eax |
||
54 | |||
55 | call proc_read_left_folder |
||
56 | test eax,eax |
||
57 | jz @f |
||
58 | cmp eax,6 |
||
59 | jne read_folder_error |
||
60 | @@: |
||
61 | call proc_read_right_folder |
||
62 | test eax,eax |
||
63 | jz @f |
||
64 | cmp eax,6 |
||
65 | jne read_folder_1_error |
||
66 | @@: |
||
67 | mcall 40, 0x27 |
||
68 | jmp red_1 |
||
69 | ;--------------------------------------------------------------------- |
||
70 | red: |
||
71 | call get_window_param |
||
72 | test [window_status],10b |
||
73 | jnz red_1 ;still |
||
74 | test [window_status],100b |
||
75 | jnz red_1 |
||
76 | cmp [window_high],180 |
||
77 | ja @f |
||
78 | mov esi,180 |
||
79 | mcall 67,-1,ebx,ebx |
||
80 | @@: |
||
81 | cmp [window_width],495 |
||
82 | ja red_1 |
||
83 | mov edx,495 |
||
84 | mcall 67,-1,ebx, ,ebx |
||
85 | red_1: |
||
86 | call draw_window |
||
87 | ;--------------------------------------------------------------------- |
||
88 | still: |
||
89 | mcall 10 |
||
90 | cmp eax,1 |
||
91 | je red |
||
92 | cmp eax,2 |
||
93 | je key |
||
94 | cmp eax,3 |
||
95 | je button |
||
96 | cmp eax,6 |
||
97 | je mouse |
||
98 | jmp still |
||
99 | ;--------------------------------------------------------------------- |
||
100 | get_window_param: |
||
101 | mcall 9, procinfo, -1 |
||
102 | mov eax,[ebx+46] |
||
103 | mov [window_high],eax |
||
104 | mov eax,[ebx+42] |
||
105 | mov [window_width],eax |
||
106 | mov eax,[ebx+70] |
||
107 | mov [window_status],eax |
||
108 | mcall 48,4 |
||
109 | mov [skin_high],eax |
||
110 | ret |
||
111 | ;--------------------------------------------------------------------- |
||
112 | draw_window: |
||
113 | mcall 12, 1 |
||
114 | ; mcall 0, <20,620>, <20,460>, 0x03cccccc ; 0x805080D0, 0x005080D0 |
||
115 | xor esi,esi |
||
116 | mcall 0, <20,620>, <20,460>, 0x43cccccc ; 0x805080D0, 0x005080D0 |
||
117 | call get_window_param |
||
118 | ; mov ecx,[temp_esi] |
||
119 | test [window_status],10b |
||
120 | jnz @f |
||
121 | mcall 71, 1 , header |
||
122 | ; create_dir_name |
||
123 | ; start_parameter |
||
124 | ; file_name |
||
125 | ; [temp_edi] |
||
126 | ; header |
||
127 | ; delete_file_data.name |
||
128 | ; start_file_data.name |
||
129 | ; start_parameter |
||
130 | ; start_file_data.name |
||
131 | ; read_icon_file.name |
||
132 | ; read_file_features.name ;path ;header |
||
133 | |||
134 | cmp [window_high],180 |
||
135 | jb @f |
||
136 | cmp [window_width],495 |
||
137 | jb @f |
||
138 | |||
139 | ; pusha |
||
140 | ; mcall 4,<15,25>,0,read_folder.name,100 |
||
141 | ; popa |
||
142 | call draw_fbutton |
||
143 | |||
144 | ; mov [left_panel_clear_all],1 |
||
145 | |||
146 | call draw_left_panel |
||
147 | |||
148 | ; mov [right_panel_clear_all],1 |
||
149 | |||
150 | call draw_right_panel |
||
151 | call draw_device_button |
||
152 | call draw_left_select_disk_button |
||
153 | call draw_left_sort_button |
||
154 | call draw_right_select_disk_button |
||
155 | call draw_right_sort_button |
||
156 | call draw_menu_bar |
||
157 | call draw_buttons_panel |
||
158 | call draw_ATAPI_tray_control |
||
159 | |||
160 | ; mcall 47,0x80000,[left_scroll_compens],<300, 5>,0xffffff |
||
161 | ; call mouse.draw_data |
||
162 | ; mcall 18, 7 |
||
163 | ; mov [temp_eax],eax |
||
164 | ; mcall 47,0x80000,[active_process],<300, 5>,0xffffff |
||
165 | ; mcall 47,0x80000,[left_marked_counter],<300, 5>,0xffffff |
||
166 | ; mcall 47,0x80000,[right_marked_counter],<400, 5>,0xffffff |
||
167 | ; mcall 47,0x80000,[sorting_low_limit],<100, 5>,0xffffff |
||
168 | ; mcall 47,0x80000,[sort_counter],<200, 5>,0xffffff |
||
169 | ; mcall 47,0x80000,[sorting_high_limit],<300, 5>,0xffffff |
||
170 | ; mcall 47,0x80000,[dir_temp_counter],<400, 5>,0xffffff |
||
171 | |||
172 | ; mcall 47,0x80000,[timer_tick],<500, 5>,0xffffff |
||
173 | ; mcall 47,0x80000,[temp_eax],<400, 5>,0xffffff |
||
174 | ; mcall 47,0x80000,[temp_ebx],<400, 5>,0xffffff |
||
175 | ; mcall 47,0x80000,[temp_ecx],<500, 5>,0xffffff |
||
176 | ; mcall 47,0x80000,[temp_ebx],<500, 5>,0xffffff |
||
177 | ; mcall 47,0x80000,[ini_file_start],<100, 5>,0xffffff |
||
178 | ; mcall 47,0x80000,[left_folder_data],<200, 5>,0xffffff |
||
179 | ; mcall 47,0x80000,[right_folder_data],<300, 5>,0xffffff |
||
180 | ; mcall 47,0x80000,[appl_memory],<500, 5>,0xffffff |
||
181 | ; mcall 47,0x80000,[temp_znak],<500, 5>,0xffffff |
||
182 | |||
183 | ; mcall 47,0x80000,[sort_counter],<200, 5>,0xffffff |
||
184 | ; mcall 47,0x80000,[temp_edi],<250, 5>,0xffffff |
||
185 | ; mcall 47,0x80000,[temp_esi],<300, 5>,0xffffff |
||
186 | ; mcall 47,0x80000,[temp_ecx],<350, 5>,0xffffff |
||
187 | ; mcall 47,0x80000,[temp_znak],<400, 5>,0xffffff |
||
188 | |||
189 | ; movzx ecx,[left_start_draw_cursor_line] |
||
190 | ; mcall 47,0x40000, ,<300, 5>,0xffffff |
||
191 | ; mcall 47,0x40000,[left_start_draw_line],<400, 5>,0xffffff |
||
192 | |||
193 | ; mcall 47,0x40000,[window_width],<100, 5>,0xffffff |
||
194 | ; mcall 47,0x40000,[window_high],<130, 5>,0xffffff |
||
195 | |||
196 | ; mcall 47,0x80100,[left_panel_x],<200, 5>,0xffffff |
||
197 | ; mcall 47,0x80100,[left_panel_y],<250, 5>,0xffffff |
||
198 | ; mov edx,[temp_counter_dword_1] |
||
199 | ; mcall 4,<150,3>,0x80000000 |
||
200 | ; mov edx,[temp_counter_dword] |
||
201 | ; mcall 4,<5,3>,0x80000000 |
||
202 | @@: |
||
203 | mcall 12, 2 |
||
204 | ret |
||
205 | ;temp_eax dd 0 |
||
206 | ;temp_ebx dd 0 |
||
207 | ;temp_ecx dd 0 |
||
208 | ;temp_edx dd 0 |
||
209 | ;temp_esi dd 0 |
||
210 | ;temp_edi dd 0 |
||
211 | ;temp_ebp dd 0 |
||
212 | ;temp_esp dd 0 |
||
213 | ;temp_znak dd 0 |
||
214 | ;temp_counter_dword_1 dd 0 |
||
215 | ;extension_size_1 dd 0 |
||
216 | ;timer_tick dd 0 |
||
217 | ;--------------------------------------------------------------------- |
||
218 | prepare_load_data: |
||
219 | mov esi,path |
||
220 | mov edi,file_name |
||
221 | call copy_path |
||
222 | call get_file_size |
||
223 | test eax,eax |
||
224 | ret |
||
225 | ;--------------------------------------------------------------------- |
||
226 | prepare_load_data_1: |
||
227 | mov [read_file.return],eax |
||
228 | mov ebp,eax |
||
229 | prepare_load_data_4: |
||
230 | call load_file |
||
231 | test eax,eax |
||
232 | ret |
||
233 | ;--------------------------------------------------------------------- |
||
234 | prepare_load_data_2: |
||
235 | call add_application_memory |
||
236 | prepare_load_data_3: |
||
237 | call add_application_memory |
||
238 | mov eax,[file_features_temp_area+32] |
||
239 | mov [read_file.size],eax |
||
240 | ret |
||
241 | ;--------------------------------------------------------------------- |
||
242 | load_icon_and_convert_to_img: |
||
243 | mov ebx,icons_file_name |
||
244 | call prepare_load_data |
||
245 | jnz icon_error |
||
246 | call prepare_load_data_2 |
||
247 | add eax,mem |
||
248 | call prepare_load_data_1 |
||
249 | jnz icon_error |
||
250 | call convert_bmp_to_img |
||
251 | call sub_application_memory |
||
252 | ret |
||
253 | ;--------------------------------------------------------------------- |
||
254 | load_buttons_and_convert_to_img: |
||
255 | mov ebx,buttons_file_name |
||
256 | call prepare_load_data |
||
257 | jnz buttons_error |
||
258 | mov eax,[appl_memory] |
||
259 | mov [buttons_img_start],eax |
||
260 | call prepare_load_data_2 |
||
261 | add eax,[buttons_img_start] |
||
262 | call prepare_load_data_1 |
||
263 | jnz buttons_error |
||
264 | call convert_bmp_to_img |
||
265 | call sub_application_memory |
||
266 | ret |
||
267 | ;--------------------------------------------------------------------- |
||
268 | load_initiation_file: |
||
269 | mov ebx,ini_file_name |
||
270 | call prepare_load_data |
||
271 | jnz initiation_error |
||
272 | call prepare_load_data_3 |
||
273 | mov eax,[appl_memory] |
||
274 | mov [left_folder_data],eax |
||
275 | sub eax,[read_file.size] |
||
276 | mov [read_file.return],eax |
||
277 | mov [ini_file_start],eax |
||
278 | call load_file |
||
279 | test eax,eax |
||
280 | jnz initiation_error |
||
281 | mov ebp,icons_associations |
||
282 | call search_star_and_end_tags |
||
283 | ; cmp ebp,-1 |
||
284 | ; je .end |
||
285 | mov eax,[end_tag] |
||
286 | mov [icons_end_tag],eax |
||
287 | ret |
||
288 | ;--------------------------------------------------------------------- |
||
289 | add_memory_for_folders: |
||
290 | mov ecx,[appl_memory] |
||
291 | add ecx,304*32+32 |
||
292 | mov [right_folder_data],ecx |
||
293 | add ecx,304*32+32 |
||
294 | mov [appl_memory],ecx |
||
295 | mcall 64,1 |
||
296 | ret |
||
297 | ;--------------------------------------------------------------------- |
||
298 | copy_path: |
||
299 | xor eax,eax |
||
300 | @@: |
||
301 | cld |
||
302 | lodsb |
||
303 | stosb |
||
304 | test eax,eax |
||
305 | jnz @b |
||
306 | mov esi,edi |
||
307 | ; dec esi |
||
308 | @@: |
||
309 | std |
||
310 | lodsb |
||
311 | cmp al,'/' |
||
312 | jnz @b |
||
313 | mov edi,esi |
||
314 | add edi,2 |
||
315 | mov esi,ebx |
||
316 | @@: |
||
317 | cld |
||
318 | lodsb |
||
319 | stosb |
||
320 | test eax,eax |
||
321 | jnz @b |
||
322 | ret |
||
323 | ;--------------------------------------------------------------------- |
||
324 | copy_path_1: |
||
325 | xor eax,eax |
||
326 | @@: |
||
327 | cld |
||
328 | lodsb |
||
329 | stosb |
||
330 | test eax,eax |
||
331 | jnz @b |
||
332 | mov esi,ebx |
||
333 | mov [edi-1],byte '/' |
||
334 | @@: |
||
335 | cld |
||
336 | lodsb |
||
337 | stosb |
||
338 | test eax,eax |
||
339 | jnz @b |
||
340 | ret |
||
341 | ;--------------------------------------------------------------------- |
||
342 | add_application_memory: |
||
343 | mov ecx,[file_features_temp_area+32] |
||
344 | .1: |
||
345 | add ecx,[appl_memory] |
||
346 | mov [appl_memory],ecx |
||
347 | mcall 64,1 |
||
348 | ret |
||
349 | ;--------------------------------------------------------------------- |
||
350 | sub_application_memory: |
||
351 | mov ecx,[appl_memory] |
||
352 | sub ecx,[file_features_temp_area+32] |
||
353 | .1: |
||
354 | mov [appl_memory],ecx |
||
355 | mcall 64,1 |
||
356 | ret |
||
357 | ;--------------------------------------------------------------------- |
||
358 | include 'key.inc' |
||
359 | ;--------------------------------------------------------------------- |
||
360 | include 'markfile.inc' |
||
361 | ;--------------------------------------------------------------------- |
||
362 | include 'button.inc' |
||
363 | ;--------------------------------------------------------------------- |
||
364 | include 'mouse.inc' |
||
365 | ;--------------------------------------------------------------------- |
||
366 | include 'openfile.inc' |
||
367 | ;--------------------------------------------------------------------- |
||
368 | include 'draw.inc' |
||
369 | ;--------------------------------------------------------------------- |
||
370 | include 'menu_bar.inc' |
||
371 | ;--------------------------------------------------------------------- |
||
372 | include 'menu_drv.inc' |
||
373 | ;--------------------------------------------------------------------- |
||
374 | include 'delete.inc' |
||
375 | ;--------------------------------------------------------------------- |
||
376 | include 'copy.inc' |
||
377 | ;--------------------------------------------------------------------- |
||
378 | include 'creatdir.inc' |
||
379 | ;--------------------------------------------------------------------- |
||
380 | include 'confirm.inc' |
||
381 | ;--------------------------------------------------------------------- |
||
382 | include 'err_wind.inc' |
||
383 | ;--------------------------------------------------------------------- |
||
384 | include 'detect.inc' |
||
385 | ;--------------------------------------------------------------------- |
||
386 | include 'conv_bmp.inc' |
||
387 | ;--------------------------------------------------------------------- |
||
388 | include 'tran_ini.inc' |
||
389 | ;--------------------------------------------------------------------- |
||
390 | include 'help.inc' |
||
391 | ;--------------------------------------------------------------------- |
||
392 | include 'convchar.inc' |
||
393 | ;--------------------------------------------------------------------- |
||
394 | include 'sort.inc' |
||
395 | ;--------------------------------------------------------------------- |
||
396 | include 'exit.inc' |
||
397 | ;--------------------------------------------------------------------- |
||
398 | include 'progrbar.inc' |
||
399 | ;--------------------------------------------------------------------- |
||
400 | include 'scroll.inc' |
||
401 | ;--------------------------------------------------------------------- |
||
402 | include 'file_inf.inc' |
||
403 | ;--------------------------------------------------------------------- |
||
404 | include 'text.inc' |
||
405 | ;--------------------------------------------------------------------- |
||
406 | I_END: |
||
407 | ;--------------------------------------------------------------------- |
||
408 | include 'data.inc' |
||
409 | ;--------------------------------------------------------------------- |
||
410 | mem:5,3>150,3>250,>200,>130,>100,>400,>300,>400,>350,>300,>250,>200,>500,>500,>300,>200,>100,>500,>500,>400,>400,>500,>400,>300,>200,>100,>400,>300,>300,>300,>15,25>20,460>20,620>20,460>20,620> |