T0/AliT0CalibTimeEq.cxx

   1
   2 /**************************************************************************
   3  * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
   4  *                                                                        *
   5  * Author: The ALICE Off-line Project.                                    *
   6  * Contributors are mentioned in the code where appropriate.              *
   7  *                                                                        *
   8  * Permission to use, copy, modify and distribute this software and its   *
   9  * documentation strictly for non-commercial purposes is hereby granted   *
  10  * without fee, provided that the above copyright notice appears in all   *
  11  * copies and that both the copyright notice and this permission notice   *
  12  * appear in the supporting documentation. The authors make no claims     *
  13  * about the suitability of this software for any purpose. It is          *
  14  * provided "as is" without express or implied warranty.                  *
  15  **************************************************************************/
  16
  17 /* $Id$ */
  18
  19 ///////////////////////////////////////////////////////////////////////////////
  20 //                                                                           //
  21 // class for T0 calibration                       TM-AC-AM_6-02-2006
  22 // equalize time shift for each time CFD channel
  23 //                                                                           //
  24 ///////////////////////////////////////////////////////////////////////////////
  25
  26 #include "AliT0CalibTimeEq.h"
  27 #include "AliLog.h"
  28 #include <TFile.h>
  29 #include <TMath.h>
  30 #include <TF1.h>
  31 #include <TSpectrum.h>
  32 #include <TProfile.h>
  33 #include <iostream>
  34
  35 ClassImp(AliT0CalibTimeEq)
  36
  37 //________________________________________________________________
  38   AliT0CalibTimeEq::AliT0CalibTimeEq():TNamed(),
  39                                        fMeanVertex(0),
  40                                        fRmsVertex(0)
  41 {
  42   //
  43   for(Int_t i=0; i<24; i++) {
  44    fTimeEq[i] = 0;            // Time Equalized for OCDB
  45    fTimeEqRms[i] = -1;        // RMS of Time Equalized for OCDB
  46    for (Int_t ih=0; ih<5; ih++)   fCFDvalue[i][ih] = 0;
  47   }
  48 }
  49
  50 //________________________________________________________________
  51 AliT0CalibTimeEq::AliT0CalibTimeEq(const char* name):TNamed(),
  52                                        fMeanVertex(0),
  53                                        fRmsVertex(0)
  54 {
  55   //constructor
  56
  57   TString namst = "Calib_";
  58   namst += name;
  59   SetName(namst.Data());
  60   SetTitle(namst.Data());
  61   for(Int_t i=0; i<24; i++) {
  62    fTimeEq[i] = 0;            // Time Equalized for OCDB
  63    fTimeEqRms[i] = -1;        // RMS of Time Equalized for OCDB
  64    for (Int_t ih=0; ih<5; ih++)   fCFDvalue[i][ih] = 0;
  65   }
  66 }
  67
  68 //________________________________________________________________
  69 AliT0CalibTimeEq::AliT0CalibTimeEq(const AliT0CalibTimeEq& calibda):TNamed(calibda),
  70                                        fMeanVertex(0),
  71                                        fRmsVertex(0)
  72 {
  73 // copy constructor
  74   SetName(calibda.GetName());
  75   SetTitle(calibda.GetName());
  76   ((AliT0CalibTimeEq &) calibda).Copy(*this);
  77
  78 }
  79
  80 //________________________________________________________________
  81 AliT0CalibTimeEq &AliT0CalibTimeEq::operator =(const AliT0CalibTimeEq& calibda)
  82 {
  83 // assignment operator
  84   SetName(calibda.GetName());
  85   SetTitle(calibda.GetName());
  86
  87   if (this != &calibda) (( AliT0CalibTimeEq &) calibda).Copy(*this);
  88   return *this;
  89 }
  90
  91 //________________________________________________________________
  92 AliT0CalibTimeEq::~AliT0CalibTimeEq()
  93 {
  94   //
  95   // destrictor
  96 }
  97 //________________________________________________________________
  98 void AliT0CalibTimeEq::Reset()
  99 {
 100   //reset values
 101
 102   memset(fCFDvalue,0,120*sizeof(Float_t));
 103   memset(fTimeEq,1,24*sizeof(Float_t));
 104 }
 105
 106
 107 //________________________________________________________________
 108 void  AliT0CalibTimeEq::Print(Option_t*) const
 109 {
 110   // print time values
 111
 112   printf("\n    ----    PM Arrays       ----\n\n");
 113   printf(" Time delay CFD \n");
 114   for (Int_t i=0; i<24; i++)
 115     printf(" CFD  %f diff %f  \n",fCFDvalue[i][0],fTimeEq[i]);
 116 }
 117
 118
 119 //________________________________________________________________
 120 Bool_t AliT0CalibTimeEq::ComputeOnlineParams(const char* filePhys)
 121 {
 122   // compute online equalized time
 123   Float_t meandiff, sigmadiff, meanver, meancfdtime, sigmacfdtime;
 124   meandiff = sigmadiff =  meanver = meancfdtime = sigmacfdtime =0;
 125   Double_t rmsver=0;
 126   Int_t nent=0;
 127   Int_t okdiff=0;
 128   Int_t oktime=0;
 129   Bool_t ok=false;
 130   //
 131   gFile = TFile::Open(filePhys);
 132   if(!gFile) {
 133     AliError("No input PHYS data found ");
 134   }
 135   else
 136     {
 137       ok=true;
 138       for (Int_t i=0; i<24; i++)
 139         {
 140           meandiff = sigmadiff =  meanver = meancfdtime = sigmacfdtime =0;
 141           TH1F *cfd     = (TH1F*) gFile->Get(Form("CFD1minCFD%d",i+1));
 142           TH1F *cfdtime = (TH1F*) gFile->Get(Form("CFD%d",i+1));
 143           if(!cfd) {
 144             AliWarning(Form("no Diff histograms collected by PHYS DA for channel %i", i));
 145             okdiff++;
 146             if(okdiff<4) {
 147               meandiff = 0;
 148               sigmadiff = 0;
 149             }
 150             else
 151               ok = false;
 152           }
 153           if(!cfdtime) {
 154             AliWarning(Form("no CFD histograms collected by PHYS DA for channel %i", i));
 155             oktime++;
 156             if(oktime<4) {
 157               meancfdtime = 0;
 158             }
 159             else
 160               ok = false;
 161           }
 162           if(cfd) {
 163             nent = Int_t(cfd->GetEntries());
 164             if( nent<=50) {
 165               okdiff++;
 166               //              printf(" pmt %i nent %i cfd->GetRMS() %f cfd->GetMean() %f \n",
 167               //     i, nent, cfd->GetRMS(), cfd->GetMean() );
 168               if(okdiff<4) {
 169                 meandiff = 0;
 170                 sigmadiff = 0;
 171               }
 172               else
 173                 {
 174                   // printf(" OK fsle:: pmt %i nent %i cfd->GetRMS() %f cfd->GetMean() %f \n",
 175                   // i, nent, cfd->GetRMS(), cfd->GetMean() );
 176                   AliWarning(Form(" Not  enouph data in PMT %i- PMT1:  %i ", i, nent));
 177                   ok = false;
 178                 }
 179             }
 180             if(nent>50)  {
 181               if(cfd->GetRMS()>1.5 )
 182                 GetMeanAndSigma(cfd, meandiff, sigmadiff);
 183               if(cfd->GetRMS()<=1.5)
 184                 {
 185                   meandiff = cfd->GetMean();
 186                   sigmadiff=cfd->GetRMS();
 187                 }
 188               Int_t   maxBin = cfd->GetMaximumBin();
 189               Double_t  meanEstimate = cfd->GetBinCenter( maxBin);
 190               if(TMath::Abs(meanEstimate - meandiff) > 20 ) meandiff = meanEstimate;
 191             }
 192           }
 193
 194           if(cfdtime) {
 195             nent = Int_t(cfdtime->GetEntries());
 196             if( nent<=50  ) {
 197               oktime++;
 198               if(oktime<4) {
 199                 meancfdtime = 0;
 200               }
 201               else
 202                 {
 203                   AliWarning(Form(" Not  enouph data in PMT %i:  %i ", i, nent));
 204                   ok = false;
 205                 }
 206             }
 207             if(nent > 50  )  { //!!!!!!!!!!
 208               if(cfdtime->GetRMS()>1.5 )
 209                 GetMeanAndSigma(cfdtime,meancfdtime, sigmacfdtime);
 210               if(cfdtime->GetRMS()<=1.5)
 211                 {
 212                   if(cfdtime->GetRMS()==0 ||cfdtime->GetMean()==0 ) {
 213                     ok = false;
 214                   }
 215                   meancfdtime = cfdtime->GetMean();
 216                   sigmacfdtime = cfdtime->GetRMS();
 217                 }
 218               Int_t   maxBin = cfdtime->GetMaximumBin();
 219               Double_t  meanEstimate = cfdtime->GetBinCenter( maxBin);
 220               if(TMath::Abs(meanEstimate - meancfdtime) > 20 ) meancfdtime = meanEstimate;
 221             }
 222           }
 223           SetTimeEq(i,meandiff);
 224           SetTimeEqRms(i,sigmadiff);
 225           SetCFDvalue(i,0,meancfdtime);
 226           if (cfd) delete cfd;
 227           if (cfdtime) delete cfdtime;
 228         }
 229       TH1F *ver = (TH1F*) gFile->Get("hVertex") ;
 230       if(ver) {
 231         meanver = ver->GetMean();
 232         rmsver = ver->GetRMS();
 233       }
 234       SetMeanVertex(meanver);
 235       SetRmsVertex(rmsver);
 236       gFile->Close();
 237       delete gFile;
 238     }
 239     return ok;
 240 }
 241
 242 //________________________________________________________________
 243 Int_t AliT0CalibTimeEq::ComputeOfflineParams(const char* filePhys, Float_t *timecdb, Float_t *cfdvalue, Int_t badpmt)
 244 {
 245   // fStatus implementation:
 246   //ok means
 247   // 1000  - can not open file
 248   // for timediff
 249   // 20 >3 histos are empty
 250   // -11  low statistics oe empty histos in few channels; for these channels OCDB value will be written back WARNING
 251   // for cfd
 252   // 20 >2 histos are empty or with low statistic
 253   // -11 if less 3 channels are empty or low statistics in few channels ;for these channels OCDB value will be written back WARNING
 254    //
 255   // compute offline equalized time
 256   Float_t meandiff, sigmadiff, meanver, meancfdtime, sigmacfdtime;
 257   meandiff = sigmadiff =  meanver = meancfdtime = sigmacfdtime =0;
 258   Int_t nent=0;
 259   Int_t ok = 0;
 260   Int_t okdiff=0;
 261   Int_t okcfd=0;
 262   TH1F *cfddiff = NULL;
 263   TH1F *cfdtime = NULL;
 264   TObjArray * tzeroObj = NULL;
 265
 266   gFile = TFile::Open(filePhys);
 267   if(!gFile) {
 268     AliError("No input PHYS data found ");
 269     ok = 1000;
 270     return ok;
 271   }
 272   else
 273     {
 274       meandiff = sigmadiff =  meanver = meancfdtime = sigmacfdtime =0;
 275       //      TDirectory *dr = (TDirectory*) gFile->Get("T0Calib");
 276       tzeroObj = dynamic_cast<TObjArray*>(gFile->Get("T0Calib"));
 277       for (Int_t i=0; i<24; i++)
 278         {
 279           if (i != badpmt) {
 280             if(tzeroObj) {
 281               cfddiff = (TH1F*) tzeroObj->FindObject(Form("CFD1minCFD%d",i+1));
 282               cfdtime = (TH1F*)tzeroObj->FindObject(Form("CFD%d",i+1));
 283             }
 284             else
 285               {
 286                 cfddiff = (TH1F*)gFile->Get(Form("CFD1minCFD%d",i+1));
 287                 cfdtime = (TH1F*)gFile->Get(Form("CFD%d",i+1));
 288
 289               }
 290             if(!cfddiff ) {
 291               AliWarning(Form("no  histograms collected by pass0 for diff channel %i\n", i));
 292                 meandiff = timecdb[i];
 293                 sigmadiff = 0;
 294               }
 295             if(cfddiff) {
 296               nent = Int_t(cfddiff->GetEntries());
 297               if ( nent == 0  ) {
 298                 AliWarning(Form("no  entries in histogram for diff channel %i\n", i));
 299                 meandiff = timecdb[i];
 300                 sigmadiff = 0;
 301               }
 302               if(nent<=100 && nent>0) { //!!!!!
 303                 AliWarning(Form(" Not  enouph data in PMT %i- PMT1:  %i \n", i, nent));
 304                 meandiff = timecdb[i];
 305                 sigmadiff = 0;
 306               }
 307               if(nent>=100 )  { //!!!!!
 308                 {
 309                   if(cfddiff->GetRMS()>1.5 )
 310                     GetMeanAndSigma(cfddiff, meandiff, sigmadiff);
 311                   if(cfddiff->GetRMS()<=1.5)
 312                     {
 313                       meandiff = cfddiff->GetMean();
 314                       sigmadiff = cfddiff->GetRMS();
 315                     }
 316                   Int_t   maxBin = cfddiff->GetMaximumBin();
 317                   Double_t  meanEstimate = cfddiff->GetBinCenter( maxBin);
 318                   if(TMath::Abs(meanEstimate - meandiff) > 20 ) meandiff = meanEstimate;
 319                 }
 320               }
 321             }
 322             if(!cfdtime ) {
 323               AliWarning(Form("no  histograms collected by pass0 for time channel %i", i));
 324               meancfdtime = cfdvalue[i];
 325               okcfd++;
 326               if(okcfd<2) {
 327                 meancfdtime = cfdvalue[i];
 328                 //      ok = -11;
 329               }
 330               else {
 331                 AliError(Form("no  histograms collected by pass0 for time %i channels ", okcfd));
 332                 return 20;
 333               }
 334             }
 335             if(cfdtime) {
 336               nent = Int_t(cfdtime->GetEntries());
 337               if (nent == 0 ||
 338                   (cfdtime->GetRMS() == 0 || cfdtime->GetMean() ==0 ) )
 339                 {
 340                   okcfd++;
 341                   if(okcfd<2) {
 342                     meancfdtime = cfdvalue[i];
 343                     //   ok = -11;
 344                     printf("!!!!bad data:: pmt %i nent%i RMS %f mean %f cdbtime %f \n",
 345                            i, nent, cfdtime->GetRMS(), cfdtime->GetMean(), cfdvalue[i] );
 346                   }
 347                   else
 348                     {
 349                     printf("!!!!fatal data:: pmt %i nent%i RMS %f mean %f cdbtime %f \n",
 350                            i, nent, cfdtime->GetRMS(), cfdtime->GetMean(), cfdvalue[i]);
 351                       AliError(Form(" histograms collected by pass0 for time %i channels are empty", okcfd));
 352                       return 20;
 353                     }
 354                 }
 355
 356
 357               if(nent<=100 && nent>0 )
 358                 {
 359                   okcfd++;
 360                 AliWarning(Form(" Not  enouph data in PMT in CFD peak %i - %i ", i, nent));
 361                   meancfdtime = cfdvalue[i];
 362                   ok = -11;
 363                   printf("!!!!low statstics:: pmt %i nent%i RMS %f mean %f cdbtime %f \n",
 364                          i, nent, cfdtime->GetRMS(), cfdtime->GetMean(),  cfdvalue[i]);
 365                   if (okcfd>3) return ok;
 366                 }
 367
 368               if( nent>100 )    { //!!!!!
 369                 if(cfdtime->GetRMS()>1.5 )
 370                   GetMeanAndSigma(cfdtime,meancfdtime, sigmacfdtime);
 371                 if(cfdtime->GetRMS()<=1.5)
 372                   {
 373                     meancfdtime = cfdtime->GetMean();
 374                     sigmacfdtime=cfdtime->GetRMS();
 375                   }
 376                 Int_t   maxBin = cfdtime->GetMaximumBin();
 377                 Double_t  meanEstimate = cfdtime->GetBinCenter( maxBin);
 378                 if(TMath::Abs(meanEstimate - meancfdtime) > 20 ) meancfdtime = meanEstimate;
 379             }
 380           }
 381
 382           SetTimeEq(i,meandiff);
 383           SetTimeEqRms(i,sigmadiff);
 384           SetCFDvalue(i,0, meancfdtime );
 385           if (cfddiff) cfddiff->Reset();
 386           if (cfdtime) cfdtime->Reset();
 387           } //bad pmt
 388         }
 389       gFile->Close();
 390       delete gFile;
 391     }
 392     return ok;
 393    }
 394
 395 //________________________________________________________________________
 396 void AliT0CalibTimeEq::GetMeanAndSigma(TH1F* hist,  Float_t &mean, Float_t &sigma) {
 397
 398   const double window = 5.;  //fit window
 399   double meanEstimate, sigmaEstimate;
 400   int maxBin;
 401   maxBin        =  hist->GetMaximumBin(); //position of maximum
 402   meanEstimate  =  hist->GetBinCenter( maxBin); // mean of gaussian sitting in maximum
 403   sigmaEstimate = hist->GetRMS();
 404   // sigmaEstimate = 10;
 405   TF1* fit= new TF1("fit","gaus", meanEstimate - window*sigmaEstimate, meanEstimate + window*sigmaEstimate);
 406   fit->SetParameters(hist->GetBinContent(maxBin), meanEstimate, sigmaEstimate);
 407   hist->Fit("fit","QR","");
 408
 409   mean  = (Float_t) fit->GetParameter(1);
 410   sigma = (Float_t) fit->GetParameter(2);
 411
 412   delete fit;
 413 }
 414
 415