//Leency & Veliant 2008-2013 //GNU GPL licence. //êîïèðîâàòü ÷åðåç ïîòîê //libraries #define MEMSIZE 0xA0000 #include "..\lib\kolibri.h" #include "..\lib\strings.h" #include "..\lib\mem.h" #include "..\lib\dll.h" #include "..\lib\lib.obj\box_lib.h" #include "..\lib\file_system.h" #include "..\lib\figures.h" #include "..\lib\encoding.h" #include "..\lib\list_box.h" #include "..\lib\copyf.h" //images #include "imgs\toolbar.txt" #include "imgs\left_p.txt" #ifndef AUTOBUILD #include "lang.h--" #endif #ifdef LANG_RUS ?define T_FILE "" ?define T_TYPE "" ?define T_SIZE "" ?define T_NEW_FOLDER " " ?define T_NEW_FILE " 䠩" ?define T_DELETE_FILE " ⢨⥫쭮 㤠" ?define T_YES "" ?define T_NO "" ?define T_DEL_ERROR_1 "訡. ." ?define T_DEL_ERROR_2 "訡. ⥬ ⮫쪮 ⥭." ?define NOT_CREATE_FOLDER " 㤠 ᮧ ." ?define NOT_CREATE_FILE " 㤠 ᮧ 䠩." ?define ERROR_1 "訡 㧪 ⥪ /rd/1/lib/box_lib.obj" #else ?define T_FILE "File" ?define T_TYPE "Type" ?define T_SIZE "Size" ?define T_NEW_FOLDER "New folder" ?define T_NEW_FILE "New file" ?define T_DELETE_FILE "Do you really want to delete" ?define T_YES "Yes" ?define T_NO "No" ?define T_DEL_ERROR_1 "Error. Folder isn't empty." ?define T_DEL_ERROR_2 "Error. Filesystem read-only." ?define NOT_CREATE_FOLDER "Folder can not be created." ?define NOT_CREATE_FILE "File can not be created." ?define ERROR_1 "Error while loading library /rd/1/lib/box_lib.obj" #endif enum {ONLY_SHOW, WITH_REDRAW, ONLY_OPEN}; //OpenDir #define TITLE "Eolite File Manager v1.92" #define ABOUT_TITLE "Eolite v1.92" dword col_work = 0xE4DFE1; dword col_border = 0x9098B0; //A0A0B8; //0x819FC5; dword col_padding = 0xC8C9C9; dword col_selec = 0x94AECE; dword col_lpanel = 0x00699C; int toolbar_buttons_x[7]={9,46,85,134,167,203}; char tmp_disk_del_param[3]="d0"; struct path_string { char Item[4096]; }; llist files; byte path[4096], file_path[4096], file_name[256], temp[4096]; byte rename_active=0, del_active=0, show_dev_name=1, sort_num=2, itdir; proc_info Form; mouse m; int mouse_dd, scroll_used, scroll_size; dword buf, off; dword file_mas[6898]; int j, i; edit_box edit2= {250,213,80,0xFFFFCC,0x94AECE,0xFFFFCC,0xffffff,0,248,#file_name,#mouse_dd,64,6,6}; PathShow_data PathShow = {0, 17,250, 6, 250, 0, 0, 0x0, 0xFFFfff, #path, #temp, 0}; PathShow_data FileShow = {0, 56,215, 6, 100, 0, 0, 0x0, 0xFFFfff, #file_name, #temp, 0}; #include "include\copypaste.h" #include "include\some_code.h" #include "include\sorting.h" #include "include\icons_f.h" #include "include\ini.h" #include "include\left_panel.h" #include "include\history.h" #include "include\file_menu.h" #include "include\about_dialog.h" void main() { word key, id, can_show, can_select, m_selected; files.line_h=18; mem_Init(); if (load_dll2(boxlib, #box_lib_init,0)!=0) notify(ERROR_1); SystemDiscsGet(); GetIni(1); if (param) { strcpy(#path, #param); if (path[strlen(#path)-1]!='/') chrcat(#path, '/'); //add "/" to the end of the string } else { strcpy(#path, "/rd/1/"); } Open_Dir(#path,ONLY_OPEN); SetEventMask(0x27); loop() switch(WaitEvent()) { case evMouse: IF (del_active) break; id=GetProcessSlot(Form.ID); IF (id!=GetActiveProcess()) || (Form.status_window>2) break; IF (rename_active) { edit_box_mouse stdcall(#edit2); break; } m.get(); if (m.x > files.x) && (m.x < files.x + files.w) && (m.y > files.y) && (m.y < files.y+files.h) && (!can_select) { m_selected = m.y - 57 / files.line_h; if (m.lkm) can_select = 1; if (m.pkm) { can_show = 1; if (m.y - 57 / files.line_h != files.current) can_select = 1; } } //select/open file { if (!m.lkm) && (!m.pkm) && (can_select) { can_select = 0; if (m.y>=57) { id = m.y - 57 / files.line_h; if (id!=m_selected) { can_show=0; break; } if (files.current!=id) List_Current(id-files.current); else Open(); } }; // } select/open file //file menu { if (!m.pkm) && (!m.lkm) && (can_show) { can_show = 0; if (m.y>=57) { SwitchToAnotherThread(); CreateThread(#FileMenu,#menu_stak); } break; } // } file menu if (m.vert) { files.MouseScroll(m.vert); List_ReDraw(); break; } if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>40) && (m.y<57) { IF (m.lkm==1) DrawRectangle3D(onLeft(26,0),41,14,14,0xC7C7C7,0xFFFFFF); WHILE (m.lkm==1) && (files.first>0) { pause(8); files.first--; List_ReDraw(); m.get(); } DrawRectangle3D(onLeft(26,0),41,14,14,0xFFFFFF,0xC7C7C7); } if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>onTop(22,0)+1) && (m.y=Form.width-26) && (m.x<=Form.width-6) && (m.y>56) && (m.ym.y) || (m.y<0) || (m.y>4000) m.y=scroll_size/2+57; //anee eo?ni? iaa ieiii id=files.first; j= scroll_size/2; files.first = m.y -j -57 * files.count; files.first /= onTop(22,57); IF (files.visible+files.first>files.count) files.first=files.count-files.visible; IF (id!=files.first) List_ReDraw(); } break; //Button pressed----------------------------------------------------------------------------- case evButton: id=GetButtonID(); if (id==1) ExitProcess(); if (rename_active) break; if (del_active) { IF (id==301) || (id==302) Del_File(302-id); break; } switch(id) { case 21: //Back GoBack(); break; case 22: //Forward if (HistoryPath(GO_FORWARD)) { files.first=files.current=NULL; //aaa?o nienea Open_Dir(#path,WITH_REDRAW); } break; case 23: //up! Dir_Up(); break; case 24: //cut Copy(#file_path, CUT); break; case 25: //copy Copy(#file_path, NOCUT); break; case 26: //paste CreateThread(#Paste,#copy_stak); break; case 31...33: //sort IF(sort_num==1) DrawFilledBar(onLeft(192,168)/2+210,42,6,10); IF(sort_num==2) DrawFilledBar(onLeft(115,0),42,6,10); IF(sort_num==3) DrawFilledBar(onLeft(44,0),42,6,10); sort_num=id-30; Open_Dir(#path,WITH_REDRAW); break; case 50...60: //Actions FnProcess(id-50); break; case 100...120: DEVICE_MARK: DrawRectangle(17,id-100*16+74,159,16, 0); //auaaeaiea strcpy(#path, #disk_list[id-100].Item); files.first=files.current=0; Open_Dir(#path,WITH_REDRAW); pause(5); DrawRectangle(17,id-100*16+74,159,16, 0xFFFFFF); break; case 130...160: tmp_disk_del_param[1]=disk_list[id-130].Item[4]; RunProgram("/sys/tmpdisk", #tmp_disk_del_param); pause(10); SystemDiscsGet(); Open_Dir(#path,WITH_REDRAW); DrawLeftPanel(); break; } break; //Key pressed----------------------------------------------------------------------------- case evKey: key = GetKey(); if (Form.status_window>2) break; IF (del_active) { IF (key==013) Del_File(true); IF (key==027) Del_File(false); break; } IF (edit2.flags!=64) && (key!=13) && (key!=27) { EAX=key<<8; edit_box_key stdcall (#edit2); break; } switch (key) { case 209...217: id=key-110; IF (id-100>=disc_num) break; GOTO DEVICE_MARK; case 008: //GoBack(); Dir_Up(); break; case 004: //Ctrl+D set as bg strcpy(#temp, "\\S__"); strcat(#temp, #file_path); RunProgram("/sys/media/kiv", #temp); break; case 014: //Ctrl+N new window IF (Form.left==98) MoveSize(Form.left-20,Form.top-20,OLD,OLD); RunProgram("/sys/File Managers/Eolite", #path); break; case 024: //Ctrl+X Copy(#file_path, CUT); break; case 003: //Ctrl+C Copy(#file_path, NOCUT); break; case 022: //Ctrl+V CreateThread(#Paste,#copy_stak); break; case 027: //Esc IF (rename_active==1) ReName(false); break; case 013: //Enter IF (rename_active==1) {ReName(true); break;} Open(); break; case 178: //up List_Current(-1); break; case 177: //down List_Current(1); break; case 180: //home files.first=0; files.current=0; List_ReDraw(); break; case 181: //end files.first = files.count - files.visible; files.current = files.visible - 1; List_ReDraw(); break; case 183: //Page Down List_Current(files.visible-1); break; case 184: //Page Up List_Current(-files.visible+1); break; case 182: //del Del_Form(); break; case 050...059: //F1-F10 FnProcess(key-49); break; default: for (i=files.current+files.first+1; i2) return; files.SetSizes(192, 57, onLeft(192,27), onTop(57,6), disc_num*16+195,files.line_h); if (Form.height < files.min_h) MoveSize(OLD,OLD,OLD,files.min_h); if (Form.width<480) MoveSize(OLD,OLD,480,OLD); GetProcessInfo(#Form, SelfInfo); //if win_size changed PutPaletteImage(#toolbar,246,34,0,0,8,#toolbar_pal); DrawBar(127, 8, 1, 25, col_border); for (j=0; j<3; j++) DefineButton(toolbar_buttons_x[j]+2,5+2,31-5,29-5,21+j+BT_HIDE,col_work); for (j=3; j<6; j++) DefineButton(toolbar_buttons_x[j],5,31,29,21+j+BT_HIDE,col_work); DrawBar(246,0,onLeft(246,60),12, col_work); //upper editbox DrawBar(246,29,onLeft(246,60),5,col_work); //under editbox DrawRectangle(246,12,onLeft(66,246),16,col_border); DefineButton(onLeft(34,0),6,27,28,51+BT_HIDE+BT_NOFRAME,0); //about PutPaletteImage(#goto_about,56,34,Form.width-65,0,8,#goto_about_pal); //main rectangles DrawRectangle(1,40,Form.cwidth-3,onTop(46,0),col_border); DrawRectangle(0,39,Form.cwidth-1,onTop(44,0),col_palette[4]); //bg for (i=0; i<5; i++) DrawBar(0, 34+i, Form.cwidth, 1, col_palette[8-i]); DrawLeftPanel(); //ListBox DrawFlatButton(files.x,40,onLeft(files.x,168),16,31,col_work,T_FILE); DrawFlatButton(onLeft(168,0),40,73,16,32,col_work,T_TYPE); DrawFlatButton(onLeft(95,0),40,68,16,33,col_work,T_SIZE); DrawBar(onLeft(27,0),57,1,onTop(22,57),col_border); //line to the left from the scroll DrawFlatButton(onLeft(27,0),40,16,16,0,col_work,"\x18"); DrawFlatButton(onLeft(27,0),onTop(22,0),16,16,0,col_work,"\x19"); Open_Dir(#path,ONLY_SHOW); if (del_active) Del_Form(); if (rename_active) FnProcess(2); } void KEdit() { if (Form.width<480) return; PathShow.area_size_x = Form.cwidth-306; DrawBar(PathShow.start_x-3, PathShow.start_y-4, PathShow.area_size_x+2, 15, 0xFFFfff); PathShow_prepare stdcall(#PathShow); PathShow_draw stdcall(#PathShow); } void List_Current(int cur) { if (cur<=0) //up { IF (files.first==0) && (files.current<=0) return; IF (-cur-1cur) { Line_ReDraw(0xFFFFFF, files.current); files.current+=cur; Line_ReDraw(col_selec, files.current); return; } else { IF(files.first+files.current+cur>=files.count) { files.first=files.count-files.visible; files.current=cur-files.first+files.current; } ELSE { files.first+=cur+files.current-files.visible+1; files.current=files.visible-1; } IF (files.current<0) || (files.current>files.visible) { files.current=files.visible-1; } List_ReDraw(); } } } void List_ReDraw() { int paint_y; //åñëè ìû â êîíöå ñïèñêà ôàéëîâ ðàçâåðí¸ì îêíî ïîÿâÿòüñÿ ïóñòÿå áåëûå êíîïêè //ýòî åñëè âûäåëåíèå ïîñëå ñõëîïûâàíèÿ îêíà çà êàäðîì if (files.count-files.firstfiles.visible-1) { files.first=files.count-files.visible; files.current=files.visible-1; } for (j=0; j18) DrawBar(files.x+3,y+18,16,files.line_h-18,color); if (files.line_h>15) DrawBar(files.x+3,y,16,files.line_h-15,color); off=file_mas[filenum+files.first]*304 + buf+72; attr = ESDWORD[off - 40]; if (! TestBit(attr, 4) ) //file or folder? { Put_icon(off+_strrchr(off,'.'), files.line_h/2-7+y, color); WriteText(7-strlen(ConvertMemSize(ESDWORD[off-8]))*6+onLeft(75,0),files.line_h-6/2+y,0x80,0,ConvertMemSize(ESDWORD[off-8])); //size } else if (!strcmp("..",off)) Put_icon("..", files.line_h/2-7+y, color); else Put_icon("", files.line_h/2-7+y, color); if ( TestBit(attr, 1) ) || ( TestBit(attr, 2) ) text_col=0xA6A6B7; //system or hiden? if (color!=0xFFFfff) { itdir = TestBit(attr, 4); strcpy(#file_name, off); strcpy(#file_path, #path); strcat(#file_path, #file_name); if (text_col==0xA6A6B7) text_col=0xFFFFFF; } if (Form.width>=480) { FileShow.start_x = files.x + 23; FileShow.font_color = text_col; FileShow.area_size_x = Form.width - 380; FileShow.text_pointer = off; FileShow.start_y = files.line_h/2-3+y; PathShow_prepare stdcall(#FileShow); PathShow_draw stdcall(#FileShow); } DrawBar(Form.cwidth-159,y,1,files.line_h,col_work); //gray line 1 DrawBar(Form.cwidth-86,y,1,files.line_h,col_work); //gray line 2 } void Open_Dir(dword dir_path, redraw){ int errornum, maxcount; if (redraw!=ONLY_SHOW) { if (ESBYTE[dir_path+1]!='\0') ESBYTE[dir_path+strlen(dir_path)-1] = '\0'; if (buf) free(buf); errornum = GetDir(#buf, #files.count, dir_path, DIRS_NOROOT); if (ESBYTE[dir_path+1]!='\0') chrcat(dir_path, '/'); if (errornum) { HistoryPath(ADD_NEW_PATH); GoBack(); Write_Error(errornum); return; } maxcount = sizeof(file_mas)/sizeof(dword)-1; if (files.count>maxcount) files.count = maxcount; } if (files.count!=-1) { KEdit(); HistoryPath(ADD_NEW_PATH); files.visible = files.h / files.line_h; IF (files.count < files.visible) files.visible = files.count; IF (sort_num==1) WriteText(Form.width+60/2,45,0x80,col_border,"\x19"); IF (sort_num==2) WriteText(Form.width-115,45,0x80,col_border,"\x19"); IF (sort_num==3) WriteText(Form.width-44,45,0x80,col_border,"\x19"); IF (redraw!=ONLY_SHOW) Sorting(); IF (redraw!=ONLY_OPEN) List_ReDraw(); } IF (files.count==-1) && (redraw!=ONLY_OPEN) {files.visible=files.count=0; List_ReDraw();} } inline Sorting() { dword k=0, l=1; int i; if (!strcmp(#path,"/")) //do not sort { FOR(k=1;k=0; j--, off-=304;) //files | folders { strttl(off+40); if (TestBit(ESDWORD[off],4)) //directory? { file_mas[k]=j; k++; } else { file_mas[files.count-l]=j; l++; } } //sorting: files first, then folders Sort_by_Name(0,k-1); IF (sort_num==1) Sort_by_Name(k,files.count-1); IF (sort_num==2) Sort_by_Type(k,files.count-1); IF (sort_num==3) Sort_by_Size(k,files.count-1); //".." should be first 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]>=0; i--;) if (!strcmp(file_mas[i]*304+buf+72,that_file)) break; List_Current(i); List_ReDraw(); } void Dir_Up() { char cur_folder[4096]; i=strlen(#path)-1; if (i==0) return; path[i]=0x00; i = strrchr(#path, '/'); strcpy(#cur_folder, #path+i); path[i]=0x00; SelectFile(#cur_folder); } void Open() { if (!files.count) return; if (!itdir) { GetIni(0); } else { if (!strcmp(#file_name,"..")) { Dir_Up(); return; } strcpy(#path, #file_path); if (path[strlen(#path)-1]!='/') chrcat(#path, '/'); //need "/" in the end files.first=files.current=0; Open_Dir(#path,WITH_REDRAW); } } inline fastcall void GoBack() { char cur_folder[4096]; strcpy(#cur_folder, GetCurrentFolder()); if (HistoryPath(GO_BACK)) SelectFile(#cur_folder); } void FnProcess(char N) { switch(N) { case 1: SwitchToAnotherThread(); CreateThread(#about_dialog,#about_stak); break; case 2: if (!files.count) break; edit2.flags = 100000000000010b; //set active edit2.left = files.x + 21; edit2.width = files.w - 26; edit2.top=files.current*files.line_h+59; edit2.size=edit2.pos=strlen(#file_name); edit_box_draw stdcall (#edit2); DrawBar(edit2.left,files.current*files.line_h+58,edit2.width+1,1,0xFFFFCC); //bg rename_active=1; break; case 3: IF (!itdir) RunProgram("/sys/tinypad", #file_path); break; case 4: IF (!itdir) RunProgram("/sys/develop/heed", #file_path); break; case 5: //refresh cur dir & devs Tip(56, "Devices", 55, "-"); Open_Dir(#path,WITH_REDRAW); pause(10); GetIni(1); SystemDiscsGet(); Open_Dir(#path,WITH_REDRAW); DrawLeftPanel(); break; case 6: strcpy(#temp, #path); strcat(#temp, T_NEW_FOLDER); CreateDir(#temp); if (!EAX){ SelectFile(T_NEW_FOLDER); FnProcess(2); } else { Write_Error(EAX); ShowMessage(NOT_CREATE_FOLDER); } break; case 7: strcpy(#temp, #path); strcat(#temp, T_NEW_FILE); WriteFile(0, 0, #temp); if (!EAX){ SelectFile(T_NEW_FILE); FnProcess(2); } else { Write_Error(EAX); ShowMessage(NOT_CREATE_FILE); } break; case 10: //F10 RunProgram(EDITOR_PATH, abspath("Eolite.ini")); break; } } stop: char about_stak[512]; char menu_stak[512]; char copy_stak[4096];