Add a new Menu component into IMG, use it in Eolite and Appearance

git-svn-id: svn://kolibrios.org@7778 a494cfbc-eb01-0410-851d-a64ba20cac60

data/Tupfile.lua

@@ -608,6 +608,7 @@ tup.append_table(img_files, {
  {"TXTREAD", PROGS .. "/cmm/txtread/txtread.com"},
  {"TMPDISK", PROGS .. "/cmm/tmpdisk/tmpdisk.com"},
  {"DEVELOP/CLIPVIEW", PROGS .. "/cmm/clipview/clipview.com"},
+ {"DEVELOP/MENU", PROGS .. "/cmm/menu/menu.com"},
  {"File Managers/EOLITE", PROGS .. "/cmm/eolite/Eolite.com"},
  {"KF_VIEW", PROGS .. "/cmm/kf_font_viewer/font_viewer.com"},
  {"GAMES/CLICKS", PROGS .. "/games/clicks/trunk/clicks.com"},

programs/cmm/appearance/appearance.c

@@ -32,7 +32,7 @@
 	?define T_SKINS       "‘â¨«ì ®ª®­"
 	?define T_WALLPAPERS  "Ž¡®¨"
 	?define T_SELECT_FOLDER "‚ë¡à âì ¯ ¯ªã"
-	?define MENU_LIST "Žâªàëâì ä ©«   Enter\n“¤ «¨âì ä ©«     Del"
+	?define MENU_LIST "Žâªàëâì ä ©«   |Enter\n“¤ «¨âì ä ©«     |Del"
 	?define T_PICTURE_MODE " <20>®«®¦¥­¨¥ ª à⨭ª¨ "
 	?define T_CHECKBOX_STRETCH "<EFBFBD> áâï­ãâì"
 	?define T_CHECKBOX_TILED "‡ ¬®áâ¨âì"
@@ -42,7 +42,7 @@
 	?define T_SKINS       "Skins"
 	?define T_WALLPAPERS  "Wallpapers"
 	?define T_SELECT_FOLDER "Select folder"
-	?define MENU_LIST "Open file      Enter\nDelete file      Del"
+	?define MENU_LIST "Open file      |Enter\nDelete file      |Del"
 	?define T_PICTURE_MODE " Picture Mode "
 	?define T_CHECKBOX_STRETCH "Stretch"
 	?define T_CHECKBOX_TILED "Tiled"
@@ -121,11 +121,12 @@ void main()
 				edit_box_mouse stdcall (#edit_st);
 			}
 
-	  		if (mouse.pkm)&&(select_list.MouseOver(mouse.x, mouse.y)) {
+	  		if (mouse.key&MOUSE_RIGHT) && (mouse.up) 
+	  		&&(select_list.MouseOver(mouse.x, mouse.y)) {
 	  			select_list.ProcessMouse(mouse.x, mouse.y);
 				SelectList_Draw();
 				EventSetNewCurrent();
-	  			menu.show(Form.left+mouse.x, Form.top+mouse.y+skin_height, 146, MENU_LIST, 10); 
+	  			open_lmenu(Form.left+mouse.x+5, Form.top+mouse.y+skin_height, 1, 0, MENU_LIST);
 	  		}
 	  		break;
 
@@ -174,11 +175,7 @@ void main()
 		 
 		 case evReDraw:		
 			draw_window();
-	 		if (menu.cur_y) {
+	 		EventHandleMenuClick();
-				if (menu.cur_y == 10) EventOpenFile();
-				if (menu.cur_y == 11) EventDeleteFile();
-				menu.cur_y = 0;
-			};
    }
 }
 
@@ -408,4 +405,17 @@ void EventExit()
 	ExitProcess();
 }
 
+void EventHandleMenuClick()
+{
+	switch (get_menu_click()) 
+	{
+		case 1: 
+			EventOpenFile(); 
+			break;
+		case 2: 
+			EventDeleteFile();
+			break;
+	};
+}
+
 stop:

programs/cmm/browser/tabs.h

@@ -111,7 +111,7 @@ void DrawActiveTab()
 	else DrawTabsBar();
 }
 
-void DrawNewTabButton()
+int DrawNewTabButton()
 {
 	dword btn_light = MixColors(system.color.work_button, 0xFFFfff, 220);
 	dword btn_dark = MixColors(system.color.work_button, 0, 180);
@@ -124,6 +124,9 @@ void DrawNewTabButton()
 		PutPixel(xxx+1+TAB_H, TOOLBAR_H, btn_dark);
 		DefineHiddenButton(xxx+1, TOOLBAR_H, TAB_H-1, TAB_H-1, NEW_TAB);
 		WriteText(xxx+7, TOOLBAR_H+2, 0x90, system.color.work_button_text, "+");
+		return xxx + TAB_H + 2;
+	} else {
+		return xxx;
 	}
 }
 
@@ -132,8 +135,7 @@ void DrawTabsBar()
 	dword i;
 	tab_w = GetTabWidth();
 	for (i=0; i<tab.count; i++) DrawTab(i);
-	DrawNewTabButton();
+	i = DrawNewTabButton();
-	i = tab_w * i + TAB_H + 2;
 	DrawBar(i, TOOLBAR_H, Form.cwidth-i, TAB_H-1, MixColors(system.color.work_dark, system.color.work, 128));
 	DrawBar(i, TOOLBAR_H+TAB_H-1, Form.cwidth-i, 1, system.color.work_graph);
 }

programs/cmm/eolite/Eolite.c

@@ -1,4 +1,4 @@
-//Leency, Veliant, Punk_Joker, PavelYakov & KolibriOS Team 2008-2019
+//Leency, Veliant, Punk_Joker, PavelYakov & KolibriOS Team 2008-2020
 //GNU GPL license.
 
 // 70.5 - get volume info and label
@@ -77,7 +77,6 @@ int toolbar_buttons_x[7]={9,46,85,134,167,203};
 bool active_about = false;
 bool active_settings = false;
 bool _not_draw = false;
-bool menu_call_mouse = false;
 bool exif_load = false;
 bool dir_at_fat16 = NULL;
 
@@ -110,7 +109,7 @@ _ini ini;
 
 char scroll_used=false;
 
-dword menu_stak,about_stak,properties_stak,settings_stak,copy_stak,delete_stak;
+dword about_stak,properties_stak,settings_stak,copy_stak,delete_stak;
 
 proc_info Form;
 int sc_slider_h;
@@ -261,13 +260,11 @@ void main()
 						}
 					}
 					//file menu
-					if (mouse.key&MOUSE_RIGHT)
+					if (mouse.key&MOUSE_RIGHT) && (mouse.up)
 					{
-						menu_call_mouse = 1;
 						if (files.ProcessMouse(mouse.x, mouse.y)) List_ReDraw();
 						if (getElementSelectedFlag(files.cur_y) == false) selected_count = 0; //on redraw selection would be flashed, see [L001] 
-						menu_stak = malloc(4096);
+						EventShowListMenu();
-						CreateThread(#FileMenu,menu_stak+4092);
 						break;
 					}
 				}
@@ -502,9 +499,9 @@ void main()
 								DrawFilePanels();
 								break;
 						case SCAN_CODE_MENU:
-								menu_call_mouse=0;
+								mouse.x = files.x+15;
-								menu_stak = malloc(4096);
+								mouse.y = files.cur_y - files.first * files.item_h + files.y + 5;
-								CreateThread(#FileMenu,menu_stak+4092);
+								EventShowListMenu();
 								break;
 						case SCAN_CODE_DEL:
 								Del_Form();
@@ -526,24 +523,11 @@ void main()
 			case evIPC:
 			case evReDraw:
 				draw_window();
-				if (action_buf) 
+				if (CheckActiveProcess(Form.ID)) && (GetMenuClick()) break;
-				{
 				if (action_buf==OPERATION_END)
 				{
 					FnProcess(5);
 					if (copy_stak) SelectFileByName(#copy_to+strrchr(#copy_to,'/'));
-					}
-					if (action_buf==100) Open(0);
-					if (action_buf==201) ShowOpenWithDialog();
-					if (action_buf==202) FnProcess(3); //F3
-					if (action_buf==203) FnProcess(4); //F4
-					if (action_buf==104) Copy(#file_path, NOCUT);
-					if (action_buf==105) Copy(#file_path, CUT);
-					if (action_buf==106) Paste();
-					if (action_buf==207) FnProcess(2);
-					if (action_buf==108) Del_Form();
-					if (action_buf==109) FnProcess(5);
-					if (action_buf==110) FnProcess(8);
 					action_buf=0;
 				}
 			break;
@@ -554,8 +538,7 @@ void main()
 		
 		if(cmd_free)
 		{
-			if(cmd_free==1)      menu_stak=free(menu_stak);
+			if(cmd_free==2) about_stak=free(about_stak);
-			else if(cmd_free==2) about_stak=free(about_stak);
 			else if(cmd_free==3) properties_stak=free(properties_stak);
 			else if(cmd_free==4) settings_stak=free(settings_stak);
 			else if(cmd_free==5) copy_stak=free(copy_stak);

programs/cmm/eolite/include/menu.h

@@ -1,133 +1,128 @@
-//pay attension: >200 this is only file actions, not supported by folders
 #ifdef LANG_RUS
-char *file_captions[] = {
+
-	"Žâªàëâì",               "Enter",100,
+char file_actions[]= 
-	"Žâªàëâì á ¯®¬®éìî...",  "CrlEnt",201,
+"Žâªàëâì           |Enter
-	"Š®¯¨à®¢ âì",            "Crl+C",104,
+Žâªàëâì á ¯®¬®éìî  |CrlEnt
-	"‚ë१ âì",              "Crl+X",105,
+Š®¯¨à®¢ âì         |Crl+C
-	"‚áâ ¢¨âì",              "Crl+V",106,
+‚ë१ âì           |Crl+X
-	"<EFBFBD>¥à¥¨¬¥­®¢ âì",         "F2",207,
+‚áâ ¢¨âì           |Crl+V
-	"“¤ «¨âì",               "Del",108,
+<EFBFBD>¥à¥¨¬¥­®¢ âì      |F2
-	"Ž¡­®¢¨âì ¯ ¯ªã",        "F5",109,
+“¤ «¨âì            |Del
-	"‘¢®©á⢠",             "F8",110,
+‘¢®©á⢠           |F8";
-	0, 0, 0};
+char folder_actions[]=
+"Žâªàëâì       |Enter
+Š®¯¨à®¢ âì     |Crl+C
+‚ë१ âì       |Crl+X
+‚áâ ¢¨âì       |Crl+V
+“¤ «¨âì        |Del
+‘¢®©á⢠       |F8";
+char empty_folder_actions[]=
+"‚áâ ¢¨âì      |Crl+V";
+
 #elif LANG_EST
-char *file_captions[] = {
+char file_actions[]= 
-	"Ava",            "Enter",100,
+"Ava           |Enter
-	"Ava ...",        "CrlEnt",201,
+Ava ...        |CrlEnt
-	"Kopeeri",        "Crl+C",104,
+Kopeeri        |Crl+C
-	"Lõika",          "Crl+X",105,
+Lõika          |Crl+X
-	"Aseta",          "Crl+V",106,
+Aseta          |Crl+V
-	"Nimeta ümber",   "F2",207,
+Nimeta ümber   |F2
-	"Kustuta",        "Del",108,
+Kustuta        |Del
-	"Värskenda",      "F5",109,
+Properties     |F8";
-	"Properties",     "F8",110,
+char folder_actions[]=
-	0, 0, 0};
+"Ava           |Enter
+Kopeeri        |Crl+C
+Lõika          |Crl+X
+Aseta          |Crl+V
+Kustuta        |Del
+Properties     |F8";
+char empty_folder_actions[]=
+"Aseta         |Crl+V";
+
 #else
-char *file_captions[] = {
+char file_actions[]= 
-	"Open",          "Enter",100,
+"Open         |Enter 
-	"Open with...",  "CrlEnt",201,
+Open with...  |CrlEnt
-	"Copy",          "Crl+C",104,
+Copy          |Crl+C
-	"Cut",           "Crl+X",105,
+Cut           |Crl+X
-	"Paste",         "Crl+V",106,
+Paste         |Crl+V
-	"Rename",        "F2",207,
+Rename        |F2
-	"Delete",        "Del",108,
+Delete        |Del
-	"Refresh",       "F5",109,
+Properties    |F8";
-	"Properties",    "F8",110,
+char folder_actions[]=
-	0, 0, 0};
+"Open        |Enter 
+Copy         |Crl+C
+Cut          |Crl+X
+Paste        |Crl+V
+Delete       |Del
+Properties   |F8";
+char empty_folder_actions[]=
+"Paste        |Crl+V";
+
 #endif
 
-llist rbmenu;
+//Ž¡­®¢¨âì ¯ ¯ªã      |F5
-int cur_action_buf;
+//Värskenda      |F5
+//Refresh      |F5
 
-void FileMenu()
+enum { MENU_DIR=1, MENU_FILE, MENU_NO_FILE, MENU_BURGER };
+
+bool active_menu = false;
+
+void EventMenuClick(dword _id)
 {
-	proc_info MenuForm;
+	if (active_menu == MENU_NO_FILE) switch(_id) {
-	int index;
+		case 1: Paste(); break;
+	}
+	if (active_menu == MENU_FILE) switch(_id) {
+		case 1: Open(0); break;
+		case 2: ShowOpenWithDialog(); break;
+		case 3: Copy(#file_path, NOCUT); break;
+		case 4: Copy(#file_path, CUT); break;
+		case 5: Paste(); break;
+		case 6: FnProcess(2); break;
+		case 7: Del_Form(); break;
+		case 8: FnProcess(8); break;
+	}
+	if (active_menu == MENU_DIR) switch(_id) {
+		case 1: Open(0); break;
+		case 2: Copy(#file_path, NOCUT); break;
+		case 3: Copy(#file_path, CUT); break;
+		case 4: Paste(); break;
+		case 5: Del_Form(); break;
+		case 6: FnProcess(8); break;
+	}
+	active_menu = NULL;
+}
 
-	rbmenu.ClearList();
+void EventShowListMenu()
-	rbmenu.SetFont(6, 9, 0x80);
-	rbmenu.SetSizes(0,0,10,0,18);
-	for (index=0; file_captions[index]!=0; index+=3)
 {
-		if (selected_count > 0) {
+	dword text;
-			//if there are files selected then show only specific menu items
-			if (file_captions[index+2]>=200) continue;
-			if (file_captions[index+2]==100) continue;
-		}
-		else if (itdir) && (file_captions[index+2]>=200) continue;
-		if (strlen(file_captions[index])>rbmenu.w) rbmenu.w = strlen(file_captions[index]);
-		rbmenu.count++;
-		rbmenu.visible++;
-	}
-	rbmenu.w = rbmenu.w + 3 * rbmenu.font_w + 50;
-	rbmenu.h = rbmenu.count * rbmenu.item_h;
-	SetEventMask(EVM_REDRAW+EVM_KEY+EVM_BUTTON+EVM_MOUSE);
-	goto _MENU_DRAW;
 
-	loop() switch(WaitEvent())
+	pause(3);
+
+	if (!files.count) {
+		text = #empty_folder_actions;
+		active_menu = MENU_NO_FILE;
+	} else if (itdir) {
+		text = #folder_actions;
+		active_menu = MENU_DIR;
+	} else {
+		text = #file_actions;
+		active_menu = MENU_FILE;
+	}
+	open_lmenu(mouse.x+Form.left+5, mouse.y+Form.top+3+skin_height, 1, 0, text);
+}
+
+bool GetMenuClick()
 {
-		case evMouse:
+	dword chick_id;
-				mouse.get();
+	if (active_menu) && (chick_id = get_menu_click()) {
-				if (!CheckActiveProcess(MenuForm.ID)){ cmd_free=1; ExitProcess();}
+		EventMenuClick(chick_id);
-				else if (mouse.move)&&(rbmenu.ProcessMouse(mouse.x, mouse.y)) MenuListRedraw();
+		return false;
-				else if (mouse.key&MOUSE_LEFT)&&(mouse.up) {action_buf = cur_action_buf; cmd_free=1; ExitProcess(); }
-		break;
-				
-		case evKey:
-				GetKeys();
-				if (key_scancode == SCAN_CODE_ESC) {cmd_free=1;ExitProcess();}
-				if (key_scancode == SCAN_CODE_ENTER) {action_buf = cur_action_buf; cmd_free=1; ExitProcess(); }
-				if (rbmenu.ProcessKey(key_scancode)) MenuListRedraw();
-				break;
-				
-		case evReDraw: _MENU_DRAW:
-				if (menu_call_mouse) 
-					DefineAndDrawWindow(mouse.x+Form.left+5, mouse.y+Form.top+skin_height,rbmenu.w+3,rbmenu.h+6,0x01, 0, 0, 0x01fffFFF);
-				else 
-					DefineAndDrawWindow(Form.left+files.x+15, files.item_h*files.cur_y+files.y+Form.top+30,rbmenu.w+3,rbmenu.h+6,0x01, 0, 0, 0x01fffFFF);
-				GetProcessInfo(#MenuForm, SelfInfo);
-				DrawRectangle(0,0,rbmenu.w+1,rbmenu.h+2,col.graph);
-				DrawBar(1,1,rbmenu.w,1,0xFFFfff);
-				DrawPopupShadow(1,1,rbmenu.w,rbmenu.h,0);
-				MenuListRedraw();
 	}
+	return true;
+
+
 }
 
-void MenuListRedraw()
-{
-	int start_y=0;
-	int index;
-
-	dword m_col_bg;
-	dword m_col_text;
-	dword m_col_sh_text;
-
-	for (index=0; file_captions[index*3]!=0; index++)
-	{
-		if (selected_count > 0) {
-			if (file_captions[index*3+2]==100) continue;
-			if (file_captions[index*3+2]>=200) continue;
-		}
-		else if ((itdir) && (file_captions[index*3+2]>=200)) continue;
-		DrawBar(1,start_y+2,1,rbmenu.item_h,0xFFFfff);
-		if (start_y/rbmenu.item_h==rbmenu.cur_y)
-		{
-			cur_action_buf = file_captions[index*3+2];
-			m_col_bg = 0xFFFfff;
-			m_col_sh_text = 0xFAFAFA;
-			m_col_text = 0;
-		}
-		else
-		{
-			m_col_bg = col.work;
-			m_col_text = system.color.work_text;
-			m_col_sh_text = system.color.work_light;
-		}
-		DrawBar(2, start_y+2, rbmenu.w-1, rbmenu.item_h, m_col_bg);
-		WriteText(8, start_y + rbmenu.text_y + 4, rbmenu.font_type, m_col_sh_text, file_captions[index*3]);
-		WriteText(7, start_y + rbmenu.text_y + 3, rbmenu.font_type, m_col_text, file_captions[index*3]);
-		WriteText(-strlen(file_captions[index*3+1])-1*rbmenu.font_w + rbmenu.w, start_y + rbmenu.text_y + 3, rbmenu.font_type, 0x888888, file_captions[index*3+1]);
-		start_y+=rbmenu.item_h;
-	}	
-}

programs/cmm/eolite/include/translations.h

@@ -1,5 +1,5 @@
-#define TITLE "Eolite File Manager 4.21c"
+#define TITLE "Eolite File Manager 4.22"
-#define ABOUT_TITLE "EOLITE 4.21c"
+#define ABOUT_TITLE "EOLITE 4.22"
 
 #ifdef LANG_RUS
 ?define T_FILE "” ©«"

programs/cmm/lib/gui/menu.h

@@ -79,4 +79,27 @@
 	KillProcess(menu_process_id);
 }
 
+
+:dword shared_mem = NULL;
+:char shared_name[] = "LMENU";
+:void open_lmenu(dword _x, _y, _position, _selected, _text)
+{
+	if (!shared_mem) {
+		shared_mem = memopen(#shared_name, 20, SHM_CREATE);
+		if (EDX) shared_mem = memopen(#shared_name, 20, SHM_WRITE);
+	}
+	ESDWORD[shared_mem +  4] = _x;
+	ESDWORD[shared_mem +  8] = _y;
+	ESDWORD[shared_mem + 12] = _position;
+	ESDWORD[shared_mem + 16] = _selected;
+	RunProgram("/sys/develop/menu", _text);
+}
+
+:dword get_menu_click()
+{
+	dword res = ESDWORD[shared_mem];
+	ESDWORD[shared_mem] = 0;
+	return res;
+}
+
 #endif

programs/cmm/menu/menu.c

@@ -1,7 +1,7 @@
 #define MEMSIZE 4096*40
 
-#include "../lib/io.h"
 #include "../lib/gui.h"
+#include "../lib/io.h"
 #include "../lib/collection.h"
 #include "../lib/list_box.h"
 #include "../lib/fs.h"
@@ -11,7 +11,6 @@
 llist menu1;
 collection names;
 collection hotkeys;
-dword shared_mem;
 
 int win_x, win_y;
 
@@ -20,8 +19,7 @@ int max_hotkey_len;
 
 int selected = 0;
 
-char shared_name[] = "LMENU";
+/*
-
 dword cur_param = #param;
 int GetNextParam()
 {
@@ -32,15 +30,16 @@ int GetNextParam()
 	cur_param = next_param+1;
 	return result;	
 }
+*/
 
 void GetWindowPosition()
 {
 	int position, rez;
-	shared_mem = memopen(#shared_name, 4, SHM_WRITE);
+	shared_mem = memopen(#shared_name, 20, SHM_WRITE);
-	win_x = GetNextParam();
+	win_x = ESDWORD[shared_mem +  4];
-	win_y = GetNextParam();
+	win_y = ESDWORD[shared_mem +  8];
-	selected = GetNextParam();
+	position = ESDWORD[shared_mem + 12];
-	position = GetNextParam();
+	selected = ESDWORD[shared_mem + 16];
 	if (position==2) win_x -= menu1.w;
 	if (position==3) {
 		win_x -= menu1.w;
@@ -76,7 +75,12 @@ void main()
 {
 	proc_info Form;
 
-	GetMenuItems(strchr(#param, '\n') + 2);
+	if (!param) 
+		die(
+"'This is a menu component used in Eolite, WebView, etc...
+Please forget it if you are not a developer ;)' -I");
+
+	GetMenuItems(#param);
 	max_name_len = strlen(names.get(0)) * 6;
 	max_hotkey_len = strlen(hotkeys.get(0)) * 6;
 
@@ -170,12 +174,12 @@ void draw_list()
 
 void click()
 {
-	ESBYTE[shared_mem] = byte menu1.cur_y + 1;
+	ESDWORD[shared_mem] = menu1.cur_y + 1;
 	ExitProcess();
 }
 
 void exit()
 {
-	ESBYTE[shared_mem] = 0;
+	ESDWORD[shared_mem] = 0;
 	ExitProcess();
 }