25 #include "TGraphErrors.h"
26 #include "TGraphAsymmErrors.h"
27 #include "TMultiGraph.h"
30 #include "TDirectory.h"
37 #include "TObjString.h"
40 #include "TVirtualTreePlayer.h"
43 #include "TGo4LockGuard.h"
79 if ((slot!=0) && (obj!=0))
85 virtual Bool_t
Use()
const {
return kFALSE; }
91 Bool_t updatedone =
false;
94 if ((
fObject->IsA()==obj->IsA()) &&
95 (strcmp(
fObject->GetName(), obj->GetName())==0))
103 if (owner)
delete obj;
113 if ((
fObject==0) && !strong)
return;
120 if (browser!=0)
break;
135 fbWithRootBrowser(kFALSE),
139 fiMonitoringPeriod(0),
141 fbBlockMonitoring(kFALSE),
152 const char* viewpath,
153 Bool_t withRootBrowser) :
155 fxDataPath(datapath),
157 fxViewPath(viewpath),
158 fbWithRootBrowser(withRootBrowser),
159 fxMemoryPath(
"Workspace"),
162 fiMonitoringPeriod(0),
164 fbBlockMonitoring(kFALSE),
176 if (gDebug>1) Info(
"~TGo4BrowserProxy",
"Called");
201 if (gDebug>1) Info(
"~TGo4BrowserProxy",
"Finished");
211 gROOT->GetClass(
"TH1");
212 gROOT->GetClass(
"TH1C");
213 gROOT->GetClass(
"TH1D");
214 gROOT->GetClass(
"TH1F");
215 gROOT->GetClass(
"TH1I");
216 gROOT->GetClass(
"TH1S");
217 gROOT->GetClass(
"TH2");
218 gROOT->GetClass(
"TH2C");
219 gROOT->GetClass(
"TH2D");
220 gROOT->GetClass(
"TH2F");
221 gROOT->GetClass(
"TH2I");
222 gROOT->GetClass(
"TH2S");
223 gROOT->GetClass(
"TH3");
224 gROOT->GetClass(
"TH3C");
225 gROOT->GetClass(
"TH3D");
226 gROOT->GetClass(
"TH3F");
227 gROOT->GetClass(
"TH3I");
228 gROOT->GetClass(
"TH3S");
230 gROOT->GetClass(
"TGo4WinCond");
231 gROOT->GetClass(
"TGo4PolyCond");
232 gROOT->GetClass(
"TGo4ShapedCond");
233 gROOT->GetClass(
"TGo4CondArray");
235 gROOT->GetClass(
"TGo4Fitter");
236 gROOT->GetClass(
"TGo4Parameter");
237 gROOT->GetClass(
"TGo4Picture");
239 gROOT->GetClass(
"TGo4DynamicEntry");
240 gROOT->GetClass(
"TGo4HistogramEntry");
241 gROOT->GetClass(
"TGo4TreeHistogramEntry");
242 gROOT->GetClass(
"TLatex");
243 gROOT->GetClass(
"TF1");
244 gROOT->GetClass(
"TGo4AnalysisStatus");
262 bool ischildevent = source->
IsParent(slot);
266 if ((source!=slot) && !ischildevent) {
280 if ((source!=slot) && ischildevent) {
350 if ((cl==0) || !cl->IsLoaded())
return 0;
378 if (itemslot==0)
return kFALSE;
383 if (itemslot->
IsParent(memslot) && (tgtpath==0))
return kFALSE;
386 if (tgtslot==0)
return kFALSE;
387 if ((tgtslot==itemslot) || tgtslot->
IsParent(itemslot))
return kFALSE;
393 for (Int_t n=0;n<itemslot->
NumChilds();n++)
400 if (tgtslot==0)
return kFALSE;
401 if (tgtslot->
GetSlot(itemslot->GetName(), kTRUE)==0)
return kFALSE;
408 subpath += itemslot->GetName();
410 tgtpath = subpath.Data();
413 for (Int_t n=0;n<=childs.GetLast();n++) {
426 if (tgtslot==0)
return kFALSE;
427 if (!tgtslot->
IsParent(memslot) && (tgtslot!=memslot))
return kFALSE;
428 if (itemslot->
GetParent()==tgtslot)
return kFALSE;
429 if (memslot!=tgtslot)
437 if ((obj==0) || forcerequest) {
439 if (res==0)
return kFALSE;
441 if ((res==1) || !forcerequest)
446 TString res =
SaveToMemory(pathname, obj->Clone(), kTRUE);
447 return res.Length()>0;
471 if (itemslot==0)
return;
477 if (slot==0)
continue;
478 if (itemslot->
IsParent(slot))
return;
481 fxClipboard->Add(
new TNamed(itemname,
"clipboard item"));
499 if ((fname==0) || (*fname==0))
return;
515 if ((nodename==0) || (*nodename==0))
return kFALSE;
518 if (!proxy->
Connect(nodename)) {
523 const char* slotname = nodename;
524 if (strncmp(slotname,
"dabc://",7)==0) slotname+=7;
534 const char* basename,
535 const char* userpass,
549 TString capt =
"HServ_";
552 AddServerProxy(hserv, capt.Data(),
"Connection to histogram server");
570 if ((pr!=0) && pr->
IsFile())
585 if (pr!=0) arr->Add(pr);
599 if (pr!=0) arr->Add(pr);
616 (strncmp(pr->
GetServerName(),
"https://",8)==0)) arr->Add(pr);
633 TString& createdhistoname)
635 if (strlen(Xexp)==0)
return;
637 TString varexp(Xexp);
640 varexp = TString(Yexp) + TString(
":") + varexp;
642 varexp = TString(Zexp) + TString(
":") + varexp;
645 int drawdim = varexp.CountChar(
':') + 1;
646 if (drawdim>3) drawdim = 3;
653 TString analhname(hname);
656 TString anitem =
"abcdef";
657 if (analhname.Length()==0)
658 while (anitem.Length()>0) {
659 analhname =
"hTreeDraw";
660 if (cnt>0) { analhname+=
"_"; analhname+=cnt; }
665 an->
RemoteTreeDraw(objname.Data(), varexp.Data(), cutcond, analhname.Data());
669 createdhistoname =
"";
676 TString treeslotname;
678 TTree* SelectedTree =
dynamic_cast<TTree*
> (
fxOM->
GetObject(treeslotname.Data()));
679 if (SelectedTree==0)
return;
681 TString histoname(hname), hslotname;
689 if ((histo!=0) && (drawdim!=histo->GetDimension())) {
697 if ((histo==0) && (histoname.Length()==0))
700 histoname +=
"/hTreeDraw_";
706 TString hfoldername, hobjectname;
710 hobjectname = histo->GetName();
713 varexp += hobjectname;
715 TDirectory* oldhisdir = histo ? histo->GetDirectory() : 0;
716 TDirectory* savdir = gDirectory;
718 TDirectory dummydir(
"DummyTreeDraw",
"Dummy directory to call tree draw");
721 histo->SetDirectory(&dummydir);
723 SelectedTree->Draw(varexp, cutcond,
"goff", 10000000, 0);
726 histo =
dynamic_cast<TH1*
> (dummydir.FindObject(hobjectname));
728 histo->SetDirectory(0);
734 histo->SetDirectory(oldhisdir);
741 #if ROOT_VERSION_CODE < ROOT_VERSION(5,13,1)
763 while (iter.
next()) {
766 if (slot==0)
continue;
770 if ((serv==0) || ((kind==1) && !serv->
IsGo4Analysis()))
continue;
772 if (dynamic_cast<TGo4AnalysisProxy*>(slot->
GetProxy())==0)
continue;
779 if ((res!=0) && !databranch) {
794 if ((slot==0) || (itemname==0))
808 if ((slot==0) || (itemname==0))
817 if ((analslot==0) || (objname==0))
return TString(
"");
820 while (iter.
next()) {
821 if (strcmp(iter.
getname(), objname)!=0)
continue;
835 if ((topslot==0) || (objname==0))
return TString(
"");
839 if (strcmp(iter.
getname(), objname)==0)
848 if (slot==0)
return 0;
852 if (pr!=0)
return pr;
863 const char* objectname = 0;
869 if (serv==0)
return 0;
871 if (objname!=0) *objname = objectname;
883 if (!slot)
return kFALSE;
886 if (!obj)
return kFALSE;
888 const char* analysisname = 0;
894 anslot =
fxOM->
FindSlot(slotname.Data(), &analysisname);
909 if (itemslot==0)
return;
915 while (iter.
next()) {
921 if (wait_time==0)
return;
945 if (guislot==0)
return 0;
949 if ((update==0) || ((update==1) && (obj!=0)))
return obj;
982 if (itemslot->
GetPar(
"::CopyObject")!=0) {
1020 if (slot==0)
return kFALSE;
1023 while (treeslot!=0) {
1025 if ((cl!=0) && (cl->InheritsFrom(TTree::Class())))
break;
1028 if (treeslot==0)
return kFALSE;
1037 if ((itemname==0) || (treename==0))
return kFALSE;
1042 if (slot==0)
return kFALSE;
1044 printf(
"DefineLeafName %s %s kind :%d\n", itemname, treename,
ItemKind(slot));
1048 int ilen = strlen(itemname);
1049 int tlen = strlen(treename);
1050 if ((ilen<tlen) || (strncmp(itemname, treename, tlen)!=0))
return kFALSE;
1052 leafname = slot->GetName();
1058 if ((objname==0) || (*objname==0))
return kFALSE;
1061 objectitem = objname;
1073 if (*objname!=
'/') searchname+=
"/";
1074 searchname+=objname;
1081 searchname.Append(
";1");
1086 objectitem = searchname;
1094 if (strchr(objname,
'/')!=0) {
1096 if ((mask & 2) == 0)
return kFALSE;
1102 const char *slash = strchr(objname,
'/');
1104 while (slash != 0) {
1105 slash = strchr(slash+1,
'/');
1106 if (slash == 0)
break;
1109 if (!
DefineRelatedObject(itemname, TString(objname, slash-objname).Data(), diritem, 0))
break;
1111 int kind =
ItemKind(diritem.Data());
1123 if ((mask & 1) == 0)
return kFALSE;
1129 size_t len = strlen(objname);
1130 while (iter.
next()) {
1131 const char* name = iter.
getname();
1133 if (strncmp(objname, name, len)!=0)
continue;
1135 if ((strlen(name) == len) ||
1136 ((strlen(name)==(len+2)) && (strcmp(name+len,
";1")==0))) {
1144 }
while (searchslot!=0);
1152 if (slot==0)
return kFALSE;
1158 if ((cl!=0) && (cl->InheritsFrom(TFile::Class())))
break;
1166 *filepath = itemname + fitemname.Length();
1167 if (**filepath==
'/') (*filepath)++;
1178 if (slot==0)
return kFALSE;
1181 if (obj==0)
return kFALSE;
1184 if (fileslot==0)
return kFALSE;
1187 if (dircont==0)
return kFALSE;
1200 if (slot==0)
return kFALSE;
1203 if (obj==0)
return kFALSE;
1205 TFile* f = TFile::Open(filename,
"UPDATE");
1206 if (f==0)
return kFALSE;
1208 TDirectory* dir = f;
1210 if ((subfolder!=0) && (*subfolder!=0)) {
1211 dir =
dynamic_cast<TDirectory*
> (f->Get(subfolder));
1212 if (dir==0) dir = f;
1216 bool res = dir->WriteTObject(obj, obj->GetName(),
"Overwrite") > 0;
1218 if (obj->InheritsFrom(TH1::Class()))
1219 ((TH1*) obj)->SetDirectory(0);
1228 const char* filename,
1229 const char* filedir,
1231 const char* description)
1233 if ((items==0) || (items->GetSize()==0))
return;
1242 if(convert.Contains(
"ASCII")) {
1246 if (convert.Contains(
"Radware")) {
1250 if (convert.Contains(
"ROOT XML")) {
1254 if (convert.Contains(
"ROOT")) {
1264 TObjString* str =
dynamic_cast<TObjString*
> (items->At(0));
1268 TString fname = filename;
1271 if(!fname.Contains(
".xml")) fname.Append(
".xml");
1273 if(!fname.Contains(
".root")) fname.Append(
".root");
1276 if ((itemslot!=0) && (itemslot->
NumChilds()>0)) {
1288 TGo4Log::Message(1,
"Exporting selected browser objects to %s",convert.Data());
1291 for (
int n=0;n<=items->GetLast();n++) {
1292 TObjString* str =
dynamic_cast<TObjString*
> (items->At(n));
1293 if (str==0)
continue;
1298 if (obj!=0) objs.Add(obj);
1301 exman.
Export(&objs, filter);
1306 const char* selectedpath,
1307 const char* description)
1311 if (toppath==0)
return kFALSE;
1316 TFile* f = TFile::Open(filename,
"recreate", description);
1317 if (f==0)
return kFALSE;
1333 if (slot==0)
return kFALSE;
1335 if (!slot->
GetIntPar(
"GUI::Remote", remote))
return kFALSE;
1341 TString analysisname;
1347 if ((stime!=0) && (sdate!=0)) {
1348 slot->
SetPar(
"GUI::Time", stime);
1349 slot->
SetPar(
"GUI::Date", sdate);
1354 const char* datetime = t.AsSQLString();
1355 char* time = (
char*) strchr(datetime,
' ');
1357 slot->
SetPar(
"GUI::Time",datetime);
1358 slot->
SetPar(
"GUI::Date",datetime);
1360 slot->
SetPar(
"GUI::Time", time+1);
1362 slot->
SetPar(
"GUI::Date", datetime);
1368 return slot==0 ? 0 : slot->
GetPar(
"GUI::Time");
1373 return slot==0 ? 0 : slot->
GetPar(
"GUI::Date");
1379 slot->
SetPar(
"::LinkedItem", itemname);
1384 return (slot==0) ? 0 : slot->
GetPar(
"::LinkedItem");
1402 if (slot==0)
return;
1403 if (kind>=0) slot->
SetIntPar(
"GUI::Kind", kind);
1405 slot->
SetPar(
"GUI::Class", classname);
1406 slot->
SetPar(
"GUI::Info", info);
1407 slot->
SetIntPar(
"GUI::SizeInfo", sizeinfo);
1412 return slot==0 ? 0 : slot->
GetPar(
"GUI::Info");
1417 if (slot==0)
return -1;
1419 if (!slot->
GetIntPar(
"GUI::SizeInfo", sizeinfo))
return -1;
1431 if (slot==0)
return 0;
1433 if (!slot->
GetIntPar(
"GUI::CalcSize", size))
return 0;
1449 return slot==0 ? 0 : slot->
GetPar(
"GUI::Class");
1464 if (slot==0)
return 0;
1467 if (!slot->
GetIntPar(
"GUI::CanDo", cando))
return 0;
1473 if (slot!=0) slot->
SetIntPar(
"GUI::CanDo", cando);
1478 return slot==0 ? kTRUE : slot->
GetPar(
"GUI::NotMonitored")==0;
1483 if (slot==0)
return;
1487 while (iter.
next()) {
1497 slot->
SetPar(
"GUI::NotMonitored",
"1");
1504 return (cando % 1000000000) / 100000000 > 0;
1509 return (cando % 100000000) / 10000000 > 0;
1514 return (cando % 10000000) / 1000000 > 0;
1519 return (cando % 1000000) / 100000 > 0;
1525 return (cando % 100000) / 10000 > 0;
1530 return (cando % 10000) / 1000 > 0;
1535 return (cando % 1000) / 100 > 0;
1540 return (cando % 100) / 10 > 0;
1545 return (cando % 10 > 0);
1550 if ((foldername!=0) && (*foldername!=0))
1553 TString fullpathname;
1563 if ((itemslot==0) || (newfoldername==0) || (strlen(newfoldername)==0))
return;
1566 if (!itemslot->
IsParent(memslot) && (memslot!=itemslot))
return;
1569 if (slot==0)
return;
1580 if ((itemslot==0) || (newname==0) || (strlen(newname)==0))
return;
1582 if ((strchr(newname,
'/')!=0) || (strchr(newname,
'\\')!=0))
return;
1585 if (!itemslot->
IsParent(memslot))
return;
1588 if (slot==0)
return;
1593 slot->SetName(newname);
1595 if (n!=0) n->SetName(newname);
1605 if (itemslot==0)
return;
1608 if (!itemslot->
IsParent(memslot))
return;
1611 if (slot==0)
return;
1616 if(ob->InheritsFrom(TH1::Class())) {
1617 TH1* his =
dynamic_cast<TH1*
>(ob);
1618 if (his) his->Reset();
1620 if(ob->InheritsFrom(TGo4DynamicEntry::Class())) {
1622 if (entry) entry->
Reset();
1624 if(ob->InheritsFrom(TGo4Picture::Class())) {
1626 if (pic) pic->
Reset();
1628 if(ob->InheritsFrom(TGraph::Class())) {
1629 TGraph* gr=
dynamic_cast<TGraph*
>(ob);
1631 Int_t pn = gr->GetN();
1636 if(ob->InheritsFrom(TMultiGraph::Class())) {
1637 TMultiGraph* mg =
dynamic_cast<TMultiGraph*
>(ob);
1639 TIter liter(mg->GetListOfGraphs());
1641 while(( gr = (TGraph*) liter())!=0) {
1642 Int_t pn = gr->GetN();
1658 if (obj==0)
return TString(
"");
1661 if ((pathname!=0) && (*pathname!=0)) {
1668 TString itemname = path;
1670 itemname+=obj->GetName();
1678 TString fullpathname;
1681 TGo4Slot* slot =
fxOM->
Add(fullpathname.Data(), obj, ownership, kTRUE);
1688 if (slot==0)
return;
1698 TString picitemname;
1708 for(Int_t posy=0; posy<pic->
GetDivY(); posy++)
1709 for(Int_t posx=0; posx<pic->
GetDivX(); posx++)
1723 TIter iter(gROOT->GetList());
1725 while ((obj=iter())!=0) {
1729 gROOT->GetList()->Clear();
1735 if(on) slot->
SetPar(
"GUI::CanDelete",
"1");
1742 return slot==0 ? kFALSE : slot->
GetPar(
"GUI::CanDelete")!=0;
1767 if (viewslot==0)
return 0;
1771 TObjArray UniqueItems;
1775 while (iter.
next()) {
1781 if ((srcslot!=0) && srcslot->
IsParent(brslot) &&
1782 (UniqueItems.FindObject(srcslot)==0))
1783 UniqueItems.Add(srcslot);
1787 Int_t nrequests = 0;
1788 for (
int n=0;n<=UniqueItems.GetLast();n++) {
1800 Int_t nrequests = 0;
1804 while (iter.
next()) {
1828 Bool_t anready = kTRUE;
1856 if (slot==0)
return;
1858 slot->
SetIntPar(
"GUI::DeleteProtect", delprot);
1862 slot->
SetIntPar(
"GUI::ResetProtect", clearprot);
1869 delprot = -1; clearprot = -1;
1870 if (slot==0)
return;
1871 if (!slot->
GetIntPar(
"GUI::DeleteProtect", delprot)) delprot = -1;
1872 if (!slot->
GetIntPar(
"GUI::ResetProtect", clearprot)) clearprot = -1;
1882 if (source==0)
return;
1885 if (curfold==0)
return;
1891 const char* EventsFolder =
"EventObjects/Events/";
1893 while (curfold!=0) {
1896 Bool_t res = iter.
next();
1902 while (levelchange++<0) {
1903 while (curslot!=0) {
1911 if (curfold==0)
break;
1919 while ((find!=0) && (strcmp(iter.
getname(), find->GetName())!=0))
1925 if (find!=curslot) {
1933 const char* ppp = strstr(fullname, EventsFolder);
1935 ppp += strlen(EventsFolder);
1936 if ((strlen(ppp)!=0) && (strchr(ppp,
'/')==0)) {
1949 TObject* assobj = 0;
1973 if ((curslot!=0) && curslot->
IsParent(targetslot))
1974 while (curslot!=0) {
1992 if (topslot==0)
return 0;
1998 for (Int_t n=0;n<topslot->
NumChilds();n++)
2023 if (cl->InheritsFrom(TProfile::Class())) { cando = 1110; pixmap =
"profile_t.png"; }
else
2024 if (cl->InheritsFrom(TGo4Picture::Class())) { cando = 110; pixmap =
"picture.png"; }
else
2025 if (cl->InheritsFrom(TGo4Parameter::Class())) { cando = 1011; pixmap =
"parameter.png"; }
else
2026 if (cl->InheritsFrom(TMultiGraph::Class())) { cando = 1110; pixmap =
"superimpose.png"; }
else
2027 if (cl->InheritsFrom(THStack::Class())) { cando = 1110; pixmap =
"superimpose.png"; }
else
2028 if (cl->InheritsFrom(TGraph::Class())) { cando = 1001110; pixmap =
"tgraph.png"; }
else
2029 if (cl->InheritsFrom(TGo4Fitter::Class())) { cando = 11; pixmap =
"fitter.png"; }
else
2030 if (cl->InheritsFrom(TCanvas::Class())) { cando = 110; pixmap =
"canvas.png"; }
else
2031 if (cl->InheritsFrom(TFile::Class())) { pixmap =
"rootdb_t.png"; }
else
2032 if (cl->InheritsFrom(TTree::Class())) { pixmap =
"tree_t.png"; }
else
2033 if (cl->InheritsFrom(TFolder::Class())) { pixmap =
"folder_t.png"; }
else
2034 if (cl->InheritsFrom(TDirectory::Class())) { pixmap =
"folder_t.png"; }
else
2035 if (cl->InheritsFrom(TH3::Class())) { cando = 1101110; pixmap =
"h3_t.png"; }
else
2036 if (cl->InheritsFrom(TH2::Class())) { cando = 1101110; pixmap =
"h2_t.png"; }
else
2037 if (cl->InheritsFrom(TH1::Class())) { cando = 1101110; pixmap =
"h1_t.png"; }
else
2038 if (cl->InheritsFrom(TGo4WinCond::Class())) { cando = 101011; pixmap =
"windcond.png"; }
else
2039 if (cl->InheritsFrom(TGo4PolyCond::Class())) { cando = 101011; pixmap =
"polycond.png"; }
else
2040 if (cl->InheritsFrom(TGo4ShapedCond::Class())) { cando = 101011; pixmap =
"polycond.png"; }
else
2041 if (cl->InheritsFrom(TGo4ListCond::Class())) { cando = 101011; pixmap =
"windcond.png"; }
else
2042 if (cl->InheritsFrom(TGo4CondArray::Class())) { cando = 101011; pixmap =
"windcondarray.png"; }
else
2043 if (cl->InheritsFrom(TGo4TreeHistogramEntry::Class())) { cando = 1011; pixmap =
"dynentryx.png"; }
else
2044 if (cl->InheritsFrom(TGo4HistogramEntry::Class())) { cando = 1011; pixmap =
"dynentryx.png"; }
else
2045 if (cl->InheritsFrom(TLatex::Class())) { cando = 110; pixmap =
"canvas.png"; }
else
2046 if (cl->InheritsFrom(TF1::Class())) { cando = 110; pixmap =
"draw1dline.png"; }
else
2047 if (cl->InheritsFrom(TLeaf::Class())) { cando = 11; pixmap =
"leaf_t.png"; }
else
2048 if (cl->InheritsFrom(TGo4AnalysisStatus::Class())) { cando = 1; pixmap =
"control.png"; }
2052 pixmap =
"folder_t.png";
2053 if ((cl!=0) && cl->InheritsFrom(TTree::Class())) { cando = 10; pixmap =
"tree_t.png"; }
else
2054 if ((cl!=0) && cl->InheritsFrom(TCanvas::Class())) { cando = 110; pixmap =
"canvas.png"; }
else
2055 if ((cl!=0) && cl->InheritsFrom(THStack::Class())) { cando = 110; pixmap =
"superimpose.png"; }
else
2056 if ((cl!=0) && cl->InheritsFrom(TFile::Class())) { cando = 10000; pixmap =
"rootdb_t.png"; }
else
2057 if ((cl!=0) && cl->InheritsFrom(TGo4HServProxy::Class())) { cando = 10000; pixmap =
"histserv.png"; }
else
2058 if ((cl!=0) && cl->InheritsFrom(TGo4DabcProxy::Class())) { cando = 10000; pixmap =
"dabc.png"; }
else
2059 if ((cl!=0) && cl->InheritsFrom(TGo4AnalysisProxy::Class())) { pixmap =
"analysiswin.png"; }
else
2060 if ((cl!=0) && cl->InheritsFrom(TGo4ServerProxy::Class())) { cando = 10000; pixmap =
"http.png"; }
2064 pixmap =
"branch_t.png";
2067 cando = 11; pixmap =
"leaf_t.png";
2070 cando = 1011; pixmap =
"parameter.png";
2073 cando = 10; pixmap =
"eventitem.png";
2076 cando = 100010; pixmap =
"eventobj.png";
2079 cando = 100000000; pixmap =
"eventobj.png";
2087 if (v1==v2)
return kTRUE;
2089 return (fabs(v1-v2) <= scale);
2099 if ((ax1==0) || (ax2==0))
return 0;
2101 Int_t num1 = ax1->GetNbins();
2102 Int_t num2 = ax2->GetNbins();
2104 Double_t scale = fabs(ax1->GetXmax() - ax1->GetXmin()) / (num1+1.) * 1e-3;
2108 if ((num1>num2/2) || (num1<2))
return 0;
2110 Int_t rebin = num2/num1;
2111 if (rebin==0)
return 0;
2114 if ((ax1->GetXbins()->GetSize()!=0) || (ax2->GetXbins()->GetSize()!=0))
return 0;
2121 if (num1*rebin!=num2) xmax = ax2->GetBinUpEdge(num1*rebin);
2122 else xmax = ax2->GetXmax();
2130 if ((ax1->GetXbins()->GetSize()==0) && (ax2->GetXbins()->GetSize()==0)) {
2134 for (Int_t n=1;n<=num1;n++)
2136 ax2->GetBinCenter(n), scale))
return 0;
2144 Bool_t tdisp(kFALSE);
2147 if (obj->InheritsFrom(TH1::Class())) {
2148 TH1* histo =
dynamic_cast<TH1*
> (obj);
2149 TH1* histo2 =
dynamic_cast<TH1*
> (newobj);
2150 if ((histo==0) || (histo2==0))
return kFALSE;
2152 if (dynamic_cast<TProfile*>(obj)!=0)
return kFALSE;
2154 if (histo->GetDimension()!=histo2->GetDimension())
return kFALSE;
2156 histo->SetTitle(histo2->GetTitle());
2158 Int_t rebinx = 1, rebiny = 1;
2160 rebinx =
CompareAxis(histo->GetXaxis(), histo2->GetXaxis());
2161 if (histo->GetDimension()>1)
2162 rebiny =
CompareAxis(histo->GetYaxis(), histo2->GetYaxis());
2163 if (histo->GetDimension()>2)
2164 if (
CompareAxis(histo->GetZaxis(), histo2->GetZaxis())!=1)
return kFALSE;
2166 if ((rebinx==0) || (rebiny==0))
return kFALSE;
2170 if ((rebinx>1) || (rebiny>1)) {
2171 if ((hasrebinx==0) || (hasrebiny==0))
return kFALSE;
2173 TH1* clon = (TH1*) histo2->Clone(
"____dummyhisto____");
2174 if (clon==0)
return kFALSE;
2175 clon->SetDirectory(0);
2176 Bool_t rebinres = kFALSE;
2178 if (histo->GetDimension() == 1) {
2179 clon->Rebin(rebinx);
2181 }
else if (histo->GetDimension() == 2) {
2182 TH2 *h2 =
dynamic_cast<TH2 *
>(clon);
2184 h2->Rebin2D(rebinx, rebiny);
2190 *hasrebinx = rebinx;
2191 *hasrebiny = rebiny;
2197 Int_t sz = histo->GetNbinsX()+2;
2198 if (histo->GetDimension()>1)
2199 sz = sz*(histo->GetNbinsY()+2);
2200 if (histo->GetDimension()>2)
2201 sz = sz*(histo->GetNbinsZ()+2);
2202 #if ROOT_VERSION_CODE < ROOT_VERSION(6,4,2)
2203 Bool_t canrebin = histo->TestBit(TH1::kCanRebin);
2204 histo->SetBit(TH1::kCanRebin, kFALSE);
2206 Bool_t canrebin = histo->CanExtendAllAxes();
2207 histo->SetCanExtend(TH1::kNoAxis);
2210 for (
int n=0;n<sz;n++) {
2211 Stat_t value = histo2->GetBinContent(n);
2213 histo->SetBinContent(n, value);
2216 #if ROOT_VERSION_CODE < ROOT_VERSION(6,4,2)
2217 if (canrebin) histo->SetBit(TH1::kCanRebin, kTRUE);
2219 if (canrebin) histo->SetCanExtend(TH1::kAllAxes);
2222 histo->SetEntries(sum);
2224 TArrayD *sumw_tgt = 0, *sumw_src = 0;
2226 if (histo2->GetSumw2N()>0)
2227 sumw_src = histo2->GetSumw2();
2233 histo->GetSumw2()->Set(0);
2238 if(histo->GetSumw2N()==0)
2240 sumw_tgt = histo->GetSumw2();
2243 if (sumw_src && sumw_tgt)
2244 sumw_tgt->Set(sz, sumw_src->GetArray());
2248 if (obj->InheritsFrom(TGo4Condition::Class())) {
2251 if ((cond==0) || (newcond==0))
return kFALSE;
2258 if (obj->InheritsFrom(TGraphAsymmErrors::Class())) {
2259 TGraphAsymmErrors* gr =
dynamic_cast<TGraphAsymmErrors*
> (obj);
2260 TGraph* newgr =
dynamic_cast<TGraph*
> (newobj);
2261 if ((gr==0) || (newgr==0))
return kFALSE;
2263 gr->SetTitle(newgr->GetTitle());
2265 Int_t npoints = newgr->GetN();
2267 Double_t xp, yp, exh, exl, eyh, eyl;
2268 for (Int_t n=0;n<npoints;n++) {
2269 newgr->GetPoint(n,xp,yp);
2270 gr->SetPoint(n,xp,yp);
2271 exh = newgr->GetErrorXhigh(n);
2272 exl = newgr->GetErrorXlow(n);
2273 eyh = newgr->GetErrorYhigh(n);
2274 eyl = newgr->GetErrorYlow(n);
2275 gr->SetPointError(n, exl, exh, eyl, eyh);
2282 if (obj->InheritsFrom(TGraphErrors::Class())) {
2283 TGraphErrors* gr =
dynamic_cast<TGraphErrors*
> (obj);
2284 TGraph* newgr =
dynamic_cast<TGraph*
> (newobj);
2285 if ((gr==0) || (newgr==0))
return kFALSE;
2287 gr->SetTitle(newgr->GetTitle());
2289 Int_t npoints = newgr->GetN();
2291 Double_t xp, yp, ex, ey;
2292 for (Int_t n=0;n<npoints;n++) {
2293 newgr->GetPoint(n,xp,yp);
2294 gr->SetPoint(n,xp,yp);
2295 ex = newgr->GetErrorX(n);
2296 ey = newgr->GetErrorY(n);
2297 gr->SetPointError(n, ex, ey);
2305 if (obj->InheritsFrom(TGraph::Class())) {
2306 TGraph* gr =
dynamic_cast<TGraph*
> (obj);
2307 TGraph* newgr =
dynamic_cast<TGraph*
> (newobj);
2308 if ((gr==0) || (newgr==0))
return kFALSE;
2313 gr->SetTitle(newgr->GetTitle());
2315 Int_t npoints = newgr->GetN();
2318 for (Int_t n=0;n<npoints;n++) {
2319 newgr->GetPoint(n,xp,yp);
2320 gr->SetPoint(n,xp,yp);
2327 if (obj->InheritsFrom(TLatex::Class())) {
2328 TLatex* l0 =
dynamic_cast<TLatex*
> (obj);
2329 TLatex* l1 =
dynamic_cast<TLatex*
> (newobj);
2330 if ((l1==0) || (l0==0))
return kFALSE;
2332 l0->SetTitle(l1->GetTitle());
2337 if (obj->InheritsFrom(TF1::Class())) {
2339 TF1* f0 =
dynamic_cast<TF1*
> (obj);
2340 TF1* f1 =
dynamic_cast<TF1*
> (newobj);
2341 if ((f1==0) || (f0==0))
return kFALSE;
2354 TH1* h1=gr->GetHistogram();
2355 TAxis* xax=h1->GetXaxis();
2356 timedisplay=xax->GetTimeDisplay();
2357 format=xax->GetTimeFormat();
2363 TH1*h1=gr->GetHistogram();
2364 TAxis* xax=h1->GetXaxis();
2365 xax->SetTimeDisplay(timedisplay);
2366 xax->SetTimeFormat(format.Data());
2372 if(oldgr==0 || newgr==0)
return;
2373 TList* theFunctions=oldgr->GetListOfFunctions();
2375 while ((obj = theFunctions->First())) {
2376 while (theFunctions->Remove(obj)) { }
2381 TList* newFunctions=newgr->GetListOfFunctions();
2382 TListIter fiter(newFunctions);
2384 while((fun=dynamic_cast<TF1*>(fiter.Next())) !=0)
2386 TF1* fclon=
dynamic_cast<TF1*
>(fun->Clone());
2387 theFunctions->Add(fclon);
2388 fclon->SetParent(oldgr);
2394 TH1* oldhis=oldgr->GetHistogram();
2395 TH1* newhis=newgr->GetHistogram();
2396 if(oldhis && newhis)
2398 oldhis->GetXaxis()->SetTitle(newhis->GetXaxis()->GetTitle());
2399 oldhis->GetYaxis()->SetTitle(newhis->GetYaxis()->GetTitle());
2408 if (itemslot==0)
return;
2414 TNamed* n = (TNamed*)
fxWaitingList->FindObject(itemname.Data());
2416 n->SetTitle(destination);
2418 fxWaitingList->Add(
new TNamed(itemname.Data(), destination));
2428 TNamed* n = (TNamed*)
fxWaitingList->FindObject(itemname.Data());
2430 const char* dest = n->GetTitle();
2431 if ((dest!=0) && (strlen(dest)==0)) dest = 0;
2442 TIter next(gROOT->GetListOfCanvases());
2444 while ((pad = (TPad*) next()) != 0) {
2447 TVirtualPad* subpad = 0;
2449 while ((subpad = pad->GetPad(number++))!=0)
static bool CanClearItem(int cando)
Bool_t Connect(const char *nodename)
void SetCanDelete(TGo4Slot *slot, Bool_t on=kTRUE)
static void RestoreAxisTimeProperties(TGraph *gr, Bool_t &timedisplay, TString &format)
void OpenFile(const char *fname)
Bool_t GetIntPar(const char *name, Int_t &value)
static void SaveAxisTimeProperties(TGraph *gr, Bool_t &timedisplay, TString &format)
void SetStartDir(const char *dir=0)
static TClass * GetClass(const char *classname, Bool_t load=kFALSE)
virtual Bool_t IsConnected()
Bool_t IsItemMonitored(TGo4Slot *slot)
void MakeHttpList(TObjArray *arr)
TString FindItem(const char *objname)
void SetIntPar(const char *name, Int_t value)
virtual void Update(TGo4Slot *slot, Bool_t strong)
void SetOutFileComment(const char *comment=0)
TString SaveToMemory(const char *pathname, TObject *obj, Bool_t ownership, Bool_t overwrite=kFALSE)
TObject * GetBrowserObject(const char *name, Int_t update=0)
void CheckPictureMonitor(TGo4Slot *slot)
void DataSlotName(const char *item, TString &res)
void SetProxy(TGo4Proxy *cont)
virtual Bool_t UpdateFrom(TGo4Condition *cond, Bool_t counts)
void ExportItemsTo(TObjArray *items, Bool_t fetchitems, const char *filename, const char *filedir, const char *format, const char *description)
TGo4Slot * FindSlot(const char *fullpath, const char **subname=0)
Int_t RequestObject(const char *source, const char *targetslot, Int_t waittime_millisec=0)
Int_t ItemKind(const char *name)
static Bool_t UpdateObjectContent(TObject *obj, TObject *newobj, Int_t *hasrebinx=0, Int_t *hasrebiny=0)
virtual const char * GetContainedClassName()
void UpdateBrowserContent()
virtual void Initialize(TGo4Slot *slot)
Bool_t DefineLeafName(const char *itemname, const char *treename, TString &leafname)
void AddFile(const char *pathname, const char *filename)
void UnregisterLink(TGo4Slot *target)
Bool_t IsItemRemote(const char *name)
void SetCurrentDir(const char *dir=0)
static bool CanDrawItem(int cando)
TGo4Proxy * GetProxy() const
const char * GetObjName(Int_t n)
Int_t UpdateVisibleAnalysisObjects(bool checkmonitor)
void RenameMemoryItem(const char *itemname, const char *newname)
virtual void ProduceFullName(TString &name, TGo4Slot *toparent=0)
void MakeFolder(const char *pathname)
Int_t UpdateAllMonitoredObjects()
void SetProtectionBits(TGo4Slot *slot, Int_t delprot, Int_t clearprot)
Int_t ItemCanDo(const char *name)
virtual Bool_t IsGo4Analysis() const
TGo4Slot * getslot() const
Bool_t DeleteDataSource(TGo4Slot *itemslot)
void MakeHServerList(TObjArray *arr)
TGo4ServerProxy * DefineServerObject(const char *itemname, TString *objname=0, Bool_t onlyanalysis=kTRUE)
Bool_t IsAnalysisItem(const char *name)
void RegisterLink(TGo4Slot *source, TGo4Slot *target, Bool_t exapndchilds=kFALSE)
const char * GetPar(const char *name) const
void PerformTreeDraw(const char *treename, const char *Xexp, const char *Yexp, const char *Zexp, const char *cutcond, const char *hname, TString &createdhistoname)
static Bool_t CompareAxisValues(Double_t v1, Double_t v2, Double_t scale)
static bool CanExecuteItem(int cando)
void DoItemMonitor(TGo4Slot *slot)
TClass * ItemClass(const char *name)
void DeleteChilds(const char *startedwith=0)
static bool CanExpandItem(int cando)
Int_t RequestBrowserObject(const char *name, Int_t wait_time=0)
virtual Bool_t AssignObject(TGo4Slot *slot, TObject *obj, Bool_t owner)
static Int_t CompareAxis(TAxis *ax1, TAxis *ax2)
virtual Bool_t AssignObject(TGo4Slot *slot, TObject *obj, Bool_t owner)
virtual Bool_t RequestObjectStatus(const char *objectname, TGo4Slot *tgtslot)
void CheckWaitingList(TGo4Slot *source)
void AddWaitingList(TGo4Slot *itemslot, const char *destination=0)
TGo4Slot * FindServerSlot(Bool_t databranch, Int_t kind=0)
TGo4ServerProxy * FindServer(const char *itemname=0, Bool_t asanalysis=kTRUE)
const char * getclassname()
Bool_t ConnectHServer(const char *servername, Int_t portnumber, const char *basename, const char *userpass, const char *filter)
void CreateMemorySubfolder(const char *itemname, const char *newfoldername)
Int_t getflag(const char *flagname)
virtual Bool_t HandleTimer(TTimer *timer)
Bool_t SaveBrowserToFile(const char *filename, Bool_t prefetch=kFALSE, const char *selectedpath=0, const char *description=0)
virtual void Finalize(TGo4Slot *slot)
void DeleteSlot(const char *pathname)
TGo4Slot * DataSlot(const char *item)
Bool_t ShiftSlotBefore(TGo4Slot *slot, TGo4Slot *before)
static const char * ItemInfo(TGo4Slot *slot)
static bool CanDragItem(int cando)
TObject * GetAssignedObject()
Bool_t IsCanDelete(TGo4Slot *slot)
Int_t CalculateFolderSizes(TGo4Slot *topslot)
void CopyClipboard(const char *tgtpath, Bool_t forcerequest=kFALSE)
const char * getfullname()
static bool CanExportItem(int cando)
Bool_t IsParent(const TGo4Slot *slot) const
virtual Bool_t RefreshNamesList()
TObject * GetObject(const char *name=0)
TGo4Slot * FindChild(const char *name)
Bool_t DefineFileObject(const char *itemname, TString &filedataslot, const char **filepath)
void CreateMemoryFolder(const char *foldername=0)
void ClearMemoryItem(const char *itemname)
virtual void RemoteTreeDraw(const char *treename, const char *varexp, const char *cutcond, const char *hname)
TGo4Slot * GetParent() const
Int_t ItemSizeInfo(TGo4Slot *slot)
void MakeFilesList(TObjArray *arr)
virtual void Update(Bool_t strong=kFALSE)
void MakeDabcList(TObjArray *arr)
static const char * ItemDate(TGo4Slot *slot)
virtual Bool_t UpdateAnalysisObject(const char *objectname, TObject *obj)
TGo4Slot * GetSlot(const char *name, Bool_t force=kFALSE)
void SaveDataToFile(TFile *f, Bool_t onlyobjs=kFALSE, TGo4Slot *startslot=0)
virtual ~TGo4BrowserObjProxy()
Bool_t UpdateObjectInFile(const char *filepath, TObject *obj)
void RequestObjectStatus(const char *name, TGo4Slot *tgtslot)
void RemovePar(const char *name)
TString FindItemInAnalysis(const char *objname)
const char * ItemClassName(const char *name)
TVirtualTreePlayer * fDummyTreePlayer
static const char * Message(Int_t prio, const char *text,...)
void AddToClipboard(const char *itemname)
void FetchItem(const char *itemname, Int_t wait_time=0)
Bool_t DefineRelatedObject(const char *itemname, const char *objectname, TString &objectitem, Int_t mask=3)
Int_t GetCalcSize(TGo4Slot *slot)
TGo4Slot * BrowserSlot(const char *item)
void SetItemMonitored(TGo4Slot *slot, Bool_t on=kTRUE)
virtual ~TGo4BrowserProxy()
TGo4Slot * BrowserMemorySlot()
TGo4Picture * FindPic(Int_t posy, Int_t posx)
Bool_t ProduceExplicitCopy(const char *itemname, const char *tgtpath=0, Bool_t forcerequest=kFALSE)
void AddProxy(const char *pathname, TGo4Proxy *cont, const char *name, const char *title="title")
Bool_t ConnectDabc(const char *nodename)
void RedrawItem(const char *itemname)
static bool CanCloseItem(int cando)
void SetHServConfig(const char *servername, Int_t portnumber, const char *basename, const char *userpass, const char *filter)
TGo4AnalysisProxy * FindAnalysis(const char *itemname=0)
void InformBrowserUpdate()
static const char * GetLinkedName(TGo4Slot *slot)
Bool_t DefineTreeName(const char *itemname, TString &treename)
void GetProtectionBits(TGo4Slot *slot, Int_t &delprot, Int_t &clearprot)
TGo4ServerProxy * DefineServerProxy(const char *itemname)
static void SetItemCanDo(TGo4Slot *slot, Int_t cando)
static void ProduceFolderAndName(const char *fullname, TString &foldername, TString &objectname)
TGo4Slot * GetLink() const
void ForwardEvent(TGo4Slot *source, Int_t id, void *param=0)
Int_t levelchange() const
void Export(TObject *ob, Go4Export_t format)
virtual void SetChanged(Bool_t on=kTRUE)
TGo4Slot * BrowserTopSlot()
void SetOutFile(const char *filename=0)
void AddServerProxy(TGo4ServerProxy *serv, const char *slotname, const char *info)
void SetCalcSize(TGo4Slot *slot, Int_t size)
virtual Bool_t ProcessEvent(TGo4Slot *slot, TGo4Slot *source, Int_t id, void *param)
void SetItemKind(TGo4Slot *slot, Int_t kind, const char *classname, const char *info, Int_t sizeinfo)
Bool_t AssignObject(TObject *obj, Bool_t owner)
static bool CanInfoItem(int cando)
TGo4BrowserObjProxy(TGo4Slot *slot, TObject *obj, Bool_t owner)
TString GetFullName(TGo4Slot *toparent=0)
virtual Bool_t DelayedRefreshNamesList(Int_t delay_sec)
static void SetLinkedName(TGo4Slot *slot, const char *itemname)
TGo4ServerProxy * DefineAnalysisObject(const char *itemname, TString &analysisname)
virtual const char * GetServerName() const
virtual Int_t NumberOfWaitingProxyes()
virtual TGo4ObjectManager * GetOM() const
Bool_t UpdateObjectInFile(const char *itemname, const char *fileslotname, const char *filepath)
void SetItemsFilter(Int_t filter)
void SetPar(const char *name, const char *value)
TGo4Slot * GetChild(Int_t n) const
static const char * ItemTime(TGo4Slot *slot)
static void UpdateListOfFunctions(TGraph *oldgr, TGraph *newgr)
Bool_t UpdateAnalysisItem(const char *itemname, TObject *obj=0)
static bool CanEditItem(int cando)
Bool_t BrowserItemName(TGo4Slot *itemslot, TString &res)
TGo4Slot * ItemSlot(const char *itemname)
static void SetItemTimeDate(TGo4Slot *slot, const char *stime=0, const char *sdate=0)
TGo4Slot * Add(const char *pathname, TObject *obj, Bool_t owner=kFALSE, Bool_t canrename=kFALSE)
static Int_t DefineItemProperties(Int_t kind, TClass *cl, TString &pixmap)
void ToggleMonitoring(Int_t period)
Bool_t SaveItemToFile(const char *itemname, const char *filename, const char *subfolder=0)
Bool_t next(Bool_t goesinto=kTRUE)
virtual Bool_t Use() const
void BrowserSlotName(const char *item, TString &res)