/[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.1 by pam-fi, Wed May 10 10:06:55 2006 UTC revision 1.5 by pam-fi, Mon Jun 5 14:23:29 2006 UTC
# Line 25  Line 25 
25  #include <physics/tracker/TrackerEvent.h>  #include <physics/tracker/TrackerEvent.h>
26  #include <PscuHeader.h>  #include <PscuHeader.h>
27  #include <EventHeader.h>  #include <EventHeader.h>
28    #include <RunHeaderEvent.h>
29  #include <TrkAlarmEvent.h>  #include <TrkAlarmEvent.h>
30  #include <tsbt/TsbTRecord.h>  #include <tsbt/TsbTRecord.h>
31  #include <tsbt/TsbTEvent.h>  #include <tsbt/TsbTEvent.h>
32  //  //
33    #define MAXSTORAGE 50000
34    
35  void stringcopy(TString& s1, const TString& s2, Int_t from=0, Int_t to=0){      void stringcopy(TString& s1, const TString& s2, Int_t from=0, Int_t to=0){    
36      if ( to == 0 ){    if ( to == 0 ){
37          Int_t t2length = s2.Length();      Int_t t2length = s2.Length();
38          s1 = "";      s1 = "";
39          to = t2length;      to = t2length;
40      };    };
41      for (Int_t i = from; i<to; i++){    for (Int_t i = from; i<to; i++){
42          s1.Append(s2[i],1);      s1.Append(s2[i],1);
43      };    };
44  };  };
45    
46    
# Line 47  void FTrkQLook_EXPERT(TString file,Int_t Line 49  void FTrkQLook_EXPERT(TString file,Int_t
49    //    //
50    //   obtain information about the data file and select the output dir    //   obtain information about the data file and select the output dir
51    const string filepath=file.Data();    const string filepath=file.Data();
52    Int_t dwpos = filepath.rfind("DW_");    Int_t dwpos = filepath.rfind("/");
53    Int_t dwpos1 = filepath.find(".root");    Int_t dwpos1 = filepath.find(".root");
54    TString fpath=(filepath.c_str());    TString fpath=(filepath.c_str());
55    TString base,ffile ;    TString base,ffile ;
56    stringcopy(ffile,fpath,dwpos,dwpos1);    stringcopy(ffile,fpath,dwpos+1,dwpos1);
57    stringcopy(base,fpath,0,dwpos);    stringcopy(base,fpath,0,dwpos);
58      if(dwpos>0) base+="/";
59    
60    TString out;    TString out;
61    if(outdir.Length()==0){    if(outdir.Length()==0){
# Line 66  void FTrkQLook_EXPERT(TString file,Int_t Line 69  void FTrkQLook_EXPERT(TString file,Int_t
69    pamela::TsbTEvent  *event = 0;    pamela::TsbTEvent  *event = 0;
70    pamela::TsbTRecord *record = 0;    pamela::TsbTRecord *record = 0;
71    pamela::tracker::TrackerEvent *te=0;    pamela::tracker::TrackerEvent *te=0;
72    pamela::EventHeader *eh=0,*aleh=0;    pamela::EventHeader *eh=0,*aleh=0,*eH=0,*eT=0;
73    pamela::PscuHeader *ph=0;    pamela::PscuHeader *ph=0,*pH=0;
74    pamela::TrkAlarmEvent *al=0;    pamela::TrkAlarmEvent *al=0;
75      pamela::RunHeaderEvent *reh=0;
76    
77    TFile *datafile = new TFile(file);    TFile *datafile = new TFile(file);
78    
79    TTree *tree = (TTree*)datafile->Get("TsbT");    TTree *tree = (TTree*)datafile->Get("TsbT");
80    tree->SetBranchAddress("TsbT",&event);    tree->SetBranchAddress("TsbT",&event);
81      tree->SetBranchAddress("Header",&eT);
82    
83    TTree *altr = (TTree*)datafile->Get("TrkAlarm");    TTree *altr = (TTree*)datafile->Get("TrkAlarm");
84    altr->SetBranchAddress("TrkAlarm",&al);    altr->SetBranchAddress("TrkAlarm",&al);
# Line 83  void FTrkQLook_EXPERT(TString file,Int_t Line 88  void FTrkQLook_EXPERT(TString file,Int_t
88    tr->SetBranchAddress("Tracker",&te);    tr->SetBranchAddress("Tracker",&te);
89    tr->SetBranchAddress("Header",&eh);    tr->SetBranchAddress("Header",&eh);
90        
91      TTree *otr  = (TTree*)datafile->Get("RunHeader");
92      otr->SetBranchAddress("Header",&eH);
93      otr->SetBranchAddress("RunHeader",&reh);
94    
95    Long64_t nevent = tr->GetEntries();    Long64_t nevent = tr->GetEntries();
96      Long64_t neventH = otr->GetEntries();
97    Long64_t tnevent = tree->GetEntries();    Long64_t tnevent = tree->GetEntries();
98    Long64_t alnevent = altr->GetEntries();    Long64_t alnevent = altr->GetEntries();
99    Int_t minevent=0;    Int_t minevent=0;
100    Int_t maxevent=0;    Int_t maxevent=0;
101    
102    printf("Number of total events: %lld\n",nevent);    printf("Number of total events: %lld\n",nevent);
103      printf("Number of header events: %lld\n",neventH);
104      printf("Number of TsbT events: %lld\n",tnevent);
105      printf("Number of TrkAlarm packet events: %lld\n",alnevent);
106    
107    if (nevent<=0){    if (nevent<=0){
108      datafile->Close();      datafile->Close();
# Line 122  void FTrkQLook_EXPERT(TString file,Int_t Line 135  void FTrkQLook_EXPERT(TString file,Int_t
135      nevent=maxevent-minevent ;      nevent=maxevent-minevent ;
136    }    }
137    
138      Long64_t obt=0;
139    if (fromevent!=0)    const Int_t sizeH=neventH;
140      printf("\n Scan of events from %i to %i ... \n",minevent,maxevent-1);    ULong64_t HOBT[sizeH];
141    else    Int_t trk_cal_us[sizeH],countrun=1;
142      printf("\n Scan of events from %i to %i ... \n",minevent+1,maxevent);    for (Int_t vi=0; vi<sizeH;vi++){
143        HOBT[vi]=0;
144        trk_cal_us[vi]=0;
145      }
146      for (Int_t ev=0; ev<neventH; ev++){
147        otr->GetEntry(ev);
148        pH = eH->GetPscuHeader();
149        HOBT[ev]= pH->GetOrbitalTime();
150        trk_cal_us[ev]=reh->TRK_CALIB_USED;
151        if((HOBT[ev]<HOBT[ev-1]) && ev>0)
152          countrun+=1;
153        //   printf("\n%lld\t\tcountrun=%d\n",HOBT[ev],countrun);
154      }
155      countrun+=(Int_t)nevent/30000;
156      //  printf("\ncountrun=%d\n",countrun);
157    
158    //    //
159    // other variables definitions    // other variables definitions
160    stringstream oss1,oss2,oss3,oss4,fromfile,isfile,tit;    stringstream oss1,oss2,oss3,oss4,fromfile,isfile,tit;
   Int_t warning_dspnumber=0;  
161    Int_t ALARM=0;    Int_t ALARM=0;
162    Int_t WARNING[12];    Int_t WARNING[12];
163    const Int_t size=nevent;  
   Int_t dsp=0;  
   Double_t yd[size*12], yc[size*12], x[size], eventint[size];  
   Double_t yyc[size], hi=0, land[size*12][3], illum[size*12][3] ;  
   
   TGraph *comprtime,*temp[5];  
   TGraph *eventnumb;  
   TH1F *landau1[12],*landau2[12],*landau3[12],*illuminazione[12];  
   TPaveText *pt1;  
   TPad *pt;  
     
164    //    //
165    // information about the entries for the temperatures    // information about the entries for the temperatures
166    Int_t tmpSize=0,siztmp=0,maxsize=0;    Int_t tmpSize=0,siztmp=0,maxsize=0;
# Line 155  void FTrkQLook_EXPERT(TString file,Int_t Line 171  void FTrkQLook_EXPERT(TString file,Int_t
171    }    }
172    const Int_t tsize=maxsize;    const Int_t tsize=maxsize;
173    Int_t tempt[tsize][5],xt[tsize], tempt_tmp[tsize];    Int_t tempt[tsize][5],xt[tsize], tempt_tmp[tsize];
174      //
175      // information about the temperatures
176      for (Int_t ev=0; ev<tnevent; ev++){
177        tree->GetEntry(ev);
178        tmpSize = event->Records->GetEntries();
179        for (Int_t j = 0; j < tmpSize; j++){
180          record = (pamela::TsbTRecord*)event->Records->At(j);
181          xt[siztmp]=record->RECORD_OBT;  //0.051*record->RECORD_OBT;  
182          for (Int_t z = 0; z < 5; z++){
183            tempt[siztmp][z] = record->TEMPERATURES[z+1];    
184          }
185          siztmp++;
186        }
187      }
188        
189    //    //
190    // open the output text files for the alarms    // open the output text files for the alarms
191    ofstream warning(out + "warning.txt",ios::out);    TString fname1 = out+ffile;
192    TString fname = out+ffile;    TString fname = out+ffile;
   TString fname1 = out+ffile;  
193    int slen=fname.Length();    int slen=fname.Length();
194    int last=fname.Last('_');    int last=fname.Last('_');
195    if(last<(slen-1))fname.Append('_');      if(last<(slen-1))fname.Append('_');  
196    fname.Append("Trk-ALARM-report.txt");    fname.Append("FTrk-DSP-report.txt");
197    ofstream alarm(fname,ios::out);    ofstream alarm(fname,ios::out);
198    alarm << "TRACKER ALARM REPORT - Downlink " << ffile<< endl;    alarm << "TRACKER DSP REPORT - Downlink " << ffile<< endl;
199    fname1.Append("_TrkAlarm-pkt-report.txt");    fname1.Append("_FTrkAlarm-pkt-report.txt");
200    ofstream alarm1(fname1,ios::out);    ofstream alarm1(fname1,ios::out);
201    alarm1 << "TrkAlarm pkt REPORT - Downlink " << ffile<< endl;    alarm1 << "TrkAlarm pkt REPORT - Downlink " << ffile<< endl;
202    
# Line 180  void FTrkQLook_EXPERT(TString file,Int_t Line 208  void FTrkQLook_EXPERT(TString file,Int_t
208        altr->GetEntry(ev);        altr->GetEntry(ev);
209        ph = aleh->GetPscuHeader();        ph = aleh->GetPscuHeader();
210    
211          if(ph->GetOrbitalTime()<obt && ev>0)
212            alarm1<<endl<<"NEW CPU BOOT"<<endl;
213          obt=ph->GetOrbitalTime();
214            
215        alarm1 << "================================================="<< endl;        alarm1 << "================================================="<< endl;
216        alarm1 << "PSCU-Pkt N. "<< ph->GetCounter() ;        alarm1 << "PSCU-Pkt N. "<< ph->GetCounter() ;
217        alarm1 << " - OBT "<< ph->GetOrbitalTime() << " ms"<<endl;        alarm1 << " - OBT "<< ph->GetOrbitalTime() << " ms"<<endl;
218        alarm1 << "(ROOT-tree entry "<<ev<<")"<<endl;        alarm1 << "(ROOT-tree entry "<<ev<<")"<<endl;
219        alarm1 << "================================================="<< endl;        alarm1 << "================================================="<< endl<<endl;
220                
221        alarm1 << " ALARM[1]= "<<(Int_t)al->ALARM[1]<<endl;        alarm1 << "Alarm variables (range 0-1)"<<endl;
222        alarm1 << " ALARM[2]= "<<(Int_t)al->ALARM[2]<<endl;        alarm1 << " ALARM[1]= 0x"<< hex << (Int_t)al->ALARM[1]<<endl;
223        alarm1 << " Aswr= "<<(Int_t)al->Aswr<<endl;        alarm1 << " ALARM[2]= 0x"<< (Int_t)al->ALARM[2]<<endl;
224        alarm1 << " BID[1]= "<<(Int_t)al->BID[0]<<endl;        alarm1 << " CmdDuringTrig= 0x"<< (Int_t)al->CmdDuringTrig<<endl;
225        alarm1 << " BID[2]= "<<(Int_t)al->BID[1]<<endl;        alarm1 << " FinalCheck= 0x"<< (Int_t)al->FinalCheck<<endl;
226        alarm1 << " BID[3]= "<<(Int_t)al->BID[2]<<endl;        alarm1 << " FlashData= 0x"<< (Int_t)al->FlashData<<endl;
227        alarm1 << " BID[4]= "<<(Int_t)al->BID[3]<<endl;        alarm1 << " FlashShutdown= 0x"<< (Int_t)al->FlashShutdown<<endl;
228        alarm1 << " BID[5]= "<<(Int_t)al->BID[4]<<endl;        alarm1 << " FlashUpset= 0x"<< (Int_t)al->FlashUpset<<endl;
229        alarm1 << " BID[6]= "<<(Int_t)al->BID[5]<<endl;        alarm1 << " InterCheck= 0x"<< (Int_t)al->InterCheck<<endl;
230        alarm1 << " BID[7]= "<<(Int_t)al->BID[6]<<endl;        alarm1 << " UnknownCmd= 0x"<<(Int_t)al->UnknownCmd<<endl<<endl;
231        alarm1 << " CmdDuringTrig= "<<(Int_t)al->CmdDuringTrig<<endl;  
232        alarm1 << " CmdIDMA= "<<(Int_t)al->CmdIDMA<<endl;        alarm1 << "Alarm variables (range 0-3F)"<<endl;
233        alarm1 << " CmdNum= "<<(Int_t)al->CmdNum<<endl;        alarm1 << " CmdIDMA= 0x"<< (Int_t)al->CmdIDMA<<endl;
234        alarm1 << " DSPBusy= "<<(Int_t)al->DSPBusy<<endl;        alarm1 << " DSPSoft= 0x"<< (Int_t)al->DSPSoft<<endl;
235        alarm1 << " DSPMask= "<<(Int_t)al->DSPMask<<endl;        alarm1 << " TrigIDMA= 0x"<< (Int_t)al->TrigIDMA<<endl<<endl;
       alarm1 << " DSPSoft= "<<(Int_t)al->DSPSoft<<endl;  
       alarm1 << " FinalCheck= "<<(Int_t)al->FinalCheck<<endl;  
       alarm1 << " FlashData= "<<(Int_t)al->FlashData<<endl;  
       alarm1 << " FlashOn= "<<(Int_t)al->FlashOn<<endl;  
       alarm1 << " FlashShutdown= "<<(Int_t)al->FlashShutdown<<endl;  
       alarm1 << " FlashUpset= "<<(Int_t)al->FlashUpset<<endl;  
       alarm1 << " InterCheck= "<<(Int_t)al->InterCheck<<endl;  
       alarm1 << " PNum= "<<(Int_t)al->PNum<<endl;  
       alarm1 << " TrigIDMA= "<<(Int_t)al->TrigIDMA<<endl;  
       alarm1 << " TrigMask= "<<(Int_t)al->TrigMask<<endl;  
       alarm1 << " UnknownCmd= "<<(Int_t)al->UnknownCmd<<endl;  
     }  
   }  
   
   //***************************************************************************************  
   // LOOP on each event  
   //***************************************************************************************  
   
   //  
   // information about the temperatures  
   for (Int_t ev=0; ev<tnevent; ev++){  
     tree->GetEntry(ev);  
     tmpSize = event->Records->GetEntries();  
     for (Int_t j = 0; j < tmpSize; j++){  
       record = (pamela::TsbTRecord*)event->Records->At(j);  
       xt[siztmp]=record->RECORD_OBT;  //0.051*record->RECORD_OBT;    
       for (Int_t z = 0; z < 5; z++){  
         tempt[siztmp][z] = record->TEMPERATURES[z+1];      
       }  
       siztmp++;  
     }  
   }  
   
   //  
   // information about the tracker data  
   for (Int_t ev=minevent; ev<maxevent; ev++){  
     tr->GetEntry(ev);  
     ph = eh->GetPscuHeader();  
     dsp=0;  
     ALARM=0;  
     for(Int_t i=0; i<12; i++){  
       dsp=te->DSPnumber[i]-1;  
       yd[(ev-minevent)*12+dsp]= te->DATAlength[i];  
       yc[(ev-minevent)*12+dsp]= 0.051*te->compressiontime[i];  
       for(Int_t j=0;j<3;j++){  
         illum[(ev-minevent)*12+dsp][j]=te->addrcluster[i][j];  
         if(!(dsp%2)&&(te->signcluster[i][j])!=0)  
           land[(ev-minevent)*12+dsp][j]=1024-(te->signcluster[i][j]);  
         else land[(ev-minevent)*12+dsp][j]=te->signcluster[i][j];  
       }  
       x[(ev-minevent)]= ph->GetOrbitalTime();  
         
       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;  
       };  
236                
237        //**************************************************************************************        alarm1 << "Control variables (range 0-3F)"<<endl;
238        // warning for internal number        alarm1 << " DSPBusy= 0x"<< (Int_t)al->DSPBusy<<endl;
239        //**************************************************************************************        alarm1 << " DSPMask= 0x"<< (Int_t)al->DSPMask<<endl<<endl;
240        if(i<=10){  
241          if(te->eventn[i]!=te->eventn[i+1]){        alarm1 << "Control variables (range 0-1)"<<endl;
242            warning_dspnumber++;        alarm1 << " FlashOn= 0x"<< (Int_t)al->FlashOn<<endl<<endl;
243            warning<< "==> WARNING!!    Check entry "<< ev<<" (DSP "<<dsp<<")" <<endl<<  
244                      "eventn["<<i<<"]= "<<te->eventn[i]<<"!= eventn["<<i+1<<"]= "<< te->eventn[i+1]<<endl;        alarm1 << "Control variables (range 0-3)"<<endl;
245          }        alarm1 << " TrigMask= 0x"<< (Int_t)al->TrigMask<<endl<<endl;
246          else  
247            eventint[(ev-minevent)]=te->eventn[0];        alarm1 << "Control bits fixed"<<endl;
248        }        alarm1 << " Aswr= 0x"<< (Int_t)al->Aswr<<endl;
249       }        alarm1 << " BID[1]= 0x"<< (Int_t)al->BID[0]<<endl;
250          alarm1 << " BID[2]= 0x"<< (Int_t)al->BID[1]<<endl;
251      if(ev<=maxevent-1){        alarm1 << " BID[3]= 0x"<< (Int_t)al->BID[2]<<endl;
252          alarm1 << " BID[4]= 0x"<< (Int_t)al->BID[3]<<endl;
253          alarm1 << " BID[5]= 0x"<< (Int_t)al->BID[4]<<endl;
254          alarm1 << " BID[6]= 0x"<< (Int_t)al->BID[5]<<endl;
255          alarm1 << " BID[7]= 0x"<< (Int_t)al->BID[6]<<endl;
256          alarm1 << " CmdNum= 0x"<< (Int_t)al->CmdNum<<endl;
257          alarm1 << " PNum= 0x"<< (Int_t)al->PNum<< dec <<endl;
258    
259        if((ev-minevent)>=1 && eventint[(ev-minevent)]!=eventint[(ev-minevent)-1]+1 && eventint[(ev-minevent)]!=1){        alarm1 << "================================================="<< endl<<endl;
         warning_dspnumber++;  
         warning<< "==> WARNING!!    Check entry "<< ev<<endl<<  
                   " DSP event num.= "<< eventint[(ev-minevent)]<<  
                   " is different from (previus+1) ="<<eventint[(ev-minevent)-1]+1 <<"\n"<<endl;  
       }  
     };  
         
     //********************************************************************************************  
     // file ALARM  
     //********************************************************************************************  
     if(ALARM==1) {  
   
       alarm << "================================================="<< endl;  
       alarm << "PSCU-Pkt N. "<< ph->GetCounter() ;  
       alarm << " - OBT "<< ph->GetOrbitalTime() << " ms"<<endl;  
       alarm << "(ROOT-tree entry "<<ev<<")"<<endl;  
       alarm << "================================================="<< endl;  
         
       alarm << " DSPn";  
       alarm << " Event";  
       alarm << " Words";  
       alarm << " crc";  
       alarm << "  FC";  
       alarm << " FL1";  
       alarm << " FL2";  
       alarm << " FL3";  
       alarm << " FL4";  
       alarm << " FL5";  
       alarm << " FL6" << endl;  
260                
       for(Int_t i=0; i<12 ; i++){  
         alarm.width(5); alarm << te->DSPnumber[i];  
         alarm.width(6); alarm << te->eventn[i];  
         alarm.width(6); alarm << te->DATAlength[i];  
         alarm.width(4); alarm << te->crc[i];  
         alarm.width(4); alarm << te->fc[i];  
         alarm.width(4); alarm << te->fl1[i];  
         alarm.width(4); alarm << te->fl2[i];  
         alarm.width(4); alarm << te->fl3[i];  
         alarm.width(4); alarm << te->fl4[i];  
         alarm.width(4); alarm << te->fl5[i];  
         alarm.width(4); alarm << te->fl6[i];  
         if(te->alarm[i]!=0)alarm<<" >> ALARM ";  
         if(WARNING[i]!=0)alarm<<" (DSP warning) ";  
         alarm    << endl;  
       }  
261      }      }
262    }    }
   if(ALARM==0) alarm << endl<< "------>  NO ALARM!!! <-------"<<endl;  
     
   if(warning_dspnumber==0) warning<<"NONE"<<endl;  
   
   //*****************************************  
   //close all files  
   //*****************************************    
   warning.close();  
   alarm.close();  
   datafile->Close();  
263    
264    
265    gStyle->SetLabelSize(0.05,"x");    gStyle->SetLabelSize(0.05,"x");
# Line 345  void FTrkQLook_EXPERT(TString file,Int_t Line 267  void FTrkQLook_EXPERT(TString file,Int_t
267    gStyle->SetStatFontSize(0.075);    gStyle->SetStatFontSize(0.075);
268    gStyle->SetOptStat(1110);    gStyle->SetOptStat(1110);
269    gStyle->SetFillColor(10);      gStyle->SetFillColor(10);  
270      gStyle->SetStatColor(10);
271    gStyle->SetTitleFillColor(10);      gStyle->SetTitleFillColor(10);  
272    gStyle->SetTitleFontSize(0.1);    gStyle->SetTitleFontSize(0.1);
273    gStyle->SetTitleOffset(0.8,"y");    gStyle->SetTitleOffset(0.8,"y");
# Line 352  void FTrkQLook_EXPERT(TString file,Int_t Line 275  void FTrkQLook_EXPERT(TString file,Int_t
275    gStyle->SetTitleSize(0.06,"y");    gStyle->SetTitleSize(0.06,"y");
276    gStyle->SetTitleSize(0.055,"x");    gStyle->SetTitleSize(0.055,"x");
277    
278    //****************************************************************************************  
279    //Output figures --- First sheet:    //***************************************************************************************
280    //****************************************************************************************    // LOOP on each event
281      //***************************************************************************************
282    
283      if (fromevent!=0)
284        printf("\n Scan of events from %i to %i ... \n",minevent,maxevent-1);
285      else
286        printf("\n Scan of events from %i to %i ... \n",minevent+1,maxevent);
287    
288    
289      Int_t minev=minevent,maxev=maxevent,countTEMP=0,countHOBT=0;
290      TCanvas *CompTimeCanv[countrun],*EventNumCanv[countrun],*LandauCanv1[countrun],*LandauCanv2[countrun],*LandauCanv3[countrun];
291      TCanvas *IlluminaCanv[countrun],*TempCanv[countrun];
292      TGraph *comprtime[12][countrun],*temp[5][countrun],*eventnumb[countrun];
293      TH1F *landau1[12][countrun],*landau2[12][countrun],*landau3[12][countrun],*illuminazione[12][countrun];
294    
295        
296      for(Int_t ii=0; ii<countrun;ii++){
297        TPaveText *pt1;
298        TPad *pt,*pt0;
299        TPad *pad1[12],*pad2[12],*pad3[12],*pad4[12],*pad5[12],*pad6[5];          //pad for histos
300        
301    TCanvas *CompTimeCanv=new TCanvas("Tracker_Detector_Report_4/6","",900,1200);      ofstream warning(out + "warning.txt",ios::out);
302    CompTimeCanv->SetFillColor(10);  
303    CompTimeCanv->Range(0,0,100,100);      //****************************************************************************************
304    fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;      //Output figures --- First sheet:
305    isfile<<"COMPRESSIONTIME vs. OBT";      //****************************************************************************************
306    TLatex *t=new TLatex();      fromfile.str("");
307    t->SetTextFont(32);      fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;
308    t->SetTextColor(1);      isfile<<"COMPRESSIONTIME vs. OBT   pag"<<ii+1;
309    t->SetTextAlign(12);      CompTimeCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
310    t->SetTextSize(0.02);      CompTimeCanv[ii]->SetFillColor(10);
311    t->DrawLatex(2.,98.7,fromfile.str().c_str());      CompTimeCanv[ii]->Range(0,0,100,100);
312    TLatex *t1=new TLatex();      TLatex *t=new TLatex();
313    t1->SetTextFont(32);      t->SetTextFont(32);
314    t1->SetTextColor(1);      t->SetTextColor(1);
315    t1->SetTextAlign(12);      t->SetTextAlign(12);
316    t1->SetTextSize(0.02);      t->SetTextSize(0.02);
317    t1->DrawLatex(64.,98.7,isfile.str().c_str());      t->DrawLatex(2.,98.7,fromfile.str().c_str());
318    isfile.str("");      TLatex *t1=new TLatex();
319        t1->SetTextFont(32);
320    //****************************************************************************************      t1->SetTextColor(1);
321    //Output figures --- Second sheet:      t1->SetTextAlign(12);
322    //****************************************************************************************      t1->SetTextSize(0.02);
323        t1->DrawLatex(62.,98.7,isfile.str().c_str());
324    TCanvas *EventNumCanv=new TCanvas("Tracker_Detector_Report_5/6","",900,1200);      isfile.str("");
325    EventNumCanv->SetFillColor(10);  
326    EventNumCanv->Range(0,0,100,100);      //****************************************************************************************
327    isfile<<"WARNINGS on DSP EVENT NUMBER ";      //Output figures --- Second sheet:
328    t->SetTextFont(32);      //****************************************************************************************
329    t->SetTextColor(1);  
330    t->SetTextAlign(12);      isfile<<"WARNINGS on DSP EVENT NUMBER   pag"<<ii+1;
331    t->SetTextSize(0.02);      EventNumCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
332    t->DrawLatex(2.,98.7,fromfile.str().c_str());      EventNumCanv[ii]->SetFillColor(10);
333    t1->SetTextFont(32);      EventNumCanv[ii]->Range(0,0,100,100);
334    t1->SetTextColor(1);      t->SetTextFont(32);
335    t1->SetTextAlign(12);      t->SetTextColor(1);
336    t1->SetTextSize(0.02);      t->SetTextAlign(12);
337    t1->DrawLatex(68.4,98.7,isfile.str().c_str());      t->SetTextSize(0.02);
338    isfile.str("");      t->DrawLatex(2.,98.7,fromfile.str().c_str());
339        t1->SetTextFont(32);
340    //****************************************************************************************      t1->SetTextColor(1);
341    //Output figures --- Third sheet:      t1->SetTextAlign(12);
342    //****************************************************************************************      t1->SetTextSize(0.02);
343        t1->DrawLatex(65.,98.7,isfile.str().c_str());
344    TCanvas *LandauCanv1=new TCanvas("Landau ladder1","",900,1200);      isfile.str("");
345    LandauCanv1->SetFillColor(10);  
346    LandauCanv1->Range(0,0,100,100);      //****************************************************************************************
347    isfile<<"Landau ladder1";      //Output figures --- Third sheet:
348        //****************************************************************************************
349    t->SetTextFont(32);  
350    t->SetTextColor(1);      isfile<<"Cluster Signal ladder1   pag"<<ii+1;
351    t->SetTextAlign(12);      LandauCanv1[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
352    t->SetTextSize(0.02);      LandauCanv1[ii]->SetFillColor(10);
353    t->DrawLatex(2.,98.7,fromfile.str().c_str());      LandauCanv1[ii]->Range(0,0,100,100);
354    t1->SetTextFont(32);  
355    t1->SetTextColor(1);      t->SetTextFont(32);
356    t1->SetTextAlign(12);      t->SetTextColor(1);
357    t1->SetTextSize(0.02);      t->SetTextAlign(12);
358    t1->DrawLatex(70.,98.7,isfile.str().c_str());      t->SetTextSize(0.02);
359    isfile.str("");      t->DrawLatex(2.,98.7,fromfile.str().c_str());
360        t1->SetTextFont(32);
361        t1->SetTextColor(1);
362        t1->SetTextAlign(12);
363        t1->SetTextSize(0.02);
364        t1->DrawLatex(65.,98.7,isfile.str().c_str());
365        isfile.str("");
366        
367    //****************************************************************************************      //****************************************************************************************
368    //Output figures --- Third sheet:      //Output figures --- Third sheet:
369    //****************************************************************************************      //****************************************************************************************
370    
371    TCanvas *LandauCanv2=new TCanvas("Landau ladder2","",900,1200);      isfile<<"Cluster Signal ladder2   pag"<<ii+1;
372    LandauCanv2->SetFillColor(10);      LandauCanv2[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
373    LandauCanv2->Range(0,0,100,100);      LandauCanv2[ii]->SetFillColor(10);
374    isfile<<"Landau ladder2";      LandauCanv2[ii]->Range(0,0,100,100);
375    
376    t->SetTextFont(32);      t->SetTextFont(32);
377    t->SetTextColor(1);      t->SetTextColor(1);
378    t->SetTextAlign(12);      t->SetTextAlign(12);
379    t->SetTextSize(0.02);      t->SetTextSize(0.02);
380    t->DrawLatex(2.,98.7,fromfile.str().c_str());      t->DrawLatex(2.,98.7,fromfile.str().c_str());
381    t1->SetTextFont(32);      t1->SetTextFont(32);
382    t1->SetTextColor(1);      t1->SetTextColor(1);
383    t1->SetTextAlign(12);      t1->SetTextAlign(12);
384    t1->SetTextSize(0.02);      t1->SetTextSize(0.02);
385    t1->DrawLatex(70.,98.7,isfile.str().c_str());      t1->DrawLatex(65.,98.7,isfile.str().c_str());
386    isfile.str("");      isfile.str("");
387    
388    //****************************************************************************************      //****************************************************************************************
389    //Output figures --- Third sheet:      //Output figures --- Third sheet:
390    //****************************************************************************************      //****************************************************************************************
391    
392    TCanvas *LandauCanv3=new TCanvas("Landau ladder3","",900,1200);      isfile<<"Cluster Signal ladder3   pag"<<ii+1;
393    LandauCanv3->SetFillColor(10);      LandauCanv3[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
394    LandauCanv3->Range(0,0,100,100);      LandauCanv3[ii]->SetFillColor(10);
395    isfile<<"Landau ladder3";      LandauCanv3[ii]->Range(0,0,100,100);
396    
397    t->SetTextFont(32);      t->SetTextFont(32);
398    t->SetTextColor(1);      t->SetTextColor(1);
399    t->SetTextAlign(12);      t->SetTextAlign(12);
400    t->SetTextSize(0.02);      t->SetTextSize(0.02);
401    t->DrawLatex(2.,98.7,fromfile.str().c_str());      t->DrawLatex(2.,98.7,fromfile.str().c_str());
402    t1->SetTextFont(32);      t1->SetTextFont(32);
403    t1->SetTextColor(1);      t1->SetTextColor(1);
404    t1->SetTextAlign(12);      t1->SetTextAlign(12);
405    t1->SetTextSize(0.02);      t1->SetTextSize(0.02);
406    t1->DrawLatex(70.,98.7,isfile.str().c_str());      t1->DrawLatex(65.,98.7,isfile.str().c_str());
407    isfile.str("");      isfile.str("");
408        
409    //****************************************************************************************      //****************************************************************************************
410    //Output figures --- Fourth sheet:      //Output figures --- Fourth sheet:
411    //****************************************************************************************      //****************************************************************************************
412    
413    TCanvas *IlluminaCanv=new TCanvas("Illuminazione","",900,1200);      isfile<<"lighting of the views   pag"<<ii+1;
414    IlluminaCanv->SetFillColor(10);      IlluminaCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
415    IlluminaCanv->Range(0,0,100,100);      IlluminaCanv[ii]->SetFillColor(10);
416    isfile<<"lighting of the views";      IlluminaCanv[ii]->Range(0,0,100,100);
417    t->SetTextFont(32);      t->SetTextFont(32);
418    t->SetTextColor(1);      t->SetTextColor(1);
419    t->SetTextAlign(12);      t->SetTextAlign(12);
420    t->SetTextSize(0.02);      t->SetTextSize(0.02);
421    t->DrawLatex(2.,98.7,fromfile.str().c_str());      t->DrawLatex(2.,98.7,fromfile.str().c_str());
422    t1->SetTextFont(32);      t1->SetTextFont(32);
423    t1->SetTextColor(1);      t1->SetTextColor(1);
424    t1->SetTextAlign(12);      t1->SetTextAlign(12);
425    t1->SetTextSize(0.02);      t1->SetTextSize(0.02);
426    t1->DrawLatex(70.,98.7,isfile.str().c_str());      t1->DrawLatex(70.,98.7,isfile.str().c_str());
427    isfile.str("");      isfile.str("");
428    
429    //****************************************************************************************      //****************************************************************************************
430    //Output figures --- Fifth sheet:      //Output figures --- Fifth sheet:
431    //****************************************************************************************      //****************************************************************************************
432    
433    TCanvas *TempCanv=new TCanvas("Tracker_Detector_Temperaturt","",900,1200);      isfile<<"Temperatures vs OBT   pag"<<ii+1;
434    TempCanv->SetFillColor(10);      TempCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
435    TempCanv->Range(0,0,100,100);      TempCanv[ii]->SetFillColor(10);
436    isfile<<"Temperatures vs OBT";      TempCanv[ii]->Range(0,0,100,100);
437    
438    t->SetTextFont(32);      t->SetTextFont(32);
439    t->SetTextColor(1);      t->SetTextColor(1);
440    t->SetTextAlign(12);      t->SetTextAlign(12);
441    t->SetTextSize(0.02);      t->SetTextSize(0.02);
442    t->DrawLatex(2.,98.7,fromfile.str().c_str());      t->DrawLatex(2.,98.7,fromfile.str().c_str());
443    t1->SetTextFont(32);      t1->SetTextFont(32);
444    t1->SetTextColor(1);      t1->SetTextColor(1);
445    t1->SetTextAlign(12);      t1->SetTextAlign(12);
446    t1->SetTextSize(0.02);      t1->SetTextSize(0.02);
447    t1->DrawLatex(80.,98.7,isfile.str().c_str());      t1->DrawLatex(78.,98.7,isfile.str().c_str());
448    isfile.str("");      isfile.str("");
449        
450    //*************************************************************************************      //*************************************************************************************
451    //book pads and histos      //book pads and histos
452    //***************************************************************************************      //***************************************************************************************
453        Float_t posy = 0.95;    // up y-coord - top pads
454        Float_t hpad = 0;   // pad height
455        Float_t posx1=0;          // left  x-coord - pad column
456        Float_t posx0=0;          //       x-coord - column division
457        Float_t wrel = 0;     // relative x size of first sub-column
458        Float_t marg = 0.004;   // margin among pads
459        Float_t tposy = 0.95;    // up y-coord - top pads
460        Float_t thpad = 0;   // pad height
461        Float_t tposx1=0;          // left  x-coord - pad column
462        Float_t tposx0=0;          //       x-coord - column division
463        Float_t twrel = 0;     // relative x size of first sub-column
464        Float_t tmarg = 0.004;   // margin among pads
465    
466        hpad = (posy-marg*11)/6;
467        wrel = (1-marg*4)/2;
468        thpad = (tposy-tmarg*5)/3;
469        twrel = (1-tmarg*4)/2;
470    
471    TPad *pad1[12],*pad2[12],*pad3[12],*pad4[12],*pad5[12],*pad6[5];          //pad for histos      for(Int_t n = 0; n<12; n++) {
   Double_t posy = 0.95;    // up y-coord - top pads  
   Double_t hpad = 0;   // pad height  
   Double_t posx1=0;          // left  x-coord - pad column  
   Double_t posx0=0;          //       x-coord - column division  
   Double_t wrel = 0;     // relative x size of first sub-column  
   Double_t marg = 0.004;   // margin among pads  
   Double_t tposy = 0.95;    // up y-coord - top pads  
   Double_t thpad = 0;   // pad height  
   Double_t tposx1=0;          // left  x-coord - pad column  
   Double_t tposx0=0;          //       x-coord - column division  
   Double_t twrel = 0;     // relative x size of first sub-column  
   Double_t tmarg = 0.004;   // margin among pads  
   
   hpad = (posy-marg*11)/6;  
   wrel = (1-marg*4)/2;  
   thpad = (tposy-tmarg*5)/3;  
   twrel = (1-tmarg*4)/2;  
   stringstream title;  
   stringstream hid;  
   
   for(Int_t n = 0; n<12; n++) {  
472            
473      if ( (n+1)%2==1 ) {        if ( (n+1)%2==1 ) {
474        if(n>1) posy = posy-(marg*2+hpad);          if(n>1) posy = posy-(marg*2+hpad);
475        posx1 = marg;          posx1 = marg;
476        posx0 = posx1 + wrel;          posx0 = posx1 + wrel;
477      }        }
478      else {        else {
479        posx1 = posx0 + 2*marg;          posx1 = posx0 + 2*marg;
480        posx0 = posx1 + wrel;          posx0 = posx1 + wrel;
481      }        }
482            
483      if ( (n+1)%2==1 ) {        if ( (n+1)%2==1 ) {
484        if(n>1) tposy = tposy-(tmarg*2+thpad);          if(n>1) tposy = tposy-(tmarg*2+thpad);
485        tposx1 = tmarg;          tposx1 = tmarg;
486        tposx0 = tposx1 + twrel;          tposx0 = tposx1 + twrel;
487      }        }
488      else {        else {
489        tposx1 = tposx0 + 2*tmarg;          tposx1 = tposx0 + 2*tmarg;
490        tposx0 = tposx1 + twrel;          tposx0 = tposx1 + twrel;
491      }        }
492    
493    
494      /* -----------> pad for histograms  */        /* -----------> pad for histograms  */
495      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);
496      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);
497      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);
498      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);
499      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);
500      if(n<5) pad6[n] = new TPad("pad6"," ",tposx1,tposy-thpad,tposx0,tposy,18,0,0);        if(n<5) pad6[n] = new TPad("pad6"," ",tposx1,tposy-thpad,tposx0,tposy,18,0,0);
501    
502    
503      /* -----------> HISTOGRAMS          */        /* -----------> HISTOGRAMS          */
504    
505      oss1<<"DSP  "<<n+1;        tit<<"DSP "<<n+1;
506      oss2<<"DSPh  "<<n+1;        oss1<<"DSP  "<<n*100+ii;
507      oss3<<"DSP h "<<n+1;        oss2<<"DSPh  "<<n*100+ii;
508      oss4<<"DSP   h"<<n+1;        oss3<<"DSP h "<<n*100+ii;
509          oss4<<"DSP   h"<<n*100+ii;
510            
511      landau1[n]=new TH1F(oss1.str().c_str(),oss1.str().c_str(),1200,0.5,1200.5);        landau1[n][ii]= new TH1F(oss1.str().c_str(),tit.str().c_str(),401,-0.5,1200.5);
512      landau1[n]->GetXaxis()->SetTitle("max signal");        landau2[n][ii]= new TH1F(oss2.str().c_str(),tit.str().c_str(),401,-0.5,1200.5);
513      landau1[n]->GetXaxis()->CenterTitle();        landau3[n][ii]= new TH1F(oss3.str().c_str(),tit.str().c_str(),401,-0.5,1200.5);
514      landau2[n]=new TH1F(oss2.str().c_str(),oss1.str().c_str(),1200,0.5,1200.5);  
515      landau2[n]->GetXaxis()->SetTitle("max signal");        illuminazione[n][ii]= new TH1F(oss4.str().c_str(),tit.str().c_str(),3073,-0.5,3072.5);
516      landau2[n]->GetXaxis()->CenterTitle();  
517      landau3[n]=new TH1F(oss3.str().c_str(),oss1.str().c_str(),1200,0.5,1200.5);        tit.str("");
518      landau3[n]->GetXaxis()->SetTitle("max signal");        oss1.str("");
519      landau3[n]->GetXaxis()->CenterTitle();        oss2.str("");
520          oss3.str("");
521      illuminazione[n]=new TH1F(oss4.str().c_str(),oss1.str().c_str(),3072,0.5,3072.5);        oss4.str("");
522      illuminazione[n]->GetXaxis()->SetTitle("strip with max signal");      };            
     illuminazione[n]->GetXaxis()->CenterTitle();  
   
     oss1.str("");  
     oss2.str("");  
     oss3.str("");  
     oss4.str("");  
   };              
523        
524    
525    //**********************************************************************************      //    printf("\nprova0\n");
   // Fill Graphs and Histos  
   //**********************************************************************************  
526    
527    for (Int_t i=0; i<12 ; i++){  
528        //**********************************************************************************
529      for (Int_t ev=minevent; ev<maxevent; ev++){      // Fill Graphs and Histos
530        yyc[(ev-minevent)]=yc[12*(ev-minevent)+i];      //**********************************************************************************
531        landau1[i]->Fill(land[12*(ev-minevent)+i][1]);    
532        landau2[i]->Fill(land[12*(ev-minevent)+i][2]);      //
533        landau3[i]->Fill(land[12*(ev-minevent)+i][3]);      // information about the tracker data
534        for(Int_t j=0;j<3;j++){      Int_t warning_dspnumber=0;
535          hi=(j*1024)+illum[12*(ev-minevent)+i][j];      Float_t x[MAXSTORAGE];
536          illuminazione[i]->Fill(hi);      Float_t yc[MAXSTORAGE][12];
537        Float_t eventint[MAXSTORAGE];
538        
539        for (Int_t ev=minev; ev<maxevent; ev++){
540          tr->GetEntry(ev);
541          ph = eh->GetPscuHeader();
542    
543          if(ev==maxevent-1) maxev=maxevent-1;
544    
545          if((ph->GetOrbitalTime()<x[ev-minev-1] && ev-minev!=0) || ev-minev==MAXSTORAGE){
546            maxev=ev;
547            break;
548          }
549          else{
550            x[(ev-minev)]= ph->GetOrbitalTime();
551            ALARM=0;
552            
553            Int_t dsp=0;
554            for(Int_t i=0; i<12; i++){
555              dsp=te->DSPnumber[i]-1;
556              yc[(ev-minev)][dsp]= 0.051*te->compressiontime[i];
557              
558              for(Int_t j=0;j<3;j++){
559                if(te->signcluster[i][j]!=0){
560                  if((te->addrcluster[i][j]>6 && te->addrcluster[i][j]<505) ||(te->addrcluster[i][j]>518 && te->addrcluster[i][j]<1018)){
561             //     if((dsp==1 && te->addrcluster[i][2]>767 && te->addrcluster[i][2]<1024) || (dsp==6 && te->addrcluster[i][0]>511 && te->addrcluster[i][0]<769) ||(dsp==6 && te->addrcluster[i][1]>0 && te->addrcluster[i][1]<769) ||(dsp==6 && te->addrcluster[i][2]>511 && te->addrcluster[i][2]<769) ||(dsp==11 && te->addrcluster[i][0]>767 && te->addrcluster[i][0]<1024));
562    //              else
563                      illuminazione[dsp][ii]->Fill((Float_t)((j*1024.)+te->addrcluster[i][j]));
564                  }
565                }
566              }
567              if(x[ev-minev]>HOBT[countHOBT+1])
568                countHOBT+=1;
569              if(trk_cal_us[countHOBT]!=104){
570                if(!(dsp%2)){
571                  if(te->signcluster[i][0]!=0) landau1[dsp][ii]->Fill((Float_t)(1024.-te->signcluster[i][0]));
572                  if(te->signcluster[i][1]!=0) landau2[dsp][ii]->Fill((Float_t)(1024.-te->signcluster[i][1]));
573                  if(te->signcluster[i][2]!=0) landau3[dsp][ii]->Fill((Float_t)(1024.-te->signcluster[i][2]));
574                }
575                else{
576                  if(te->signcluster[i][0]!=0) landau1[dsp][ii]->Fill((Float_t)te->signcluster[i][0]);
577                  if(te->signcluster[i][1]!=0) landau2[dsp][ii]->Fill((Float_t)te->signcluster[i][1]);
578                  if(te->signcluster[i][2]!=0) landau3[dsp][ii]->Fill((Float_t)te->signcluster[i][2]);
579                }
580              }
581              
582              WARNING[i]=0;
583              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){
584                ALARM = 1;      //general alarm
585                WARNING[i] = 1; // DSP warning
586              };
587    
588              if(te->alarm[i]!=0){ // hardware alarm
589                ALARM = 1;
590              };
591          
592              //**************************************************************************************
593              // warning for internal number
594              //**************************************************************************************
595              if(i<=10){
596                if(te->eventn[i]!=te->eventn[i+1]){
597                  warning_dspnumber++;
598                  warning<< "==> WARNING!!    Check entry "<< ev<<" (DSP "<<dsp<<")" <<endl<<
599                    "eventn["<<i<<"]= "<<te->eventn[i]<<"!= eventn["<<i+1<<"]= "<< te->eventn[i+1]<<endl;
600                }
601                else
602                  eventint[(ev-minev)]=te->eventn[0];
603              }
604            }
605    
606            if(ev<=maxevent-1){
607    
608              if((ev-minev)>=1 && eventint[(ev-minev)]!=eventint[(ev-minev)-1]+1 && eventint[(ev-minev)]!=1){
609                warning_dspnumber++;
610                warning<< "==> WARNING!!    Check entry "<< ev<<endl<<
611                  " DSP event num.= "<< eventint[(ev-minev)]<<
612                  " is different from (previus+1) ="<<eventint[(ev-minev)-1]+1 <<"\n"<<endl;
613              }
614            }
615          
616            //********************************************************************************************
617            // file ALARM
618            //********************************************************************************************
619    
620            if(ALARM==1) {  
621              alarm <<endl<< "================================================="<< endl;
622              alarm << "PSCU-Pkt N. "<< ph->GetCounter() ;
623              alarm << " - OBT "<< ph->GetOrbitalTime() << " ms"<<endl;
624              alarm << "(ROOT-tree entry "<<ev<<")"<<endl;
625              alarm << "================================================="<< endl;
626              
627              alarm << " DSPn";
628              alarm << " Event";
629              alarm << " Words";
630              alarm << " crc";
631              alarm << "  FC";
632              alarm << " FL1";
633              alarm << " FL2";
634              alarm << " FL3";
635              alarm << " FL4";
636              alarm << " FL5";
637              alarm << " FL6" << endl;
638              
639              for(Int_t i=0; i<12 ; i++){
640                alarm.width(5); alarm << te->DSPnumber[i];
641                alarm.width(6); alarm << te->eventn[i];
642                alarm.width(6); alarm << te->DATAlength[i];
643                alarm.width(4); alarm << te->crc[i];
644                alarm.width(4); alarm << te->fc[i];
645                alarm.width(4); alarm << te->fl1[i];
646                alarm.width(4); alarm << te->fl2[i];
647                alarm.width(4); alarm << te->fl3[i];
648                alarm.width(4); alarm << te->fl4[i];
649                alarm.width(4); alarm << te->fl5[i];
650                alarm.width(4); alarm << te->fl6[i];
651                if(te->alarm[i]!=0)alarm<<" >> ALARM ";
652                if(WARNING[i]!=0)alarm<<" (DSP warning) ";
653                alarm    << endl;
654              }
655            }
656        }        }
657      }      }
658        if(ALARM==0) alarm << endl<< "------>  NO ALARM!!! <-------"<<endl;
659        if(warning_dspnumber==0) warning<<"NONE"<<endl;
660    
661    
662        Float_t maxhist=0;
663        TBox b;
664        b.SetFillColor(6);
665        b.SetFillStyle(3945);
666    
667        for (Int_t i=0; i<12 ; i++){
668          Float_t yyc[maxev-minev];
669          for (Int_t v=0; v<maxev-minev; v++){
670            yyc[v]=yc[v][i];
671          }
672            
673      LandauCanv1->cd();        LandauCanv1[ii]->cd();
674      pad1[i]->SetFillColor(10);        pad1[i]->SetFillColor(10);
675      pad1[i]->SetFrameFillColor(10);        pad1[i]->SetFrameFillColor(10);
676      pad1[i]->Draw();        pad1[i]->Draw();
677      pad1[i]->cd();        pad1[i]->cd();
678      landau1[i]->Draw("");        landau1[i][ii]->GetXaxis()->SetTitle("max signal");
679      LandauCanv2->cd();        landau1[i][ii]->GetXaxis()->CenterTitle();
680      pad4[i]->SetFillColor(10);        landau1[i][ii]->Draw("");
681      pad4[i]->SetFrameFillColor(10);        LandauCanv1[ii]->Update();
682      pad4[i]->Draw();  
683      pad4[i]->cd();        LandauCanv2[ii]->cd();
684      landau2[i]->Draw("");        pad4[i]->SetFillColor(10);
685      LandauCanv3->cd();        pad4[i]->SetFrameFillColor(10);
686      pad5[i]->SetFillColor(10);        pad4[i]->Draw();
687      pad5[i]->SetFrameFillColor(10);        pad4[i]->cd();
688      pad5[i]->Draw();        landau2[i][ii]->GetXaxis()->SetTitle("max signal");
689      pad5[i]->cd();        landau2[i][ii]->GetXaxis()->CenterTitle();
690      landau3[i]->Draw("");        landau2[i][ii]->Draw("");
691          LandauCanv2[ii]->Update();
692      IlluminaCanv->cd();  
693      pad2[i]->SetFillColor(10);        LandauCanv3[ii]->cd();
694      pad2[i]->SetFrameFillColor(10);        pad5[i]->SetFillColor(10);
695      pad2[i]->Draw();        pad5[i]->SetFrameFillColor(10);
696      pad2[i]->cd();        pad5[i]->Draw();
697      pad2[i]->SetLogy();        pad5[i]->cd();
698      illuminazione [i]->SetStats(kFALSE);        landau3[i][ii]->GetXaxis()->SetTitle("max signal");
699      illuminazione[i]->Draw("");        landau3[i][ii]->GetXaxis()->CenterTitle();
700          landau3[i][ii]->Draw("");
701      CompTimeCanv->cd();        LandauCanv3[ii]->Update();
702      pad3[i]->SetFillColor(10);  
703      pad3[i]->SetFrameFillColor(10);        IlluminaCanv[ii]->cd();
704      pad3[i]->Draw();        pad2[i]->SetFillColor(10);
705      pad3[i]->cd();        pad2[i]->SetFrameFillColor(10);
706      comprtime= new TGraph(nevent,x,yyc);        pad2[i]->SetLogy();
707      oss1<<"DSP  "<<i+1;        pad2[i]->Draw();
708      comprtime->SetTitle(oss1.str().c_str());        pad2[i]->cd();
709      comprtime->GetXaxis()->SetTitle("OBT (ms)");        illuminazione[i][ii]->GetXaxis()->SetTitle("strip with max signal");
710      comprtime->GetXaxis()->CenterTitle();        illuminazione[i][ii]->GetXaxis()->CenterTitle();
711      comprtime->GetYaxis()->SetTitle("compressiontime (ms)");        illuminazione[i][ii]->Draw("");
712      comprtime->GetYaxis()->CenterTitle();        if(i==1){
713      comprtime->GetYaxis()->SetRangeUser(0,2);          maxhist= illuminazione[i][ii]->GetMaximum();
714      comprtime->Draw("ap");          b.DrawBox(2816.,0.,3060.,maxhist);
715      oss1.str("");        }
716    };        else if(i==6){
717            maxhist= illuminazione[i][ii]->GetMaximum();
718            b.DrawBox(2560.,0.,2816.,maxhist);
719            b.DrawBox(512.,0.,768.,maxhist);
720            b.DrawBox(1024.,0.,1792.,maxhist);
721          }
722          else if(i==11){
723            maxhist= illuminazione[i][ii]->GetMaximum();
724            b.DrawBox(768.,0.,1024.,maxhist);
725          }
726          IlluminaCanv[ii]->Update();
727    
728    
729          CompTimeCanv[ii]->cd();
730          pad3[i]->SetFillColor(10);
731          pad3[i]->SetFrameFillColor(10);
732          pad3[i]->Draw();
733          pad3[i]->cd();
734          comprtime[i][ii]= new TGraph(maxev-minev,x,yyc);
735          oss1<<"DSP  "<<i+1;
736          comprtime[i][ii]->SetTitle(oss1.str().c_str());
737          comprtime[i][ii]->GetXaxis()->SetTitle("OBT (ms)");
738          comprtime[i][ii]->GetXaxis()->CenterTitle();
739          comprtime[i][ii]->GetYaxis()->SetTitle("compressiontime (ms)");
740          comprtime[i][ii]->GetYaxis()->CenterTitle();
741          comprtime[i][ii]->GetYaxis()->SetRangeUser(0,2);
742          comprtime[i][ii]->Draw("ap");
743          oss1.str("");
744          CompTimeCanv[ii]->Update();
745        };
746        
747    EventNumCanv->cd();      EventNumCanv[ii]->cd();
748    TPad *pt0=new TPad("pt0"," ",0.704,0.004,0.996,0.98);      pt0=new TPad("pt0"," ",0.704,0.004,0.996,0.98);
749    pt1 = new TPaveText(0.004,0.004,0.986,0.996);      pt1 = new TPaveText(0.004,0.004,0.986,0.996);
750    pt = new TPad("pt"," ",0.004,0.004,0.7,0.98,18,0,0);      pt = new TPad("pt"," ",0.004,0.004,0.7,0.98,18,0,0);
751    pt1->SetFillColor(10);      pt1->SetFillColor(10);
752    pt1->ReadFile(out + "warning.txt");      pt1->ReadFile(out + "warning.txt");
753    pt1->SetTextAlign(22);      pt1->SetTextAlign(22);
754    pt1->SetTextSize(0.035);      pt1->SetTextSize(0.035);
755    pt0->SetFillColor(10);      pt0->SetFillColor(10);
756    pt0->SetFrameFillColor(10);      pt0->SetFrameFillColor(10);
757    pt0->Draw();      pt0->Draw();
758    pt0->cd();      pt0->cd();
759    pt1->Draw();      pt1->Draw();
760    EventNumCanv->cd();      EventNumCanv[ii]->cd();
761    pt->SetFillColor(10);      pt->SetFillColor(10);
762    pt->SetFrameFillColor(10);      pt->SetFrameFillColor(10);
763    pt->Draw();      pt->Draw();
764    pt->cd();      pt->cd();
765    eventnumb=new TGraph(nevent,x,eventint);      eventnumb[ii]=new TGraph(maxev-minev,x,eventint);
766    eventnumb->SetTitle("");      eventnumb[ii]->SetTitle("");
767    eventnumb->GetXaxis()->SetLabelSize(0.04);      eventnumb[ii]->GetXaxis()->SetLabelSize(0.04);
768    eventnumb->GetXaxis()->SetTitleSize(0.04);      eventnumb[ii]->GetXaxis()->SetTitleSize(0.04);
769    eventnumb->GetXaxis()->SetTitle("OBT (ms)");      eventnumb[ii]->GetXaxis()->SetTitle("OBT (ms)");
770    eventnumb->GetXaxis()->CenterTitle();      eventnumb[ii]->GetXaxis()->CenterTitle();
771    eventnumb->GetXaxis()->SetTickLength(0.01);      eventnumb[ii]->GetXaxis()->SetTickLength(0.01);
772    eventnumb->GetXaxis()->SetTitleOffset(1.2);      eventnumb[ii]->GetXaxis()->SetTitleOffset(1.2);
773    eventnumb->GetYaxis()->SetLabelSize(0.04);      eventnumb[ii]->GetYaxis()->SetLabelSize(0.04);
774    eventnumb->GetYaxis()->SetTitleSize(0.04);      eventnumb[ii]->GetYaxis()->SetTitleSize(0.04);
775    eventnumb->GetYaxis()->SetTitle("DSP event-number");      eventnumb[ii]->GetYaxis()->SetTitle("DSP event-number");
776    eventnumb->GetYaxis()->CenterTitle();      eventnumb[ii]->GetYaxis()->CenterTitle();
777    eventnumb->GetYaxis()->SetTitleOffset(1.5);      eventnumb[ii]->GetYaxis()->SetTitleOffset(1.5);
778    eventnumb->SetMarkerStyle(21);      eventnumb[ii]->SetMarkerStyle(21);
779    eventnumb->SetMarkerColor(kBlue);      eventnumb[ii]->SetMarkerColor(kBlue);
780    eventnumb->SetMarkerSize(0.3);      eventnumb[ii]->SetMarkerSize(0.3);
781    eventnumb->Draw("ap");      eventnumb[ii]->Draw("ap");
782        EventNumCanv[ii]->Update();
783    for(Int_t i=0; i<5; i++){  
784      for (Int_t ev=0; ev<tsize; ev++){      obt=0;
785        tempt_tmp[ev]=(Int_t)(((3.3*tempt[ev][i]/4096)-0.586)/0.0231);      for(Int_t i=0; i<5; i++){
786          Int_t v=0;
787          for (Int_t ev=countTEMP; ev<tsize; ev++){
788            tree->GetEntry(ev);
789            ph=eT->GetPscuHeader();
790            
791            if(ph->GetOrbitalTime()<obt && ev>countTEMP){
792              countTEMP=ev;
793              break;
794            }
795            else{
796              obt=ph->GetOrbitalTime();
797              tempt_tmp[v++]=(Int_t)(((3.3*tempt[ev][i]/4096)-0.586)/0.0231);
798            }
799          }
800          TempCanv[ii]->cd();
801          tit<<"T"<<i+5<<" (magnetic module "<<i+1<<")";
802          pad6[i]->SetFillColor(10);
803          pad6[i]->Draw();
804          pad6[i]->cd();
805          temp[i][ii]= new TGraph(v,xt,tempt_tmp);
806          temp[i][ii]->SetTitle(tit.str().c_str());
807          temp[i][ii]->GetXaxis()->SetLabelSize(0.04);
808          temp[i][ii]->GetXaxis()->SetTitleSize(0.04);
809          temp[i][ii]->GetXaxis()->SetTitle("OBT (ms)");
810          temp[i][ii]->GetXaxis()->CenterTitle();
811          temp[i][ii]->GetXaxis()->SetTitleOffset(0.85);
812          temp[i][ii]->GetYaxis()->SetTitleOffset(1.2);
813          temp[i][ii]->GetYaxis()->SetLabelOffset(0.001);
814          temp[i][ii]->GetYaxis()->SetLabelSize(0.04);
815          temp[i][ii]->GetYaxis()->SetTitleSize(0.04);
816          temp[i][ii]->GetYaxis()->SetTitle("Temperatures ( ^{o}C)");
817          temp[i][ii]->GetYaxis()->CenterTitle();
818          temp[i][ii]->SetMarkerStyle(21);
819          temp[i][ii]->SetMarkerSize(0.2);
820          temp[i][ii]->Draw("ap");
821          tit.str("");
822          TempCanv[ii]->Update();
823      }      }
824      TempCanv->cd();      
825      tit<<"T"<<i+5<<" (magnetic module "<<i+1<<")";      minev=maxev;
826      pad6[i]->SetFillColor(10);      if(maxev==maxevent-1) {
827      pad6[i]->Draw();        countrun=ii+1;
828      pad6[i]->cd();        break;
829      temp[i]= new TGraph(tsize,xt,tempt_tmp);      }
830      temp[i]->SetTitle(tit.str().c_str());  
831      temp[i]->GetXaxis()->SetLabelSize(0.04);      warning.close();
832      temp[i]->GetXaxis()->SetTitleSize(0.04);    }
833      temp[i]->GetXaxis()->SetTitle("OBT (ms)");  
834      temp[i]->GetXaxis()->CenterTitle();    //*****************************************
835      temp[i]->GetXaxis()->SetTitleOffset(0.85);    //close all files
836      temp[i]->GetYaxis()->SetTitleOffset(1.2);    //*****************************************  
837      temp[i]->GetYaxis()->SetLabelOffset(0.001);    alarm.close();
838      temp[i]->GetYaxis()->SetLabelSize(0.04);  
     temp[i]->GetYaxis()->SetTitleSize(0.04);  
     temp[i]->GetYaxis()->SetTitle("Temperatures ( ^{o}C)");  
     temp[i]->GetYaxis()->CenterTitle();  
     temp[i]->SetMarkerStyle(21);  
     temp[i]->SetMarkerSize(0.2);  
     temp[i]->Draw("ap");  
     tit.str("");  
   }  
   CompTimeCanv->Update();  
   LandauCanv1->Update();  
   LandauCanv2->Update();  
   LandauCanv3->Update();  
   IlluminaCanv->Update();  
   TempCanv->Update();  
     
839    printf("... end of packets. \n");    printf("... end of packets. \n");
840    //*************************************************************************    //*************************************************************************
841    // Save output Files    // Save output Files
842    //*************************************************************************    //*************************************************************************
843    stringstream out1,out2,out3,command;    stringstream out1,out2,out3,command;
844        
845    if(!strcmp(outfile.Data(),"ps")||!strcmp(outfile.Data(),"pdf")){    for(Int_t fl=0;fl<countrun;fl++){
846      out1.str("");      if(!strcmp(outfile.Data(),"ps")||!strcmp(outfile.Data(),"pdf")){
847      out2.str("");        out1.str("");
848      out3.str("");        out2.str("");
849              out3.str("");
850      out1<<ffile<<"_FTrkQLook_EXPERT.ps(";        
851      out2<<ffile<<"_FTrkQLook_EXPERT.ps";        out1<<ffile<<"_FTrkQLook_EXPERT.ps(";
852      out3<<ffile<<"_FTrkQLook_EXPERT.ps)";        out2<<ffile<<"_FTrkQLook_EXPERT.ps";
853              out3<<ffile<<"_FTrkQLook_EXPERT.ps)";
     CompTimeCanv->Print(out+out1.str().c_str(),"Portrait");  
     EventNumCanv->Print(out+out2.str().c_str(),"Portrait");  
     LandauCanv1->Print(out+out2.str().c_str(),"Portrait");  
     LandauCanv2->Print(out+out2.str().c_str(),"Portrait");  
     LandauCanv3->Print(out+out2.str().c_str(),"Portrait");  
     IlluminaCanv->Print(out+out2.str().c_str(),"Portrait");  
     TempCanv->Print(out+out3.str().c_str(),"Portrait");  
854            
855      if(!strcmp(outfile.Data(),"pdf")){        if(countrun==1){
856        stringstream com;          CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");
857        com<<"ps2pdf13 "<<out<<ffile<<"_FTrkQLook_EXPERT.ps "<<out<<ffile<<"_FTrkQLook_EXPERT.pdf";          EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
858        system(com.str().c_str());          LandauCanv1[fl]->Print(out+out2.str().c_str(),"Portrait");
859        printf("\n---> ps file converted in pdf format!\n");          LandauCanv2[fl]->Print(out+out2.str().c_str(),"Portrait");
860        com.str("");          LandauCanv3[fl]->Print(out+out2.str().c_str(),"Portrait");
861        com<<"rm -f "<<out<<ffile<<"_FTrkQLook_EXPERT.ps ";          IlluminaCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
862        system(com.str().c_str());          TempCanv[fl]->Print(out+out3.str().c_str(),"Portrait");
863        printf("---> ps file removed!\n\n");        }
864        com.str("");        else if(countrun>=1){
865            if(fl==0) CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");
866            else CompTimeCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
867            EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
868            LandauCanv1[fl]->Print(out+out2.str().c_str(),"Portrait");
869            LandauCanv2[fl]->Print(out+out2.str().c_str(),"Portrait");
870            LandauCanv3[fl]->Print(out+out2.str().c_str(),"Portrait");
871            IlluminaCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
872            if(fl!=countrun-1) TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
873            else TempCanv[fl]->Print(out+out3.str().c_str(),"Portrait");
874          }
875      }      }
876        else{
877          out1.str("");
878          out1<<ffile<<"_FTrkQLook_EXPERT-CompTime-pag"<<fl+1<<"."<<outfile.Data();
879          CompTimeCanv[fl]->Print(out+out1.str().c_str());
880          out1.str("");
881          out1<<ffile<<"_FTrkQLook_EXPERT-Temp-pag"<<fl+1<<"."<<outfile.Data();
882          TempCanv[fl]->Print(out+out1.str().c_str());
883          out1.str("");
884          out1<<ffile<<"_FTrkQLook_EXPERT-EvNum-pag"<<fl+1<<"."<<outfile.Data();
885          EventNumCanv[fl]->Print(out+out1.str().c_str());
886          out1.str("");
887          out1<<ffile<<"_FTrkQLook_EXPERT-LandauL1-pag"<<fl+1<<"."<<outfile.Data();
888          LandauCanv1[fl]->Print(out+out1.str().c_str());
889          out1.str("");
890          out1<<ffile<<"_FTrkQLook_EXPERT-LandauL2-pag"<<fl+1<<"."<<outfile.Data();
891          LandauCanv2[fl]->Print(out+out1.str().c_str());
892          out1.str("");
893          out1<<ffile<<"_FTrkQLook_EXPERT-LandauL3-pag"<<fl+1<<"."<<outfile.Data();
894          LandauCanv3[fl]->Print(out+out1.str().c_str());
895          out1.str("");
896          out1<<ffile<<"_FTrkQLook_EXPERT-Lighting-pag"<<fl+1<<"."<<outfile.Data();
897          IlluminaCanv[fl]->Print(out+out1.str().c_str());
898        }
899      }  
900    
901      if(!strcmp(outfile.Data(),"pdf")){
902        stringstream com;
903        com<<"ps2pdf13 "<<out<<ffile<<"_FTrkQLook_EXPERT.ps "<<out<<ffile<<"_FTrkQLook_EXPERT.pdf";
904        system(com.str().c_str());
905        printf("\n---> ps file converted in pdf format!\n");
906        com.str("");
907        com<<"rm -f "<<out<<ffile<<"_FTrkQLook_EXPERT.ps ";
908        system(com.str().c_str());
909        printf("---> ps file removed!\n\n");
910        com.str("");
911    }    }
912    else{  
     out1.str("");  
     out1<<ffile<<"_FTrkQLook_EXPERT-CompTime."<<outfile.Data();  
     CompTimeCanv->Print(out+out1.str().c_str());  
     out1.str("");  
     out1<<ffile<<"_FTrkQLook_EXPERT-Temp."<<outfile.Data();  
     TempCanv->Print(out+out1.str().c_str());  
     out1.str("");  
     out1<<ffile<<"_FTrkQLook_EXPERT-EvNum."<<outfile.Data();  
     EventNumCanv->Print(out+out1.str().c_str());  
     out1.str("");  
     out1<<ffile<<"_FTrkQLook_EXPERT-LandauL1."<<outfile.Data();  
     LandauCanv1->Print(out+out1.str().c_str());  
     out1.str("");  
     out1<<ffile<<"_FTrkQLook_EXPERT-LandauL2."<<outfile.Data();  
     LandauCanv2->Print(out+out1.str().c_str());  
     out1.str("");  
     out1<<ffile<<"_FTrkQLook_EXPERT-LandauL3."<<outfile.Data();  
     LandauCanv3->Print(out+out1.str().c_str());  
     out1.str("");  
     out1<<ffile<<"_FTrkQLook_EXPERT-Lighting."<<outfile.Data();  
     IlluminaCanv->Print(out+out1.str().c_str());  
   }  
   
913    command.str("");    command.str("");
914    command<<"rm -f "<<out<<"warning.txt";    command<<"rm -f "<<out<<"warning.txt";
915    system(command.str().c_str());    system(command.str().c_str());
916      
917    gROOT->Reset();    gROOT->Reset();
918    return;    return;
919  }  }
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.23