Subversion Repositories Kolibri OS

Rev

Rev 3434 | Rev 3440 | 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
 
3439 leency 27
#define TITLE "Eolite File Manager v1.8"
28
#define ABOUT_TITLE "Eolite v1.80"
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,
53
	isdir;
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;
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);
3439 leency 353
			GetProcessInfo(#Form, SelfInfo); //if win_size changed
3363 leency 354
			draw_window();
355
	}
356
}
357
 
358
 
359
inline fastcall void draw_window()
360
{
3434 leency 361
	//toolbar
3363 leency 362
	PutPaletteImage(#toolbar,246,34,0,0,8,#toolbar_pal);
363
	for (j=0; j<3; j++) DefineButton(toolbar_buttons_x[j]+2,5+2,31-5,29-5,21+j+BT_HIDE,col_work);
364
	for (j=3; j<6; j++) DefineButton(toolbar_buttons_x[j],5,31,29,21+j+BT_HIDE,col_work);
365
	DrawBar(246,0,onLeft(246,60),12, col_work); //фон над полосой адреса
3434 leency 366
	DrawBar(246,29,onLeft(246,60),5,col_work);  //фон под полосой адреса
367
	DrawRectangle3D(246,12,onLeft(66,246),16,col_border,col_border);
368
	DefineButton(onLeft(34,0),6,27,28,51+BT_HIDE+BT_NOFRAME,col_work); //about
3363 leency 369
	PutPaletteImage(#goto_about,56,34,Form.width-65,0,8,#goto_about_pal);
3434 leency 370
	//main rectangles
371
	DrawRectangle3D(1,40,Form.cwidth-3,onTop(46,0),col_border,col_border);
372
	DrawRectangle3D(0,39,Form.cwidth-1,onTop(44,0),col_palette[4],col_palette[4]); //bg
3363 leency 373
	for (i=0; i<5; i++) DrawBar(0, 34+i, Form.cwidth, 1, col_palette[8-i]);
374
	DrawLeftPanel();
3434 leency 375
	//ListBox
376
	DrawFlatButton(files.x,40,onLeft(files.x,168),16,31,col_work,"File");
3363 leency 377
	DrawFlatButton(onLeft(168,0),40,73,16,32,col_work,"Type");
378
	DrawFlatButton(onLeft(95,0),40,68,16,33,col_work,"Size");
3434 leency 379
	DrawBar(onLeft(27,0),57,1,onTop(22,57),col_border); //line to the left from the scroll
380
	DrawFlatButton(onLeft(27,0),40,16,16,0,col_work,"\x18");
381
	DrawFlatButton(onLeft(27,0),onTop(22,0),16,16,0,col_work,"\x19");
3363 leency 382
	Open_Dir(#path,ONLY_SHOW);
383
	if (del_active) Del_Form();
3439 leency 384
	if (rename_active) ActionsProcess(2);
3363 leency 385
}
386
 
387
 
388
void KEdit()
389
{
3434 leency 390
	if (Form.width<480) return;
3363 leency 391
	PathShow.area_size_x = Form.cwidth-306;
392
	DrawBar(PathShow.start_x-3, PathShow.start_y-4, PathShow.area_size_x+2, 15, 0xFFFfff);
393
	PathShow_prepare stdcall(#PathShow);
394
	PathShow_draw stdcall(#PathShow);
395
}
396
 
397
 
3434 leency 398
void FileList_ReDraw(int cur)
3363 leency 399
{
3434 leency 400
	if (cur<=0) //up
3363 leency 401
	{
3434 leency 402
		IF (files.first==0) && (files.current<=0) return;
403
		IF (-cur-1
3363 leency 404
		{
3434 leency 405
			Line_ReDraw(0xFFFFFF, files.current);
406
			files.current+=cur;
407
			Line_ReDraw(col_selec, files.current);
3363 leency 408
			return;
409
		}
410
		ELSE
411
		{
3434 leency 412
			IF (-cur
413
			files.current=0;
3363 leency 414
			List_ReDraw();
415
			return;
416
		}
417
	}
3434 leency 418
	else  //down
3363 leency 419
	{
3434 leency 420
		IF (files.first==files.count-files.visible) && (files.current==files.visible-1) return;
421
		IF (files.visible-files.current>cur)
3363 leency 422
		{
3434 leency 423
			Line_ReDraw(0xFFFFFF, files.current);
424
			files.current+=cur;
425
			Line_ReDraw(col_selec, files.current);
3363 leency 426
			return;
427
		}
428
		else
429
		{
3434 leency 430
			IF(files.first+files.current+cur>=files.count)
3363 leency 431
			{
3434 leency 432
				files.first=files.count-files.visible;
433
				files.current=cur-files.first+files.current;
3363 leency 434
				}
435
			ELSE
436
			{
3434 leency 437
				files.first+=cur+files.current-files.visible+1;
438
				files.current=files.visible-1;
3363 leency 439
			}
440
 
3434 leency 441
			IF (files.current<0) || (files.current>files.visible)
3363 leency 442
			{
3434 leency 443
				files.current=files.visible-1;
3363 leency 444
			}
445
			List_ReDraw();
446
		}
447
	}
448
}
449
 
450
 
451
 
452
 
453
void List_ReDraw()
454
{
3434 leency 455
	int paint_y;
456
	//если мы в конце списка файлов развернём окно появяться пустяе белые кнопки
457
	//это если выделение после схлопывания окна за кадром
458
	if (files.count-files.firstfiles.visible-1)
459
	{ files.first=files.count-files.visible; files.current=files.visible-1; }
3363 leency 460
 
3434 leency 461
	for (j=0; jj) Line_ReDraw(0xFFFFFF, j); else Line_ReDraw(col_selec, files.current);
462
	//in the bottom
463
	paint_y = j * files.line_h + files.y;
464
	DrawBar(files.x,paint_y,files.w,onTop(paint_y,6),0xFFFFFF);
465
	DrawBar(onLeft(168,0),paint_y,1,onTop(paint_y,6),col_work);
466
	DrawBar(onLeft(95,0),paint_y,1,onTop(paint_y,6),col_work);
467
	Scroll();
3363 leency 468
}
469
 
470
void Line_ReDraw(dword color, filenum){
3434 leency 471
	dword text_col=0, name_len=0, y=filenum*files.line_h+57;
472
	DrawBar(192,y,3,files.line_h,color);
473
	DrawBar(192+19,y,onLeft(46,192),files.line_h,color); DrawBar(195,y+17,16,1,color);
474
	if (files.line_h>18) DrawBar(195,y+18,16,files.line_h-18,color);
475
	if (files.line_h>15) DrawBar(195,y,16,files.line_h-15,color);
3363 leency 476
 
3434 leency 477
	off=file_mas[filenum+files.first]*304 + buf+72;
3363 leency 478
 
3434 leency 479
	if (!TestBit(ESDWORD[off-40], 4)) //file or folder?
3363 leency 480
	{
481
		strcpy(#temp, off);
3434 leency 482
		Put_icon(#temp+_strrchr(#temp,'.'), files.line_h/2-7+y, color);
483
		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 484
	}
485
	else
486
		if (!strcmp("..",off))
3434 leency 487
			Put_icon("..", files.line_h/2-7+y, color);
3363 leency 488
		else
3434 leency 489
			Put_icon("", files.line_h/2-7+y, color);
490
	if (TestBit(ESDWORD[off-40],1)) || (TestBit(ESDWORD[off-40],2)) text_col=0xA6A6B7; //system or hiden?
3363 leency 491
	if (color<>0xFFFfff)
492
	{
493
		isdir=TestBit(ESDWORD[off-40], 4);
494
		strcpy(#file_name, off);
495
		strcpy(#file_path, #path);
3434 leency 496
		strcat(#file_path, #file_name);
3363 leency 497
		if (text_col==0xA6A6B7) text_col=0xFFFFFF;
498
	}
3434 leency 499
	if (Form.width>=480)
500
	{
501
		FileShow.font_color = text_col;
502
		FileShow.area_size_x = Form.width - 380;
503
		FileShow.text_pointer = off;
504
		FileShow.start_y = files.line_h/2-3+y;
505
		PathShow_prepare stdcall(#FileShow);
506
		PathShow_draw stdcall(#FileShow);
507
	}
508
	DrawBar(onLeft(168,0),y,1,files.line_h,col_work); //gray line 1
509
	DrawBar(onLeft(95,0),y,1,files.line_h,col_work); //gray line 2
3363 leency 510
}
511
 
512
 
513
void Open_Dir(dword temp_, redraw){
3434 leency 514
	int errornum, count;
3363 leency 515
	char path_[4096],
516
	somelen=strlen(temp_)-1;
3434 leency 517
 
3363 leency 518
	if (redraw<>ONLY_SHOW)
519
	{
520
		strcpy(#path_, temp_);
521
		if (somelen) path_[somelen]=NULL;
522
 
523
		if (buf) free(buf);
524
    	buf = malloc(32);
525
		errornum=ReadDir(0, buf, #path_);
3434 leency 526
		if (errornum<>0)
3363 leency 527
		{
528
			HistoryPath(ADD_NEW_PATH);
529
			GoBack();
530
			Write_Error(errornum);
531
			return;
532
		}
3434 leency 533
    	files.count = ESDWORD[buf+8];
534
    	buf = realloc(buf, files.count * 304 + 32);
535
		ReadDir(files.count, buf, #path_);
536
		files.count=EBX;
537
		count = sizeof(file_mas)/sizeof(dword)-1;
538
		if (files.count>count) files.count=count;
3363 leency 539
 
540
	}
3434 leency 541
	if (files.count<>-1)
3363 leency 542
	{
543
		KEdit();
544
		HistoryPath(ADD_NEW_PATH);
3434 leency 545
		IF (!strcmp(".",buf+72)) {files.count--; memmov(buf,buf+304,files.count*304);} //oeeuo?oai yeaiaio "."
546
		files.visible=onTop(6,57)/files.line_h;
547
		IF (files.count
3363 leency 548
		IF (sort_num==1) WriteText(Form.width+60/2,45,0x80,0x4E78AC,"\x19");
549
		IF (sort_num==2) WriteText(Form.width-115,45,0x80,0x4E78AC,"\x19");
550
		IF (sort_num==3) WriteText(Form.width-44,45,0x80,0x4E78AC,"\x19");
3434 leency 551
		IF (redraw<>ONLY_SHOW) Sorting();
3363 leency 552
		IF (redraw<>ONLY_OPEN) List_ReDraw();
553
	}
3434 leency 554
	IF (files.count==-1) && (redraw<>ONLY_OPEN) {files.visible=files.count=0; List_ReDraw();}
3363 leency 555
}
556
 
557
 
558
 
559
inline Sorting()
560
{
561
	dword k=0, l=1;
562
	int i;
3434 leency 563
	if (!strcmp(#path,"/")) //do not sort
3363 leency 564
	{
3434 leency 565
		FOR(k=1;k
3363 leency 566
		return;
567
	}
3434 leency 568
	FOR (j=files.count-1, off=files.count-1*304+buf+32; j>=0; j--, off-=304;)  //files | folders
3363 leency 569
	{
570
		strttl(off+40);
3434 leency 571
		if (TestBit(ESDWORD[off],4)) //isdir?
3363 leency 572
		{
573
			file_mas[k]=j;
574
			k++;
575
		}
576
		else
577
		{
3434 leency 578
			file_mas[files.count-l]=j;
3363 leency 579
			l++;
580
		}
581
	}
3434 leency 582
	//sorting: files first, then folders
3363 leency 583
	Sort_by_Name(0,k-1);
3434 leency 584
	IF (sort_num==1) Sort_by_Name(k,files.count-1);
585
	IF (sort_num==2) Sort_by_Type(k,files.count-1);
586
	IF (sort_num==3) Sort_by_Size(k,files.count-1);
587
	//".." should be first
3363 leency 588
	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]>
589
}
590
 
591
 
592
void Del_Form()
593
{
594
	int dform_x=Form.width/2-13;
3434 leency 595
	//oeia ieii
596
	if (!files.count) return;
597
	DrawFlatButton(dform_x,160,200,80,0,col_work, ""); //oi?ia
3363 leency 598
	WriteText(dform_x+19,175,0x80,0,"Do you really want to delete");
599
	IF (strlen(#file_name)<28)
600
		{
601
			WriteText(strlen(#file_name)*6+dform_x+20,190,0x80,0,"?");
3434 leency 602
			WriteText(dform_x+20,190,0x80,0,#file_name); //ieoai eiy
3363 leency 603
		}
604
	ELSE
605
		{
606
			WriteText(164+dform_x,190,0x80,0,"...?");
607
			ESI = 24;
3434 leency 608
			WriteText(dform_x+20,190,0,0,#file_name); //ieoai eiy
3363 leency 609
		}
3434 leency 610
	//eiiii?ee
3363 leency 611
	DrawFlatButton(dform_x+20,208,70,20,301,0xFFB6B5,"Yes");
612
	DrawFlatButton(dform_x+111,208,70,20,302,0xC6DFC6,"No");
613
	del_active=1;
614
}
615
 
616
 
617
void Del_File(byte dodel)
618
{
3404 leency 619
	int del_rezult;
3363 leency 620
	IF (dodel==true)
621
	{
3404 leency 622
		del_rezult = DeleteFile(#file_path);
623
		IF (del_rezult<>0)
3363 leency 624
		{
3404 leency 625
			Write_Error(del_rezult);
3363 leency 626
			IF ( isdir) ShowMessage("Error. Folder isn't empty.");
627
			IF (!isdir) ShowMessage("Error. Filesystem read-only.");
628
		}
629
 	}
630
	del_active=0;
3434 leency 631
	DeleteButton(301); DeleteButton(302);
3363 leency 632
	Open_Dir(#path,1);
633
}
634
 
635
void Paste()
636
{
637
	char new_copy_path[4096];
638
	int copy_rezult;
639
 
3434 leency 640
	IF (!copy_file) return;
3363 leency 641
	strcpy(#new_copy_path, #path);
642
	strcat(#new_copy_path, #copy_file+strrchr(#copy_file,'/'));
3434 leency 643
	if (!strcmp(#copy_file,#new_copy_path))
3363 leency 644
	{
645
		strcpy(#new_copy_path, #path);
646
		strcat(#new_copy_path, "new_");
647
		strcat(#new_copy_path, #copy_file+strrchr(#copy_file,'/'));
648
	}
3404 leency 649
	copy_rezult = CopyFile(#copy_file,#new_copy_path);
3434 leency 650
	IF (copy_rezult!=0)
3363 leency 651
	{
652
		Write_Error(copy_rezult);
3404 leency 653
		return;
3363 leency 654
	}
3434 leency 655
	IF (cut_active)
3404 leency 656
	{
657
		strcpy(#file_path, #copy_file);
658
		Del_File(true);
659
		copy_file=NULL;
660
		cut_active=false;
661
	}
3363 leency 662
	SelectFile(#new_copy_path+strrchr(#new_copy_path,'/'));
663
}
664
 
665
 
666
void ReName(byte rename)
667
{
3404 leency 668
	int del_rezult, copy_rezult;
3363 leency 669
	char edit_name[256];
670
	rename_active=0;
671
	edit2.flags=64;
672
	if (rename==true)
673
	{
674
		strcpy(#temp, #path);
3434 leency 675
		strcpy(#edit_name, #file_name); //save edit name to select it later
3363 leency 676
		strcat(#temp, #file_name);
677
		if (strcmp(#file_path,#temp)<>0) && (file_name)
678
		IF (isdir)
679
		{
3404 leency 680
			del_rezult = DeleteFile(#file_path);
681
			IF (del_rezult!=0)
3363 leency 682
			{
3404 leency 683
				Write_Error(del_rezult);
3363 leency 684
				ShowMessage("Error. Folder isn't empty.");
685
				return;
686
			}
687
			ELSE CreateDir(#temp);
688
			Open_Dir(#path,1);
689
		}
690
		ELSE
691
		{
3404 leency 692
			copy_rezult = CopyFile(#file_path,#temp);
693
			if (copy_rezult!=0) Write_Error(copy_rezult); else Del_File(true);
3363 leency 694
		}
695
		SelectFile(#edit_name);
696
	}
3434 leency 697
	Line_ReDraw(col_selec,files.current);
3363 leency 698
}
699
 
700
 
701
void SelectFile(dword that_file)
702
{
3434 leency 703
	files.first=files.current=0;
3363 leency 704
   	Open_Dir(#path,ONLY_OPEN);
705
	strttl(that_file);
3434 leency 706
	for (i=files.count-1; i>=0; i--;)
3363 leency 707
		if (!strcmp(file_mas[i]*304+buf+72,that_file)) break;
708
	FileList_ReDraw(i);
709
	List_ReDraw();
710
}
711
 
712
 
713
void Dir_Up()
714
{
715
	char cur_folder[4096];
716
	i=strlen(#path)-1;
717
	if (i==0) return;
718
	path[i]=0x00;
719
	i = strrchr(#path, '/');
720
	strcpy(#cur_folder, #path+i);
721
	path[i]=0x00;
722
	SelectFile(#cur_folder);
723
}
724
 
3434 leency 725
void Open()
726
{
727
	if (!isdir)
728
	{
729
		GetIni(0);
730
	}
731
	else
732
	{
733
		if (!strcmp(#file_name,"..")) { Dir_Up(); return; }
734
		strcpy(#path, #file_path);
735
		if (path[strlen(#path)-1]!='/') chrcat(#path, '/'); //need "/" in the end
736
		files.first=files.current=0;
737
		Open_Dir(#path,1);
738
	}
739
}
3363 leency 740
 
3434 leency 741
 
742
inline fastcall void GoBack()
3363 leency 743
{
744
	char cur_folder[4096];
745
	strcpy(#cur_folder, GetCurrentFolder());
746
	if (HistoryPath(GO_BACK)) SelectFile(#cur_folder);
747
}
748
 
3434 leency 749
void ActionsProcess(char N)
750
{
751
	switch(N)
752
	{
753
		case 1:
754
			SwitchToAnotherThread();
755
			CreateThread(#about_dialog,#stak1);
756
			break;
757
		case 2:
758
			if (!files.count) break;
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];