Subversion Repositories Kolibri OS

Rev

Rev 5571 | Rev 5576 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
5481 leency 1
//Leency, Veliant, Punk_Joker & KolibriOS Team 2008-2015
3363 leency 2
//GNU GPL licence.
3
 
4022 leency 4
#ifndef AUTOBUILD
5
#include "lang.h--"
6
#endif
7
 
3363 leency 8
//libraries
4049 leency 9
#define MEMSIZE 0xD0000
3363 leency 10
#include "..\lib\kolibri.h"
4427 punk_joker 11
#include "..\lib\clipboard.h"
3363 leency 12
#include "..\lib\strings.h"
13
#include "..\lib\mem.h"
14
#include "..\lib\dll.h"
15
#include "..\lib\file_system.h"
5499 leency 16
#include "..\lib\gui.h"
3434 leency 17
#include "..\lib\list_box.h"
18
#include "..\lib\copyf.h"
4863 leency 19
#include "..\lib\random.h"
5487 leency 20
//obj
5499 leency 21
#include "..\lib\obj\libini.h"
22
#include "..\lib\obj\box_lib.h"
3363 leency 23
//images
24
#include "imgs\toolbar.txt"
25
#include "imgs\left_p.txt"
4846 leency 26
#include "imgs\icons.txt"
3363 leency 27
 
3848 punk_joker 28
#ifdef LANG_RUS
29
	?define T_FILE "Файл"
30
	?define T_TYPE "Тип"
31
	?define T_SIZE "Размер"
32
	?define T_NEW_FOLDER "Новая папка"
33
	?define T_NEW_FILE "Новый файл"
34
	?define T_DELETE_FILE "Вы действительно хотите удалить"
35
	?define T_YES "Да"
36
	?define T_NO "Нет"
5555 punk_joker 37
	?define T_CANCEL "Отмена"
38
	?define T_CREATE "Создать"
5571 punk_joker 39
	?define T_RENAME "Переименовать"
5557 punk_joker 40
	?define FILE_EXISTS "Файл с таким именем существует"
41
	?define FOLDER_EXISTS "Папка с таким именем существует"
3848 punk_joker 42
	?define T_DEL_ERROR_1 "Ошибка. Папка не пустая."
3997 leency 43
	?define WAIT_DELETING_FOLDER "Удаляется папка. Подожите..."
3848 punk_joker 44
	?define NOT_CREATE_FOLDER "Не удалось создать папку."
45
	?define NOT_CREATE_FILE "Не удалось создать файл."
5506 punk_joker 46
	?define ERROR_1 "Ошибка при загрузке библиотеки /rd/1/lib/box_lib.obj"
5514 leency 47
	?define T_PASTE_WINDOW_TITLE "Копирую..."
3883 leency 48
	?define T_PASTE_WINDOW_TEXT "Копируется файл:"
5514 leency 49
	?define T_PASTE_WINDOW_BUTTON "Прервать"
50
	?define INFO_AFTER_COPY "Копирование завершено"
4022 leency 51
	?define T_CANCEL_PASTE "Копирование прекращено. Папка скопирована не полностью."
4049 leency 52
	?define T_SELECT_APP_TO_OPEN_WITH "Выберите программу для открытия файла"
5514 leency 53
	?define DEL_MORE_FILES_1 "выбранные элементы ("
5512 punk_joker 54
	?define DEL_MORE_FILES_2 " шт.)?"
3933 kaitz 55
#elif LANG_EST
56
	?define T_FILE "Fail"
57
	?define T_TYPE "T№№p"
58
	?define T_SIZE "Suurus"
59
	?define T_NEW_FOLDER "Uus kataloog"
60
	?define T_NEW_FILE "Uus fail"
61
	?define T_DELETE_FILE "Kas sa tahad tїesti kustutada"
62
	?define T_YES "Jah"
63
	?define T_NO "Ei"
5556 punk_joker 64
	?define T_CANCEL "Cancel"
65
	?define T_CREATE "Create"
5571 punk_joker 66
	?define T_RENAME "Rename"
5557 punk_joker 67
	?define FILE_EXISTS "The file with the same name exists"
68
	?define FOLDER_EXISTS "A folder with the same name exists"
3933 kaitz 69
	?define T_DEL_ERROR_1 "Viga. Kataloog ei ole t№hi."
3997 leency 70
	?define WAIT_DELETING_FOLDER "Deleting folder. Please, wait..."
3933 kaitz 71
	?define NOT_CREATE_FOLDER "Kataloogi ei saa luua."
72
	?define NOT_CREATE_FILE "Faili ei saa luua."
5506 punk_joker 73
	?define ERROR_1 "Viga teegi laadimisel /rd/1/lib/box_lib.obj"
5514 leency 74
	?define T_PASTE_WINDOW_TITLE "Kopeerin..."
3933 kaitz 75
	?define T_PASTE_WINDOW_TEXT "Kopeerin faili:"
5514 leency 76
	?define T_PASTE_WINDOW_BUTTON "Abort"
77
	?define INFO_AFTER_COPY "Copy finished"
4022 leency 78
	?define T_CANCEL_PASTE "Copy process terminated. Folder copied incompletely."
4049 leency 79
	?define T_SELECT_APP_TO_OPEN_WITH "Select application to open file"
5514 leency 80
	?define DEL_MORE_FILES_1 "selected items("
81
	?define DEL_MORE_FILES_2 " pcs.)?"
3848 punk_joker 82
#else
83
	?define T_FILE "File"
84
	?define T_TYPE "Type"
85
	?define T_SIZE "Size"
86
	?define T_NEW_FOLDER "New folder"
87
	?define T_NEW_FILE "New file"
88
	?define T_DELETE_FILE "Do you really want to delete"
89
	?define T_YES "Yes"
90
	?define T_NO "No"
5556 punk_joker 91
	?define T_CANCEL "Cancel"
92
	?define T_CREATE "Create"
5571 punk_joker 93
	?define T_RENAME "Rename"
5557 punk_joker 94
	?define FILE_EXISTS "The file with the same name exists"
95
	?define FOLDER_EXISTS "A folder with the same name exists"
3848 punk_joker 96
	?define T_DEL_ERROR_1 "Error. Folder isn't empty."
3997 leency 97
	?define WAIT_DELETING_FOLDER "Deleting folder. Please, wait..."
3848 punk_joker 98
	?define NOT_CREATE_FOLDER "Folder can not be created."
99
	?define NOT_CREATE_FILE "File can not be created."
5506 punk_joker 100
	?define ERROR_1 "Error while loading library /rd/1/lib/box_lib.obj"
5514 leency 101
	?define T_PASTE_WINDOW_TITLE "Copying..."
3883 leency 102
	?define T_PASTE_WINDOW_TEXT "Copying file:"
5514 leency 103
	?define T_PASTE_WINDOW_BUTTON "Abort"
104
	?define INFO_AFTER_COPY "Copy finished"
4022 leency 105
	?define T_CANCEL_PASTE "Copy process terminated. Folder copied incompletely."
4049 leency 106
	?define T_SELECT_APP_TO_OPEN_WITH "Select application to open file"
5514 leency 107
	?define DEL_MORE_FILES_1 "selected items("
108
	?define DEL_MORE_FILES_2 " pcs.)?"
3848 punk_joker 109
#endif
110
 
3444 leency 111
enum {ONLY_SHOW, WITH_REDRAW, ONLY_OPEN}; //OpenDir
112
 
5571 punk_joker 113
#define TITLE "Eolite File Manager v2.8"
114
#define ABOUT_TITLE "Eolite v2.8"
4076 leency 115
dword col_padding, col_selec, col_lpanel;
3363 leency 116
 
3434 leency 117
int toolbar_buttons_x[7]={9,46,85,134,167,203};
118
struct path_string { char Item[4096]; };
3363 leency 119
 
4136 punk_joker 120
byte active_about=0;
4070 punk_joker 121
word about_window;
5416 punk_joker 122
byte active_settings=0;
123
word settings_window;
4040 punk_joker 124
 
4136 punk_joker 125
byte menu_call_mouse=0;
126
 
3434 leency 127
llist files;
128
 
129
byte
3363 leency 130
	path[4096],
131
	file_path[4096],
3404 leency 132
	file_name[256],
5555 punk_joker 133
	new_element_name[256],
3434 leency 134
	temp[4096];
135
byte
3439 leency 136
	del_active=0,
5555 punk_joker 137
	new_element_active=0,
4399 punk_joker 138
	show_dev_name=1,
4225 punk_joker 139
	real_files_names_case=0,
5532 leency 140
	use_big_fonts=0,
141
	font_type,
5459 punk_joker 142
	info_after_copy=0,
3434 leency 143
	sort_num=2,
3441 leency 144
	itdir;
3363 leency 145
 
5441 leency 146
dword eolite_ini_path;
147
 
3363 leency 148
proc_info Form;
4076 leency 149
system_colors sc;
3363 leency 150
mouse m;
5532 leency 151
int mouse_dd, scroll_used, sc_slider_h, sorting_arrow_x, kolibrios_drive;
4897 leency 152
dword buf;
3434 leency 153
dword file_mas[6898];
154
int j, i;
4028 leency 155
int action_buf;
4863 leency 156
int rand_n;
5513 punk_joker 157
int selected_count;
3363 leency 158
 
5549 punk_joker 159
mouse gestures;
160
signed x_old, y_old, dif_x, dif_y, adif_x, adif_y;
161
byte stats;
162
 
5557 punk_joker 163
edit_box edit2 = {250,213,80,0xFFFFCC,0x94AECE,0xFFFFCC,0xFFFFFF,0,248,#file_name,#mouse_dd,64,6,6};
164
edit_box new_file_ed = {150,213,80,0xFFFFFF,0x94AECE,0x000000,0xFFFFFF,0,248,#new_element_name,#mouse_dd,100000000000010b,6,0};
3434 leency 165
PathShow_data PathShow = {0, 17,250, 6, 250, 0, 0, 0x0, 0xFFFfff, #path, #temp, 0};
3363 leency 166
PathShow_data FileShow = {0, 56,215, 6, 100, 0, 0, 0x0, 0xFFFfff, #file_name, #temp, 0};
167
 
4042 leency 168
#include "include\copy.h"
5435 leency 169
#include "include\gui.h"
3363 leency 170
#include "include\sorting.h"
4042 leency 171
#include "include\icons.h"
3363 leency 172
#include "include\left_panel.h"
173
#include "include\history.h"
4042 leency 174
#include "include\menu.h"
175
#include "include\about.h"
5416 punk_joker 176
#include "include\settings.h"
5447 punk_joker 177
#include "include\properties.h"
3363 leency 178
 
179
void main()
180
{
3444 leency 181
	word key, id, can_show, can_select, m_selected;
4897 leency 182
	dword selected_offset;
4863 leency 183
	rand_n = random(40);
5549 punk_joker 184
	gestures.get();
3363 leency 185
	mem_Init();
3848 punk_joker 186
	if (load_dll2(boxlib, #box_lib_init,0)!=0) notify(ERROR_1);
5399 punk_joker 187
    if (load_dll2(libini, #lib_init,1)!=0) notify("Error: library doesn't exists - libini");
5441 leency 188
	eolite_ini_path = abspath("Eolite.ini");
189
	LoadIniSettings();
190
	GetSystemDiscs();
4076 leency 191
	SetAppColors();
5555 punk_joker 192
	strcpy(#new_element_name, T_NEW_FILE);
193
	new_file_ed.size = strlen(T_NEW_FILE);
3363 leency 194
	if (param)
195
	{
196
		strcpy(#path, #param);
3434 leency 197
		if (path[strlen(#path)-1]!='/') chrcat(#path, '/'); //add "/" to the end of the string
3363 leency 198
	}
199
	else
3695 leency 200
	{
3432 leency 201
		strcpy(#path, "/rd/1/");
3695 leency 202
	}
3363 leency 203
	Open_Dir(#path,ONLY_OPEN);
3432 leency 204
	SetEventMask(0x27);
3434 leency 205
	loop() switch(WaitEvent())
3363 leency 206
	{
207
		case evMouse:
4081 leency 208
			if (del_active) || (!CheckActiveProcess(Form.ID)) || (Form.status_window>2) break;
5555 punk_joker 209
			if (new_element_active) || (!CheckActiveProcess(Form.ID)) || (Form.status_window>2)
210
			{
211
				edit_box_mouse stdcall(#new_file_ed);
212
				break;
213
			}
3363 leency 214
 
215
			m.get();
5549 punk_joker 216
 
217
 
218
			gestures.get();
5550 punk_joker 219
			if (!gestures.mkm) && (stats>0) stats = 0;
5549 punk_joker 220
			if (gestures.mkm) && (stats==0)
221
			{
222
				x_old = gestures.x;
223
				y_old = gestures.y;
224
				stats = 1;
225
			}
226
			if (gestures.mkm) && (stats==1)
227
			{
228
				dif_x = gestures.x-x_old;
229
				dif_y = gestures.y-y_old;
5550 punk_joker 230
				adif_x = fabs(dif_x);
231
				adif_y = fabs(dif_y);
5549 punk_joker 232
 
233
				if (adif_x>adif_y)
234
				{
235
					if (dif_x > 150)
236
					{
237
						if (HistoryPath(GO_FORWARD))
238
							{
5550 punk_joker 239
								files.first=files.current=NULL;
5549 punk_joker 240
								Open_Dir(#path,WITH_REDRAW);
241
							}
242
						stats = 0;
243
					}
244
					if (dif_x < -150)
245
					{
246
						GoBack();
247
						stats = 0;
248
					}
249
				}
250
				else
251
				{
5550 punk_joker 252
					if (dif_y < -100)
5549 punk_joker 253
					{
254
						Dir_Up();
255
						stats = 0;
256
					}
257
				}
258
			}
259
 
5575 pavelyakov 260
			/*
4078 leency 261
			if (files.MouseOver(m.x, m.y)) && (!can_select)
3363 leency 262
			{
4042 leency 263
				m_selected = m.y - files.y / files.line_h;
3434 leency 264
				if (m.lkm) can_select = 1;
265
				if (m.pkm)
266
				{
267
					can_show = 1;
4042 leency 268
					if (m.y - files.y / files.line_h != files.current) can_select = 1;
3434 leency 269
				}
270
			}
271
 
272
			//select/open file {
273
			if (!m.lkm) && (!m.pkm) && (can_select)
274
			{
275
				can_select = 0;
4042 leency 276
				if (m.y>=files.y)
3695 leency 277
				{
4042 leency 278
					id = m.y - files.y / files.line_h;
3695 leency 279
					if (id!=m_selected)
280
					{
281
						can_show=0;
282
						break;
283
					}
284
					if (files.current!=id)
3876 leency 285
					{
286
						if (id
287
					}
3695 leency 288
					else
5443 punk_joker 289
						Open(0);
3695 leency 290
				}
3434 leency 291
			};
292
			// } select/open file
293
 
294
			//file menu {
295
			if (!m.pkm) && (!m.lkm) && (can_show)
296
			{
297
				can_show = 0;
4136 punk_joker 298
				menu_call_mouse = 1;
4042 leency 299
				if (m.y>=files.y)
3695 leency 300
				{
301
					SwitchToAnotherThread();
4057 leency 302
					CreateThread(#FileMenu,#menu_stak+4092);
3695 leency 303
				}
3434 leency 304
				break;
305
			}
306
			// } file menu
5575 pavelyakov 307
			*/
308
 
309
			if (files.MouseOver(m.x, m.y))&&(m.up)
310
			{
311
				//select/open file {
312
				if (m.key&MOUSE_LEFT)
313
				{
314
					if (m.y>=files.y)//&&(m.click)
315
					{
316
						id = m.y - files.y / files.line_h;
317
						if (files.current!=id)
318
						{
319
							if (id
320
						}
321
						else if(m.dblclick)Open(0);
322
					}
323
				}
324
				// } select/open file
325
				else
326
				//file menu {
327
				if (m.key&MOUSE_RIGHT)
328
				{
329
					menu_call_mouse = 1;
330
					if (m.y>=files.y)&&(m.click)
331
					{
332
						id = m.y - files.y / files.line_h;
333
						if (files.current!=id) List_Current(id-files.current);
334
						SwitchToAnotherThread();
335
						CreateThread(#FileMenu,#menu_stak+4092);
336
					}
337
					break;
338
				}
339
				// } file menu
340
			}
3363 leency 341
 
3434 leency 342
			if (m.vert)
343
			{
4069 leency 344
				if (files.MouseScroll(m.vert)) List_ReDraw();
3434 leency 345
				break;
346
			}
347
 
4042 leency 348
			if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>40) && (m.y
3363 leency 349
			{
5441 leency 350
				IF (m.lkm==1) DrawRectangle3D(Form.cwidth - 17,41,14,14,0xC7C7C7,0xFFFFFF);
3434 leency 351
				WHILE (m.lkm==1) && (files.first>0)
3363 leency 352
				{
3434 leency 353
					pause(8);
354
					files.first--;
3363 leency 355
					List_ReDraw();
356
					m.get();
357
				}
5441 leency 358
				DrawRectangle3D(Form.cwidth - 17,41,14,14,0xFFFFFF,0xC7C7C7);
3363 leency 359
			}
360
 
361
			if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>onTop(22,0)+1) && (m.y
362
			{
5441 leency 363
				IF (m.lkm==1) DrawRectangle3D(Form.cwidth - 17,onTop(21,0),14,14,0xC7C7C7,0xFFFFFF);
3434 leency 364
				while (m.lkm==1) && (files.first
3363 leency 365
				{
3434 leency 366
					pause(8);
367
					files.first++;
3363 leency 368
					List_ReDraw();
369
					m.get();
370
				}
5441 leency 371
				DrawRectangle3D(Form.cwidth - 17,onTop(21,0),14,14,0xFFFFFF,0xC7C7C7);
3363 leency 372
			}
373
 
3434 leency 374
			//Scrooll
375
			if (!m.lkm) && (scroll_used) { scroll_used=NULL; Scroll(); }
376
			if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>56) && (m.y
3363 leency 377
 
378
			if (scroll_used)
379
			{
5532 leency 380
				IF (sc_slider_h/2+files.y>m.y) || (m.y<0) || (m.y>4000) m.y=sc_slider_h/2+files.y; //anee eo?ni? iaa ieiii
3434 leency 381
				id=files.first;
5532 leency 382
				j= sc_slider_h/2;
4042 leency 383
				files.first = m.y -j -files.y * files.count;
384
				files.first /= onTop(22,files.y);
3434 leency 385
				IF (files.visible+files.first>files.count) files.first=files.count-files.visible;
3444 leency 386
				IF (id!=files.first) List_ReDraw();
3363 leency 387
			}
388
			break;
389
//Button pressed-----------------------------------------------------------------------------
390
		case evButton:
391
			id=GetButtonID();
4070 punk_joker 392
			if (id==1)
393
			{
394
				KillProcess(about_window);
395
				ExitProcess();
396
			}
3439 leency 397
			if (del_active)
3363 leency 398
			{
399
				IF (id==301) || (id==302) Del_File(302-id);
400
				break;
401
			}
5555 punk_joker 402
			if (new_element_active)
403
			{
404
				IF (id==301) || (id==302) NewElement(302-id);
405
				break;
406
			}
3439 leency 407
 
3363 leency 408
			switch(id)
409
			{
410
				case 21: //Back
411
						GoBack();
412
						break;
413
				case 22: //Forward
414
						if (HistoryPath(GO_FORWARD))
415
						{
3434 leency 416
							files.first=files.current=NULL; //aaa?o nienea
3363 leency 417
							Open_Dir(#path,WITH_REDRAW);
418
						}
419
						break;
420
				case 23: //up!
421
						Dir_Up();
422
						break;
423
				case 24: //cut
3846 punk_joker 424
						Copy(#file_path, CUT);
3444 leency 425
						break;
3363 leency 426
				case 25: //copy
3846 punk_joker 427
						Copy(#file_path, NOCUT);
3444 leency 428
						break;
3363 leency 429
				case 26: //paste
4057 leency 430
						CreateThread(#Paste,#copy_stak+4092);
3363 leency 431
						break;
432
				case 31...33: //sort
4022 leency 433
						IF(sort_num==1) DrawFilledBar(sorting_arrow_x,42,6,10);
434
						IF(sort_num==2) DrawFilledBar(sorting_arrow_x,42,6,10);
435
						IF(sort_num==3) DrawFilledBar(sorting_arrow_x,42,6,10);
3363 leency 436
						sort_num=id-30;
3434 leency 437
						Open_Dir(#path,WITH_REDRAW);
3363 leency 438
						break;
3434 leency 439
				case 50...60: //Actions
3444 leency 440
						FnProcess(id-50);
3363 leency 441
						break;
442
				case 100...120:
443
					DEVICE_MARK:
3444 leency 444
						DrawRectangle(17,id-100*16+74,159,16, 0); //auaaeaiea
3363 leency 445
						strcpy(#path, #disk_list[id-100].Item);
3434 leency 446
						files.first=files.current=0;
3444 leency 447
						Open_Dir(#path,WITH_REDRAW);
3363 leency 448
						pause(5);
3444 leency 449
						DrawRectangle(17,id-100*16+74,159,16, 0xFFFFFF);
3363 leency 450
						break;
451
			}
452
			break;
453
//Key pressed-----------------------------------------------------------------------------
454
		case evKey:
455
			key = GetKey();
456
			if (Form.status_window>2) break;
457
			IF (del_active)
458
			{
459
				IF (key==013) Del_File(true);
460
				IF (key==027) Del_File(false);
461
				break;
462
			}
5555 punk_joker 463
			IF (new_element_active)
464
			{
465
				IF (key==027) NewElement(0);
5557 punk_joker 466
				IF (key==013) NewElement(1);
5555 punk_joker 467
				EAX=key<<8;
468
				edit_box_key stdcall (#new_file_ed);
469
				break;
470
			}
3444 leency 471
			IF (edit2.flags!=64) && (key!=13) && (key!=27)
3363 leency 472
			{
473
				EAX=key<<8;
474
				edit_box_key stdcall (#edit2);
475
				break;
476
			}
477
			switch (key)
478
			{
479
					case 209...217:
480
							id=key-110;
481
							IF (id-100>=disc_num) break;
482
							GOTO DEVICE_MARK;
5511 leency 483
					case ASCII_KEY_BS:
3363 leency 484
							//GoBack();
485
							Dir_Up();
486
							break;
3434 leency 487
					case 004: //Ctrl+D set as bg
3363 leency 488
							strcpy(#temp, "\\S__");
489
							strcat(#temp, #file_path);
490
							RunProgram("/sys/media/kiv", #temp);
491
							break;
3434 leency 492
					case 014: //Ctrl+N new window
3363 leency 493
							IF (Form.left==98) MoveSize(Form.left-20,Form.top-20,OLD,OLD);
494
							RunProgram("/sys/File Managers/Eolite", #path);
495
							break;
496
					case 024: //Ctrl+X
3444 leency 497
							Copy(#file_path, CUT);
498
							break;
3363 leency 499
					case 003: //Ctrl+C
3444 leency 500
							Copy(#file_path, NOCUT);
3363 leency 501
							break;
502
					case 022: //Ctrl+V
4057 leency 503
							CreateThread(#Paste,#copy_stak+4092);
3363 leency 504
							break;
5512 punk_joker 505
					case 001: //Ctrl+A
506
							debugln("press Ctrl+A");
507
							for (i=0; i
508
							{
509
								selected_offset = file_mas[i]*304 + buf+32 + 7;
510
								ESBYTE[selected_offset] = 1;
5513 punk_joker 511
								selected_count++;
5512 punk_joker 512
							}
513
							List_ReDraw();
514
							break;
515
					case 021: //Ctrl+U
516
							debugln("press Ctrl+A");
517
							for (i=0; i
518
							{
519
								selected_offset = file_mas[i]*304 + buf+32 + 7;
520
								ESBYTE[selected_offset] = 0;
521
							}
5513 punk_joker 522
							selected_count = 0;
5512 punk_joker 523
							List_ReDraw();
524
							break;
5511 leency 525
					case ASCII_KEY_ESC:
3363 leency 526
							break;
5511 leency 527
					case ASCII_KEY_ENTER:
5571 punk_joker 528
							//IF (rename_active==1) {ReName(true); break;}
5443 punk_joker 529
							Open(0);
3363 leency 530
							break;
4136 punk_joker 531
					case 074: //menu
532
							menu_call_mouse=0;
533
							SwitchToAnotherThread();
534
							CreateThread(#FileMenu,#menu_stak+4092);
535
							break;
4070 punk_joker 536
					case 173: //Ctrl+Enter
4225 punk_joker 537
							if (!itdir) ShowOpenWithDialog();
5443 punk_joker 538
							else Open(1);
4070 punk_joker 539
							break;
5511 leency 540
					case ASCII_KEY_UP:
3444 leency 541
							List_Current(-1);
3363 leency 542
							break;
5511 leency 543
					case ASCII_KEY_DOWN:
3444 leency 544
							List_Current(1);
3363 leency 545
							break;
5511 leency 546
					case ASCII_KEY_HOME:
4069 leency 547
							if (files.KeyHome()) List_ReDraw();
3363 leency 548
							break;
5511 leency 549
					case ASCII_KEY_END:
4069 leency 550
							if (files.KeyEnd()) List_ReDraw();
3363 leency 551
							break;
5511 leency 552
					case ASCII_KEY_PGDN:
3444 leency 553
							List_Current(files.visible-1);
3363 leency 554
							break;
5511 leency 555
					case ASCII_KEY_PGUP:
3444 leency 556
							List_Current(-files.visible+1);
3363 leency 557
							break;
5511 leency 558
					case ASCII_KEY_DEL:
3434 leency 559
							Del_Form();
3363 leency 560
							break;
5511 leency 561
					case ASCII_KEY_INS:
4897 leency 562
							selected_offset = file_mas[files.current+files.first]*304 + buf+32 + 7;
5513 punk_joker 563
							if (ESBYTE[selected_offset])
564
							{
565
								ESBYTE[selected_offset]=0;
566
								selected_count--;
567
							}
568
							else
569
							{
570
								ESBYTE[selected_offset] = 1;
571
								selected_count++;
572
							}
4897 leency 573
							List_Current(1);
4698 punk_joker 574
							break;
5443 punk_joker 575
					case 048...059: //F1-F10
3444 leency 576
							FnProcess(key-49);
3363 leency 577
							break;
578
					default:
3434 leency 579
							for (i=files.current+files.first+1; i
3363 leency 580
							{
581
								strcpy(#temp, file_mas[i]*304+buf+72);
582
								IF (temp[0]==key) || (temp[0]==key-32)
583
								{
3444 leency 584
									List_Current(i-files.current-files.first);
3363 leency 585
									break;
586
								}
587
							}
588
			}
589
			break;
590
		case evReDraw:
4042 leency 591
			draw_window();
4028 leency 592
			if (action_buf) { menu_action(action_buf); action_buf=0;}
3363 leency 593
	}
594
}
595
 
4225 punk_joker 596
 
5435 leency 597
inline fastcall signed int _strrchr( ESI,BL)
598
{
599
	int jj=0, last=strlen(ESI);
600
	do{
601
		jj++;
602
		$lodsb
603
		IF(AL==BL) last=jj;
604
	} while(AL!=0);
605
	return last;
606
}
4225 punk_joker 607
 
5435 leency 608
 
4028 leency 609
void menu_action(dword id)
610
{
611
	if (id==COPY_PASTE_END)
612
	{
613
		FnProcess(5);
614
		SelectFile(#copy_to+strrchr(#copy_to,'/'));
615
	}
5443 punk_joker 616
	if (id==100) Open(0);
4225 punk_joker 617
	if (id==201) ShowOpenWithDialog();
4028 leency 618
	if (id==202) FnProcess(3); //F3
619
	if (id==203) FnProcess(4); //F4
620
	if (id==104) Copy(#file_path, NOCUT);
621
	if (id==105) Copy(#file_path, CUT);
4057 leency 622
	if (id==106) CreateThread(#Paste,#copy_stak+4092);
4034 leency 623
	if (id==207) FnProcess(2);
4028 leency 624
	if (id==108) Del_Form();
625
	if (id==109) FnProcess(5);
5447 punk_joker 626
	if (id==110) FnProcess(8);
5428 leency 627
	if (id==300) { FnProcess(5); List_ReDraw(); }
4028 leency 628
}
3363 leency 629
 
4028 leency 630
 
3444 leency 631
void draw_window()
632
{
4863 leency 633
	DefineAndDrawWindow(GetScreenWidth()-550/4+rand_n,rand_n+30,550,500,0x73,sc.work,TITLE,0);
3444 leency 634
	GetProcessInfo(#Form, SelfInfo);
635
	if (Form.status_window>2) return;
5441 leency 636
	files.SetSizes(192, 57, Form.cwidth - 210, onTop(57,6), disc_num*16+195,files.line_h);
3444 leency 637
	if (Form.height < files.min_h) MoveSize(OLD,OLD,OLD,files.min_h);
638
	if (Form.width<480) MoveSize(OLD,OLD,480,OLD);
639
	GetProcessInfo(#Form, SelfInfo); //if win_size changed
640
 
3363 leency 641
	PutPaletteImage(#toolbar,246,34,0,0,8,#toolbar_pal);
4076 leency 642
	DrawBar(127, 8, 1, 25, sc.work_graph);
643
	for (j=0; j<3; j++) DefineButton(toolbar_buttons_x[j]+2,5+2,31-5,29-5,21+j+BT_HIDE,sc.work);
644
	for (j=3; j<6; j++) DefineButton(toolbar_buttons_x[j],5,31,29,21+j+BT_HIDE,sc.work);
5441 leency 645
	DrawBar(246,0,Form.cwidth - 297,12, sc.work); //upper editbox
646
	DrawBar(246,29,Form.cwidth - 297,5,sc.work);  //under editbox
647
	DrawRectangle(246,12,Form.cwidth - 303,16,sc.work_graph);
648
	DefineButton(Form.cwidth - 25,6,27,28,51+BT_HIDE+BT_NOFRAME,0); //about
3363 leency 649
	PutPaletteImage(#goto_about,56,34,Form.width-65,0,8,#goto_about_pal);
3434 leency 650
	//main rectangles
4076 leency 651
	DrawRectangle(1,40,Form.cwidth-3,onTop(46,0),sc.work_graph);
3444 leency 652
	DrawRectangle(0,39,Form.cwidth-1,onTop(44,0),col_palette[4]); //bg
3363 leency 653
	for (i=0; i<5; i++) DrawBar(0, 34+i, Form.cwidth, 1, col_palette[8-i]);
654
	DrawLeftPanel();
3434 leency 655
	//ListBox
5444 leency 656
	DrawFlatButton(files.x,40,Form.cwidth - files.x - 159,16,31,sc.work,T_FILE);
657
	DrawFlatButton(Form.cwidth - 159,40,73,16,32,sc.work,T_TYPE);
658
	DrawFlatButton(Form.cwidth - 86,40,68,16,33,sc.work,T_SIZE);
4076 leency 659
	DrawBar(files.x+files.w,files.y,1,onTop(22,files.y),sc.work_graph); //line to the left from the scroll
660
	DrawFlatButton(files.x+files.w,40,16,16,0,sc.work,"\x18");
661
	DrawFlatButton(files.x+files.w,onTop(22,0),16,16,0,sc.work,"\x19");
3363 leency 662
	Open_Dir(#path,ONLY_SHOW);
663
	if (del_active) Del_Form();
5557 punk_joker 664
	if (new_element_active) NewElement_Form(new_element_active);
3363 leency 665
}
666
 
667
 
668
void KEdit()
669
{
3434 leency 670
	if (Form.width<480) return;
3363 leency 671
	PathShow.area_size_x = Form.cwidth-306;
672
	DrawBar(PathShow.start_x-3, PathShow.start_y-4, PathShow.area_size_x+2, 15, 0xFFFfff);
673
	PathShow_prepare stdcall(#PathShow);
674
	PathShow_draw stdcall(#PathShow);
675
}
676
 
677
 
5511 leency 678
void List_Current(signed int cur)
3363 leency 679
{
3434 leency 680
	if (cur<=0) //up
3363 leency 681
	{
3434 leency 682
		IF (files.first==0) && (files.current<=0) return;
683
		IF (-cur-1
3363 leency 684
		{
3434 leency 685
			Line_ReDraw(0xFFFFFF, files.current);
686
			files.current+=cur;
687
			Line_ReDraw(col_selec, files.current);
3363 leency 688
			return;
689
		}
690
		ELSE
691
		{
3434 leency 692
			IF (-cur
693
			files.current=0;
3363 leency 694
			List_ReDraw();
695
			return;
696
		}
697
	}
3434 leency 698
	else  //down
3363 leency 699
	{
5511 leency 700
		IF (files.first==files.count-files.visible) && (files.current==files.visible-1)
701
		{
702
			Line_ReDraw(col_selec, files.current);
703
			return;
704
		}
3434 leency 705
		IF (files.visible-files.current>cur)
3363 leency 706
		{
3434 leency 707
			Line_ReDraw(0xFFFFFF, files.current);
708
			files.current+=cur;
709
			Line_ReDraw(col_selec, files.current);
3363 leency 710
			return;
711
		}
712
		else
713
		{
3434 leency 714
			IF(files.first+files.current+cur>=files.count)
3363 leency 715
			{
3434 leency 716
				files.first=files.count-files.visible;
717
				files.current=cur-files.first+files.current;
3363 leency 718
				}
719
			ELSE
720
			{
3434 leency 721
				files.first+=cur+files.current-files.visible+1;
722
				files.current=files.visible-1;
3363 leency 723
			}
724
 
3434 leency 725
			IF (files.current<0) || (files.current>files.visible)
3363 leency 726
			{
3434 leency 727
				files.current=files.visible-1;
3363 leency 728
			}
729
			List_ReDraw();
730
		}
731
	}
732
}
733
 
734
 
735
void List_ReDraw()
736
{
3434 leency 737
	int paint_y;
3876 leency 738
	//we are in the end of the list => maximize window => there will be white lines after the last element
3434 leency 739
	if (files.count-files.firstfiles.visible-1)
740
	{ files.first=files.count-files.visible; files.current=files.visible-1; }
3444 leency 741
	for (j=0; j
3434 leency 742
	//in the bottom
743
	paint_y = j * files.line_h + files.y;
744
	DrawBar(files.x,paint_y,files.w,onTop(paint_y,6),0xFFFFFF);
4076 leency 745
	DrawBar(Form.cwidth-159,paint_y,1,onTop(paint_y,6),sc.work);
746
	DrawBar(Form.cwidth-86,paint_y,1,onTop(paint_y,6),sc.work);
3434 leency 747
	Scroll();
3363 leency 748
}
749
 
3444 leency 750
 
3363 leency 751
void Line_ReDraw(dword color, filenum){
3467 leency 752
	dword text_col=0,
5487 leency 753
	      ext1, attr,
4897 leency 754
	      file_offet,
755
	      file_name_off,
4042 leency 756
	      y=filenum*files.line_h+files.y;
4897 leency 757
	      BDVK file;
4859 leency 758
	if (filenum==-1) return;
3447 leency 759
	DrawBar(files.x,y,3,files.line_h,color);
760
	DrawBar(files.x+19,y,files.w-19,files.line_h,color);
761
	DrawBar(files.x+3,y+17,16,1,color);
762
	if (files.line_h>18) DrawBar(files.x+3,y+18,16,files.line_h-18,color);
763
	if (files.line_h>15) DrawBar(files.x+3,y,16,files.line_h-15,color);
3363 leency 764
 
4897 leency 765
	file_offet = file_mas[filenum+files.first]*304 + buf+32;
5487 leency 766
	attr = ESDWORD[file_offet];
4897 leency 767
	file.selected = ESBYTE[file_offet+7];
768
	file.sizelo   = ESDWORD[file_offet+32];
769
	file_name_off = file_offet+40;
3363 leency 770
 
5487 leency 771
	if (! TestBit(attr, 4) ) //file or folder?
3363 leency 772
	{
4897 leency 773
		Put_icon(file_name_off+_strrchr(file_name_off,'.'), files.x+3, files.line_h/2-7+y, color, 0);
5532 leency 774
		WriteText(7-strlen(ConvertSize(file.sizelo))*6+Form.cwidth - 76,files.line_h-6/2+y,font_type,0,ConvertSize(file.sizelo));
3363 leency 775
	}
776
	else
4846 leency 777
	{
4897 leency 778
		if (strcmp("..",file_name_off)==0) ext1=".."; else ext1="";
4846 leency 779
		Put_icon(ext1, files.x+3, files.line_h/2-7+y, color, 0);
780
	}
781
 
5487 leency 782
	if (TestBit(attr, 1)) || (TestBit(attr, 2)) text_col=0xA6A6B7; //system or hiden?
3444 leency 783
	if (color!=0xFFFfff)
3363 leency 784
	{
5487 leency 785
		itdir = TestBit(attr, 4);
4897 leency 786
		strcpy(#file_name, file_name_off);
3363 leency 787
		strcpy(#file_path, #path);
3434 leency 788
		strcat(#file_path, #file_name);
3363 leency 789
		if (text_col==0xA6A6B7) text_col=0xFFFFFF;
790
	}
4897 leency 791
	if (file.selected) text_col=0xFF0000;
3434 leency 792
	if (Form.width>=480)
793
	{
3447 leency 794
		FileShow.start_x = files.x + 23;
3434 leency 795
		FileShow.font_color = text_col;
796
		FileShow.area_size_x = Form.width - 380;
4897 leency 797
		FileShow.text_pointer = file_name_off;
798
		FileShow.start_y = files.text_y+y;
3434 leency 799
		PathShow_prepare stdcall(#FileShow);
800
		PathShow_draw stdcall(#FileShow);
801
	}
4076 leency 802
	DrawBar(Form.cwidth-159,y,1,files.line_h,sc.work); //gray line 1
803
	DrawBar(Form.cwidth-86,y,1,files.line_h,sc.work); //gray line 2
3363 leency 804
}
805
 
806
 
3444 leency 807
void Open_Dir(dword dir_path, redraw){
808
	int errornum, maxcount;
3434 leency 809
 
3444 leency 810
	if (redraw!=ONLY_SHOW)
3363 leency 811
	{
3444 leency 812
		if (ESBYTE[dir_path+1]!='\0') ESBYTE[dir_path+strlen(dir_path)-1] = '\0';
3363 leency 813
		if (buf) free(buf);
3444 leency 814
		errornum = GetDir(#buf, #files.count, dir_path, DIRS_NOROOT);
815
		if (ESBYTE[dir_path+1]!='\0') chrcat(dir_path, '/');
816
		if (errornum)
3363 leency 817
		{
818
			HistoryPath(ADD_NEW_PATH);
819
			GoBack();
820
			Write_Error(errornum);
821
			return;
822
		}
3444 leency 823
		maxcount = sizeof(file_mas)/sizeof(dword)-1;
4225 punk_joker 824
		if (files.count>maxcount) files.count = maxcount;
4859 leency 825
		if (files.count>0) && (files.current==-1) files.current=0;
3363 leency 826
	}
3444 leency 827
	if (files.count!=-1)
3363 leency 828
	{
829
		KEdit();
830
		HistoryPath(ADD_NEW_PATH);
3444 leency 831
		files.visible = files.h / files.line_h;
832
		IF (files.count < files.visible) files.visible = files.count;
4022 leency 833
		IF (sort_num==1) sorting_arrow_x = Form.width+60/2;
834
		IF (sort_num==2) sorting_arrow_x = Form.width-115;
835
		IF (sort_num==3) sorting_arrow_x = strlen(T_SIZE)*3-30+files.x+files.w;
4076 leency 836
		WriteText(sorting_arrow_x,45,0x80,sc.work_graph,"\x19");
3444 leency 837
		IF (redraw!=ONLY_SHOW) Sorting();
838
		IF (redraw!=ONLY_OPEN) List_ReDraw();
3363 leency 839
	}
3444 leency 840
	IF (files.count==-1) && (redraw!=ONLY_OPEN) {files.visible=files.count=0; List_ReDraw();}
3363 leency 841
}
842
 
843
 
844
inline Sorting()
845
{
846
	dword k=0, l=1;
4897 leency 847
	dword file_off;
3363 leency 848
	int i;
3434 leency 849
	if (!strcmp(#path,"/")) //do not sort
3363 leency 850
	{
3434 leency 851
		FOR(k=1;k
3363 leency 852
		return;
853
	}
4897 leency 854
	FOR (j=files.count-1, file_off=files.count-1*304+buf+32; j>=0; j--, file_off-=304;)  //files | folders
3363 leency 855
	{
4897 leency 856
		if (!real_files_names_case) strttl(file_off+40);
857
		if (TestBit(ESDWORD[file_off],4)) //directory?
3363 leency 858
		{
859
			file_mas[k]=j;
860
			k++;
861
		}
862
		else
863
		{
3434 leency 864
			file_mas[files.count-l]=j;
3363 leency 865
			l++;
866
		}
867
	}
3434 leency 868
	//sorting: files first, then folders
3363 leency 869
	Sort_by_Name(0,k-1);
3434 leency 870
	IF (sort_num==1) Sort_by_Name(k,files.count-1);
871
	IF (sort_num==2) Sort_by_Type(k,files.count-1);
872
	IF (sort_num==3) Sort_by_Size(k,files.count-1);
873
	//".." should be first
3444 leency 874
	IF (k>0) && (strcmp(file_mas[0]*304+buf+72,"..")!=0)
875
		FOR(k--; k>0; k--;) IF (!strcmp(file_mas[k]*304+buf+72,"..")) {file_mas[k]>
3363 leency 876
}
877
 
878
 
879
void Del_Form()
880
{
5512 punk_joker 881
	dword selected_offset2;
882
	int cont = 0;
883
	byte f_count[128];
4002 leency 884
	int dform_x=files.w-220/2+files.x;
4022 leency 885
	if (strcmp(#file_name,".")==0) || (strcmp(#file_name,"..")==0) return;
4002 leency 886
	if (del_active==2)
3991 leency 887
	{
4002 leency 888
		if (itdir) ShowMessage(WAIT_DELETING_FOLDER, 0);
3991 leency 889
	}
890
	else
891
	{
4002 leency 892
		if (!files.count) return;
4076 leency 893
		DrawPopup(dform_x,160,220,80,1,sc.work,sc.work_graph);
894
		WriteText(-strlen(T_DELETE_FILE)*3+110+dform_x,175,0x80,sc.work_text,T_DELETE_FILE);
5512 punk_joker 895
		for (i=0; i
4002 leency 896
		{
5512 punk_joker 897
			selected_offset2 = file_mas[i]*304 + buf+32 + 7;
898
			if (ESBYTE[selected_offset2]) cont++;
4002 leency 899
		}
5512 punk_joker 900
		if (cont)
901
		{
902
			strcpy(#f_count, DEL_MORE_FILES_1);
903
			strcat(#f_count, itoa(cont));
904
			strcat(#f_count, DEL_MORE_FILES_2);
905
			WriteText(-strlen(#f_count)*3+110+dform_x,190,0x80,sc.work_text,#f_count);
906
		}
4002 leency 907
		else
908
		{
5512 punk_joker 909
			IF (strlen(#file_name)<28)
910
			{
911
				WriteText(strlen(#file_name)*3+110+dform_x+2,190,0x80,sc.work_text,"?");
912
				WriteText(-strlen(#file_name)*3+110+dform_x,190,0x80,sc.work_text,#file_name);
913
			}
914
			else
915
			{
916
				WriteText(164+dform_x,190,0x80,0,"...?");
917
				ESI = 24;
918
				WriteText(dform_x+20,190,0,0,#file_name);
919
			}
4002 leency 920
		}
921
		DrawFlatButton(dform_x+27,208,70,20,301,0xFFB6B5,T_YES);
922
		DrawFlatButton(dform_x+120,208,70,20,302,0xC6DFC6,T_NO);
923
		del_active=1;
3991 leency 924
	}
3363 leency 925
}
926
 
4022 leency 927
int del_error;
928
int Del_File2(dword way)
3980 punk_joker 929
{
930
	dword dirbuf, fcount, i, filename;
4022 leency 931
	int error;
932
	char del_from[4096];
933
	if (isdir(way))
3997 leency 934
	{
4022 leency 935
		if (error = GetDir(#dirbuf, #fcount, way, DIRS_ONLYREAL)) del_error = error;
3997 leency 936
		for (i=0; i
3980 punk_joker 937
		{
4002 leency 938
			if (CheckEvent()==evReDraw) draw_window();
3997 leency 939
			filename = i*304+dirbuf+72;
940
			strcpy(#del_from, way);
941
			chrcat(#del_from, '/');
942
			strcat(#del_from, filename);
943
			if ( TestBit(ESDWORD[filename-40], 4) )
944
				Del_File2(#del_from);
945
			else
4022 leency 946
			{
947
				if (error = DeleteFile(#del_from)) del_error = error;
948
			}
3980 punk_joker 949
		}
3997 leency 950
	}
4022 leency 951
	if (error = DeleteFile(way)) del_error = error;
3980 punk_joker 952
}
953
 
954
 
3363 leency 955
void Del_File(byte dodel)
4022 leency 956
{
4896 punk_joker 957
	byte del_from[4096];
5214 punk_joker 958
	dword selected_offset2;
959
	int tst, count, i;
4896 punk_joker 960
 
3980 punk_joker 961
	if (dodel==true)
3363 leency 962
	{
4002 leency 963
		del_active=2;
3997 leency 964
		if (itdir) ShowMessage(WAIT_DELETING_FOLDER, 0);
4022 leency 965
		del_error = 0;
5214 punk_joker 966
 
5513 punk_joker 967
		if (selected_count)
5214 punk_joker 968
		{
5513 punk_joker 969
   		   for (i=0; i
970
           {
971
                selected_offset2 = file_mas[i]*304 + buf+32 + 7;
972
                if (ESBYTE[selected_offset2]) {
973
                    strcpy(#del_from, #path);
974
                    strcat(#del_from, file_mas[i]*304+buf+72);
975
                    Del_File2(#del_from);
976
                }
977
            }
5214 punk_joker 978
		}
979
		else
980
		{
5513 punk_joker 981
		   Del_File2(#file_path);
5214 punk_joker 982
		}
4022 leency 983
		if (del_error) Write_Error(del_error);
3363 leency 984
 	}
985
	del_active=0;
3997 leency 986
	DeleteButton(301);
987
	DeleteButton(302);
3444 leency 988
	Open_Dir(#path,WITH_REDRAW);
3363 leency 989
}
990
 
991
 
992
void SelectFile(dword that_file)
993
{
3434 leency 994
	files.first=files.current=0;
3363 leency 995
   	Open_Dir(#path,ONLY_OPEN);
4225 punk_joker 996
	if (!real_files_names_case) strttl(that_file);
3434 leency 997
	for (i=files.count-1; i>=0; i--;)
3363 leency 998
		if (!strcmp(file_mas[i]*304+buf+72,that_file)) break;
3444 leency 999
	List_Current(i);
3363 leency 1000
	List_ReDraw();
1001
}
1002
 
1003
 
1004
void Dir_Up()
1005
{
1006
	char cur_folder[4096];
1007
	i=strlen(#path)-1;
1008
	if (i==0) return;
1009
	path[i]=0x00;
1010
	i = strrchr(#path, '/');
1011
	strcpy(#cur_folder, #path+i);
1012
	path[i]=0x00;
1013
	SelectFile(#cur_folder);
1014
}
1015
 
5444 leency 1016
void Open(byte rez)
3434 leency 1017
{
5443 punk_joker 1018
	byte temp[4096];
5513 punk_joker 1019
	selected_count = 0;
5443 punk_joker 1020
	if (rez)
1021
	{
1022
		if (!strcmp(#file_name,"..")) return;
1023
		strcpy(#temp, #file_path);
1024
		if (path[strlen(#temp)-1]!='/') chrcat(#temp, '/'); //need "/" in the end
1025
		RunProgram("/sys/File Managers/Eolite", #temp);
1026
		return;
1027
	}
3444 leency 1028
	if (!files.count) return;
3441 leency 1029
	if (!itdir)
3434 leency 1030
	{
5401 leency 1031
		if (strrchr(#file_name, '.')==0) RunProgram(#file_path, ""); else RunProgram("/sys/@open", #file_path);
3434 leency 1032
	}
1033
	else
1034
	{
1035
		if (!strcmp(#file_name,"..")) { Dir_Up(); return; }
1036
		strcpy(#path, #file_path);
1037
		if (path[strlen(#path)-1]!='/') chrcat(#path, '/'); //need "/" in the end
1038
		files.first=files.current=0;
3444 leency 1039
		Open_Dir(#path,WITH_REDRAW);
3434 leency 1040
	}
1041
}
3363 leency 1042
 
3434 leency 1043
 
1044
inline fastcall void GoBack()
3363 leency 1045
{
1046
	char cur_folder[4096];
1047
	strcpy(#cur_folder, GetCurrentFolder());
1048
	if (HistoryPath(GO_BACK)) SelectFile(#cur_folder);
1049
}
1050
 
5397 punk_joker 1051
void ShowOpenWithDialog()
1052
{
1053
	byte param[4097];
1054
	param[0] = '~';
5398 punk_joker 1055
	param[1] = '\0';
5397 punk_joker 1056
	strcat(#param, #file_path);
1057
	RunProgram("/sys/@open", #param);
1058
}
1059
 
5555 punk_joker 1060
void NewElement(byte newf)
1061
{
5557 punk_joker 1062
	BDVK element_info;
5571 punk_joker 1063
	int del_rezult, copy_rezult;
5555 punk_joker 1064
	if (newf)
1065
	{
1066
		strcpy(#temp, #path);
1067
		strcat(#temp, new_file_ed.text);
5571 punk_joker 1068
		switch(new_element_active)
5555 punk_joker 1069
		{
5571 punk_joker 1070
			case 1:
1071
				GetFileInfo(#temp, #element_info);
1072
				if (EAX==5)
5557 punk_joker 1073
				{
5571 punk_joker 1074
					WriteFile(0, 0, #temp);
1075
					if (EAX)
1076
					{
1077
						Write_Error(EAX);
1078
						ShowMessage(NOT_CREATE_FILE, 150);
1079
					}
5557 punk_joker 1080
				}
5571 punk_joker 1081
				else
5557 punk_joker 1082
				{
5571 punk_joker 1083
					notify(FILE_EXISTS);
5557 punk_joker 1084
				}
5571 punk_joker 1085
			case 2:
1086
				GetFileInfo(#temp, #element_info);
1087
				if (EAX==5)
1088
				{
1089
					CreateDir(#temp);
1090
					if (EAX)
1091
					{
1092
						Write_Error(EAX);
1093
						ShowMessage(NOT_CREATE_FOLDER, 150);
1094
					}
1095
				}
1096
				else
1097
				{
1098
					notify(FOLDER_EXISTS);
1099
				}
1100
			case 3:
1101
				GetFileInfo(#temp, #element_info);
1102
				if (EAX==5)
1103
				{
1104
					if (itdir)
1105
					{
1106
						if (del_rezult = DeleteFile(#file_path))
1107
						{
1108
							Write_Error(del_rezult);
1109
							ShowMessage(T_DEL_ERROR_1, 150);
1110
							return;
1111
						}
1112
						if (CreateDir(#temp)) CreateDir(#file_path);
1113
						Open_Dir(#path,WITH_REDRAW);
1114
						SelectFile(new_file_ed.text);
1115
					}
1116
					else
1117
					{
1118
						if (copy_rezult = CopyFile(#file_path,#temp))
1119
						{
1120
							Write_Error(copy_rezult);
1121
						}
1122
						else
1123
						{
1124
							Del_File(true);
1125
							SelectFile(new_file_ed.text);
1126
						}
1127
					}
1128
				}
1129
				else
1130
				{
1131
					notify(FILE_EXISTS);
1132
				}
5555 punk_joker 1133
		}
5557 punk_joker 1134
		new_element_active = 0;
1135
		Open_Dir(#path,WITH_REDRAW);
1136
		SelectFile(new_file_ed.text);
5555 punk_joker 1137
	}
1138
	new_element_active = 0;
5557 punk_joker 1139
	Open_Dir(#path,WITH_REDRAW);
5555 punk_joker 1140
}
1141
 
5571 punk_joker 1142
void NewElement_Form(byte crt, dword strng)
5555 punk_joker 1143
{
1144
	int dform_x=files.w-220/2+files.x;
5557 punk_joker 1145
	if (!new_element_active)
5555 punk_joker 1146
	{
5557 punk_joker 1147
		new_element_active = crt;
5571 punk_joker 1148
		strcpy(#new_element_name, strng);
1149
		new_file_ed.size = new_file_ed.pos = strlen(strng);
5555 punk_joker 1150
	}
1151
	DrawPopup(dform_x,160,220,80,1,sc.work,sc.work_graph);
1152
	new_file_ed.left = dform_x+27;
1153
	new_file_ed.top = 180;
1154
	edit_box_draw  stdcall (#new_file_ed);
5571 punk_joker 1155
	IF (new_element_active==3) DrawFlatButton(dform_x+22,208,85,20,301,0xFFB6B5,T_RENAME);
1156
	ELSE DrawFlatButton(dform_x+27,208,70,20,301,0xFFB6B5,T_CREATE);
5555 punk_joker 1157
	DrawFlatButton(dform_x+120,208,70,20,302,0xC6DFC6,T_CANCEL);
1158
}
1159
 
3444 leency 1160
void FnProcess(char N)
3434 leency 1161
{
1162
	switch(N)
1163
	{
1164
		case 1:
4395 punk_joker 1165
			if (!active_about)
1166
			{
1167
				SwitchToAnotherThread();
1168
				about_window=CreateThread(#about_dialog,#about_stak+4092);
1169
				break;
1170
			}
1171
			else
1172
			{
1173
				ActivateWindow(GetProcessSlot(about_window));
1174
			}
3434 leency 1175
			break;
1176
		case 2:
1177
			if (!files.count) break;
5571 punk_joker 1178
			//edit2.flags = 100000000000010b; //set active
1179
			//edit2.left = files.x + 21;
1180
			//edit2.width = files.w - 26;
1181
			//edit2.top=files.current*files.line_h+59;
1182
			//edit2.size=edit2.pos=strlen(#file_name);
1183
			//edit_box_draw  stdcall (#edit2);
1184
			//DrawBar(edit2.left,files.current*files.line_h+58,edit2.width+1,1,0xFFFFCC); //bg
1185
			//rename_active=1;
1186
			NewElement_Form(3, #file_name);
3434 leency 1187
			break;
1188
		case 3:
3441 leency 1189
			IF (!itdir) RunProgram("/sys/tinypad", #file_path);
3434 leency 1190
			break;
1191
		case 4:
3441 leency 1192
			IF (!itdir) RunProgram("/sys/develop/heed", #file_path);
3434 leency 1193
			break;
3440 leency 1194
		case 5: //refresh cur dir & devs
3854 leency 1195
			Tip(56, T_DEVICES, 55, "-");
3440 leency 1196
			Open_Dir(#path,WITH_REDRAW);
1197
			pause(10);
5441 leency 1198
			LoadIniSettings();
1199
			GetSystemDiscs();
3444 leency 1200
			Open_Dir(#path,WITH_REDRAW);
3440 leency 1201
			DrawLeftPanel();
3434 leency 1202
			break;
1203
		case 6:
5555 punk_joker 1204
			/*strcpy(#temp, #path);
3848 punk_joker 1205
			strcat(#temp, T_NEW_FOLDER);
3434 leency 1206
			CreateDir(#temp);
1207
			if (!EAX){
3848 punk_joker 1208
				SelectFile(T_NEW_FOLDER);
3444 leency 1209
				FnProcess(2);
3434 leency 1210
			}
1211
			else
1212
			{
1213
				Write_Error(EAX);
3997 leency 1214
				ShowMessage(NOT_CREATE_FOLDER, 150);
5555 punk_joker 1215
			}*/
5571 punk_joker 1216
			NewElement_Form(2, T_NEW_FOLDER);
3434 leency 1217
			break;
1218
		case 7:
5555 punk_joker 1219
			/*strcpy(#temp, #path);
3848 punk_joker 1220
			strcat(#temp, T_NEW_FILE);
3434 leency 1221
			WriteFile(0, 0, #temp);
1222
			if (!EAX){
3848 punk_joker 1223
				SelectFile(T_NEW_FILE);
3444 leency 1224
				FnProcess(2);
3434 leency 1225
			}
1226
			else
1227
			{
1228
				Write_Error(EAX);
3997 leency 1229
				ShowMessage(NOT_CREATE_FILE, 150);
5555 punk_joker 1230
			}*/
5571 punk_joker 1231
			NewElement_Form(1, T_NEW_FILE);
3434 leency 1232
			break;
5447 punk_joker 1233
		case 8:
1234
			SwitchToAnotherThread();
5463 leency 1235
			CreateThread(#properties_dialog, #properties_stak+4092);
5447 punk_joker 1236
			break;
3434 leency 1237
		case 10: //F10
5416 punk_joker 1238
			if (!active_settings)
1239
			{
1240
				SwitchToAnotherThread();
5463 leency 1241
				settings_window=CreateThread(#settings_dialog, #settings_stak+4092);
5416 punk_joker 1242
				break;
1243
			}
1244
			else
1245
			{
1246
				ActivateWindow(GetProcessSlot(settings_window));
1247
			}
3434 leency 1248
			break;
1249
	}
1250
}
1251
 
5435 leency 1252
//need to remove these functiones, they are a very old shit :)
1253
dword onTop(dword down,up) {EAX=Form.height-GetSkinHeight()-down-up;}
3434 leency 1254
 
5435 leency 1255
 
3363 leency 1256
stop:
1257
 
4057 leency 1258
char menu_stak[4096];
3846 punk_joker 1259
char copy_stak[4096];
4057 leency 1260
char open_with_stak[4096];
5463 leency 1261
char about_stak[4096];
1262
char properties_stak[4096];
1263
char settings_stak[4096];