Subversion Repositories Kolibri OS

Rev

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