/[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.12 by pam-fi, Fri Aug 11 10:24:09 2006 UTC
# Line 1  Line 1 
1  /**  /**
2   * FTrkQLook_EXPERT   * FTrkQLook_EXPERT.cxx
3   *   *
4   * autor: D.Fedele   * autor: D.Fedele
5   * version 2.0   * version v1r08
6   * Parameters:   * Parameters:
7   *      file - the data file to analyze   *      file - the data file to analyze
8   *      fromevent - first event to analyze   *      fromevent - first event to analyze
# Line 19  Line 19 
19  #include <TLatex.h>  #include <TLatex.h>
20  #include <TCanvas.h>  #include <TCanvas.h>
21  #include <TGraph.h>  #include <TGraph.h>
22    #include <TFile.h>
23  #include <TTree.h>  #include <TTree.h>
24  #include <TStyle.h>  #include <TStyle.h>
25  //  //
26  #include <physics/tracker/TrackerEvent.h>  #include <physics/tracker/TrackerEvent.h>
27  #include <PscuHeader.h>  #include <PscuHeader.h>
28  #include <EventHeader.h>  #include <EventHeader.h>
29    #include <RunHeaderEvent.h>
30  #include <TrkAlarmEvent.h>  #include <TrkAlarmEvent.h>
31  #include <tsbt/TsbTRecord.h>  #include <tsbt/TsbTRecord.h>
32  #include <tsbt/TsbTEvent.h>  #include <tsbt/TsbTEvent.h>
33    #include <tsbb/TsbBRecord.h>
34    #include <tsbb/TsbBEvent.h>
35    #include <EventCounter.h>
36    #include <PacketType.h>
37  //  //
38    #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);  
     };  
 };  
   
39    
40  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)
41  {  {
42    //    //
43    //   obtain information about the data file and select the output dir    //   obtain information about the data file and select the output dir
44    const string filepath=file.Data();    Int_t dwpos = file.Last('/');
45    Int_t dwpos = filepath.rfind("DW_");    Int_t dwpos1 = file.Last('.');
   Int_t dwpos1 = filepath.find(".root");  
   TString fpath=(filepath.c_str());  
46    TString base,ffile ;    TString base,ffile ;
47    stringcopy(ffile,fpath,dwpos,dwpos1);    ffile=file(dwpos+1,dwpos1-(dwpos+1));
48    stringcopy(base,fpath,0,dwpos);    if(dwpos>0) base=file(0,dwpos);
49    
50    TString out;    TString out;
51    if(outdir.Length()==0){    if(outdir.Length()==0){
# Line 60  void FTrkQLook_EXPERT(TString file,Int_t Line 53  void FTrkQLook_EXPERT(TString file,Int_t
53    }else{    }else{
54      out = outdir;      out = outdir;
55    }    }
56      if(out.Last('/')+1<out.Length()) out+="/";
57    
58    //    //
59    // inizialise the variables and open the file    // inizialise the variables and open the file
60    pamela::TsbTEvent  *event = 0;    pamela::TsbTEvent  *event = 0;
61    pamela::TsbTRecord *record = 0;    pamela::TsbTRecord *record = 0;
62      pamela::TsbBEvent  *Bevent = 0;
63      pamela::TsbBRecord *Brecord = 0;
64    pamela::tracker::TrackerEvent *te=0;    pamela::tracker::TrackerEvent *te=0;
65    pamela::EventHeader *eh=0,*aleh=0;    pamela::EventHeader *eh=0,*aleh=0,*eH=0,*eT=0,*eB=0;
66    pamela::PscuHeader *ph=0;    pamela::PscuHeader *ph=0,*pH=0;
67    pamela::TrkAlarmEvent *al=0;    pamela::TrkAlarmEvent *al=0;
68      pamela::RunHeaderEvent *reh=0;
69      pamela::EventCounter *cod=0;
70    
71      pamela::PacketType *pctp=0;
72    
73    TFile *datafile = new TFile(file);    TFile *datafile = new TFile(file);
74      if ( !datafile ){
75        printf("No data file, exiting...\n");
76        return;
77      }
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 *Btree = (TTree*)datafile->Get("TsbB");
84      Btree->SetBranchAddress("TsbB",&Bevent);
85      Btree->SetBranchAddress("Header",&eB);
86    
87    TTree *altr = (TTree*)datafile->Get("TrkAlarm");    TTree *altr = (TTree*)datafile->Get("TrkAlarm");
88    altr->SetBranchAddress("TrkAlarm",&al);    altr->SetBranchAddress("TrkAlarm",&al);
# Line 83  void FTrkQLook_EXPERT(TString file,Int_t Line 92  void FTrkQLook_EXPERT(TString file,Int_t
92    tr->SetBranchAddress("Tracker",&te);    tr->SetBranchAddress("Tracker",&te);
93    tr->SetBranchAddress("Header",&eh);    tr->SetBranchAddress("Header",&eh);
94        
95      TTree *otr  = (TTree*)datafile->Get("RunHeader");
96      otr->SetBranchAddress("Header",&eH);
97      otr->SetBranchAddress("RunHeader",&reh);
98    
99    Long64_t nevent = tr->GetEntries();    Long64_t nevent = tr->GetEntries();
100      Long64_t neventH = otr->GetEntries();
101    Long64_t tnevent = tree->GetEntries();    Long64_t tnevent = tree->GetEntries();
102      Long64_t bnevent = Btree->GetEntries();
103    Long64_t alnevent = altr->GetEntries();    Long64_t alnevent = altr->GetEntries();
104    Int_t minevent=0;    Int_t minevent=0;
105    Int_t maxevent=0;    Int_t maxevent=0;
106    
107    printf("Number of total events: %lld\n",nevent);    printf("Number of total events: %lld\n",nevent);
108      printf("Number of header events: %lld\n",neventH);
109      printf("Number of TsbT events: %lld\n",tnevent);
110      printf("Number of TsbB events: %lld\n",bnevent);
111      printf("Number of TrkAlarm packet events: %lld\n",alnevent);
112    
113    if (nevent<=0){    if (nevent<=0){
114      datafile->Close();      datafile->Close();
# Line 122  void FTrkQLook_EXPERT(TString file,Int_t Line 141  void FTrkQLook_EXPERT(TString file,Int_t
141      nevent=maxevent-minevent ;      nevent=maxevent-minevent ;
142    }    }
143    
144      //
145    if (fromevent!=0)    // information about the RunHeader
146      printf("\n Scan of events from %i to %i ... \n",minevent,maxevent-1);    ULong64_t HOBT[neventH];
147    else    Int_t trk_cal_us[neventH];
148      printf("\n Scan of events from %i to %i ... \n",minevent+1,maxevent);    for (Int_t vi=0; vi<neventH;vi++){
149        HOBT[vi]=0;
150        trk_cal_us[vi]=0;
151      }
152      for (Int_t ev=0; ev<neventH; ev++){
153        otr->GetEntry(ev);
154        pH = eH->GetPscuHeader();
155        HOBT[ev]= pH->GetOrbitalTime();
156        trk_cal_us[ev]=reh->TRK_CALIB_USED;
157      }
158    
159    //    //
160    // other variables definitions    // other variables definitions
161    stringstream oss1,oss2,oss3,oss4,fromfile,isfile,tit;    stringstream oss1,oss2,oss3,oss4,fromfile,isfile,tit;
   Int_t warning_dspnumber=0;  
162    Int_t ALARM=0;    Int_t ALARM=0;
163    Int_t WARNING[12];    Int_t WARNING[12];
   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] ;  
164    
   TGraph *comprtime,*temp[5];  
   TGraph *eventnumb;  
   TH1F *landau1[12],*landau2[12],*landau3[12],*illuminazione[12];  
   TPaveText *pt1;  
   TPad *pt;  
     
165    //    //
166    // information about the entries for the temperatures    // information about the entries for the temperatures
167    Int_t tmpSize=0,siztmp=0,maxsize=0;    Int_t tmpSize=0,siztmp=0,maxsize=0;
# Line 154  void FTrkQLook_EXPERT(TString file,Int_t Line 171  void FTrkQLook_EXPERT(TString file,Int_t
171      maxsize+=tmpSize;      maxsize+=tmpSize;
172    }    }
173    const Int_t tsize=maxsize;    const Int_t tsize=maxsize;
174    Int_t tempt[tsize][5],xt[tsize], tempt_tmp[tsize];    Int_t tempt[tsize][5];
175      ULong64_t xt[tsize];
176    
177      Int_t countnboot=1;
178      Int_t cntpgtemp=0,cntpgdat=0,cntpgmag=0;
179      //
180      // information about the temperatures
181      for (Int_t ev=0; ev<tnevent; ev++){
182        tree->GetEntry(ev);
183        tmpSize = event->Records->GetEntries();
184        for (Int_t j = 0; j < tmpSize; j++){
185          record = (pamela::TsbTRecord*)event->Records->At(j);
186          xt[siztmp]=record->RECORD_OBT;
187          if((xt[siztmp]<xt[siztmp-1]) && siztmp>0)
188            countnboot+=1;
189          
190          for (Int_t z = 0; z < 5; z++){
191            tempt[siztmp][z] = record->TEMPERATURES[z+1];    
192          }
193          siztmp++;
194        }
195      }
196      cntpgtemp=countnboot;
197      countnboot+=2+(Int_t)nevent/MAXSTORAGE;
198      //   printf("\ncountnboot=%d\n",countnboot);
199    
200      //
201      // information about the entries for the magnetic field
202      if(bnevent>0) cntpgmag=1;
203      maxsize=0;
204      for (Int_t ev=0; ev<bnevent; ev++){
205        Btree->GetEntry(ev);
206        tmpSize = Bevent->Records->GetEntries();
207        maxsize+=tmpSize;
208      }
209      const Int_t bsize=maxsize;
210      Int_t magt[bsize][5];
211      ULong64_t xb[bsize];
212      siztmp=0;
213      //
214      // information about the magnetic field
215      for (Int_t ev=0; ev<bnevent; ev++){
216        Btree->GetEntry(ev);
217        tmpSize = Bevent->Records->GetEntries();
218        for (Int_t j = 0; j < tmpSize; j++){
219          Brecord = (pamela::TsbBRecord*)Bevent->Records->At(j);
220          xb[siztmp]=Brecord->RECORD_OBT;
221          if((xb[siztmp]<xb[siztmp-1]) && siztmp>0)
222            cntpgmag+=1;
223          for (Int_t z = 0; z < 5; z++){
224            magt[siztmp][z] = Brecord->B_FIELD[z+1];    
225          }
226          siztmp++;
227        }
228      }
229        
230    //    //
231    // open the output text files for the alarms    // open the output text files for the alarms
232    ofstream warning(out + "warning.txt",ios::out);    TString fname1 = out+ffile;
233    TString fname = out+ffile;    TString fname = out+ffile;
   TString fname1 = out+ffile;  
234    int slen=fname.Length();    int slen=fname.Length();
235    int last=fname.Last('_');    int last=fname.Last('_');
236    if(last<(slen-1))fname.Append('_');      if(last<(slen-1))fname.Append('_');  
237    fname.Append("Trk-ALARM-report.txt");    fname.Append("FTrk-DSP-report.txt");
238    ofstream alarm(fname,ios::out);    ofstream alarm(fname,ios::out);
239    alarm << "TRACKER ALARM REPORT - Downlink " << ffile<< endl;    alarm << "TRACKER DSP REPORT - Downlink " << ffile<< endl;
240    fname1.Append("_TrkAlarm-pkt-report.txt");    fname1.Append("_FTrkAlarm-pkt-report.txt");
241    ofstream alarm1(fname1,ios::out);    ofstream alarm1(fname1,ios::out);
242    alarm1 << "TrkAlarm pkt REPORT - Downlink " << ffile<< endl;    alarm1 << "TrkAlarm pkt REPORT - Downlink " << ffile<< endl;
243    
# Line 176  void FTrkQLook_EXPERT(TString file,Int_t Line 245  void FTrkQLook_EXPERT(TString file,Int_t
245    // write the file for the TrkAlarm packet    // write the file for the TrkAlarm packet
246    if(alnevent==0) alarm1 <<endl<< "------>  NO ALARM!!! <-------"<< endl;    if(alnevent==0) alarm1 <<endl<< "------>  NO ALARM!!! <-------"<< endl;
247    else{    else{
248        Long64_t obt=0;
249      for (Int_t ev=0; ev<alnevent; ev++){      for (Int_t ev=0; ev<alnevent; ev++){
250        altr->GetEntry(ev);        altr->GetEntry(ev);
251        ph = aleh->GetPscuHeader();        ph = aleh->GetPscuHeader();
252    
253          if(ph->GetOrbitalTime()<obt && ev>0)
254            alarm1<<endl<<"NEW CPU BOOT"<<endl;
255          obt=ph->GetOrbitalTime();
256            
257        alarm1 << "================================================="<< endl;        alarm1 << "================================================="<< endl;
258        alarm1 << "PSCU-Pkt N. "<< ph->GetCounter() ;        alarm1 << "PSCU-Pkt N. "<< ph->GetCounter() ;
259        alarm1 << " - OBT "<< ph->GetOrbitalTime() << " ms"<<endl;        alarm1 << " - OBT "<< ph->GetOrbitalTime() << " ms"<<endl;
260        alarm1 << "(ROOT-tree entry "<<ev<<")"<<endl;        alarm1 << "(ROOT-tree entry "<<ev<<")"<<endl;
261        alarm1 << "================================================="<< endl;        alarm1 << "================================================="<< endl<<endl;
262                
263        alarm1 << " ALARM[1]= "<<(Int_t)al->ALARM[1]<<endl;        alarm1 << "Alarm variables (range 0-1)"<<endl;
264        alarm1 << " ALARM[2]= "<<(Int_t)al->ALARM[2]<<endl;        alarm1 << " ALARM[1]= 0x"<< hex << (Int_t)al->ALARM[1]<<endl;
265        alarm1 << " Aswr= "<<(Int_t)al->Aswr<<endl;        alarm1 << " ALARM[2]= 0x"<< (Int_t)al->ALARM[2]<<endl;
266        alarm1 << " BID[1]= "<<(Int_t)al->BID[0]<<endl;        alarm1 << " CmdDuringTrig= 0x"<< (Int_t)al->CmdDuringTrig<<endl;
267        alarm1 << " BID[2]= "<<(Int_t)al->BID[1]<<endl;        alarm1 << " FinalCheck= 0x"<< (Int_t)al->FinalCheck<<endl;
268        alarm1 << " BID[3]= "<<(Int_t)al->BID[2]<<endl;        alarm1 << " FlashData= 0x"<< (Int_t)al->FlashData<<endl;
269        alarm1 << " BID[4]= "<<(Int_t)al->BID[3]<<endl;        alarm1 << " FlashShutdown= 0x"<< (Int_t)al->FlashShutdown<<endl;
270        alarm1 << " BID[5]= "<<(Int_t)al->BID[4]<<endl;        alarm1 << " FlashUpset= 0x"<< (Int_t)al->FlashUpset<<endl;
271        alarm1 << " BID[6]= "<<(Int_t)al->BID[5]<<endl;        alarm1 << " InterCheck= 0x"<< (Int_t)al->InterCheck<<endl;
272        alarm1 << " BID[7]= "<<(Int_t)al->BID[6]<<endl;        alarm1 << " UnknownCmd= 0x"<<(Int_t)al->UnknownCmd<<endl<<endl;
273        alarm1 << " CmdDuringTrig= "<<(Int_t)al->CmdDuringTrig<<endl;  
274        alarm1 << " CmdIDMA= "<<(Int_t)al->CmdIDMA<<endl;        alarm1 << "Alarm variables (range 0-3F)"<<endl;
275        alarm1 << " CmdNum= "<<(Int_t)al->CmdNum<<endl;        alarm1 << " CmdIDMA= 0x"<< (Int_t)al->CmdIDMA<<endl;
276        alarm1 << " DSPBusy= "<<(Int_t)al->DSPBusy<<endl;        alarm1 << " DSPSoft= 0x"<< (Int_t)al->DSPSoft<<endl;
277        alarm1 << " DSPMask= "<<(Int_t)al->DSPMask<<endl;        alarm1 << " TrigIDMA= 0x"<< (Int_t)al->TrigIDMA<<endl<<endl;
278        alarm1 << " DSPSoft= "<<(Int_t)al->DSPSoft<<endl;        
279        alarm1 << " FinalCheck= "<<(Int_t)al->FinalCheck<<endl;        alarm1 << "Control variables (range 0-3F)"<<endl;
280        alarm1 << " FlashData= "<<(Int_t)al->FlashData<<endl;        alarm1 << " DSPBusy= 0x"<< (Int_t)al->DSPBusy<<endl;
281        alarm1 << " FlashOn= "<<(Int_t)al->FlashOn<<endl;        alarm1 << " DSPMask= 0x"<< (Int_t)al->DSPMask<<endl<<endl;
282        alarm1 << " FlashShutdown= "<<(Int_t)al->FlashShutdown<<endl;  
283        alarm1 << " FlashUpset= "<<(Int_t)al->FlashUpset<<endl;        alarm1 << "Control variables (range 0-1)"<<endl;
284        alarm1 << " InterCheck= "<<(Int_t)al->InterCheck<<endl;        alarm1 << " FlashOn= 0x"<< (Int_t)al->FlashOn<<endl<<endl;
285        alarm1 << " PNum= "<<(Int_t)al->PNum<<endl;  
286        alarm1 << " TrigIDMA= "<<(Int_t)al->TrigIDMA<<endl;        alarm1 << "Control variables (range 0-3)"<<endl;
287        alarm1 << " TrigMask= "<<(Int_t)al->TrigMask<<endl;        alarm1 << " TrigMask= 0x"<< (Int_t)al->TrigMask<<endl<<endl;
288        alarm1 << " UnknownCmd= "<<(Int_t)al->UnknownCmd<<endl;  
289          alarm1 << "Control bits fixed"<<endl;
290          alarm1 << " Aswr= 0x"<< (Int_t)al->Aswr<<endl;
291          alarm1 << " BID[1]= 0x"<< (Int_t)al->BID[0]<<endl;
292          alarm1 << " BID[2]= 0x"<< (Int_t)al->BID[1]<<endl;
293          alarm1 << " BID[3]= 0x"<< (Int_t)al->BID[2]<<endl;
294          alarm1 << " BID[4]= 0x"<< (Int_t)al->BID[3]<<endl;
295          alarm1 << " BID[5]= 0x"<< (Int_t)al->BID[4]<<endl;
296          alarm1 << " BID[6]= 0x"<< (Int_t)al->BID[5]<<endl;
297          alarm1 << " BID[7]= 0x"<< (Int_t)al->BID[6]<<endl;
298          alarm1 << " CmdNum= 0x"<< (Int_t)al->CmdNum<<endl;
299          alarm1 << " PNum= 0x"<< (Int_t)al->PNum<< dec <<endl;
300    
301          alarm1 << "================================================="<< endl<<endl;
302          
303      }      }
304    }    }
305    
306      //
307      // Set Style options
308      gStyle->SetLabelSize(0.05,"x");
309      gStyle->SetLabelSize(0.06,"y");
310      gStyle->SetStatFontSize(0.075);
311      gStyle->SetOptStat(1110);
312      gStyle->SetFillColor(10);  
313      gStyle->SetStatColor(10);
314      gStyle->SetTitleFillColor(10);  
315      gStyle->SetTitleFontSize(0.1);
316      gStyle->SetTitleOffset(0.8,"y");
317      gStyle->SetTitleOffset(0.9,"x");
318      gStyle->SetTitleSize(0.06,"y");
319      gStyle->SetTitleSize(0.055,"x");
320    
321      //
322      // Define output canvas, histos and graphs
323      TCanvas *CompTimeCanv[countnboot],*EventNumCanv[countnboot],*TempCanv[cntpgtemp],*BfieldCanv[cntpgmag];
324      TCanvas *IlluminaCanv,*LandauCanv1,*LandauCanv2,*LandauCanv3;
325    
326      TH1F *landau1[12],*landau2[12],*landau3[12],*illuminazione[12];
327      TGraph *comprtime[12][countnboot],*temp[5][cntpgtemp],*tempw[5][cntpgtemp],*eventnumb[countnboot],*mag[5][cntpgmag];
328      TPad *pad1[12],*pad2[12],*pad3[12],*pad4[12],*pad5[12],*pad6[5],*pad7[5];
329    
330      for(Int_t n = 0; n<12; n++) {
331    
332        /* -----------> HISTOGRAMS          */
333    
334        tit<<"DSP "<<n+1;
335        oss1<<"DSP  "<<n+1;
336        oss2<<"DSPh  "<<n+1;
337        oss3<<"DSP h "<<n+1;
338        oss4<<"DSP   h"<<n+1;
339        
340        landau1[n]= new TH1F(oss1.str().c_str(),tit.str().c_str(),401,-0.5,1200.5);
341        landau2[n]= new TH1F(oss2.str().c_str(),tit.str().c_str(),401,-0.5,1200.5);
342        landau3[n]= new TH1F(oss3.str().c_str(),tit.str().c_str(),401,-0.5,1200.5);
343    
344        illuminazione[n]= new TH1F(oss4.str().c_str(),tit.str().c_str(),3073,-0.5,3072.5);
345    
346        tit.str("");
347        oss1.str("");
348        oss2.str("");
349        oss3.str("");
350        oss4.str("");
351      };            
352      
353    
354    //***************************************************************************************    //***************************************************************************************
355    // LOOP on each event    // LOOP on each event
356    //***************************************************************************************    //***************************************************************************************
357    
358    //    if (fromevent!=0)
359    // information about the temperatures      printf("\n Scan of events from %i to %i ... \n",minevent,maxevent-1);
360    for (Int_t ev=0; ev<tnevent; ev++){    else
361      tree->GetEntry(ev);      printf("\n Scan of events from %i to %i ... \n",minevent+1,maxevent);
362      tmpSize = event->Records->GetEntries();    
363      for (Int_t j = 0; j < tmpSize; j++){    TLatex *t=new TLatex();
364        record = (pamela::TsbTRecord*)event->Records->At(j);    TLatex *t1=new TLatex();
365        xt[siztmp]=record->RECORD_OBT;  //0.051*record->RECORD_OBT;    
366        for (Int_t z = 0; z < 5; z++){    
367          tempt[siztmp][z] = record->TEMPERATURES[z+1];        Int_t minev=minevent,maxev=maxevent,countTEMP=0,countMAG=0;
       }  
       siztmp++;  
     }  
   }  
368    
369    //    //
370    // information about the tracker data    // Fill temperature graphs
371    for (Int_t ev=minevent; ev<maxevent; ev++){    for(Int_t ii=0; ii<cntpgtemp;ii++){
372      tr->GetEntry(ev);      //****************************************************************************************
373      ph = eh->GetPscuHeader();      //Temperature Output Pages
374      dsp=0;      //****************************************************************************************
375      ALARM=0;      fromfile.str("");
376      for(Int_t i=0; i<12; i++){      fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;
377        dsp=te->DSPnumber[i]-1;      isfile<<"Temperatures vs OBT   pag"<<ii+1;
378        yd[(ev-minevent)*12+dsp]= te->DATAlength[i];      TempCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
379        yc[(ev-minevent)*12+dsp]= 0.051*te->compressiontime[i];      TempCanv[ii]->SetFillColor(10);
380        for(Int_t j=0;j<3;j++){      TempCanv[ii]->Range(0,0,100,100);
381          illum[(ev-minevent)*12+dsp][j]=te->addrcluster[i][j];  
382          if(!(dsp%2)&&(te->signcluster[i][j])!=0)      t->SetTextFont(32);
383            land[(ev-minevent)*12+dsp][j]=1024-(te->signcluster[i][j]);      t->SetTextColor(1);
384          else land[(ev-minevent)*12+dsp][j]=te->signcluster[i][j];      t->SetTextAlign(12);
385        t->SetTextSize(0.02);
386        t->DrawLatex(2.,98.7,fromfile.str().c_str());
387        t1->SetTextFont(32);
388        t1->SetTextColor(1);
389        t1->SetTextAlign(12);
390        t1->SetTextSize(0.02);
391        t1->DrawLatex(78.,98.7,isfile.str().c_str());
392        isfile.str("");
393        t1->SetTextSize(0.025);
394        t1->SetTextColor(196);
395        isfile<<"--> Values at 28.5^{o}C (if presents) correspond";
396        t1->DrawLatex(50.,22.,isfile.str().c_str());
397        isfile.str("");
398        isfile<<"    to wrong readings ( > 100^{o}C) of the Tsb";
399        t1->DrawLatex(50.,19.,isfile.str().c_str());
400        isfile.str("");
401        isfile<<"--> Values at 25.5^{o}C (if presents) correspond";
402        t1->DrawLatex(50.,12.,isfile.str().c_str());
403        isfile.str("");
404        isfile<<"    to wrong readings ( < 0^{o}C) of the Tsb";
405        t1->DrawLatex(50.,9.,isfile.str().c_str());
406        isfile.str("");
407      
408        Float_t tposy = 0.95;    // up y-coord - top pads
409        Float_t thpad = 0;   // pad height
410        Float_t tposx1=0;          // left  x-coord - pad column
411        Float_t tposx0=0;          //       x-coord - column division
412        Float_t twrel = 0;     // relative x size of first sub-column
413        Float_t tmarg = 0.004;   // margin among pads
414      
415        thpad = (tposy-tmarg*5)/3;
416        twrel = (1-tmarg*4)/2;
417        
418        for(Int_t i=0; i<5; i++){
419          if ( (i+1)%2==1 ) {
420            if(i>1) tposy = tposy-(tmarg*2+thpad);
421            tposx1 = tmarg;
422            tposx0 = tposx1 + twrel;
423        }        }
424        x[(ev-minevent)]= ph->GetOrbitalTime();        else {
425            tposx1 = tposx0 + 2*tmarg;
426            tposx0 = tposx1 + twrel;
427          }
428        
429          /* -----------> pad for histograms  */
430          pad6[i] = new TPad("pad6"," ",tposx1,tposy-thpad,tposx0,tposy,18,0,0);
431    
432          Int_t v=0,vv=0;
433          Double_t xt_tmp[tsize], tempt_tmp[tsize];
434          Double_t xt_tmpw[tsize], tempt_tmpw[tsize];
435          for (Int_t ev=countTEMP; ev<tsize; ev++){
436                
437        WARNING[i]=0;          if(ev==tsize-1 && i==4) countTEMP=tsize-1;
438        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){          if(xt[ev]<xt[ev-1] && ev>countTEMP){
439          ALARM = 1;      //general alarm            if(i==4) countTEMP=ev;
440          WARNING[i] = 1; // DSP warning            break;
441        };          }
442            else{
443        if(te->alarm[i]!=0){ // hardware alarm              tempt_tmp[v]=(Double_t)((Int_t)(((3.3*tempt[ev][i]/4096)-0.586)/0.0231));
444          ALARM = 1;              if(tempt_tmp[v]>100) {
445        };                tempt_tmp[v]=28.5;
446                        tempt_tmpw[vv]=28.5;
447        //**************************************************************************************                xt_tmpw[vv++]=(Double_t)xt[ev];
448        // warning for internal number              }
449        //**************************************************************************************              else if(tempt_tmp[v]<0){
450        if(i<=10){                tempt_tmp[v]=25.5;
451          if(te->eventn[i]!=te->eventn[i+1]){                tempt_tmpw[vv]=25.5;
452            warning_dspnumber++;                xt_tmpw[vv++]=(Double_t)xt[ev];
453            warning<< "==> WARNING!!    Check entry "<< ev<<" (DSP "<<dsp<<")" <<endl<<              }
454                      "eventn["<<i<<"]= "<<te->eventn[i]<<"!= eventn["<<i+1<<"]= "<< te->eventn[i+1]<<endl;              xt_tmp[v++]=(Double_t)xt[ev];
455          }          }
         else  
           eventint[(ev-minevent)]=te->eventn[0];  
456        }        }
457       }        TempCanv[ii]->cd();
458          tit<<"T"<<i+5<<" (magnetic module "<<i+1<<")";
459      if(ev<=maxevent-1){        pad6[i]->SetFillColor(10);
460          pad6[i]->Draw();
461          pad6[i]->cd();
462          temp[i][ii]= new TGraph(v,xt_tmp,tempt_tmp);
463          temp[i][ii]->SetTitle(tit.str().c_str());
464          temp[i][ii]->GetXaxis()->SetLabelSize(0.04);
465          temp[i][ii]->GetXaxis()->SetTitleSize(0.04);
466          temp[i][ii]->GetXaxis()->SetTitle("OBT (ms)");
467          temp[i][ii]->GetXaxis()->CenterTitle();
468          temp[i][ii]->GetXaxis()->SetTitleOffset(0.85);
469          temp[i][ii]->GetYaxis()->SetTitleOffset(1.2);
470          temp[i][ii]->GetYaxis()->SetLabelOffset(0.001);
471          temp[i][ii]->GetYaxis()->SetLabelSize(0.04);
472          temp[i][ii]->GetYaxis()->SetTitleSize(0.04);
473          temp[i][ii]->GetYaxis()->SetTitle("Temperatures ( ^{o}C)");
474          temp[i][ii]->GetYaxis()->CenterTitle();
475          temp[i][ii]->SetMarkerStyle(21);
476          temp[i][ii]->SetMarkerSize(0.2);
477          temp[i][ii]->Draw("ap");
478          tit.str("");
479          if(vv>0){
480            tempw[i][ii]= new TGraph(vv,xt_tmpw,tempt_tmpw);
481            tempw[i][ii]->SetMarkerStyle(21);
482            tempw[i][ii]->SetMarkerSize(0.2);
483            tempw[i][ii]->SetMarkerColor(196);
484            tempw[i][ii]->Draw("samep");
485          }
486          TempCanv[ii]->Update();
487            
488          
489        }
490        if(countTEMP==tsize-1){
491          break;
492        }
493      }
494    
495        if((ev-minevent)>=1 && eventint[(ev-minevent)]!=eventint[(ev-minevent)-1]+1 && eventint[(ev-minevent)]!=1){    //
496          warning_dspnumber++;    // Fill magnetic field graphs
497          warning<< "==> WARNING!!    Check entry "<< ev<<endl<<    for(Int_t ii=0; ii<cntpgmag;ii++){
498                    " DSP event num.= "<< eventint[(ev-minevent)]<<      //****************************************************************************************
499                    " is different from (previus+1) ="<<eventint[(ev-minevent)-1]+1 <<"\n"<<endl;      //Magnetic Field Output Pages
500        //****************************************************************************************
501        fromfile.str("");
502        fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;
503        isfile<<"Magnetic Axial Field vs OBT   pag"<<ii+1;
504        BfieldCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
505        BfieldCanv[ii]->SetFillColor(10);
506        BfieldCanv[ii]->Range(0,0,100,100);
507        
508        t->SetTextFont(32);
509        t->SetTextColor(1);
510        t->SetTextAlign(12);
511        t->SetTextSize(0.02);
512        t->DrawLatex(2.,98.7,fromfile.str().c_str());
513        t1->SetTextFont(32);
514        t1->SetTextColor(1);
515        t1->SetTextAlign(12);
516        t1->SetTextSize(0.02);
517        t1->DrawLatex(70.,98.7,isfile.str().c_str());
518        isfile.str("");
519      
520        TLine li;
521        li.SetLineStyle(1);
522        li.SetLineWidth(1);
523        li.SetLineColor(190);
524        t1->SetTextColor(190);
525        t1->SetTextSize(0.04);
526        
527        Float_t tposy = 0.95;    // up y-coord - top pads
528        Float_t thpad = 0;   // pad height
529        Float_t tposx1=0;          // left  x-coord - pad column
530        Float_t tposx0=0;          //       x-coord - column division
531        Float_t twrel = 0;     // relative x size of first sub-column
532        Float_t tmarg = 0.004;   // margin among pads
533      
534        thpad = (tposy-tmarg*5)/3;
535        twrel = (1-tmarg*4)/2;
536        
537        for(Int_t i=0; i<5; i++){
538          if ( (i+1)%2==1 ) {
539            if(i>1) tposy = tposy-(tmarg*2+thpad);
540            tposx1 = tmarg;
541            tposx0 = tposx1 + twrel;
542          }
543          else {
544            tposx1 = tposx0 + 2*tmarg;
545            tposx0 = tposx1 + twrel;
546        }        }
     };  
547                
548      //********************************************************************************************        /* -----------> pad for histograms  */
549      // file ALARM        pad7[i] = new TPad("pad7"," ",tposx1,tposy-thpad,tposx0,tposy,18,0,0);
     //********************************************************************************************  
     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;  
550                
551        alarm << " DSPn";        Int_t v=0;
552        alarm << " Event";        Double_t xb_tmp[bsize], magt_tmp[bsize];
553        alarm << " Words";        for (Int_t ev=countMAG; ev<bsize; ev++){
554        alarm << " crc";          
555        alarm << "  FC";          if(ev==bsize-1 && i==4) countMAG=bsize-1;
556        alarm << " FL1";          if(xb[ev]<xb[ev-1] && ev>countMAG){
557        alarm << " FL2";            if(i==4) countMAG=ev;
558        alarm << " FL3";            break;
559        alarm << " FL4";          }
560        alarm << " FL5";          else{
561        alarm << " FL6" << endl;            magt_tmp[v]=(Double_t)magt[ev][i];
562              xb_tmp[v++]=(Double_t)xb[ev];
563            }
564          }
565          BfieldCanv[ii]->cd();
566          tit<<"B"<<i+5<<" (magnetic module "<<i+1<<")";
567          pad7[i]->SetFillColor(10);
568          pad7[i]->Draw();
569          pad7[i]->cd();
570          mag[i][ii]= new TGraph(v,xb_tmp,magt_tmp);
571          mag[i][ii]->SetTitle(tit.str().c_str());
572          mag[i][ii]->GetXaxis()->SetNdivisions(502,kTRUE);
573          mag[i][ii]->GetXaxis()->SetLabelSize(0.04);
574          mag[i][ii]->GetXaxis()->SetTitleSize(0.04);
575          mag[i][ii]->GetXaxis()->SetTitle("OBT (ms)");
576          mag[i][ii]->GetXaxis()->CenterTitle();
577          mag[i][ii]->GetXaxis()->SetTitleOffset(0.85);
578          if(i!=4) mag[i][ii]->GetYaxis()->SetRangeUser(2047,2058);
579          else mag[i][ii]->GetYaxis()->SetRangeUser(2061,2066);
580          mag[i][ii]->GetYaxis()->SetTitleOffset(1.2);
581          mag[i][ii]->GetYaxis()->SetLabelOffset(0.001);
582          mag[i][ii]->GetYaxis()->SetLabelSize(0.03);
583          mag[i][ii]->GetYaxis()->SetTitleSize(0.04);
584          mag[i][ii]->GetYaxis()->SetTitle("Magnetic Field (au)");
585          mag[i][ii]->GetYaxis()->CenterTitle();
586          mag[i][ii]->SetMarkerStyle(21);
587          mag[i][ii]->SetMarkerSize(0.4);
588          mag[i][ii]->Draw("ap");
589          Double_t min=0.,max=0,xlat=0.;
590          min=mag[i][ii]->GetXaxis()->GetXmin();
591          max=mag[i][ii]->GetXaxis()->GetXmax();
592          xlat=min+(max-min)/2;
593          stringstream mi,ma;
594          mi<<"minimum recorded value";
595          ma<<"maximum recorded value";
596          t->SetTextSize(0.1);
597          switch(i){
598            case 0:
599              li.DrawLine(min,2054.,max,2054.);
600              li.DrawLine(min,2048.,max,2048.);
601              t1->DrawLatex(xlat,2054.3,ma.str().c_str());
602              t1->DrawLatex(xlat,2047.7,mi.str().c_str());  
603              break;
604    
605            case 1:
606              li.DrawLine(min,2055.,max,2055.);
607              li.DrawLine(min,2051.,max,2051.);
608              t1->DrawLatex(xlat,2055.3,ma.str().c_str());
609              t1->DrawLatex(xlat,2050.7,mi.str().c_str());
610              break;
611    
612            case 2:
613              li.DrawLine(min,2056.,max,2056.);
614              li.DrawLine(min,2052.,max,2052.);
615              t1->DrawLatex(xlat,2056.3,ma.str().c_str());
616              t1->DrawLatex(xlat,2051.7,mi.str().c_str());
617              break;
618                
619        for(Int_t i=0; i<12 ; i++){          case 3:
620          alarm.width(5); alarm << te->DSPnumber[i];            li.DrawLine(min,2057.,max,2057.);
621          alarm.width(6); alarm << te->eventn[i];            li.DrawLine(min,2053.,max,2053.);
622          alarm.width(6); alarm << te->DATAlength[i];            t1->DrawLatex(xlat,2057.3,ma.str().c_str());
623          alarm.width(4); alarm << te->crc[i];            t1->DrawLatex(xlat,2052.7,mi.str().c_str());
624          alarm.width(4); alarm << te->fc[i];            break;
625          alarm.width(4); alarm << te->fl1[i];  
626          alarm.width(4); alarm << te->fl2[i];          case 4:
627          alarm.width(4); alarm << te->fl3[i];            li.DrawLine(min,2065.,max,2065.);
628          alarm.width(4); alarm << te->fl4[i];            li.DrawLine(min,2062.,max,2062.);
629          alarm.width(4); alarm << te->fl5[i];            t1->DrawLatex(xlat,2065.15,ma.str().c_str());
630          alarm.width(4); alarm << te->fl6[i];            t1->DrawLatex(xlat,2061.85,mi.str().c_str());
631          if(te->alarm[i]!=0)alarm<<" >> ALARM ";            break;
632          if(WARNING[i]!=0)alarm<<" (DSP warning) ";  
         alarm    << endl;  
633        }        }
634          BfieldCanv[ii]->Update();
635          tit.str("");
636        }
637        if(countMAG==bsize-1){
638          break;
639      }      }
640    }    }
   if(ALARM==0) alarm << endl<< "------>  NO ALARM!!! <-------"<<endl;  
641        
   if(warning_dspnumber==0) warning<<"NONE"<<endl;  
642    
643    //*****************************************    //
644    //close all files    // Fill compressiontime and eventnumber graphs and DSP warnings
645    //*****************************************      for(Int_t ii=0; ii<countnboot;ii++){
646    warning.close();      TPad *pt;         //pad for histos
647    alarm.close();    
648    datafile->Close();      //****************************************************************************************
649        //COMPRESSIONTIME vs. OBT Output Pages
650        //****************************************************************************************
651        fromfile.str("");
652        fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;
653        isfile<<"COMPRESSIONTIME vs. OBT   pag"<<ii+1;
654        CompTimeCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
655        CompTimeCanv[ii]->SetFillColor(10);
656        CompTimeCanv[ii]->Range(0,0,100,100);
657        t->SetTextFont(32);
658        t->SetTextColor(1);
659        t->SetTextAlign(12);
660        t->SetTextSize(0.02);
661        t->DrawLatex(2.,98.7,fromfile.str().c_str());
662        t1->SetTextFont(32);
663        t1->SetTextColor(1);
664        t1->SetTextAlign(12);
665        t1->SetTextSize(0.02);
666        t1->DrawLatex(62.,98.7,isfile.str().c_str());
667        isfile.str("");
668    
669        //****************************************************************************************
670        //DSP EVENT NUMBER Output Pages
671        //****************************************************************************************
672    
673        isfile<<"DSP EVENT NUMBER vs. OBT   pag"<<ii+1;
674        EventNumCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
675        EventNumCanv[ii]->SetFillColor(10);
676        EventNumCanv[ii]->Range(0,0,100,100);
677        t->SetTextFont(32);
678        t->SetTextColor(1);
679        t->SetTextAlign(12);
680        t->SetTextSize(0.02);
681        t->DrawLatex(2.,98.7,fromfile.str().c_str());
682        t1->SetTextFont(32);
683        t1->SetTextColor(1);
684        t1->SetTextAlign(12);
685        t1->SetTextSize(0.02);
686        t1->DrawLatex(62.,98.7,isfile.str().c_str());
687        isfile.str("");
688    
689        Float_t posy = 0.95;    // up y-coord - top pads
690        Float_t hpad = 0;   // pad height
691        Float_t posx1=0;          // left  x-coord - pad column
692        Float_t posx0=0;          //       x-coord - column division
693        Float_t wrel = 0;     // relative x size of first sub-column
694        Float_t marg = 0.004;   // margin among pads
695      
696        hpad = (posy-marg*11)/6;
697        wrel = (1-marg*4)/2;
698      
699        for(Int_t n = 0; n<12; n++) {
700        
701          if ( (n+1)%2==1 ) {
702            if(n>1) posy = posy-(marg*2+hpad);
703            posx1 = marg;
704            posx0 = posx1 + wrel;
705          }
706          else {
707            posx1 = posx0 + 2*marg;
708            posx0 = posx1 + wrel;
709          }    
710        
711          /* -----------> pad for histograms  */
712          pad1[n] = new TPad("pad1"," ",posx1,posy-hpad,posx0,posy,18,0,0);
713          pad2[n] = new TPad("pad2"," ",posx1,posy-hpad,posx0,posy,18,0,0);
714          pad3[n] = new TPad("pad3"," ",posx1,posy-hpad,posx0,posy,18,0,0);
715          pad4[n] = new TPad("pad4"," ",posx1,posy-hpad,posx0,posy,18,0,0);
716          pad5[n] = new TPad("pad5"," ",posx1,posy-hpad,posx0,posy,18,0,0);
717        }
718      
719        //
720        // Obtain information about the tracker data
721        // and fill graphs and histos
722    
723        Int_t al=0;
724        Double_t x[MAXSTORAGE];
725        Float_t yc[MAXSTORAGE][12];
726        Double_t eventint[MAXSTORAGE];
727        Int_t eventn[12];
728      
729        for (Int_t ev=minev; ev<maxevent; ev++){
730          tr->GetEntry(ev);
731          ph = eh->GetPscuHeader();
732          cod = eh->GetCounter();
733    
734    
735    gStyle->SetLabelSize(0.05,"x");        if(ev==maxevent-1) maxev=maxevent-1;
   gStyle->SetLabelSize(0.06,"y");  
   gStyle->SetStatFontSize(0.075);  
   gStyle->SetOptStat(1110);  
   gStyle->SetFillColor(10);    
   gStyle->SetTitleFillColor(10);    
   gStyle->SetTitleFontSize(0.1);  
   gStyle->SetTitleOffset(0.8,"y");  
   gStyle->SetTitleOffset(0.9,"x");  
   gStyle->SetTitleSize(0.06,"y");  
   gStyle->SetTitleSize(0.055,"x");  
736    
737    //****************************************************************************************        if((ph->GetOrbitalTime()<x[ev-minev-1] && ev-minev!=0) || ev-minev==MAXSTORAGE){
738    //Output figures --- First sheet:          maxev=ev;
739    //****************************************************************************************          break;
740            }
741    TCanvas *CompTimeCanv=new TCanvas("Tracker_Detector_Report_4/6","",900,1200);        else{
742    CompTimeCanv->SetFillColor(10);          x[(ev-minev)]= ph->GetOrbitalTime();
743    CompTimeCanv->Range(0,0,100,100);          ALARM=0;
744    fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;          
745    isfile<<"COMPRESSIONTIME vs. OBT";          Int_t dsp=0;
746    TLatex *t=new TLatex();          for(Int_t i=0; i<12; i++){
747    t->SetTextFont(32);            if(te->DSPnumber[i]<1 || te->DSPnumber[i]>12) {
748    t->SetTextColor(1);              ALARM=1;
749    t->SetTextAlign(12);              break;
750    t->SetTextSize(0.02);            }
751    t->DrawLatex(2.,98.7,fromfile.str().c_str());  
752    TLatex *t1=new TLatex();            dsp=te->DSPnumber[i]-1;
753    t1->SetTextFont(32);            yc[(ev-minev)][dsp]= 0.051*te->compressiontime[i];
754    t1->SetTextColor(1);  
755    t1->SetTextAlign(12);            //
756    t1->SetTextSize(0.02);            // Fill Cluster Signal and Lighting of the view histos
757    t1->DrawLatex(64.,98.7,isfile.str().c_str());            for(Int_t j=0;j<3;j++){
758    isfile.str("");              if(te->signcluster[i][j]!=0){
759                  if((te->addrcluster[i][j]>6 && te->addrcluster[i][j]<505) ||(te->addrcluster[i][j]>518 && te->addrcluster[i][j]<1018)){
760                    illuminazione[dsp]->Fill((Float_t)((j*1024.)+te->addrcluster[i][j]));
761                  }
762                }
763              }
764              if(trk_cal_us[cod->Get(pctp->RunHeader)]!=104){
765                if(!(dsp%2)){
766                  if(te->signcluster[i][0]!=0) landau1[dsp]->Fill((Float_t)(1024.-te->signcluster[i][0]));
767                  if(te->signcluster[i][1]!=0) landau2[dsp]->Fill((Float_t)(1024.-te->signcluster[i][1]));
768                  if(te->signcluster[i][2]!=0) landau3[dsp]->Fill((Float_t)(1024.-te->signcluster[i][2]));
769                }
770                else{
771                  if(te->signcluster[i][0]!=0) landau1[dsp]->Fill((Float_t)te->signcluster[i][0]);
772                  if(te->signcluster[i][1]!=0) landau2[dsp]->Fill((Float_t)te->signcluster[i][1]);
773                  if(te->signcluster[i][2]!=0) landau3[dsp]->Fill((Float_t)te->signcluster[i][2]);
774                }
775              }
776    
777              WARNING[i]=0;
778              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){
779                ALARM = 1;      //general alarm
780                WARNING[i] = 1; // DSP warning
781              };
782    
783              if(te->alarm[i]!=0){ // hardware alarm
784                ALARM = 1;
785              };
786          
787              //**************************************************************************************
788              // warning for internal number
789              //**************************************************************************************
790              if(i<=10 && te->eventn[i]!=te->eventn[i+1]) ALARM=1;
791              if((ev-minev)>=1 && eventn[i]+1!=te->eventn[i] && te->eventn[i]!=1) ALARM=1;
792            }
793            eventint[(ev-minev)]=te->eventn[0];
794    
795    //****************************************************************************************          //********************************************************************************************
796    //Output figures --- Second sheet:          // file DSP warning
797    //****************************************************************************************          //********************************************************************************************
798    
799            if(ALARM==1) {  
800              al=1;
801              alarm <<endl<< "================================================="<< endl;
802              alarm << "PSCU-Pkt N. "<< ph->GetCounter() ;
803              alarm << " - OBT "<< ph->GetOrbitalTime() << " ms"<<endl;
804              alarm << "Total events "<<nevent<<endl;
805              alarm << "(ROOT-tree entry "<<ev<<" in page "<<ii+1<<" )"<<endl;
806              alarm << "================================================="<< endl;
807              
808              alarm << " DSPn";
809              alarm << " Counter";
810              alarm << " previous";
811              alarm << " Words";
812              alarm << " crc";
813              alarm << "  FC";
814              alarm << " FL1";
815              alarm << " FL2";
816              alarm << " FL3";
817              alarm << " FL4";
818              alarm << " FL5";
819              alarm << " FL6" << endl;
820              
821              for(Int_t i=0; i<12 ; i++){
822                alarm.width(5); alarm << te->DSPnumber[i];
823                alarm.width(8); alarm << te->eventn[i];
824                alarm.width(8); alarm << eventn[i];
825                alarm.width(6); alarm << te->DATAlength[i];
826                alarm.width(4); alarm << te->crc[i];
827                alarm.width(4); alarm << te->fc[i];
828                alarm.width(4); alarm << te->fl1[i];
829                alarm.width(4); alarm << te->fl2[i];
830                alarm.width(4); alarm << te->fl3[i];
831                alarm.width(4); alarm << te->fl4[i];
832                alarm.width(4); alarm << te->fl5[i];
833                alarm.width(4); alarm << te->fl6[i];
834                if(te->alarm[i]!=0)alarm<<" >> ALARM ";
835                if(WARNING[i]!=0)alarm<<" (DSP warning) ";
836                alarm    << endl;
837              }
838            }
839            for(Int_t i=0; i<12 ; i++)
840              eventn[i]=te->eventn[i];
841          }
842        }
843        if(al==0) alarm << endl<< "Page "<<ii+1<< ": ------>  NO ALARM!!! <-------"<<endl;
844    
845    TCanvas *EventNumCanv=new TCanvas("Tracker_Detector_Report_5/6","",900,1200);      //
846    EventNumCanv->SetFillColor(10);      // Draw the graphs
847    EventNumCanv->Range(0,0,100,100);      for (Int_t i=0; i<12 ; i++){
848    isfile<<"WARNINGS on DSP EVENT NUMBER ";        Double_t yyc[maxev-minev];
849    t->SetTextFont(32);        for (Int_t v=0; v<maxev-minev; v++){
850    t->SetTextColor(1);          yyc[v]=yc[v][i];
851    t->SetTextAlign(12);        }
852    t->SetTextSize(0.02);  
853    t->DrawLatex(2.,98.7,fromfile.str().c_str());        CompTimeCanv[ii]->cd();
854    t1->SetTextFont(32);        pad3[i]->SetFillColor(10);
855    t1->SetTextColor(1);        pad3[i]->SetFrameFillColor(10);
856    t1->SetTextAlign(12);        pad3[i]->Draw();
857    t1->SetTextSize(0.02);        pad3[i]->cd();
858    t1->DrawLatex(68.4,98.7,isfile.str().c_str());        comprtime[i][ii]= new TGraph(maxev-minev,x,yyc);
859    isfile.str("");        oss1<<"DSP  "<<i+1;
860          comprtime[i][ii]->SetTitle(oss1.str().c_str());
861          comprtime[i][ii]->GetXaxis()->SetTitle("OBT (ms)");
862          comprtime[i][ii]->GetXaxis()->CenterTitle();
863          comprtime[i][ii]->GetYaxis()->SetTitle("compressiontime (ms)");
864          comprtime[i][ii]->GetYaxis()->CenterTitle();
865          // comprtime[i][ii]->GetYaxis()->SetRangeUser(0,3);
866          comprtime[i][ii]->Draw("ap");
867          oss1.str("");
868          CompTimeCanv[ii]->Update();
869        }
870      
871        EventNumCanv[ii]->cd();
872        pt = new TPad("pt"," ",0.02,0.01,1.,0.98,18,0,0);
873        pt->SetFillColor(10);
874        pt->SetFrameFillColor(10);
875        pt->Draw();
876        pt->cd();
877        eventnumb[ii]=new TGraph(maxev-minev,x,eventint);
878        eventnumb[ii]->SetTitle("");
879        eventnumb[ii]->GetXaxis()->SetLabelSize(0.02);
880        eventnumb[ii]->GetXaxis()->SetTitleSize(0.03);
881        eventnumb[ii]->GetXaxis()->SetTitle("OBT (ms)");
882        eventnumb[ii]->GetXaxis()->CenterTitle();
883        eventnumb[ii]->GetXaxis()->SetTickLength(0.01);
884        eventnumb[ii]->GetXaxis()->SetTitleOffset(1.1);
885        eventnumb[ii]->GetYaxis()->SetLabelSize(0.02);
886        eventnumb[ii]->GetYaxis()->SetTitleSize(0.03);
887        eventnumb[ii]->GetYaxis()->SetTitle("DSP event-number");
888        eventnumb[ii]->GetYaxis()->CenterTitle();
889        eventnumb[ii]->GetYaxis()->SetTitleOffset(2.);
890        eventnumb[ii]->SetMarkerStyle(21);
891        eventnumb[ii]->SetMarkerColor(kBlue);
892        eventnumb[ii]->SetMarkerSize(0.2);
893        eventnumb[ii]->Draw("ap");
894        EventNumCanv[ii]->Update();
895        
896        minev=maxev;
897        if(maxev==maxevent-1) {
898          cntpgdat=ii+1;
899          break;
900        }
901        
902      }
903    
904    
905      alarm.close();
906    
907    //****************************************************************************************    //****************************************************************************************
908    //Output figures --- Third sheet:    //Cluster Signal ladder1 Output Pages
909    //****************************************************************************************    //****************************************************************************************
910    
911    TCanvas *LandauCanv1=new TCanvas("Landau ladder1","",900,1200);    fromfile.str("");
912      fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;
913      isfile<<"Cluster Signal ladder1";
914      LandauCanv1=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
915    LandauCanv1->SetFillColor(10);    LandauCanv1->SetFillColor(10);
916    LandauCanv1->Range(0,0,100,100);    LandauCanv1->Range(0,0,100,100);
   isfile<<"Landau ladder1";  
917    
918    t->SetTextFont(32);    t->SetTextFont(32);
919    t->SetTextColor(1);    t->SetTextColor(1);
# Line 417  void FTrkQLook_EXPERT(TString file,Int_t Line 928  void FTrkQLook_EXPERT(TString file,Int_t
928    isfile.str("");    isfile.str("");
929        
930    //****************************************************************************************    //****************************************************************************************
931    //Output figures --- Third sheet:    //Cluster Signal ladder2 Output Pages
932    //****************************************************************************************    //****************************************************************************************
933    
934    TCanvas *LandauCanv2=new TCanvas("Landau ladder2","",900,1200);    isfile<<"Cluster Signal ladder2";
935      LandauCanv2=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
936    LandauCanv2->SetFillColor(10);    LandauCanv2->SetFillColor(10);
937    LandauCanv2->Range(0,0,100,100);    LandauCanv2->Range(0,0,100,100);
   isfile<<"Landau ladder2";  
938    
939    t->SetTextFont(32);    t->SetTextFont(32);
940    t->SetTextColor(1);    t->SetTextColor(1);
# Line 438  void FTrkQLook_EXPERT(TString file,Int_t Line 949  void FTrkQLook_EXPERT(TString file,Int_t
949    isfile.str("");    isfile.str("");
950    
951    //****************************************************************************************    //****************************************************************************************
952    //Output figures --- Third sheet:    //Cluster Signal ladder3 Output Pages
953    //****************************************************************************************    //****************************************************************************************
954    
955    TCanvas *LandauCanv3=new TCanvas("Landau ladder3","",900,1200);    isfile<<"Cluster Signal ladder3";
956      LandauCanv3=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
957    LandauCanv3->SetFillColor(10);    LandauCanv3->SetFillColor(10);
958    LandauCanv3->Range(0,0,100,100);    LandauCanv3->Range(0,0,100,100);
   isfile<<"Landau ladder3";  
959    
960    t->SetTextFont(32);    t->SetTextFont(32);
961    t->SetTextColor(1);    t->SetTextColor(1);
# Line 459  void FTrkQLook_EXPERT(TString file,Int_t Line 970  void FTrkQLook_EXPERT(TString file,Int_t
970    isfile.str("");    isfile.str("");
971        
972    //****************************************************************************************    //****************************************************************************************
973    //Output figures --- Fourth sheet:    //Lighting of the views Output Pages
974    //****************************************************************************************    //****************************************************************************************
975    
976    TCanvas *IlluminaCanv=new TCanvas("Illuminazione","",900,1200);    isfile<<"lighting of the views";
977      IlluminaCanv=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
978    IlluminaCanv->SetFillColor(10);    IlluminaCanv->SetFillColor(10);
979    IlluminaCanv->Range(0,0,100,100);    IlluminaCanv->Range(0,0,100,100);
   isfile<<"lighting of the views";  
980    t->SetTextFont(32);    t->SetTextFont(32);
981    t->SetTextColor(1);    t->SetTextColor(1);
982    t->SetTextAlign(12);    t->SetTextAlign(12);
# Line 477  void FTrkQLook_EXPERT(TString file,Int_t Line 988  void FTrkQLook_EXPERT(TString file,Int_t
988    t1->SetTextSize(0.02);    t1->SetTextSize(0.02);
989    t1->DrawLatex(70.,98.7,isfile.str().c_str());    t1->DrawLatex(70.,98.7,isfile.str().c_str());
990    isfile.str("");    isfile.str("");
   
   //****************************************************************************************  
   //Output figures --- Fifth sheet:  
   //****************************************************************************************  
   
   TCanvas *TempCanv=new TCanvas("Tracker_Detector_Temperaturt","",900,1200);  
   TempCanv->SetFillColor(10);  
   TempCanv->Range(0,0,100,100);  
   isfile<<"Temperatures vs OBT";  
   
   t->SetTextFont(32);  
   t->SetTextColor(1);  
   t->SetTextAlign(12);  
   t->SetTextSize(0.02);  
   t->DrawLatex(2.,98.7,fromfile.str().c_str());  
   t1->SetTextFont(32);  
   t1->SetTextColor(1);  
   t1->SetTextAlign(12);  
   t1->SetTextSize(0.02);  
   t1->DrawLatex(80.,98.7,isfile.str().c_str());  
   isfile.str("");  
991        
992    //*************************************************************************************    //
993    //book pads and histos    // Draw the histos
   //***************************************************************************************  
   
   TPad *pad1[12],*pad2[12],*pad3[12],*pad4[12],*pad5[12],*pad6[5];          //pad for histos  
   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++) {  
       
     if ( (n+1)%2==1 ) {  
       if(n>1) posy = posy-(marg*2+hpad);  
       posx1 = marg;  
       posx0 = posx1 + wrel;  
     }  
     else {  
       posx1 = posx0 + 2*marg;  
       posx0 = posx1 + wrel;  
     }  
       
     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;  
     }  
   
   
     /* -----------> pad for histograms  */  
     pad1[n] = new TPad("pad1"," ",posx1,posy-hpad,posx0,posy,18,0,0);  
     pad2[n] = new TPad("pad2"," ",posx1,posy-hpad,posx0,posy,18,0,0);  
     pad3[n] = new TPad("pad3"," ",posx1,posy-hpad,posx0,posy,18,0,0);  
     pad4[n] = new TPad("pad4"," ",posx1,posy-hpad,posx0,posy,18,0,0);  
     pad5[n] = new TPad("pad5"," ",posx1,posy-hpad,posx0,posy,18,0,0);  
     if(n<5) pad6[n] = new TPad("pad6"," ",tposx1,tposy-thpad,tposx0,tposy,18,0,0);  
   
   
     /* -----------> HISTOGRAMS          */  
   
     oss1<<"DSP  "<<n+1;  
     oss2<<"DSPh  "<<n+1;  
     oss3<<"DSP h "<<n+1;  
     oss4<<"DSP   h"<<n+1;  
       
     landau1[n]=new TH1F(oss1.str().c_str(),oss1.str().c_str(),1200,0.5,1200.5);  
     landau1[n]->GetXaxis()->SetTitle("max signal");  
     landau1[n]->GetXaxis()->CenterTitle();  
     landau2[n]=new TH1F(oss2.str().c_str(),oss1.str().c_str(),1200,0.5,1200.5);  
     landau2[n]->GetXaxis()->SetTitle("max signal");  
     landau2[n]->GetXaxis()->CenterTitle();  
     landau3[n]=new TH1F(oss3.str().c_str(),oss1.str().c_str(),1200,0.5,1200.5);  
     landau3[n]->GetXaxis()->SetTitle("max signal");  
     landau3[n]->GetXaxis()->CenterTitle();  
   
     illuminazione[n]=new TH1F(oss4.str().c_str(),oss1.str().c_str(),3072,0.5,3072.5);  
     illuminazione[n]->GetXaxis()->SetTitle("strip with max signal");  
     illuminazione[n]->GetXaxis()->CenterTitle();  
   
     oss1.str("");  
     oss2.str("");  
     oss3.str("");  
     oss4.str("");  
   };              
     
   
   //**********************************************************************************  
   // Fill Graphs and Histos  
   //**********************************************************************************  
   
994    for (Int_t i=0; i<12 ; i++){    for (Int_t i=0; i<12 ; i++){
995            
996      for (Int_t ev=minevent; ev<maxevent; ev++){      TBox b;
997        yyc[(ev-minevent)]=yc[12*(ev-minevent)+i];  
998        landau1[i]->Fill(land[12*(ev-minevent)+i][1]);      Float_t maxhist=0;
       landau2[i]->Fill(land[12*(ev-minevent)+i][2]);  
       landau3[i]->Fill(land[12*(ev-minevent)+i][3]);  
       for(Int_t j=0;j<3;j++){  
         hi=(j*1024)+illum[12*(ev-minevent)+i][j];  
         illuminazione[i]->Fill(hi);  
       }  
     }  
       
999      LandauCanv1->cd();      LandauCanv1->cd();
1000      pad1[i]->SetFillColor(10);      pad1[i]->SetFillColor(10);
1001      pad1[i]->SetFrameFillColor(10);      pad1[i]->SetFrameFillColor(10);
1002      pad1[i]->Draw();      pad1[i]->Draw();
1003      pad1[i]->cd();      pad1[i]->cd();
1004        landau1[i]->GetXaxis()->SetTitle("max signal");
1005        landau1[i]->GetXaxis()->CenterTitle();
1006      landau1[i]->Draw("");      landau1[i]->Draw("");
1007        LandauCanv1->Update();
1008    
1009      LandauCanv2->cd();      LandauCanv2->cd();
1010      pad4[i]->SetFillColor(10);      pad4[i]->SetFillColor(10);
1011      pad4[i]->SetFrameFillColor(10);      pad4[i]->SetFrameFillColor(10);
1012      pad4[i]->Draw();      pad4[i]->Draw();
1013      pad4[i]->cd();      pad4[i]->cd();
1014        landau2[i]->GetXaxis()->SetTitle("max signal");
1015        landau2[i]->GetXaxis()->CenterTitle();
1016      landau2[i]->Draw("");      landau2[i]->Draw("");
1017        LandauCanv2->Update();
1018    
1019      LandauCanv3->cd();      LandauCanv3->cd();
1020      pad5[i]->SetFillColor(10);      pad5[i]->SetFillColor(10);
1021      pad5[i]->SetFrameFillColor(10);      pad5[i]->SetFrameFillColor(10);
1022      pad5[i]->Draw();      pad5[i]->Draw();
1023      pad5[i]->cd();      pad5[i]->cd();
1024        landau3[i]->GetXaxis()->SetTitle("max signal");
1025        landau3[i]->GetXaxis()->CenterTitle();
1026      landau3[i]->Draw("");      landau3[i]->Draw("");
1027        LandauCanv3->Update();
1028    
1029      IlluminaCanv->cd();      IlluminaCanv->cd();
1030      pad2[i]->SetFillColor(10);      pad2[i]->SetFillColor(10);
1031      pad2[i]->SetFrameFillColor(10);      pad2[i]->SetFrameFillColor(10);
1032        pad2[i]->SetLogy();
1033      pad2[i]->Draw();      pad2[i]->Draw();
1034      pad2[i]->cd();      pad2[i]->cd();
1035      pad2[i]->SetLogy();      illuminazione[i]->GetXaxis()->SetTitle("strip with max signal");
1036      illuminazione [i]->SetStats(kFALSE);      illuminazione[i]->GetXaxis()->CenterTitle();
1037      illuminazione[i]->Draw("");      illuminazione[i]->Draw("");
1038        if(i==1){
1039      CompTimeCanv->cd();        maxhist= illuminazione[i]->GetMaximum();
1040      pad3[i]->SetFillColor(10);        b.SetFillColor(6);
1041      pad3[i]->SetFrameFillColor(10);        b.SetFillStyle(3945);
1042      pad3[i]->Draw();        b.DrawBox(2944.,0.,3060.,maxhist);
1043      pad3[i]->cd();  
1044      comprtime= new TGraph(nevent,x,yyc);        b.SetFillColor(107);
1045      oss1<<"DSP  "<<i+1;        b.SetFillStyle(3954);
1046      comprtime->SetTitle(oss1.str().c_str());        b.DrawBox(2816.,0.,2944.,maxhist);
1047      comprtime->GetXaxis()->SetTitle("OBT (ms)");        b.DrawBox(2048.,0.,2176.,maxhist);
1048      comprtime->GetXaxis()->CenterTitle();      }
1049      comprtime->GetYaxis()->SetTitle("compressiontime (ms)");      else if(i==6){
1050      comprtime->GetYaxis()->CenterTitle();        maxhist= illuminazione[i]->GetMaximum();
1051      comprtime->GetYaxis()->SetRangeUser(0,2);        b.SetFillColor(6);
1052      comprtime->Draw("ap");        b.SetFillStyle(3945);
1053      oss1.str("");        b.DrawBox(2560.,0.,2816.,maxhist);
1054    };        b.DrawBox(1024.,0.,1792.,maxhist);
1055      
1056    EventNumCanv->cd();        b.SetFillColor(107);
1057    TPad *pt0=new TPad("pt0"," ",0.704,0.004,0.996,0.98);        b.SetFillStyle(3954);
1058    pt1 = new TPaveText(0.004,0.004,0.986,0.996);        b.DrawBox(512.,0.,768.,maxhist);
1059    pt = new TPad("pt"," ",0.004,0.004,0.7,0.98,18,0,0);      }
1060    pt1->SetFillColor(10);      else if(i==7){
1061    pt1->ReadFile(out + "warning.txt");        maxhist= illuminazione[i]->GetMaximum();
1062    pt1->SetTextAlign(22);        b.SetFillColor(107);
1063    pt1->SetTextSize(0.035);        b.SetFillStyle(3954);
1064    pt0->SetFillColor(10);        b.DrawBox(512.,0.,768.,maxhist);
1065    pt0->SetFrameFillColor(10);      }
1066    pt0->Draw();      else if(i==11){
1067    pt0->cd();        maxhist= illuminazione[i]->GetMaximum();
1068    pt1->Draw();        b.SetFillColor(6);
1069    EventNumCanv->cd();        b.SetFillStyle(3945);
1070    pt->SetFillColor(10);        b.DrawBox(768.,0.,1024.,maxhist);
1071    pt->SetFrameFillColor(10);  
1072    pt->Draw();        b.SetFillColor(107);
1073    pt->cd();        b.SetFillStyle(3954);
1074    eventnumb=new TGraph(nevent,x,eventint);        b.DrawBox(0.,0.,512.,maxhist);
1075    eventnumb->SetTitle("");        b.DrawBox(1920.,0.,2048.,maxhist);
1076    eventnumb->GetXaxis()->SetLabelSize(0.04);      }
1077    eventnumb->GetXaxis()->SetTitleSize(0.04);      IlluminaCanv->Update();
   eventnumb->GetXaxis()->SetTitle("OBT (ms)");  
   eventnumb->GetXaxis()->CenterTitle();  
   eventnumb->GetXaxis()->SetTickLength(0.01);  
   eventnumb->GetXaxis()->SetTitleOffset(1.2);  
   eventnumb->GetYaxis()->SetLabelSize(0.04);  
   eventnumb->GetYaxis()->SetTitleSize(0.04);  
   eventnumb->GetYaxis()->SetTitle("DSP event-number");  
   eventnumb->GetYaxis()->CenterTitle();  
   eventnumb->GetYaxis()->SetTitleOffset(1.5);  
   eventnumb->SetMarkerStyle(21);  
   eventnumb->SetMarkerColor(kBlue);  
   eventnumb->SetMarkerSize(0.3);  
   eventnumb->Draw("ap");  
   
   for(Int_t i=0; i<5; i++){  
     for (Int_t ev=0; ev<tsize; ev++){  
       tempt_tmp[ev]=(Int_t)(((3.3*tempt[ev][i]/4096)-0.586)/0.0231);  
     }  
     TempCanv->cd();  
     tit<<"T"<<i+5<<" (magnetic module "<<i+1<<")";  
     pad6[i]->SetFillColor(10);  
     pad6[i]->Draw();  
     pad6[i]->cd();  
     temp[i]= new TGraph(tsize,xt,tempt_tmp);  
     temp[i]->SetTitle(tit.str().c_str());  
     temp[i]->GetXaxis()->SetLabelSize(0.04);  
     temp[i]->GetXaxis()->SetTitleSize(0.04);  
     temp[i]->GetXaxis()->SetTitle("OBT (ms)");  
     temp[i]->GetXaxis()->CenterTitle();  
     temp[i]->GetXaxis()->SetTitleOffset(0.85);  
     temp[i]->GetYaxis()->SetTitleOffset(1.2);  
     temp[i]->GetYaxis()->SetLabelOffset(0.001);  
     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("");  
1078    }    }
1079    CompTimeCanv->Update();  
   LandauCanv1->Update();  
   LandauCanv2->Update();  
   LandauCanv3->Update();  
   IlluminaCanv->Update();  
   TempCanv->Update();  
     
1080    printf("... end of packets. \n");    printf("... end of packets. \n");
1081    
1082    //*************************************************************************    //*************************************************************************
1083    // Save output Files    // Save output Files
1084    //*************************************************************************    //*************************************************************************
1085    stringstream out1,out2,out3,command;    stringstream out1,out2,out3,command;
1086        Int_t totpg=0;
1087    if(!strcmp(outfile.Data(),"ps")||!strcmp(outfile.Data(),"pdf")){    if(cntpgtemp>cntpgdat) totpg=cntpgtemp;
1088      out1.str("");    else if(cntpgtemp<=cntpgdat) totpg=cntpgdat;
1089      out2.str("");  
1090      out3.str("");    for(Int_t fl=0;fl<totpg;fl++){
1091            if(!strcmp(outfile.Data(),"ps")||!strcmp(outfile.Data(),"pdf")){
1092      out1<<ffile<<"_FTrkQLook_EXPERT.ps(";        out1.str("");
1093      out2<<ffile<<"_FTrkQLook_EXPERT.ps";        out2.str("");
1094      out3<<ffile<<"_FTrkQLook_EXPERT.ps)";        out3.str("");
1095              
1096      CompTimeCanv->Print(out+out1.str().c_str(),"Portrait");        out1<<ffile<<"_FTrkQLook_EXPERT.ps(";
1097      EventNumCanv->Print(out+out2.str().c_str(),"Portrait");        out2<<ffile<<"_FTrkQLook_EXPERT.ps";
1098      LandauCanv1->Print(out+out2.str().c_str(),"Portrait");        out3<<ffile<<"_FTrkQLook_EXPERT.ps)";
     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");  
1099            
1100      if(!strcmp(outfile.Data(),"pdf")){        if(totpg==1){
1101        stringstream com;          CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");
1102        com<<"ps2pdf13 "<<out<<ffile<<"_FTrkQLook_EXPERT.ps "<<out<<ffile<<"_FTrkQLook_EXPERT.pdf";          EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1103        system(com.str().c_str());          TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1104        printf("\n---> ps file converted in pdf format!\n");          BfieldCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1105        com.str("");          LandauCanv1->Print(out+out2.str().c_str(),"Portrait");
1106        com<<"rm -f "<<out<<ffile<<"_FTrkQLook_EXPERT.ps ";          LandauCanv2->Print(out+out2.str().c_str(),"Portrait");
1107        system(com.str().c_str());          LandauCanv3->Print(out+out2.str().c_str(),"Portrait");
1108        printf("---> ps file removed!\n\n");          IlluminaCanv->Print(out+out3.str().c_str(),"Portrait");
1109        com.str("");        }
1110          else if(totpg>1){
1111            if(fl==0) CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");
1112            if(fl>0 && fl<cntpgdat) CompTimeCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1113            if(fl<cntpgdat) EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1114            if(fl<cntpgmag) BfieldCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1115            if(fl<cntpgtemp) TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1116            if(fl==totpg-1){
1117              LandauCanv1->Print(out+out2.str().c_str(),"Portrait");
1118              LandauCanv2->Print(out+out2.str().c_str(),"Portrait");
1119              LandauCanv3->Print(out+out2.str().c_str(),"Portrait");
1120              IlluminaCanv->Print(out+out3.str().c_str(),"Portrait");
1121            }
1122          }
1123      }      }
1124        else{
1125          out1.str("");
1126          out1<<ffile<<"_FTrkQLook_EXPERT-CompTime-pag"<<fl+1<<"."<<outfile.Data();
1127          if(fl<cntpgdat) CompTimeCanv[fl]->Print(out+out1.str().c_str());
1128          out1.str("");
1129          out1<<ffile<<"_FTrkQLook_EXPERT-BField-pag"<<fl+1<<"."<<outfile.Data();
1130          if(fl<cntpgmag) BfieldCanv[fl]->Print(out+out1.str().c_str());
1131          out1.str("");
1132          out1<<ffile<<"_FTrkQLook_EXPERT-Temp-pag"<<fl+1<<"."<<outfile.Data();
1133          if(fl<cntpgtemp) TempCanv[fl]->Print(out+out1.str().c_str());
1134          out1.str("");
1135          out1<<ffile<<"_FTrkQLook_EXPERT-EvNum-pag"<<fl+1<<"."<<outfile.Data();
1136          if(fl<cntpgdat) EventNumCanv[fl]->Print(out+out1.str().c_str());
1137          if(fl==totpg-1){
1138            out1.str("");
1139            out1<<ffile<<"_FTrkQLook_EXPERT-LandauL1."<<outfile.Data();
1140            LandauCanv1->Print(out+out1.str().c_str());
1141            out1.str("");
1142            out1<<ffile<<"_FTrkQLook_EXPERT-LandauL2."<<outfile.Data();
1143            LandauCanv2->Print(out+out1.str().c_str());
1144            out1.str("");
1145            out1<<ffile<<"_FTrkQLook_EXPERT-LandauL3."<<outfile.Data();
1146            LandauCanv3->Print(out+out1.str().c_str());
1147            out1.str("");
1148            out1<<ffile<<"_FTrkQLook_EXPERT-Lighting."<<outfile.Data();
1149            IlluminaCanv->Print(out+out1.str().c_str());
1150          }
1151        }
1152      }  
1153    
1154      //
1155      // Convert ps to pdf if required
1156      if(!strcmp(outfile.Data(),"pdf")){
1157        stringstream com;
1158        com<<"ps2pdf13 "<<out<<ffile<<"_FTrkQLook_EXPERT.ps "<<out<<ffile<<"_FTrkQLook_EXPERT.pdf";
1159        system(com.str().c_str());
1160        printf("\n---> ps file converted in pdf format!\n");
1161        com.str("");
1162        com<<"rm -f "<<out<<ffile<<"_FTrkQLook_EXPERT.ps ";
1163        system(com.str().c_str());
1164        printf("---> ps file removed!\n\n");
1165        com.str("");
1166    }    }
   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());  
   }  
   
   command.str("");  
   command<<"rm -f "<<out<<"warning.txt";  
   system(command.str().c_str());  
1167    
1168    gROOT->Reset();    gROOT->Reset();
1169    return;    return;
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.12
  ViewVC Help
Powered by ViewVC 1.1.23