From d2c39d61ce2d9c909baa03813a2c846b7fb966dd Mon Sep 17 00:00:00 2001
From: lsv <ls7777@yandex.ru>
Date: Wed, 12 Aug 2026 09:30:00 +0500
Subject: [PATCH] Add plugin far2l(use NetRocks connect).
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Добавлена поддержка far2l как плагина для подключения к серверу используя хост соединения БД.
Условия использования.
1. В плагине NetRocks создать каталог с именем группы серверов (Обычно Servers)
2. Cоздать в этом каталоге образец соединения, с произвольным хостом.(это шаблон для всех соединений)
3. В файле plugins.ini прописать следующие строки:
;
;
; far2l (Unix): far2l open with connect
;
Title=far2l
Command=far2l "net::<$$FAR2LCONNECT>"
appliesto=far2l
Description=far2l open use connect info.
KeyFile=
Platform=unix
ServerType=postgresql
Database=No
SetPassword=No

При выборе плагина "far2l" в NetRocks будет прописано соединение к серверу и запущена Command
с этим соединением.
---
 frm/plugins.cpp | 89 +++++++++++++++++++++++++++++++++++++++++++++++--
 1 file changed, 87 insertions(+), 2 deletions(-)

diff --git a/frm/plugins.cpp b/frm/plugins.cpp
index 8708759..135c93e 100644
--- a/frm/plugins.cpp
+++ b/frm/plugins.cpp
@@ -305,6 +305,68 @@ wxWindow *pluginUtilityFactory::StartDialog(frmMain *form, pgObject *obj)
 			execCmd.Replace(wxT("$$HOSTNAME"), srv->GetName());
 			execCmd.Replace(wxT("$$USERNAME"), srv->GetUsername());
 			execCmd.Replace(wxT("$$PORT"), NumToStr((long)srv->GetPort()));
+			if (!obj->IsCollection() && applies_to.Index("far2l") != wxNOT_FOUND ) {
+						wxString path = wxFileName::GetHomeDir() + sepPath + ".config" + sepPath + "far2l"+ sepPath + "plugins"+ sepPath + "NetRocks";
+						if (wxDirExists(path)) {
+							if (winMain) {
+								wxMenu *m=winMain->GetPluginsMenu();
+								ctlTree *tree=winMain->GetBrowser();
+								wxString name=tree->GetItemText(obj->GetId()).BeforeFirst('(').Trim();;
+								//winMain->GetCurrentNodePath
+								wxString nameparent=tree->GetItemText(tree->GetItemParent(obj->GetId())).BeforeFirst('(').Trim();;
+
+								path=path+sepPath+nameparent+".sites"+sepPath+"sites.cfg";
+								if (wxFileExists(path)) {
+										wxString fcont = FileRead(path);
+										wxStringTokenizer tkz(fcont, wxT("\n"));
+										wxString hostname=srv->GetName();
+										wxString rez="";
+										wxString nw="";
+										bool istitle=false;
+										// Loop round the lines in the file. Everytime we find a new 'Title' value
+										// we create the current plugin and start a new one
+										while (tkz.HasMoreTokens())
+										{
+											wxString token = tkz.GetNextToken();
+											wxString ntoken=token;
+											
+											if (token.Length()>0 && token[0]=='[') {
+												if (istitle) {
+													ntoken="";
+													token="";
+												} else 
+													ntoken='['+name+']';
+												istitle=true;
+											} else 
+												if (token.Lower().StartsWith("host="))
+												{
+													ntoken="Host="+hostname;
+												}
+											rez.Append(token);
+											rez.Append('\n');
+											nw.Append(ntoken);
+											nw.Append('\n');
+											if (token.Length()==0) break;
+										}
+										wxFontEncoding encoding = wxFONTENCODING_SYSTEM;
+										wxUtfFile file;
+										rez+=nw;
+										//file.Open(path, wxFile::write, wxS_DEFAULT, encoding);
+										file.Create(path,true);
+										if (file.IsOpened())
+										{
+											file.Write(wxTextBuffer::Translate(rez));
+											file.Close();
+										}
+										wxString a=nameparent+sepPath+name;
+										execCmd.Replace(wxT("$$FAR2LCONNECT"), a);
+
+								}
+							}
+							
+						}
+			}
+
 		} else
 			execCmd.Replace(wxT("$$HOSTNAME"), wxEmptyString);
 
@@ -409,8 +471,31 @@ bool pluginUtilityFactory::CheckEnable(pgObject *obj)
 	if (obj && applies_to.Count() > 0)
 	{
 		if (applies_to.Index(wxString(obj->GetFactory()->GetTypeName()).Lower()) == wxNOT_FOUND)
-			if (applies_to.Index("puttyforward") == wxNOT_FOUND)
-				return false;
+			if (applies_to.Index("puttyforward") == wxNOT_FOUND) {
+				if (applies_to.Index("far2l") == wxNOT_FOUND)
+					return false;
+				else {
+					//far2l
+					if (obj->GetMetaType()==PGM_SERVER && !obj->IsCollection()) {
+						wxString path = wxFileName::GetHomeDir() + sepPath + ".config" + sepPath + "far2l"+ sepPath + "plugins"+ sepPath + "NetRocks";
+						if (wxDirExists(path)) {
+							if (winMain) {
+								ctlTree *tree=winMain->GetBrowser();
+								wxString name=tree->GetItemText(obj->GetId()).BeforeFirst('(').Trim();;
+								//winMain->GetCurrentNodePath
+								wxString nameparent=tree->GetItemText(tree->GetItemParent(obj->GetId())).BeforeFirst('(').Trim();;
+								path=path+sepPath+nameparent+".sites"+sepPath+"sites.cfg";
+								if (wxFileExists(path)) {
+									return true;
+								}
+							}
+							
+						}
+					}
+					return false;
+				}
+				
+			}
 			else {
 				//"puttyforward"
 				int id=GetId();