// $Id$
//-----------------------------------------------------------------------
//       The GSI Online Offline Object Oriented (Go4) Project
//         Experiment Data Processing at EE department, GSI
//-----------------------------------------------------------------------
// Copyright (C) 2000- GSI Helmholtzzentrum fuer Schwerionenforschung GmbH
//                     Planckstr. 1, 64291 Darmstadt, Germany
// Contact:            http://go4.gsi.de
//-----------------------------------------------------------------------
// This software can be used under the license agreements as stated
// in Go4License.txt file which is part of the distribution.
//-----------------------------------------------------------------------

#include "TGo4MainWindow.h"

#include <QtCore/QString>
#include <QtCore/QDateTime>
#include <QtCore/QTimer>
#include <QtCore/QProcess>
#include <QtCore/QHash>
#include <QtCore/QDir>

#include <QApplication>
#include <QMenuBar>
#include <QDockWidget>
#include <QToolBar>
#include <QAction>
#include <QActionGroup>
#include <QStatusBar>
#include <QStyleFactory>
#include <QColor>
#include <QMessageBox>
#include <QColorDialog>
#include <QFileDialog>
#include <QFontDialog>
#include <QInputDialog>
#include <QMdiSubWindow>
#include <QMimeData>
#include <QDesktopServices>
#include <QUrl>

//////// root includes;
#include "TSystem.h"
#include "TROOT.h"
#include "TMath.h"
#include "TStyle.h"
#include "TH1.h"
#include "TClass.h"
#include "TCanvas.h"

/////// Go4 includes, other packages:
#include "TGo4Version.h"
#include "TGo4Log.h"
#include "TGo4LockGuard.h"
#include "TGo4Parameter.h"
#include "TGo4Condition.h"
#include "TGo4MdiArea.h"
#include "TGo4Fitter.h"
#include "TGo4FitPanel.h"
#include "TGo4DynamicEntry.h"
#include "TGo4AnalysisStatus.h"

#include "TGo4ObjectManager.h"
#include "TGo4ObjectProxy.h"
#include "TGo4BrowserProxy.h"
#include "TGo4DabcProxy.h"
#include "TGo4AnalysisProxy.h"
#include "TGo4WidgetProxy.h"

//////// Go4 includes from Go4GUI package:
#include "TGo4QSettings.h"
#include "TGo4TreeViewer.h"
#include "TGo4Browser.h"
#include "TGo4BrowserOptions.h"
#include "TGo4Style.h"
#include "TGo4ViewPanel.h"
#include "TGo4AnalysisConfiguration.h"
#include "TGo4AnalysisWindow.h"
#include "TGo4StartClient.h"
#include "TGo4HisDrawOptions.h"
#include "TGo4HisDrawOptionsShort.h"
#include "TGo4ScaleOptions.h"
#include "TGo4DividePad.h"
#include "TGo4CreateNewHistogram.h"
#include "TGo4CreateNewCondition.h"
#include "TGo4CreateNewDynEntry.h"
#include "TGo4ConditionInfo.h"
#include "TGo4HistogramInfo.h"
#include "TGo4EventInfo.h"
#include "TGo4LoadedLibraries.h"
#include "TGo4EditDynEntry.h"
#include "TGo4ParaEdit.h"
#include "TGo4AnalysisStatusMonitor.h"
#include "TGo4ConditionEditor.h"
#include "TGo4LogSettings.h"
#include "TGo4LogInfo.h"
#include "TGo4OpenRemoteDialog.h"
#include "TGo4ConnectServer.h"
#include "TGo4MBSViewer.h"
#include "TGo4SetScaleValues.h"
#include "TGo4CommandLine.h"
#include "TGo4MarkerSettings.h"
#include "TGo4OptStatsSettings.h"
#include "TGo4HttpProxy.h"

#include "TGo4UserCommands.h"

#include "TGo4Script.h"

#include "TGo4HServerConnection.h"

using namespace Qt;

TGo4MainWindow::TGo4MainWindow(QApplication* app) :
   QMainWindow(),
   fApp(app)
{
   // setDockWindowsMovable(true);
   // statusBar();
   resize( 1152, 864 );

   setWindowIcon(QIcon(":/icons/go4logo2_big.png"));
   // setRightJustification( true );
   // setUsesTextLabel(true);
   // setOpaqueMoving(false);

   fxOM = new TGo4ObjectManager("GUI_OM","Gui object manager");
   fOMDataPath    = "data";
   fOMBrowserPath = "gui";
   fOMEditorsPath = "editors";

   fNewWidgetX = 0;
   fNewWidgetY = 0;

   fKillCommand = "";
   fLastPassword = "";
   fLastFileDir = QDir::currentPath();

   fCloseCounter = 0;
   fConnectingCounter = 0;
   fConnectingHttp = "";

   fbGetAnalysisConfig = true;

   fbPanelTimerActive = false;

   fbFullScreen = false;


    // create mount point for all data sources
   fxOM->MakeFolder(fOMDataPath.toLatin1().constData());

   // create entry for browser
   TGo4BrowserProxy *br = new TGo4BrowserProxy(fOMDataPath.toLatin1().constData(), fOMEditorsPath.toLatin1().constData(), kFALSE);
   fxOM->AddProxy("", br, fOMBrowserPath.toLatin1().constData(), "Place for gui slots");
   br->CreateMemoryFolder();

   auto h1 = new TH1I("histo1","histo title", 100, -10., 10.);
   h1->FillRandom("gaus",10000);
   h1->SetDirectory(nullptr);
   br->SaveToMemory("", h1, kTRUE);

   new TGo4Script(this);

   gStyle->SetPalette(1);
   gStyle->SetCanvasColor(10); // no effect, can be set in settings
   gStyle->SetPadColor(10); // no effect
   gStyle->SetFrameFillColor(10); // works if not 0
   gStyle->SetStatColor(0); // works

   //gStyle->SetOptStat(11111111);
   gStyle->SetOptStat(go4sett->getOptStat());

   fxMdiArea = new TGo4MdiArea(this);
   fxMdiArea->setHorizontalScrollBarPolicy(Qt::ScrollBarAsNeeded);
   fxMdiArea->setVerticalScrollBarPolicy(Qt::ScrollBarAsNeeded);
   setCentralWidget(fxMdiArea);
   fxMdiArea->setFocus();

   menuBar()->setNativeMenuBar(go4sett->getNativeMenuBar());

   AddFileMenu();
   AddFileToolBar();

   AddToolsMenu();
   AddToolsBar();

   AddAnalysisMenu();
   AddAnalysisBar();

   UpdateCaptionButtons();

   QDockWidget* BrowserDockWin = new QDockWidget("Browser", this);
   BrowserDockWin->setObjectName("BrowserDock");
   TGo4Browser* browser = new TGo4Browser(BrowserDockWin,"Browser");
   browser->setWindowFlags(Qt::Widget);
   ConnectGo4Widget(browser);
   browser->StartWorking();
   BrowserDockWin->setFeatures(QDockWidget::DockWidgetMovable | QDockWidget::DockWidgetClosable);
   BrowserDockWin->setWidget(browser);
   BrowserDockWin->setAllowedAreas(Qt::LeftDockWidgetArea | Qt::RightDockWidgetArea);
   addDockWidget(Qt::LeftDockWidgetArea, BrowserDockWin);

   QAction* BrowserDockAction = BrowserDockWin->toggleViewAction();
   BrowserDockAction->setShortcut(QKeySequence("F6"));

   QDockWidget* LogDockWin = new QDockWidget("Log window", this);
   LogDockWin->setObjectName("LogInfoDock");
   TGo4LogInfo* loginfo = new TGo4LogInfo(this, "LogInfo");
   ConnectGo4Widget(loginfo);
   LogDockWin->setFeatures(QDockWidget::DockWidgetMovable | QDockWidget::DockWidgetClosable);
   LogDockWin->setWidget(loginfo);
   LogDockWin->setAllowedAreas(Qt::TopDockWidgetArea | Qt::BottomDockWidgetArea);
   addDockWidget(Qt::BottomDockWidgetArea, LogDockWin);

   QAction* LogDockWinAction=LogDockWin->toggleViewAction();
   LogDockWinAction->setShortcut(QKeySequence("F7"));

   QDockWidget* MBSDockWin = new QDockWidget("MBS monitor", this);
   MBSDockWin->setObjectName("MbsViewerDock");
   TGo4MBSViewer* mbs = new TGo4MBSViewer(MBSDockWin, "MBSViewer");
   mbs->setWindowFlags(Qt::Widget);
   ConnectGo4Widget(mbs);
   MBSDockWin->setFeatures(QDockWidget::DockWidgetMovable | QDockWidget::DockWidgetClosable);
   MBSDockWin->setWidget(mbs);
   MBSDockWin->setAllowedAreas(Qt::TopDockWidgetArea | Qt::BottomDockWidgetArea);
   addDockWidget(Qt::BottomDockWidgetArea, MBSDockWin);

   QAction* MBSDockAction=MBSDockWin->toggleViewAction();
   MBSDockAction->setShortcut(QKeySequence("F8"));

   QToolBar* DividePanelBar = addToolBar("Canvas Tools");
   DividePanelBar->setObjectName("DividePadDock");
   TGo4DividePad* dividepanel = new TGo4DividePad(this, "DividePad");
   DividePanelBar->addWidget(dividepanel);

   QToolBar* stylebar = addToolBar("Color Tools");
   stylebar->setObjectName("Go4StyleDock");
   fxStyle = new TGo4Style(this, "Go4Style");
   stylebar->addWidget(fxStyle);

   QToolBar* BrowserOptionsPanel = addToolBar("Browser Options");
   BrowserOptionsPanel->setObjectName("BrowserOptionsDock");
   TGo4BrowserOptions* bropt = new TGo4BrowserOptions(this, "BrowserOptions");
   ConnectGo4Widget(bropt);
   BrowserOptionsPanel->addWidget(bropt);
   bropt->StartWorking();

   QToolBar* DrawOptionPanel = addToolBar("Draw Options");
   DrawOptionPanel->setObjectName("DrawOptionsDock");
   TGo4HisDrawOptions* drawopt = new TGo4HisDrawOptions(this, "DrawOptions");
   DrawOptionPanel->addWidget(drawopt);
   DrawOptionPanel->adjustSize();

   QToolBar* DrawOptionShortPanel = addToolBar("Hist Draw Options");
   DrawOptionShortPanel->setObjectName("HisDrawOptionsDock");
   TGo4HisDrawOptionsShort* drawopts = new TGo4HisDrawOptionsShort(this, "HisDrawOptions");
   DrawOptionShortPanel->addWidget(drawopts);
   DrawOptionShortPanel->adjustSize();

   QToolBar* ScaleOptionBar = addToolBar("Zoom Tools");
   ScaleOptionBar->setObjectName("ScaleOptionsDock");
   TGo4ScaleOptions* scopt = new TGo4ScaleOptions(this, "ScaleOptions");
   ConnectGo4Widget(scopt);
   ScaleOptionBar->addWidget(scopt);
   ScaleOptionBar->adjustSize();

   QToolBar* commandlinebar = addToolBar("Go4 Command Line");
   commandlinebar->setObjectName("CommandLineDock");
   TGo4CommandLine* cli = new TGo4CommandLine(this, "CommandLine");
   ConnectGo4Widget(cli);
   commandlinebar->addWidget(cli);

   QToolBar* tviewerdock = addToolBar("Tree viewer");
   tviewerdock->setObjectName("TreeViewerDock");
   TGo4TreeViewer* tviewer = new TGo4TreeViewer(this, "TreeViewer");
   ConnectGo4Widget(tviewer);
   tviewerdock->addWidget(tviewer);

   AddAnalysisMacrosBar(); // new 2016


   // test: can we implement shortcuts to enable specific dock windows JAM?
//   QMenu* dockMenu = menuBar()->addMenu("&Docks");
//   dockMenu->addAction(BrowserDockAction);
//   dockMenu->addAction(LogDockWinAction);
//   dockMenu->addAction(MBSDockAction);
// do not need this, since shortcuts also work in default dock menu :)

   // make it here while only here exists all toolbars and dock widgets
   AddSettingMenu();

   windowsMenu = menuBar()->addMenu("&Windows");
   QObject::connect(windowsMenu, &QMenu::aboutToShow, this, &TGo4MainWindow::windowsMenuAboutToShow);
   // need to create menu item with F11
   windowsMenuAboutToShow();

   menuBar()->addSeparator();

   QMenu* helpMenu = menuBar()->addMenu("&Help");
   helpMenu->addAction("&Introduction (user manual)", this, &TGo4MainWindow::IntroHelpSlot)->setShortcut(Qt::Key_F1);
   helpMenu->addAction("&Reference manual", this, &TGo4MainWindow::RefHelpSlot);
   helpMenu->addAction("&Fit Tutorial", this, &TGo4MainWindow::FitHelpSlot);
   helpMenu->addSeparator();
   helpMenu->addAction("About &Qt", this, &TGo4MainWindow::aboutQt)->setShortcut(Qt::Key_F2);
   helpMenu->addAction("About R&OOT", this, &TGo4MainWindow::aboutROOT)->setShortcut(Qt::Key_F3);
   if (TGo4DabcProxy::GetDabcVersion())
      helpMenu->addAction("About &DABC", this, &TGo4MainWindow::aboutDABC);
   helpMenu->addAction("About &Go4", this, &TGo4MainWindow::about)->setShortcut(Qt::Key_F4);

   const char *libs = gSystem->Getenv("GO4USERLIBRARY");

   if (libs) {
#if QT_VERSION < QT_VERSION_CHECK(5,14,0)
      QStringList LibList = QString(libs).split(":", QString::SkipEmptyParts);
#else
      QStringList LibList = QString(libs).split(":", Qt::SkipEmptyParts);
#endif

      for (auto &lib : LibList)
          gSystem->Load(lib.toLatin1().constData());
   }

   go4sett->restoreMainWindowState(this);

   QApplication::setStyle(go4sett->getAppStyle());

   faSuperimpose->setChecked(go4sett->getPadSuperimpose());
   faCrosshair->setChecked(go4sett->getPadCrosshair());
   faEventstatus->setChecked(go4sett->getPadEventStatus());

   go4sett->getBasicSettings();
   go4sett->getAppFont();

   // start mbs monitoring only after browser etc. is fully there:
   if(go4sett->getMbsMonitorMonitorActive()) mbs->TimerStart();

   std::cout <<"Using Qt settings at "<< go4sett->GetSettLoaction().toLatin1().constData() << std::endl;

   statusBar()->showMessage("Ready");
   statusBar()->setSizeGripEnabled(true);

   QString sfmt = go4sett->getGStyleStatFormat();
   if (!sfmt.isEmpty()) gStyle->SetStatFormat(sfmt.toLatin1().constData());
}

TGo4MainWindow::~TGo4MainWindow()
{
   TGo4Script::DeleteInstance();

   delete fxOM;
}

const char *TGo4MainWindow::LastTypedPassword() const
{
   return fLastPassword.toLatin1().constData();
}

void TGo4MainWindow::ShowAboudDialog(const QString &title, const QString &text, const QString &icon)
{
   QMessageBox AboutDialog(QMessageBox::NoIcon, title, text, QMessageBox::Ok, this);
   AboutDialog.setIconPixmap(QPixmap(icon));
   AboutDialog.setTextFormat(Qt::RichText);
   AboutDialog.exec();
}

void TGo4MainWindow::about()
{
   QString GO4STR("Go4  ");
   GO4STR.append ( __GO4RELEASE__);
   QString GO4STR1 = GO4STR;
   GO4STR1.append("<br>");
   GO4STR1.append("The Go4 (GSI Object Oriented On-line Off-line system) is based on ROOT<br> with the specific requirements of the low and medium energy nuclear and atomic<br> physics experiments implemented as extensions.<br> See <a href='http://go4.gsi.de'>http://go4.gsi.de</a> for more information");

   ShowAboudDialog(GO4STR, GO4STR1, ":/icons/go4logo2_big.png");
}

void TGo4MainWindow::aboutQt()
{
   QMessageBox::aboutQt(this, "Qt");
}

void TGo4MainWindow::aboutROOT()
{
   QString mestring("This Go4 uses ROOT ");
   mestring.append(gROOT->GetVersion());
   mestring.append("<br> ROOT is an object-oriented framework <br>for large scale scientific <br>data analysis and data mining.<br> It has been developed at CERN<br> See <a href='http://root.cern.ch'>http://root.cern.ch</a> for more information");
   ShowAboudDialog("ROOT", mestring, ":/icons/root.png");
}

void TGo4MainWindow::aboutDABC()
{
   QString mestring("This Go4 uses DABC ");
   if (TGo4DabcProxy::GetDabcVersion())
      mestring.append(TGo4DabcProxy::GetDabcVersion());
   else
      mestring.append("<undef>");
   mestring.append("<br>DABC (Data Acquisition Backbone Core) is <br> framework to build multi-threaded multi-node DAQ applications.<br> It is developed in GSI.<br> See <a href='http://dabc.gsi.de'>http://dabc.gsi.de</a> for more information");
   ShowAboudDialog("DABC", mestring, ":/icons/dabc.png");
}

void TGo4MainWindow::AddSettingMenu()
{
   QMenu* settMenu = menuBar()->addMenu("&Settings");

   QMenu* sub = createPopupMenu();
   sub->setTitle("Sh&ow/hide");
   settMenu->addMenu(sub);

   settMenu->addAction("&Font...", this, &TGo4MainWindow::ChangeFontSlot);

   QMenu *styleMenu = settMenu->addMenu("St&yle");

   QMenu* prefMenu = settMenu->addMenu("&Gui preferences");

   QObject::connect(QGo4Widget::CreateChkAction(prefMenu, "Fetch when drawing", go4sett->getFetchDataWhenDraw()),
           &QAction::toggled, this, &TGo4MainWindow::ChangeFetchWhenDrawSlot);

   QObject::connect(QGo4Widget::CreateChkAction(prefMenu, "Fetch when copying", go4sett->getFetchDataWhenCopy()),
           &QAction::toggled, this, &TGo4MainWindow::ChangeFetchWhenCopySlot);

   QObject::connect(QGo4Widget::CreateChkAction(prefMenu, "Fetch when saving", go4sett->getFetchDataWhenSave()),
           &QAction::toggled, this, &TGo4MainWindow::ChangeFetchWhenSaveSlot);

   QObject::connect(QGo4Widget::CreateChkAction(prefMenu, "Hide TGo4EventElement", go4sett->getHideTGo4EventElement()),
           &QAction::toggled, this, &TGo4MainWindow::ChangeHideEventElement);

   QObject::connect(QGo4Widget::CreateChkAction(prefMenu, "Draw item once", go4sett->getDrawOnceFlag()),
           &QAction::toggled, this, &TGo4MainWindow::ChangeDrawOnceSlot);

   QObject::connect(QGo4Widget::CreateChkAction(prefMenu, "Rubberband when moving windows", go4sett->getMoveSubwindowRubberBand()),
            &QAction::toggled, this, &TGo4MainWindow::ChangeWindowRubberBandSlot);

   prefMenu->addAction("GUI HighDPI Scale factor...", this, &TGo4MainWindow::ScaleFactorSlot);

   QObject::connect(QGo4Widget::CreateChkAction(prefMenu, "Native menu bar", go4sett->getNativeMenuBar()),
            &QAction::toggled, this, &TGo4MainWindow::ChangeNativeMenuBarSlot);

   QMenu* panelMenu = settMenu->addMenu("&Panel defaults");

   panelMenu->addAction("&Canvas color...", this, &TGo4MainWindow::CanvasColorSlot);

   QObject::connect(QGo4Widget::CreateChkAction(panelMenu, "White canvas for saved images", go4sett->getSavePadWhiteBackground()),
            &QAction::toggled, this, &TGo4MainWindow::ChangeSaveWhiteBackgroundSlot);

   panelMenu->addAction("Marker labels...", this, &TGo4MainWindow::MarkerSettingsSlot);
   panelMenu->addAction("Statistics box...", this, &TGo4MainWindow::OptStatsSlot);

   faSuperimpose = QGo4Widget::CreateChkAction(panelMenu, "&Superimpose mode", go4sett->getPadSuperimpose());
   QObject::connect(faSuperimpose, &QAction::toggled, this, &TGo4MainWindow::SuperimposeSlot);

   faCrosshair = QGo4Widget::CreateChkAction(panelMenu, "Cross(&X)hair mode", go4sett->getPadCrosshair());
   QObject::connect(faCrosshair, &QAction::toggled, this, &TGo4MainWindow::CrosshairSlot);

   faEventstatus = QGo4Widget::CreateChkAction(panelMenu, "Show Event Status", go4sett->getPadEventStatus());
   QObject::connect(faEventstatus, &QAction::toggled, this, &TGo4MainWindow::EventStatusSlot);

   QObject::connect(QGo4Widget::CreateChkAction(panelMenu, "Objects cloning", go4sett->getCloneFlag()),
           &QAction::toggled, this, &TGo4MainWindow::ChangeCloneFlagSlot);

   faDrawTime = QGo4Widget::CreateChkAction(panelMenu, "Draw time", go4sett->getDrawTimeFlag(), go4sett->getCloneFlag());
   QObject::connect(faDrawTime, &QAction::toggled, this, &TGo4MainWindow::ChangeDrawTimeFlagSlot);

   faDrawDate = QGo4Widget::CreateChkAction(panelMenu, "Draw date", go4sett->getDrawDateFlag(), go4sett->getCloneFlag());
   QObject::connect(faDrawDate, &QAction::toggled, this, &TGo4MainWindow::ChangeDrawDateFlagSlot);

   faDrawItem = QGo4Widget::CreateChkAction(panelMenu, "Draw item name", go4sett->getDrawItemFlag(), go4sett->getCloneFlag());
   QObject::connect(faDrawItem, &QAction::toggled, this, &TGo4MainWindow::ChangeDrawItemFlagSlot);

   panelMenu->addAction("Draw line &width ...", this, &TGo4MainWindow::DrawLineWidthSlot);
   panelMenu->addAction("Draw fill color ...", this, &TGo4MainWindow::DrawFillColorSlot);
   panelMenu->addAction("Draw fill style ...", this, &TGo4MainWindow::DrawFillStyleSlot);
   panelMenu->addAction("TH1 draw opt ...", this, &TGo4MainWindow::TH1DrawOptSlot);
   panelMenu->addAction("TH2 draw opt ...", this, &TGo4MainWindow::TH2DrawOptSlot);
   panelMenu->addAction("TH3 draw opt ...", this, &TGo4MainWindow::TH3DrawOptSlot);
   panelMenu->addAction("TGraph draw opt ...", this, &TGo4MainWindow::TGraphDrawOptSlot);
   panelMenu->addAction("Printf format ...", this, &TGo4MainWindow::GStyleStatFormatSlot);
   panelMenu->addAction("Palette settings ...", this, &TGo4MainWindow::PaletteSettingsSlot);


   settMenu->addAction("&Log actions...", this, &TGo4MainWindow::LogSettingsSlot);
   QMenu* termMenu = settMenu->addMenu("&Terminal");
   QObject::connect(QGo4Widget::CreateChkAction(termMenu, "Print timestamps", go4sett->getTermShowTimestamp()), &QAction::toggled, this, &TGo4MainWindow::ChangeTerminalTimeStampSlot);
   termMenu->addAction("&Timestamp Format...", this, &TGo4MainWindow::ChangeTerminalTimeStampFormatSlot);
   termMenu->addAction("&History...", this, &TGo4MainWindow::InputTerminalParametersSlot);
   termMenu->addAction("&Font...", this, &TGo4MainWindow::ChangeTerminalFontSlot);


   settMenu->addAction("Generate &hotstart", this, &TGo4MainWindow::CreateGUIScriptSlot);
   settMenu->addAction("&Break hotstart execution", this, &TGo4MainWindow::StopGUIScriptSlot);


   settMenu->addAction("&Save settings", this, &TGo4MainWindow::SaveSettingsSlot);

   QActionGroup *ag = new QActionGroup(this);
   ag->setExclusive(true);

   QStringList list = QStyleFactory::keys();
   list.sort();
   QHash<QString, int> stylesDict;
   for (auto styleStr : list) {
      QString styleAccel = styleStr;
      if ( stylesDict[styleAccel.left(1)] ) {
         for (int i = 0; i < styleAccel.length(); i++ ) {
            if ( !stylesDict[styleAccel.mid( i, 1 )] ) {
               stylesDict.insert(styleAccel.mid( i, 1 ), 1);
               styleAccel = styleAccel.insert( i, '&' );
               break;
             }
          }
       } else {
          stylesDict.insert(styleAccel.left(1), 1);
          styleAccel = "&"+styleAccel;
       }
       QAction *act = new QAction(styleAccel, this);
       act->setCheckable(true);
       act->setChecked(go4sett->getAppStyle() == styleStr);

       QObject::connect(act, &QAction::triggered, [&, styleStr]() { SetStyleSlot(styleStr); });

       ag->addAction(act);
       styleMenu->addAction(act);
   }
}

#define CtrlKey(key) ((int)Qt::CTRL | key)


void TGo4MainWindow::AddFileMenu()
{
   QMenu* fileMenu = menuBar()->addMenu("&File");

   fileMenu->addAction(QIcon( ":/icons/open.png" ), "&Open...",
             this, &TGo4MainWindow::OpenFileSlot)->setShortcut(CtrlKey(Qt::Key_O));
   fileMenu->addAction(QIcon( ":/icons/network.png" ), "Open &Remote...",
             this, &TGo4MainWindow::OpenRemoteFileSlot)->setShortcut(CtrlKey(Qt::Key_R) );
   if (TGo4DabcProxy::GetDabcVersion())
      fileMenu->addAction(QIcon( ":/icons/dabc.png" ), "Connect &DABC...",
                this, &TGo4MainWindow::ConnectDabcSlot);
   fileMenu->addAction(QIcon( ":/icons/http.png" ), "Connect &HTTP...",
             this, &TGo4MainWindow::ConnectHttpSlot);
   fileMenu->addAction(QIcon( ":/icons/histserv.png" ), "Open HIST &Server...",
             this, &TGo4MainWindow::ConnectHServerSlot);
   fileMenu->addAction(QIcon( ":/icons/hiscre.png" ), "&Import histograms...",
                this, &TGo4MainWindow::ImportObjectSlot);

   fileMenu->addAction(QIcon( ":/icons/filesave.png" ), "Save memor&y...",
             this, &TGo4MainWindow::SaveFileSlot)->setShortcut(CtrlKey(Qt::Key_Y) );
   fileMenu->addAction(QIcon( ":/icons/close.png" ),"Close all files",
             this, &TGo4MainWindow::CloseAllFilesSlot)->setShortcut(CtrlKey(Qt::Key_Q));
   fileMenu->addAction(QIcon( ":/icons/exit.png" ), "E&xit",
             this, &TGo4MainWindow::close)->setShortcut(CtrlKey(Qt::Key_X));
}

void TGo4MainWindow::AddFileToolBar()
{
   QToolBar *FileBar = addToolBar( "File Toolbar" );
   FileBar->setObjectName("FileToolBar");

   FileBar->addAction( QIcon( ":/icons/open.png" ), "Open a local file from disk",
                       this, &TGo4MainWindow::OpenFileSlot);

   FileBar->addAction( QIcon( ":/icons/network.png" ), "Open a remote file from server",
                        this, &TGo4MainWindow::OpenRemoteFileSlot);

   if (TGo4DabcProxy::GetDabcVersion())
      FileBar->addAction( QIcon( ":/icons/dabc.png" ), "Connect to DABC server",
                           this, &TGo4MainWindow::ConnectDabcSlot);

   FileBar->addAction( QIcon( ":/icons/http.png" ), "Connect to HTTP server",
                        this, &TGo4MainWindow::ConnectHttpSlot);

   FileBar->addAction( QIcon( ":/icons/histserv.png" ), "Connect to running histogram server",
                        this, &TGo4MainWindow::ConnectHServerSlot);

   FileBar->addAction( QIcon( ":/icons/filesave.png" ), "Save the content of the browser to a root file",
                       this, &TGo4MainWindow::SaveFileSlot);

   FileBar->addAction( QIcon( ":/icons/close.png" ), "Close all root files in file browser",
                       this, &TGo4MainWindow::CloseAllFilesSlot);

   FileBar->addAction( QIcon( ":/icons/exit.png" ), "Exit the Go4",
                       this, &TGo4MainWindow::close);
}

void TGo4MainWindow::AddToolsMenu()
{
   QMenu* toolMenu = menuBar()->addMenu("&Tools");

   toolMenu->addAction(QIcon(":/icons/chart.png" ), "&View panel",
                [this]() { MakeNewPanel(); })->setShortcut(CtrlKey(Qt::Key_V) );
   toolMenu->addAction(QIcon(":/icons/fitpanel.png" ), "&Fit panel...",
                [this]() { StartFitPanel(); })->setShortcut(CtrlKey(Qt::Key_F) );
   toolMenu->addAction(QIcon(":/icons/hislist.png" ),"&Histogram properties...",
               this, &TGo4MainWindow::StartHistogramInfo);
   toolMenu->addAction(QIcon(":/icons/hiscre.png" ), "Create New H&istogram...",
               [this]() { CreateNewHist(); })->setShortcut(CtrlKey(Qt::Key_I) );
   toolMenu->addAction(QIcon(":/icons/condlist.png" ),"C&ondition properties...",
               this, &TGo4MainWindow::StartConditionInfo);
   toolMenu->addAction(QIcon(":/icons/condcre.png" ),"Create new &condition...",
               [this]() { CreateNewCondition(); });
   toolMenu->addAction(QIcon(":/icons/zoom.png" ),"&Event printout...",
               this, &TGo4MainWindow::StartEventInfo);
   toolMenu->addAction(QIcon(":/icons/dynlist.png" ),"Create &dyn. list entry ...",
               [this]() { CreateNewDynEntry(); })->setShortcut(CtrlKey(Qt::Key_D) );
   toolMenu->addAction(QIcon(":/icons/dllicon.png" ), "Load li&braries ...",
               this, &TGo4MainWindow::LoadLibrarySlot)->setShortcut(CtrlKey(Qt::Key_B) );
   toolMenu->addAction(QIcon(":/icons/user.png" ), "&User GUI ...",
               this, &TGo4MainWindow::UserPanelSlot)->setShortcut(CtrlKey(Qt::Key_U));
}

void TGo4MainWindow::AddToolsBar()
{
   QToolBar *ToolBar = addToolBar("Go4 tools");
   ToolBar->setObjectName("Go4ToolsBar");

   ToolBar->addAction( QIcon( ":/icons/chart.png" ), "Create a new view panel",
                       [this]() { MakeNewPanel(); });

   ToolBar->addAction( QIcon( ":/icons/fitpanel.png" ), "Show/hide the Go4 Fit Panel",
                      [this]() { StartFitPanel(); });

   ToolBar->addAction( QIcon( ":/icons/hislist.png" ), "Show histogram properties window",
                    this, &TGo4MainWindow::StartHistogramInfo);

   ToolBar->addAction( QIcon( ":/icons/hiscre.png" ), "Create new ROOT Histogram",
                    this, &TGo4MainWindow::CreateNewHist);

   ToolBar->addAction( QIcon( ":/icons/condlist.png" ), "Show condition properties window",
                    this, &TGo4MainWindow::StartConditionInfo);

   ToolBar->addAction( QIcon( ":/icons/condcre.png" ), "Create new condition in analysis",
                       [this]() { CreateNewCondition(); });

   ToolBar->addAction( QIcon( ":/icons/zoom.png" ), "Event printout and examination window",
                    this, &TGo4MainWindow::StartEventInfo);

   ToolBar->addAction( QIcon( ":/icons/dynlist.png" ), "Create new Dynamic list entry",
                      [this]() { CreateNewDynEntry(); });

   ToolBar->addAction( QIcon( ":/icons/dllicon.png" ), "Load Libraries",
                    this, &TGo4MainWindow::LoadLibrarySlot);

   ToolBar->addAction( QIcon( ":/icons/user.png" ), "Start user panel",
                    this, &TGo4MainWindow::UserPanelSlot);
}

void TGo4MainWindow::AddAnalysisMenu()
{
   QMenu* anMenu = menuBar()->addMenu("&Analysis");

   faLaunchAnal =
      anMenu->addAction(QIcon(":/icons/launchanal.png"), "Lau&nch analysis...", [this]() { LaunchClient(); });
   faLaunchAnal->setShortcut(CtrlKey(Qt::Key_N));
   faConnectAnal =
      anMenu->addAction(QIcon(":/icons/connect.png"), "&Connect to running server...", [this]() { ConnectServer(); });
   faConnectAnal->setShortcut(CtrlKey(Qt::Key_C));

   faPrepareAnal = anMenu->addAction(QIcon(":/icons/connect.png"), "&Prepare for client connection...",
                                     [this]() { PrepareForClientConnection(); });

   faDisconnectAnal = anMenu->addAction(QIcon(":/icons/disconnect.png"), "Disconnect from analysis",
                                        [this]() { DisconnectAnalysis(); });
   faDisconnectAnal->setShortcut(CtrlKey(Qt::Key_M));

   faShutdownAnal = anMenu->addAction(QIcon(":/icons/shutanal.png"), "Shutdown analysis",
                                     [this]() { ShutdownAnalysis(); });
   faShutdownAnal->setShortcut(CtrlKey(Qt::Key_M));

   faSumbStartAnal =
      anMenu->addAction(QIcon(":/icons/restart.png"), "Submit+S&tart", this, &TGo4MainWindow::SubmitStartAnalysisSlot);
   faSumbStartAnal->setShortcut(CtrlKey(Qt::Key_T));

   faStartAnal = anMenu->addAction(QIcon(":/icons/start.png"), "&Start", this, &TGo4MainWindow::StartAnalysisSlot);
   faStartAnal->setShortcut(CtrlKey(Qt::Key_S));

   faStopAnal = anMenu->addAction(QIcon(":/icons/Stop.png"), "Stop (&Halt)", this, &TGo4MainWindow::StopAnalysisSlot);
   faStopAnal->setShortcut(CtrlKey(Qt::Key_H));

   faAnalConfig = anMenu->addAction(QIcon(":/icons/control.png"), "Confi&guration...", this,
                                    &TGo4MainWindow::ToggleAnalysisConfiguration);
   faAnalConfig->setShortcut(CtrlKey(Qt::Key_G));

   faAnalTermin = anMenu->addAction(QIcon(":/icons/analysiswin.png"), "Analysis &Window", this,
                                    &TGo4MainWindow::ToggleAnalysisWindow);
   faAnalTermin->setShortcut(CtrlKey(Qt::Key_W));
}

void TGo4MainWindow::AddAnalysisBar()
{
   QToolBar *AnalBar = addToolBar("Analysis Toolbar");
   AnalBar->setObjectName("AnalysisToolBar");
   AnalBar->setToolTip("Analysis related tool buttons");

   AnalBar->addAction(faLaunchAnal);
   AnalBar->addAction(faConnectAnal);
   AnalBar->addAction(faDisconnectAnal);
   AnalBar->addAction(faShutdownAnal);

   AnalBar->addAction(faSumbStartAnal);

   AnalBar->addAction(faStartAnal);

   AnalBar->addAction(faStopAnal);
   AnalBar->addAction(faAnalConfig);
   AnalBar->addAction(faAnalTermin);
}

void TGo4MainWindow::windowsMenuAboutToShow()
{
    windowsMenu->clear();

    bool on = ! fxMdiArea->subWindowList().isEmpty();

    windowsMenu->addAction("Ca&scade", fxMdiArea, &TGo4MdiArea::cascadeSubWindows)->setEnabled(on);
    windowsMenu->addAction("&Tile", fxMdiArea, &TGo4MdiArea::tileSubWindows)->setEnabled(on);
    windowsMenu->addAction("&Close all", fxMdiArea, &TGo4MdiArea::closeAllSubWindows)->setEnabled(on);
    windowsMenu->addAction("&Minimize all", this, &TGo4MainWindow::MinAllWindows)->setEnabled(on);

    windowsMenu->addAction((fbFullScreen ? "&Normal window" : "&Full screen"), this, &TGo4MainWindow::ToggleFullScreenSlot)->setShortcut(Qt::Key_F11);

    windowsMenu->addSeparator();

    auto loginfo = (TGo4LogInfo *) FindGo4Widget("LogInfo", false);
    if (loginfo) {
       windowsMenu->addAction("Save L&ogwindow", loginfo, &TGo4LogInfo::SaveLogInfo);
       windowsMenu->addAction("Clear &Logwindow", loginfo, &TGo4LogInfo::ClearLogInfo);
    } else {
       windowsMenu->addAction("Save L&ogwindow")->setEnabled(false);
       windowsMenu->addAction("Clear &Logwindow")->setEnabled(false);
    }

    auto anw = FindAnalysisWindow();
    if (anw) {
       windowsMenu->addAction("Save &Analysis window", anw, &TGo4AnalysisWindow::SaveAnalysisOutput);
       windowsMenu->addAction("Clear Analysis &window", anw, &TGo4AnalysisWindow::ClearAnalysisOutput);
    } else {
       windowsMenu->addAction("Save &Analysis window")->setEnabled(false);
       windowsMenu->addAction("Clear Analysis &window")->setEnabled(false);
    }

    windowsMenu->addSeparator();

    QList<QMdiSubWindow *> windows = fxMdiArea->subWindowList();
    for (int i = 0; i < windows.count(); i++) {
       QAction *act = new QAction(windows.at(i)->widget()->windowTitle(), this);
       act->setCheckable(true);
       act->setChecked(fxMdiArea->activeSubWindow() == windows.at(i));

       windowsMenu->addAction(act);

       QObject::connect(act, &QAction::triggered, [this, i]() { WindowActivated(i); });
    }
}

void TGo4MainWindow::MinAllWindows()
{
   QList<QMdiSubWindow *> windows = fxMdiArea->subWindowList();
   for ( int i = 0; i < windows.count(); i++ )
       windows.at(i)->widget()->showMinimized();
}

void TGo4MainWindow::CascadeSubWindows()
{
   QList<QMdiSubWindow *> windows = fxMdiArea->subWindowList();

   int x(15),y(15);

   for ( int i = 0; i < windows.count(); i++ ) {
      windows.at(i)->move(x, y);
      x+=25; y+=25;
   }
}

void TGo4MainWindow::ToggleFullScreenSlot()
{
   if (fbFullScreen) showNormal();
                else showFullScreen();
   fbFullScreen = !fbFullScreen;
}

void TGo4MainWindow::WindowActivated(int id)
{
   QList<QMdiSubWindow *> windows = fxMdiArea->subWindowList();
   if ((id >= 0) && (id < windows.count())) {
      windows.at(id)->widget()->showNormal();
      windows.at(id)->widget()->setFocus();
   }
}

typedef void *(*TStartUserGuiFunc)(QWidget *parent);

bool TGo4MainWindow::startUserGUI(const char *usergui)
{
   QString dirname, libname;

   bool result = false;

   if (usergui && (strlen(usergui) > 0)) {
      QFileInfo info(usergui);
      if (info.exists()) {
         if (info.isFile()) {
            dirname = info.path();
            libname = info.fileName();
         } else if (info.isDir()) {
            dirname = usergui;
         }
      }
      if ((dirname.length()>0) && (dirname[dirname.length()-1]!='/')) dirname+="/";
   }

   bool defaultnames = libname.isEmpty();
   if (defaultnames)
      libname = "libGo4UserGui";

   TStartUserGuiFunc startfunc = nullptr;

   libname = dirname + libname;

   std::cout << "Try usergui: " << libname.toLatin1().constData() << std::endl;

   bool loaded = false;

   if (gSystem->Load(libname.toLatin1().constData()) >= 0) {
      loaded = true;
      startfunc = (TStartUserGuiFunc) gSystem->DynFindSymbol(libname.toLatin1().constData(), "StartUserPanel");
   }

   if (startfunc) {
      QGo4Widget* userpanel = (QGo4Widget*) startfunc(fxMdiArea);
      if (userpanel) {
         userpanel->setObjectName("UserPanel");

         QMdiSubWindow* sub = fxMdiArea->AddGo4SubWindow(userpanel);
         CascadeMdiPosition(sub);
         ConnectGo4Widget(userpanel);
         userpanel->ensurePolished();
         sub->show();
         result = true;
      } else
         StatusMessage("StartUserPanel() function did not create user widget");
   }

   if (result) {
      std::cout << "Start user GUI from ";
      if (dirname.length()>0)
         std::cout << dirname.toLatin1().constData() << std::endl;
      else
         std::cout << "$LD_LIBRARY_PATH=" << gSystem->Getenv("LD_LIBRARY_PATH") << std::endl;
   } else {
      if (loaded) gSystem->Unload(libname.toLatin1().constData());
   }

   return result;
}

void TGo4MainWindow::UserPanelSlot()
{
   QGo4Widget* userpanel = FindGo4Widget("UserPanel", true);
   if (userpanel) return;

   // check GO4USERGUI variable
   if (gSystem->Getenv("GO4USERGUI"))
      if (startUserGUI(gSystem->Getenv("GO4USERGUI"))) return;

   // check from standard LD_LIBRARY_PATHS
   if (startUserGUI(nullptr)) return;

   TString usergui;

   if (go4sett->getWebBasedCanvas())
      usergui = TGo4Log::subGO4SYS("qt4/WebUserGUI");
   else
      usergui = TGo4Log::subGO4SYS("qt4/Go4UserGUI");

   if (startUserGUI(usergui.Data())) return;

   QMessageBox::critical(this,"Starting user GUI", "No suitable libraries found");
}

TGo4ViewPanel *TGo4MainWindow::MakeNewPanel(int ndiv)
{
   QString name;

   TGo4Slot *edslot = fxOM->GetSlot(fOMEditorsPath.toLatin1().constData());

   int n = 0;
   do {
      n++;
      name = QString("Panel") + QString::number(n);
   } while (edslot && edslot->FindChild(name.toLatin1().constData()));

   TGo4ViewPanel *panel = new TGo4ViewPanel(fxMdiArea, name.toLatin1().constData());
   QMdiSubWindow* sub = fxMdiArea->AddGo4SubWindow(panel); // warning: Qt may exchange the winId here!
   // panel->GetQCanvas()->performResize(); // may register new winId for TCanvas here


   sub->resize(go4sett->lastPanelSize("ViewPanel"));

   CascadeMdiPosition(sub);

   ConnectGo4Widget(panel);
   panel->update();
   panel->show();
   panel->ensurePolished();
   panel->CompleteInitialization();

   if(ndiv>1) {

      int DivX = 1, DivY = 1;

      TGo4DividePad* divpad = findChild<TGo4DividePad*>("DividePad");

      if (divpad) {
         DivX = divpad->SpinBoxX->value();
         DivY = divpad->SpinBoxY->value();
      }
      if (DivX * DivY < ndiv) {
         DivX = (int) TMath::Sqrt(ndiv*1.);
         DivY = DivX;
         while (DivX*DivY<ndiv) DivY++;
      }
      panel->Divide(DivX, DivY);
   }

   return panel;
}

void TGo4MainWindow::CascadeMdiPosition(QWidget *sub)
{
   //if ((sub->x() + sub->width() < fxMdiArea->viewport()->width()) &&
       //(sub->y() + sub->height() < fxMdiArea->viewport()->height())) return;

   int newx = fNewWidgetX;
   int newy = fNewWidgetY;
   if (newx + sub->width() > fxMdiArea->width()) newx = 0;
   if (newy + sub->height() > fxMdiArea->height())  newy = 0;
   sub->move(newx, newy);
   fNewWidgetX = sub->x() + 30;
   fNewWidgetY = sub->y() + 30;
}


void TGo4MainWindow::closeEvent(QCloseEvent *ce)
{
   if (fCloseCounter != 0) return;

   if(QMessageBox::question( this, "Go4 GUI", "Really Exit Go4?",
         QMessageBox::Yes | QMessageBox::No,  QMessageBox::Yes) != QMessageBox::Yes) {
            ce->ignore();
            return;
      }

   TGo4FitPanel* panel = (TGo4FitPanel*) FindGo4Widget("FitPanel", false);
   if (panel) panel->close();

   //fxMdiArea->closeAllSubWindows();

   Browser()->ToggleMonitoring(0);
   fxMdiArea->closeAllSubWindows();
   CloseAllFilesSlot();

   bool realshutdown = false;

   // TODO: terminate HTTP server running in Qt window
   TGo4AnalysisWindow* an = FindAnalysisWindow();
   if (an && an->TerminateOnClose()) realshutdown = true;

   StopGUIScriptSlot();
   int waitsecs = 180;
   if(!RemoveAnalysisProxy(waitsecs, realshutdown)) {
      fCloseCounter = (waitsecs+10) *10; // was 100 gui waits about 10 second to close analysis
      statusBar()->showMessage("Exit....  please wait");
      QApplication::setOverrideCursor(Qt::WaitCursor);
      QTimer::singleShot(100, this, &TGo4MainWindow::ForseCloseSlot);
      ce->ignore();
   } else {
      statusBar()->showMessage("Closing GUI...");
      // JAM: due to problems with Qt5, we just use delayed exit here
      // note that calling directly gSystem->Exit gives crash in ROOT object/pad cleanup...
      // probably because fxMdiArea->closeAllSubWindows() will have effect only after this event handler returns
      QTimer::singleShot(100, this, &TGo4MainWindow::ForseCloseSlot);
      ce->ignore();
   }
}

void TGo4MainWindow::ForseCloseSlot()
{
   //   if (!RemoveAnalysisProxy(30) && (fCloseCounter>0)) {

   if (Browser()->FindServer()) {

      if (fCloseCounter>0) {
         fCloseCounter--;
         QTimer::singleShot(100, this, &TGo4MainWindow::ForseCloseSlot);
         return;
      }

      QMessageBox box(QMessageBox::Critical, "Exit GUI", "Analysis is not (yet) shutdown correctly");
      auto wait_btn = box.addButton("Wait 10 s more", QMessageBox::AcceptRole);
      auto kill_btn = box.addButton("Kill analysis", QMessageBox::DestructiveRole);
      auto exit_btn = box.addButton("Exit immediately", QMessageBox::DestructiveRole);
      auto cancel_btn = box.addButton("Cancel quit", QMessageBox::RejectRole);
      box.setDefaultButton(wait_btn);

      box.exec();

      if (box.clickedButton() == wait_btn) {
         fCloseCounter = 100;
         QTimer::singleShot(100, this, &TGo4MainWindow::ForseCloseSlot);
         return;
      }

      if ((box.clickedButton() == cancel_btn) || !box.clickedButton()) {
         std::cout << "Keep GUI running, press exit once again" << std::endl;
         return;
      }

      if (box.clickedButton() == kill_btn) {
         std::cout << "Killing analysis" << std::endl;
         TerminateAnalysis(false);
      }

      if (box.clickedButton() == exit_btn) {
         std::cout << "GUI closed with analysis still running - may lead to analysis task running forever" << std::endl;
         std::cout << "Please check running processes with \"ps\" and probably, kill analysis with \"killall go4analysis\" command" << std::endl;
      }
   }
   std::cout << "----- Exiting Go4 GUI now -----" << std::endl;
   gSystem->Exit(0);
}

void TGo4MainWindow::OpenFileSlot()
{
   QFileDialog fd( this,
                   "Select a ROOT file to open it in the Go4 Disk Browser",
                   fLastFileDir,
                   QString("Root files (*.root);;Root xml files (*.xml);;All files (*.*)"));

   fd.setFileMode( QFileDialog::ExistingFiles);

   if (fd.exec() != QDialog::Accepted) return;

   QStringList list = fd.selectedFiles();
   for (auto &fileName : list) {
      fLastFileDir = QFileInfo(fileName).absolutePath();
      Browser()->OpenFile(fileName.toLatin1().constData());
   }
}


void TGo4MainWindow::ImportObjectSlot()
{
   QFileDialog fd(this,
                  "Select a file for importing histogram objects",
                  fLastFileDir,
                  QString("ASCII/Go4 (*.hdat);;Ortec MCA (*.Spe);;All files (*.*)"));

   fd.setFileMode(QFileDialog::ExistingFiles);
   if (fd.exec() != QDialog::Accepted)
      return;

   QStringList list = fd.selectedFiles();
   for(auto &fileName : list) {
      fLastFileDir = QFileInfo(fileName).absolutePath();
      Browser()->ImportObjectFromFile(fileName.toLatin1().constData(),
                                      QFileInfo(fileName).absolutePath().toLatin1().constData(),
                                      fd.selectedNameFilter().toLatin1().constData());
   }
}


void TGo4MainWindow::OpenRemoteFileSlot()
{
   TGo4OpenRemoteDialog fd(this);
   if (fd.exec() != QDialog::Accepted)
      return;

   QString ftype = fd.GetFileType();
   QString host = fd.GetServer();

   QString urlpath;
   if(ftype.contains("root:"))
      urlpath = "root://" + host + "/";
   else
   if (ftype.contains("rfio:")) {
      if(!host.isEmpty())
        urlpath="rfio:" + host + ":/";
      else
        urlpath="rfio:/";
   } else
   if (ftype.contains("http:")) {
      if(!host.isEmpty())
         urlpath="http://" + host + "/";
      else
         urlpath="http://";
   }

   QString fileName = fd.GetFileName();

   if(!fileName.isEmpty() && !fileName.contains(".root"))
      fileName.append(".root");

   fileName = urlpath + fileName;

   fxOM->AddFile(fOMDataPath.toLatin1().constData(), fileName.toLatin1().constData());
}

void TGo4MainWindow::ConnectDabcSlot()
{
   bool ok = false;
   QString dabcnode = QInputDialog::getText(
      this, "Establish connection with DABC", "Provide dabc server name",
      QLineEdit::Normal, QString(), &ok);
   if (!ok) return;

   if (!Browser()->ConnectDabc(dabcnode.toLatin1().constData()))
      QMessageBox::warning(this, "DABC server", "Cannot connect to DABC server");
}

void TGo4MainWindow::ConnectHttpSlot()
{
   ConnectHttpServer();
}

TGo4ServerProxy *TGo4MainWindow::ConnectHttpServer(const char *addr, const char *user, const char *pass, bool with_qt_process, bool get_analysis_config)
{
   QString httpaddr;

   if (!addr) {
      bool ok = false;
      QString portstring;
      QString fulladdress = go4sett->getClientNode().append(QString(":")).append(portstring.setNum(go4sett->getClientPort()));
      httpaddr = QInputDialog::getText(
      this, "Establish connection with HTTP", "Provide http server name",
      QLineEdit::Normal, fulladdress, &ok);
      if (!ok) return nullptr;
      QStringList nameportlist = httpaddr.split(":");
      int nameindex = 0;
      int portindex = 1;
      if(nameportlist.at(0).contains("http")) {
          nameindex = 1;
          portindex = 2;
        }
      // first check here if we have valid port number:
      if(nameportlist.size()<portindex+1 || nameportlist.at(portindex).isEmpty()){
          QMessageBox::warning(this, "HTTP server connection", "Could not connect. Please specify port number!");
          return nullptr;
      }
      QString host = nameportlist.at(nameindex);
      QStringList hostnamelist = nameportlist.at(nameindex).split("//");
      if(hostnamelist.size()>1) host = hostnamelist.at(1); // get rid of optional leading // of full http address
      go4sett->setClientNode(host);
      go4sett->setClientPort(nameportlist.at(portindex).toInt());
      go4sett->setClientConnectMode(1);

   } else {
      httpaddr = addr;
   }

   TGo4Script* exec = TGo4Script::ScriptInstance();

   if (!exec) return nullptr;

   TGo4ServerProxy *serv = exec->ConnectHttp(httpaddr.toLatin1().constData(), user, pass);

   if (serv) StatusMessage(QString("Connect with http server %1 %2").arg(httpaddr).arg(serv->IsGo4Analysis() ? " as GO4 analysis" : ""));

   if (serv && serv->IsGo4Analysis()) {
      EstablishRatemeter(2);
      if (!serv->IsViewer())
          EstablishAnalysisConfiguration(get_analysis_config ? 3 : 2);

      TGo4LogInfo* loginfo = (TGo4LogInfo*) FindGo4Widget("LogInfo", false);
      if (loginfo) loginfo->WorkWithInfo(serv->LoginfoSlot());

      if (!with_qt_process) EstablishAnalysisWindowForHttp();
   }

   return serv;
}

void TGo4MainWindow::ConnectHServerSlot()
{
   TGo4HServerConnection dlg( this, "Connect to remote HServer", true );

   dlg.ServerName->setText(go4sett->getHServName());
   dlg.BaseName->setText(go4sett->getHServBase());
   dlg.FilterList->setText(go4sett->getHServFilter());
   dlg.PortNumberSpin->setValue(go4sett->getHServPort());

   if (dlg.exec() != QDialog::Accepted) return;

   go4sett->setHServName(dlg.ServerName->text());
   go4sett->setHServBase(dlg.BaseName->text());
   go4sett->setHServFilter(dlg.FilterList->text());
   go4sett->setHServPort(dlg.PortNumberSpin->value());

   if (!Browser()->ConnectHServer(dlg.ServerName->text().toLatin1().constData(),
                                  dlg.PortNumberSpin->value(),
                                  dlg.BaseName->text().toLatin1().constData(),
                                  dlg.UserPassEdt->text().toLatin1().constData(),
                                  dlg.FilterList->text().toLatin1().constData()))
     QMessageBox::warning(this, "HServer", "Cannot connect to histogram server");
}

void TGo4MainWindow::SaveFileSlot()
{
   QFileDialog fd(this,
        go4sett->getFetchDataWhenSave() ?
        "Select root file to fetch and export all browser objects" :
        "Select root file to export all local browser objects",
        fLastFileDir, "ROOT (*.root)");

   fd.setFileMode( QFileDialog::AnyFile);
   fd.setAcceptMode(QFileDialog::AcceptSave);
   fd.selectFile("export.root");

   if (fd.exec() != QDialog::Accepted) return;

   QStringList flst = fd.selectedFiles();
   if (flst.isEmpty()) return;

   QString fname = flst[0];
   fLastFileDir = fd.directory().path();
   if (fname.indexOf(".root", 0, Qt::CaseInsensitive)<0) fname += ".root";

   if (!Browser()->SaveBrowserToFile(fname.toLatin1().constData(), go4sett->getFetchDataWhenSave()))
      QMessageBox::warning(this, "Save data to file", "Specified file can not be created");
}

void TGo4MainWindow::CloseAllFilesSlot()
{
   fxOM->CloseFiles(fOMDataPath.toLatin1().constData());
}

void TGo4MainWindow::InputTerminalParametersSlot()
{
   int size = go4sett->getTermHistorySize();

   bool ok = false;

   size = QInputDialog::getInt(this,
                               "Analysis terminal history size in bytes (minimum 10000 bytes)",
                                "Input 0 if full analysis history should be preserved",
                                size, 0, 100000000, 10000, &ok);

   if ((size > 0) && (size < 10000)) size = 10000;

   if (ok) {
     go4sett->setTermHistorySize(size);
     TGo4AnalysisWindow* anw = FindAnalysisWindow();
     if (anw)
       anw->SetHistorySize(size);
   }
}

void TGo4MainWindow::LogSettingsSlot()
{
   TGo4LogSettings dlg;
   if (dlg.exec() != QDialog::Accepted) return;

   if(dlg.LogfileWrite->isChecked())
      TGo4Log::OpenLogfile(dlg.LogfileName->text().toLatin1().constData(), "Logfile for Go4 GUI", true);

   TGo4Log::LogfileEnable(dlg.LogfileWrite->isChecked());
   TGo4Log::OutputEnable(dlg.LogfilePrint->isChecked());
   TGo4Log::SetIgnoreLevel(dlg.IgnoreCombo->currentIndex());
   TGo4Log::AutoEnable(dlg.ModeCombo->currentIndex());
}

void TGo4MainWindow::HelpWindow(const char *filename, const char *msg)
{
   QApplication::setOverrideCursor( Qt::WaitCursor );

   QString surl = TGo4Log::subGO4SYS(filename).Data();

   bool result = QDesktopServices::openUrl(QUrl::fromLocalFile(surl));

   if(result)
      StatusMessage(msg ? QString(msg) : QString("Show ") + filename);
   else
      StatusMessage(QString("Fail to display ") + filename);

   QApplication::restoreOverrideCursor();
}

void  TGo4MainWindow::IntroHelpSlot()
{
   HelpWindow("docs/Go4Introduction.pdf", "Show Go4 Introduction manual...");
}

void  TGo4MainWindow::RefHelpSlot()
{
   HelpWindow("docs/Go4Reference.pdf", "Show Go4 Reference manual...");
}

void TGo4MainWindow::FitHelpSlot()
{
   HelpWindow("docs/Go4FitTutorial.pdf", "Show Go4 Fit tutorial...");
}

void TGo4MainWindow::SaveSettingsSlot()
{
   go4sett->setBasicSettings();
   go4sett->setAppFont(QApplication::font());

   go4sett->setAppStyle(QApplication::style()->objectName());

   go4sett->storeMainWindowState(this);

   go4sett->Store();

   std::cout << "Save Qt settings to " << go4sett->GetSettLoaction().toLatin1().constData() << std::endl;
}

void TGo4MainWindow::ChangeFontSlot()
{
   bool ok = false;
   QFont font= QFontDialog::getFont(&ok, QApplication::font(), this);
   if (!ok) return;

   go4sett->setAppFont(font);

   QApplication::setFont(font);
}

void TGo4MainWindow::ChangeTerminalFontSlot()
{
   bool ok = false;
   QFont font= QFontDialog::getFont(&ok, go4sett->getTermFont(), this);
   if (!ok) return;

   go4sett->setTermFont(font);

   TGo4AnalysisWindow* anw = FindAnalysisWindow();
   if (anw) anw->setFont(font);
}


void TGo4MainWindow::ChangeTerminalTimeStampSlot(bool flag)
{
  go4sett->setTermShowTimestamp(flag);
  TGo4AnalysisWindow* anw = FindAnalysisWindow();
  if (anw)
    anw->UpdateTimeStampFormat();
}

void TGo4MainWindow::ChangeTerminalTimeStampFormatSlot()
{
  bool ok = false;
  QString str = QInputDialog::getText(this, "Analysis terminal timestamp format",
      "Time format (empty resets to  yyyy-MM-dd hh:mm:ss.zzz)",
       QLineEdit::Normal, go4sett->getTermTimeFormat(), &ok);
  if (ok) {
     if (str.isEmpty())
        str = "yyyy-MM-dd hh:mm:ss.zzz";
     go4sett->setTermTimeFormat(str);
     TGo4AnalysisWindow *anw = FindAnalysisWindow();
     if (anw)
        anw->UpdateTimeStampFormat();
  }
}

void TGo4MainWindow::SetStyleSlot(const QString &style)
{
   // save settings anyway
   go4sett->setAppStyle(style);
   go4sett->Store();

   QApplication::setStyle(style);
}

void TGo4MainWindow::StatusMessage(const QString& mess)
{
   QString output = QDateTime::currentDateTime().toString(Qt::ISODate);
   output.append(": ");
   output.append(mess);
   statusBar()->showMessage(output, 0); // JAM2016: do not clear message after 3s. ratemeter will clear message on each update.
   if(TGo4Log::IsAutoEnabled())
      TGo4Log::Message(1, "%s", output.toLatin1().constData());
}

void TGo4MainWindow::UpdateCaptionButtons()
{
   // JAM note this function is called by update timer from TGo4Browser each second
   TGo4ServerProxy *root_serv = Browser()->FindServer(nullptr, kFALSE);
   TGo4ServerProxy *go4_serv = Browser()->FindServer();
   TGo4AnalysisProxy *pr = dynamic_cast<TGo4AnalysisProxy *>(go4_serv);
   TGo4HttpProxy *ht = dynamic_cast<TGo4HttpProxy *>(go4_serv);

   QString capt = "Go4 ";
   capt += __GO4RELEASE__;
   capt += " @";
   capt += gSystem->HostName();
   if (go4_serv && go4_serv->IsConnected() ) {
      capt += " <";
      capt += go4_serv->GetContainedObjectInfo();
      capt += ">";
   }
   setWindowTitle(capt);

   bool flag = false;
   if (!pr) flag = !ht ?  true: false;
   faLaunchAnal->setEnabled(flag);
   // JAM here check again ratemeter connection, if http server was disconnected by browser popup close item:
   EstablishRatemeter(flag ? 0: 1);
   // need to check if the controller role has switched to another HTTP server here:
   static TGo4HttpProxy *oldhttp = nullptr;
   if (ht) {
      // check for server names may not be unique if connected twice by chance, better use proxy pointers!
      if(ht != oldhttp) {
        oldhttp = ht;
        EstablishRatemeter(0);
        EstablishRatemeter(2);
      }
    }

    if (!pr)
       flag = !ht ? true : false;
    else
       flag = (fConnectingCounter <= 0) && pr->IsAnalysisServer() && !pr->IsConnected();
    faConnectAnal->setEnabled(flag);

    faPrepareAnal->setEnabled(flag);

    if (!pr)
       flag = !ht ? false : true;
    else
       flag = pr->IsAnalysisServer() && (pr->IsConnected() || (fConnectingCounter <= 0));
    faDisconnectAnal->setEnabled(flag);

    flag = false;
    if (go4_serv)
       flag = !go4_serv->IsAnalysisServer() || (go4_serv->IsConnected() && go4_serv->IsAdministrator());
    faShutdownAnal->setEnabled(flag);

    bool iscontrolling = false, issubmit = false;
    if (go4_serv) {
       iscontrolling = go4_serv->IsConnected() && (go4_serv->IsAdministrator() || go4_serv->IsController());
       if (iscontrolling)
          issubmit = go4_serv->CanSubmitObjects();
   }

   faSumbStartAnal->setEnabled(issubmit);

   faStartAnal->setEnabled(iscontrolling);

   faStopAnal->setEnabled(iscontrolling);

   faAnalConfig->setEnabled(iscontrolling);

   faAnalTermin->setEnabled(FindAnalysisWindow() != nullptr);

   if (!go4_serv && root_serv) {
      faStartAnal->setEnabled(root_serv->FindCommand("Start").Length()>0);
      faStopAnal->setEnabled(root_serv->FindCommand("Stop").Length()>0);
   }
}

void TGo4MainWindow::ChangeFetchWhenDrawSlot(bool flag)
{
   go4sett->setFetchDataWhenDraw(flag);
}

void TGo4MainWindow::ChangeFetchWhenCopySlot(bool flag)
{
   go4sett->setFetchDataWhenCopy(flag);
}

void TGo4MainWindow::ChangeFetchWhenSaveSlot(bool flag)
{
   go4sett->setFetchDataWhenSave(flag);
}

void TGo4MainWindow::ChangeHideEventElement(bool flag)
{
   go4sett->setHideTGo4EventElement(flag);
   UpdateBrowser();
}

void TGo4MainWindow::ChangeDrawOnceSlot(bool flag)
{
   go4sett->setDrawOnceFlag(flag);
}

void TGo4MainWindow::ChangeWindowRubberBandSlot(bool flag)
{
   go4sett->setMoveSubwindowRubberBand(flag);
}

void TGo4MainWindow::ChangeNativeMenuBarSlot(bool flag)
{
   go4sett->setNativeMenuBar(flag);
   menuBar()->setNativeMenuBar(flag);
   TGo4MainWindow::SaveSettingsSlot();
#ifdef Darwin
   QMessageBox::information(this, "Change menu type",
                            "On platforms like MacOS changing of menu type may require restart of application");
#endif
}

void TGo4MainWindow::CanvasColorSlot()
{
   QColor c = QColorDialog::getColor();
   if (c.isValid())
      go4sett->setCanvasColor(c.red(), c.green(), c.blue());
}

void TGo4MainWindow::MarkerSettingsSlot()
{
   TGo4MarkerSettings mset;
   if (mset.exec() != QDialog::Accepted) return;
   // all work is done inside dialog.
}

void TGo4MainWindow::OptStatsSlot()
{
   TGo4OptStatsSettings stset;
   stset.exec();
   // all work is done inside dialog.
}

void TGo4MainWindow::SuperimposeSlot(bool flag)
{
   go4sett->setPadSuperimpose(flag);
}

void TGo4MainWindow::CrosshairSlot(bool flag)
{
   go4sett->setPadCrosshair(flag);
}

void TGo4MainWindow::EventStatusSlot(bool flag)
{
   go4sett->setPadEventStatus(flag);
}

void TGo4MainWindow::ChangeCloneFlagSlot(bool flag)
{
   faDrawTime->setEnabled(flag);
   faDrawDate->setEnabled(flag);
   faDrawItem->setEnabled(flag);
   go4sett->setCloneFlag(flag);
}

void TGo4MainWindow::ChangeDrawTimeFlagSlot(bool flag)
{
   go4sett->setDrawTimeFlag(flag);
}

void TGo4MainWindow::ChangeDrawItemFlagSlot(bool flag)
{
   go4sett->setDrawItemFlag(flag);
}

void TGo4MainWindow::ChangeDrawDateFlagSlot(bool flag)
{
   go4sett->setDrawDateFlag(flag);
}

void TGo4MainWindow::ChangeSaveWhiteBackgroundSlot(bool flag)
{
  go4sett->setSavePadWhiteBackground(flag);
}

void TGo4MainWindow::DrawLineWidthSlot()
{
   int w = go4sett->getDrawLineWidth();

   bool ok = false;

   w = QInputDialog::getInt(this,
                            "Default line width for object drawing",
                            "Input 1 to preserve default value",
                             w, 1, 10, 1, &ok);

   if (ok) go4sett->setDrawLineWidth(w);
}


void TGo4MainWindow::DrawFillColorSlot()
{
   int w = go4sett->getDrawFillColor();

   bool ok = false;

   w = QInputDialog::getInt(this,
                            "Default fill color for 1D objects (histogram and graph) drawing",
                            "Input 0 for no fill",
                             w, 0, 50, 1, &ok);

   if (ok) go4sett->setDrawFillColor(w);
}

void TGo4MainWindow::DrawFillStyleSlot()
{
   int w = go4sett->getDrawFillStyle();

   bool ok = false;

   w = QInputDialog::getInt(this,
                            "Default fill style for 1D objects (histogram and graph) drawing",
                            "Input 1001 for solid fill",
                             w, 0, 4000, 1, &ok);

   if (ok) go4sett->setDrawFillStyle(w);
}


void TGo4MainWindow::TH1DrawOptSlot()
{
   bool ok = false;
   QString str = QInputDialog::getText(this,
                     "Default draw options for TH1 class",
                     "Input draw options",
                     QLineEdit::Normal, go4sett->getTH1DrawOpt(), &ok);
   if (ok) go4sett->setTH1DrawOpt(str);
}

void TGo4MainWindow::TH2DrawOptSlot()
{
   bool ok = false;
   QString str = QInputDialog::getText(this,
                     "Default draw options for TH2 class",
                     "Input draw options",
                     QLineEdit::Normal, go4sett->getTH2DrawOpt(), &ok);
   if (ok) go4sett->setTH2DrawOpt(str);
}

void TGo4MainWindow::TH3DrawOptSlot()
{
   bool ok = false;
   QString str = QInputDialog::getText(this,
                     "Default draw options for TH3 class",
                     "Input draw options",
                     QLineEdit::Normal, go4sett->getTH3DrawOpt(), &ok);
   if (ok) go4sett->setTH3DrawOpt(str);
}

void TGo4MainWindow::TGraphDrawOptSlot()
{
   bool ok = false;
   QString str = QInputDialog::getText(this,
                     "Default draw options for TGraph class",
                     "Input draw options",
                     QLineEdit::Normal, go4sett->getTGraphDrawOpt(), &ok);
   if (ok)
      go4sett->setTGraphDrawOpt(str);
}


void TGo4MainWindow::GStyleStatFormatSlot()
{
   bool ok = false;
   QString s0 = go4sett->getGStyleStatFormat();
   if (s0.isEmpty()) s0 = gStyle->GetStatFormat();

   QString str = QInputDialog::getText(this,
                     "Printf argument for float values - gStyle->GetStatFormat()",
                     "Input format string like 6.4g (empty - ROOT default)",
                     QLineEdit::Normal, s0, &ok);
   if (ok) {
      go4sett->setGStyleStatFormat(str);
      if (str.isEmpty())
         gStyle->SetStatFormat();
      else
         gStyle->SetStatFormat(str.toLatin1().constData());
   }
}


void TGo4MainWindow::PaletteSettingsSlot()
{
  // JAM: later we might put some elaborate input dialog here. for the moment keep on with parsing a string-
  bool ok = false;
  int min = 0, def = 0, max = 0;
  go4sett->getPaletteOpt(min, def, max);
  QString palvals = QString("%1:%2:%3").arg(min).arg(def).arg(max);
  QString str = QInputDialog::getText(this,
                       "Default Palette options",
                       "Input - MinIndex:DefaultIndex:MaxIndex",
                       QLineEdit::Normal, palvals, &ok);
  if (ok) {
       QStringList parts=str.split(":");
       min=parts[0].toInt();
       def=parts[1].toInt();
       max=parts[2].toInt();
//       std::cout <<"PaletteSettingsSlot has "<<min<<":"<<def<<":"<<max  <<std::endl;
       go4sett->setPaletteOpt(min,def,max);
       // activate settings immediately, do not need to restart go4
       fxStyle->SetPaletteRange(min,def,max);
     }
}


void TGo4MainWindow::ScaleFactorSlot()
{
   double w = go4sett->getScreenScaleFactor();

   bool ok = false;

   w = QInputDialog::getDouble(this, "HighDPI scaling", "Please set scale factor. Restart GUI to apply!", w, 0, 50, 1,
                               &ok);
   if (ok)
      go4sett->setScreenScaleFactor(w);
}

void TGo4MainWindow::LaunchClient(bool interactive)
{
   TGo4AnalysisProxy *anal = Browser()->FindAnalysis();
   if (anal) {
      QMessageBox::warning(this, "Launch analysis", "Please disconnect analysis first");
      return;
   }

   if (interactive) {
      TGo4StartClient dlg;
      if (dlg.exec()!=QDialog::Accepted) return;
      dlg.getResults();
   }

   int shellmode = go4sett->getClientShellMode();
   int termmode = go4sett->getClientTermMode();
   int isserver = go4sett->getClientIsServer();

   TString launchcmd, killcmd;
   Bool_t res = kFALSE;

   QString workdir = go4sett->getClientDir();

   if (isserver==2) {
      // first handle http connection

      QString addr = QString("%1:%2").arg(go4sett->getClientNode()).arg(go4sett->getClientPort());

      // first verify that http server already running with such address
      // need to request analysis status anyway
      if (ConnectHttpServer(addr.toLatin1().constData(), nullptr, nullptr, false, true)) {
         StatusMessage("Connected to existing analysis webserver!"); // JAM tell user that this is no analysis restart!
         std::cout<< "!!! Connected to existing analysis webserver "<<addr.toLatin1().constData()<< "!!! "<<std::endl; // status message is shadowed by ratemeter ....
         return;
      }

      res = TGo4ServerProxy::GetLaunchString(launchcmd, killcmd,
                           2, shellmode, termmode,
                           go4sett->getClientName().toLatin1().constData(),
                           go4sett->getClientNode().toLatin1().constData(),
                           workdir.toLatin1().constData(),
                           go4sett->getClientExec().toLatin1().constData(),
                           go4sett->getClientPort(),
                           go4sett->getClientExeMode(),
                           go4sett->getClientArgs().toLatin1().constData());

      if (!res) return;

      fKillCommand = killcmd.Data();

      if ((termmode==2) || (termmode==3)) {
          gSystem->Exec(launchcmd.Data());
      } else {
         TGo4AnalysisWindow* anw = EstablishAnalysisWindow(true, true, true);
         anw->StartAnalysisShell(launchcmd.Data(), (shellmode == 0) ? workdir.toLatin1().constData() : nullptr, true);
      }

      fConnectingCounter = 100; // try next 10 seconds connect with the server
      fConnectingHttp = addr;
      fbGetAnalysisConfig = true; // pass to timer that we want to have analysis config window when ready JAM
      QTimer::singleShot(100, this, &TGo4MainWindow::CheckConnectingCounterSlot);

      return;
   }

   if (isserver == 0) {
      TGo4AnalysisProxy *anal = AddAnalysisProxy(false, (termmode==1));
      if (anal)
        res = anal->LaunchAsClient(launchcmd, killcmd,
                      shellmode,
                      termmode,
                      go4sett->getClientName().toLatin1().constData(),
                      go4sett->getClientNode().toLatin1().constData(),
                      workdir.toLatin1().constData(),
                      go4sett->getClientExec().toLatin1().constData(),
                      go4sett->getClientExeMode(),
                      go4sett->getClientArgs().toLatin1().constData());
      TGo4AnalysisWindow* anw = FindAnalysisWindow();
      if (res && anw && (termmode==1)) {
         anw->StartAnalysisShell(launchcmd.Data(), (shellmode == 0) ? workdir.toLatin1().constData() : nullptr, false);
      }
      if (res && anal) anal->SetAnalysisLaunched(termmode==1 ? 2 : 1);
   } else {
      res = TGo4AnalysisProxy::LaunchAsServer(launchcmd, killcmd,
                     shellmode,
                     termmode,
                     go4sett->getClientName().toLatin1().constData(),
                     go4sett->getClientNode().toLatin1().constData(),
                     go4sett->getClientPort(),
                     workdir.toLatin1().constData(),
                     go4sett->getClientExec().toLatin1().constData(),
                     go4sett->getClientExeMode(),
                     go4sett->getClientArgs().toLatin1().constData());
   }

   if (res)
     fKillCommand = killcmd.Data();
   else
     fKillCommand = "";

   StatusMessage("Starting Analysis....  Please wait");

   if ((isserver == 1) && interactive) {
      fbGetAnalysisConfig = true; // pass to timer that we want to have analysis config window when ready JAM
      ConnectServer(true, "");
   }
}

void TGo4MainWindow::PrepareForClientConnection(bool interactive)
{
   TGo4AnalysisProxy *ana = AddAnalysisProxy(false, false);
   if (ana && interactive)
     QMessageBox::information(this, "Prepare for client connection",
        QString("Now you can start client from other shell (node) and connect to port ") + QString::number(ana->ConnectorPort()));
}

TGo4AnalysisWindow* TGo4MainWindow::EstablishAnalysisWindow(bool needoutput, bool withkillbnt, bool force_recreate)
{
   TGo4AnalysisWindow* anw = FindAnalysisWindow();
   if (anw)
      if (force_recreate || (anw->HasOutput() && !needoutput)) {
        delete anw;
        anw = nullptr;
     }

   if (!anw) {
      if (needoutput) {
         anw = new TGo4AnalysisWindow(fxMdiArea, "AnalysisWindow", true);
         QMdiSubWindow* sub = fxMdiArea->AddGo4SubWindow(anw);
         sub->resize(go4sett->lastPanelSize("AnalysisWindow", 700, 500));
         CascadeMdiPosition(sub);
         ConnectGo4Widget(anw);
         anw->ensurePolished();
         sub->show();
     } else {
        QToolBar* dock = addToolBar("Analysis control");
        dock->setObjectName("AnalysisControlBar");
        anw = new TGo4AnalysisWindow(this, "AnalysisWindow", false, withkillbnt || fKillCommand.length()>0);
        ConnectGo4Widget(anw);
        dock->addWidget(anw);
     }
   }

   return anw;
}

void TGo4MainWindow::EstablishAnalysisWindowForHttp()
{
   // used together with http server connection
   // analysis window only created when not exists and http proxy is available

   auto serv = Browser()->FindServer();
   if (!serv || (dynamic_cast<TGo4AnalysisProxy *>(serv) != nullptr) || (serv->DebugOutputSlot() == nullptr)) return;

   auto anw = FindAnalysisWindow();

   if (anw) {
      if (anw->HasLink()) return;
      delete anw;
      anw = nullptr;
   }

   anw = EstablishAnalysisWindow(true, false);
   if (anw) anw->WorkWithDebugOutput(serv->DebugOutputSlot());
   serv->ResetDebugOutputRequests();
}


TGo4AnalysisProxy *TGo4MainWindow::AddAnalysisProxy(bool isserver, bool needoutput)
{
   const char *analisysitem = "Analysis";

   TGo4Slot *analslot = Browser()->DataSlot(analisysitem);

   if (!analslot) {
      TGo4AnalysisProxy *anal = new TGo4AnalysisProxy(isserver);
      fxOM->AddProxy(fOMDataPath.toLatin1().constData(), anal, analisysitem, "Analysis proxy");
      analslot = Browser()->DataSlot(analisysitem);
      anal->SetDefaultReceiver(fxOM, TString("gui/") + analisysitem + "/");
   }

   TGo4AnalysisProxy *anal = !analslot ? nullptr :
      dynamic_cast<TGo4AnalysisProxy *> (analslot->GetProxy());

   if (!anal) return nullptr;

   anal->SetAnalysisReady(kFALSE);

   TGo4LogInfo *loginfo = (TGo4LogInfo *) FindGo4Widget("LogInfo", false);
   if (loginfo)
     loginfo->WorkWithInfo(anal->LoginfoSlot());

   if (anal->IsAnalysisServer())
      EstablishRatemeter(anal->IsConnected() ? 2 : 0);
   else
      EstablishRatemeter(1);

   EstablishAnalysisConfiguration(2);

   FindAnalysisConfiguration();

   auto anw = FindAnalysisWindow();
   if (anw)
    if (anw->HasOutput() && !needoutput) {
       delete anw;
       anw = nullptr;
    }

   if(!anw) {
     if (needoutput) {
        anw = EstablishAnalysisWindow(true);
        if (anw) anw->WorkWithUpdateObjectCmd(anal->UpdateObjectSlot());
     } else {
        UpdateDockAnalysisWindow();
     }
   }

   return anal;
}

bool TGo4MainWindow::RemoveAnalysisProxy(int waittime, bool servershutdown)
{
   // Browser()->ToggleMonitoring(0);
   EstablishAnalysisConfiguration(0);
   EstablishRatemeter(0);

   // TGo4AnalysisProxy *anal = Browser()->FindAnalysis();
   TGo4ServerProxy *srv = Browser()->FindServer();
   if (srv) {
      srv->DisconnectAnalysis(waittime, servershutdown);
   }
   // TGo4Slot *slot = Browser()->FindServerSlot(kTRUE, 1);
   // it is allowed to delete slot directly
   //if (slot) delete slot;

   return !Browser()->FindServer();
}

void TGo4MainWindow::UpdateDockAnalysisWindow()
{
   TGo4AnalysisWindow* anw = FindAnalysisWindow();
   TGo4AnalysisProxy *anal = Browser()->FindAnalysis();

   if (anw && anw->HasOutput()) return;

   bool shouldexists = false;
   if (anal) {
     if (anal->IsAnalysisServer()) {
       if (anal->IsConnected() && (anal->IsController() || anal->IsAdministrator()))
         shouldexists = true;
     } else {
       shouldexists = true;
     }
   }

   if (shouldexists && !anw) {
      anw = EstablishAnalysisWindow(false, !anal->IsAnalysisServer());
      if (anw) anw->WorkWithUpdateObjectCmd(anal->UpdateObjectSlot());
   }
}

TGo4AnalysisStatusMonitor* TGo4MainWindow::EstablishRatemeter(int level)
{
   // level = 0 - delete
   // level = 1 - as is
   // level = 2 - create
   TGo4AnalysisStatusMonitor* status =
     dynamic_cast<TGo4AnalysisStatusMonitor*>
       (FindGo4Widget("AnalysisStatusMonitor", false));

   if (level == 2) {
     if (!status) {
        status = new TGo4AnalysisStatusMonitor(statusBar(), "AnalysisStatusMonitor");
        ConnectGo4Widget(status);
        statusBar()->addWidget(status);
        TGo4ServerProxy *serv = Browser()->FindServer();
        if (serv)
          status->WorkWithRatemeter(serv->RatemeterSlot());
     }
   } else if (level == 0) {
      if (status) {
         status->RemoveLink("Ratemeter",true); // JAM: need to remove the update link before deleting!
         statusBar()->removeWidget(status);
         delete status;
      }
      status = nullptr;
   }

   if (status)
      status->show();

   return status;
}

TGo4AnalysisConfiguration* TGo4MainWindow::EstablishAnalysisConfiguration(int level)
{
   // level: 0 - delete, 1 - keep as is, 2 - create, 3 - create + request status

   TGo4AnalysisConfiguration* conf = FindAnalysisConfiguration();

   if (level == 0) {
      if (conf) {
         delete conf->parentWidget();
         conf = nullptr;
      }
   } else if (level >= 2) {
      if (!conf) {
         conf = new TGo4AnalysisConfiguration(fxMdiArea, "AnalysisConfiguration");
         QMdiSubWindow* sub = fxMdiArea->AddGo4SubWindow(conf);
         CascadeMdiPosition(sub);
         ConnectGo4Widget(conf);
         // ! do not show configuration window before analysis settings requested
         // conf->ensurePolished();
         // sub->show();
      }
      TGo4ServerProxy *anal = Browser()->FindServer();
      if (anal) {
         conf->WorkWithAnalysis(anal);
         if (level > 2) anal->RequestAnalysisSettings();
      }
   }

   return conf;
}


void TGo4MainWindow::ConnectServer(bool interactive, const char *password)
{
   if (fConnectingCounter > 0) return;
   TGo4AnalysisProxy *anal = Browser()->FindAnalysis();
   if (anal) {
      if (anal->IsConnected() || !anal->IsAnalysisServer()) {
         if (interactive)
           QMessageBox::warning(this, "Connect client", "Analysis task is already connected");
         return;
      }
   }

   QString pass = password;
   if (interactive) {
      TGo4ConnectServer dlg;
      if (fLastPassword.length() > 0)
         dlg.setPassword(fLastPassword.toLatin1().constData());
      if (dlg.exec()!=QDialog::Accepted) return;
      pass = dlg.getInput();
   }
   // here check if we want web server or regular connection:

   if(go4sett->getClientConnectMode() == 0) {
     if (!anal) anal = AddAnalysisProxy(true, false);
     bool def = go4sett->getClientDefaultPass();
     if (!def) fLastPassword = pass;

     if (anal)
       anal->ConnectToServer(go4sett->getClientNode().toLatin1().constData(),
                             go4sett->getClientPort(),
                             go4sett->getClientControllerMode(),
                             def ? nullptr : pass.toLatin1().constData());
     StatusMessage("Connecting running analysis....  Please wait");

     // wait about 4 sec that analysis is connected
     fConnectingCounter = 41;
     UpdateCaptionButtons();
     CheckConnectingCounterSlot();
   } else {
     QString fulladdress = go4sett->getClientNode();
     if ((go4sett->getClientPort() > 0) && (go4sett->getClientPort() != 80)) {
        QString portstring;
        portstring.setNum(go4sett->getClientPort());
        fulladdress.append(":");
        fulladdress.append(portstring);
     }
     QString msg("Connecting analysis http server at ");
     msg.append(fulladdress).append(QString(", Please wait"));
     StatusMessage(msg);
     ConnectHttpServer(fulladdress.toLatin1().constData(),
                       go4sett->getClientAccountName().toLatin1().constData(),
                       pass.toLatin1().constData(), false, false);
     UpdateCaptionButtons();
   }
}

void TGo4MainWindow::CheckConnectingCounterSlot()
{
   if (fConnectingHttp.length() > 0) {
      TGo4ServerProxy *serv =
          ConnectHttpServer(fConnectingHttp.toLatin1().constData(), nullptr, nullptr, go4sett->getClientTermMode() == 1, fbGetAnalysisConfig);
      if (serv) {
         serv->SetAnalysisLaunched(go4sett->getClientTermMode()==1 ? 2 : 1);
         fConnectingHttp = "";
         fConnectingCounter = 0;
         fbGetAnalysisConfig=false;
         return;
      }
      if (--fConnectingCounter <= 0) {
         StatusMessage(fConnectingHttp + " refused connection. Try again");
         fConnectingHttp = "";
         fConnectingCounter = 0;
         fbGetAnalysisConfig=false;
         return;
      }
   } else {
      TGo4AnalysisProxy *anal = Browser()->FindAnalysis();
      if (!anal || anal->IsConnected() || (--fConnectingCounter <= 0)) {
         if (fConnectingCounter <= 0)
            StatusMessage("Analysis refused connection. Try again");
         fConnectingCounter = 0;
         EstablishRatemeter(anal && anal->IsConnected() ? 2 : 0);
         int level = 0;
         if (anal && anal->IsConnected() && (anal->IsController() || anal->IsAdministrator())) {
            if (fbGetAnalysisConfig) {
               level = 3;
               fbGetAnalysisConfig = false;
            } else {
               level = 2;
            }
         }
         EstablishAnalysisConfiguration(level);
         UpdateDockAnalysisWindow();
         UpdateCaptionButtons();
         if (anal && !anal->IsConnected()) RemoveAnalysisProxy(1);
         return;
      }
   }
   QTimer::singleShot(100, this, &TGo4MainWindow::CheckConnectingCounterSlot);
}

void TGo4MainWindow::DisconnectAnalysis(bool interactive)
{
   TGo4ServerProxy *serv = Browser()->FindServer();
   if (!serv) return;

   bool shutdown = serv->IsAnalysisLaunched() > 1;

   if (interactive) {

      if (shutdown) {

         QMessageBox msgBox(QMessageBox::Warning,
                     "Disconnect from analysis",
                     "Analysis runs inside go4 widget.\n"
                     "If one only disconnects from the analysis,\n"
                     "it remains invisible and difficult to stop.\n"
                     "To shutdown it later, one need to reconnect with go4 gui again.\n"
                     "It is recommended to shutdown analysis now");

         auto btnShutdown = msgBox.addButton("Shutdown", QMessageBox::DestructiveRole);
         auto btnDisconnect = msgBox.addButton("Disconnect", QMessageBox::ActionRole);
         auto btnCancel = msgBox.addButton("Cancel", QMessageBox::RejectRole);
         msgBox.setDefaultButton(btnShutdown);

         msgBox.exec();
         if (msgBox.clickedButton() == btnCancel)
            return;
         else if (msgBox.clickedButton() == btnShutdown)
            shutdown = true;
         else if (msgBox.clickedButton() == btnDisconnect)
            shutdown = false;
      } else {
         QMessageBox msgBox(QMessageBox::Question, "Disconnect analysis", "Really disconnect from analysis task?");

         auto btnDisconnect = msgBox.addButton("Disconnect", QMessageBox::DestructiveRole);
         auto btnCancel = msgBox.addButton("Cancel", QMessageBox::RejectRole);
         msgBox.setDefaultButton(btnDisconnect);

         msgBox.exec();
         if (msgBox.clickedButton() == btnCancel)
            return;
      }
   }
   RemoveAnalysisProxy(30, shutdown);
   StatusMessage("Disconnect analysis");
}

void TGo4MainWindow::ShutdownAnalysis(bool interactive)
{
   if (interactive) {
      QMessageBox msgBox(QMessageBox::Question, "Shutdown analysis", "Really shutdown analysis task?");

      auto btnShutdown = msgBox.addButton("Shutdown", QMessageBox::DestructiveRole);
      auto btnCancel = msgBox.addButton("Cancel", QMessageBox::RejectRole);
      msgBox.setDefaultButton(btnShutdown);

      msgBox.exec();
      if (msgBox.clickedButton() == btnCancel)
         return;
   }
   TGo4ServerProxy *serv = Browser()->FindServer();
   if (!serv) return;
   bool realshutdown = false;
   TGo4AnalysisProxy *anal = dynamic_cast<TGo4AnalysisProxy *>(serv);
   TGo4HttpProxy *http = dynamic_cast<TGo4HttpProxy *>(serv);
   if (anal)
       realshutdown = anal->IsAnalysisServer() &&
                      anal->IsConnected() &&
                      anal->IsAdministrator();
   else if (http)
      realshutdown = http->IsConnected() && http->IsAdministrator();

   RemoveAnalysisProxy(30, realshutdown);
   StatusMessage("Shutdown analysis");
}

bool TGo4MainWindow::SubmitAnalysisSettings()
{
   TGo4ServerProxy *serv = Browser()->FindServer();
   if (!serv) return false;

   if (serv->IsConnected() && serv->CanSubmitObjects() &&
       (serv->IsAdministrator() || serv->IsController())) {
      serv->SubmitAnalysisSettings();
      serv->RefreshNamesList();
      StatusMessage("Press Ctrl+S or choose Analysis->Start from the Menu to start the analysis");
      return true;
   }

   return false;
}

void TGo4MainWindow::SubmitStartAnalysisSlot()
{
   if (SubmitAnalysisSettings())
      StartAnalysisSlot();
}

void TGo4MainWindow::StartAnalysisSlot()
{
   TGo4ServerProxy *go4_serv = Browser()->FindServer();
   if (go4_serv) {
      go4_serv->StartAnalysis();
      go4_serv->RefreshNamesList();
      go4_serv->DelayedRefreshNamesList(4);
      EstablishRatemeter(2);
   } else {
      TGo4ServerProxy *root_serv = Browser()->FindServer(nullptr, kFALSE);
      if (root_serv) {
         TString cmd = root_serv->FindCommand("Start");
         if (cmd.Length() > 0) {
            root_serv->SubmitCommand(cmd);
            StatusMessage(TString::Format("Submit %s command to the server", cmd.Data()).Data());
         }
      }
   }
}

void TGo4MainWindow::StopAnalysisSlot()
{
   TGo4ServerProxy *go4_serv = Browser()->FindServer();
   if (go4_serv) {
      go4_serv->StopAnalysis();
   } else {
      TGo4ServerProxy *root_serv = Browser()->FindServer(nullptr, kFALSE);
      if (root_serv) {
         TString cmd = root_serv->FindCommand("Stop");
         if (cmd.Length()>0) {
            root_serv->SubmitCommand(cmd);
            StatusMessage(TString::Format("Submit %s command to the server", cmd.Data()).Data());
         }
      }
   }
}

void TGo4MainWindow::TerminateAnalysis(bool interactive)
{
   if (interactive) {
      QMessageBox msgBox(QMessageBox::Question, "Kill analysis process",
                         QString("Kill analysis by shell command: ") +fKillCommand + " ?");

      auto btnKill = msgBox.addButton("Kill", QMessageBox::DestructiveRole);
      auto btnCancel = msgBox.addButton("Cancel", QMessageBox::RejectRole);
      msgBox.setDefaultButton(btnKill);

      msgBox.exec();
      if (msgBox.clickedButton() == btnCancel)
         return;
   }

   TGo4AnalysisWindow* anw = FindAnalysisWindow();
   if (anw) anw->TerminateAnalysisProcess();

   // proxy will be deleted after 7 seconds
   //RemoveAnalysisProxy(7);

   anw = FindAnalysisWindow();
   if (anw)
      anw->AppendOutputBuffer(QString("\nKilling analysis client: \n  ")+fKillCommand, 2);
   else
      StatusMessage(QString("Killing analysis client with: ")+fKillCommand);

   if (fKillCommand.length() > 0) {
      QProcess* killprocess = new QProcess;
      QStringList args;
      QString progname = fKillCommand;
      TGo4AnalysisWindow::ExtractProgArgs(progname, args);
      killprocess->start(progname, args);
      QTimer::singleShot(10000, killprocess, &QProcess::deleteLater);
   } else
      StatusMessage("Can not kill analysis. Do it by OS commands");

   EstablishAnalysisConfiguration(0);

   EstablishRatemeter(0);
}

QGo4Widget* TGo4MainWindow::FindGo4Widget(const char *name, bool activate)
{
   if (!fxOM) return nullptr;

   TGo4Slot *slot = fxOM->GetSlot(fOMEditorsPath.toLatin1().constData());

   TGo4Slot *widgslot = !slot ? nullptr : slot->FindChild(name);
   if (!widgslot) return nullptr;

   TGo4WidgetProxy *wproxy = (TGo4WidgetProxy*) widgslot->GetProxy();

   QGo4Widget *widg = wproxy->GetWidget();
   if (widg && activate) {
      if(!widg->isVisible()){
         widg->raise();
         widg->show();
         widg->setFocus();
      }
   }

   return widg;
}

TGo4FitPanel* TGo4MainWindow::StartFitPanel()
{
   TGo4FitPanel *fitpanel = (TGo4FitPanel*) FindGo4Widget("FitPanel", true);

   if (!fitpanel) {
      fitpanel = new TGo4FitPanel(fxMdiArea,"FitPanel");
      QMdiSubWindow* sub = fxMdiArea->AddGo4SubWindow(fitpanel);
      CascadeMdiPosition(sub);
      ConnectGo4Widget(fitpanel);
      fitpanel->ensurePolished();
      sub->show();
   } else {
      fitpanel->parentWidget()->showNormal();
      fitpanel->setFocus();
   }
   return fitpanel;
}

TGo4HistogramInfo* TGo4MainWindow::StartHistogramInfo()
{
   TGo4HistogramInfo* hinfo = (TGo4HistogramInfo*) FindGo4Widget("HistogramInfo", true);
   if (!hinfo) {
      hinfo = new TGo4HistogramInfo(fxMdiArea, "HistogramInfo");
      QMdiSubWindow* sub = fxMdiArea->AddGo4SubWindow(hinfo);
      CascadeMdiPosition(sub);
      ConnectGo4Widget(hinfo);
      hinfo->ensurePolished();
      hinfo->adjustSize();
      sub->show();
   }
   return hinfo;
}

TGo4ConditionInfo* TGo4MainWindow::StartConditionInfo()
{
   TGo4ConditionInfo* cinfo = (TGo4ConditionInfo*) FindGo4Widget("ConditionInfo", true);
   if (!cinfo) {
      cinfo = new TGo4ConditionInfo(fxMdiArea, "ConditionInfo");
      QMdiSubWindow* sub = fxMdiArea->AddGo4SubWindow(cinfo);
      CascadeMdiPosition(sub);
      ConnectGo4Widget(cinfo);
      cinfo->ensurePolished();
      cinfo->adjustSize();
      sub->show();
   }
   return cinfo;
}

void TGo4MainWindow::LoadLibrarySlot()
{
   TGo4LoadedLibraries llib(this);
   llib.exec();

   UpdateBrowser();
}

void TGo4MainWindow::UpdateBrowser()
{
   TGo4Browser* br = (TGo4Browser*) FindGo4Widget("Browser", false);
   if (br) br->ShootUpdateTimer();
}

TGo4ParaEdit* TGo4MainWindow::StartParaEdit(const char *itemname)
{
   TGo4ParaEdit* pedit = (TGo4ParaEdit*) FindGo4Widget("ParaEdit", true);

   if (itemname) {
      TClass *cl = Browser()->ItemClass(itemname);
      if (cl)
         if (!cl->IsLoaded()) {
            QMessageBox::warning(nullptr, "Parameter editor", QString("Cannot start parameter editor for incomplete class ") + cl->GetName());
            return pedit;
         }
   }

   if (!pedit) {
      pedit = new TGo4ParaEdit(fxMdiArea, "ParaEdit");
      QMdiSubWindow* sub = fxMdiArea->AddGo4SubWindow(pedit);
      ConnectGo4Widget(pedit);
      pedit->ensurePolished();
      sub->show();
      CascadeMdiPosition(sub);
   }

   if (itemname)
      pedit->WorkWithParameter(itemname, false);

   return pedit;
}

TGo4EditDynEntry* TGo4MainWindow::StartEditDynEntry()
{
   TGo4EditDynEntry* dedit = (TGo4EditDynEntry*) FindGo4Widget("EditDynEntry", true);

   if (!dedit) {
      dedit = new TGo4EditDynEntry(fxMdiArea, "EditDynEntry");
      QMdiSubWindow* sub = fxMdiArea->AddGo4SubWindow(dedit);
      CascadeMdiPosition(sub);
      ConnectGo4Widget(dedit);
      dedit->ensurePolished();
      sub->show();
   }

   return dedit;
}

TGo4ConditionEditor* TGo4MainWindow::StartConditionEditor()
{
   TGo4ConditionEditor* wedit = (TGo4ConditionEditor*) FindGo4Widget("ConditionEditor", true);
   if (!wedit) {
      wedit = new TGo4ConditionEditor(fxMdiArea, "ConditionEditor");
      QMdiSubWindow* sub = fxMdiArea->AddGo4SubWindow(wedit);
      CascadeMdiPosition(sub);
      ConnectGo4Widget(wedit);
      wedit->ensurePolished();
      sub->show();
   }
   return wedit;
}

TGo4EventInfo* TGo4MainWindow::StartEventInfo()
{
   TGo4EventInfo* einfo = (TGo4EventInfo*) FindGo4Widget("EventInfo", true);

   if (!einfo) {
      einfo = new TGo4EventInfo(fxMdiArea, "EventInfo");
      QMdiSubWindow* sub = fxMdiArea->AddGo4SubWindow(einfo);
      CascadeMdiPosition(sub);
      ConnectGo4Widget(einfo);
      einfo->ensurePolished();
      sub->show();
   }

   return einfo;
}

TGo4AnalysisConfiguration* TGo4MainWindow::FindAnalysisConfiguration()
{
   return (TGo4AnalysisConfiguration *) FindGo4Widget("AnalysisConfiguration", false);
}

void TGo4MainWindow::ToggleAnalysisConfiguration()
{
  TGo4AnalysisConfiguration* conf = FindAnalysisConfiguration();
  QWidget *mdi = conf ? conf->parentWidget() : nullptr;

  if (!mdi)
    return;

  if (mdi->isVisible()) {
     mdi->hide();
  } else {
     if (conf->GetNumSteps() == 0) {
        // this can happen when gui connected to server without requesting the setup. Do it when user wants to see
        // config:
        TGo4ServerProxy *anal = Browser()->FindServer();
        if (anal)
           anal->RequestAnalysisSettings();
     }
     mdi->raise();
     mdi->show();
     if (mdi->isMinimized())
        mdi->showNormal();
  }
}

TGo4AnalysisWindow* TGo4MainWindow::FindAnalysisWindow()
{
   return (TGo4AnalysisWindow *) FindGo4Widget("AnalysisWindow", false);
}

void TGo4MainWindow::ToggleAnalysisWindow()
{
   TGo4AnalysisWindow* anw = FindAnalysisWindow();
   if (!anw) return;

   if (anw->HasOutput()) {
      QWidget *mdi = anw->parentWidget();

      if (mdi->isVisible()) {
         mdi->hide();
      } else {
         mdi->raise();
         mdi->show();
         if (mdi->isMinimized()) mdi->showNormal();
      }
   } else {
      QToolBar* dock = dynamic_cast<QToolBar*> (anw->parentWidget());
      if (dock->isVisible())
         dock->hide();
      else
         dock->show();
   }
}

void TGo4MainWindow::CloseAnalysisWindow()
{
   TGo4AnalysisWindow* anw = FindAnalysisWindow();

   if (anw) {
     if (anw->HasOutput()) {
        anw->parentWidget()->close();
      } else {
         QToolBar* bar = dynamic_cast<QToolBar*> (anw->parentWidget());
         removeToolBar(bar);
         delete bar;
      }
   }

   // try to reestablish window for other server
   QTimer::singleShot(250, [this]() { EstablishAnalysisWindowForHttp(); });
}


void TGo4MainWindow::ToggleMbsMonitor(const char *nodename)
{
   TGo4MBSViewer *mbs = dynamic_cast<TGo4MBSViewer *>(FindGo4Widget("MBSViewer", false));
   if (!mbs)
      return;
   if (mbs->parentWidget()->isVisible()) {
      mbs->parentWidget()->hide();
   } else {
      mbs->SetNode(nodename);
      mbs->parentWidget()->show();
   }
}

TGo4SetScaleValues* TGo4MainWindow::ToggleScaleValues()
{
   TGo4SetScaleValues* scl = nullptr;

   QList<QMdiSubWindow *> windows = fxMdiArea->subWindowList();
   for (int i = 0; i < windows.count(); ++i) {
      scl = dynamic_cast<TGo4SetScaleValues *>(windows.at(i)->widget());
      if (scl) break;
   }

   if (!scl) {
      scl = new TGo4SetScaleValues(fxMdiArea, "ScaleValues", Qt::WindowStaysOnTopHint);
      QMdiSubWindow* sub = fxMdiArea->AddGo4SubWindow(scl);
      CascadeMdiPosition(sub);
      scl->ensurePolished();
      sub->show();
   } else {
      scl->parentWidget()->close();
      scl = nullptr;
   }
   return scl;
}

void TGo4MainWindow::CreateNewHist(int isremote)
{
   TGo4CreateNewHistogram dlg(this);
   TGo4ServerProxy *an = Browser()->FindServer();

   dlg.SetAnalysisAvaliable((isremote != 0) && an && an->IsAnalysisSettingsReady());
   dlg.SetLocalAvaliable(isremote != 1);

   if (dlg.exec() != QDialog::Accepted) return;
   TH1 *h1 = dlg.MakeHistogram();
   if (!h1) return;

   TGo4AnalysisWindow* anw = FindAnalysisWindow();

   if (dlg.GetSelectedCmd()==1) {
      TString newitem = Browser()->SaveToMemory("", h1, kTRUE);

      if (newitem.Length()>0)
         editorServiceSlot(anw,
                           QGo4Widget::service_ObjectCreated,
                           newitem.Data(), h1->IsA());
      h1 = nullptr;
   } else
   if ((dlg.GetSelectedCmd() == 2) && an) {
      h1->SetBit(TGo4Status::kGo4CanDelete);
      an->UpdateAnalysisObject("", h1);
      if (anw) anw->WaitForNewObject(isremote==1);
          else an->RefreshNamesList();
   }
   if (h1) delete h1;
}

void TGo4MainWindow::CreateNewCondition(bool forothereditor)
{
   TGo4ServerProxy *an = Browser()->FindServer();
   if (!an || !an->IsAnalysisSettingsReady()) {
      QMessageBox::information(this,"Create new condition","Cannot create new condition before analysis setup");
      return;
   }

   TGo4CreateNewCondition dlg(this);

   if (dlg.exec() != QDialog::Accepted) return;

   TGo4Condition *cond = dlg.MakeCondition();
   if (!cond) return;

   cond->SetBit(TGo4Status::kGo4CanDelete);
   an->UpdateAnalysisObject("", cond);
   delete cond;

   TGo4AnalysisWindow* anw = FindAnalysisWindow();
   if(anw) anw->WaitForNewObject(forothereditor);
      else an->RefreshNamesList();
}

void TGo4MainWindow::CreateNewDynEntry(bool forothereditor)
{
   TGo4ServerProxy *an = Browser()->FindServer();
   if (!an || !an->IsAnalysisSettingsReady()) {
      QMessageBox::information(this,"Create new dynamic entry","Cannot create new entry before analysis setup");
      return;
   }

   TGo4CreateNewDynEntry dlg(this);

   if (dlg.exec() != QDialog::Accepted) return;

   TGo4DynamicEntry *entry = dlg.MakeEntry();
   if (!entry) return;

   entry->SetBit(TGo4Status::kGo4CanDelete);
   an->UpdateAnalysisObject("", entry);
   delete entry;

   TGo4AnalysisWindow* anw = FindAnalysisWindow();
   if (anw) anw->WaitForNewObject(forothereditor);
       else an->RefreshNamesList();
}

void TGo4MainWindow::ConnectGo4Widget(QGo4Widget* editor)
{
   if (!editor) return;
   QObject::connect(editor, &QGo4Widget::widgetService, this, &TGo4MainWindow::editorServiceSlot);
   GetWidgetTopSlot(editor, true);
}

TGo4ViewPanel *TGo4MainWindow::DisplayBrowserItem(const char *itemname, TGo4ViewPanel *panel, TPad *pad, bool activate, int updatelevel, const char *drawopt)
{
   TGo4BrowserProxy *br = Browser();
    if (!br || !itemname || strlen(itemname) == 0) return nullptr;

   TGo4Slot *guislot = br->BrowserSlot(itemname);

   if (!guislot) return nullptr;
   if (!guislot->GetProxy()) {
      std::cerr << " Problem with gui slots" << std::endl;
      return nullptr;
   }

   if (!panel) {
      panel = MakeNewPanel();
      pad = panel->GetCanvas();
   } else if (!pad)
      pad = panel->GetActivePad();

   if (!panel->AddDrawObject(pad, TGo4ViewPanel::kind_Link, itemname, nullptr, false, drawopt)) return nullptr;

   if (activate) {
      panel->SetActivePad(pad);
      panel->ShootRepaintTimer();
   }

   if (updatelevel < 0) {
      if (go4sett->getFetchDataWhenDraw())
         updatelevel = 2;
      else
         updatelevel = 1;
   }

   br->GetBrowserObject(itemname, updatelevel);

   return panel;
}

bool TGo4MainWindow::SaveBrowserItemToFile(const char *itemname, const char *subfolder)
{
   TGo4BrowserProxy *br = Browser();
   if (!br || !itemname) return false;

   TString fileslotname;
   const char *filepath = nullptr;

   bool res = false;

   if (br->DefineFileObject(itemname, fileslotname, &filepath)) {
      QMessageBox msgBox(QMessageBox::Question, "Writing object to file",
                         QString("Overwrite ") + filepath + " in file " + fileslotname.Data());
      auto btnOverwrite = msgBox.addButton("Overwrite", QMessageBox::ActionRole);
      /* auto btnOther = */ msgBox.addButton("Save to other file", QMessageBox::ActionRole);
      auto btnCancel = msgBox.addButton("Cancel", QMessageBox::RejectRole);
      msgBox.setDefaultButton(btnOverwrite);
      msgBox.exec();
      if (msgBox.clickedButton() == btnCancel)
         return false;
      if (msgBox.clickedButton() == btnOverwrite)
        res = br->UpdateObjectInFile(itemname, fileslotname.Data(), filepath);
   }

   if (!res) {
      QString root_fmt = "ROOT (*.root)";
      QString xml_fmt = "ROOT XML (*.xml)";

      QFileDialog fd(this, QString("Save ") + itemname + " in root file", fLastFileDir);
      fd.setFileMode(QFileDialog::AnyFile);
      fd.setAcceptMode(QFileDialog::AcceptSave);
      fd.setNameFilters(QStringList() << root_fmt << xml_fmt);

      if (fd.exec() == QDialog::Accepted) {
         QStringList flst = fd.selectedFiles();
         if (!flst.isEmpty()) {
            QString filename = flst[0];
            if (fd.selectedNameFilter()==xml_fmt) {
               if (!filename.endsWith(".xml")) filename.append(".xml");
            } else {
               if (!filename.endsWith(".root")) filename.append(".root");
            }
            res = br->SaveItemToFile(itemname, filename.toLatin1().constData(), subfolder);
            fLastFileDir = fd.directory().path();
         }
      }
   }

   return res;
}

void TGo4MainWindow::SavePanelCanvas(TGo4ViewPanel *panel)
{
   if (!panel) return;

   TCanvas *can = panel->GetCanvas();

   QFileDialog fd( this, QString("Save ") + panel->objectName() + " As", fLastFileDir);
   fd.setFileMode( QFileDialog::AnyFile );
   fd.setAcceptMode(QFileDialog::AcceptSave);

   QString PS = "Post Script (*.ps)";
   QString PS_Portrait = "Post Script Portrait (*.ps)";
   QString PS_Landscape = "Post Script Landscape (*.ps)";
   QString EPS = "Encapsulated Post Script (*.eps)";
   QString EPS_Preview = "Encapsulated Post Script preview (*.eps)";
   QString GIF = "GIF format (*.gif)";
   QString PDF = "PDF format (*.pdf)";
   QString SVG = "SVG format (*.svg)";
   QString XPM = "XPM format (*.xpm)";
   QString PNG = "PNG format (*.png)";
   QString JPG = "JPG format (*.jpg)";
   QString TIFF = "TIFF format (*.tiff)";

   QString CXXM = "C++ Macro (*.C)";
   QString JSONM = "json file (*.json)";
   QString ROOTM = "root file (*.root)";

   QStringList flt;

   flt << PNG;
   flt << PDF;
   flt << JPG;
   flt << SVG;
   flt << CXXM;
   flt << ROOTM;
   flt << GIF;

   flt << PS;
   flt << PS_Portrait;
   flt << PS_Landscape;
   flt << EPS;
   flt << EPS_Preview;

   flt << XPM;
   flt << TIFF;

   flt << JSONM;

   fd.setNameFilters(flt);

   QString filename0 = panel->objectName();

   fd.selectFile(filename0 + ".png");

   QObject::connect(&fd, &QFileDialog::filterSelected, [filename0, &fd](const QString &fltr) {
      QStringList flst = fd.selectedFiles();
      if (flst.size() > 1)
         return;
      if ((flst.size() == 1) && (flst[0].indexOf(filename0 + ".") != 0))
         return;

      auto p = fltr.indexOf("(*."), p2 = fltr.lastIndexOf(")");
      fd.selectFile(filename0 + fltr.mid(p + 2, p2 - p - 2));
   });


   if (fd.exec() != QDialog::Accepted) return;

   bool blankbg = go4sett->getSavePadWhiteBackground();
   if(blankbg) {
      can = (TCanvas *) panel->GetCanvas()->Clone();
      can->SetName("PrintoutPad");
   }
   QStringList flst = fd.selectedFiles();
   if (flst.isEmpty()) return;

   QString filename = flst[0];
   QString filter = fd.selectedNameFilter();

   fLastFileDir = fd.directory().path();

   const char *opt = "ps";

   if (filter == EPS) {
      opt = "eps";
      if (!filename.endsWith(".eps"))
         filename.append(".eps");
   } else if (filter == EPS_Preview) {
      opt = "Preview";
      if (!filename.endsWith(".eps"))
         filename.append(".eps");
   } else if (filter == PS) {
      opt = "ps";
      if (!filename.endsWith(".ps"))
         filename.append(".ps");
   } else if (filter == PS_Portrait) {
      opt = "Portrait";
      if (!filename.endsWith(".ps"))
         filename.append(".ps");
   } else if (filter == PS_Landscape) {
      opt = "Landscape";
      if (!filename.endsWith(".ps"))
         filename.append(".ps");
   } else if (filter == GIF) {
      opt = "gif";
      if (!filename.endsWith(".gif"))
         filename.append(".gif");
   } else if (filter == PDF) {
      opt = "pdf";
      if (!filename.endsWith(".pdf"))
         filename.append(".pdf");
   } else if (filter == SVG) {
      opt = "svg";
      if (!filename.endsWith(".svg"))
         filename.append(".svg");
   } else if (filter == XPM) {
      opt = "xpm";
      if (!filename.endsWith(".xpm"))
         filename.append(".xpm");
   } else if (filter == PNG) {
      opt = "png";
      if (!filename.endsWith(".png"))
         filename.append(".png");
   } else if (filter == JPG) {
      opt = "jpg";
      if (!filename.endsWith(".jpg"))
         filename.append(".jpg");
   } else if (filter == TIFF) {
      opt = "tiff";
      if (!filename.endsWith(".tiff"))
         filename.append(".tiff");
   } else if (filter == CXXM) {
      opt = "cxx";
      if (!filename.endsWith(".C"))
         filename.append(".C");
   } else if (filter == JSONM) {
      opt = "json";
      if (!filename.endsWith(".json"))
         filename.append(".json");
   } else if (filter == ROOTM) {
      opt = "root";
      if (!filename.endsWith(".root"))
         filename.append(".root");
   }

   if(blankbg) {
      panel->ResetPadFillColors(can,0);
      gROOT->SetBatch(kTRUE); // force ROOT to make memory print of canvas instead of using actual window display for image formats.
   }

   can->Print(filename.toLatin1().constData(), opt);

   if(blankbg) {
      gROOT->SetBatch(kFALSE);
      delete can;
   }
}

TGo4ObjectManager *TGo4MainWindow::OM()
{
   return fxOM;
}

TGo4BrowserProxy *TGo4MainWindow::Browser()
{
   return (TGo4BrowserProxy *) fxOM->GetProxy(fOMBrowserPath.toLatin1().constData());
}

TGo4Slot *TGo4MainWindow::GetWidgetTopSlot(QGo4Widget* widget, bool force)
{
   if (!widget) return nullptr;

   QString EditorName = widget->objectName();

   QString editorslotname = fOMEditorsPath;
   editorslotname += "/";
   editorslotname += EditorName;
   TGo4Slot *edslot = fxOM->GetSlot(editorslotname.toLatin1().constData());
   if (!edslot && force) {
      fxOM->AddProxy(fOMEditorsPath.toLatin1().constData(), new TGo4WidgetProxy(widget), EditorName.toLatin1().constData(), "Links for Go4 widget");
      edslot = fxOM->GetSlot(editorslotname.toLatin1().constData());
   }
   return edslot;
}

void TGo4MainWindow::checkPanelRepaintSlot()
{
   // block monitoring when start panel updates
   Browser()->SetMonitorBlockingFlag(kTRUE);

   fbPanelTimerActive = false;

   // first check if active viewpanel need update its content
   TGo4ViewPanel *actpanel = fxMdiArea->GetActivePanel();
   if (actpanel && actpanel->IsRepaintTimerActive())
      actpanel->checkRepaintSlot();

   if (fbPanelTimerActive) return;

   // now check if any other panel should be repainted
   TGo4Slot *topslot = fxOM->GetSlot(fOMEditorsPath.toLatin1().constData());
   for (int n = 0; n < topslot->NumChilds(); n++) {
      TGo4Slot *subslot = topslot->GetChild(n);

      TGo4WidgetProxy *wproxy =
          dynamic_cast<TGo4WidgetProxy*> (subslot->GetProxy());
      if (!wproxy) continue;

      TGo4ViewPanel *panel =
        dynamic_cast<TGo4ViewPanel *> (wproxy->GetWidget());

      if (panel && (panel != actpanel))
        if (panel->IsRepaintTimerActive()) {
            panel->checkRepaintSlot();
            if (fbPanelTimerActive) return;
        }
   }

   // enable monitoring only when all drawing are finished
   Browser()->SetMonitorBlockingFlag(kFALSE);
}

void TGo4MainWindow::editorServiceSlot(QGo4Widget* editor, int serviceid, const char *str, void *par)
{
   if (!editor) return;

   TGo4LockGuard lock;

   TGo4Slot *edslot = GetWidgetTopSlot(editor, false);
   if (!edslot) return;

   switch (serviceid) {
      case QGo4Widget::service_DragEnter: {
         QDragMoveEvent *event = (QDragMoveEvent *) par;
         if (!event || !event->mimeData()->hasText()) return;

         QString eventstr = event->mimeData()->text();

         bool accept = false;
         if (event->source() == FindGo4Widget("Browser",false)) {
            int kind = Browser()->ItemKind(eventstr.toLatin1().constData());
            TClass *cl = Browser()->ItemClass(eventstr.toLatin1().constData());
            accept = editor->IsAcceptDrag(eventstr.toLatin1().constData(), cl, kind);
         }

         if (accept) event->acceptProposedAction();
         break;
      }

      case QGo4Widget::service_DropEvent: {
         QDropEvent *event = (QDropEvent *) par;

         if (!event || !event->mimeData()->hasText()) return;

         QString eventstr = event->mimeData()->text();
         event->acceptProposedAction();

         if (event->source() == FindGo4Widget("Browser",false)) {
             int kind = Browser()->ItemKind(eventstr.toLatin1().constData());
             TClass *cl = Browser()->ItemClass(eventstr.toLatin1().constData());

             auto panel = dynamic_cast<TGo4ViewPanel *>(editor);
             auto fitpanel = dynamic_cast<TGo4FitPanel *>(editor);
             if (panel)
                panel->DropOnPad((TPad *)str, eventstr.toLatin1().constData(), cl, kind);
             else if (fitpanel)
                fitpanel->DropOnPanel(event, eventstr.toLatin1().constData(), cl, kind);
             else
                editor->DropItem(eventstr.toLatin1().constData(), cl, kind);
         }
         break;
      }

      case QGo4Widget::service_CreateItem: {
         TClass *cl = (TClass *) par;
         int id = str ? QString(str).toInt() : 0;
         if (cl) {
           if (cl->InheritsFrom(TH1::Class()))
              CreateNewHist(id);
           else if (cl->InheritsFrom(TGo4Condition::Class()) && (id != 0))
              CreateNewCondition(id==1);
           else if (cl->InheritsFrom(TGo4DynamicEntry::Class()) && (id != 0))
              CreateNewDynEntry(id==1);
         }
         break;
      }
      case QGo4Widget::service_DrawItem: {
         void ** res = (void **) par;
         res[0] = DisplayBrowserItem(str, (TGo4ViewPanel *) res[0], (TPad *) res[1], *((bool *)res[2]), *((int *) res[3]), nullptr);
         break;
      }

      case QGo4Widget::service_WhereItemDrawn: {
         TGo4ViewPanel **res = (TGo4ViewPanel **) par;
         *res = nullptr;
         TGo4Slot *topslot = fxOM->GetSlot(fOMEditorsPath.toLatin1().constData());
         for (int n = 0; n < topslot->NumChilds(); n++) {
            TGo4Slot *subslot = topslot->GetChild(n);

            TGo4WidgetProxy *wproxy =
               dynamic_cast<TGo4WidgetProxy *> (subslot->GetProxy());
            if (!wproxy) continue;

            TGo4ViewPanel *panel =
               dynamic_cast<TGo4ViewPanel *> (wproxy->GetWidget());

            if (panel)
              if (panel->FindPadWithItem(str)) {
                *res = panel;
                break;
              }
         }
         break;
      }

      case QGo4Widget::service_UndrawItem: {
         TGo4Slot *topslot = fxOM->GetSlot(fOMEditorsPath.toLatin1().constData());

         for (int n = 0; n < topslot->NumChilds(); n++) {
            TGo4Slot *subslot = topslot->GetChild(n);

            auto wproxy = dynamic_cast<TGo4WidgetProxy *> (subslot->GetProxy());
            if (!wproxy) continue;

            auto panel = dynamic_cast<TGo4ViewPanel *> (wproxy->GetWidget());
            if (panel)
              panel->UndrawItemOnPanel(str);
         }

         break;
      }

      case QGo4Widget::service_EditItem: {
         TClass *cl = Browser()->ItemClass(str);
         Int_t kind = Browser()->ItemKind(str);

         if (kind == TGo4Access::kndGo4Param) {
            StartParaEdit(str);
            break;
         } else if (kind==TGo4Access::kndTreeLeaf) {
            TGo4TreeViewer* tviewer =
               dynamic_cast<TGo4TreeViewer*> (FindGo4Widget("TreeViewer", false));
            if (tviewer) {
               tviewer->WorkWithLeaf(str);
               tviewer->parentWidget()->show();
            }
            break;
         }

         if (!cl) return;

         if (cl->InheritsFrom(TGo4Fitter::Class())) {
            TGo4FitPanel *fitpanel = StartFitPanel();
            TGo4ViewPanel *panel = dynamic_cast<TGo4ViewPanel *> (editor);
            fitpanel->WorkWithFitter(str, panel, !panel ? nullptr : panel->GetActivePad());
         } else if (cl->InheritsFrom(TGo4Parameter::Class())) {
            StartParaEdit(str);
         } else if (cl->InheritsFrom(TH1::Class())) {
            auto hinfo = StartHistogramInfo();
            hinfo->WorkWithHistogram(str);
         } else if (cl->InheritsFrom(TGo4Condition::Class())) {
            auto wedit = StartConditionEditor();
            wedit->WorkWithCondition(str);
         } else if (cl->InheritsFrom(TGo4DynamicEntry::Class())) {
            auto dedit = StartEditDynEntry();
            dedit->WorkWithEntry(str);
         } else if (cl->InheritsFrom(TGo4AnalysisStatus::Class())) {
            // use central editor, later can control many analysis at once
            EstablishAnalysisConfiguration(3);
         }

         break;
      }

      case QGo4Widget::service_ShowInfo: {
        TClass *cl = Browser()->ItemClass(str);
        int kind = Browser()->ItemKind(str);
        if (kind == TGo4Access::kndEventElement) {
           TGo4EventInfo* einfo = StartEventInfo();
           einfo->WorkWithEvent(str);
           break;
        }
        if (!cl) return;
        if (cl->InheritsFrom(TH1::Class())) {
           TGo4HistogramInfo* hinfo = StartHistogramInfo();
           hinfo->WorkWithHistogram(str);
        } else if (cl->InheritsFrom(TGo4Condition::Class())) {
           TGo4ConditionInfo* cinfo = StartConditionInfo();
           cinfo->WorkWithCondition(str);
        }
        break;
      }

      case QGo4Widget::service_EditInSlot: {
         TGo4Slot *slot = (TGo4Slot *) par;
         if (!slot) break;
         TObject *obj = slot->GetAssignedObject();
         if (!obj) break;
         if (obj->InheritsFrom(TGo4Fitter::Class())) {
            TGo4FitPanel* fitpanel = StartFitPanel();
            fitpanel->WorkWithFitterInSlot(slot);
         }
         break;
      }

      case QGo4Widget::service_SaveItem: {
         const char *subfolder = (const char *) par;
         bool res = SaveBrowserItemToFile(str, subfolder);
         *((char *) par) = res ? 1 : 0;
         break;
      }

      case QGo4Widget::service_UpdateAnalysisItem: {
         TObject **obj = (TObject **) par;
         Bool_t res = Browser()->UpdateAnalysisItem(str, *obj);
         *obj = res ? (TObject *) 1 : nullptr;
         break;
      }

      case QGo4Widget::service_StatusMessage: {
          StatusMessage(str);
          break;
      }

      case QGo4Widget::service_CreateViewPanel: {
         TGo4ViewPanel **res = (TGo4ViewPanel **) par;
         *res = MakeNewPanel(QString(str).toInt());
         break;
      }

      case QGo4Widget::service_BrowserItemRemote: {
         bool* res = (bool*) par;
         *res = Browser()->IsItemRemote(str);
         break;
      }

      case QGo4Widget::service_Browser: {
         TGo4BrowserProxy **res = (TGo4BrowserProxy **) par;
         *res= Browser();
         break;
      }

      case QGo4Widget::service_SaveToMemory: {
          TObject **obj = (TObject **) par;
          TString itemname = Browser()->SaveToMemory(str, *obj, true);
          QString **res = (QString **) par;
          *res = nullptr;
          if (itemname.Length() > 0)
            *res = new QString(itemname.Data());
          break;
      }

      case QGo4Widget::service_GetAnalysis: {
         TGo4ServerProxy ** res = (TGo4ServerProxy **) par;
         *res = Browser()->FindServer(str);
         break;
      }

      case QGo4Widget::service_AddEditorLink: {
         TGo4Slot *brslot = Browser()->BrowserSlot((const char *)par);

         QByteArray ba = editor->objectName().toLatin1();

         if (!str) str = ba.constData();

         TGo4Slot *link = fxOM->AddLink(brslot, edslot->GetFullName(),
                                        str, "link to browser item");
         if (link)
            editor->SetLinkedName(link, (const char *)par);

         break;
      }

      case QGo4Widget::service_AddDirectLink: {
         QByteArray ba = editor->objectName().toLatin1();
         if (!str) str = ba.constData();
         TGo4Slot *slot = (TGo4Slot *) par;
         if (slot)
            fxOM->AddLink(slot, edslot->GetFullName(), str, "direct link to OM slot");
         break;
      }

      case QGo4Widget::service_AddLinkInSlot: {
         TGo4Slot **res = (TGo4Slot **) par;

         TGo4Slot *parent = *res;
         *res = nullptr;
         if (!parent) parent = edslot;
         TGo4Slot *brslot = Browser()->BrowserSlot(str);

         if (brslot) {
            *res = fxOM->AddLink(brslot, parent->GetFullName(),
                               brslot->GetName(), "link in specific subfolder");
            if (*res)
              editor->SetLinkedName(*res, str);
         }
         break;
      }

      case QGo4Widget::service_GetTopSlot: {
         TGo4Slot **res = (TGo4Slot **) par;
         *res = edslot;
         break;
      }

      case QGo4Widget::service_AddEditorSlot: {
         TGo4Slot *objslot = edslot->FindChild(str);

         if (!objslot)
           objslot = fxOM->MakeObjSlot(edslot->GetFullName(), str, "Place for editor object");
         if (objslot)
            objslot->SetProxy(new TGo4ObjectProxy);

         TGo4Slot **res = (TGo4Slot **)par;
         *res = objslot;
         break;
      }

      case QGo4Widget::service_SetLinkedName: {
         TGo4BrowserProxy::SetLinkedName((TGo4Slot *) par, str);
         break;
      }

      case QGo4Widget::service_GetLinkedName: {
         if (!edslot) return;
         const char **res = (const char **) par;
         *res = TGo4BrowserProxy::GetLinkedName(edslot->FindChild(str));
         break;
      }

      case QGo4Widget::service_GetLinkedName2: {
         void ** res = (void **) par;
         TGo4Slot *link = (TGo4Slot *) *res;
         *res = (void *) TGo4BrowserProxy::GetLinkedName(link);
         break;
      }

      case QGo4Widget::service_GetLinked0:
      case QGo4Widget::service_GetLinked1:
      case QGo4Widget::service_GetLinked2: {
         if (!edslot) return;
         TGo4Slot *link = edslot->FindChild(str);
         if (!link) return;
         const char *itemname = TGo4BrowserProxy::GetLinkedName(link);
         TObject **res = (TObject **) par;
         int updatelevel = serviceid - QGo4Widget::service_GetLinked0;
         if (itemname)
            *res = Browser()->GetBrowserObject(itemname, updatelevel);
         else
            *res = link->GetAssignedObject();
         break;
      }

      case QGo4Widget::service_RemoveLink: {
         if (!edslot) return;
         TGo4Slot *link = edslot->FindChild(str);
         if (link) link->Delete();
         break;
      }

      case QGo4Widget::service_RemoveAllLinks: {
         if (!str || (strcmp(str,"complete") != 0))
            edslot->DeleteChilds(str);
         else
            edslot->Delete();
         break;
      }

      case QGo4Widget::service_ObjectCreated: {
         TGo4Slot *slot = fxOM->GetSlot(fOMEditorsPath.toLatin1().constData());
         for (int n = 0; n < slot->NumChilds(); n++) {
            TGo4Slot *subslot = slot->GetChild(n);
            if (edslot == subslot)
               continue;

            TGo4WidgetProxy *wproxy = dynamic_cast<TGo4WidgetProxy *>(subslot->GetProxy());

            if (wproxy)
               wproxy->GetWidget()->ObjectCreatedByWidget(str, (TClass *)par);
         }
         break;
      }

      case QGo4Widget::service_ConnectPad: {
         if (!edslot) break;

         TGo4WidgetProxy* proxy =
           dynamic_cast<TGo4WidgetProxy *> (edslot->GetProxy());
         if (proxy)
            proxy->ConnectPad((TPad *) par);
         break;
      }

      case QGo4Widget::service_LastActivePanel: {
         TGo4ViewPanel **res = (TGo4ViewPanel **) par;
         *res = fxMdiArea->GetActivePanel();
         break;
      }

      case QGo4Widget::service_General: {
        if (strcmp(str,"CloseAnalysisWindow") == 0) {
            // we should postpone window closing, while it is called from inside window itself
            // and it is create problem in sequence,
           QTimer::singleShot(100, this, &TGo4MainWindow::CloseAnalysisWindow);
        } else if (strcmp(str,"PrintAnalysisHistograms") == 0) {
           auto anw = FindAnalysisWindow();
           if (anw) anw->PrintHistograms();
        } else if (strcmp(str,"PrintAnalysisConditions") == 0) {
           auto anw = FindAnalysisWindow();
           if (anw) anw->PrintConditions();
        } else if (strcmp(str,"DisplayMbsMonitor") == 0) {
           ToggleMbsMonitor((const char *) par);
        } else if (strcmp(str,"SubmitAnalysisSettings") == 0) {
           SubmitAnalysisSettings();
        } else if (strcmp(str,"CloseAnalysisSettings") == 0) {
           auto anal = Browser()->FindServer();
           if (anal) {
              anal->CloseAnalysisSettings();
              anal->RefreshNamesList();
           }
        } else if (strcmp(str,"SubmitStartAnalysis") == 0) {
           SubmitStartAnalysisSlot();
        } else if (strcmp(str,"StartAnalysis") == 0) {
          StartAnalysisSlot();
        } else if (strcmp(str,"StopAnalysis") == 0) {
          StopAnalysisSlot();
        } else if (strcmp(str,"TerminateAnalysis") == 0) {
           TerminateAnalysis(true);
        } else if (strcmp(str,"UpdateGuiLayout") == 0) {
          UpdateCaptionButtons();
        } else if (strcmp(str, "StartEventInfo") == 0) {
           StartEventInfo();
        } else if(strcmp(str, "ActivateConditionEditor") == 0) {
           TGo4ConditionEditor* w =
             (TGo4ConditionEditor*) FindGo4Widget("ConditionEditor", true);
           if (w) {
              w->setFocus();
              w->RefreshWidget(true);
           }
        } else if (strcmp(str, "SavePanelCanvas") == 0) {
           SavePanelCanvas(dynamic_cast<TGo4ViewPanel *>(editor));
        } else if (strcmp(str, "ToggleScaleValues") == 0) {
           ToggleScaleValues();
        } else if (strcmp(str, "GetFitterFromFitPanel") == 0) {
           TGo4FitPanel *panel = (TGo4FitPanel *) FindGo4Widget("FitPanel", false);
           TGo4Fitter **res = (TGo4Fitter **) par;
           if (panel && res)
              *res = panel->GetFitter();
        } else if (strcmp(str, "CloneFitterFromFitPanel") == 0) {
           auto panel = (TGo4FitPanel *) FindGo4Widget("FitPanel", false);
           TGo4Fitter **res = (TGo4Fitter **) par;
           if (panel && res)
              *res = panel->CloneFitter();
        }

        break;
      }

      case QGo4Widget::service_PanelTimer: {
         // TGo4ViewPanel *panel = (TGo4ViewPanel *) editor;
         if (!fbPanelTimerActive) {
            fbPanelTimerActive = true;
            QTimer::singleShot(0, this, &TGo4MainWindow::checkPanelRepaintSlot);
         }

         break;
      }

      case QGo4Widget::service_HelpWindow: {
         HelpWindow(str, (const char *) par);
         break;
      }

      case QGo4Widget::service_HotStart: {
         HotStart(str);
         break;
      }

      case QGo4Widget::panel_Activated:
      case QGo4Widget::panel_Modified:
      case QGo4Widget::panel_Updated:
      case QGo4Widget::panel_ActiveUpdated:
      case QGo4Widget::panel_PadDeleted:
      case QGo4Widget::panel_Deleted: {
         TGo4ViewPanel *panel = (TGo4ViewPanel *) editor;
         TPad *pad = (TPad *) par;
         fxMdiArea->ResponseOnPanelEvent(serviceid, panel, pad);
         break;
      }

   }
}

// ******************** hot start functions *********************

void TGo4MainWindow::HotStart(const char *fname)
{
   if (!fname) return;

   TGo4Script* exec = TGo4Script::ScriptInstance();
   if(!exec) return;

   if (!exec->StartScriptExecution(fname)) return;

   QTimer::singleShot(TGo4AbstractInterface::DelayMillisec(), this, &TGo4MainWindow::ProcessHotStart);
}

void TGo4MainWindow::ProcessHotStart()
{
   TGo4Script* exec = TGo4Script::ScriptInstance();
   if (!exec) return;

   Bool_t res = kTRUE;
   do {
      res = exec->ContinueExecution();
   } while(res && !exec->IsWaitSomething());

   if (res) {
      QTimer::singleShot(TGo4AbstractInterface::DelayMillisec(), this, &TGo4MainWindow::ProcessHotStart);
      if (!QApplication::overrideCursor())
        QApplication::setOverrideCursor(Qt::WaitCursor);
   } else {
      exec->FinishExecution();
      StatusMessage("Script execution done");
      QApplication::restoreOverrideCursor();
   }
}

void TGo4MainWindow::StopGUIScriptSlot()
{
   TGo4Script* exec = TGo4Script::ScriptInstance();
   if (exec) exec->FinishExecution();
}

void TGo4MainWindow::CreateGUIScriptSlot()
{
   QString ext = TGo4AbstractInterface::FileExtension();
   QString fileName =
      QFileDialog::getSaveFileName(this,
                                   "Create GUI script dialog",
                                   fLastFileDir,
                                   QString("GUI hotstart script (*") + ext + ")");
   if (fileName.isEmpty()) return;

   int pos = fileName.indexOf(ext);

   if ((pos<0) || (pos!=fileName.length()-ext.length()))
     fileName+=ext;

   StatusMessage(QString("Generate script ")+fileName);

   TGo4Script::ProduceScript(fileName.toLatin1().constData(), this);
}

void TGo4MainWindow::AddAnalysisMacrosBar()
{
  QToolBar* AnalysisMacroBar = addToolBar("Analysis Command Buttons");
  AnalysisMacroBar->setObjectName("AnalysisCommandToolBar");

  // new: everything is in dedicated class
  TGo4UserCommands* companel = new TGo4UserCommands(this, "UserCommands");
  ConnectGo4Widget(companel);
  AnalysisMacroBar->addWidget(companel);
  AnalysisMacroBar->adjustSize();
}

void TGo4MainWindow::ProcessQtEvents()
{
   if (fApp) fApp->processEvents(QEventLoop::AllEvents, TGo4AbstractInterface::DelayMillisec());
}

TGo4ViewPanel *TGo4MainWindow::FindViewPanel(const char *name)
{
   if (!name || !*name) return nullptr;

   TGo4ViewPanel *panel = dynamic_cast<TGo4ViewPanel *> (FindGo4Widget(name, false));

   if (panel) return panel;

   TGo4Slot *slot = fxOM->GetSlot(fOMEditorsPath.toLatin1().constData());

   for (Int_t n = 0; n < slot->NumChilds(); n++) {
      TGo4Slot *widgslot = slot->GetChild(n);
      TGo4WidgetProxy *wproxy = !widgslot ? nullptr : dynamic_cast<TGo4WidgetProxy *>(widgslot->GetProxy());
      panel = !wproxy ? nullptr : dynamic_cast<TGo4ViewPanel *>(wproxy->GetWidget());

      if (panel)
         if (strcmp(panel->GetPanelName(), name) == 0)
            return panel;
   }

   return nullptr;
}