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

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

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

revision 1.7 by pam-fi, Thu Jun 8 17:03:57 2006 UTC revision 1.17 by pam-fi, Mon Feb 26 16:41:05 2007 UTC
# Line 1  Line 1 
1  /**  /**
2   * FTrkQLook_BASIC.cpp   * FTrkQLook_BASIC.cxx
3   *   *
4   * autor: D.Fedele   * autor: D.Fedele
5   * version 3.0   * version v1r11
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 17  Line 17 
17  #include <TCanvas.h>  #include <TCanvas.h>
18  #include <TGraph.h>  #include <TGraph.h>
19  #include <TStyle.h>  #include <TStyle.h>
20    #include <TFile.h>
21  #include <TTree.h>  #include <TTree.h>
22  #include <TArrow.h>  #include <TArrow.h>
23  //  //
# Line 29  Line 30 
30  //  //
31  #define MAXSTORAGE 50000  #define MAXSTORAGE 50000
32    
 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);  
     };  
 };  
   
   
33  void FTrkQLook_BASIC(TString file,Int_t fromevent,Int_t toevent, TString outdir,TString outfile)  void FTrkQLook_BASIC(TString file,Int_t fromevent,Int_t toevent, TString outdir,TString outfile)
34  {    {  
35    //    //
36    //   obtain information about the data file and select the output dir    //   obtain information about the data file and select the output dir
37    const string filepath=file.Data();    Int_t dwpos = file.Last('/');
38    Int_t dwpos = filepath.rfind("/");    Int_t dwpos1 = file.Last('.');
   Int_t dwpos1 = filepath.find(".root");  
   TString fpath=(filepath.c_str());  
39    TString base,ffile ;    TString base,ffile ;
40    stringcopy(ffile,fpath,dwpos+1,dwpos1);    ffile=file(dwpos+1,dwpos1-(dwpos+1));
41    stringcopy(base,fpath,0,dwpos);    if(dwpos>0) base=file(0,dwpos);
   if(dwpos>0) base+="/";  
42    
43    TString out;    TString out;
44    if(outdir.Length()==0){    if(outdir.Length()==0){
# Line 60  void FTrkQLook_BASIC(TString file,Int_t Line 46  void FTrkQLook_BASIC(TString file,Int_t
46    }else{    }else{
47      out = outdir;      out = outdir;
48    }    }
49      if(out.Last('/')+1<out.Length()) out+="/";
50        
51    //    //
52    // inizialise the variables and open the file    // inizialise the variables and open the file
# Line 116  void FTrkQLook_BASIC(TString file,Int_t Line 103  void FTrkQLook_BASIC(TString file,Int_t
103      } else if (toevent > nevent) {              } else if (toevent > nevent) {        
104        maxevent = nevent;        maxevent = nevent;
105      } else {            } else {      
106        maxevent = toevent+1;          maxevent = nevent;  
107      }      }
108      nevent=maxevent-minevent ;      nevent=maxevent-minevent ;
109    }    }
# Line 126  void FTrkQLook_BASIC(TString file,Int_t Line 113  void FTrkQLook_BASIC(TString file,Int_t
113    stringstream oss,fromfile,isfile;    stringstream oss,fromfile,isfile;
114    //    //
115    // information about the RunHeader    // information about the RunHeader
116    Int_t HOBT[neventH];    ULong64_t HOBT[neventH];
117    Int_t trk_cal_us[neventH];    Int_t trk_cal_us[neventH];
118    for (Int_t vi=0; vi<neventH;vi++){    for (Int_t vi=0; vi<neventH;vi++){
119      HOBT[vi]=0;      HOBT[vi]=0;
# Line 144  void FTrkQLook_BASIC(TString file,Int_t Line 131  void FTrkQLook_BASIC(TString file,Int_t
131      if((HOBT[ev]<HOBT[ev-1]) && ev>0)      if((HOBT[ev]<HOBT[ev-1]) && ev>0)
132        countnboot+=1;        countnboot+=1;
133    }    }
134    countnboot+=2*(Int_t)nevent/MAXSTORAGE;    countnboot+=(Int_t)(2*nevent/MAXSTORAGE);
135    //  printf("\ncountnboot=%d\n",countnboot);    //  printf("\ncountnboot=%d\n",countnboot);
136    
137    //    //
138    // information about calibration OBT    // information about calibration OBT
139    Int_t COBT[neventC];    ULong64_t COBT[neventC];
140    for (Int_t vi=0; vi<neventC;vi++){    for (Int_t vi=0; vi<neventC;vi++){
141      COBT[vi]=0;      COBT[vi]=0;
142    }    }
# Line 273  void FTrkQLook_BASIC(TString file,Int_t Line 260  void FTrkQLook_BASIC(TString file,Int_t
260      t2->SetTextSize(0.08);      t2->SetTextSize(0.08);
261    
262      Int_t i=0;      Int_t i=0;
263      Float_t  x[MAXSTORAGE], xb[MAXSTORAGE];      Long64_t  x[MAXSTORAGE], xb[MAXSTORAGE];
264      Float_t yyd[MAXSTORAGE][12],yyb[MAXSTORAGE][12];      Float_t yyd[MAXSTORAGE][12],yyb[MAXSTORAGE][12];
265      Int_t countbad[12];      Int_t countbad[12];
266      Float_t perc=0,xMIN=0.,xMAX=0.;      Float_t perc=0;
267        Double_t xMIN=0.,xMAX=0.;
268      for (Int_t n=0; n<12 ; n++)      for (Int_t n=0; n<12 ; n++)
269        countbad[n]=0;        countbad[n]=0;
270    
# Line 309  void FTrkQLook_BASIC(TString file,Int_t Line 297  void FTrkQLook_BASIC(TString file,Int_t
297          x[(ev-minev)]= ph->GetOrbitalTime();          x[(ev-minev)]= ph->GetOrbitalTime();
298          i=0;          i=0;
299                
300          for (Int_t n=0; n<12 ; n++){          for (Int_t n=0; n<12 ; n++){
301            yyb[countbad[n]][i]=0;            i=te->DSPnumber[n]-1;
302            xb[countbad[n]]= 0;            if(i>=0){
303                        if(i<12){
304            i=te->DSPnumber[n]-1;                yyb[countbad[i]][i]=0;
305                          xb[countbad[i]]= 0;
306            yyd[(ev-minev)][i]=te->DATAlength[n];                
307            if(i==6){                yyd[(ev-minev)][i]=te->DATAlength[n];
308              if(yyd[(ev-minev)][i]>1500){                if(i==6){
309                if(yyd[(ev-minev)][i]<3075){                  if(yyd[(ev-minev)][i]>1500){
310                  yyb[countbad[i]][i]= yyd[(ev-minev)][i];                    if(yyd[(ev-minev)][i]<3075){
311                  xb[countbad[i]]= x[(ev-minev)];                      yyb[countbad[i]][i]= yyd[(ev-minev)][i];
312                  countbad[i]+=1;                      xb[countbad[i]]= x[(ev-minev)];
313                        countbad[i]+=1;
314                      }
315                    }
316                }                }
317              }                else{
318            }                  if(yyd[(ev-minev)][i]>750){
319            else{                    if(yyd[(ev-minev)][i]<3075){
320              if(yyd[(ev-minev)][i]>750){                      yyb[countbad[i]][i]= yyd[(ev-minev)][i];
321                if(yyd[(ev-minev)][i]<3075){                      xb[countbad[i]]= x[(ev-minev)];
322                  yyb[countbad[i]][i]= yyd[(ev-minev)][i];                      countbad[i]+=1;
323                  xb[countbad[i]]= x[(ev-minev)];                    }
324                  countbad[i]+=1;                  }
325                }                }
326              }              }
327            }            }
328          }          }      
329        }        }
330      }      }
331            
# Line 343  void FTrkQLook_BASIC(TString file,Int_t Line 334  void FTrkQLook_BASIC(TString file,Int_t
334    
335      xMAX=x[maxev-minev-1]+(x[maxev-minev-1]-x[0])/10;      xMAX=x[maxev-minev-1]+(x[maxev-minev-1]-x[0])/10;
336      if(xMAX>1000000) xMIN=x[0]-(x[maxev-minev-1]-x[0])/10;      if(xMAX>1000000) xMIN=x[0]-(x[maxev-minev-1]-x[0])/10;
337      if(xMAX<1000000 || xMIN<0) xMIN=0.;            if(xMAX<1000000 || xMIN<0) xMIN=0.;    
338        if(xMIN==xMAX) xMIN=x[0] * x[0]/xMAX;    
339                    
340            
341      //      //
342      // Draw Histos      // Draw Histos
343      for (Int_t i=0; i<12 ; i++){      for (Int_t n=0; n<12 ; n++){
344            
345        Float_t y[maxev-minev],yb[maxev-minev];        Double_t yd[maxev-minev],ybd[maxev-minev];
346          Double_t xd[maxev-minev],xbd[maxev-minev];
347    
348        for(Int_t v=0;v<maxev-minev;v++){        for(Int_t v=0;v<maxev-minev;v++){
349          y[v]=yyd[v][i];          yd[v]=(Double_t)yyd[v][n];
350          yb[v]=yyb[v][i];          ybd[v]=(Double_t)yyb[v][n];
351            xd[v]=(Double_t)x[v];
352            xbd[v]=(Double_t)xb[v];
353        }        }
354                
355        if(xMAX<1000000){        if(xMAX<1000000){
356          x[maxev-minev-1]=0.;          xd[maxev-minev-1]=0;
357          y[maxev-minev-1]=0.;          yd[maxev-minev-1]=0.;
358        }        }
359    
360        if((maxev-minev)>1000){        if((maxev-minev)>1000){
361          perc=(countbad[i]*100)/(maxev-minev);          perc=(countbad[n]*100)/(maxev-minev);
362          if(perc>10) pad[i][ii]->SetFillColor(2);          if(perc>10) pad[n][ii]->SetFillColor(2);
363          else  pad[i][ii]->SetFillColor(10);          else  pad[n][ii]->SetFillColor(10);
364            
365        }        }
366        else{        else{
367          if(countbad[i]>=100) pad[i][ii]->SetFillColor(2);          if(countbad[n]>=100) pad[n][ii]->SetFillColor(2);
368          else pad[i][ii]->SetFillColor(10);          else pad[n][ii]->SetFillColor(10);
369        }        }
370    
371        oss<<"DSP  "<<i+1;        oss<<"DSP  "<<n+1;
372        DataTimeCanv[ii]->cd();        DataTimeCanv[ii]->cd();
373        pad[i][ii]->SetFrameFillColor(10);        pad[n][ii]->SetFrameFillColor(10);
374        pad[i][ii]->Draw();        pad[n][ii]->Draw();
375        pad[i][ii]->cd();        pad[n][ii]->cd();
376        dataletime[i][ii]= new TGraph((maxev-minev),x,y);        dataletime[n][ii]= new TGraph((maxev-minev),xd,yd);
377        dataletime[i][ii]->SetTitle(oss.str().c_str());        if(maxev-minev==1) dataletime[n][ii]->GetXaxis()->SetNdivisions(-501);
378        dataletime[i][ii]->GetXaxis()->SetTitle("OBT (ms)");        dataletime[n][ii]->SetTitle(oss.str().c_str());
379        dataletime[i][ii]->GetXaxis()->CenterTitle();        dataletime[n][ii]->GetXaxis()->SetTitle("OBT (ms)");
380        dataletime[i][ii]->GetXaxis()->SetRangeUser(xMIN,xMAX);        dataletime[n][ii]->GetXaxis()->CenterTitle();
381        dataletime[i][ii]->GetYaxis()->SetTitle("datalength (Word 13 bit)");        dataletime[n][ii]->GetXaxis()->SetRangeUser(xMIN,xMAX);
382        dataletime[i][ii]->GetYaxis()->CenterTitle();        dataletime[n][ii]->GetYaxis()->SetTitle("datalength (Word 13 bit)");
383        if(i==6) dataletime[i][ii]->GetYaxis()->SetRangeUser(0,4500);        dataletime[n][ii]->GetYaxis()->CenterTitle();
384        else dataletime[i][ii]->GetYaxis()->SetRangeUser(0,4000);        if(i==6) dataletime[n][ii]->GetYaxis()->SetRangeUser(0,4500);
385        dataletime[i][ii]->SetMarkerStyle(21);        else dataletime[n][ii]->GetYaxis()->SetRangeUser(0,4000);
386        if((maxev-minev)<50) dataletime[i][ii]->SetMarkerSize(0.5);        dataletime[n][ii]->SetMarkerStyle(21);
387        else dataletime[i][ii]->SetMarkerSize(0.3);        if((maxev-minev)<50) dataletime[n][ii]->SetMarkerSize(0.5);
388        dataletime[i][ii]->SetMarkerColor(4);        else dataletime[n][ii]->SetMarkerSize(0.1);
389        dataletime[i][ii]->Draw("ap");        dataletime[n][ii]->SetMarkerColor(4);
390          dataletime[n][ii]->Draw("ap");
391    
392    
393        if((maxev-minev)>1000 && perc>10){        if((maxev-minev)>1000 && perc>10){
394          dataletime1[i][ii]= new TGraph(countbad[i],xb,yb);          dataletime1[n][ii]= new TGraph(countbad[n],xbd,ybd);
395          dataletime1[i][ii]->SetMarkerStyle(21);          dataletime1[n][ii]->SetMarkerStyle(21);
396          if((maxev-minev)<50) dataletime1[i][ii]->SetMarkerSize(0.5);          dataletime1[n][ii]->SetMarkerSize(0.1);
397          else dataletime1[i][ii]->SetMarkerSize(0.3);          dataletime1[n][ii]->SetMarkerColor(2);
398          dataletime1[i][ii]->SetMarkerColor(2);          dataletime1[n][ii]->Draw("psame");
399          dataletime1[i][ii]->Draw("psame");        }
400        }        else if((maxev-minev)<1000 && countbad[n]>=100){
401        else if((maxev-minev)<1000 && countbad[i]>=100){          dataletime1[n][ii]= new TGraph(countbad[n],xbd,ybd);
402          dataletime1[i][ii]= new TGraph(countbad[i],xb,yb);          dataletime1[n][ii]->SetMarkerStyle(21);
403          dataletime1[i][ii]->SetMarkerStyle(21);          if((maxev-minev)<50) dataletime1[n][ii]->SetMarkerSize(0.5);
404          if((maxev-minev)<50) dataletime1[i][ii]->SetMarkerSize(0.5);          else dataletime1[n][ii]->SetMarkerSize(0.1);
405          else dataletime1[i][ii]->SetMarkerSize(0.3);          dataletime1[n][ii]->SetMarkerColor(2);
406          dataletime1[i][ii]->SetMarkerColor(2);          dataletime1[n][ii]->Draw("psame");
         dataletime1[i][ii]->Draw("psame");  
407        }        }
408        li.SetLineColor(1);        li.SetLineColor(1);
409        li.SetLineStyle(1);        li.SetLineStyle(1);
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.17
  ViewVC Help
Powered by ViewVC 1.1.23