/[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.11 by pam-fi, Thu Jul 20 11:09:33 2006 UTC revision 1.19 by pam-fi, Thu Oct 12 16:58:34 2006 UTC
# Line 2  Line 2 
2   * FTrkQLook_EXPERT.cxx   * FTrkQLook_EXPERT.cxx
3   *   *
4   * autor: D.Fedele   * autor: D.Fedele
5   * version v1r06   * 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 30  Line 30 
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>  #include <EventCounter.h>
36  #include <PacketType.h>  #include <PacketType.h>
37  //  //
# Line 37  Line 39 
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  {  {
   printf("\nsono io\n");  
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    Int_t dwpos = file.Last('/');    Int_t dwpos = file.Last('/');
# Line 58  void FTrkQLook_EXPERT(TString file,Int_t Line 59  void FTrkQLook_EXPERT(TString file,Int_t
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,*eH=0,*eT=0;    pamela::EventHeader *eh=0,*aleh=0,*eH=0,*eT=0,*eB=0;
66    pamela::PscuHeader *ph=0,*pH=0;    pamela::PscuHeader *ph=0,*pH=0;
67    pamela::TrkAlarmEvent *al=0;    pamela::TrkAlarmEvent *al=0;
68    pamela::RunHeaderEvent *reh=0;    pamela::RunHeaderEvent *reh=0;
# Line 77  void FTrkQLook_EXPERT(TString file,Int_t Line 80  void FTrkQLook_EXPERT(TString file,Int_t
80    tree->SetBranchAddress("TsbT",&event);    tree->SetBranchAddress("TsbT",&event);
81    tree->SetBranchAddress("Header",&eT);    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);
89    altr->SetBranchAddress("Header",&aleh);    altr->SetBranchAddress("Header",&aleh);
# Line 92  void FTrkQLook_EXPERT(TString file,Int_t Line 99  void FTrkQLook_EXPERT(TString file,Int_t
99    Long64_t nevent = tr->GetEntries();    Long64_t nevent = tr->GetEntries();
100    Long64_t neventH = otr->GetEntries();    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;
# Line 99  void FTrkQLook_EXPERT(TString file,Int_t Line 107  void FTrkQLook_EXPERT(TString file,Int_t
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);    printf("Number of header events: %lld\n",neventH);
109    printf("Number of TsbT events: %lld\n",tnevent);    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);    printf("Number of TrkAlarm packet events: %lld\n",alnevent);
112    
113    if (nevent<=0){    if (nevent<=0){
# Line 127  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 136  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      ULong_t acq_info[neventH];  
149      Int_t countnboot=1;
150    for (Int_t vi=0; vi<neventH;vi++){    for (Int_t vi=0; vi<neventH;vi++){
151      HOBT[vi]=0;      HOBT[vi]=0;
152      trk_cal_us[vi]=0;      trk_cal_us[vi]=0;
153        acq_info[vi]=0;
154    }    }
155    for (Int_t ev=0; ev<neventH; ev++){    for (Int_t ev=0; ev<neventH; ev++){
156      otr->GetEntry(ev);      otr->GetEntry(ev);
157      pH = eH->GetPscuHeader();      pH = eH->GetPscuHeader();
158      HOBT[ev]= pH->GetOrbitalTime();      HOBT[ev]= pH->GetOrbitalTime();
159      trk_cal_us[ev]=reh->TRK_CALIB_USED;      trk_cal_us[ev]=reh->TRK_CALIB_USED;
160        acq_info[ev]=reh->ACQ_BUILD_INFO;
161        if((HOBT[ev]<HOBT[ev-1]) && ev>0)
162          countnboot+=1;
163    }    }
164      countnboot+=(Int_t)(2*nevent/MAXSTORAGE);
165      //   printf("\ncountnboot=%d\n",countnboot);
166      
167    //    //
168    // other variables definitions    // other variables definitions
169    stringstream oss1,oss2,oss3,oss4,fromfile,isfile,tit;    stringstream oss1,oss2,oss3,oss4,fromfile,isfile,tit;
# Line 163  void FTrkQLook_EXPERT(TString file,Int_t Line 180  void FTrkQLook_EXPERT(TString file,Int_t
180    }    }
181    const Int_t tsize=maxsize;    const Int_t tsize=maxsize;
182    Int_t tempt[tsize][5];    Int_t tempt[tsize][5];
   Int_t countnboot=1;  
183    ULong64_t xt[tsize];    ULong64_t xt[tsize];
184    
185      Int_t cntpgtemp=1,cntpgdat=0,cntpgmag=0;
186    //    //
187    // information about the temperatures    // information about the temperatures
188    for (Int_t ev=0; ev<tnevent; ev++){    for (Int_t ev=0; ev<tnevent; ev++){
# Line 174  void FTrkQLook_EXPERT(TString file,Int_t Line 192  void FTrkQLook_EXPERT(TString file,Int_t
192        record = (pamela::TsbTRecord*)event->Records->At(j);        record = (pamela::TsbTRecord*)event->Records->At(j);
193        xt[siztmp]=record->RECORD_OBT;        xt[siztmp]=record->RECORD_OBT;
194        if((xt[siztmp]<xt[siztmp-1]) && siztmp>0)        if((xt[siztmp]<xt[siztmp-1]) && siztmp>0)
195          countnboot+=1;          cntpgtemp+=1;
196                
197        for (Int_t z = 0; z < 5; z++){        for (Int_t z = 0; z < 5; z++){
198          tempt[siztmp][z] = record->TEMPERATURES[z+1];              tempt[siztmp][z] = record->TEMPERATURES[z+1];    
# Line 182  void FTrkQLook_EXPERT(TString file,Int_t Line 200  void FTrkQLook_EXPERT(TString file,Int_t
200        siztmp++;        siztmp++;
201      }      }
202    }    }
203    countnboot+=2*(Int_t)nevent/MAXSTORAGE;    
204    //   printf("\ncountnboot=%d\n",countnboot);    //
205      // information about the entries for the magnetic field
206      if(bnevent>0) cntpgmag=1;
207      maxsize=0;
208      for (Int_t ev=0; ev<bnevent; ev++){
209        Btree->GetEntry(ev);
210        tmpSize = Bevent->Records->GetEntries();
211        maxsize+=tmpSize;
212      }
213      const Int_t bsize=maxsize;
214      Int_t magt[bsize][5];
215      ULong64_t xb[bsize];
216      siztmp=0;
217      //
218      // information about the magnetic field
219      for (Int_t ev=0; ev<bnevent; ev++){
220        Btree->GetEntry(ev);
221        tmpSize = Bevent->Records->GetEntries();
222        for (Int_t j = 0; j < tmpSize; j++){
223          Brecord = (pamela::TsbBRecord*)Bevent->Records->At(j);
224          xb[siztmp]=Brecord->RECORD_OBT;
225          if((xb[siztmp]<xb[siztmp-1]) && siztmp>0)
226            cntpgmag+=1;
227          for (Int_t z = 0; z < 5; z++){
228            magt[siztmp][z] = Brecord->B_FIELD[z+1];    
229          }
230          siztmp++;
231        }
232      }
233        
234    //    //
235    // open the output text files for the alarms    // open the output text files for the alarms
# Line 219  void FTrkQLook_EXPERT(TString file,Int_t Line 265  void FTrkQLook_EXPERT(TString file,Int_t
265        alarm1 << "================================================="<< endl<<endl;        alarm1 << "================================================="<< endl<<endl;
266                    
267        alarm1 << "Alarm variables (range 0-1)"<<endl;        alarm1 << "Alarm variables (range 0-1)"<<endl;
268        alarm1 << " ALARM[1]= 0x"<< hex << (Int_t)al->ALARM[1]<<endl;        alarm1 << " ALARM[1]= 0x"<< hex << (Int_t)al->ALARM[0]<<endl;
269        alarm1 << " ALARM[2]= 0x"<< (Int_t)al->ALARM[2]<<endl;        alarm1 << " ALARM[2]= 0x"<< (Int_t)al->ALARM[1]<<endl;
270        alarm1 << " CmdDuringTrig= 0x"<< (Int_t)al->CmdDuringTrig<<endl;        alarm1 << " CmdDuringTrig= 0x"<< (Int_t)al->CmdDuringTrig<<endl;
271        alarm1 << " FinalCheck= 0x"<< (Int_t)al->FinalCheck<<endl;        alarm1 << " FinalCheck= 0x"<< (Int_t)al->FinalCheck<<endl;
272        alarm1 << " FlashData= 0x"<< (Int_t)al->FlashData<<endl;        alarm1 << " FlashData= 0x"<< (Int_t)al->FlashData<<endl;
# Line 278  void FTrkQLook_EXPERT(TString file,Int_t Line 324  void FTrkQLook_EXPERT(TString file,Int_t
324    
325    //    //
326    // Define output canvas, histos and graphs    // Define output canvas, histos and graphs
327    TCanvas *CompTimeCanv[countnboot],*EventNumCanv[countnboot],*TempCanv[countnboot];    TCanvas *CompTimeCanv[countnboot],*EventNumCanv[countnboot],*TempCanv[cntpgtemp],*BfieldCanv[cntpgmag];
328    TCanvas *IlluminaCanv,*LandauCanv1,*LandauCanv2,*LandauCanv3;    TCanvas *IlluminaCanv,*LandauCanv1,*LandauCanv2,*LandauCanv3;
329    
330    TH1F *landau1[12],*landau2[12],*landau3[12],*illuminazione[12];    TH1F *landau1[12],*landau2[12],*landau3[12],*illuminazione[12];
331    TGraph *comprtime[12][countnboot],*temp[5][countnboot],*eventnumb[countnboot];    TGraph *comprtime[12][countnboot],*temp[5][cntpgtemp],*tempw[5][cntpgtemp],*eventnumb[countnboot],*mag[5][cntpgmag];
332    TPad *pad1[12],*pad2[12],*pad3[12],*pad4[12],*pad5[12],*pad6[5];    TPad *pad1[12],*pad2[12],*pad3[12],*pad4[12],*pad5[12],*pad6[5],*pad7[5];
333    
334    for(Int_t n = 0; n<12; n++) {    for(Int_t n = 0; n<12; n++) {
335    
# Line 321  void FTrkQLook_EXPERT(TString file,Int_t Line 367  void FTrkQLook_EXPERT(TString file,Int_t
367    TLatex *t=new TLatex();    TLatex *t=new TLatex();
368    TLatex *t1=new TLatex();    TLatex *t1=new TLatex();
369    
370    Int_t cntpgtemp=0,cntpgdat=0;    
371    Int_t minev=minevent,maxev=maxevent,countTEMP=0;    Int_t minev=minevent,maxev=maxevent,countTEMP=0,countMAG=0;
372      ULong_t countALARMx=0,countALARMy=0;
373    
374    //    //
375    // Fill temperature graphs    // Fill temperature graphs
376    for(Int_t ii=0; ii<countnboot;ii++){    for(Int_t ii=0; ii<cntpgtemp;ii++){
377      //****************************************************************************************      //****************************************************************************************
378      //Temperature Output Pages      //Temperature Output Pages
379      //****************************************************************************************      //****************************************************************************************
# Line 348  void FTrkQLook_EXPERT(TString file,Int_t Line 395  void FTrkQLook_EXPERT(TString file,Int_t
395      t1->SetTextSize(0.02);      t1->SetTextSize(0.02);
396      t1->DrawLatex(78.,98.7,isfile.str().c_str());      t1->DrawLatex(78.,98.7,isfile.str().c_str());
397      isfile.str("");      isfile.str("");
398        t1->SetTextSize(0.025);
399        t1->SetTextColor(196);
400        isfile<<"--> Values at 28.5^{o}C (if presents) correspond";
401        t1->DrawLatex(50.,22.,isfile.str().c_str());
402        isfile.str("");
403        isfile<<"    to wrong readings ( > 100^{o}C) of the Tsb";
404        t1->DrawLatex(50.,19.,isfile.str().c_str());
405        isfile.str("");
406        isfile<<"--> Values at 25.5^{o}C (if presents) correspond";
407        t1->DrawLatex(50.,12.,isfile.str().c_str());
408        isfile.str("");
409        isfile<<"    to wrong readings ( < 0^{o}C) of the Tsb";
410        t1->DrawLatex(50.,9.,isfile.str().c_str());
411        isfile.str("");
412        
413      Float_t tposy = 0.95;    // up y-coord - top pads      Float_t tposy = 0.95;    // up y-coord - top pads
414      Float_t thpad = 0;   // pad height      Float_t thpad = 0;   // pad height
# Line 373  void FTrkQLook_EXPERT(TString file,Int_t Line 434  void FTrkQLook_EXPERT(TString file,Int_t
434        /* -----------> pad for histograms  */        /* -----------> pad for histograms  */
435        pad6[i] = new TPad("pad6"," ",tposx1,tposy-thpad,tposx0,tposy,18,0,0);        pad6[i] = new TPad("pad6"," ",tposx1,tposy-thpad,tposx0,tposy,18,0,0);
436    
437        Int_t v=0;        Int_t v=0,vv=0;
438        Double_t xt_tmp[tsize], tempt_tmp[tsize];        Double_t xt_tmp[tsize], tempt_tmp[tsize];
439          Double_t xt_tmpw[tsize], tempt_tmpw[tsize];
440        for (Int_t ev=countTEMP; ev<tsize; ev++){        for (Int_t ev=countTEMP; ev<tsize; ev++){
441                
442          if(ev==tsize-1 && i==4) countTEMP=tsize-1;          if(ev==tsize-1 && i==4 && ii==cntpgtemp-1) countTEMP=tsize-1;
443          if(xt[ev]<xt[ev-1] && ev>countTEMP){          if(xt[ev]<xt[ev-1] && ev>countTEMP){
444            if(i==4) countTEMP=ev;            if(i==4) countTEMP=ev;
445            break;            break;
446          }          }
447          else{          else{
448            if(tempt[ev][i]!=65535){            tempt_tmp[v]=(Double_t)((Int_t)(((3.3*tempt[ev][i]/4096)-0.586)/0.0231));
449              tempt_tmp[v]=(Double_t)((Int_t)(((3.3*tempt[ev][i]/4096)-0.586)/0.0231));            if(tempt_tmp[v]>100) {
450              if(tempt_tmp[v]>0) xt_tmp[v++]=(Double_t)xt[ev];              tempt_tmp[v]=28.5;
451                tempt_tmpw[vv]=28.5;
452                xt_tmpw[vv++]=(Double_t)xt[ev];
453            }            }
454              else if(tempt_tmp[v]<0){
455                tempt_tmp[v]=25.5;
456                tempt_tmpw[vv]=25.5;
457                xt_tmpw[vv++]=(Double_t)xt[ev];
458              }
459              xt_tmp[v++]=(Double_t)xt[ev];
460          }          }
461        }        }
462        TempCanv[ii]->cd();        TempCanv[ii]->cd();
# Line 396  void FTrkQLook_EXPERT(TString file,Int_t Line 466  void FTrkQLook_EXPERT(TString file,Int_t
466        pad6[i]->cd();        pad6[i]->cd();
467        temp[i][ii]= new TGraph(v,xt_tmp,tempt_tmp);        temp[i][ii]= new TGraph(v,xt_tmp,tempt_tmp);
468        temp[i][ii]->SetTitle(tit.str().c_str());        temp[i][ii]->SetTitle(tit.str().c_str());
469          if(v==1) temp[i][ii]->GetXaxis()->SetNdivisions(502,kTRUE);
470        temp[i][ii]->GetXaxis()->SetLabelSize(0.04);        temp[i][ii]->GetXaxis()->SetLabelSize(0.04);
471        temp[i][ii]->GetXaxis()->SetTitleSize(0.04);        temp[i][ii]->GetXaxis()->SetTitleSize(0.04);
472        temp[i][ii]->GetXaxis()->SetTitle("OBT (ms)");        temp[i][ii]->GetXaxis()->SetTitle("OBT (ms)");
# Line 411  void FTrkQLook_EXPERT(TString file,Int_t Line 482  void FTrkQLook_EXPERT(TString file,Int_t
482        temp[i][ii]->SetMarkerSize(0.2);        temp[i][ii]->SetMarkerSize(0.2);
483        temp[i][ii]->Draw("ap");        temp[i][ii]->Draw("ap");
484        tit.str("");        tit.str("");
485          if(vv>0){
486            tempw[i][ii]= new TGraph(vv,xt_tmpw,tempt_tmpw);
487            tempw[i][ii]->SetMarkerStyle(21);
488            tempw[i][ii]->SetMarkerSize(0.2);
489            tempw[i][ii]->SetMarkerColor(196);
490            tempw[i][ii]->Draw("samep");
491          }
492        TempCanv[ii]->Update();        TempCanv[ii]->Update();
493            
494                
495      }      }
496      if(countTEMP==tsize-1){      if(countTEMP==tsize-1 && ii==cntpgtemp-1){
       cntpgtemp=ii+1;  
497        break;        break;
498      }      }
499    }    }
500    
501      //
502      // Fill magnetic field graphs
503      for(Int_t ii=0; ii<cntpgmag;ii++){
504        //****************************************************************************************
505        //Magnetic Field Output Pages
506        //****************************************************************************************
507        fromfile.str("");
508        fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;
509        isfile<<"Magnetic Axial Field vs OBT   pag"<<ii+1;
510        BfieldCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
511        BfieldCanv[ii]->SetFillColor(10);
512        BfieldCanv[ii]->Range(0,0,100,100);
513        
514        t->SetTextFont(32);
515        t->SetTextColor(1);
516        t->SetTextAlign(12);
517        t->SetTextSize(0.02);
518        t->DrawLatex(2.,98.7,fromfile.str().c_str());
519        t1->SetTextFont(32);
520        t1->SetTextColor(1);
521        t1->SetTextAlign(12);
522        t1->SetTextSize(0.02);
523        t1->DrawLatex(70.,98.7,isfile.str().c_str());
524        isfile.str("");
525      
526        TLine li;
527        li.SetLineStyle(1);
528        li.SetLineWidth(1);
529        li.SetLineColor(190);
530        t1->SetTextColor(190);
531        t1->SetTextSize(0.04);
532        
533        Float_t tposy = 0.95;    // up y-coord - top pads
534        Float_t thpad = 0;   // pad height
535        Float_t tposx1=0;          // left  x-coord - pad column
536        Float_t tposx0=0;          //       x-coord - column division
537        Float_t twrel = 0;     // relative x size of first sub-column
538        Float_t tmarg = 0.004;   // margin among pads
539      
540        thpad = (tposy-tmarg*5)/3;
541        twrel = (1-tmarg*4)/2;
542        
543        for(Int_t i=0; i<5; i++){
544          if ( (i+1)%2==1 ) {
545            if(i>1) tposy = tposy-(tmarg*2+thpad);
546            tposx1 = tmarg;
547            tposx0 = tposx1 + twrel;
548          }
549          else {
550            tposx1 = tposx0 + 2*tmarg;
551            tposx0 = tposx1 + twrel;
552          }
553          
554          /* -----------> pad for histograms  */
555          pad7[i] = new TPad("pad7"," ",tposx1,tposy-thpad,tposx0,tposy,18,0,0);
556          
557          Int_t v=0;
558          Double_t xb_tmp[bsize], magt_tmp[bsize];
559          for (Int_t ev=countMAG; ev<bsize; ev++){
560            
561            if(ev==bsize-1 && i==4 && ii==cntpgmag-1) countMAG=bsize-1;
562            if(xb[ev]<xb[ev-1] && ev>countMAG){
563              if(i==4) countMAG=ev;
564              break;
565            }
566            else{
567              magt_tmp[v]=(Double_t)magt[ev][i];
568              xb_tmp[v++]=(Double_t)xb[ev];
569            }
570          }
571          BfieldCanv[ii]->cd();
572          tit<<"B"<<i+5<<" (magnetic module "<<i+1<<")";
573          pad7[i]->SetFillColor(10);
574          pad7[i]->Draw();
575          pad7[i]->cd();
576          mag[i][ii]= new TGraph(v,xb_tmp,magt_tmp);
577          mag[i][ii]->SetTitle(tit.str().c_str());
578          mag[i][ii]->GetXaxis()->SetNdivisions(502,kTRUE);
579          mag[i][ii]->GetXaxis()->SetLabelSize(0.04);
580          mag[i][ii]->GetXaxis()->SetTitleSize(0.04);
581          mag[i][ii]->GetXaxis()->SetTitle("OBT (ms)");
582          mag[i][ii]->GetXaxis()->CenterTitle();
583          mag[i][ii]->GetXaxis()->SetTitleOffset(0.85);
584          if(i!=4) mag[i][ii]->GetYaxis()->SetRangeUser(2047,2058);
585          else mag[i][ii]->GetYaxis()->SetRangeUser(2060,2067);
586          mag[i][ii]->GetYaxis()->SetTitleOffset(1.2);
587          mag[i][ii]->GetYaxis()->SetLabelOffset(0.001);
588          mag[i][ii]->GetYaxis()->SetLabelSize(0.03);
589          mag[i][ii]->GetYaxis()->SetTitleSize(0.04);
590          mag[i][ii]->GetYaxis()->SetTitle("Magnetic Field (au)");
591          mag[i][ii]->GetYaxis()->CenterTitle();
592          mag[i][ii]->SetMarkerStyle(21);
593          mag[i][ii]->SetMarkerSize(0.4);
594          mag[i][ii]->Draw("ap");
595          Double_t min=0.,max=0,xlat=0.;
596          min=mag[i][ii]->GetXaxis()->GetXmin();
597          max=mag[i][ii]->GetXaxis()->GetXmax();
598          xlat=min+(max-min)/2;
599          stringstream mi,ma;
600          mi<<"minimum recorded value";
601          ma<<"maximum recorded value";
602          t->SetTextSize(0.1);
603          switch(i){
604          case 0:
605            li.DrawLine(min,2054.,max,2054.);
606            li.DrawLine(min,2048.,max,2048.);
607            t1->DrawLatex(xlat,2054.3,ma.str().c_str());
608            t1->DrawLatex(xlat,2047.7,mi.str().c_str());    
609            break;
610    
611          case 1:
612            li.DrawLine(min,2055.,max,2055.);
613            li.DrawLine(min,2050.,max,2050.);
614            t1->DrawLatex(xlat,2055.3,ma.str().c_str());
615            t1->DrawLatex(xlat,2049.7,mi.str().c_str());
616            break;
617    
618          case 2:
619            li.DrawLine(min,2056.,max,2056.);
620            li.DrawLine(min,2051.,max,2051.);
621            t1->DrawLatex(xlat,2056.3,ma.str().c_str());
622            t1->DrawLatex(xlat,2050.7,mi.str().c_str());
623            break;
624          
625          case 3:
626            li.DrawLine(min,2057.,max,2057.);
627            li.DrawLine(min,2052.,max,2052.);
628            t1->DrawLatex(xlat,2057.3,ma.str().c_str());
629            t1->DrawLatex(xlat,2051.7,mi.str().c_str());
630            break;
631    
632          case 4:
633            li.DrawLine(min,2066.,max,2066.);
634            li.DrawLine(min,2061.,max,2061.);
635            t1->DrawLatex(xlat,2066.15,ma.str().c_str());
636            t1->DrawLatex(xlat,2060.85,mi.str().c_str());
637            break;
638    
639          }
640          BfieldCanv[ii]->Update();
641          tit.str("");
642        }
643        if(countMAG==bsize-1 && ii==cntpgmag-1){
644          break;
645        }
646      }
647      
648    
649    //    //
650    // Fill compressiontime and eventnumber graphs and DSP warnings    // Fill compressiontime and eventnumber graphs and DSP warnings
# Line 522  void FTrkQLook_EXPERT(TString file,Int_t Line 747  void FTrkQLook_EXPERT(TString file,Int_t
747        else{        else{
748          x[(ev-minev)]= ph->GetOrbitalTime();          x[(ev-minev)]= ph->GetOrbitalTime();
749          ALARM=0;          ALARM=0;
           
750          Int_t dsp=0;          Int_t dsp=0;
751          for(Int_t i=0; i<12; i++){          Int_t noacq=0;
752            if(te->DSPnumber[i]<1 || te->DSPnumber[i]>12) {          Int_t acq_dsp[12];
753              ALARM=1;          ULong_t acq_info_tmp=0;
754              break;          if(cod->Get(pctp->RunHeader)>0) acq_info_tmp=acq_info[cod->Get(pctp->RunHeader)-1];
755            }          else acq_info_tmp=acq_info[cod->Get(pctp->RunHeader)];
756            for(Int_t io=0;io<12;io++){
757              acq_dsp[dsp]=(acq_info_tmp>>(12+io))&(~(~0<<1));
758              if(((acq_info_tmp>>(12+io))&(~(~0<<1)))==0)
759                noacq+=1;
760              WARNING[io]=0;
761            }
762    
763            dsp=te->DSPnumber[i]-1;          for(Int_t i=0; i<12; i++){
           yc[(ev-minev)][dsp]= 0.051*te->compressiontime[i];  
764    
765            //            if(i<12-noacq){
766            // Fill Cluster Signal and Lighting of the view histos              if(te->DSPnumber[i]<1 || te->DSPnumber[i]>12) {
767            for(Int_t j=0;j<3;j++){                ALARM=1;
768              if(te->signcluster[i][j]!=0){                break;
769                if((te->addrcluster[i][j]>6 && te->addrcluster[i][j]<505) ||(te->addrcluster[i][j]>518 && te->addrcluster[i][j]<1018)){              }
770                  illuminazione[dsp]->Fill((Float_t)((j*1024.)+te->addrcluster[i][j]));  
771                dsp=te->DSPnumber[i]-1;
772                yc[(ev-minev)][dsp]= 0.051*te->compressiontime[i];
773    
774                //
775                // Fill Cluster Signal and Lighting of the view histos
776                for(Int_t j=0;j<3;j++){
777                  if(te->signcluster[i][j]!=0){
778                    if((te->addrcluster[i][j]>6 && te->addrcluster[i][j]<505) ||(te->addrcluster[i][j]>518 && te->addrcluster[i][j]<1018)){
779                      illuminazione[dsp]->Fill((Float_t)((j*1024.)+te->addrcluster[i][j]));
780                    }
781                }                }
782              }              }
783            }              if(trk_cal_us[cod->Get(pctp->RunHeader)]!=104){
784            if(trk_cal_us[cod->Get(pctp->RunHeader)]!=104){                if(!(dsp%2)){
785              if(!(dsp%2)){                  if(te->signcluster[i][0]!=0) landau1[dsp]->Fill((Float_t)(1024.-te->signcluster[i][0]));
786                if(te->signcluster[i][0]!=0) landau1[dsp]->Fill((Float_t)(1024.-te->signcluster[i][0]));                  if(te->signcluster[i][1]!=0) landau2[dsp]->Fill((Float_t)(1024.-te->signcluster[i][1]));
787                if(te->signcluster[i][1]!=0) landau2[dsp]->Fill((Float_t)(1024.-te->signcluster[i][1]));                  if(te->signcluster[i][2]!=0) landau3[dsp]->Fill((Float_t)(1024.-te->signcluster[i][2]));
788                if(te->signcluster[i][2]!=0) landau3[dsp]->Fill((Float_t)(1024.-te->signcluster[i][2]));                }
789              }                else{
790              else{                  if(te->signcluster[i][0]!=0) landau1[dsp]->Fill((Float_t)te->signcluster[i][0]);
791                if(te->signcluster[i][0]!=0) landau1[dsp]->Fill((Float_t)te->signcluster[i][0]);                  if(te->signcluster[i][1]!=0) landau2[dsp]->Fill((Float_t)te->signcluster[i][1]);
792                if(te->signcluster[i][1]!=0) landau2[dsp]->Fill((Float_t)te->signcluster[i][1]);                  if(te->signcluster[i][2]!=0) landau3[dsp]->Fill((Float_t)te->signcluster[i][2]);
793                if(te->signcluster[i][2]!=0) landau3[dsp]->Fill((Float_t)te->signcluster[i][2]);                }
794              }              }
           }  
795    
796            WARNING[i]=0;              WARNING[i]=0;
797            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(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){
798              ALARM = 1;      //general alarm                ALARM = 1;      //general alarm
799              WARNING[i] = 1; // DSP warning                WARNING[i] = 1; // DSP warning
800            };              };
801    
802            if(te->alarm[i]!=0){ // hardware alarm              if(dsp%2==0 && te->alarm[i]!=0){ // hardware alarm
803              ALARM = 1;                if(countALARMy==0)
804            };                  ALARM = 1;
805                  countALARMy+=1;
806                };
807    
808                if(dsp%2==1 && te->alarm[i]!=0){ // hardware alarm
809                  if(countALARMx==0)
810                    ALARM = 1;
811                  countALARMx+=1;
812                };
813                
814            //**************************************************************************************              //**************************************************************************************
815            // warning for internal number              // warning for internal number
816            //**************************************************************************************              //**************************************************************************************
817            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;
818            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;
819              }
820          }          }
821          eventint[(ev-minev)]=te->eventn[0];          eventint[(ev-minev)]=te->eventn[0];
822    
# Line 622  void FTrkQLook_EXPERT(TString file,Int_t Line 869  void FTrkQLook_EXPERT(TString file,Int_t
869        }        }
870      }      }
871      if(al==0) alarm << endl<< "Page "<<ii+1<< ": ------>  NO ALARM!!! <-------"<<endl;      if(al==0) alarm << endl<< "Page "<<ii+1<< ": ------>  NO ALARM!!! <-------"<<endl;
872        if(maxev==maxevent-1) {
873          if(countALARMy!=0){
874            if(countALARMy%6!=0) alarm << endl<<endl<< "***** "<<countALARMy/6+1 <<" events with hardware alarm in Y-view *****"<<endl;
875            else alarm << endl<<endl<< "***** "<<countALARMy/6 <<" events with hardware alarm in Y-view *****"<<endl;
876          }
877          if(countALARMx!=0){
878            if(countALARMx%6!=0) alarm << endl<<endl<< "***** "<<countALARMx/6+1 <<" events with hardware alarm in X-view *****"<<endl;
879            else alarm << endl<<endl<< "***** "<<countALARMx/6 <<" events with hardware alarm in X-view *****"<<endl;
880          }
881        }
882    
883      //      //
884      // Draw the graphs      // Draw the graphs
# Line 649  void FTrkQLook_EXPERT(TString file,Int_t Line 906  void FTrkQLook_EXPERT(TString file,Int_t
906        CompTimeCanv[ii]->Update();        CompTimeCanv[ii]->Update();
907      }      }
908        
909        
910      EventNumCanv[ii]->cd();      EventNumCanv[ii]->cd();
911      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);
912      pt->SetFillColor(10);      pt->SetFillColor(10);
# Line 671  void FTrkQLook_EXPERT(TString file,Int_t Line 929  void FTrkQLook_EXPERT(TString file,Int_t
929      eventnumb[ii]->SetMarkerStyle(21);      eventnumb[ii]->SetMarkerStyle(21);
930      eventnumb[ii]->SetMarkerColor(kBlue);      eventnumb[ii]->SetMarkerColor(kBlue);
931      eventnumb[ii]->SetMarkerSize(0.2);      eventnumb[ii]->SetMarkerSize(0.2);
932        oss1.str("");
933        oss1<<"number of events in this graph: "<<maxev-minev;
934        t->SetTextColor(kBlue);
935        t->SetTextSize(0.02);
936        double xtex=0,ytex=0;
937        xtex=x[maxev-minev-1]-(x[maxev-minev-1]-x[0])/3;
938        ytex=1000.+eventnumb[ii]->GetYaxis()->GetXmax();
939        t->DrawLatex(xtex,ytex,oss1.str().c_str());
940        oss1.str("");  
941      eventnumb[ii]->Draw("ap");      eventnumb[ii]->Draw("ap");
942      EventNumCanv[ii]->Update();      EventNumCanv[ii]->Update();
943            
# Line 682  void FTrkQLook_EXPERT(TString file,Int_t Line 949  void FTrkQLook_EXPERT(TString file,Int_t
949            
950    }    }
951    
   
952    alarm.close();    alarm.close();
953    
954    //****************************************************************************************    //****************************************************************************************
# Line 775  void FTrkQLook_EXPERT(TString file,Int_t Line 1041  void FTrkQLook_EXPERT(TString file,Int_t
1041    for (Int_t i=0; i<12 ; i++){    for (Int_t i=0; i<12 ; i++){
1042                    
1043      TBox b;      TBox b;
     b.SetFillColor(6);  
     b.SetFillStyle(3945);  
1044    
1045      Float_t maxhist=0;      Float_t maxhist=0;
1046      LandauCanv1->cd();      LandauCanv1->cd();
# Line 820  void FTrkQLook_EXPERT(TString file,Int_t Line 1084  void FTrkQLook_EXPERT(TString file,Int_t
1084      illuminazione[i]->Draw("");      illuminazione[i]->Draw("");
1085      if(i==1){      if(i==1){
1086        maxhist= illuminazione[i]->GetMaximum();        maxhist= illuminazione[i]->GetMaximum();
1087        b.DrawBox(2816.,0.,3060.,maxhist);        b.SetFillColor(6);
1088          b.SetFillStyle(3945);
1089          b.DrawBox(2944.,0.,3060.,maxhist);
1090    
1091          b.SetFillColor(107);
1092          b.SetFillStyle(3954);
1093          b.DrawBox(2816.,0.,2944.,maxhist);
1094          b.DrawBox(2048.,0.,2176.,maxhist);
1095        }
1096        else if(i==4){
1097          maxhist=illuminazione[i]->GetMaximum();
1098          b.SetFillColor(107);
1099          b.SetFillStyle(3954);
1100          b.DrawBox(384.,0.,512.,maxhist);
1101      }      }
1102      else if(i==6){      else if(i==6){
1103        maxhist= illuminazione[i]->GetMaximum();        maxhist= illuminazione[i]->GetMaximum();
1104          b.SetFillColor(6);
1105          b.SetFillStyle(3945);
1106        b.DrawBox(2560.,0.,2816.,maxhist);        b.DrawBox(2560.,0.,2816.,maxhist);
1107          b.DrawBox(1024.,0.,1535.,maxhist);
1108    
1109          b.SetFillColor(107);
1110          b.SetFillStyle(3954);
1111        b.DrawBox(512.,0.,768.,maxhist);        b.DrawBox(512.,0.,768.,maxhist);
1112        b.DrawBox(1024.,0.,1792.,maxhist);        b.DrawBox(1536.,0.,1792.,maxhist);
1113        }
1114        else if(i==7){
1115          maxhist= illuminazione[i]->GetMaximum();
1116          b.SetFillColor(107);
1117          b.SetFillStyle(3954);
1118          b.DrawBox(512.,0.,768.,maxhist);
1119        }
1120        else if(i==9){
1121          maxhist=illuminazione[i]->GetMaximum();
1122          b.SetFillColor(107);
1123          b.SetFillStyle(3954);
1124          b.DrawBox(256.,0.,384.,maxhist);
1125      }      }
1126      else if(i==11){      else if(i==11){
1127        maxhist= illuminazione[i]->GetMaximum();        maxhist= illuminazione[i]->GetMaximum();
1128          b.SetFillColor(6);
1129          b.SetFillStyle(3945);
1130        b.DrawBox(768.,0.,1024.,maxhist);        b.DrawBox(768.,0.,1024.,maxhist);
1131    
1132          b.SetFillColor(107);
1133          b.SetFillStyle(3954);
1134          b.DrawBox(0.,0.,512.,maxhist);
1135          b.DrawBox(1920.,0.,2560.,maxhist);
1136      }      }
1137      IlluminaCanv->Update();      IlluminaCanv->Update();
1138    }    }
# Line 846  void FTrkQLook_EXPERT(TString file,Int_t Line 1148  void FTrkQLook_EXPERT(TString file,Int_t
1148    else if(cntpgtemp<=cntpgdat) totpg=cntpgdat;    else if(cntpgtemp<=cntpgdat) totpg=cntpgdat;
1149    
1150    for(Int_t fl=0;fl<totpg;fl++){    for(Int_t fl=0;fl<totpg;fl++){
1151    
1152      if(!strcmp(outfile.Data(),"ps")||!strcmp(outfile.Data(),"pdf")){      if(!strcmp(outfile.Data(),"ps")||!strcmp(outfile.Data(),"pdf")){
1153        out1.str("");        out1.str("");
1154        out2.str("");        out2.str("");
# Line 859  void FTrkQLook_EXPERT(TString file,Int_t Line 1162  void FTrkQLook_EXPERT(TString file,Int_t
1162          CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");          CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");
1163          EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1164          TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1165            BfieldCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1166          LandauCanv1->Print(out+out2.str().c_str(),"Portrait");          LandauCanv1->Print(out+out2.str().c_str(),"Portrait");
1167          LandauCanv2->Print(out+out2.str().c_str(),"Portrait");          LandauCanv2->Print(out+out2.str().c_str(),"Portrait");
1168          LandauCanv3->Print(out+out2.str().c_str(),"Portrait");          LandauCanv3->Print(out+out2.str().c_str(),"Portrait");
# Line 868  void FTrkQLook_EXPERT(TString file,Int_t Line 1172  void FTrkQLook_EXPERT(TString file,Int_t
1172          if(fl==0) CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");          if(fl==0) CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");
1173          if(fl>0 && fl<cntpgdat) CompTimeCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          if(fl>0 && fl<cntpgdat) CompTimeCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1174          if(fl<cntpgdat) EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          if(fl<cntpgdat) EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1175            if(fl<cntpgmag) BfieldCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1176          if(fl<cntpgtemp) TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          if(fl<cntpgtemp) TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1177          if(fl==totpg-1){          if(fl==totpg-1){
1178            LandauCanv1->Print(out+out2.str().c_str(),"Portrait");            LandauCanv1->Print(out+out2.str().c_str(),"Portrait");
# Line 882  void FTrkQLook_EXPERT(TString file,Int_t Line 1187  void FTrkQLook_EXPERT(TString file,Int_t
1187        out1<<ffile<<"_FTrkQLook_EXPERT-CompTime-pag"<<fl+1<<"."<<outfile.Data();        out1<<ffile<<"_FTrkQLook_EXPERT-CompTime-pag"<<fl+1<<"."<<outfile.Data();
1188        if(fl<cntpgdat) CompTimeCanv[fl]->Print(out+out1.str().c_str());        if(fl<cntpgdat) CompTimeCanv[fl]->Print(out+out1.str().c_str());
1189        out1.str("");        out1.str("");
1190          out1<<ffile<<"_FTrkQLook_EXPERT-BField-pag"<<fl+1<<"."<<outfile.Data();
1191          if(fl<cntpgmag) BfieldCanv[fl]->Print(out+out1.str().c_str());
1192          out1.str("");
1193        out1<<ffile<<"_FTrkQLook_EXPERT-Temp-pag"<<fl+1<<"."<<outfile.Data();        out1<<ffile<<"_FTrkQLook_EXPERT-Temp-pag"<<fl+1<<"."<<outfile.Data();
1194        if(fl<cntpgtemp) TempCanv[fl]->Print(out+out1.str().c_str());        if(fl<cntpgtemp) TempCanv[fl]->Print(out+out1.str().c_str());
1195        out1.str("");        out1.str("");
Legend:
Removed from v.1.11  
changed lines
  Added in v.1.19
  ViewVC Help
Powered by ViewVC 1.1.23