/[PAMELA software]/quicklook/tracker/flight/macros/FTrkQLook_EXPERT.cxx
ViewVC logotype

Diff of /quicklook/tracker/flight/macros/FTrkQLook_EXPERT.cxx

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3 by pam-fi, Thu Jun 1 18:44:26 2006 UTC revision 1.36 by mocchiut, Fri Jan 17 15:10:40 2014 UTC
# Line 1  Line 1 
1    
2  /**  /**
3   * FTrkQLook_EXPERT   * FTrkQLook_EXPERT.cxx
4   *   *
5   * autor: D.Fedele   * autor: D.Fedele
6   * version 2.0   * version v1r27
7   * Parameters:   * Parameters:
8   *      file - the data file to analyze   *      file - the data file to analyze
9   *      fromevent - first event to analyze   *      fromevent - first event to analyze
# Line 19  Line 20 
20  #include <TLatex.h>  #include <TLatex.h>
21  #include <TCanvas.h>  #include <TCanvas.h>
22  #include <TGraph.h>  #include <TGraph.h>
23    #include <TFile.h>
24  #include <TTree.h>  #include <TTree.h>
25  #include <TStyle.h>  #include <TStyle.h>
26    #include <TAxis.h>
27    #include <TH1F.h>
28    #include <TROOT.h>
29    #include <cstdlib>
30  //  //
31  #include <physics/tracker/TrackerEvent.h>  #include <physics/tracker/TrackerEvent.h>
32  #include <PscuHeader.h>  #include <PscuHeader.h>
# Line 29  Line 35 
35  #include <TrkAlarmEvent.h>  #include <TrkAlarmEvent.h>
36  #include <tsbt/TsbTRecord.h>  #include <tsbt/TsbTRecord.h>
37  #include <tsbt/TsbTEvent.h>  #include <tsbt/TsbTEvent.h>
38    #include <tsbb/TsbBRecord.h>
39    #include <tsbb/TsbBEvent.h>
40    #include <EventCounter.h>
41    #include <PacketType.h>
42  //  //
43    #define MAXSTORAGE 50000
 void stringcopy(TString& s1, const TString& s2, Int_t from=0, Int_t to=0){      
   if ( to == 0 ){  
     Int_t t2length = s2.Length();  
     s1 = "";  
     to = t2length;  
   };  
   for (Int_t i = from; i<to; i++){  
     s1.Append(s2[i],1);  
   };  
 };  
   
44    
45  void FTrkQLook_EXPERT(TString file,Int_t fromevent,Int_t toevent, TString outdir, TString outfile)  void FTrkQLook_EXPERT(TString file,Int_t fromevent,Int_t toevent, TString outdir, TString outfile)
46  {  {
47    //    //
48    //   obtain information about the data file and select the output dir    //   obtain information about the data file and select the output dir
49    const string filepath=file.Data();    Int_t dwpos = file.Last('/');
50    Int_t dwpos = filepath.rfind("/");    Int_t dwpos1 = file.Last('.');
   Int_t dwpos1 = filepath.find(".root");  
   TString fpath=(filepath.c_str());  
51    TString base,ffile ;    TString base,ffile ;
52    stringcopy(ffile,fpath,dwpos+1,dwpos1);    ffile=file(dwpos+1,dwpos1-(dwpos+1));
53    stringcopy(base,fpath,0,dwpos);    if(dwpos>0) base=file(0,dwpos);
   if(dwpos>0) base+="/";  
54    
55    TString out;    TString out;
56    if(outdir.Length()==0){    if(outdir.Length()==0){
# Line 62  void FTrkQLook_EXPERT(TString file,Int_t Line 58  void FTrkQLook_EXPERT(TString file,Int_t
58    }else{    }else{
59      out = outdir;      out = outdir;
60    }    }
61      if(out.Last('/')+1<out.Length()) out+="/";
62    
63    //    //
64    // inizialise the variables and open the file    // inizialise the variables and open the file
65    pamela::TsbTEvent  *event = 0;    pamela::TsbTEvent  *event = 0;
66    pamela::TsbTRecord *record = 0;    pamela::TsbTRecord *record = 0;
67      pamela::TsbBEvent  *Bevent = 0;
68      pamela::TsbBRecord *Brecord = 0;
69    pamela::tracker::TrackerEvent *te=0;    pamela::tracker::TrackerEvent *te=0;
70    pamela::EventHeader *eh=0,*aleh=0,*eH=0,*eT=0;    pamela::EventHeader *eh=0,*aleh=0,*eH=0,*eT=0,*eB=0;
71    pamela::PscuHeader *ph=0,*pH=0;    pamela::PscuHeader *ph=0,*pH=0;
72    pamela::TrkAlarmEvent *al=0;    pamela::TrkAlarmEvent *al=0;
73    pamela::RunHeaderEvent *reh=0;    pamela::RunHeaderEvent *reh=0;
74      pamela::EventCounter *cod=0;
75    
76      pamela::PacketType *pctp=0;
77    
78    TFile *datafile = new TFile(file);    TFile *datafile = new TFile(file);
79      if ( !datafile ){
80        printf("No data file, exiting...\n");
81        return;
82      }
83    
84    TTree *tree = (TTree*)datafile->Get("TsbT");    TTree *tree = (TTree*)datafile->Get("TsbT");
85    tree->SetBranchAddress("TsbT",&event);    tree->SetBranchAddress("TsbT",&event);
86    tree->SetBranchAddress("Header",&eT);    tree->SetBranchAddress("Header",&eT);
87    
88      TTree *Btree = (TTree*)datafile->Get("TsbB");
89      Btree->SetBranchAddress("TsbB",&Bevent);
90      Btree->SetBranchAddress("Header",&eB);
91    
92    TTree *altr = (TTree*)datafile->Get("TrkAlarm");    TTree *altr = (TTree*)datafile->Get("TrkAlarm");
93    altr->SetBranchAddress("TrkAlarm",&al);    altr->SetBranchAddress("TrkAlarm",&al);
94    altr->SetBranchAddress("Header",&aleh);    altr->SetBranchAddress("Header",&aleh);
# Line 94  void FTrkQLook_EXPERT(TString file,Int_t Line 104  void FTrkQLook_EXPERT(TString file,Int_t
104    Long64_t nevent = tr->GetEntries();    Long64_t nevent = tr->GetEntries();
105    Long64_t neventH = otr->GetEntries();    Long64_t neventH = otr->GetEntries();
106    Long64_t tnevent = tree->GetEntries();    Long64_t tnevent = tree->GetEntries();
107      Long64_t bnevent = Btree->GetEntries();
108    Long64_t alnevent = altr->GetEntries();    Long64_t alnevent = altr->GetEntries();
109    Int_t minevent=0;    Int_t minevent=0;
110    Int_t maxevent=0;    Int_t maxevent=0;
# Line 101  void FTrkQLook_EXPERT(TString file,Int_t Line 112  void FTrkQLook_EXPERT(TString file,Int_t
112    printf("Number of total events: %lld\n",nevent);    printf("Number of total events: %lld\n",nevent);
113    printf("Number of header events: %lld\n",neventH);    printf("Number of header events: %lld\n",neventH);
114    printf("Number of TsbT events: %lld\n",tnevent);    printf("Number of TsbT events: %lld\n",tnevent);
115      printf("Number of TsbB events: %lld\n",bnevent);
116    printf("Number of TrkAlarm packet events: %lld\n",alnevent);    printf("Number of TrkAlarm packet events: %lld\n",alnevent);
117    
118    if (nevent<=0){    if (nevent<=0){
# Line 129  void FTrkQLook_EXPERT(TString file,Int_t Line 141  void FTrkQLook_EXPERT(TString file,Int_t
141      } else if (toevent > nevent) {              } else if (toevent > nevent) {        
142        maxevent = nevent;        maxevent = nevent;
143      } else {            } else {      
144        maxevent = toevent+1;          maxevent = nevent;  
145      }      }
146      nevent=maxevent-minevent ;      nevent=maxevent-minevent ;
147    }    }
148    
149    Long64_t obt=0;    //
150    const Int_t sizeH=neventH;    // information about the RunHeader
151    ULong64_t HOBT[sizeH];    ULong_t HOBT[neventH];
152    Int_t trk_cal_us[sizeH],countrun=1;    Int_t trk_cal_us[neventH];
153    for (Int_t vi=0; vi<sizeH;vi++){    ULong_t acq_info[neventH];  
154      Int_t countnboot=1;
155      for (Int_t vi=0; vi<neventH;vi++){
156      HOBT[vi]=0;      HOBT[vi]=0;
157      trk_cal_us[vi]=0;      trk_cal_us[vi]=0;
158        acq_info[vi]=0;
159    }    }
160    for (Int_t ev=0; ev<neventH; ev++){    for (Int_t ev=0; ev<neventH; ev++){
161      otr->GetEntry(ev);      otr->GetEntry(ev);
162      pH = eH->GetPscuHeader();      pH = eH->GetPscuHeader();
163      HOBT[ev]= pH->GetOrbitalTime();      HOBT[ev]= pH->GetOrbitalTime();
164      trk_cal_us[ev]=reh->TRK_CALIB_USED;      trk_cal_us[ev]=reh->TRK_CALIB_USED;
165        acq_info[ev]=reh->ACQ_BUILD_INFO;
166      if((HOBT[ev]<HOBT[ev-1]) && ev>0)      if((HOBT[ev]<HOBT[ev-1]) && ev>0)
167        countrun+=1;        countnboot+=1;
     //   printf("\n%lld\t\tcountrun=%d\n",HOBT[ev],countrun);  
168    }    }
169    countrun+=(Int_t)nevent/30000;    countnboot+=(Int_t)(2*nevent/MAXSTORAGE);
170    printf("\ncountrun=%d\n",countrun);    //   printf("\ncountnboot=%d\n",countnboot);
171      
172    //    //
173    // other variables definitions    // other variables definitions
174    stringstream oss1,oss2,oss3,oss4,fromfile,isfile,tit;    stringstream oss1,oss2,oss3,oss4,fromfile,isfile,tit;
175    Int_t ALARM=0;    Int_t ALARM=0;
176    Int_t WARNING[12];    Int_t WARNING[12];
   Float_t hi=0;  
177    
178    //    //
179    // information about the entries for the temperatures    // information about the entries for the temperatures
# Line 170  void FTrkQLook_EXPERT(TString file,Int_t Line 184  void FTrkQLook_EXPERT(TString file,Int_t
184      maxsize+=tmpSize;      maxsize+=tmpSize;
185    }    }
186    const Int_t tsize=maxsize;    const Int_t tsize=maxsize;
187    Int_t tempt[tsize][5],xt[tsize], tempt_tmp[tsize];    Int_t tempt[tsize][5];
188      ULong_t xt[tsize];
189    
190      Int_t cntpgtemp=1,cntpgdat=0,cntpgmag=0;
191    //    //
192    // information about the temperatures    // information about the temperatures
193    for (Int_t ev=0; ev<tnevent; ev++){    for (Int_t ev=0; ev<tnevent; ev++){
# Line 178  void FTrkQLook_EXPERT(TString file,Int_t Line 195  void FTrkQLook_EXPERT(TString file,Int_t
195      tmpSize = event->Records->GetEntries();      tmpSize = event->Records->GetEntries();
196      for (Int_t j = 0; j < tmpSize; j++){      for (Int_t j = 0; j < tmpSize; j++){
197        record = (pamela::TsbTRecord*)event->Records->At(j);        record = (pamela::TsbTRecord*)event->Records->At(j);
198        xt[siztmp]=record->RECORD_OBT;  //0.051*record->RECORD_OBT;          xt[siztmp]=record->RECORD_OBT;
199          if((xt[siztmp]<xt[siztmp-1]) && siztmp>0)
200            cntpgtemp+=1;
201          
202        for (Int_t z = 0; z < 5; z++){        for (Int_t z = 0; z < 5; z++){
203          tempt[siztmp][z] = record->TEMPERATURES[z+1];              tempt[siztmp][z] = record->TEMPERATURES[z+1];    
204        }        }
# Line 187  void FTrkQLook_EXPERT(TString file,Int_t Line 207  void FTrkQLook_EXPERT(TString file,Int_t
207    }    }
208        
209    //    //
210      // information about the entries for the magnetic field
211      if(bnevent>0) cntpgmag=1;
212      maxsize=0;
213      for (Int_t ev=0; ev<bnevent; ev++){
214        Btree->GetEntry(ev);
215        tmpSize = Bevent->Records->GetEntries();
216        maxsize+=tmpSize;
217      }
218      const Int_t bsize=maxsize;
219      Int_t magt[bsize][5];
220      ULong_t xb[bsize];
221      siztmp=0;
222      //
223      // information about the magnetic field
224      for (Int_t ev=0; ev<bnevent; ev++){
225        Btree->GetEntry(ev);
226        tmpSize = Bevent->Records->GetEntries();
227        for (Int_t j = 0; j < tmpSize; j++){
228          Brecord = (pamela::TsbBRecord*)Bevent->Records->At(j);
229          xb[siztmp]=Brecord->RECORD_OBT;
230          if((xb[siztmp]<xb[siztmp-1]) && siztmp>0)
231            cntpgmag+=1;
232          for (Int_t z = 0; z < 5; z++){
233            magt[siztmp][z] = Brecord->B_FIELD[z+1];    
234          }
235          siztmp++;
236        }
237      }
238      
239      //
240    // open the output text files for the alarms    // open the output text files for the alarms
241    TString fname1 = out+ffile;    TString fname1 = out+ffile;
242    TString fname = out+ffile;    TString fname = out+ffile;
# Line 204  void FTrkQLook_EXPERT(TString file,Int_t Line 254  void FTrkQLook_EXPERT(TString file,Int_t
254    // write the file for the TrkAlarm packet    // write the file for the TrkAlarm packet
255    if(alnevent==0) alarm1 <<endl<< "------>  NO ALARM!!! <-------"<< endl;    if(alnevent==0) alarm1 <<endl<< "------>  NO ALARM!!! <-------"<< endl;
256    else{    else{
257        ULong_t obt=0;
258      for (Int_t ev=0; ev<alnevent; ev++){      for (Int_t ev=0; ev<alnevent; ev++){
259        altr->GetEntry(ev);        altr->GetEntry(ev);
260        ph = aleh->GetPscuHeader();        ph = aleh->GetPscuHeader();
261    
262        if(ph->GetOrbitalTime()<obt && ev>0)        if((ULong_t)ph->GetOrbitalTime()<obt && ev>0)
263          alarm1<<endl<<"NEW CPU BOOT"<<endl;          alarm1<<endl<<"NEW CPU BOOT"<<endl;
264        obt=ph->GetOrbitalTime();        obt=ph->GetOrbitalTime();
265                    
266        alarm1 << "================================================="<< endl;        alarm1 << "================================================="<< endl;
267        alarm1 << "PSCU-Pkt N. "<< ph->GetCounter() ;        alarm1 << "PSCU-Pkt N. "<< ph->GetCounter() ;
268        alarm1 << " - OBT "<< ph->GetOrbitalTime() << " ms"<<endl;        alarm1 << " - OBT "<< (ULong_t)ph->GetOrbitalTime() << " ms"<<endl;
269        alarm1 << "(ROOT-tree entry "<<ev<<")"<<endl;        alarm1 << "(ROOT-tree entry "<<ev<<")"<<endl;
270        alarm1 << "================================================="<< endl<<endl;        alarm1 << "================================================="<< endl<<endl;
271                    
272        alarm1 << "Alarm variables (range 0-1)"<<endl;        alarm1 << "Alarm variables (range 0-1)"<<endl;
273        alarm1 << " ALARM[1]= "<< hex<< (Int_t)al->ALARM[1]<<dec<<endl;        alarm1 << " ALARM[1]= 0x"<< hex << (Int_t)al->ALARM[0]<<endl;
274        alarm1 << " ALARM[2]= "<< hex<< (Int_t)al->ALARM[2]<<dec<<endl;        alarm1 << " ALARM[2]= 0x"<< (Int_t)al->ALARM[1]<<endl;
275        alarm1 << " CmdDuringTrig= "<< hex<<(Int_t)al->CmdDuringTrig<<endl;        alarm1 << " CmdDuringTrig= 0x"<< (Int_t)al->CmdDuringTrig<<endl;
276        alarm1 << " FinalCheck= "<< hex<<(Int_t)al->FinalCheck<<endl;        alarm1 << " FinalCheck= 0x"<< (Int_t)al->FinalCheck<<endl;
277        alarm1 << " FlashData= "<< hex<<(Int_t)al->FlashData<<endl;        alarm1 << " FlashData= 0x"<< (Int_t)al->FlashData<<endl;
278        alarm1 << " FlashShutdown= "<< hex<<(Int_t)al->FlashShutdown<<endl;        alarm1 << " FlashShutdown= 0x"<< (Int_t)al->FlashShutdown<<endl;
279        alarm1 << " FlashUpset= "<< hex<<(Int_t)al->FlashUpset<<endl;        alarm1 << " FlashUpset= 0x"<< (Int_t)al->FlashUpset<<endl;
280        alarm1 << " InterCheck= "<< hex<<(Int_t)al->InterCheck<<endl;        alarm1 << " InterCheck= 0x"<< (Int_t)al->InterCheck<<endl;
281        alarm1 << " UnknownCmd= "<< hex<<(Int_t)al->UnknownCmd<<endl<<endl;        alarm1 << " UnknownCmd= 0x"<<(Int_t)al->UnknownCmd<<endl<<endl;
282            
283        alarm1 << "Alarm variables (range 0-3F)"<<endl;        alarm1 << "Alarm variables (range 0-3F)"<<endl;
284        alarm1 << " CmdIDMA= "<< hex<<(Int_t)al->CmdIDMA<<endl;        alarm1 << " CmdIDMA= 0x"<< (Int_t)al->CmdIDMA<<endl;
285        alarm1 << " DSPSoft= "<< hex<<(Int_t)al->DSPSoft<<endl;        alarm1 << " DSPSoft= 0x"<< (Int_t)al->DSPSoft<<endl;
286        alarm1 << " TrigIDMA= "<< hex<<(Int_t)al->TrigIDMA<<endl<<endl;        alarm1 << " TrigIDMA= 0x"<< (Int_t)al->TrigIDMA<<endl<<endl;
287                  
288        alarm1 << "Alarm bits (range 0-1)"<<endl;        alarm1 << "Control variables (range 0-3F)"<<endl;
289        alarm1 << " Aswr= "<< hex<<(Int_t)al->Aswr<<endl;        alarm1 << " DSPBusy= 0x"<< (Int_t)al->DSPBusy<<endl;
290        alarm1 << " BID[1]= "<< hex<<(Int_t)al->BID[0]<<endl;        alarm1 << " DSPMask= 0x"<< (Int_t)al->DSPMask<<endl<<endl;
291        alarm1 << " BID[2]= "<< hex<<(Int_t)al->BID[1]<<endl;  
292        alarm1 << " BID[3]= "<< hex<<(Int_t)al->BID[2]<<endl;        alarm1 << "Control variables (range 0-1)"<<endl;
293        alarm1 << " BID[4]= "<< hex<<(Int_t)al->BID[3]<<endl;        alarm1 << " FlashOn= 0x"<< (Int_t)al->FlashOn<<endl<<endl;
294        alarm1 << " BID[5]= "<< hex<<(Int_t)al->BID[4]<<endl;  
295        alarm1 << " BID[6]= "<< hex<<(Int_t)al->BID[5]<<endl;        alarm1 << "Control variables (range 0-3)"<<endl;
296        alarm1 << " BID[7]= "<< hex<<(Int_t)al->BID[6]<<endl;        alarm1 << " TrigMask= 0x"<< (Int_t)al->TrigMask<<endl<<endl;
297        alarm1 << " CmdNum= "<< hex<<(Int_t)al->CmdNum<<endl;  
298        alarm1 << " DSPBusy= "<< hex<<(Int_t)al->DSPBusy<<endl;        alarm1 << "Control bits fixed"<<endl;
299        alarm1 << " DSPMask= "<< hex<<(Int_t)al->DSPMask<<endl;        alarm1 << " Aswr= 0x"<< (Int_t)al->Aswr<<endl;
300        alarm1 << " FlashOn= "<< hex<<(Int_t)al->FlashOn<<endl;        alarm1 << " BID[1]= 0x"<< (Int_t)al->BID[0]<<endl;
301        alarm1 << " PNum= "<< hex<<(Int_t)al->PNum<<endl;        alarm1 << " BID[2]= 0x"<< (Int_t)al->BID[1]<<endl;
302        alarm1 << " TrigMask= "<< hex<<(Int_t)al->TrigMask<<endl;        alarm1 << " BID[3]= 0x"<< (Int_t)al->BID[2]<<endl;
303          alarm1 << " BID[4]= 0x"<< (Int_t)al->BID[3]<<endl;
304          alarm1 << " BID[5]= 0x"<< (Int_t)al->BID[4]<<endl;
305          alarm1 << " BID[6]= 0x"<< (Int_t)al->BID[5]<<endl;
306          alarm1 << " BID[7]= 0x"<< (Int_t)al->BID[6]<<endl;
307          alarm1 << " CmdNum= 0x"<< (Int_t)al->CmdNum<<endl;
308          alarm1 << " PNum= 0x"<< (Int_t)al->PNum<< dec <<endl;
309    
310        alarm1 << "================================================="<< endl<<endl;        alarm1 << "================================================="<< endl<<endl;
311                
312      }      }
313    }    }
314    
315      //
316      // Set Style options
317    gStyle->SetLabelSize(0.05,"x");    gStyle->SetLabelSize(0.05,"x");
318    gStyle->SetLabelSize(0.06,"y");    gStyle->SetLabelSize(0.06,"y");
319    gStyle->SetStatFontSize(0.075);    gStyle->SetStatFontSize(0.075);
320    gStyle->SetOptStat(1110);    gStyle->SetOptStat(1110);
321    gStyle->SetFillColor(10);      gStyle->SetFillColor(10);  
322      gStyle->SetStatColor(10);
323    gStyle->SetTitleFillColor(10);      gStyle->SetTitleFillColor(10);  
324    gStyle->SetTitleFontSize(0.1);    gStyle->SetTitleFontSize(0.1);
325    gStyle->SetTitleOffset(0.8,"y");    gStyle->SetTitleOffset(0.8,"y");
# Line 267  void FTrkQLook_EXPERT(TString file,Int_t Line 327  void FTrkQLook_EXPERT(TString file,Int_t
327    gStyle->SetTitleSize(0.06,"y");    gStyle->SetTitleSize(0.06,"y");
328    gStyle->SetTitleSize(0.055,"x");    gStyle->SetTitleSize(0.055,"x");
329    
330      //
331      // Define output canvas, histos and graphs
332      TCanvas *CompTimeCanv[countnboot],*EventNumCanv[countnboot],*TempCanv[cntpgtemp],*BfieldCanv[cntpgmag];
333      TCanvas *IlluminaCanv,*LandauCanv1,*LandauCanv2,*LandauCanv3;
334    
335      TH1F *landau1[12],*landau2[12],*landau3[12],*illuminazione[12];
336      TGraph *comprtime[12][countnboot],*temp[5][cntpgtemp],*tempw[5][cntpgtemp],*eventnumb[countnboot],*mag[5][cntpgmag];
337      TPad *pad1[12],*pad2[12],*pad3[12],*pad4[12],*pad5[12],*pad6[5],*pad7[5];
338    
339      for(Int_t n = 0; n<12; n++) {
340    
341        /* -----------> HISTOGRAMS          */
342    
343        tit<<"DSP "<<n+1;
344        oss1<<"DSP  "<<n+1;
345        oss2<<"DSPh  "<<n+1;
346        oss3<<"DSP h "<<n+1;
347        oss4<<"DSP   h"<<n+1;
348        
349        landau1[n]= new TH1F(oss1.str().c_str(),tit.str().c_str(),401,-0.5,1200.5);
350        landau2[n]= new TH1F(oss2.str().c_str(),tit.str().c_str(),401,-0.5,1200.5);
351        landau3[n]= new TH1F(oss3.str().c_str(),tit.str().c_str(),401,-0.5,1200.5);
352    
353        illuminazione[n]= new TH1F(oss4.str().c_str(),tit.str().c_str(),3073,-0.5,3072.5);
354    
355        tit.str("");
356        oss1.str("");
357        oss2.str("");
358        oss3.str("");
359        oss4.str("");
360      };            
361      
362    
363    //***************************************************************************************    //***************************************************************************************
364    // LOOP on each event    // LOOP on each event
# Line 276  void FTrkQLook_EXPERT(TString file,Int_t Line 368  void FTrkQLook_EXPERT(TString file,Int_t
368      printf("\n Scan of events from %i to %i ... \n",minevent,maxevent-1);      printf("\n Scan of events from %i to %i ... \n",minevent,maxevent-1);
369    else    else
370      printf("\n Scan of events from %i to %i ... \n",minevent+1,maxevent);      printf("\n Scan of events from %i to %i ... \n",minevent+1,maxevent);
371      
372      TLatex *t=new TLatex();
373      TLatex *t1=new TLatex();
374      
375      TLine li,liva1;
376    
377      Int_t minev=minevent,maxev=maxevent,countTEMP=0,countMAG=0;
378      ULong_t countALARMx=0,countALARMy=0,countFC[12],countFL1[12],countFL2[12],countFL3[12],countFL4[12],countFL5[12],countFL6[12];
379    
380    Int_t minev=minevent,maxev=maxevent,countTEMP=0;    for(int i=0; i<12; i++){
381    TCanvas *CompTimeCanv[countrun],*EventNumCanv[countrun],*LandauCanv1[countrun],*LandauCanv2[countrun],*LandauCanv3[countrun];      countFC[i]=0;
382    TCanvas *IlluminaCanv[countrun],*TempCanv[countrun];      countFL1[i]=0;
383    TGraph *comprtime[12][countrun],*temp[5][countrun];      countFL2[i]=0;
384    TGraph *eventnumb[countrun];      countFL3[i]=0;
385    TH1F *landau1[12][countrun],*landau2[12][countrun],*landau3[12][countrun],*illuminazione[12][countrun];      countFL4[i]=0;
386        countFL5[i]=0;
387    for(Int_t ii=0; ii<countrun;ii++){      countFL6[i]=0;
388      TPaveText *pt1;    }
     TPad *pt,*pt0;  
     TPad *pad1[12],*pad2[12],*pad3[12],*pad4[12],*pad5[12],*pad6[5];          //pad for histos  
   
     
     ofstream warning(out + "warning.txt",ios::out);  
389    
390      //
391      // Fill temperature graphs
392      for(Int_t ii=0; ii<cntpgtemp;ii++){
393      //****************************************************************************************      //****************************************************************************************
394      //Output figures --- First sheet:      //Temperature Output Pages
395      //****************************************************************************************      //****************************************************************************************
396          fromfile.str("");
397      fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;      fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;
398      isfile<<"COMPRESSIONTIME vs. OBT   pag"<<ii+1;      isfile<<"Temperatures vs OBT   pag"<<ii+1;
399      CompTimeCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);      TempCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
400      CompTimeCanv[ii]->SetFillColor(10);      TempCanv[ii]->SetFillColor(10);
401      CompTimeCanv[ii]->Range(0,0,100,100);      TempCanv[ii]->Range(0,0,100,100);
     TLatex *t=new TLatex();  
     t->SetTextFont(32);  
     t->SetTextColor(1);  
     t->SetTextAlign(12);  
     t->SetTextSize(0.02);  
     t->DrawLatex(2.,98.7,fromfile.str().c_str());  
     TLatex *t1=new TLatex();  
     t1->SetTextFont(32);  
     t1->SetTextColor(1);  
     t1->SetTextAlign(12);  
     t1->SetTextSize(0.02);  
     t1->DrawLatex(59.,98.7,isfile.str().c_str());  
     isfile.str("");  
   
     //****************************************************************************************  
     //Output figures --- Second sheet:  
     //****************************************************************************************  
402    
     isfile<<"WARNINGS on DSP EVENT NUMBER   pag"<<ii+1;  
     EventNumCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);  
     EventNumCanv[ii]->SetFillColor(10);  
     EventNumCanv[ii]->Range(0,0,100,100);  
403      t->SetTextFont(32);      t->SetTextFont(32);
404      t->SetTextColor(1);      t->SetTextColor(1);
405      t->SetTextAlign(12);      t->SetTextAlign(12);
# Line 333  void FTrkQLook_EXPERT(TString file,Int_t Line 409  void FTrkQLook_EXPERT(TString file,Int_t
409      t1->SetTextColor(1);      t1->SetTextColor(1);
410      t1->SetTextAlign(12);      t1->SetTextAlign(12);
411      t1->SetTextSize(0.02);      t1->SetTextSize(0.02);
412      t1->DrawLatex(63.4,98.7,isfile.str().c_str());      t1->DrawLatex(78.,98.7,isfile.str().c_str());
413      isfile.str("");      isfile.str("");
414        t1->SetTextSize(0.025);
415        t1->SetTextColor(196);
416        isfile<<"--> Values at 28.5^{o}C (if presents) correspond";
417        t1->DrawLatex(50.,22.,isfile.str().c_str());
418        isfile.str("");
419        isfile<<"    to wrong readings ( > 100^{o}C) of the Tsb";
420        t1->DrawLatex(50.,19.,isfile.str().c_str());
421        isfile.str("");
422        isfile<<"--> Values at 25.5^{o}C (if presents) correspond";
423        t1->DrawLatex(50.,12.,isfile.str().c_str());
424        isfile.str("");
425        isfile<<"    to wrong readings ( < 0^{o}C) of the Tsb";
426        t1->DrawLatex(50.,9.,isfile.str().c_str());
427        isfile.str("");
428      
429        Float_t tposy = 0.95;    // up y-coord - top pads
430        Float_t thpad = 0;   // pad height
431        Float_t tposx1=0;          // left  x-coord - pad column
432        Float_t tposx0=0;          //       x-coord - column division
433        Float_t twrel = 0;     // relative x size of first sub-column
434        Float_t tmarg = 0.004;   // margin among pads
435      
436        thpad = (tposy-tmarg*5)/3;
437        twrel = (1-tmarg*4)/2;
438        
439        for(Int_t i=0; i<5; i++){
440          if ( (i+1)%2==1 ) {
441            if(i>1) tposy = tposy-(tmarg*2+thpad);
442            tposx1 = tmarg;
443            tposx0 = tposx1 + twrel;
444          }
445          else {
446            tposx1 = tposx0 + 2*tmarg;
447            tposx0 = tposx1 + twrel;
448          }
449        
450          /* -----------> pad for histograms  */
451          pad6[i] = new TPad("pad6"," ",tposx1,tposy-thpad,tposx0,tposy,18,0,0);
452    
453          Int_t v=0,vv=0;
454          Double_t xt_tmp[tsize], tempt_tmp[tsize];
455          Double_t xt_tmpw[tsize], tempt_tmpw[tsize];
456          for (Int_t ev=countTEMP; ev<tsize; ev++){
457          
458            if(ev==tsize-1 && i==4 && ii==cntpgtemp-1) countTEMP=tsize-1;
459            if(xt[ev]<xt[ev-1] && ev>countTEMP){
460              if(i==4) countTEMP=ev;
461              break;
462            }
463            else{
464              tempt_tmp[v]=(Double_t)((Int_t)(((3.3*tempt[ev][i]/4096)-0.586)/0.0231));
465              if(tempt_tmp[v]>100) {
466                tempt_tmp[v]=28.5;
467                tempt_tmpw[vv]=28.5;
468                xt_tmpw[vv++]=(Double_t)xt[ev];
469              }
470              else if(tempt_tmp[v]<0){
471                tempt_tmp[v]=25.5;
472                tempt_tmpw[vv]=25.5;
473                xt_tmpw[vv++]=(Double_t)xt[ev];
474              }
475              xt_tmp[v++]=(Double_t)xt[ev];
476            }
477          }
478          TempCanv[ii]->cd();
479          tit<<"T"<<i+5<<" (magnetic module "<<i+1<<")";
480          pad6[i]->SetFillColor(10);
481          pad6[i]->Draw();
482          pad6[i]->cd();
483          temp[i][ii]= new TGraph(v,xt_tmp,tempt_tmp);
484          temp[i][ii]->SetTitle(tit.str().c_str());
485          if(v==1) temp[i][ii]->GetXaxis()->SetNdivisions(-501);
486          temp[i][ii]->GetXaxis()->SetLabelSize(0.04);
487          temp[i][ii]->GetXaxis()->SetTitleSize(0.04);
488          temp[i][ii]->GetXaxis()->SetTitle("OBT (ms)");
489          temp[i][ii]->GetXaxis()->CenterTitle();
490          temp[i][ii]->GetXaxis()->SetTitleOffset(0.85);
491          temp[i][ii]->GetYaxis()->SetTitleOffset(1.2);
492          temp[i][ii]->GetYaxis()->SetLabelOffset(0.001);
493          temp[i][ii]->GetYaxis()->SetLabelSize(0.04);
494          temp[i][ii]->GetYaxis()->SetTitleSize(0.04);
495          temp[i][ii]->GetYaxis()->SetTitle("Temperatures ( ^{o}C)");
496          temp[i][ii]->GetYaxis()->CenterTitle();
497          temp[i][ii]->SetMarkerStyle(21);
498          temp[i][ii]->SetMarkerSize(0.2);
499          temp[i][ii]->Draw("ap");
500          tit.str("");
501          if(vv>0){
502            tempw[i][ii]= new TGraph(vv,xt_tmpw,tempt_tmpw);
503            tempw[i][ii]->SetMarkerStyle(21);
504            tempw[i][ii]->SetMarkerSize(0.2);
505            tempw[i][ii]->SetMarkerColor(196);
506            tempw[i][ii]->Draw("samep");
507          }
508          TempCanv[ii]->Update();
509            
510          
511        }
512        if(countTEMP==tsize-1 && ii==cntpgtemp-1){
513          break;
514        }
515      }
516    
517      //
518      // Fill magnetic field graphs
519      for(Int_t ii=0; ii<cntpgmag;ii++){
520      //****************************************************************************************      //****************************************************************************************
521      //Output figures --- Third sheet:      //Magnetic Field Output Pages
522      //****************************************************************************************      //****************************************************************************************
523        fromfile.str("");
524      isfile<<"Cluster Signal ladder1   pag"<<ii+1;      fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;
525      LandauCanv1[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);      isfile<<"Magnetic Axial Field vs OBT   pag"<<ii+1;
526      LandauCanv1[ii]->SetFillColor(10);      BfieldCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
527      LandauCanv1[ii]->Range(0,0,100,100);      BfieldCanv[ii]->SetFillColor(10);
528        BfieldCanv[ii]->Range(0,0,100,100);
529        
530      t->SetTextFont(32);      t->SetTextFont(32);
531      t->SetTextColor(1);      t->SetTextColor(1);
532      t->SetTextAlign(12);      t->SetTextAlign(12);
# Line 354  void FTrkQLook_EXPERT(TString file,Int_t Line 536  void FTrkQLook_EXPERT(TString file,Int_t
536      t1->SetTextColor(1);      t1->SetTextColor(1);
537      t1->SetTextAlign(12);      t1->SetTextAlign(12);
538      t1->SetTextSize(0.02);      t1->SetTextSize(0.02);
539      t1->DrawLatex(60.,98.7,isfile.str().c_str());      t1->DrawLatex(70.,98.7,isfile.str().c_str());
540      isfile.str("");      isfile.str("");
541        
542      //****************************************************************************************      li.SetLineStyle(1);
543      //Output figures --- Third sheet:      li.SetLineWidth(1);
544      //****************************************************************************************      li.SetLineColor(190);
545        t1->SetTextColor(190);
546      isfile<<"Cluster Signal ladder2   pag"<<ii+1;      t1->SetTextSize(0.04);
547      LandauCanv2[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);      
548      LandauCanv2[ii]->SetFillColor(10);      Float_t tposy = 0.95;    // up y-coord - top pads
549      LandauCanv2[ii]->Range(0,0,100,100);      Float_t thpad = 0;   // pad height
550        Float_t tposx1=0;          // left  x-coord - pad column
551        Float_t tposx0=0;          //       x-coord - column division
552        Float_t twrel = 0;     // relative x size of first sub-column
553        Float_t tmarg = 0.004;   // margin among pads
554      
555        thpad = (tposy-tmarg*5)/3;
556        twrel = (1-tmarg*4)/2;
557        
558        for(Int_t i=0; i<5; i++){
559          if ( (i+1)%2==1 ) {
560            if(i>1) tposy = tposy-(tmarg*2+thpad);
561            tposx1 = tmarg;
562            tposx0 = tposx1 + twrel;
563          }
564          else {
565            tposx1 = tposx0 + 2*tmarg;
566            tposx0 = tposx1 + twrel;
567          }
568          
569          /* -----------> pad for histograms  */
570          pad7[i] = new TPad("pad7"," ",tposx1,tposy-thpad,tposx0,tposy,18,0,0);
571          
572          Int_t v=0;
573          Double_t xb_tmp[bsize], magt_tmp[bsize];
574          for (Int_t ev=countMAG; ev<bsize; ev++){
575            
576            if(ev==bsize-1 && i==4 && ii==cntpgmag-1) countMAG=bsize-1;
577            if(xb[ev]<xb[ev-1] && ev>countMAG){
578              if(i==4) countMAG=ev;
579              break;
580            }
581            else{
582              magt_tmp[v]=(Double_t)magt[ev][i];
583              xb_tmp[v++]=(Double_t)xb[ev];
584            }
585          }
586          BfieldCanv[ii]->cd();
587          tit<<"B"<<i+5<<" (magnetic module "<<i+1<<")";
588          pad7[i]->SetFillColor(10);
589          pad7[i]->Draw();
590          pad7[i]->cd();
591          mag[i][ii]= new TGraph(v,xb_tmp,magt_tmp);
592          mag[i][ii]->SetTitle(tit.str().c_str());
593          if(v==1) mag[i][ii]->GetXaxis()->SetNdivisions(-501);
594          mag[i][ii]->GetXaxis()->SetLabelSize(0.04);
595          mag[i][ii]->GetXaxis()->SetTitleSize(0.04);
596          mag[i][ii]->GetXaxis()->SetTitle("OBT (ms)");
597          mag[i][ii]->GetXaxis()->CenterTitle();
598          mag[i][ii]->GetXaxis()->SetTitleOffset(0.85);
599          if(i!=4) mag[i][ii]->GetYaxis()->SetRangeUser(2047,2058);
600          else mag[i][ii]->GetYaxis()->SetRangeUser(2059,2067);
601          mag[i][ii]->GetYaxis()->SetTitleOffset(1.2);
602          mag[i][ii]->GetYaxis()->SetLabelOffset(0.001);
603          mag[i][ii]->GetYaxis()->SetLabelSize(0.03);
604          mag[i][ii]->GetYaxis()->SetTitleSize(0.04);
605          mag[i][ii]->GetYaxis()->SetTitle("Magnetic Field (au)");
606          mag[i][ii]->GetYaxis()->CenterTitle();
607          mag[i][ii]->SetMarkerStyle(21);
608          mag[i][ii]->SetMarkerSize(0.4);
609          mag[i][ii]->Draw("ap");
610          Double_t min=0.,max=0,xlat=0.;
611          min=mag[i][ii]->GetXaxis()->GetXmin();
612          max=mag[i][ii]->GetXaxis()->GetXmax();
613          xlat=min+(max-min)/2;
614          stringstream mi,ma;
615          mi<<"minimum recorded value";
616          ma<<"maximum recorded value";
617          t->SetTextSize(0.1);
618          switch(i){
619          case 0:
620            li.DrawLine(min,2054.,max,2054.);
621            li.DrawLine(min,2048.,max,2048.);
622            t1->DrawLatex(xlat,2054.3,ma.str().c_str());
623            t1->DrawLatex(xlat,2047.7,mi.str().c_str());    
624            break;
625    
626          case 1:
627            li.DrawLine(min,2055.,max,2055.);
628            li.DrawLine(min,2049.,max,2049.);
629            t1->DrawLatex(xlat,2055.3,ma.str().c_str());
630            t1->DrawLatex(xlat,2048.7,mi.str().c_str());
631            break;
632    
633      t->SetTextFont(32);        case 2:
634      t->SetTextColor(1);          li.DrawLine(min,2056.,max,2056.);
635      t->SetTextAlign(12);          li.DrawLine(min,2050.,max,2050.);
636      t->SetTextSize(0.02);          t1->DrawLatex(xlat,2056.3,ma.str().c_str());
637      t->DrawLatex(2.,98.7,fromfile.str().c_str());          t1->DrawLatex(xlat,2049.7,mi.str().c_str());
638      t1->SetTextFont(32);          break;
639      t1->SetTextColor(1);        
640      t1->SetTextAlign(12);        case 3:
641      t1->SetTextSize(0.02);          li.DrawLine(min,2057.,max,2057.);
642      t1->DrawLatex(60.,98.7,isfile.str().c_str());          li.DrawLine(min,2051.,max,2051.);
643      isfile.str("");          t1->DrawLatex(xlat,2057.3,ma.str().c_str());
644            t1->DrawLatex(xlat,2050.7,mi.str().c_str());
645            break;
646    
647      //****************************************************************************************        case 4:
648      //Output figures --- Third sheet:          li.DrawLine(min,2066.,max,2066.);
649      //****************************************************************************************          li.DrawLine(min,2060.,max,2060.);
650            t1->DrawLatex(xlat,2066.2,ma.str().c_str());
651            t1->DrawLatex(xlat,2059.8,mi.str().c_str());
652            break;
653    
654      isfile<<"Cluster Signal ladder3   pag"<<ii+1;        }
655      LandauCanv3[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);        BfieldCanv[ii]->Update();
656      LandauCanv3[ii]->SetFillColor(10);        tit.str("");
657      LandauCanv3[ii]->Range(0,0,100,100);      }
658        if(countMAG==bsize-1 && ii==cntpgmag-1){
659          break;
660        }
661      }
662      
663    
664      t->SetTextFont(32);    //
665      t->SetTextColor(1);    // Fill compressiontime and eventnumber graphs and DSP warnings
666      t->SetTextAlign(12);    for(Int_t ii=0; ii<countnboot;ii++){
667      t->SetTextSize(0.02);      TPad *pt;         //pad for histos
     t->DrawLatex(2.,98.7,fromfile.str().c_str());  
     t1->SetTextFont(32);  
     t1->SetTextColor(1);  
     t1->SetTextAlign(12);  
     t1->SetTextSize(0.02);  
     t1->DrawLatex(60.,98.7,isfile.str().c_str());  
     isfile.str("");  
668        
669      //****************************************************************************************      //****************************************************************************************
670      //Output figures --- Fourth sheet:      //COMPRESSIONTIME vs. OBT Output Pages
671      //****************************************************************************************      //****************************************************************************************
672        fromfile.str("");
673      isfile<<"lighting of the views   pag"<<ii+1;      fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;
674      IlluminaCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);      isfile<<"COMPRESSIONTIME vs. OBT   pag"<<ii+1;
675      IlluminaCanv[ii]->SetFillColor(10);      CompTimeCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
676      IlluminaCanv[ii]->Range(0,0,100,100);      CompTimeCanv[ii]->SetFillColor(10);
677        CompTimeCanv[ii]->Range(0,0,100,100);
678      t->SetTextFont(32);      t->SetTextFont(32);
679      t->SetTextColor(1);      t->SetTextColor(1);
680      t->SetTextAlign(12);      t->SetTextAlign(12);
# Line 416  void FTrkQLook_EXPERT(TString file,Int_t Line 684  void FTrkQLook_EXPERT(TString file,Int_t
684      t1->SetTextColor(1);      t1->SetTextColor(1);
685      t1->SetTextAlign(12);      t1->SetTextAlign(12);
686      t1->SetTextSize(0.02);      t1->SetTextSize(0.02);
687      t1->DrawLatex(65.,98.7,isfile.str().c_str());      t1->DrawLatex(62.,98.7,isfile.str().c_str());
688      isfile.str("");      isfile.str("");
689    
690      //****************************************************************************************      //****************************************************************************************
691      //Output figures --- Fifth sheet:      //DSP EVENT NUMBER Output Pages
692      //****************************************************************************************      //****************************************************************************************
   
     isfile<<"Temperatures vs OBT   pag"<<ii+1;  
     TempCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);  
     TempCanv[ii]->SetFillColor(10);  
     TempCanv[ii]->Range(0,0,100,100);  
693    
694        isfile<<"DSP EVENT NUMBER vs. OBT   pag"<<ii+1;
695        EventNumCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
696        EventNumCanv[ii]->SetFillColor(10);
697        EventNumCanv[ii]->Range(0,0,100,100);
698      t->SetTextFont(32);      t->SetTextFont(32);
699      t->SetTextColor(1);      t->SetTextColor(1);
700      t->SetTextAlign(12);      t->SetTextAlign(12);
# Line 437  void FTrkQLook_EXPERT(TString file,Int_t Line 704  void FTrkQLook_EXPERT(TString file,Int_t
704      t1->SetTextColor(1);      t1->SetTextColor(1);
705      t1->SetTextAlign(12);      t1->SetTextAlign(12);
706      t1->SetTextSize(0.02);      t1->SetTextSize(0.02);
707      t1->DrawLatex(75.,98.7,isfile.str().c_str());      t1->DrawLatex(62.,98.7,isfile.str().c_str());
708      isfile.str("");      isfile.str("");
709      
     //*************************************************************************************  
     //book pads and histos  
     //***************************************************************************************  
710      Float_t posy = 0.95;    // up y-coord - top pads      Float_t posy = 0.95;    // up y-coord - top pads
711      Float_t hpad = 0;   // pad height      Float_t hpad = 0;   // pad height
712      Float_t posx1=0;          // left  x-coord - pad column      Float_t posx1=0;          // left  x-coord - pad column
713      Float_t posx0=0;          //       x-coord - column division      Float_t posx0=0;          //       x-coord - column division
714      Float_t wrel = 0;     // relative x size of first sub-column      Float_t wrel = 0;     // relative x size of first sub-column
715      Float_t marg = 0.004;   // margin among pads      Float_t marg = 0.004;   // margin among pads
716      Float_t tposy = 0.95;    // up y-coord - top pads    
     Float_t thpad = 0;   // pad height  
     Float_t tposx1=0;          // left  x-coord - pad column  
     Float_t tposx0=0;          //       x-coord - column division  
     Float_t twrel = 0;     // relative x size of first sub-column  
     Float_t tmarg = 0.004;   // margin among pads  
   
717      hpad = (posy-marg*11)/6;      hpad = (posy-marg*11)/6;
718      wrel = (1-marg*4)/2;      wrel = (1-marg*4)/2;
719      thpad = (tposy-tmarg*5)/3;    
     twrel = (1-tmarg*4)/2;  
   
720      for(Int_t n = 0; n<12; n++) {      for(Int_t n = 0; n<12; n++) {
721            
722        if ( (n+1)%2==1 ) {        if ( (n+1)%2==1 ) {
723          if(n>1) posy = posy-(marg*2+hpad);          if(n>1) posy = posy-(marg*2+hpad);
724          posx1 = marg;          posx1 = marg;
# Line 471  void FTrkQLook_EXPERT(TString file,Int_t Line 727  void FTrkQLook_EXPERT(TString file,Int_t
727        else {        else {
728          posx1 = posx0 + 2*marg;          posx1 = posx0 + 2*marg;
729          posx0 = posx1 + wrel;          posx0 = posx1 + wrel;
730        }        }    
731            
       if ( (n+1)%2==1 ) {  
         if(n>1) tposy = tposy-(tmarg*2+thpad);  
         tposx1 = tmarg;  
         tposx0 = tposx1 + twrel;  
       }  
       else {  
         tposx1 = tposx0 + 2*tmarg;  
         tposx0 = tposx1 + twrel;  
       }  
   
   
732        /* -----------> pad for histograms  */        /* -----------> pad for histograms  */
733        pad1[n] = new TPad("pad1"," ",posx1,posy-hpad,posx0,posy,18,0,0);        pad1[n] = new TPad("pad1"," ",posx1,posy-hpad,posx0,posy,18,0,0);
734        pad2[n] = new TPad("pad2"," ",posx1,posy-hpad,posx0,posy,18,0,0);        pad2[n] = new TPad("pad2"," ",posx1,posy-hpad,posx0,posy,18,0,0);
735        pad3[n] = new TPad("pad3"," ",posx1,posy-hpad,posx0,posy,18,0,0);        pad3[n] = new TPad("pad3"," ",posx1,posy-hpad,posx0,posy,18,0,0);
736        pad4[n] = new TPad("pad4"," ",posx1,posy-hpad,posx0,posy,18,0,0);        pad4[n] = new TPad("pad4"," ",posx1,posy-hpad,posx0,posy,18,0,0);
737        pad5[n] = new TPad("pad5"," ",posx1,posy-hpad,posx0,posy,18,0,0);        pad5[n] = new TPad("pad5"," ",posx1,posy-hpad,posx0,posy,18,0,0);
738        if(n<5) pad6[n] = new TPad("pad6"," ",tposx1,tposy-thpad,tposx0,tposy,18,0,0);      }
   
   
       /* -----------> HISTOGRAMS          */  
   
       oss1<<"DSP  "<<n*100+ii;  
       oss2<<"DSPh  "<<n*100+ii;  
       oss3<<"DSP h "<<n*100+ii;  
       oss4<<"DSP   h"<<n*100+ii;  
       
       landau1[n][ii]=new TH1F(oss1.str().c_str(),oss1.str().c_str(),401,-0.5,1200.5);  
       landau1[n][ii]->GetXaxis()->SetTitle("max signal");  
       landau1[n][ii]->GetXaxis()->CenterTitle();  
       landau2[n][ii]=new TH1F(oss2.str().c_str(),oss1.str().c_str(),401,-0.5,1200.5);  
       landau2[n][ii]->GetXaxis()->SetTitle("max signal");  
       landau2[n][ii]->GetXaxis()->CenterTitle();  
       landau3[n][ii]=new TH1F(oss3.str().c_str(),oss1.str().c_str(),401,-0.5,1200.5);  
       landau3[n][ii]->GetXaxis()->SetTitle("max signal");  
       landau3[n][ii]->GetXaxis()->CenterTitle();  
   
       illuminazione[n][ii]=new TH1F(oss4.str().c_str(),oss1.str().c_str(),3073,-0.5,3072.5);  
       illuminazione[n][ii]->GetXaxis()->SetTitle("strip with max signal");  
       illuminazione[n][ii]->GetXaxis()->CenterTitle();  
   
       oss1.str("");  
       oss2.str("");  
       oss3.str("");  
       oss4.str("");  
     };              
     
   
     //    printf("\nprova0\n");  
   
   
     //**********************************************************************************  
     // Fill Graphs and Histos  
     //**********************************************************************************  
739        
740      //      //
741      // information about the tracker data      // Obtain information about the tracker data
742      Int_t warning_dspnumber=0;      // and fill graphs and histos
     Float_t x[30000];  
     Float_t yc[30000][12];  
     Float_t eventint[30000];  
743    
744        Int_t al=0;
745        ULong_t obtx=0;
746        Double_t x[MAXSTORAGE];
747        Float_t yc[MAXSTORAGE][12];
748        Double_t eventint[MAXSTORAGE];
749        Int_t eventn[12];
750      
751      for (Int_t ev=minev; ev<maxevent; ev++){      for (Int_t ev=minev; ev<maxevent; ev++){
752        tr->GetEntry(ev);        tr->GetEntry(ev);
753        ph = eh->GetPscuHeader();        ph = eh->GetPscuHeader();
754          cod = eh->GetCounter();
755    
756    
757        if(ev==maxevent-1) maxev=maxevent-1;        if(ev==maxevent-1) maxev=maxevent-1;
758    
759        if((ph->GetOrbitalTime()<x[ev-minev-1] && ev-minev!=0) || ev-minev==30000){        if(((ULong_t)ph->GetOrbitalTime()<x[ev-minev-1] && ev-minev!=0) || ev-minev==MAXSTORAGE){
760          maxev=ev;          maxev=ev;
         printf("prova12  ev=%d\tev-minev=%d\n",ev,ev-minev);  
761          break;          break;
762        }        }
763        else{        else{
764          //      if(ii==32)printf("\nprova1  %d\tev-minev=%d\n",ev,ev-minev);          obtx = ph->GetOrbitalTime();
765          x[(ev-minev)]= ph->GetOrbitalTime();          x[(ev-minev)]=(Double_t)obtx;
766          ALARM=0;          ALARM=0;
           
767          Int_t dsp=0;          Int_t dsp=0;
768            Int_t noacq=0;
769            //      Int_t acq_dsp[12];
770            ULong_t acq_info_tmp=0;
771            if(cod->Get(pctp->RunHeader)>0) acq_info_tmp=acq_info[cod->Get(pctp->RunHeader)-1];
772            else acq_info_tmp=acq_info[cod->Get(pctp->RunHeader)];
773            for(Int_t io=0;io<12;io++){
774              //      acq_dsp[dsp]=(acq_info_tmp>>(12+io))&(~(~0<<1));
775              if(((acq_info_tmp>>(12+io))&(~(~0<<1)))==0)
776                noacq+=1;
777              WARNING[io]=0;
778            }
779    
780          for(Int_t i=0; i<12; i++){          for(Int_t i=0; i<12; i++){
781            dsp=te->DSPnumber[i]-1;  
782            yc[(ev-minev)][dsp]= 0.051*te->compressiontime[i];            if(i<12-noacq){
783                          if(te->DSPnumber[i]<1 || te->DSPnumber[i]>12) {
784            for(Int_t j=0;j<3;j++){                ALARM=1;
785              if(te->signcluster[i][j]!=0){                break;
786                hi=(j*1024)+te->addrcluster[i][j];              }
787                if((hi>505 && hi<519) ||(hi>1017 && hi<1031) ||(hi>1529 && hi<1543) || (hi>2041 && hi<2055) ||(hi>2553 && hi<2567))  
788                  continue;              dsp=te->DSPnumber[i]-1;
789                else illuminazione[dsp][ii]->Fill(hi);              yc[(ev-minev)][dsp]= 0.051*te->compressiontime[i];
790                  
791                //
792                // Fill Cluster Signal and Lighting of the view histos
793                for(Int_t j=0;j<3;j++){
794                  if(te->signcluster[i][j]!=0){
795                    if((te->addrcluster[i][j]>6 && te->addrcluster[i][j]<505) ||(te->addrcluster[i][j]>518 && te->addrcluster[i][j]<1018)){
796                      illuminazione[dsp]->Fill((Float_t)((j*1024.)+te->addrcluster[i][j]));
797                    }
798                  }
799                }
800                if(trk_cal_us[cod->Get(pctp->RunHeader)]!=104){
801                if(!(dsp%2)){                if(!(dsp%2)){
802                  landau1[dsp][ii]->Fill(1024-(te->signcluster[i][j]));                  if(te->signcluster[i][0]!=0) landau1[dsp]->Fill((Float_t)(1024.-te->signcluster[i][0]));
803                  landau2[dsp][ii]->Fill(1024-(te->signcluster[i][j]));                  if(te->signcluster[i][1]!=0) landau2[dsp]->Fill((Float_t)(1024.-te->signcluster[i][1]));
804                  landau3[dsp][ii]->Fill(1024-(te->signcluster[i][j]));                  if(te->signcluster[i][2]!=0) landau3[dsp]->Fill((Float_t)(1024.-te->signcluster[i][2]));
805                }                }
806                else{                else{
807                  landau1[dsp][ii]->Fill(te->signcluster[i][j]);                  if(te->signcluster[i][0]!=0) landau1[dsp]->Fill((Float_t)te->signcluster[i][0]);
808                  landau2[dsp][ii]->Fill(te->signcluster[i][j]);                  if(te->signcluster[i][1]!=0) landau2[dsp]->Fill((Float_t)te->signcluster[i][1]);
809                  landau3[dsp][ii]->Fill(te->signcluster[i][j]);                  if(te->signcluster[i][2]!=0) landau3[dsp]->Fill((Float_t)te->signcluster[i][2]);
810                }                }
811              }              }
           }  
             
           WARNING[i]=0;  
           if(te->fc[i]!=0 || te->fl1[i]!=0 || te->fl2[i]!=0 || te->fl3[i]!=0 || te->fl4[i]!=0 || te->fl5[i]!=0 || te->fl6[i]!=0){  
             ALARM = 1;      //general alarm  
             WARNING[i] = 1; // DSP warning  
           };  
   
           if(te->alarm[i]!=0){ // hardware alarm  
             ALARM = 1;  
           };  
         
           //**************************************************************************************  
           // warning for internal number  
           //**************************************************************************************  
           if(i<=10){  
             if(te->eventn[i]!=te->eventn[i+1]){  
               warning_dspnumber++;  
               warning<< "==> WARNING!!    Check entry "<< ev<<" (DSP "<<dsp<<")" <<endl<<  
                 "eventn["<<i<<"]= "<<te->eventn[i]<<"!= eventn["<<i+1<<"]= "<< te->eventn[i+1]<<endl;  
             }  
             else  
               eventint[(ev-minev)]=te->eventn[0];  
           }  
         }  
812    
813          if(ev<=maxevent-1){              WARNING[i]=0;
814                if(te->fc[i]!=0){
815                  if(countFC[dsp]==0){
816                    ALARM = 1;      //general alarm
817                    WARNING[i] = 1; // DSP warning
818                  }
819                  countFC[dsp]+=1;
820                };
821    
822            if((ev-minev)>=1 && eventint[(ev-minev)]!=eventint[(ev-minev)-1]+1 && eventint[(ev-minev)]!=1){              if(te->fl1[i]!=0){
823              warning_dspnumber++;                if(countFL1[dsp]==0){
824              warning<< "==> WARNING!!    Check entry "<< ev<<endl<<                  ALARM = 1;      //general alarm
825                " DSP event num.= "<< eventint[(ev-minev)]<<                  WARNING[i] = 1; // DSP warning
826                " is different from (previus+1) ="<<eventint[(ev-minev)-1]+1 <<"\n"<<endl;                }
827            }                countFL1[dsp]+=1;
828          }              };
829    
830                if(te->fl2[i]!=0){
831                  if(countFL2[dsp]==0){
832                    ALARM = 1;      //general alarm
833                    WARNING[i] = 1; // DSP warning
834                  }
835                  countFL2[dsp]+=1;
836                };
837    
838                if(te->fl3[i]!=0){
839                  if(countFL3[dsp]==0){
840                    ALARM = 1;      //general alarm
841                    WARNING[i] = 1; // DSP warning
842                  }
843                  countFL3[dsp]+=1;
844                };
845    
846                if(te->fl4[i]!=0){
847                  if(countFL4[dsp]==0){
848                    ALARM = 1;      //general alarm
849                    WARNING[i] = 1; // DSP warning
850                  }
851                  countFL4[dsp]+=1;
852                };
853    
854                if(te->fl5[i]!=0){
855                  if(countFL5[dsp]==0){
856                    ALARM = 1;      //general alarm
857                    WARNING[i] = 1; // DSP warning
858                  }
859                  countFL5[dsp]+=1;
860                };
861    
862                if(te->fl6[i]!=0){
863                  if(countFL6[dsp]==0){
864                    ALARM = 1;      //general alarm
865                    WARNING[i] = 1; // DSP warning
866                  }
867                  countFL6[dsp]+=1;
868                };
869    
870                if(dsp%2==0 && te->alarm[i]!=0){ // hardware alarm
871                  if(countALARMy==0)
872                    ALARM = 1;
873                  countALARMy+=1;
874                };
875    
876                if(dsp%2==1 && te->alarm[i]!=0){ // hardware alarm
877                  if(countALARMx==0)
878                    ALARM = 1;
879                  countALARMx+=1;
880                };
881                
882                //**************************************************************************************
883                // warning for internal number
884                //**************************************************************************************
885                if(ev==minev && i<=10 && te->eventn[i]!=te->eventn[i+1]) ALARM=1;
886                if((ev-minev)>=1 && eventn[i]+1!=te->eventn[i] && te->eventn[i]!=1) ALARM=1;
887              }
888            }
889            eventint[(ev-minev)]=te->eventn[0];
890    
891          //********************************************************************************************          //********************************************************************************************
892          // file ALARM          // file DSP warning
893          //********************************************************************************************          //********************************************************************************************
894            
895          alarm <<endl<< "================================================="<< endl;          if(ALARM==1) {  
896          alarm << "PSCU-Pkt N. "<< ph->GetCounter() ;            al=1;
897          alarm << " - OBT "<< ph->GetOrbitalTime() << " ms"<<endl;            alarm <<endl<< "================================================="<< endl;
898          alarm << "(ROOT-tree entry "<<ev<<")"<<endl;            alarm << "PSCU-Pkt N. "<< ph->GetCounter() ;
899          alarm << "================================================="<< endl;            alarm << " - OBT "<< (ULong_t)ph->GetOrbitalTime() << " ms"<<endl;
900                      alarm << "Total events "<<nevent<<endl;
901          if(ALARM==1) {            alarm << "(ROOT-tree entry "<<ev<<" in page "<<ii+1<<" )"<<endl;
902              alarm << "================================================="<< endl;
903              
904            alarm << " DSPn";            alarm << " DSPn";
905            alarm << " Event";            alarm << " Counter";
906              alarm << " previous";
907            alarm << " Words";            alarm << " Words";
908            alarm << " crc";            alarm << " crc";
909            alarm << "  FC";            alarm << "  FC";
# Line 635  void FTrkQLook_EXPERT(TString file,Int_t Line 916  void FTrkQLook_EXPERT(TString file,Int_t
916                        
917            for(Int_t i=0; i<12 ; i++){            for(Int_t i=0; i<12 ; i++){
918              alarm.width(5); alarm << te->DSPnumber[i];              alarm.width(5); alarm << te->DSPnumber[i];
919              alarm.width(6); alarm << te->eventn[i];              alarm.width(8); alarm << te->eventn[i];
920                alarm.width(8); alarm << eventn[i];
921              alarm.width(6); alarm << te->DATAlength[i];              alarm.width(6); alarm << te->DATAlength[i];
922              alarm.width(4); alarm << te->crc[i];              alarm.width(4); alarm << te->crc[i];
923              alarm.width(4); alarm << te->fc[i];              alarm.width(4); alarm << te->fc[i];
# Line 650  void FTrkQLook_EXPERT(TString file,Int_t Line 932  void FTrkQLook_EXPERT(TString file,Int_t
932              alarm    << endl;              alarm    << endl;
933            }            }
934          }          }
935            for(Int_t i=0; i<12 ; i++)
936              eventn[i]=te->eventn[i];
937          }
938        }
939        if(al==0) alarm << endl<< "Page "<<ii+1<< ": ------>  NO ALARM!!! <-------"<<endl;
940        if(maxev==maxevent-1) {
941          if(countALARMy!=0){
942            if(countALARMy%6!=0) alarm << endl<<endl<< "***** "<<countALARMy/6+1 <<" events with hardware alarm in Y-view *****"<<endl;
943            else alarm << endl<<endl<< "***** "<<countALARMy/6 <<" events with hardware alarm in Y-view *****"<<endl;
944          }
945          if(countALARMx!=0){
946            if(countALARMx%6!=0) alarm << endl<<endl<< "***** "<<countALARMx/6+1 <<" events with hardware alarm in X-view *****"<<endl;
947            else alarm << endl<<endl<< "***** "<<countALARMx/6 <<" events with hardware alarm in X-view *****"<<endl;
948          }
949          for(int p=0; p<12; p++){
950            if(countFC[p]!=0) alarm << endl<<endl<< "***** "<<countFC[p] <<" events with fc!=0 in DSP "<<p+1<<" *****"<<endl;
951            if(countFL1[p]!=0) alarm << endl<<endl<< "***** "<<countFL1[p] <<" events with fl1!=0 in DSP "<<p+1<<" *****"<<endl;
952            if(countFL2[p]!=0) alarm << endl<<endl<< "***** "<<countFL2[p] <<" events with fl2!=0 in DSP "<<p+1<<" *****"<<endl;
953            if(countFL3[p]!=0) alarm << endl<<endl<< "***** "<<countFL3[p] <<" events with fl3!=0 in DSP "<<p+1<<" *****"<<endl;
954            if(countFL4[p]!=0) alarm << endl<<endl<< "***** "<<countFL4[p] <<" events with fl4!=0 in DSP "<<p+1<<" *****"<<endl;
955            if(countFL5[p]!=0) alarm << endl<<endl<< "***** "<<countFL5[p] <<" events with fl5!=0 in DSP "<<p+1<<" *****"<<endl;
956            if(countFL6[p]!=0) alarm << endl<<endl<< "***** "<<countFL6[p] <<" events with fl6!=0 in DSP "<<p+1<<" *****"<<endl;
957        }        }
       if(ALARM==0) alarm << endl<< "------>  NO ALARM!!! <-------"<<endl;  
     
       if(warning_dspnumber==0) warning<<"NONE"<<endl;  
958      }      }
959    
960      //    printf("prova2\n");      //
961        // Draw the graphs
     Float_t maxhist=0;  
     TBox b;  
     b.SetFillColor(5);  
   
962      for (Int_t i=0; i<12 ; i++){      for (Int_t i=0; i<12 ; i++){
963        Float_t yyc[maxev-minev];        Double_t yyc[maxev-minev];
964        for (Int_t v=0; v<maxev-minev; v++){        for (Int_t v=0; v<maxev-minev; v++){
965          yyc[v]=yc[v][i];          yyc[v]=yc[v][i];
966        }        }
       
       printf("prova3\n");  
       LandauCanv1[ii]->cd();  
       pad1[i]->SetFillColor(10);  
       pad1[i]->SetFrameFillColor(10);  
       pad1[i]->Draw();  
       pad1[i]->cd();  
       landau1[i][ii]->Draw("");  
       LandauCanv2[ii]->cd();  
       pad4[i]->SetFillColor(10);  
       pad4[i]->SetFrameFillColor(10);  
       pad4[i]->Draw();  
       pad4[i]->cd();  
       landau2[i][ii]->Draw("");  
       LandauCanv3[ii]->cd();  
       pad5[i]->SetFillColor(10);  
       pad5[i]->SetFrameFillColor(10);  
       pad5[i]->Draw();  
       pad5[i]->cd();  
       landau3[i][ii]->Draw("");  
   
       printf("prova4\n");  
       IlluminaCanv[ii]->cd();  
       pad2[i]->SetFillColor(10);  
       pad2[i]->SetFrameFillColor(10);  
       pad2[i]->Draw();  
       pad2[i]->cd();  
       pad2[i]->SetLogy();  
       // illuminazione[i][ii]->SetStats(KFALSE);  
       if(i==1){  
         illuminazione[i][ii]->Draw("ah");  
         maxhist= illuminazione[i][ii]->GetMaximum();  
         b.DrawBox(2816.,0.,3060.,maxhist);  
         illuminazione[i][ii]->Draw("axis same");  
         illuminazione[i][ii]->Draw("same ][");  
       }  
       else if(i==6){  
         illuminazione[i][ii]->Draw("ah");  
         maxhist= illuminazione[i][ii]->GetMaximum();  
         b.DrawBox(2560.,0.,2816.,maxhist);  
         b.DrawBox(512.,0.,768.,maxhist);  
         b.DrawBox(1024.,0.,1792.,maxhist);  
         illuminazione[i][ii]->Draw("axis same");  
         illuminazione[i][ii]->Draw("same][");  
       }  
       else if(i==11){  
         illuminazione[i][ii]->Draw("ah");  
         maxhist= illuminazione[i][ii]->GetMaximum();  
         b.DrawBox(768.,0.,1024.,maxhist);  
         illuminazione[i][ii]->Draw("axis same");  
         illuminazione[i][ii]->Draw("same][");  
       }  
       else illuminazione[i][ii]->Draw("");  
   
       printf("prova5\n");  
   
967    
968        CompTimeCanv[ii]->cd();        CompTimeCanv[ii]->cd();
969        pad3[i]->SetFillColor(10);        pad3[i]->SetFillColor(10);
# Line 736  void FTrkQLook_EXPERT(TString file,Int_t Line 977  void FTrkQLook_EXPERT(TString file,Int_t
977        comprtime[i][ii]->GetXaxis()->CenterTitle();        comprtime[i][ii]->GetXaxis()->CenterTitle();
978        comprtime[i][ii]->GetYaxis()->SetTitle("compressiontime (ms)");        comprtime[i][ii]->GetYaxis()->SetTitle("compressiontime (ms)");
979        comprtime[i][ii]->GetYaxis()->CenterTitle();        comprtime[i][ii]->GetYaxis()->CenterTitle();
980        comprtime[i][ii]->GetYaxis()->SetRangeUser(0,2);        if(maxev-minev==1) comprtime[i][ii]->GetXaxis()->SetNdivisions(-501);
981          // comprtime[i][ii]->GetYaxis()->SetRangeUser(0,3);
982        comprtime[i][ii]->Draw("ap");        comprtime[i][ii]->Draw("ap");
983        oss1.str("");        oss1.str("");
   
984        CompTimeCanv[ii]->Update();        CompTimeCanv[ii]->Update();
985        LandauCanv1[ii]->Update();      }
       LandauCanv2[ii]->Update();  
       LandauCanv3[ii]->Update();  
       IlluminaCanv[ii]->Update();  
     };  
986        
987      printf("prova6\n");      
     EventNumCanv[ii]->cd();  
     pt0=new TPad("pt0"," ",0.704,0.004,0.996,0.98);  
     pt1 = new TPaveText(0.004,0.004,0.986,0.996);  
     pt = new TPad("pt"," ",0.004,0.004,0.7,0.98,18,0,0);  
     pt1->SetFillColor(10);  
     pt1->ReadFile(out + "warning.txt");  
     pt1->SetTextAlign(22);  
     pt1->SetTextSize(0.035);  
     pt0->SetFillColor(10);  
     pt0->SetFrameFillColor(10);  
     pt0->Draw();  
     pt0->cd();  
     pt1->Draw();  
988      EventNumCanv[ii]->cd();      EventNumCanv[ii]->cd();
989        pt = new TPad("pt"," ",0.02,0.01,1.,0.98,18,0,0);
990      pt->SetFillColor(10);      pt->SetFillColor(10);
991      pt->SetFrameFillColor(10);      pt->SetFrameFillColor(10);
992      pt->Draw();      pt->Draw();
993      pt->cd();      pt->cd();
994      eventnumb[ii]=new TGraph(maxev-minev,x,eventint);      eventnumb[ii]=new TGraph(maxev-minev,x,eventint);
995      eventnumb[ii]->SetTitle("");      eventnumb[ii]->SetTitle("");
996      eventnumb[ii]->GetXaxis()->SetLabelSize(0.04);      eventnumb[ii]->GetXaxis()->SetLabelSize(0.02);
997      eventnumb[ii]->GetXaxis()->SetTitleSize(0.04);      eventnumb[ii]->GetXaxis()->SetTitleSize(0.03);
998      eventnumb[ii]->GetXaxis()->SetTitle("OBT (ms)");      eventnumb[ii]->GetXaxis()->SetTitle("OBT (ms)");
999      eventnumb[ii]->GetXaxis()->CenterTitle();      eventnumb[ii]->GetXaxis()->CenterTitle();
1000      eventnumb[ii]->GetXaxis()->SetTickLength(0.01);      eventnumb[ii]->GetXaxis()->SetTickLength(0.01);
1001      eventnumb[ii]->GetXaxis()->SetTitleOffset(1.2);      eventnumb[ii]->GetXaxis()->SetTitleOffset(1.1);
1002      eventnumb[ii]->GetYaxis()->SetLabelSize(0.04);      eventnumb[ii]->GetYaxis()->SetLabelSize(0.02);
1003      eventnumb[ii]->GetYaxis()->SetTitleSize(0.04);      eventnumb[ii]->GetYaxis()->SetTitleSize(0.03);
1004      eventnumb[ii]->GetYaxis()->SetTitle("DSP event-number");      eventnumb[ii]->GetYaxis()->SetTitle("DSP event-number");
1005      eventnumb[ii]->GetYaxis()->CenterTitle();      eventnumb[ii]->GetYaxis()->CenterTitle();
1006      eventnumb[ii]->GetYaxis()->SetTitleOffset(1.5);      if(maxev-minev==1) eventnumb[ii]->GetXaxis()->SetNdivisions(-501);
1007        eventnumb[ii]->GetYaxis()->SetTitleOffset(2.);
1008      eventnumb[ii]->SetMarkerStyle(21);      eventnumb[ii]->SetMarkerStyle(21);
1009      eventnumb[ii]->SetMarkerColor(kBlue);      eventnumb[ii]->SetMarkerColor(kBlue);
1010      eventnumb[ii]->SetMarkerSize(0.3);      eventnumb[ii]->SetMarkerSize(0.2);
1011        oss1.str("");
1012        oss1<<"number of events in this graph: "<<maxev-minev;
1013        t->SetTextColor(kBlue);
1014        t->SetTextSize(0.02);
1015        double xtex=0,ytex=0;
1016        xtex=x[maxev-minev-1]-(x[maxev-minev-1]-x[0])/3;
1017        ytex=1000.+eventnumb[ii]->GetYaxis()->GetXmax();
1018        t->DrawLatex(xtex,ytex,oss1.str().c_str());
1019        oss1.str("");  
1020      eventnumb[ii]->Draw("ap");      eventnumb[ii]->Draw("ap");
1021      EventNumCanv[ii]->Update();      EventNumCanv[ii]->Update();
   
     printf("prova7\n");  
   
     obt=0;  
     for(Int_t i=0; i<5; i++){  
       Int_t v=0;  
       for (Int_t ev=countTEMP; ev<tsize; ev++){  
         tree->GetEntry(ev);  
         ph=eT->GetPscuHeader();  
           
         if(ph->GetOrbitalTime()<obt && ev>countTEMP){  
           countTEMP=ev;  
           break;  
         }  
         else{  
           obt=ph->GetOrbitalTime();  
           tempt_tmp[v++]=(Int_t)(((3.3*tempt[ev][i]/4096)-0.586)/0.0231);  
         }  
       }  
       TempCanv[ii]->cd();  
       tit<<"T"<<i+5<<" (magnetic module "<<i+1<<")";  
       pad6[i]->SetFillColor(10);  
       pad6[i]->Draw();  
       pad6[i]->cd();  
       temp[i][ii]= new TGraph(v,xt,tempt_tmp);  
       temp[i][ii]->SetTitle(tit.str().c_str());  
       temp[i][ii]->GetXaxis()->SetLabelSize(0.04);  
       temp[i][ii]->GetXaxis()->SetTitleSize(0.04);  
       temp[i][ii]->GetXaxis()->SetTitle("OBT (ms)");  
       temp[i][ii]->GetXaxis()->CenterTitle();  
       temp[i][ii]->GetXaxis()->SetTitleOffset(0.85);  
       temp[i][ii]->GetYaxis()->SetTitleOffset(1.2);  
       temp[i][ii]->GetYaxis()->SetLabelOffset(0.001);  
       temp[i][ii]->GetYaxis()->SetLabelSize(0.04);  
       temp[i][ii]->GetYaxis()->SetTitleSize(0.04);  
       temp[i][ii]->GetYaxis()->SetTitle("Temperatures ( ^{o}C)");  
       temp[i][ii]->GetYaxis()->CenterTitle();  
       temp[i][ii]->SetMarkerStyle(21);  
       temp[i][ii]->SetMarkerSize(0.2);  
       temp[i][ii]->Draw("ap");  
       tit.str("");  
       TempCanv[ii]->Update();  
     }  
1022            
     printf("prova8\n");  
1023      minev=maxev;      minev=maxev;
     printf("\ncountrun=%d\n",ii);  
1024      if(maxev==maxevent-1) {      if(maxev==maxevent-1) {
1025        countrun=ii+1;        cntpgdat=ii+1;
1026        break;        break;
1027      }      }
1028        
     warning.close();  
   
1029    }    }
1030    
   //*****************************************  
   //close all files  
   //*****************************************    
1031    alarm.close();    alarm.close();
1032    datafile->Close();  
1033      //****************************************************************************************
1034      //Cluster Signal ladder1 Output Pages
1035      //****************************************************************************************
1036    
1037      fromfile.str("");
1038      fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;
1039      isfile<<"Cluster Signal ladder1";
1040      LandauCanv1=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
1041      LandauCanv1->SetFillColor(10);
1042      LandauCanv1->Range(0,0,100,100);
1043    
1044      t->SetTextFont(32);
1045      t->SetTextColor(1);
1046      t->SetTextAlign(12);
1047      t->SetTextSize(0.02);
1048      t->DrawLatex(2.,98.7,fromfile.str().c_str());
1049      t1->SetTextFont(32);
1050      t1->SetTextColor(1);
1051      t1->SetTextAlign(12);
1052      t1->SetTextSize(0.02);
1053      t1->DrawLatex(70.,98.7,isfile.str().c_str());
1054      isfile.str("");
1055      
1056      //****************************************************************************************
1057      //Cluster Signal ladder2 Output Pages
1058      //****************************************************************************************
1059    
1060      isfile<<"Cluster Signal ladder2";
1061      LandauCanv2=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
1062      LandauCanv2->SetFillColor(10);
1063      LandauCanv2->Range(0,0,100,100);
1064    
1065      t->SetTextFont(32);
1066      t->SetTextColor(1);
1067      t->SetTextAlign(12);
1068      t->SetTextSize(0.02);
1069      t->DrawLatex(2.,98.7,fromfile.str().c_str());
1070      t1->SetTextFont(32);
1071      t1->SetTextColor(1);
1072      t1->SetTextAlign(12);
1073      t1->SetTextSize(0.02);
1074      t1->DrawLatex(70.,98.7,isfile.str().c_str());
1075      isfile.str("");
1076    
1077      //****************************************************************************************
1078      //Cluster Signal ladder3 Output Pages
1079      //****************************************************************************************
1080    
1081      isfile<<"Cluster Signal ladder3";
1082      LandauCanv3=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
1083      LandauCanv3->SetFillColor(10);
1084      LandauCanv3->Range(0,0,100,100);
1085    
1086      t->SetTextFont(32);
1087      t->SetTextColor(1);
1088      t->SetTextAlign(12);
1089      t->SetTextSize(0.02);
1090      t->DrawLatex(2.,98.7,fromfile.str().c_str());
1091      t1->SetTextFont(32);
1092      t1->SetTextColor(1);
1093      t1->SetTextAlign(12);
1094      t1->SetTextSize(0.02);
1095      t1->DrawLatex(70.,98.7,isfile.str().c_str());
1096      isfile.str("");
1097      
1098      //****************************************************************************************
1099      //Lighting of the views Output Pages
1100      //****************************************************************************************
1101    
1102      isfile<<"lighting of the views";
1103      IlluminaCanv=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
1104      IlluminaCanv->SetFillColor(10);
1105      IlluminaCanv->Range(0,0,100,100);
1106      t->SetTextFont(32);
1107      t->SetTextColor(1);
1108      t->SetTextAlign(12);
1109      t->SetTextSize(0.02);
1110      t->DrawLatex(2.,98.7,fromfile.str().c_str());
1111      t1->SetTextFont(32);
1112      t1->SetTextColor(1);
1113      t1->SetTextAlign(12);
1114      t1->SetTextSize(0.02);
1115      t1->DrawLatex(70.,98.7,isfile.str().c_str());
1116      isfile.str("");
1117      
1118      isfile<<"Chips with white line at least once showed anomalous behaviour";
1119      t->SetTextColor(17);
1120      t->SetTextSize(0.018);
1121      t->DrawLatex(.01,.96,isfile.str().c_str());
1122      isfile.str("");
1123      
1124      isfile<<"Boxes so colored point out anomalous chips (not necessarily broken)";
1125      t->SetTextColor(107);
1126      //  t->DrawLatex(7.,95.7,isfile.str().c_str());
1127      isfile.str("");
1128      t->SetTextColor(1);
1129    
1130      //
1131      // Draw the histos
1132      for (Int_t nn=0; nn<12 ; nn++){
1133            
1134        TBox b;
1135    
1136        Float_t maxhist=0.,va1x=0.,minhist=0.;
1137        LandauCanv1->cd();
1138        pad1[nn]->SetFillColor(10);
1139        pad1[nn]->SetFrameFillColor(10);
1140        pad1[nn]->Draw();
1141        pad1[nn]->cd();
1142        landau1[nn]->GetXaxis()->SetTitle("max signal");
1143        landau1[nn]->GetXaxis()->CenterTitle();
1144        landau1[nn]->Draw("");
1145        LandauCanv1->Update();
1146    
1147        LandauCanv2->cd();
1148        pad4[nn]->SetFillColor(10);
1149        pad4[nn]->SetFrameFillColor(10);
1150        pad4[nn]->Draw();
1151        pad4[nn]->cd();
1152        landau2[nn]->GetXaxis()->SetTitle("max signal");
1153        landau2[nn]->GetXaxis()->CenterTitle();
1154        landau2[nn]->Draw("");
1155        LandauCanv2->Update();
1156    
1157        LandauCanv3->cd();
1158        pad5[nn]->SetFillColor(10);
1159        pad5[nn]->SetFrameFillColor(10);
1160        pad5[nn]->Draw();
1161        pad5[nn]->cd();
1162        landau3[nn]->GetXaxis()->SetTitle("max signal");
1163        landau3[nn]->GetXaxis()->CenterTitle();
1164        landau3[nn]->Draw("");
1165        LandauCanv3->Update();
1166    
1167    
1168        li.SetLineColor(38);
1169        li.SetLineStyle(4);
1170        li.SetLineWidth(2);
1171        liva1.SetLineColor(42);
1172        liva1.SetLineStyle(3);
1173        liva1.SetLineWidth(1);
1174    
1175        IlluminaCanv->cd();
1176        pad2[nn]->SetFillColor(10);
1177        pad2[nn]->SetFrameFillColor(10);
1178        pad2[nn]->SetLogy();
1179        pad2[nn]->Draw();
1180        pad2[nn]->cd();
1181        illuminazione[nn]->GetXaxis()->SetTitle("strip with max signal");
1182        illuminazione[nn]->GetXaxis()->CenterTitle();
1183        illuminazione[nn]->Draw("");
1184        maxhist= illuminazione[nn]->GetMaximum();
1185        minhist=0.;
1186        b.SetFillColor(19);
1187        b.SetFillStyle(3954);
1188        if(nn==0){
1189          b.DrawBox(0.,minhist,2047.,maxhist);
1190        }
1191        else if(nn==1){
1192          b.DrawBox(128.,minhist,256.,maxhist);
1193          b.DrawBox(384.,minhist,512.,maxhist);
1194          b.DrawBox(896.,minhist,1024.,maxhist);
1195          b.DrawBox(2048.,minhist,2432.,maxhist);
1196          b.DrawBox(2816.,minhist,2944.,maxhist);
1197          b.DrawBox(2944.,minhist,3070.,maxhist);
1198        }
1199        else if(nn==3){
1200          b.DrawBox(0.,minhist,256.,maxhist);
1201          b.DrawBox(2816.,minhist,3070.,maxhist);
1202        }
1203        else if(nn==4){
1204          b.DrawBox(256.,minhist,512.,maxhist);
1205          b.DrawBox(1792.,minhist,1920.,maxhist);
1206          b.DrawBox(2816.,minhist,3070.,maxhist);
1207        }
1208        else if(nn==5){
1209          b.DrawBox(0.,minhist,256.,maxhist);
1210          b.DrawBox(896.,minhist,1024.,maxhist);
1211          b.DrawBox(1664.,minhist,1792.,maxhist);      
1212        }
1213        else if(nn==6){
1214          b.DrawBox(512.,minhist,768.,maxhist);
1215          b.DrawBox(1024.,minhist,1280.,maxhist);
1216          b.DrawBox(1280.,minhist,1792.,maxhist);
1217          b.DrawBox(2560.,minhist,2816.,maxhist);
1218       }
1219        else if(nn==7){
1220          b.DrawBox(0.,minhist,1535.,maxhist);
1221          b.DrawBox(2024.,minhist,2280.,maxhist);
1222        }
1223        else if(nn==8){
1224          b.DrawBox(512.,minhist,768.,maxhist);
1225        }
1226        else if(nn==9){
1227          b.DrawBox(0.,minhist,128.,maxhist);
1228          b.DrawBox(256.,minhist,384.,maxhist);
1229          b.DrawBox(512.,minhist,640.,maxhist);
1230          b.DrawBox(896.,minhist,1152.,maxhist);
1231          b.DrawBox(1280.,minhist,1535.,maxhist);
1232          b.DrawBox(1664.,minhist,1920.,maxhist);
1233          b.DrawBox(2048.,minhist,2304.,maxhist);
1234        }
1235        else if(nn==10){
1236          b.DrawBox(0.,minhist,512.,maxhist);
1237          b.DrawBox(1024.,minhist,3070.,maxhist);
1238        }
1239        else if(nn==11){
1240          b.DrawBox(0.,minhist,512.,maxhist);
1241          b.DrawBox(768.,minhist,1024.,maxhist);
1242          b.DrawBox(1536.,minhist,1664.,maxhist);
1243          b.DrawBox(1920.,minhist,2560.,maxhist);
1244          b.DrawBox(2816.,minhist,3070.,maxhist);
1245        }                                        
1246        for(int va=1; va<24; va++){
1247          va1x=128*va;
1248          liva1.DrawLine(va1x,minhist,va1x,maxhist);
1249        }
1250        li.DrawLine(1024.5,minhist,1024.5,maxhist);
1251        li.DrawLine(2048.5,minhist,2048.5,maxhist);
1252        IlluminaCanv->Update();
1253      }
1254    
1255    printf("... end of packets. \n");    printf("... end of packets. \n");
1256    
1257    //*************************************************************************    //*************************************************************************
1258    // Save output Files    // Save output Files
1259    //*************************************************************************    //*************************************************************************
1260    stringstream out1,out2,out3,command;    stringstream out1,out2,out3,command;
1261        Int_t totpg=0;
1262    for(Int_t fl=0;fl<countrun;fl++){    if(cntpgtemp>cntpgdat) totpg=cntpgtemp;
1263      else if(cntpgtemp<=cntpgdat) totpg=cntpgdat;
1264    
1265      for(Int_t fl=0;fl<totpg;fl++){
1266    
1267      if(!strcmp(outfile.Data(),"ps")||!strcmp(outfile.Data(),"pdf")){      if(!strcmp(outfile.Data(),"ps")||!strcmp(outfile.Data(),"pdf")){
1268        out1.str("");        out1.str("");
1269        out2.str("");        out2.str("");
# Line 862  void FTrkQLook_EXPERT(TString file,Int_t Line 1273  void FTrkQLook_EXPERT(TString file,Int_t
1273        out2<<ffile<<"_FTrkQLook_EXPERT.ps";        out2<<ffile<<"_FTrkQLook_EXPERT.ps";
1274        out3<<ffile<<"_FTrkQLook_EXPERT.ps)";        out3<<ffile<<"_FTrkQLook_EXPERT.ps)";
1275            
1276        if(countrun==1){        if(totpg==1){
1277          CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");          CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");
1278          EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1279          LandauCanv1[fl]->Print(out+out2.str().c_str(),"Portrait");          TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1280          LandauCanv2[fl]->Print(out+out2.str().c_str(),"Portrait");          BfieldCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1281          LandauCanv3[fl]->Print(out+out2.str().c_str(),"Portrait");          LandauCanv1->Print(out+out2.str().c_str(),"Portrait");
1282          IlluminaCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          LandauCanv2->Print(out+out2.str().c_str(),"Portrait");
1283          TempCanv[fl]->Print(out+out3.str().c_str(),"Portrait");          LandauCanv3->Print(out+out2.str().c_str(),"Portrait");
1284            IlluminaCanv->Print(out+out3.str().c_str(),"Portrait");
1285        }        }
1286        else if(countrun>=1){        else if(totpg>1){
1287          if(fl==0) CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");          if(fl==0) CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");
1288          else CompTimeCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          if(fl>0 && fl<cntpgdat) CompTimeCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1289          EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          if(fl<cntpgdat) EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1290          LandauCanv1[fl]->Print(out+out2.str().c_str(),"Portrait");          if(fl<cntpgmag) BfieldCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1291          LandauCanv2[fl]->Print(out+out2.str().c_str(),"Portrait");          if(fl<cntpgtemp) TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1292          LandauCanv3[fl]->Print(out+out2.str().c_str(),"Portrait");          if(fl==totpg-1){
1293          IlluminaCanv[fl]->Print(out+out2.str().c_str(),"Portrait");            LandauCanv1->Print(out+out2.str().c_str(),"Portrait");
1294          if(fl!=countrun-1) TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");            LandauCanv2->Print(out+out2.str().c_str(),"Portrait");
1295          else TempCanv[fl]->Print(out+out3.str().c_str(),"Portrait");            LandauCanv3->Print(out+out2.str().c_str(),"Portrait");
1296        }            IlluminaCanv->Print(out+out3.str().c_str(),"Portrait");
1297                  }
       if(!strcmp(outfile.Data(),"pdf")){  
         stringstream com;  
         com<<"ps2pdf13 "<<out<<ffile<<"_FTrkQLook_EXPERT.ps "<<out<<ffile<<"_FTrkQLook_EXPERT.pdf";  
         system(com.str().c_str());  
         printf("\n---> ps file converted in pdf format!\n");  
         com.str("");  
         com<<"rm -f "<<out<<ffile<<"_FTrkQLook_EXPERT.ps ";  
         system(com.str().c_str());  
         printf("---> ps file removed!\n\n");  
         com.str("");  
1298        }        }
1299      }      }
1300      else{      else{
1301        out1.str("");        out1.str("");
1302        out1<<ffile<<"_FTrkQLook_EXPERT-CompTime-pag"<<fl+1<<"."<<outfile.Data();        out1<<ffile<<"_FTrkQLook_EXPERT-CompTime-pag"<<fl+1<<"."<<outfile.Data();
1303        CompTimeCanv[fl]->Print(out+out1.str().c_str());        if(fl<cntpgdat) CompTimeCanv[fl]->Print(out+out1.str().c_str());
1304          out1.str("");
1305          out1<<ffile<<"_FTrkQLook_EXPERT-BField-pag"<<fl+1<<"."<<outfile.Data();
1306          if(fl<cntpgmag) BfieldCanv[fl]->Print(out+out1.str().c_str());
1307        out1.str("");        out1.str("");
1308        out1<<ffile<<"_FTrkQLook_EXPERT-Temp-pag"<<fl+1<<"."<<outfile.Data();        out1<<ffile<<"_FTrkQLook_EXPERT-Temp-pag"<<fl+1<<"."<<outfile.Data();
1309        TempCanv[fl]->Print(out+out1.str().c_str());        if(fl<cntpgtemp) TempCanv[fl]->Print(out+out1.str().c_str());
1310        out1.str("");        out1.str("");
1311        out1<<ffile<<"_FTrkQLook_EXPERT-EvNum-pag"<<fl+1<<"."<<outfile.Data();        out1<<ffile<<"_FTrkQLook_EXPERT-EvNum-pag"<<fl+1<<"."<<outfile.Data();
1312        EventNumCanv[fl]->Print(out+out1.str().c_str());        if(fl<cntpgdat) EventNumCanv[fl]->Print(out+out1.str().c_str());
1313        out1.str("");        if(fl==totpg-1){
1314        out1<<ffile<<"_FTrkQLook_EXPERT-LandauL1-pag"<<fl+1<<"."<<outfile.Data();          out1.str("");
1315        LandauCanv1[fl]->Print(out+out1.str().c_str());          out1<<ffile<<"_FTrkQLook_EXPERT-LandauL1."<<outfile.Data();
1316        out1.str("");          LandauCanv1->Print(out+out1.str().c_str());
1317        out1<<ffile<<"_FTrkQLook_EXPERT-LandauL2-pag"<<fl+1<<"."<<outfile.Data();          out1.str("");
1318        LandauCanv2[fl]->Print(out+out1.str().c_str());          out1<<ffile<<"_FTrkQLook_EXPERT-LandauL2."<<outfile.Data();
1319        out1.str("");          LandauCanv2->Print(out+out1.str().c_str());
1320        out1<<ffile<<"_FTrkQLook_EXPERT-LandauL3-pag"<<fl+1<<"."<<outfile.Data();          out1.str("");
1321        LandauCanv3[fl]->Print(out+out1.str().c_str());          out1<<ffile<<"_FTrkQLook_EXPERT-LandauL3."<<outfile.Data();
1322        out1.str("");          LandauCanv3->Print(out+out1.str().c_str());
1323        out1<<ffile<<"_FTrkQLook_EXPERT-Lighting-pag"<<fl+1<<"."<<outfile.Data();          out1.str("");
1324        IlluminaCanv[fl]->Print(out+out1.str().c_str());          out1<<ffile<<"_FTrkQLook_EXPERT-Lighting."<<outfile.Data();
1325            IlluminaCanv->Print(out+out1.str().c_str());
1326          }
1327      }      }
1328      }  
1329    
1330      //
1331      // Convert ps to pdf if required
1332      if(!strcmp(outfile.Data(),"pdf")){
1333        stringstream com;
1334        com<<"ps2pdf13 "<<out<<ffile<<"_FTrkQLook_EXPERT.ps "<<out<<ffile<<"_FTrkQLook_EXPERT.pdf";
1335        system(com.str().c_str());
1336        printf("\n---> ps file converted in pdf format!\n");
1337        com.str("");
1338        com<<"rm -f "<<out<<ffile<<"_FTrkQLook_EXPERT.ps ";
1339        system(com.str().c_str());
1340        printf("---> ps file removed!\n\n");
1341        com.str("");
1342    }    }
   command.str("");  
   command<<"rm -f "<<out<<"warning.txt";  
   system(command.str().c_str());  
1343    
1344   gROOT->Reset();    gROOT->Reset();
1345    return;    return;
1346  }  }
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.36
  ViewVC Help
Powered by ViewVC 1.1.23