/[PAMELA software]/eventviewer/flight/src/FEVpamevcontrol.cpp
ViewVC logotype

Contents of /eventviewer/flight/src/FEVpamevcontrol.cpp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.13 - (show annotations) (download)
Fri Apr 13 08:07:31 2012 UTC (12 years, 8 months ago) by mocchiut
Branch: MAIN
CVS Tags: v10REDr01, v10RED, HEAD
Changes since 1.12: +8 -8 lines
Level0 bug fixed, SVL cutoff added to legend

1 #include <math.h>
2 #include <stdio.h>
3 #include <iostream>
4 #include <iomanip>
5 #include <fstream>
6 #include <sstream>
7 #if (__GNUC__ == 3) && (__GNUC_MINOR__ == 2)
8 char* operator+( std::streampos&, char* );
9 #endif
10 //
11 #include <TObjectTable.h>
12 #include <TGClient.h>
13 #include <TGButton.h>
14 #include <TGComboBox.h>
15 #include <TGLabel.h>
16 #include <TGTextEntry.h>
17 #include <TGFrame.h>
18 #include <TGButtonGroup.h>
19 #include <TGProgressBar.h>
20 #include <TGMsgBox.h>
21 #include <TGComboBox.h>
22 #include <TTree.h>
23 #include <TClassEdit.h>
24 #include <TObject.h>
25 #include <TList.h>
26 #include <TSystem.h>
27 #include <TSystemDirectory.h>
28 #include <TString.h>
29 #include <TFile.h>
30 #include <TClass.h>
31 #include <TCanvas.h>
32 #include <TH1.h>
33 #include <TH1F.h>
34 #include <TH2D.h>
35 #include <TLatex.h>
36 #include <TPad.h>
37 #include <TPaveLabel.h>
38 #include <TLine.h>
39 #include <TPolyLine.h>
40 #include <TChain.h>
41 #include <TApplication.h>
42 #include <TVirtualX.h>
43 #include <TGClient.h>
44 #include <TGWindow.h>
45 #include <TEllipse.h>
46 #include <TArrow.h>
47 #include <TStyle.h>
48 //
49 #include <PamLevel2.h>
50 //
51 #include <FEVpamevcontrol.h>
52 //
53 ClassImp(PAMevcontrol);
54 ClassImp(CalorimeterCalibration);
55 //
56
57 using namespace std;
58
59 void stringcopy(TString& s1, const TString& s2, Int_t from=0, Int_t to=0){
60 if ( to == 0 ){
61 Int_t t2length = s2.Length();
62 s1 = "";
63 to = t2length;
64 };
65 for (Int_t i = from; i<to; i++){
66 s1.Append(s2[i],1);
67 };
68 }
69
70 void stringappend(TString& s1, const TString& s2){
71 Int_t t2length = s2.Length();
72 for (Int_t i = 0; i<t2length; i++){
73 s1.Append(s2[i],1);
74 };
75 }
76
77 CalorimeterCalibration::CalorimeterCalibration() {
78 fname = "dw_000000_000.dat";
79 status = 0;
80 for (Int_t i=0; i<2;i++){
81 for (Int_t j=0; j<22;j++){
82 for (Int_t m=0; m<96;m++){
83 mip[i][j][m] = 0.;
84 ermip[i][j][m] = 0.;
85 chi2[i][j][m] = 0.;
86 ndf[i][j][m] = 0.;
87 mask[i][j][m] = 0.;
88 for (Int_t a = 0; a < 4 ; a++){
89 fp[a][i][j][m] = 0.;
90 fpe[a][i][j][m] = 0.;
91 };
92 };
93 };
94 };
95 };
96
97 PAMevcontrol::PAMevcontrol(const TGWindow *p,UInt_t w,UInt_t h,Variables & var, Levels &level, TCanvas &figure) : TGMainFrame(p, w, h){
98 //
99 SetCleanup(kDeepCleanup);
100 DontCallClose();
101 Connect("CloseWindow()","PAMevcontrol",this,"Terminate()");
102 //
103 clev = &level;
104 cvar = &var;
105 thefigure = &figure;
106 //
107 cframe1 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);
108 TGCompositeFrame *cframe2 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);
109 TGCompositeFrame *cframe3 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);
110 TGCompositeFrame *cframe4 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);
111 TGCompositeFrame *cframe5 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);
112 gf = new TGGroupFrame(cframe1, "Detectors");
113 TGGroupFrame *gf2 = new TGGroupFrame(cframe5, "Appearance");
114 TGGroupFrame *inputf = new TGGroupFrame(cframe2, "Input");
115 TGGroupFrame *jumpf = new TGGroupFrame(cframe3, "Jump to");
116 TGGroupFrame *savef = new TGGroupFrame(cframe4, "Save figure as");
117 //
118 TGHorizontalFrame *htexts = new TGHorizontalFrame(savef,300,800);
119 TGHorizontalFrame *htextsl = new TGHorizontalFrame(cframe4,300,800);
120 TGHorizontalFrame *htext = new TGHorizontalFrame(inputf,300,800);
121 TGHorizontalFrame *htext2 = new TGHorizontalFrame(inputf,300,800);
122 TGHorizontalFrame *htext3 = new TGHorizontalFrame(jumpf,300,800);
123 TGHorizontalFrame *htext4 = new TGHorizontalFrame(jumpf,300,80);
124 TGHorizontalFrame *hframe = new TGHorizontalFrame(this,300,800);
125 for (Int_t fr=0; fr<12; fr++) hframedec[fr] = new TGHorizontalFrame(gf, 7, 7);
126 TGHorizontalFrame *hframe3 = new TGHorizontalFrame(gf2, 280, 60);
127 TGHorizontalFrame *hframe4 = new TGHorizontalFrame(gf2,280,10);
128 TGVerticalFrame *hframe5 = new TGVerticalFrame(hframe4, 280, 60);
129 TGHorizontalFrame *hfrprog = new TGHorizontalFrame(this,300,800);
130 //
131 TGTextEntry *fText = new TGTextEntry(htext, new TGTextBuffer(20),-1);
132 fText->SetText(cvar->thefilename.Data());
133 TGTextButton *Load = new TGTextButton(htext,"Load");
134 Load->Connect("Pressed()","TGTextEntry",fText,"ReturnPressed()");
135 fText->Connect("ReturnPressed()", "PAMevcontrol", this,"SetFilename()");
136 fText->Connect("TabPressed()", "PAMevcontrol", this,"CompleteText()");
137 htext->AddFrame(fText, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY, 0, 5, 5, 5));
138 htext->AddFrame(Load, new TGLayoutHints(kLHintsCenterX,0,5,5,5));
139 inputf->AddFrame(new TGLabel(inputf, new TGHotString("Filename:")));
140 inputf->AddFrame(htext, new TGLayoutHints(kLHintsExpandX));
141 //
142 fText2 = new TGTextEntry(htext2, new TGTextBuffer(20),-1);
143 fText2->SetText(cvar->thefilter.Data());
144 TGTextButton *Load2 = new TGTextButton(htext2,"Load");
145 Load2->Connect("Clicked()","TGTextEntry",fText2,"ReturnPressed()");
146 Load2->SetToolTipText("Clear box and click to unload file");
147 fText2->Connect("ReturnPressed()", "PAMevcontrol", this,"SetFilter()");
148 fText2->Connect("TabPressed()", "PAMevcontrol", this,"CompleteText()");
149 htext2->AddFrame(fText2, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY, 0, 5, 5, 5));
150 htext2->AddFrame(Load2, new TGLayoutHints(kLHintsCenterX,0,5,5,5));
151 inputf->AddFrame(new TGLabel(inputf, new TGHotString("Selection file:")));
152 inputf->AddFrame(htext2, new TGLayoutHints(kLHintsExpandX));
153 //
154 cframe2->AddFrame(inputf,new TGLayoutHints(kLHintsExpandX,5,5,5,5));
155 //
156 //
157 //
158 fComboDec = new TGComboBox(gf, 98);
159 fComboDec->AddEntry(" - Select Detector -", 11);
160 fComboDec->AddEntry("PSCU - ORB", 0);
161 fComboDec->AddEntry("Run", 1);
162 fComboDec->AddEntry("Trigger", 2);
163 fComboDec->AddEntry("ToF", 3);
164 fComboDec->AddEntry("Tracker", 4);
165 fComboDec->AddEntry("Anticounter", 5);
166 fComboDec->AddEntry("Calorimeter", 6);
167 fComboDec->AddEntry("S4", 7);
168 fComboDec->AddEntry("ND", 8);
169 fComboDec->AddEntry("Software info", 9);
170 fComboDec->AddEntry("ALL", 10);
171 fComboDec->Select(11);
172 fComboDec->Resize(150,23);
173 gf->AddFrame(fComboDec, new TGLayoutHints(kLHintsCenterY | kLHintsExpandX| kLHintsLeft, 5, 7, 7, 7));
174 fComboDec->Connect("Selected(Int_t)","PAMevcontrol",this,"refreshdec(Int_t)");
175 //
176 // PSCU/Orbital
177 //
178 fshoworb = new TGTextButton(hframedec[0], "Show Data");
179 fshoworb->Connect("Clicked()","PAMevcontrol", this,"showorbdata()");
180 if ( !cvar->ORB ) fshoworb->SetState(kButtonDisabled);
181 hframedec[0]->AddFrame(fshoworb, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,5,5,5));
182 //
183 // RUN
184 //
185 fshowrun = new TGTextButton(hframedec[1], "Show Data");
186 fshowrun->Connect("Clicked()","PAMevcontrol", this,"showrundata()");
187 if ( !cvar->RUN ) fshoworb->SetState(kButtonDisabled);
188 hframedec[1]->AddFrame(fshowrun, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,5,5,5));
189 //
190 // Trigger
191 //
192 fshowtrg = new TGTextButton(hframedec[2], "Show Data");
193 fshowtrg->Connect("Clicked()","PAMevcontrol", this,"showtrgdata()");
194 if ( !cvar->TRG ) fshowtrg->SetState(kButtonDisabled);
195 hframedec[2]->AddFrame(fshowtrg, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,5,5,5));
196 //
197 // TOF
198 //
199 fchktof = new TGCheckButton(hframedec[3], "Show");
200 fchktof->Connect("Clicked()","PAMevcontrol", this,"chktof()");
201 if ( cvar->TOF ) fchktof->SetState(kButtonDown);
202 hframedec[3]->AddFrame(fchktof, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
203 fshowtof = new TGTextButton(hframedec[3], "Show Data");
204 fshowtof->Connect("Clicked()","PAMevcontrol", this,"showtofdata()");
205 if ( !cvar->TOF ) fshowtof->SetState(kButtonDisabled);
206 hframedec[3]->AddFrame(fshowtof, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,2,5,5,5));
207 //
208 // Tracker
209 //
210 fchktrk = new TGCheckButton(hframedec[4], "Show");
211 fchktrk->Connect("Clicked()","PAMevcontrol",this,"chktrk()");
212 if ( cvar->TRK ) fchktrk->SetState(kButtonDown);
213 hframedec[4]->AddFrame(fchktrk, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
214 fshowtrk = new TGTextButton(hframedec[4], "Show Data");
215 fshowtrk->Connect("Clicked()","PAMevcontrol", this,"showtrkdata()");
216 if ( !cvar->TRK ) fshowtrk->SetState(kButtonDisabled);
217 hframedec[4]->AddFrame(fshowtrk, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,2,5,5,5));
218 //
219 // AC
220 //
221 fchkac = new TGCheckButton(hframedec[5], "Show");
222 fchkac->Connect("Clicked()","PAMevcontrol", this,"chkac()");
223 if ( cvar->AC ) fchkac->SetState(kButtonDown);
224 hframedec[5]->AddFrame(fchkac, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
225 fshowac = new TGTextButton(hframedec[5], "Show Data");
226 fshowac->Connect("Clicked()","PAMevcontrol", this,"showacdata()");
227 if ( !cvar->AC ) fshowac->SetState(kButtonDisabled);
228 hframedec[5]->AddFrame(fshowac, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,2,5,5,5));
229 //
230 // Calorimeter
231 //
232 fchkcalo = new TGCheckButton(hframedec[6], "Show");
233 fchkcalo->Connect("Clicked()","PAMevcontrol",this,"chkcalo()");
234 if ( cvar->CALO ) fchkcalo->SetState(kButtonDown);
235 hframedec[6]->AddFrame(fchkcalo, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
236 fchkcalost = new TGCheckButton(hframedec[6], "Track");
237 fchkcalost->Connect("Clicked()","PAMevcontrol",this,"chkcalost()");
238 if ( cvar->CALO ) fchkcalost->SetState(kButtonUp);
239 hframedec[6]->AddFrame(fchkcalost, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,2,2,5,5));
240 fshowcal = new TGTextButton(hframedec[6], "Show Data");
241 fshowcal->Connect("Clicked()","PAMevcontrol", this,"showcaldata()");
242 if ( !cvar->CALO ) fshowcal->SetState(kButtonDisabled);
243 hframedec[6]->AddFrame(fshowcal, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,2,5,5,5));
244 //
245 // S4
246 //
247 fchks4 = new TGCheckButton(hframedec[7], "Show");
248 fchks4->Connect("Clicked()","PAMevcontrol",this,"chks4()");
249 if ( cvar->S4 ) fchks4->SetState(kButtonDown);
250 hframedec[7]->AddFrame(fchks4, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
251 fshows4 = new TGTextButton(hframedec[7], "Show Data");
252 fshows4->Connect("Clicked()","PAMevcontrol", this,"shows4data()");
253 if ( !cvar->S4 ) fshows4->SetState(kButtonDisabled);
254 hframedec[7]->AddFrame(fshows4, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,2,5,5,5));
255 //
256 // ND
257 //
258 fchknd = new TGCheckButton(hframedec[8], "Show");
259 fchknd->Connect("Clicked()","PAMevcontrol",this,"chknd()");
260 if ( cvar->ND ) fchknd->SetState(kButtonDown);
261 hframedec[8]->AddFrame(fchknd, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
262 fshownd = new TGTextButton(hframedec[8], "Show Data");
263 fshownd->Connect("Clicked()","PAMevcontrol", this,"shownddata()");
264 if ( !cvar->ND ) fshownd->SetState(kButtonDisabled);
265 hframedec[8]->AddFrame(fshownd, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,2,5,5,5));
266 //
267 // Software infos
268 //
269 fshowsi = new TGTextButton(hframedec[9], "Show Data");
270 fshowsi->Connect("Clicked()","PAMevcontrol", this,"showsidata()");
271 if ( !cvar->RUN ) fshoworb->SetState(kButtonDisabled);
272 hframedec[9]->AddFrame(fshoworb, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
273 //
274 // All data
275 //
276 fshowall = new TGTextButton(hframedec[10], "Show Data");
277 fshowall->Connect("Clicked()","PAMevcontrol", this,"showalldata()");
278 hframedec[10]->AddFrame(fshowall, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,5,5,5));
279 //
280 // for (Int_t fr=0; fr<11; fr++) gf->AddFrame(hframedec[fr], new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,1,1,1,1));
281 //
282 gf->AddFrame(hframedec[11], new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,5,17,17));
283 //
284 // for (Int_t fr=0; fr<11; fr++) gf->AddFrame(hframedec[fr],new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,0,5,5,5));
285 // gf->GetLayoutManager()->SetPadBottom(5);
286 // gf->MapSubwindows();
287 //
288 fchkinfo = new TGCheckButton(hframe3, "Infos");
289 fchkinfo->Connect("Clicked()","PAMevcontrol",this,"chkinfo()");
290 if ( cvar->INFOS ) fchkinfo->SetState(kButtonDown);
291 hframe3->AddFrame(fchkinfo, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,0,1,5,5));
292 //
293 fchknames = new TGCheckButton(hframe3, "Names");
294 fchknames->Connect("Clicked()","PAMevcontrol",this,"chknames()");
295 if ( cvar->VINFOS ) fchknames->SetState(kButtonDown);
296 hframe3->AddFrame(fchknames, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,0,1,5,5));
297
298 fchkpalette = new TGCheckButton(hframe3, "Palette");
299 fchkpalette->Connect("Clicked()","PAMevcontrol",this,"chkpalette()");
300 if ( cvar->PALETTE) fchkpalette->SetState(kButtonDown);
301 hframe3->AddFrame(fchkpalette, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,0,2,5,5));
302
303 fchktrigger = new TGCheckButton(hframe3, "Trigger");
304 fchktrigger->Connect("Clicked()","PAMevcontrol",this,"chktrigger()");
305 if ( cvar->PATTRIG) fchktrigger->SetState(kButtonDown);
306 hframe3->AddFrame(fchktrigger, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,1,2,5,5));
307
308 gf2->AddFrame(hframe3, new TGLayoutHints(kLHintsExpandX));
309 //
310 TGVButtonGroup *group = new TGVButtonGroup(hframe4);
311 bwc0 = new TGRadioButton(group, "Colour");
312 bwc1 = new TGRadioButton(group, "B/W");
313 if ( cvar->bw ){
314 bwc1->SetState(kButtonDown);
315 } else {
316 bwc0->SetState(kButtonDown);
317 };
318 bwc0->Connect("Pressed()", "PAMevcontrol",this,"radiocolor()");
319 bwc1->Connect("Pressed()", "PAMevcontrol",this,"radiobw()");
320 hframe4->AddFrame(group,new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
321 //
322 //
323 // ftrks4 = new TGCheckButton(hframe5, "Track in S4/ND");
324 // ftrks4->Connect("Clicked()","PAMevcontrol",this,"radiotrack()");
325 // if ( cvar->tracknds4) ftrks4->SetState(kButtonDown);
326 // hframe5->AddFrame(ftrks4, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
327
328 fgetl0 = new TGTextButton(hframe5, "Get L0 file");
329 fgetl0->Connect("Clicked()","PAMevcontrol", this,"getl0file()");
330 hframe5->AddFrame(fgetl0, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,5,5,5));
331
332 ffl0 = new TGCheckButton(hframe5, "Force RAW");
333 ffl0->Connect("Clicked()","PAMevcontrol",this,"forcel0()");
334 if ( cvar->fl0 ) ffl0->SetState(kButtonDown);
335 if ( !cvar->fl0 ) ffl0->SetState(kButtonUp);
336 hframe5->AddFrame(ffl0, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,2,5,5,5));
337 //
338 hframe4->AddFrame(hframe5, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,10,5,5,5));
339 gf2->AddFrame(hframe4, new TGLayoutHints(kLHintsExpandX));
340 //
341 cframe1->AddFrame(gf, new TGLayoutHints(kLHintsExpandX,5,5,5,5));
342 // cframe1->Resize(280,10);
343 // cframe1->GetLayoutManager()->SetDefaultHeight(5);
344 // MapWindow();
345 //
346 cframe5->AddFrame(gf2, new TGLayoutHints(kLHintsExpandX,5,5,5,5));
347 //
348 TGHButtonGroup *jgroup = new TGHButtonGroup(htext4);
349 jbwc0 = new TGRadioButton(jgroup, "packet ");
350 jbwc1 = new TGRadioButton(jgroup, "progressive");
351 jbwc1->SetState(kButtonDown);
352 jbwc0->Connect("Pressed()", "PAMevcontrol",this,"radioevent()");
353 jbwc1->Connect("Pressed()", "PAMevcontrol",this,"radioprog()");
354 htext4->AddFrame(jgroup,new TGLayoutHints(kLHintsExpandX,1,1,0,0));
355 //
356 TGTextEntry *fText3 = new TGTextEntry(htext3, new TGTextBuffer(6),-1);
357 TGTextButton *Jump = new TGTextButton(htext3,"go");
358 Jump->Connect("Clicked()","TGTextEntry",fText3,"ReturnPressed()");
359 fText3->Connect("ReturnPressed()", "PAMevcontrol", this,"jumpto()");
360 htext3->AddFrame(new TGLabel(htext3, new TGHotString("number")), new TGLayoutHints(kLHintsExpandX,0,0,1,1));
361 htext3->AddFrame(fText3, new TGLayoutHints(kLHintsExpandX, 0, 8, 0, 0));
362 htext3->AddFrame(Jump, new TGLayoutHints(kLHintsExpandX,0,0,0,0));
363 jumpf->AddFrame(htext4, new TGLayoutHints(kLHintsExpandX,0,0,1,1)); //
364 jumpf->AddFrame(htext3, new TGLayoutHints(kLHintsExpandX,0,0,0,1)); //
365 //
366 cframe3->AddFrame(jumpf,new TGLayoutHints(kLHintsExpandX,5,5,5,5));
367 //
368 fText4 = new TGTextEntry(htexts, new TGTextBuffer(18),-1);
369 TGTextButton *save = new TGTextButton(htextsl,"save");
370 save->Connect("Clicked()","TGTextEntry",fText4,"ReturnPressed()");
371 fText4->Connect("ReturnPressed()", "PAMevcontrol", this,"saveas()");
372 fText4->Connect("TabPressed()", "PAMevcontrol", this,"CompleteText()");
373 htexts->AddFrame(fText4, new TGLayoutHints(kLHintsExpandX, 0, 8, 1, 1));
374 //
375 fCombo = new TGComboBox(htexts, 98);
376 fCombo->AddEntry(".ps", 0);
377 fCombo->AddEntry(".eps", 1);
378 fCombo->AddEntry(".gif", 2);
379 fCombo->AddEntry(".jpg", 3);
380 fCombo->AddEntry(".tiff", 4);
381 fCombo->AddEntry(".xpm", 5);
382 fCombo->AddEntry(".pdf", 6);
383 fCombo->AddEntry(".xml", 7);
384 fCombo->AddEntry(".png", 8);
385 fCombo->AddEntry(".svg", 9);
386 fCombo->AddEntry(".root", 10);
387 fCombo->AddEntry(".C", 11);
388 fCombo->Select(0);
389 fCombo->Resize(50,23);
390 // htexts->AddFrame(fCombo, new TGLayoutHints(kLHintsCenterX | kLHintsTop | kLHintsLeft | kLHintsCenterY | kLHintsExpandX, 0, 8, 1, 1));
391 htexts->AddFrame(fCombo, new TGLayoutHints(kLHintsExpandY | kLHintsExpandY| kLHintsRight, 2, 2, 2, 1));
392 //
393 htextsl->AddFrame(save, new TGLayoutHints(kLHintsExpandX,0,0,2,1));
394 savef->AddFrame(htexts, new TGLayoutHints(kLHintsExpandX,0,0,2,5));
395 // savef->AddFrame(htextsl, new TGLayoutHints(kLHintsExpandX,5,2,5,2));
396 savef->AddFrame(htextsl, new TGLayoutHints(kLHintsExpandX,8,0,5,2));
397 //
398 cframe4->AddFrame(savef,new TGLayoutHints(kLHintsExpandX,5,5,5,5));
399 //
400 fHProg1 = new TGHProgressBar(hfrprog, TGProgressBar::kFancy, 260);
401 fHProg1->SetBarColor("green");
402 fHProg1->ShowPosition();
403 hfrprog->AddFrame(fHProg1, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY | kLHintsExpandX,5,5,5,5));
404 //
405 //
406 TGTextButton *prev = new TGTextButton(hframe,"< &Back");
407 prev->Connect("Clicked()","PAMevcontrol",this,"prev()");
408 hframe->AddFrame(prev, new TGLayoutHints(kLHintsCenterX | kLHintsExpandX,5,5,3,4));
409 //
410 TGTextButton *exit = new TGTextButton(hframe,"E&xit");//,"gApplication->Terminate(0)");
411 exit->Connect("Clicked()","PAMevcontrol",this,"Terminate()");
412 exit->SetToolTipText("Quit the event viewer");
413 hframe->AddFrame(exit, new TGLayoutHints(kLHintsCenterX | kLHintsExpandX,5,5,3,4));
414 //
415 bstop = new TGTextButton(hframe,"&Stop");
416 bstop->Connect("Clicked()","PAMevcontrol",this,"stop()");
417 hframe->AddFrame(bstop, new TGLayoutHints(kLHintsCenterX | kLHintsExpandX,5,5,3,4));
418 bstop->SetState(kButtonDisabled);
419 //
420 TGTextButton *next = new TGTextButton(hframe,"&Next >");
421 next->Connect("Clicked()","PAMevcontrol",this,"next()");
422 hframe->AddFrame(next, new TGLayoutHints(kLHintsCenterX | kLHintsExpandX,5,5,3,4));
423 //
424 //
425 // AddFrame(htext, new TGLayoutHints(kLHintsExpandX,2,2,15,1));
426 AddFrame(cframe2, new TGLayoutHints(kLHintsExpandX,1,1,1,1));
427 AddFrame(cframe1, new TGLayoutHints(kLHintsExpandX,1,1,1,1));
428 AddFrame(cframe5, new TGLayoutHints(kLHintsExpandX,1,1,1,1));
429 AddFrame(cframe3, new TGLayoutHints(kLHintsExpandX,1,1,1,1));
430 AddFrame(cframe4, new TGLayoutHints(kLHintsExpandX,1,1,1,1));
431 AddFrame(hfrprog, new TGLayoutHints(kLHintsExpandX,1,1,1,1));
432 AddFrame(hframe, new TGLayoutHints(kLHintsExpandX,1,1,1,1));
433 // Set a name to the main frame
434 SetWindowName("PAMELA Event Viewer control panel");
435 // Map all subwindows of main frame
436 MapSubwindows();
437 // Initialize the layout algorithm
438 Resize(GetDefaultSize());
439 // Map main frame
440 MapWindow();
441 //
442 gf->HideFrame(hframedec[11]);
443 for (Int_t fr=0; fr<11; fr++){
444 gf->AddFrame(hframedec[fr],new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,0,5,5,5));
445 gf->HideFrame(hframedec[fr]);
446 };
447 gf->MapSubwindows();
448 //
449 }
450
451 void PAMevcontrol::Refresh(){
452 // bah
453 return;
454 this->Clear();
455 MapSubwindows();
456 // Initialize the layout algorithm
457 Resize(GetDefaultSize());
458 // Map main frame
459 MapWindow();
460 }
461
462 void PAMevcontrol::DIALOG(Int_t ty, TString warn){
463 //
464 // ty = 0 -> INFO, ty = 1 -> WARNING, ty = 2 -> ERROR
465 //
466 Int_t retval;
467 TString title;
468 EMsgBoxIcon mb_icon = kMBIconStop;
469 if ( ty == 2 || ty == 3 ){
470 if ( ty == 2 ){
471 title="ERROR!!";
472 mb_icon = kMBIconStop;
473 new TGMsgBox(gClient->GetRoot(), this, title.Data(), warn.Data(), mb_icon, kMBOk, &retval);
474 } else {
475 title="HELP";
476 mb_icon = kMBIconQuestion;
477 new TGMsgBox(gClient->GetRoot(), this, title.Data(), warn.Data(), mb_icon, kMBOk, &retval);
478 };
479 } else {
480 if ( ty == 0 ){
481 title="INFO";
482 mb_icon = kMBIconAsterisk;
483 };
484 if ( ty == 1 ){
485 title="WARNING!";
486 mb_icon = kMBIconExclamation;
487 };
488 if ( ty == 4 ){
489 title="DATA";
490 mb_icon = kMBIconExclamation;
491 };
492 const TGPicture *icon_pic;
493 switch (mb_icon) {
494 case kMBIconStop:
495 icon_pic = gClient->GetPicture("mb_stop_s.xpm");
496 if (!icon_pic) Error("TGMsgBox", "mb_stop_s.xpm not found");
497 break;
498
499 case kMBIconQuestion:
500 icon_pic = gClient->GetPicture("mb_question_s.xpm");
501 if (!icon_pic) Error("TGMsgBox", "mb_question_s.xpm not found");
502 break;
503
504 case kMBIconExclamation:
505 icon_pic = gClient->GetPicture("mb_exclamation_s.xpm");
506 if (!icon_pic) Error("TGMsgBox", "mb_exclamation_s.xpm not found");
507 break;
508
509 case kMBIconAsterisk:
510 icon_pic = gClient->GetPicture("mb_asterisk_s.xpm");
511 if (!icon_pic) Error("TGMsgBox", "mb_asterisk_s.xpm not found");
512 break;
513
514 default:
515 icon_pic = 0;
516 break;
517 }
518 //
519 if ( ty == 4 ){// non funziona il recupero dei puntatori a questi oggetti come e` possibile?
520 // gObjectTable->Print();
521 TGLabel *la=dynamic_cast<TGLabel*>(gDirectory->FindObject("la"));
522 TGHorizontalFrame *fLabelFrame=dynamic_cast<TGHorizontalFrame*>(gDirectory->FindObject("fLabelFrame"));
523 TGTransientFrame *compofra=dynamic_cast<TGTransientFrame*>(gDirectory->FindObject("compofra"));
524 if ( la ) la->Delete();
525 if ( fLabelFrame ) fLabelFrame->Delete();
526 if ( compofra ){
527 compofra->DestroyWindow();
528 compofra->Delete();
529 };
530 };
531 TGTransientFrame *compofra = new TGTransientFrame(gClient->GetRoot(), 0, 200, 80, kHorizontalFrame);
532 TGHorizontalFrame *fIconFrame = NULL;
533 TGIcon *fIcon = NULL;
534 if ( ty != 4 ){
535 compofra->DontCallClose();
536 fIconFrame = new TGHorizontalFrame(compofra, 98, 78);
537 fIcon = new TGIcon(fIconFrame, icon_pic, icon_pic->GetWidth(), icon_pic->GetHeight());
538 fIconFrame->AddFrame(fIcon, new TGLayoutHints(kLHintsCenterX|kLHintsCenterY, 1, 1, 1, 1));
539 compofra->AddFrame(fIconFrame, new TGLayoutHints(kLHintsCenterX|kLHintsCenterY, 1, 1, 1, 1));
540 };
541 //
542 TGHorizontalFrame *fLabelFrame = new TGHorizontalFrame(compofra, 98, 78);
543 TGLabel *la=new TGLabel(fLabelFrame,warn.Data());
544 la->SetTextJustify(kLHintsCenterX);
545 fLabelFrame->AddFrame(la, new TGLayoutHints(kLHintsCenterX|kLHintsCenterY, 1, 1, 1, 1));
546 compofra->AddFrame(fLabelFrame, new TGLayoutHints(kLHintsCenterX|kLHintsCenterY, 1, 1, 1, 1));
547 //
548 compofra->SetWindowName(title.Data());
549 compofra->MapSubwindows();
550 if ( ty != 4 ){
551 compofra->Resize(compofra->GetDefaultWidth(),80);
552 } else {
553 compofra->Resize(compofra->GetDefaultSize());
554 };
555 compofra->CenterOnParent();
556 compofra->MapWindow();
557 //
558 if ( ty != 4 ){
559 Int_t kkk = 0;
560 while ( kkk < 200 ){
561 gSystem->ProcessEvents();
562 gSystem->Sleep(10);
563 kkk++;
564 };
565 };
566 if ( compofra && ty != 4 ){
567 la->Delete();
568 fLabelFrame->Delete();
569 if ( fIcon ) fIcon->Delete();
570 if ( fIconFrame ) fIconFrame->Delete();
571 compofra->DestroyWindow();
572 compofra->Delete();
573 };
574 };
575 //
576 }
577
578 void PAMevcontrol::refreshdec(Int_t n){
579 //
580 for (Int_t i=0; i<11; i++){
581 gf->HideFrame(hframedec[i]);
582 };
583 //
584 if ( n < 11 ){
585 gf->ShowFrame(hframedec[n]);
586 };
587 };
588
589
590 void PAMevcontrol::showorbdata(){
591 cvar->showorb = !cvar->showorb;
592 if ( !cvar->showorb ) fshoworb->SetText("Show Data");
593 if ( cvar->showorb ) fshoworb->SetText("Hide Data");
594 // printf("orb \n");
595 };
596
597 void PAMevcontrol::showtrgdata(){
598 cvar->showtrg = !cvar->showtrg;
599 if ( !cvar->showtrg ) fshowtrg->SetText("Show Data");
600 if ( cvar->showtrg ) fshowtrg->SetText("Hide Data");
601 // printf("trg \n");
602 };
603
604 void PAMevcontrol::showrundata(){
605 cvar->showrun = !cvar->showrun;
606 if ( !cvar->showrun ) fshowrun->SetText("Show Data");
607 if ( cvar->showrun ) fshowrun->SetText("Hide Data");
608 // printf("run \n");
609 };
610
611 void PAMevcontrol::showcaldata(){
612 cvar->showcal = !cvar->showcal;
613 if ( !cvar->showcal ) fshowcal->SetText("Show Data");
614 if ( cvar->showcal ) fshowcal->SetText("Hide Data");
615 // printf("cal \n");
616 };
617
618 void PAMevcontrol::chkcalost(){
619 if ( cvar->CALOT ) {
620 cvar->CALOT = 0;
621 } else {
622 cvar->CALOT = 1;
623 };
624 cvar->i--;
625 cvar->nevents = 0;
626 cvar->firstevno = 0;
627 cvar->lastevno = 0;
628 cvar->refresh = true;
629 };
630
631 void PAMevcontrol::showtrkdata(){
632 cvar->showtrk = !cvar->showtrk;
633 if ( !cvar->showtrk ) fshowtrk->SetText("Show Data");
634 if ( cvar->showtrk ) fshowtrk->SetText("Hide Data");
635 // printf("trk \n");
636 };
637
638 void PAMevcontrol::showtofdata(){
639 cvar->showtof = !cvar->showtof;
640 if ( !cvar->showtof ) fshowtof->SetText("Show Data");
641 if ( cvar->showtof ) fshowtof->SetText("Hide Data");
642 // printf("tof \n");
643 };
644
645 void PAMevcontrol::showacdata(){
646 cvar->showac = !cvar->showac;
647 if ( !cvar->showac ) fshowac->SetText("Show Data");
648 if ( cvar->showac ) fshowac->SetText("Hide Data");
649 // printf("ac \n");
650 };
651
652 void PAMevcontrol::shownddata(){
653 cvar->shownd = !cvar->shownd;
654 if ( !cvar->shownd ) fshownd->SetText("Show Data");
655 if ( cvar->shownd ) fshownd->SetText("Hide Data");
656 // printf("nd \n");
657 };
658
659 void PAMevcontrol::shows4data(){
660 cvar->shows4 = !cvar->shows4;
661 if ( !cvar->shows4 ) fshows4->SetText("Show Data");
662 if ( cvar->shows4 ) fshows4->SetText("Hide Data");
663 // printf("s4 \n");
664 };
665
666 void PAMevcontrol::showsidata(){
667 cvar->showsi = !cvar->showsi;
668 if ( !cvar->showsi ) fshowsi->SetText("Show Data");
669 if ( cvar->showsi ) fshowsi->SetText("Hide Data");
670 // printf("si \n");
671 };
672
673 void PAMevcontrol::showalldata(){
674 cvar->showall = !cvar->showall;
675 if ( !cvar->showall ) fshowall->SetText("Show Data");
676 if ( cvar->showall ) fshowall->SetText("Hide Data");
677 // printf("all \n");
678 };
679
680 void PAMevcontrol::SetFilename() {
681 TGTextEntry *entry = (TGTextEntry*)gTQSender;
682 TString text = entry->GetText();
683 cvar->thefilename=text.Data();
684 cvar->i = 0;
685 cvar->nevents = 0;
686 cvar->firstevno = 0;
687 cvar->lastevno = 0;
688 if ( cvar->fl0 ) {
689 cvar->fl0 = false;
690 ffl0->SetState(kButtonUp);
691 };
692 cvar->restart = true;
693 cvar->waitforever = false;
694 }
695
696 void PAMevcontrol::getl0file() {
697 //
698 TString host = "mysql://localhost/pamelaprod";
699 TString user = "anonymous";
700 TString psw = "";
701 const char *pamdbhost=gSystem->Getenv("PAM_DBHOST");
702 const char *pamdbuser=gSystem->Getenv("PAM_DBUSER");
703 const char *pamdbpsw=gSystem->Getenv("PAM_DBPSW");
704 if ( !pamdbhost ) pamdbhost = "";
705 if ( !pamdbuser ) pamdbuser = "";
706 if ( !pamdbpsw ) pamdbpsw = "";
707 if ( strcmp(pamdbhost,"") ) host = pamdbhost;
708 if ( strcmp(pamdbuser,"") ) user = pamdbuser;
709 if ( strcmp(pamdbpsw,"") ) psw = pamdbpsw;
710 cout<<"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"<<endl;
711 cout<<"Connecting to DB"<<endl;
712 cout<<"HOST "<<host<<endl;
713 cout<<"USER "<<user<<endl;
714 cout<<"PSW "<<psw<<endl;
715 cout<<"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"<<endl;
716 TSQLServer *dbc = TSQLServer::Connect(host.Data(),user.Data(),psw.Data());
717 //
718 TSQLResult *pResult;
719 TSQLRow *Row;
720 //
721 if( dbc && dbc->IsConnected() ){
722 //
723 // Retrieve the file
724 //
725 if ( clev->file == 2 ){
726 //
727 // Starting from level2
728 //
729 GL_ROOT glroot = GL_ROOT();
730 if( !glroot.Query_GL_ROOT(cvar->idroot,dbc) ){
731 //
732 cvar->thefilename= glroot.PATH + glroot.NAME;
733 cvar->nevents = 0;
734 cvar->firstevno = 0;
735 cvar->lastevno = 0;
736 if ( cvar->fl0 ) {
737 cvar->fl0 = false;
738 ffl0->SetState(kButtonUp);
739 };
740 cvar->restart = true;
741 cvar->waitforever = false;
742 //
743 if ( cvar->thefilter != "" ){
744 cvar->thefilter="";
745 cvar->selex = true;
746 };
747 cvar->i = cvar->EVF + cvar->i ;
748 //cvar->refresh = true;
749 // cvar->file = 0;
750 //
751 } else {
752 stringstream warning;
753 warning.str("");
754 warning << " Problems getting Level0 file ";
755 DIALOG(2,warning.str().c_str());
756 };
757 } else {
758 //
759 // starting from L0
760 //
761 stringstream query;
762 query.str("");
763 query << " SELECT ID FROM GL_ROOT WHERE NAME='"<< gSystem->BaseName(cvar->thefilename.Data()) <<"' order by INSERT_TIME desc limit 1;";
764 // printf(" query is %s \n",query.str().c_str());
765 pResult = dbc->Query(query.str().c_str());
766 Row = pResult->Next();
767 UInt_t idrl0 = 0;
768 if ( Row ){
769 idrl0 = (UInt_t)atoll(Row->GetField(0));
770 };
771 //
772 query.str("");
773 query << " SELECT ID,ID_ROOT_L2,EV_FROM FROM GL_RUN WHERE EV_FROM<="<<cvar->i<<" AND EV_TO>="<< cvar->i<<" AND ID_ROOT_L0="<< idrl0 <<";";
774 // printf(" query is %s \n",query.str().c_str());
775 pResult = dbc->Query(query.str().c_str());
776 Row = pResult->Next();
777 UInt_t idrl2 = 0;
778 UInt_t idrlun = 0;
779 UInt_t evfrom = 0;
780 if ( Row ){
781 idrlun = (UInt_t)atoll(Row->GetField(0));
782 idrl2 = (UInt_t)atoll(Row->GetField(1));
783 evfrom = (UInt_t)atoll(Row->GetField(2));
784 };
785 //
786 query.str("");
787 query << " SELECT ID,NEVENTS FROM GL_RUN WHERE ID_ROOT_L2="<< idrl2 <<" order by RUNHEADER_TIME asc;";
788 // printf(" query is %s \n",query.str().c_str());
789 pResult = dbc->Query(query.str().c_str());
790 Row = pResult->Next();
791 UInt_t coren = 0;
792 while ( Row ){
793 if ( (UInt_t)atoll(Row->GetField(0)) == idrlun ) break;
794 coren += (UInt_t)atoll(Row->GetField(1));
795 Row = pResult->Next();
796 };
797 coren += cvar->i - evfrom;
798 //
799 GL_ROOT glroot = GL_ROOT();
800 if( !glroot.Query_GL_ROOT(idrl2,dbc) ){
801 //
802 cvar->i = coren;
803 //
804 cvar->thefilename= glroot.PATH + glroot.NAME;
805 cvar->nevents = 0;
806 cvar->firstevno = 0;
807 cvar->lastevno = 0;
808 if ( cvar->fl0 ) {
809 cvar->fl0 = false;
810 ffl0->SetState(kButtonUp);
811 };
812 cvar->restart = true;
813 cvar->waitforever = false;
814 //
815 if ( cvar->thefilter != "" ){
816 cvar->thefilter="";
817 cvar->selex = true;
818 };
819 //
820 } else {
821 stringstream warning;
822 warning.str("");
823 warning << " Problems getting Level2 file ";
824 DIALOG(2,warning.str().c_str());
825 };
826 // stringstream warning;
827 // warning.str("");
828 // warning << " Not yet implemented ";
829 // DIALOG(2,warning.str().c_str());
830 };
831 //
832 } else {
833 stringstream warning;
834 warning.str("");
835 warning << " Problems connectiong to DB! ";
836 DIALOG(2,warning.str().c_str());
837 };
838 dbc->Close();
839 };
840
841 void PAMevcontrol::CheckLevel() {
842 if ( clev->file == 2 ){
843 ffl0->SetState(kButtonDisabled);
844 // if ( !cvar->tracknds4 ) {
845 // ftrks4->SetState(kButtonUp);
846 // } else {
847 // ftrks4->SetState(kButtonDown);
848 // };
849 } else {
850 //ftrks4->SetState(kButtonDisabled);
851 if ( !cvar->fl0 ) {
852 ffl0->SetState(kButtonUp);
853 } else {
854 ffl0->SetState(kButtonDown);
855 };
856 };
857 if ( clev->file == 2 ){
858 fgetl0->SetText("Get L0 file");
859 } else {
860 fgetl0->SetText("Get L2 file");
861 };
862 }
863
864 void PAMevcontrol::SetSearching() {
865 bstop->SetState(kButtonUp);
866 };
867
868 void PAMevcontrol::StopSearching() {
869 bstop->SetState(kButtonDisabled);
870 };
871
872 void PAMevcontrol::RefreshButtons() {
873 if ( cvar->jumprog ){
874 jbwc1->SetState(kButtonDown);
875 jbwc0->SetState(kButtonUp);
876 } else {
877 jbwc1->SetState(kButtonUp);
878 jbwc0->SetState(kButtonDown);
879 };
880 if ( cvar->fl0 ){
881 ffl0->SetState(kButtonDown);
882 } else {
883 ffl0->SetState(kButtonUp);
884 };
885 // if ( cvar->tracknds4) ftrks4->SetState(kButtonDown);
886 if ( cvar->bw ){
887 bwc1->SetState(kButtonDown);
888 bwc0->SetState(kButtonUp);
889 } else {
890 bwc0->SetState(kButtonDown);
891 bwc1->SetState(kButtonUp);
892 };
893 if ( cvar->PATTRIG) fchktrigger->SetState(kButtonDown); else fchktrigger->SetState(kButtonUp);
894 if ( cvar->PALETTE) fchkpalette->SetState(kButtonDown); else fchkpalette->SetState(kButtonUp);
895 if ( cvar->VINFOS ) fchknames->SetState(kButtonDown); else fchknames->SetState(kButtonUp);
896 if ( cvar->INFOS ) fchkinfo->SetState(kButtonDown); else fchkinfo->SetState(kButtonUp);
897 //
898 if ( cvar->CALOT ) fchkcalost->SetState(kButtonDown); else fchkcalost->SetState(kButtonUp);
899 if ( cvar->CALO ){
900 fchkcalo->SetState(kButtonDown);
901 fshowcal->SetState(kButtonUp);
902 } else {
903 fchkcalo->SetState(kButtonUp);
904 fchkcalost->SetState(kButtonDisabled);
905 fshowcal->SetState(kButtonDisabled);
906 };
907 //
908 if ( cvar->ND ){
909 fchknd->SetState(kButtonDown);
910 fshownd->SetState(kButtonUp);
911 } else {
912 fchknd->SetState(kButtonUp);
913 fshownd->SetState(kButtonDisabled);
914 };
915 //
916 if ( cvar->S4 ){
917 fchks4->SetState(kButtonDown);
918 fshows4->SetState(kButtonUp);
919 } else {
920 fchks4->SetState(kButtonUp);
921 fshows4->SetState(kButtonDisabled);
922 };
923 //
924 if ( cvar->TRK ){
925 fchktrk->SetState(kButtonDown);
926 fshowtrk->SetState(kButtonUp);
927 } else {
928 fchktrk->SetState(kButtonUp);
929 fshowtrk->SetState(kButtonDisabled);
930 }
931 //
932 if ( cvar->AC ){
933 fchkac->SetState(kButtonDown);
934 fshowac->SetState(kButtonUp);
935 } else {
936 fchkac->SetState(kButtonUp);
937 fshowac->SetState(kButtonDisabled);
938 };
939 //
940 if ( cvar->TOF ){
941 fchktof->SetState(kButtonDown);
942 fshowtof->SetState(kButtonUp);
943 } else {
944 fchktof->SetState(kButtonUp);
945 fshowtof->SetState(kButtonDisabled);
946 };
947 //
948 CheckLevel();
949 //
950 };
951
952 void PAMevcontrol::SetFilter() {
953 TGTextEntry *entry = (TGTextEntry*)gTQSender;
954 TString text = entry->GetText();
955 cvar->thefilter=text.Data();
956 cvar->i--;
957 cvar->selex = true;
958 cvar->nevents = 0;
959 cvar->firstevno = 0;
960 cvar->lastevno = 0;
961 cvar->refresh = true;
962 }
963
964 void PAMevcontrol::CompleteText() {
965 TGTextEntry *entry = (TGTextEntry*)gTQSender;
966 TString text = entry->GetText();
967 Int_t curspos = entry->GetCursorPosition();
968 Int_t ncurspos = 0;
969 TString textrem;
970 stringcopy(textrem,text,curspos,text.Length());
971 text.Resize(curspos);
972 if ( !strcmp(text.Data(),"") ) {
973 stringstream ntext;
974 ntext.str("");
975 ntext << gSystem->ExpandPathName("$HOME");
976 text = ntext.str().c_str();
977 curspos=ntext.str().length();
978 };
979 char *test = gSystem->ExpandPathName(text.Data());
980 const char *dir = gSystem->DirName(test);
981 const char *base = gSystem->BaseName(test);
982 TString lbase = base;
983 Int_t lenbase = lbase.Length();
984 TSystemDirectory *tsd = new TSystemDirectory("",dir);
985 TSystemFile *file;
986 TList *lsmatch = new TList;
987 Int_t numf = 0;
988 Int_t numgo = 0;
989 Int_t charmac = 0;
990 TString tbase;
991 Int_t k = 0;
992 stringstream newtext;
993 TSystemFile *mfile;
994 TSystemFile nfile;
995 TList *lsf = new TList;
996 const char *ctbase;
997 if ( !tsd->GetListOfFiles() ){
998 gVirtualX->Bell(0);
999 goto end;
1000 };
1001 lsf = tsd->GetListOfFiles();
1002 file = (TSystemFile*)lsf->First();
1003 //
1004 while( (TSystemFile*)lsf->After(file) ){
1005 numf++;
1006 file = (TSystemFile*)lsf->After(file);
1007 if ( !strncmp(file->GetName(),base,lenbase) ){
1008 numgo++;
1009 lsmatch->AddLast(file);
1010 const char *ctbase = file->GetName();
1011 tbase = ctbase;
1012 charmac = tbase.Length();
1013 };
1014 };
1015 newtext.str("");
1016 if ( numgo > 0 ){
1017 mfile = (TSystemFile*)lsmatch->First();
1018 ctbase = mfile->GetName();
1019 while ( (!strcmp(ctbase,"..") || !strcmp(ctbase,".")) && (TSystemFile*)lsmatch->After(mfile) ) {
1020 mfile = (TSystemFile*)lsmatch->After(mfile);
1021 ctbase = mfile->GetName();
1022 };
1023 tbase = ctbase;
1024 base = ctbase;
1025 charmac = tbase.Length();;
1026 while( (TSystemFile*)lsmatch->After(mfile) ){
1027 mfile = (TSystemFile*)lsmatch->After(mfile);
1028 ctbase = mfile->GetName();
1029 while ( (!strcmp(ctbase,"..") || !strcmp(ctbase,".")) && (TSystemFile*)lsmatch->After(mfile) ) {
1030 mfile = (TSystemFile*)lsmatch->After(mfile);
1031 ctbase = mfile->GetName();
1032 };
1033 tbase = ctbase;
1034 k = 0;
1035 for ( Int_t i=lenbase; i<=tbase.Length(); i++){
1036 if ( !strncmp(tbase.Data(),base,i) && strcmp(tbase.Data(),base) ){
1037 k = i;
1038 };
1039 };
1040 if ( k <= charmac){
1041 charmac = k;
1042 };
1043 };
1044 gVirtualX->Bell(0);
1045 };
1046 if ( !charmac ) {
1047 gVirtualX->Bell(0);
1048 goto end;
1049 };
1050 tbase.Resize(charmac);
1051 if ( !strcmp(dir,"") || !strcmp(dir,"/") ){
1052 newtext << "/" << tbase.Data();
1053 } else {
1054 newtext << dir << "/" << tbase.Data();
1055 };
1056 nfile = TSystemFile(tbase.Data(),dir);
1057 if ( nfile.IsDirectory() && numgo == 1 ) newtext << "/";
1058 ncurspos = newtext.str().length();
1059 if ( textrem.Length() ) newtext << textrem.Data();
1060 entry->SetText(newtext.str().c_str());
1061 entry->SetCursorPosition(ncurspos);
1062 end:
1063 lsf->Clear();
1064 lsmatch->Clear();
1065 }
1066
1067 void PAMevcontrol::saveas() {
1068 TString text = fText4->GetText();
1069 Int_t sel=fCombo->GetSelected();
1070 TString ty;
1071 switch (sel){
1072 case (0):
1073 ty = ".ps";
1074 break;
1075 case (1):
1076 ty = ".eps";
1077 break;
1078 case (2):
1079 ty = ".gif";
1080 break;
1081 case (3):
1082 ty = ".jpg";
1083 break;
1084 case (4):
1085 ty = ".tiff";
1086 break;
1087 case (5):
1088 ty = ".xpm";
1089 break;
1090 case (6):
1091 ty = ".pdf";
1092 break;
1093 case (7):
1094 ty = ".xml";
1095 break;
1096 case (8):
1097 ty = ".png";
1098 break;
1099 case (9):
1100 ty = ".svg";
1101 break;
1102 case (10):
1103 ty = ".root";
1104 break;
1105 case (11):
1106 ty = ".C";
1107 break;
1108 };
1109 if ( sel == 0 ) ty = ".ps";
1110 stringstream name;
1111 if ( strcmp(text.Data(),"") ){
1112 name.str("");
1113 name << text.Data();
1114 name << ty.Data();
1115 thefigure->SaveAs(name.str().c_str());
1116 name.str("");
1117 name << " Saved as ";
1118 name << text.Data();
1119 name << ty.Data();
1120 DIALOG(0,name.str().c_str());
1121 printf(" Saved as %s%s \n",text.Data(),ty.Data());
1122 };
1123 }
1124
1125 void PAMevcontrol::increment(float val) {
1126 fHProg1->Reset();
1127 fHProg1->SetPosition(val);
1128 gSystem->ProcessEvents();
1129 }
1130
1131 void PAMevcontrol::forcel0() {
1132 cvar->fl0 = !cvar->fl0;
1133 cvar->alrforc = false;
1134 cvar->i--;
1135 cvar->nevents = 0;
1136 cvar->firstevno = 0;
1137 cvar->lastevno = 0;
1138 cvar->refresh = true;
1139 }
1140
1141 void PAMevcontrol::clearselfi(){
1142 fText2->SetText("");
1143 }
1144
1145 void PAMevcontrol::upgrnamfi(){
1146 fText4->SetText(cvar->svas.Data());
1147 fText4->SetCursorPosition(fText4->GetMaxLength());
1148 }
1149
1150 void PAMevcontrol::jumpto() {
1151 TGTextEntry *entry = (TGTextEntry*)gTQSender;
1152 TString text = entry->GetText();
1153 Int_t j;
1154 j = atoi(text.Data());
1155 if ( cvar->jumprog ){
1156 if ( j < 1 || j > cvar->nevents ) {
1157 printf("\n You can choose between 1 and %i \n",(int)cvar->nevents);
1158 stringstream warning;
1159 warning.str("");
1160 warning << "You can choose between 1 and ";
1161 warning << (int)cvar->nevents;
1162 DIALOG(1,warning.str().c_str());
1163 } else {
1164 stringstream warning;
1165 // warning.str("");
1166 // warning << "Jumping to progressive number ";
1167 // warning << j;
1168 // DIALOG(0,warning.str().c_str());
1169 printf("\n Jumping to progressive number %i\n\n",j);
1170 cvar->i = j-2;
1171 cvar->goon = true;
1172 SetSearching();
1173 };
1174 } else {
1175 if ( j < cvar->firstevno || j > cvar->lastevno ) {
1176 printf("\n You can choose between %i and %i \n",cvar->firstevno,cvar->lastevno);
1177 stringstream warning;
1178 warning.str("");
1179 warning << "You can choose between ";
1180 warning << cvar->firstevno;
1181 warning << " and ";
1182 warning << cvar->lastevno;
1183 DIALOG(1,warning.str().c_str());
1184 } else {
1185 // stringstream warning;
1186 // warning.str("");
1187 // warning << "Jumping to event number ";
1188 // warning << j;
1189 // DIALOG(0,warning.str().c_str());
1190 printf("\n Jumping to packet number %i\n\n",j);
1191 cvar->jumpto = j;
1192 cvar->jumpen = true;
1193 cvar->goon = true;
1194 SetSearching();
1195 };
1196 };
1197 entry->SetText("");
1198 }
1199
1200 void PAMevcontrol::radioevent() {
1201 cvar->jumprog = false;
1202 }
1203
1204 void PAMevcontrol::radioprog() {
1205 cvar->jumprog = true;
1206 }
1207
1208 void PAMevcontrol::radiocolor() {
1209 if ( !cvar->goon ){
1210 if ( cvar->bw ) {
1211 cvar->bw = 0;
1212 cvar->i--;
1213 cvar->goon = true;
1214 };
1215 };
1216 }
1217
1218 void PAMevcontrol::radiobw() {
1219 if ( !cvar->goon ){
1220 if ( !cvar->bw ) {
1221 cvar->bw = 1;
1222 cvar->i--;
1223 cvar->goon = true;
1224 };
1225 };
1226 }
1227
1228 void PAMevcontrol::radiotrack() {
1229 if ( cvar->tracknds4 ) {
1230 cvar->tracknds4 = 0;
1231 } else {
1232 cvar->tracknds4 = 1;
1233 };
1234 cvar->i--;
1235 cvar->goon = true;
1236 }
1237
1238 void PAMevcontrol::chktof() {
1239 if ( cvar->TOF ) {
1240 cvar->TOF = 0;
1241 } else {
1242 cvar->TOF = 1;
1243 };
1244 cvar->i--;
1245 cvar->nevents = 0;
1246 cvar->firstevno = 0;
1247 cvar->lastevno = 0;
1248 cvar->refresh = true;
1249 }
1250
1251 void PAMevcontrol::chkac() {
1252 if ( cvar->AC ) {
1253 cvar->AC = 0;
1254 } else {
1255 cvar->AC = 1;
1256 };
1257 cvar->i--;
1258 cvar->nevents = 0;
1259 cvar->firstevno = 0;
1260 cvar->lastevno = 0;
1261 cvar->refresh = true;
1262 }
1263
1264 void PAMevcontrol::chktrk() {
1265 if ( cvar->TRK ) {
1266 cvar->TRK = 0;
1267 } else {
1268 cvar->TRK = 1;
1269 };
1270 cvar->i--;
1271 cvar->nevents = 0;
1272 cvar->firstevno = 0;
1273 cvar->lastevno = 0;
1274 cvar->refresh = true;
1275 }
1276
1277 void PAMevcontrol::chkcalo() {
1278 if ( cvar->CALO ) {
1279 cvar->CALO = 0;
1280 } else {
1281 cvar->CALO = 1;
1282 };
1283 cvar->i--;
1284 cvar->nevents = 0;
1285 cvar->firstevno = 0;
1286 cvar->lastevno = 0;
1287 cvar->refresh = true;
1288 }
1289
1290 void PAMevcontrol::chks4() {
1291 if ( cvar->S4 ) {
1292 cvar->S4 = 0;
1293 } else {
1294 cvar->S4 = 1;
1295 };
1296 cvar->i--;
1297 cvar->nevents = 0;
1298 cvar->firstevno = 0;
1299 cvar->lastevno = 0;
1300 cvar->refresh = true;
1301 }
1302
1303 void PAMevcontrol::chknd() {
1304 if ( cvar->ND ) {
1305 cvar->ND = 0;
1306 } else {
1307 cvar->ND = 1;
1308 };
1309 cvar->i--;
1310 cvar->nevents = 0;
1311 cvar->firstevno = 0;
1312 cvar->lastevno = 0;
1313 cvar->refresh = true;
1314 }
1315
1316 void PAMevcontrol::chkinfo() {
1317 if ( cvar->INFOS ) {
1318 cvar->INFOS = 0;
1319 } else {
1320 cvar->INFOS = 1;
1321 };
1322 cvar->i--;
1323 cvar->goon = true;
1324 }
1325
1326 void PAMevcontrol::chknames() {
1327 if ( cvar->VINFOS ) {
1328 cvar->VINFOS = 0;
1329 } else {
1330 cvar->VINFOS = 1;
1331 };
1332 cvar->i--;
1333 cvar->goon = true;
1334 }
1335
1336 void PAMevcontrol::chkpalette() {
1337 if ( cvar->PALETTE ) {
1338 cvar->PALETTE = 0;
1339 } else {
1340 cvar->PALETTE = 1;
1341 };
1342 cvar->i--;
1343 cvar->goon = true;
1344 }
1345
1346 void PAMevcontrol::chktrigger() {
1347 if ( cvar->PATTRIG ) {
1348 cvar->PATTRIG = 0;
1349 } else {
1350 cvar->PATTRIG = 1;
1351 };
1352 cvar->i--;
1353 cvar->goon = true;
1354 }
1355
1356 void PAMevcontrol::next() {
1357 SetSearching();
1358 if ( cvar->i == cvar->nevents-1 ) {
1359 printf("This is the last event, you can't go forward! \n");
1360 DIALOG(1,"This is the last event!");
1361 } else {
1362 cvar->goon = true;
1363 cvar->doflag = 1;
1364 };
1365 }
1366
1367 void PAMevcontrol::stop() {
1368 DIALOG(1,"Stop searching");
1369 cvar->doflag = 3;
1370 }
1371
1372 void PAMevcontrol::prev() {
1373 SetSearching();
1374 if ( cvar->i > 0 ) {
1375 printf("WARNING: going backward!\n\n");
1376 cvar->doflag = 2;
1377 cvar->goon = true;
1378 } else {
1379 printf("This is the first event, you can't go backward! \n");
1380 DIALOG(1,"This is the first event!");
1381 };
1382 }
1383
1384 void PAMevcontrol::Terminate() {
1385 gSystem->ProcessEvents();
1386 gApplication->Terminate(0);
1387 }
1388
1389 PAMevcontrol::~PAMevcontrol() {
1390 // Clean up used widgets: frames, buttons, layouthints
1391 Cleanup();
1392 delete this;
1393 }

  ViewVC Help
Powered by ViewVC 1.1.23