Rev 3440 | Rev 3444 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
3363 | leency | 1 | //Leency & Veliant 2008-2013 |
2 | //GNU GPL licence. |
||
3 | |||
4 | //копировать через поток |
||
5 | |||
6 | //libraries |
||
7 | #define MEMSIZE 0xA0000 |
||
8 | #include "..\lib\kolibri.h" |
||
9 | #include "..\lib\strings.h" |
||
10 | #include "..\lib\mem.h" |
||
11 | #include "..\lib\dll.h" |
||
12 | #include "..\lib\lib.obj\box_lib.h" |
||
13 | #include "..\lib\file_system.h" |
||
14 | #include "..\lib\figures.h" |
||
3412 | leency | 15 | #include "..\lib\encoding.h" |
3434 | leency | 16 | #include "..\lib\list_box.h" |
17 | #include "..\lib\copyf.h" |
||
3363 | leency | 18 | //images |
19 | #include "imgs\toolbar.txt" |
||
20 | #include "imgs\left_p.txt" |
||
21 | |||
22 | //for OpenDir |
||
23 | #define ONLY_SHOW 0 |
||
24 | #define WITH_REDRAW 1 |
||
25 | #define ONLY_OPEN 2 |
||
26 | |||
3440 | leency | 27 | #define TITLE "Eolite File Manager v1.81" |
28 | #define ABOUT_TITLE "Eolite v1.81" |
||
3363 | leency | 29 | dword col_work = 0xE4DFE1; |
30 | dword col_border = 0x819FC5; |
||
31 | dword col_padding = 0xC8C9C9; |
||
32 | dword col_selec = 0x94AECE; |
||
33 | dword col_lpanel = 0x00699C; |
||
34 | |||
3434 | leency | 35 | int toolbar_buttons_x[7]={9,46,85,134,167,203}; |
36 | char tmp_disk_del_param[3]="d0"; |
||
37 | struct path_string { char Item[4096]; }; |
||
3363 | leency | 38 | |
3434 | leency | 39 | llist files; |
40 | |||
41 | byte |
||
3363 | leency | 42 | path[4096], |
43 | file_path[4096], |
||
3404 | leency | 44 | file_name[256], |
3363 | leency | 45 | copy_file[4096], |
3434 | leency | 46 | temp[4096]; |
47 | byte |
||
3439 | leency | 48 | cut_active=0, |
49 | rename_active=0, |
||
50 | del_active=0, |
||
3434 | leency | 51 | show_dev_name=1, |
52 | sort_num=2, |
||
3441 | leency | 53 | itdir; |
3363 | leency | 54 | |
55 | proc_info Form; |
||
56 | mouse m; |
||
3434 | leency | 57 | int mouse_dd, scroll_used, scroll_size; |
58 | dword buf, off; |
||
59 | dword file_mas[6898]; |
||
60 | int j, i; |
||
3363 | leency | 61 | |
62 | edit_box edit2= {250,213,80,0xFFFFCC,0x94AECE,0xFFFFCC,0xffffff,0,248,#file_name,#mouse_dd,64,6,6}; |
||
3434 | leency | 63 | PathShow_data PathShow = {0, 17,250, 6, 250, 0, 0, 0x0, 0xFFFfff, #path, #temp, 0}; |
3363 | leency | 64 | PathShow_data FileShow = {0, 56,215, 6, 100, 0, 0, 0x0, 0xFFFfff, #file_name, #temp, 0}; |
65 | |||
66 | #include "include\some_code.h" |
||
67 | #include "include\about_dialog.h" |
||
68 | #include "include\sorting.h" |
||
69 | #include "include\icons_f.h" |
||
70 | #include "include\ini.h" |
||
71 | #include "include\left_panel.h" |
||
72 | #include "include\history.h" |
||
3434 | leency | 73 | #include "include\file_menu.h" |
3363 | leency | 74 | |
75 | void main() |
||
76 | { |
||
3434 | leency | 77 | word key, id, can_show, can_select; |
3363 | leency | 78 | |
3434 | leency | 79 | files.line_h=18; |
3363 | leency | 80 | mem_Init(); |
81 | if (load_dll2(boxlib, #box_lib_init,0)!=0) notify("Error while loading library /rd/1/lib/box_lib.obj"); |
||
3434 | leency | 82 | SystemDiscsGet(); |
3432 | leency | 83 | GetIni(1); |
3363 | leency | 84 | if (param) |
85 | { |
||
86 | strcpy(#path, #param); |
||
3434 | leency | 87 | if (path[strlen(#path)-1]!='/') chrcat(#path, '/'); //add "/" to the end of the string |
3363 | leency | 88 | } |
89 | else |
||
3432 | leency | 90 | strcpy(#path, "/rd/1/"); |
3363 | leency | 91 | Open_Dir(#path,ONLY_OPEN); |
3432 | leency | 92 | SetEventMask(0x27); |
3434 | leency | 93 | loop() switch(WaitEvent()) |
3363 | leency | 94 | { |
95 | case evMouse: |
||
3434 | leency | 96 | IF (del_active) break; |
3363 | leency | 97 | id=GetProcessSlot(Form.ID); |
3434 | leency | 98 | IF (id<>GetActiveProcess()) || (Form.status_window>2) break; |
99 | IF (rename_active) { edit_box_mouse stdcall(#edit2); break; } |
||
3363 | leency | 100 | |
101 | m.get(); |
||
102 | |||
3434 | leency | 103 | if (m.x > files.x) && (m.x < files.x + files.w) && (m.y > files.y) && (m.y < files.y+files.h) |
3363 | leency | 104 | { |
3434 | leency | 105 | if (m.lkm) can_select = 1; |
106 | if (m.pkm) |
||
107 | { |
||
108 | can_show = 1; |
||
109 | if (m.y - 57 / files.line_h != files.current) can_select = 1; |
||
110 | } |
||
111 | } |
||
112 | |||
113 | //select/open file { |
||
114 | if (!m.lkm) && (!m.pkm) && (can_select) |
||
115 | { |
||
116 | can_select = 0; |
||
117 | if (m.y<57) break; |
||
118 | id = m.y - 57 / files.line_h; |
||
119 | if (files.current!=id) FileList_ReDraw(id-files.current); |
||
120 | else Open(); |
||
121 | }; |
||
122 | // } select/open file |
||
123 | |||
124 | //file menu { |
||
125 | if (!m.pkm) && (!m.lkm) && (can_show) |
||
126 | { |
||
127 | can_show = 0; |
||
128 | if (m.y<57) break; |
||
3363 | leency | 129 | SwitchToAnotherThread(); |
130 | CreateThread(#FileMenu,#stak2); |
||
3434 | leency | 131 | break; |
132 | } |
||
133 | // } file menu |
||
3363 | leency | 134 | |
3434 | leency | 135 | |
136 | if (m.vert) |
||
137 | { |
||
138 | files.MouseScroll(m.vert); |
||
139 | List_ReDraw(); |
||
140 | break; |
||
141 | } |
||
142 | |||
3363 | leency | 143 | if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>40) && (m.y<57) |
144 | { |
||
145 | IF (m.lkm==1) DrawRectangle3D(onLeft(26,0),41,14,14,0xC7C7C7,0xFFFFFF); |
||
3434 | leency | 146 | WHILE (m.lkm==1) && (files.first>0) |
3363 | leency | 147 | { |
3434 | leency | 148 | pause(8); |
149 | files.first--; |
||
3363 | leency | 150 | List_ReDraw(); |
151 | m.get(); |
||
152 | } |
||
153 | DrawRectangle3D(onLeft(26,0),41,14,14,0xFFFFFF,0xC7C7C7); |
||
154 | } |
||
155 | |||
156 | if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>onTop(22,0)+1) && (m.y |
||
157 | { |
||
158 | IF (m.lkm==1) DrawRectangle3D(onLeft(26,0),onTop(21,0),14,14,0xC7C7C7,0xFFFFFF); |
||
3434 | leency | 159 | while (m.lkm==1) && (files.first |
3363 | leency | 160 | { |
3434 | leency | 161 | pause(8); |
162 | files.first++; |
||
3363 | leency | 163 | List_ReDraw(); |
164 | m.get(); |
||
165 | } |
||
166 | DrawRectangle3D(onLeft(26,0),onTop(21,0),14,14,0xFFFFFF,0xC7C7C7); |
||
167 | } |
||
168 | |||
3434 | leency | 169 | //Scrooll |
170 | if (!m.lkm) && (scroll_used) { scroll_used=NULL; Scroll(); } |
||
171 | if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>56) && (m.y |
||
3363 | leency | 172 | |
173 | if (scroll_used) |
||
174 | { |
||
3434 | leency | 175 | IF (scroll_size/2+57>m.y) || (m.y<0) || (m.y>4000) m.y=scroll_size/2+57; //anee eo?ni? iaa ieiii |
176 | id=files.first; |
||
3363 | leency | 177 | j= scroll_size/2; |
3434 | leency | 178 | files.first = m.y -j -57 * files.count; |
179 | files.first /= onTop(22,57); |
||
180 | IF (files.visible+files.first>files.count) files.first=files.count-files.visible; |
||
181 | IF (id<>files.first) List_ReDraw(); |
||
3363 | leency | 182 | } |
183 | break; |
||
184 | //Button pressed----------------------------------------------------------------------------- |
||
185 | case evButton: |
||
186 | id=GetButtonID(); |
||
3439 | leency | 187 | if (id==1) ExitProcess(); |
188 | if (rename_active) break; |
||
189 | if (del_active) |
||
3363 | leency | 190 | { |
191 | IF (id==301) || (id==302) Del_File(302-id); |
||
192 | break; |
||
193 | } |
||
3439 | leency | 194 | |
3363 | leency | 195 | switch(id) |
196 | { |
||
197 | case 21: //Back |
||
198 | GoBack(); |
||
199 | break; |
||
200 | case 22: //Forward |
||
201 | if (HistoryPath(GO_FORWARD)) |
||
202 | { |
||
3434 | leency | 203 | files.first=files.current=NULL; //aaa?o nienea |
3363 | leency | 204 | Open_Dir(#path,WITH_REDRAW); |
205 | } |
||
206 | break; |
||
207 | case 23: //up! |
||
208 | Dir_Up(); |
||
209 | break; |
||
210 | case 24: //cut |
||
211 | key=24; |
||
212 | case 25: //copy |
||
213 | goto CTRLC_MARK; |
||
214 | case 26: //paste |
||
215 | Paste(); |
||
216 | break; |
||
217 | case 31...33: //sort |
||
218 | IF(sort_num==1) DrawFilledBar(onLeft(192,168)/2+210,42,6,10); |
||
219 | IF(sort_num==2) DrawFilledBar(onLeft(115,0),42,6,10); |
||
220 | IF(sort_num==3) DrawFilledBar(onLeft(44,0),42,6,10); |
||
221 | sort_num=id-30; |
||
3434 | leency | 222 | Open_Dir(#path,WITH_REDRAW); |
3363 | leency | 223 | break; |
3434 | leency | 224 | case 50...60: //Actions |
225 | ActionsProcess(id-50); |
||
3363 | leency | 226 | break; |
227 | case 100...120: |
||
228 | DEVICE_MARK: |
||
3434 | leency | 229 | DrawRectangle3D(17,id-100*16+74,159,16, 0, 0); //auaaeaiea |
3363 | leency | 230 | strcpy(#path, #disk_list[id-100].Item); |
3434 | leency | 231 | files.first=files.current=0; |
3363 | leency | 232 | Open_Dir(#path,1); |
233 | pause(5); |
||
234 | DrawRectangle3D(17,id-100*16+74,159,16, 0xFFFFFF, 0xFFFFFF); |
||
235 | break; |
||
236 | case 130...160: |
||
237 | tmp_disk_del_param[1]=disk_list[id-130].Item[4]; |
||
238 | RunProgram("/sys/tmpdisk", #tmp_disk_del_param); |
||
239 | pause(10); |
||
3434 | leency | 240 | SystemDiscsGet(); |
3363 | leency | 241 | Open_Dir(#path,WITH_REDRAW); |
242 | DrawLeftPanel(); |
||
243 | break; |
||
244 | } |
||
245 | break; |
||
246 | //Key pressed----------------------------------------------------------------------------- |
||
247 | case evKey: |
||
248 | key = GetKey(); |
||
249 | if (Form.status_window>2) break; |
||
250 | IF (del_active) |
||
251 | { |
||
252 | IF (key==013) Del_File(true); |
||
253 | IF (key==027) Del_File(false); |
||
254 | break; |
||
255 | } |
||
256 | IF (edit2.flags<>64) && (key<>13) && (key<>27) |
||
257 | { |
||
258 | EAX=key<<8; |
||
259 | edit_box_key stdcall (#edit2); |
||
260 | break; |
||
261 | } |
||
262 | switch (key) |
||
263 | { |
||
264 | case 209...217: |
||
265 | id=key-110; |
||
266 | IF (id-100>=disc_num) break; |
||
267 | GOTO DEVICE_MARK; |
||
3434 | leency | 268 | case 008: |
3363 | leency | 269 | //GoBack(); |
270 | Dir_Up(); |
||
271 | break; |
||
3434 | leency | 272 | case 004: //Ctrl+D set as bg |
3363 | leency | 273 | strcpy(#temp, "\\S__"); |
274 | strcat(#temp, #file_path); |
||
275 | RunProgram("/sys/media/kiv", #temp); |
||
276 | break; |
||
3434 | leency | 277 | case 014: //Ctrl+N new window |
3363 | leency | 278 | IF (Form.left==98) MoveSize(Form.left-20,Form.top-20,OLD,OLD); |
279 | RunProgram("/sys/File Managers/Eolite", #path); |
||
280 | break; |
||
281 | case 024: //Ctrl+X |
||
282 | case 003: //Ctrl+C |
||
283 | CTRLC_MARK: |
||
3441 | leency | 284 | IF (itdir) break; |
3434 | leency | 285 | strcpy(#copy_file, #file_path); |
3363 | leency | 286 | IF (key==24) cut_active=1; ELSE cut_active=0; |
287 | break; |
||
288 | case 022: //Ctrl+V |
||
289 | Paste(); |
||
290 | break; |
||
291 | case 027: //Esc |
||
292 | IF (rename_active==1) ReName(false); |
||
293 | break; |
||
294 | case 013: //Enter |
||
295 | IF (rename_active==1) {ReName(true); break;} |
||
3434 | leency | 296 | Open(); |
3363 | leency | 297 | break; |
298 | case 178: //up |
||
299 | FileList_ReDraw(-1); |
||
300 | break; |
||
301 | case 177: //down |
||
302 | FileList_ReDraw(1); |
||
303 | break; |
||
304 | case 180: //home |
||
3434 | leency | 305 | files.first=0; |
306 | files.current=0; |
||
3363 | leency | 307 | List_ReDraw(); |
308 | break; |
||
309 | case 181: //end |
||
3434 | leency | 310 | files.first=files.count-files.visible; |
311 | files.current=files.visible-1; |
||
3363 | leency | 312 | List_ReDraw(); |
313 | break; |
||
314 | case 183: //Page Down |
||
3434 | leency | 315 | FileList_ReDraw(files.visible-1); |
3363 | leency | 316 | break; |
317 | case 184: //Page Up |
||
3434 | leency | 318 | FileList_ReDraw(-files.visible+1); |
3363 | leency | 319 | break; |
3434 | leency | 320 | case 182: //del |
321 | Del_Form(); |
||
3363 | leency | 322 | break; |
3434 | leency | 323 | case 050...059: //F1-F10 |
324 | ActionsProcess(key-49); |
||
3363 | leency | 325 | break; |
326 | default: |
||
3434 | leency | 327 | for (i=files.current+files.first+1; i |
3363 | leency | 328 | { |
329 | strcpy(#temp, file_mas[i]*304+buf+72); |
||
330 | IF (temp[0]==key) || (temp[0]==key-32) |
||
331 | { |
||
3434 | leency | 332 | FileList_ReDraw(i-files.current-files.first); |
3363 | leency | 333 | break; |
334 | } |
||
335 | } |
||
336 | } |
||
337 | break; |
||
338 | case evReDraw: |
||
3412 | leency | 339 | DefineAndDrawWindow(40,20,550,500,0x73,col_work,TITLE); |
3363 | leency | 340 | GetProcessInfo(#Form, SelfInfo); |
341 | if (Form.status_window>2) break; |
||
3434 | leency | 342 | files.SetSizes(192, 57, onLeft(192,27), onTop(57,6), disc_num*16+195,files.line_h); |
343 | if (Form.height < files.min_h) MoveSize(OLD,OLD,OLD,files.min_h); |
||
3363 | leency | 344 | if (Form.width<480) MoveSize(OLD,OLD,480,OLD); |
3439 | leency | 345 | GetProcessInfo(#Form, SelfInfo); //if win_size changed |
3363 | leency | 346 | draw_window(); |
347 | } |
||
348 | } |
||
349 | |||
350 | |||
351 | inline fastcall void draw_window() |
||
352 | { |
||
3434 | leency | 353 | //toolbar |
3363 | leency | 354 | PutPaletteImage(#toolbar,246,34,0,0,8,#toolbar_pal); |
355 | for (j=0; j<3; j++) DefineButton(toolbar_buttons_x[j]+2,5+2,31-5,29-5,21+j+BT_HIDE,col_work); |
||
356 | for (j=3; j<6; j++) DefineButton(toolbar_buttons_x[j],5,31,29,21+j+BT_HIDE,col_work); |
||
357 | DrawBar(246,0,onLeft(246,60),12, col_work); //фон над полосой адреса |
||
3434 | leency | 358 | DrawBar(246,29,onLeft(246,60),5,col_work); //фон под полосой адреса |
359 | DrawRectangle3D(246,12,onLeft(66,246),16,col_border,col_border); |
||
360 | DefineButton(onLeft(34,0),6,27,28,51+BT_HIDE+BT_NOFRAME,col_work); //about |
||
3363 | leency | 361 | PutPaletteImage(#goto_about,56,34,Form.width-65,0,8,#goto_about_pal); |
3434 | leency | 362 | //main rectangles |
363 | DrawRectangle3D(1,40,Form.cwidth-3,onTop(46,0),col_border,col_border); |
||
364 | DrawRectangle3D(0,39,Form.cwidth-1,onTop(44,0),col_palette[4],col_palette[4]); //bg |
||
3363 | leency | 365 | for (i=0; i<5; i++) DrawBar(0, 34+i, Form.cwidth, 1, col_palette[8-i]); |
366 | DrawLeftPanel(); |
||
3434 | leency | 367 | //ListBox |
368 | DrawFlatButton(files.x,40,onLeft(files.x,168),16,31,col_work,"File"); |
||
3363 | leency | 369 | DrawFlatButton(onLeft(168,0),40,73,16,32,col_work,"Type"); |
370 | DrawFlatButton(onLeft(95,0),40,68,16,33,col_work,"Size"); |
||
3434 | leency | 371 | DrawBar(onLeft(27,0),57,1,onTop(22,57),col_border); //line to the left from the scroll |
372 | DrawFlatButton(onLeft(27,0),40,16,16,0,col_work,"\x18"); |
||
373 | DrawFlatButton(onLeft(27,0),onTop(22,0),16,16,0,col_work,"\x19"); |
||
3363 | leency | 374 | Open_Dir(#path,ONLY_SHOW); |
375 | if (del_active) Del_Form(); |
||
3439 | leency | 376 | if (rename_active) ActionsProcess(2); |
3363 | leency | 377 | } |
378 | |||
379 | |||
380 | void KEdit() |
||
381 | { |
||
3434 | leency | 382 | if (Form.width<480) return; |
3363 | leency | 383 | PathShow.area_size_x = Form.cwidth-306; |
384 | DrawBar(PathShow.start_x-3, PathShow.start_y-4, PathShow.area_size_x+2, 15, 0xFFFfff); |
||
385 | PathShow_prepare stdcall(#PathShow); |
||
386 | PathShow_draw stdcall(#PathShow); |
||
387 | } |
||
388 | |||
389 | |||
3434 | leency | 390 | void FileList_ReDraw(int cur) |
3363 | leency | 391 | { |
3434 | leency | 392 | if (cur<=0) //up |
3363 | leency | 393 | { |
3434 | leency | 394 | IF (files.first==0) && (files.current<=0) return; |
395 | IF (-cur-1 |
||
3363 | leency | 396 | { |
3434 | leency | 397 | Line_ReDraw(0xFFFFFF, files.current); |
398 | files.current+=cur; |
||
399 | Line_ReDraw(col_selec, files.current); |
||
3363 | leency | 400 | return; |
401 | } |
||
402 | ELSE |
||
403 | { |
||
3434 | leency | 404 | IF (-cur |
405 | files.current=0; |
||
3363 | leency | 406 | List_ReDraw(); |
407 | return; |
||
408 | } |
||
409 | } |
||
3434 | leency | 410 | else //down |
3363 | leency | 411 | { |
3434 | leency | 412 | IF (files.first==files.count-files.visible) && (files.current==files.visible-1) return; |
413 | IF (files.visible-files.current>cur) |
||
3363 | leency | 414 | { |
3434 | leency | 415 | Line_ReDraw(0xFFFFFF, files.current); |
416 | files.current+=cur; |
||
417 | Line_ReDraw(col_selec, files.current); |
||
3363 | leency | 418 | return; |
419 | } |
||
420 | else |
||
421 | { |
||
3434 | leency | 422 | IF(files.first+files.current+cur>=files.count) |
3363 | leency | 423 | { |
3434 | leency | 424 | files.first=files.count-files.visible; |
425 | files.current=cur-files.first+files.current; |
||
3363 | leency | 426 | } |
427 | ELSE |
||
428 | { |
||
3434 | leency | 429 | files.first+=cur+files.current-files.visible+1; |
430 | files.current=files.visible-1; |
||
3363 | leency | 431 | } |
432 | |||
3434 | leency | 433 | IF (files.current<0) || (files.current>files.visible) |
3363 | leency | 434 | { |
3434 | leency | 435 | files.current=files.visible-1; |
3363 | leency | 436 | } |
437 | List_ReDraw(); |
||
438 | } |
||
439 | } |
||
440 | } |
||
441 | |||
442 | |||
443 | |||
444 | |||
445 | void List_ReDraw() |
||
446 | { |
||
3434 | leency | 447 | int paint_y; |
448 | //если мы в конце списка файлов развернём окно появяться пустяе белые кнопки |
||
449 | //это если выделение после схлопывания окна за кадром |
||
450 | if (files.count-files.first |
||
451 | { files.first=files.count-files.visible; files.current=files.visible-1; } |
||
3363 | leency | 452 | |
3434 | leency | 453 | for (j=0; j |
454 | //in the bottom |
||
455 | paint_y = j * files.line_h + files.y; |
||
456 | DrawBar(files.x,paint_y,files.w,onTop(paint_y,6),0xFFFFFF); |
||
457 | DrawBar(onLeft(168,0),paint_y,1,onTop(paint_y,6),col_work); |
||
458 | DrawBar(onLeft(95,0),paint_y,1,onTop(paint_y,6),col_work); |
||
459 | Scroll(); |
||
3363 | leency | 460 | } |
461 | |||
462 | void Line_ReDraw(dword color, filenum){ |
||
3434 | leency | 463 | dword text_col=0, name_len=0, y=filenum*files.line_h+57; |
464 | DrawBar(192,y,3,files.line_h,color); |
||
465 | DrawBar(192+19,y,onLeft(46,192),files.line_h,color); DrawBar(195,y+17,16,1,color); |
||
466 | if (files.line_h>18) DrawBar(195,y+18,16,files.line_h-18,color); |
||
467 | if (files.line_h>15) DrawBar(195,y,16,files.line_h-15,color); |
||
3363 | leency | 468 | |
3434 | leency | 469 | off=file_mas[filenum+files.first]*304 + buf+72; |
3363 | leency | 470 | |
3434 | leency | 471 | if (!TestBit(ESDWORD[off-40], 4)) //file or folder? |
3363 | leency | 472 | { |
473 | strcpy(#temp, off); |
||
3434 | leency | 474 | Put_icon(#temp+_strrchr(#temp,'.'), files.line_h/2-7+y, color); |
475 | WriteText(7-strlen(ConvertMemSize(ESDWORD[off-8]))*6+onLeft(75,0),files.line_h-6/2+y,0x80,0,ConvertMemSize(ESDWORD[off-8])); //size |
||
3363 | leency | 476 | } |
477 | else |
||
478 | if (!strcmp("..",off)) |
||
3434 | leency | 479 | Put_icon("..", files.line_h/2-7+y, color); |
3363 | leency | 480 | else |
3434 | leency | 481 | Put_icon(" |
482 | if (TestBit(ESDWORD[off-40],1)) || (TestBit(ESDWORD[off-40],2)) text_col=0xA6A6B7; //system or hiden? |
||
3363 | leency | 483 | if (color<>0xFFFfff) |
484 | { |
||
3441 | leency | 485 | itdir=TestBit(ESDWORD[off-40], 4); |
3363 | leency | 486 | strcpy(#file_name, off); |
487 | strcpy(#file_path, #path); |
||
3434 | leency | 488 | strcat(#file_path, #file_name); |
3363 | leency | 489 | if (text_col==0xA6A6B7) text_col=0xFFFFFF; |
490 | } |
||
3434 | leency | 491 | if (Form.width>=480) |
492 | { |
||
493 | FileShow.font_color = text_col; |
||
494 | FileShow.area_size_x = Form.width - 380; |
||
495 | FileShow.text_pointer = off; |
||
496 | FileShow.start_y = files.line_h/2-3+y; |
||
497 | PathShow_prepare stdcall(#FileShow); |
||
498 | PathShow_draw stdcall(#FileShow); |
||
499 | } |
||
500 | DrawBar(onLeft(168,0),y,1,files.line_h,col_work); //gray line 1 |
||
501 | DrawBar(onLeft(95,0),y,1,files.line_h,col_work); //gray line 2 |
||
3363 | leency | 502 | } |
503 | |||
504 | |||
505 | void Open_Dir(dword temp_, redraw){ |
||
3434 | leency | 506 | int errornum, count; |
3363 | leency | 507 | char path_[4096], |
508 | somelen=strlen(temp_)-1; |
||
3434 | leency | 509 | |
3363 | leency | 510 | if (redraw<>ONLY_SHOW) |
511 | { |
||
512 | strcpy(#path_, temp_); |
||
513 | if (somelen) path_[somelen]=NULL; |
||
514 | |||
515 | if (buf) free(buf); |
||
516 | buf = malloc(32); |
||
517 | errornum=ReadDir(0, buf, #path_); |
||
3434 | leency | 518 | if (errornum<>0) |
3363 | leency | 519 | { |
520 | HistoryPath(ADD_NEW_PATH); |
||
521 | GoBack(); |
||
522 | Write_Error(errornum); |
||
523 | return; |
||
524 | } |
||
3434 | leency | 525 | files.count = ESDWORD[buf+8]; |
526 | buf = realloc(buf, files.count * 304 + 32); |
||
527 | ReadDir(files.count, buf, #path_); |
||
528 | files.count=EBX; |
||
529 | count = sizeof(file_mas)/sizeof(dword)-1; |
||
530 | if (files.count>count) files.count=count; |
||
3363 | leency | 531 | |
532 | } |
||
3434 | leency | 533 | if (files.count<>-1) |
3363 | leency | 534 | { |
535 | KEdit(); |
||
536 | HistoryPath(ADD_NEW_PATH); |
||
3434 | leency | 537 | IF (!strcmp(".",buf+72)) {files.count--; memmov(buf,buf+304,files.count*304);} //oeeuo?oai yeaiaio "." |
538 | files.visible=onTop(6,57)/files.line_h; |
||
539 | IF (files.count |
||
3363 | leency | 540 | IF (sort_num==1) WriteText(Form.width+60/2,45,0x80,0x4E78AC,"\x19"); |
541 | IF (sort_num==2) WriteText(Form.width-115,45,0x80,0x4E78AC,"\x19"); |
||
542 | IF (sort_num==3) WriteText(Form.width-44,45,0x80,0x4E78AC,"\x19"); |
||
3434 | leency | 543 | IF (redraw<>ONLY_SHOW) Sorting(); |
3363 | leency | 544 | IF (redraw<>ONLY_OPEN) List_ReDraw(); |
545 | } |
||
3434 | leency | 546 | IF (files.count==-1) && (redraw<>ONLY_OPEN) {files.visible=files.count=0; List_ReDraw();} |
3363 | leency | 547 | } |
548 | |||
549 | |||
550 | |||
551 | inline Sorting() |
||
552 | { |
||
553 | dword k=0, l=1; |
||
554 | int i; |
||
3434 | leency | 555 | if (!strcmp(#path,"/")) //do not sort |
3363 | leency | 556 | { |
3434 | leency | 557 | FOR(k=1;k |
3363 | leency | 558 | return; |
559 | } |
||
3434 | leency | 560 | FOR (j=files.count-1, off=files.count-1*304+buf+32; j>=0; j--, off-=304;) //files | folders |
3363 | leency | 561 | { |
562 | strttl(off+40); |
||
3441 | leency | 563 | if (TestBit(ESDWORD[off],4)) //directory? |
3363 | leency | 564 | { |
565 | file_mas[k]=j; |
||
566 | k++; |
||
567 | } |
||
568 | else |
||
569 | { |
||
3434 | leency | 570 | file_mas[files.count-l]=j; |
3363 | leency | 571 | l++; |
572 | } |
||
573 | } |
||
3434 | leency | 574 | //sorting: files first, then folders |
3363 | leency | 575 | Sort_by_Name(0,k-1); |
3434 | leency | 576 | IF (sort_num==1) Sort_by_Name(k,files.count-1); |
577 | IF (sort_num==2) Sort_by_Type(k,files.count-1); |
||
578 | IF (sort_num==3) Sort_by_Size(k,files.count-1); |
||
579 | //".." should be first |
||
3363 | leency | 580 | IF (k>0) && (strcmp(file_mas[0]*304+buf+72,"..")<>0) FOR(k--; k>0; k--;) IF (!strcmp(file_mas[k]*304+buf+72,"..")) file_mas[k]> |
581 | } |
||
582 | |||
583 | |||
584 | void Del_Form() |
||
585 | { |
||
586 | int dform_x=Form.width/2-13; |
||
3434 | leency | 587 | //oeia ieii |
588 | if (!files.count) return; |
||
589 | DrawFlatButton(dform_x,160,200,80,0,col_work, ""); //oi?ia |
||
3363 | leency | 590 | WriteText(dform_x+19,175,0x80,0,"Do you really want to delete"); |
591 | IF (strlen(#file_name)<28) |
||
592 | { |
||
593 | WriteText(strlen(#file_name)*6+dform_x+20,190,0x80,0,"?"); |
||
3434 | leency | 594 | WriteText(dform_x+20,190,0x80,0,#file_name); //ieoai eiy |
3363 | leency | 595 | } |
596 | ELSE |
||
597 | { |
||
598 | WriteText(164+dform_x,190,0x80,0,"...?"); |
||
599 | ESI = 24; |
||
3434 | leency | 600 | WriteText(dform_x+20,190,0,0,#file_name); //ieoai eiy |
3363 | leency | 601 | } |
3434 | leency | 602 | //eiiii?ee |
3363 | leency | 603 | DrawFlatButton(dform_x+20,208,70,20,301,0xFFB6B5,"Yes"); |
604 | DrawFlatButton(dform_x+111,208,70,20,302,0xC6DFC6,"No"); |
||
605 | del_active=1; |
||
606 | } |
||
607 | |||
608 | |||
609 | void Del_File(byte dodel) |
||
610 | { |
||
3404 | leency | 611 | int del_rezult; |
3363 | leency | 612 | IF (dodel==true) |
613 | { |
||
3404 | leency | 614 | del_rezult = DeleteFile(#file_path); |
615 | IF (del_rezult<>0) |
||
3363 | leency | 616 | { |
3404 | leency | 617 | Write_Error(del_rezult); |
3441 | leency | 618 | IF ( itdir) ShowMessage("Error. Folder isn't empty."); |
619 | IF (!itdir) ShowMessage("Error. Filesystem read-only."); |
||
3363 | leency | 620 | } |
621 | } |
||
622 | del_active=0; |
||
3434 | leency | 623 | DeleteButton(301); DeleteButton(302); |
3363 | leency | 624 | Open_Dir(#path,1); |
625 | } |
||
626 | |||
627 | void Paste() |
||
628 | { |
||
629 | char new_copy_path[4096]; |
||
630 | int copy_rezult; |
||
631 | |||
3434 | leency | 632 | IF (!copy_file) return; |
3363 | leency | 633 | strcpy(#new_copy_path, #path); |
634 | strcat(#new_copy_path, #copy_file+strrchr(#copy_file,'/')); |
||
3434 | leency | 635 | if (!strcmp(#copy_file,#new_copy_path)) |
3363 | leency | 636 | { |
637 | strcpy(#new_copy_path, #path); |
||
638 | strcat(#new_copy_path, "new_"); |
||
639 | strcat(#new_copy_path, #copy_file+strrchr(#copy_file,'/')); |
||
640 | } |
||
3404 | leency | 641 | copy_rezult = CopyFile(#copy_file,#new_copy_path); |
3434 | leency | 642 | IF (copy_rezult!=0) |
3363 | leency | 643 | { |
644 | Write_Error(copy_rezult); |
||
3404 | leency | 645 | return; |
3363 | leency | 646 | } |
3434 | leency | 647 | IF (cut_active) |
3404 | leency | 648 | { |
649 | strcpy(#file_path, #copy_file); |
||
650 | Del_File(true); |
||
651 | copy_file=NULL; |
||
652 | cut_active=false; |
||
653 | } |
||
3363 | leency | 654 | SelectFile(#new_copy_path+strrchr(#new_copy_path,'/')); |
655 | } |
||
656 | |||
657 | |||
658 | void ReName(byte rename) |
||
659 | { |
||
3404 | leency | 660 | int del_rezult, copy_rezult; |
3363 | leency | 661 | char edit_name[256]; |
662 | rename_active=0; |
||
663 | edit2.flags=64; |
||
664 | if (rename==true) |
||
665 | { |
||
666 | strcpy(#temp, #path); |
||
3434 | leency | 667 | strcpy(#edit_name, #file_name); //save edit name to select it later |
3363 | leency | 668 | strcat(#temp, #file_name); |
669 | if (strcmp(#file_path,#temp)<>0) && (file_name) |
||
3441 | leency | 670 | IF (itdir) |
3363 | leency | 671 | { |
3404 | leency | 672 | del_rezult = DeleteFile(#file_path); |
673 | IF (del_rezult!=0) |
||
3363 | leency | 674 | { |
3404 | leency | 675 | Write_Error(del_rezult); |
3363 | leency | 676 | ShowMessage("Error. Folder isn't empty."); |
677 | return; |
||
678 | } |
||
679 | ELSE CreateDir(#temp); |
||
680 | Open_Dir(#path,1); |
||
681 | } |
||
682 | ELSE |
||
683 | { |
||
3404 | leency | 684 | copy_rezult = CopyFile(#file_path,#temp); |
685 | if (copy_rezult!=0) Write_Error(copy_rezult); else Del_File(true); |
||
3363 | leency | 686 | } |
687 | SelectFile(#edit_name); |
||
688 | } |
||
3434 | leency | 689 | Line_ReDraw(col_selec,files.current); |
3363 | leency | 690 | } |
691 | |||
692 | |||
693 | void SelectFile(dword that_file) |
||
694 | { |
||
3434 | leency | 695 | files.first=files.current=0; |
3363 | leency | 696 | Open_Dir(#path,ONLY_OPEN); |
697 | strttl(that_file); |
||
3434 | leency | 698 | for (i=files.count-1; i>=0; i--;) |
3363 | leency | 699 | if (!strcmp(file_mas[i]*304+buf+72,that_file)) break; |
700 | FileList_ReDraw(i); |
||
701 | List_ReDraw(); |
||
702 | } |
||
703 | |||
704 | |||
705 | void Dir_Up() |
||
706 | { |
||
707 | char cur_folder[4096]; |
||
708 | i=strlen(#path)-1; |
||
709 | if (i==0) return; |
||
710 | path[i]=0x00; |
||
711 | i = strrchr(#path, '/'); |
||
712 | strcpy(#cur_folder, #path+i); |
||
713 | path[i]=0x00; |
||
714 | SelectFile(#cur_folder); |
||
715 | } |
||
716 | |||
3434 | leency | 717 | void Open() |
718 | { |
||
3441 | leency | 719 | if (!itdir) |
3434 | leency | 720 | { |
721 | GetIni(0); |
||
722 | } |
||
723 | else |
||
724 | { |
||
725 | if (!strcmp(#file_name,"..")) { Dir_Up(); return; } |
||
726 | strcpy(#path, #file_path); |
||
727 | if (path[strlen(#path)-1]!='/') chrcat(#path, '/'); //need "/" in the end |
||
728 | files.first=files.current=0; |
||
729 | Open_Dir(#path,1); |
||
730 | } |
||
731 | } |
||
3363 | leency | 732 | |
3434 | leency | 733 | |
734 | inline fastcall void GoBack() |
||
3363 | leency | 735 | { |
736 | char cur_folder[4096]; |
||
737 | strcpy(#cur_folder, GetCurrentFolder()); |
||
738 | if (HistoryPath(GO_BACK)) SelectFile(#cur_folder); |
||
739 | } |
||
740 | |||
3434 | leency | 741 | void ActionsProcess(char N) |
742 | { |
||
743 | switch(N) |
||
744 | { |
||
745 | case 1: |
||
746 | SwitchToAnotherThread(); |
||
747 | CreateThread(#about_dialog,#stak1); |
||
748 | break; |
||
749 | case 2: |
||
750 | if (!files.count) break; |
||
751 | edit2.flags=100000000000010b; //set active |
||
752 | edit2.width=onLeft(24,217); |
||
753 | edit2.top=files.current*files.line_h+59; |
||
754 | edit2.size=edit2.pos=strlen(#file_name); |
||
755 | edit_box_draw stdcall (#edit2); |
||
756 | DrawBar(213,files.current*files.line_h+58,edit2.width+1,1,0xFFFFCC); //bg |
||
757 | rename_active=1; |
||
758 | break; |
||
759 | case 3: |
||
3441 | leency | 760 | IF (!itdir) RunProgram("/sys/tinypad", #file_path); |
3434 | leency | 761 | break; |
762 | case 4: |
||
3441 | leency | 763 | IF (!itdir) RunProgram("/sys/develop/heed", #file_path); |
3434 | leency | 764 | break; |
3440 | leency | 765 | case 5: //refresh cur dir & devs |
766 | Tip(56, "Devices", 55, "-"); |
||
767 | Open_Dir(#path,WITH_REDRAW); |
||
768 | pause(10); |
||
769 | GetIni(1); |
||
770 | SystemDiscsGet(); |
||
3434 | leency | 771 | Open_Dir(#path,1); |
3440 | leency | 772 | DrawLeftPanel(); |
3434 | leency | 773 | break; |
774 | case 6: |
||
775 | strcpy(#temp, #path); |
||
776 | strcat(#temp, "New folder"); |
||
777 | CreateDir(#temp); |
||
778 | if (!EAX){ |
||
779 | SelectFile("New folder"); |
||
780 | ActionsProcess(2); |
||
781 | } |
||
782 | else |
||
783 | { |
||
784 | Write_Error(EAX); |
||
785 | ShowMessage("Folder can not be created."); |
||
786 | } |
||
787 | break; |
||
788 | case 7: |
||
789 | strcpy(#temp, #path); |
||
790 | strcat(#temp, "New file"); |
||
791 | WriteFile(0, 0, #temp); |
||
792 | if (!EAX){ |
||
793 | SelectFile("New file"); |
||
794 | ActionsProcess(2); |
||
795 | } |
||
796 | else |
||
797 | { |
||
798 | Write_Error(EAX); |
||
799 | ShowMessage("File can not be created."); |
||
800 | } |
||
801 | break; |
||
802 | case 10: //F10 |
||
803 | RunProgram(EDITOR_PATH, abspath("Eolite.ini")); |
||
804 | break; |
||
805 | } |
||
806 | } |
||
807 | |||
808 | void copyf_Action() { |
||
809 | return; |
||
810 | } |
||
811 | |||
3363 | leency | 812 | stop: |
813 | |||
3434 | leency | 814 | char stak1[512]; |
815 | char stak2[512];>>28)> |