/[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.12 by pam-fi, Fri Aug 11 10:24:09 2006 UTC revision 1.18 by pam-fi, Mon Oct 2 13:05:39 2006 UTC
# Line 2  Line 2 
2   * FTrkQLook_EXPERT.cxx   * FTrkQLook_EXPERT.cxx
3   *   *
4   * autor: D.Fedele   * autor: D.Fedele
5   * version v1r08   * version v1r14
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 136  void FTrkQLook_EXPERT(TString file,Int_t Line 136  void FTrkQLook_EXPERT(TString file,Int_t
136      } else if (toevent > nevent) {              } else if (toevent > nevent) {        
137        maxevent = nevent;        maxevent = nevent;
138      } else {            } else {      
139        maxevent = toevent+1;          maxevent = nevent;  
140      }      }
141      nevent=maxevent-minevent ;      nevent=maxevent-minevent ;
142    }    }
# Line 145  void FTrkQLook_EXPERT(TString file,Int_t Line 145  void FTrkQLook_EXPERT(TString file,Int_t
145    // information about the RunHeader    // information about the RunHeader
146    ULong64_t HOBT[neventH];    ULong64_t HOBT[neventH];
147    Int_t trk_cal_us[neventH];    Int_t trk_cal_us[neventH];
148      Int_t countnboot=1;
149    for (Int_t vi=0; vi<neventH;vi++){    for (Int_t vi=0; vi<neventH;vi++){
150      HOBT[vi]=0;      HOBT[vi]=0;
151      trk_cal_us[vi]=0;      trk_cal_us[vi]=0;
# Line 154  void FTrkQLook_EXPERT(TString file,Int_t Line 155  void FTrkQLook_EXPERT(TString file,Int_t
155      pH = eH->GetPscuHeader();      pH = eH->GetPscuHeader();
156      HOBT[ev]= pH->GetOrbitalTime();      HOBT[ev]= pH->GetOrbitalTime();
157      trk_cal_us[ev]=reh->TRK_CALIB_USED;      trk_cal_us[ev]=reh->TRK_CALIB_USED;
158        if((HOBT[ev]<HOBT[ev-1]) && ev>0)
159          countnboot+=1;
160    }    }
161      countnboot+=(Int_t)(2*nevent/MAXSTORAGE);
162      //   printf("\ncountnboot=%d\n",countnboot);
163      
164    //    //
165    // other variables definitions    // other variables definitions
166    stringstream oss1,oss2,oss3,oss4,fromfile,isfile,tit;    stringstream oss1,oss2,oss3,oss4,fromfile,isfile,tit;
# Line 174  void FTrkQLook_EXPERT(TString file,Int_t Line 179  void FTrkQLook_EXPERT(TString file,Int_t
179    Int_t tempt[tsize][5];    Int_t tempt[tsize][5];
180    ULong64_t xt[tsize];    ULong64_t xt[tsize];
181    
182    Int_t countnboot=1;    Int_t cntpgtemp=1,cntpgdat=0,cntpgmag=0;
   Int_t cntpgtemp=0,cntpgdat=0,cntpgmag=0;  
183    //    //
184    // information about the temperatures    // information about the temperatures
185    for (Int_t ev=0; ev<tnevent; ev++){    for (Int_t ev=0; ev<tnevent; ev++){
# Line 185  void FTrkQLook_EXPERT(TString file,Int_t Line 189  void FTrkQLook_EXPERT(TString file,Int_t
189        record = (pamela::TsbTRecord*)event->Records->At(j);        record = (pamela::TsbTRecord*)event->Records->At(j);
190        xt[siztmp]=record->RECORD_OBT;        xt[siztmp]=record->RECORD_OBT;
191        if((xt[siztmp]<xt[siztmp-1]) && siztmp>0)        if((xt[siztmp]<xt[siztmp-1]) && siztmp>0)
192          countnboot+=1;          cntpgtemp+=1;
193                
194        for (Int_t z = 0; z < 5; z++){        for (Int_t z = 0; z < 5; z++){
195          tempt[siztmp][z] = record->TEMPERATURES[z+1];              tempt[siztmp][z] = record->TEMPERATURES[z+1];    
# Line 193  void FTrkQLook_EXPERT(TString file,Int_t Line 197  void FTrkQLook_EXPERT(TString file,Int_t
197        siztmp++;        siztmp++;
198      }      }
199    }    }
200    cntpgtemp=countnboot;    
   countnboot+=2+(Int_t)nevent/MAXSTORAGE;  
   //   printf("\ncountnboot=%d\n",countnboot);  
   
201    //    //
202    // information about the entries for the magnetic field    // information about the entries for the magnetic field
203    if(bnevent>0) cntpgmag=1;    if(bnevent>0) cntpgmag=1;
# Line 261  void FTrkQLook_EXPERT(TString file,Int_t Line 262  void FTrkQLook_EXPERT(TString file,Int_t
262        alarm1 << "================================================="<< endl<<endl;        alarm1 << "================================================="<< endl<<endl;
263                    
264        alarm1 << "Alarm variables (range 0-1)"<<endl;        alarm1 << "Alarm variables (range 0-1)"<<endl;
265        alarm1 << " ALARM[1]= 0x"<< hex << (Int_t)al->ALARM[1]<<endl;        alarm1 << " ALARM[1]= 0x"<< hex << (Int_t)al->ALARM[0]<<endl;
266        alarm1 << " ALARM[2]= 0x"<< (Int_t)al->ALARM[2]<<endl;        alarm1 << " ALARM[2]= 0x"<< (Int_t)al->ALARM[1]<<endl;
267        alarm1 << " CmdDuringTrig= 0x"<< (Int_t)al->CmdDuringTrig<<endl;        alarm1 << " CmdDuringTrig= 0x"<< (Int_t)al->CmdDuringTrig<<endl;
268        alarm1 << " FinalCheck= 0x"<< (Int_t)al->FinalCheck<<endl;        alarm1 << " FinalCheck= 0x"<< (Int_t)al->FinalCheck<<endl;
269        alarm1 << " FlashData= 0x"<< (Int_t)al->FlashData<<endl;        alarm1 << " FlashData= 0x"<< (Int_t)al->FlashData<<endl;
# Line 365  void FTrkQLook_EXPERT(TString file,Int_t Line 366  void FTrkQLook_EXPERT(TString file,Int_t
366    
367        
368    Int_t minev=minevent,maxev=maxevent,countTEMP=0,countMAG=0;    Int_t minev=minevent,maxev=maxevent,countTEMP=0,countMAG=0;
369      ULong_t countALARMx=0,countALARMy=0;
370    
371    //    //
372    // Fill temperature graphs    // Fill temperature graphs
# Line 434  void FTrkQLook_EXPERT(TString file,Int_t Line 436  void FTrkQLook_EXPERT(TString file,Int_t
436        Double_t xt_tmpw[tsize], tempt_tmpw[tsize];        Double_t xt_tmpw[tsize], tempt_tmpw[tsize];
437        for (Int_t ev=countTEMP; ev<tsize; ev++){        for (Int_t ev=countTEMP; ev<tsize; ev++){
438                
439          if(ev==tsize-1 && i==4) countTEMP=tsize-1;          if(ev==tsize-1 && i==4 && ii==cntpgtemp-1) countTEMP=tsize-1;
440          if(xt[ev]<xt[ev-1] && ev>countTEMP){          if(xt[ev]<xt[ev-1] && ev>countTEMP){
441            if(i==4) countTEMP=ev;            if(i==4) countTEMP=ev;
442            break;            break;
# Line 461  void FTrkQLook_EXPERT(TString file,Int_t Line 463  void FTrkQLook_EXPERT(TString file,Int_t
463        pad6[i]->cd();        pad6[i]->cd();
464        temp[i][ii]= new TGraph(v,xt_tmp,tempt_tmp);        temp[i][ii]= new TGraph(v,xt_tmp,tempt_tmp);
465        temp[i][ii]->SetTitle(tit.str().c_str());        temp[i][ii]->SetTitle(tit.str().c_str());
466          if(v==1) temp[i][ii]->GetXaxis()->SetNdivisions(502,kTRUE);
467        temp[i][ii]->GetXaxis()->SetLabelSize(0.04);        temp[i][ii]->GetXaxis()->SetLabelSize(0.04);
468        temp[i][ii]->GetXaxis()->SetTitleSize(0.04);        temp[i][ii]->GetXaxis()->SetTitleSize(0.04);
469        temp[i][ii]->GetXaxis()->SetTitle("OBT (ms)");        temp[i][ii]->GetXaxis()->SetTitle("OBT (ms)");
# Line 487  void FTrkQLook_EXPERT(TString file,Int_t Line 490  void FTrkQLook_EXPERT(TString file,Int_t
490                    
491                
492      }      }
493      if(countTEMP==tsize-1){      if(countTEMP==tsize-1 && ii==cntpgtemp-1){
494        break;        break;
495      }      }
496    }    }
# Line 552  void FTrkQLook_EXPERT(TString file,Int_t Line 555  void FTrkQLook_EXPERT(TString file,Int_t
555        Double_t xb_tmp[bsize], magt_tmp[bsize];        Double_t xb_tmp[bsize], magt_tmp[bsize];
556        for (Int_t ev=countMAG; ev<bsize; ev++){        for (Int_t ev=countMAG; ev<bsize; ev++){
557                    
558          if(ev==bsize-1 && i==4) countMAG=bsize-1;          if(ev==bsize-1 && i==4 && ii==cntpgmag-1) countMAG=bsize-1;
559          if(xb[ev]<xb[ev-1] && ev>countMAG){          if(xb[ev]<xb[ev-1] && ev>countMAG){
560            if(i==4) countMAG=ev;            if(i==4) countMAG=ev;
561            break;            break;
# Line 576  void FTrkQLook_EXPERT(TString file,Int_t Line 579  void FTrkQLook_EXPERT(TString file,Int_t
579        mag[i][ii]->GetXaxis()->CenterTitle();        mag[i][ii]->GetXaxis()->CenterTitle();
580        mag[i][ii]->GetXaxis()->SetTitleOffset(0.85);        mag[i][ii]->GetXaxis()->SetTitleOffset(0.85);
581        if(i!=4) mag[i][ii]->GetYaxis()->SetRangeUser(2047,2058);        if(i!=4) mag[i][ii]->GetYaxis()->SetRangeUser(2047,2058);
582        else mag[i][ii]->GetYaxis()->SetRangeUser(2061,2066);        else mag[i][ii]->GetYaxis()->SetRangeUser(2060,2067);
583        mag[i][ii]->GetYaxis()->SetTitleOffset(1.2);        mag[i][ii]->GetYaxis()->SetTitleOffset(1.2);
584        mag[i][ii]->GetYaxis()->SetLabelOffset(0.001);        mag[i][ii]->GetYaxis()->SetLabelOffset(0.001);
585        mag[i][ii]->GetYaxis()->SetLabelSize(0.03);        mag[i][ii]->GetYaxis()->SetLabelSize(0.03);
# Line 604  void FTrkQLook_EXPERT(TString file,Int_t Line 607  void FTrkQLook_EXPERT(TString file,Int_t
607    
608          case 1:          case 1:
609            li.DrawLine(min,2055.,max,2055.);            li.DrawLine(min,2055.,max,2055.);
610            li.DrawLine(min,2051.,max,2051.);            li.DrawLine(min,2050.,max,2050.);
611            t1->DrawLatex(xlat,2055.3,ma.str().c_str());            t1->DrawLatex(xlat,2055.3,ma.str().c_str());
612            t1->DrawLatex(xlat,2050.7,mi.str().c_str());            t1->DrawLatex(xlat,2049.7,mi.str().c_str());
613            break;            break;
614    
615          case 2:          case 2:
616            li.DrawLine(min,2056.,max,2056.);            li.DrawLine(min,2056.,max,2056.);
617            li.DrawLine(min,2052.,max,2052.);            li.DrawLine(min,2051.,max,2051.);
618            t1->DrawLatex(xlat,2056.3,ma.str().c_str());            t1->DrawLatex(xlat,2056.3,ma.str().c_str());
619            t1->DrawLatex(xlat,2051.7,mi.str().c_str());            t1->DrawLatex(xlat,2050.7,mi.str().c_str());
620            break;            break;
621                
622          case 3:          case 3:
623            li.DrawLine(min,2057.,max,2057.);            li.DrawLine(min,2057.,max,2057.);
624            li.DrawLine(min,2053.,max,2053.);            li.DrawLine(min,2052.,max,2052.);
625            t1->DrawLatex(xlat,2057.3,ma.str().c_str());            t1->DrawLatex(xlat,2057.3,ma.str().c_str());
626            t1->DrawLatex(xlat,2052.7,mi.str().c_str());            t1->DrawLatex(xlat,2051.7,mi.str().c_str());
627            break;            break;
628    
629          case 4:          case 4:
630            li.DrawLine(min,2065.,max,2065.);            li.DrawLine(min,2066.,max,2066.);
631            li.DrawLine(min,2062.,max,2062.);            li.DrawLine(min,2061.,max,2061.);
632            t1->DrawLatex(xlat,2065.15,ma.str().c_str());            t1->DrawLatex(xlat,2066.15,ma.str().c_str());
633            t1->DrawLatex(xlat,2061.85,mi.str().c_str());            t1->DrawLatex(xlat,2060.85,mi.str().c_str());
634            break;            break;
635    
636        }        }
637        BfieldCanv[ii]->Update();        BfieldCanv[ii]->Update();
638        tit.str("");        tit.str("");
639      }      }
640      if(countMAG==bsize-1){      if(countMAG==bsize-1 && ii==cntpgmag-1){
641        break;        break;
642      }      }
643    }    }
# Line 780  void FTrkQLook_EXPERT(TString file,Int_t Line 783  void FTrkQLook_EXPERT(TString file,Int_t
783              WARNING[i] = 1; // DSP warning              WARNING[i] = 1; // DSP warning
784            };            };
785    
786            if(te->alarm[i]!=0){ // hardware alarm            if(dsp%2==0 && te->alarm[i]!=0){ // hardware alarm
787              ALARM = 1;              if(countALARMy==0)
788                  ALARM = 1;
789                countALARMy+=1;
790              };
791    
792              if(dsp%2==1 && te->alarm[i]!=0){ // hardware alarm
793                if(countALARMx==0)
794                  ALARM = 1;
795                countALARMx+=1;
796            };            };
797                
798            //**************************************************************************************            //**************************************************************************************
799            // warning for internal number            // warning for internal number
800            //**************************************************************************************            //**************************************************************************************
801            if(i<=10 && te->eventn[i]!=te->eventn[i+1]) ALARM=1;            if(ev==minev && i<=10 && te->eventn[i]!=te->eventn[i+1]) ALARM=1;
802            if((ev-minev)>=1 && eventn[i]+1!=te->eventn[i] && te->eventn[i]!=1) ALARM=1;            if((ev-minev)>=1 && eventn[i]+1!=te->eventn[i] && te->eventn[i]!=1) ALARM=1;
803          }          }
804          eventint[(ev-minev)]=te->eventn[0];          eventint[(ev-minev)]=te->eventn[0];
# Line 841  void FTrkQLook_EXPERT(TString file,Int_t Line 852  void FTrkQLook_EXPERT(TString file,Int_t
852        }        }
853      }      }
854      if(al==0) alarm << endl<< "Page "<<ii+1<< ": ------>  NO ALARM!!! <-------"<<endl;      if(al==0) alarm << endl<< "Page "<<ii+1<< ": ------>  NO ALARM!!! <-------"<<endl;
855        if(maxev==maxevent-1) {
856          if(countALARMy!=0){
857            if(countALARMy%6!=0) alarm << endl<<endl<< "***** "<<countALARMy/6+1 <<" events with hardware alarm in Y-view *****"<<endl;
858            else alarm << endl<<endl<< "***** "<<countALARMy/6 <<" events with hardware alarm in Y-view *****"<<endl;
859          }
860          if(countALARMx!=0){
861            if(countALARMx%6!=0) alarm << endl<<endl<< "***** "<<countALARMx/6+1 <<" events with hardware alarm in X-view *****"<<endl;
862            else alarm << endl<<endl<< "***** "<<countALARMx/6 <<" events with hardware alarm in X-view *****"<<endl;
863          }
864        }
865    
866      //      //
867      // Draw the graphs      // Draw the graphs
# Line 868  void FTrkQLook_EXPERT(TString file,Int_t Line 889  void FTrkQLook_EXPERT(TString file,Int_t
889        CompTimeCanv[ii]->Update();        CompTimeCanv[ii]->Update();
890      }      }
891        
892        
893      EventNumCanv[ii]->cd();      EventNumCanv[ii]->cd();
894      pt = new TPad("pt"," ",0.02,0.01,1.,0.98,18,0,0);      pt = new TPad("pt"," ",0.02,0.01,1.,0.98,18,0,0);
895      pt->SetFillColor(10);      pt->SetFillColor(10);
# Line 890  void FTrkQLook_EXPERT(TString file,Int_t Line 912  void FTrkQLook_EXPERT(TString file,Int_t
912      eventnumb[ii]->SetMarkerStyle(21);      eventnumb[ii]->SetMarkerStyle(21);
913      eventnumb[ii]->SetMarkerColor(kBlue);      eventnumb[ii]->SetMarkerColor(kBlue);
914      eventnumb[ii]->SetMarkerSize(0.2);      eventnumb[ii]->SetMarkerSize(0.2);
915        oss1.str("");
916        oss1<<"number of events in this graph: "<<maxev-minev;
917        t->SetTextColor(kBlue);
918        t->SetTextSize(0.02);
919        double xtex=0,ytex=0;
920        xtex=x[maxev-minev-1]-(x[maxev-minev-1]-x[0])/3;
921        ytex=1000.+eventnumb[ii]->GetYaxis()->GetXmax();
922        t->DrawLatex(xtex,ytex,oss1.str().c_str());
923        oss1.str("");  
924      eventnumb[ii]->Draw("ap");      eventnumb[ii]->Draw("ap");
925      EventNumCanv[ii]->Update();      EventNumCanv[ii]->Update();
926            
# Line 901  void FTrkQLook_EXPERT(TString file,Int_t Line 932  void FTrkQLook_EXPERT(TString file,Int_t
932            
933    }    }
934    
   
935    alarm.close();    alarm.close();
936    
937    //****************************************************************************************    //****************************************************************************************
# Line 1046  void FTrkQLook_EXPERT(TString file,Int_t Line 1076  void FTrkQLook_EXPERT(TString file,Int_t
1076        b.DrawBox(2816.,0.,2944.,maxhist);        b.DrawBox(2816.,0.,2944.,maxhist);
1077        b.DrawBox(2048.,0.,2176.,maxhist);        b.DrawBox(2048.,0.,2176.,maxhist);
1078      }      }
1079        else if(i==4){
1080          maxhist=illuminazione[i]->GetMaximum();
1081          b.SetFillColor(107);
1082          b.SetFillStyle(3954);
1083          b.DrawBox(384.,0.,512.,maxhist);
1084        }
1085      else if(i==6){      else if(i==6){
1086        maxhist= illuminazione[i]->GetMaximum();        maxhist= illuminazione[i]->GetMaximum();
1087        b.SetFillColor(6);        b.SetFillColor(6);
1088        b.SetFillStyle(3945);        b.SetFillStyle(3945);
1089        b.DrawBox(2560.,0.,2816.,maxhist);        b.DrawBox(2560.,0.,2816.,maxhist);
1090        b.DrawBox(1024.,0.,1792.,maxhist);        b.DrawBox(1024.,0.,1535.,maxhist);
1091    
1092        b.SetFillColor(107);        b.SetFillColor(107);
1093        b.SetFillStyle(3954);        b.SetFillStyle(3954);
1094        b.DrawBox(512.,0.,768.,maxhist);        b.DrawBox(512.,0.,768.,maxhist);
1095          b.DrawBox(1536.,0.,1792.,maxhist);
1096      }      }
1097      else if(i==7){      else if(i==7){
1098        maxhist= illuminazione[i]->GetMaximum();        maxhist= illuminazione[i]->GetMaximum();
# Line 1063  void FTrkQLook_EXPERT(TString file,Int_t Line 1100  void FTrkQLook_EXPERT(TString file,Int_t
1100        b.SetFillStyle(3954);        b.SetFillStyle(3954);
1101        b.DrawBox(512.,0.,768.,maxhist);        b.DrawBox(512.,0.,768.,maxhist);
1102      }      }
1103        else if(i==9){
1104          maxhist=illuminazione[i]->GetMaximum();
1105          b.SetFillColor(107);
1106          b.SetFillStyle(3954);
1107          b.DrawBox(256.,0.,384.,maxhist);
1108        }
1109      else if(i==11){      else if(i==11){
1110        maxhist= illuminazione[i]->GetMaximum();        maxhist= illuminazione[i]->GetMaximum();
1111        b.SetFillColor(6);        b.SetFillColor(6);
# Line 1073  void FTrkQLook_EXPERT(TString file,Int_t Line 1116  void FTrkQLook_EXPERT(TString file,Int_t
1116        b.SetFillStyle(3954);        b.SetFillStyle(3954);
1117        b.DrawBox(0.,0.,512.,maxhist);        b.DrawBox(0.,0.,512.,maxhist);
1118        b.DrawBox(1920.,0.,2048.,maxhist);        b.DrawBox(1920.,0.,2048.,maxhist);
1119          b.DrawBox(2176.,0.,2304.,maxhist);
1120      }      }
1121      IlluminaCanv->Update();      IlluminaCanv->Update();
1122    }    }
# Line 1088  void FTrkQLook_EXPERT(TString file,Int_t Line 1132  void FTrkQLook_EXPERT(TString file,Int_t
1132    else if(cntpgtemp<=cntpgdat) totpg=cntpgdat;    else if(cntpgtemp<=cntpgdat) totpg=cntpgdat;
1133    
1134    for(Int_t fl=0;fl<totpg;fl++){    for(Int_t fl=0;fl<totpg;fl++){
1135    
1136      if(!strcmp(outfile.Data(),"ps")||!strcmp(outfile.Data(),"pdf")){      if(!strcmp(outfile.Data(),"ps")||!strcmp(outfile.Data(),"pdf")){
1137        out1.str("");        out1.str("");
1138        out2.str("");        out2.str("");
Legend:
Removed from v.1.12  
changed lines
  Added in v.1.18
  ViewVC Help
Powered by ViewVC 1.1.23