// Event loop outside of the component
//
//
+// Base functionality to be implemeneted by component
+/*
+ //In some cases only one of this function to be implemented
+ virtual void Process(AliESDEvent *event)
+ virtual void Process(AliTPCseed *track)
+ //
+ virtual Long64_t Merge(TCollection *li);
+ virtual void Analyze()
+ void Terminate();
+*/
+// Functionality provided by base class for Algorith debuging:
+// TTreeSRedirector * cstream = GetDebugStreamer() - get debug streamer which can be use for numerical debugging
+//
+
+
+
+// marian.ivanov@cern.ch
//
#include "AliTPCcalibBase.h"
+#include "TSystem.h"
+#include "TFile.h"
+#include "TTreeStream.h"
+#include "TTimeStamp.h"
+#include "TGraph.h"
+#include "TGraphErrors.h"
+#include "TF1.h"
+#include "TH1D.h"
+#include "TH2D.h"
+#include "THnSparse.h"
+
+
+#include "AliLog.h"
+#include "AliESDEvent.h"
+
ClassImp(AliTPCcalibBase)
-AliTPCcalibBase::AliTPCcalibBase()
+AliTPCcalibBase::AliTPCcalibBase():
+ TNamed(),
+ fDebugStreamer(0),
+ fStreamLevel(0),
+ fRun(0), //! current Run number
+ fEvent(0), //! current Event number
+ fTime(0), //! current Time
+ fTrigger(0), //! current trigger type
+ fMagF(0), //! current magnetic field
+ fTriggerMaskReject(-1), //trigger mask - reject trigger
+ fTriggerMaskAccept(-1), //trigger mask - accept trigger
+ fHasLaser(kFALSE), //flag the laser is overlayed with given event
+ fRejectLaser(kTRUE), //flag- reject laser
+ fTriggerClass(),
+ fDebugLevel(0)
+{
+ //
+ // Constructor
+ //
+}
+
+AliTPCcalibBase::AliTPCcalibBase(const char * name, const char * title):
+ TNamed(name,title),
+ fDebugStreamer(0),
+ fStreamLevel(0),
+ fRun(0), //! current Run number
+ fEvent(0), //! current Event number
+ fTime(0), //! current Time
+ fTrigger(0), //! current trigger type
+ fMagF(0), //! current magnetic field
+ fTriggerMaskReject(-1), //trigger mask - reject trigger
+ fTriggerMaskAccept(-1), //trigger mask - accept trigger
+ fHasLaser(kFALSE), //flag the laser is overlayed with given event
+ fRejectLaser(kTRUE), //flag- reject laser
+ fTriggerClass(),
+ fDebugLevel(0)
{
//
// Constructor
//
}
+AliTPCcalibBase::AliTPCcalibBase(const AliTPCcalibBase&calib):
+ TNamed(calib),
+ fDebugStreamer(0),
+ fStreamLevel(calib.fStreamLevel),
+ fRun(0), //! current Run number
+ fEvent(0), //! current Event number
+ fTime(0), //! current Time
+ fTrigger(0), //! current trigger type
+ fMagF(0), //! current magnetic field
+ fTriggerMaskReject(calib.fTriggerMaskReject), //trigger mask - reject trigger
+ fTriggerMaskAccept(calib.fTriggerMaskAccept), //trigger mask - accept trigger
+ fHasLaser(calib.fHasLaser), //flag the laser is overlayed with given event
+ fRejectLaser(calib.fRejectLaser), //flag- reject laser
+ fTriggerClass(calib.fTriggerClass),
+ fDebugLevel(calib.fDebugLevel)
+{
+ //
+ // copy constructor
+ //
+}
+
+AliTPCcalibBase &AliTPCcalibBase::operator=(const AliTPCcalibBase&calib){
+ //
+ //
+ //
+ ((TNamed *)this)->operator=(calib);
+ fDebugStreamer=0;
+ fStreamLevel=calib.fStreamLevel;
+ fDebugLevel=calib.fDebugLevel;
+ return *this;
+}
+
+
AliTPCcalibBase::~AliTPCcalibBase() {
//
// destructor
//
+ if (fDebugLevel>0) printf("AliTPCcalibBase::~AliTPCcalibBase\n");
+ if (fDebugStreamer) delete fDebugStreamer;
+ fDebugStreamer=0;
+}
+
+void AliTPCcalibBase::Terminate(){
+ //
+ //
+ //
+ if (fDebugLevel>0) printf("AliTPCcalibBase::Terminate\n");
+ if (fDebugStreamer) delete fDebugStreamer;
+ fDebugStreamer = 0;
+ return;
+}
+
+TTreeSRedirector *AliTPCcalibBase::GetDebugStreamer(){
+ //
+ // Get Debug streamer
+ // In case debug streamer not yet initialized and StreamLevel>0 create new one
+ //
+ if (fStreamLevel==0) return 0;
+ if (fDebugStreamer) return fDebugStreamer;
+ TString dsName;
+ dsName=GetName();
+ dsName+="Debug.root";
+ dsName.ReplaceAll(" ","");
+ fDebugStreamer = new TTreeSRedirector(dsName.Data());
+ return fDebugStreamer;
+}
+
+
+void AliTPCcalibBase::UpdateEventInfo(AliESDEvent * event){
+ //
+ //
+ //
+ fRun = event->GetRunNumber();
+ fEvent = event->GetEventNumberInFile();
+ fTime = event->GetTimeStamp();
+ fTrigger = event->GetTriggerMask();
+ fMagF = event->GetMagneticField();
+ fTriggerClass = event->GetFiredTriggerClasses().Data();
+ fHasLaser = HasLaser(event);
+
+}
+
+
+Bool_t AliTPCcalibBase::HasLaser(AliESDEvent *event){
+ //
+ //
+ //
+ // Thresholds more than 8 tracks with small dip angle
+
+ const Int_t kMinLaserTracks = 8;
+ const Float_t kThrLaser = 0.3;
+ const Float_t kLaserTgl = 0.01;
+
+ Int_t ntracks = event->GetNumberOfTracks();
+ if (ntracks<kMinLaserTracks) return kFALSE;
+ Float_t nlaser=0;
+ Float_t nall=0;
+ for (Int_t i=0;i<ntracks;++i) {
+ AliESDtrack *track=event->GetTrack(i);
+ if (!track) continue;
+ if (track->GetTPCNcls()<=0) continue;
+ nall++;
+ if (TMath::Abs(track->GetTgl())<kLaserTgl) nlaser++;
+ }
+ if (nlaser>kMinLaserTracks) return kTRUE;
+ if (nall>0 && nlaser/nall>kThrLaser) return kTRUE;
+ return kFALSE;
+}
+
+
+
+Bool_t AliTPCcalibBase::AcceptTrigger(){
+ //
+ // Apply trigger mask - Don't do calibration for non proper triggers
+ //
+ if (fTriggerMaskReject==(Int_t)fTrigger) return kFALSE;
+ if (fTriggerMaskAccept>0 && fTriggerMaskAccept!=(Int_t)fTrigger) return kFALSE;
+ if (fHasLaser && fRejectLaser) return kFALSE;
+ return kTRUE;
+}
+
+
+void AliTPCcalibBase::RegisterDebugOutput(const char *path){
+ //
+ // store - copy debug output to the destination position
+ // currently ONLY for local copy
+ if (fDebugLevel>0) printf("AliTPCcalibBase::RegisterDebugOutput(%s)\n",path);
+ if (fStreamLevel==0) return;
+ TString dsName;
+ dsName=GetName();
+ dsName+="Debug.root";
+ dsName.ReplaceAll(" ","");
+ TString dsName2=path;
+ gSystem->MakeDirectory(dsName2.Data());
+ dsName2+=gSystem->HostName();
+ gSystem->MakeDirectory(dsName2.Data());
+ dsName2+="/";
+ TTimeStamp s;
+ dsName2+=Int_t(s.GetNanoSec());
+ dsName2+="/";
+ gSystem->MakeDirectory(dsName2.Data());
+ dsName2+=dsName;
+ AliInfo(Form("copy %s\t%s\n",dsName.Data(),dsName2.Data()));
+ printf("copy %s\t%s\n",dsName.Data(),dsName2.Data());
+ TFile::Cp(dsName.Data(),dsName2.Data());
+}
+
+
+
+TGraphErrors * AliTPCcalibBase::FitSlices(THnSparse *h, Int_t axisDim1, Int_t axisDim2, Int_t minEntries, Int_t nmaxBin, Float_t fracLow, Float_t fracUp, Bool_t useMedian, TTreeSRedirector *cstream){
+ //
+ // Fitting slices of the projection(axisDim1,axisDim2) of a sparse histogram
+ //
+ TF1 funcGaus("funcGaus","gaus");
+ TH2D * hist = h->Projection(axisDim1, axisDim2);
+ Double_t *xvec = new Double_t[hist->GetNbinsX()];
+ Double_t *yvec = new Double_t[hist->GetNbinsX()];
+ Double_t *xerr = new Double_t[hist->GetNbinsX()];
+ Double_t *yerr = new Double_t[hist->GetNbinsX()];
+ Int_t counter = 0;
+ TH1D * projectionHist =0;
+ //
+
+ for(Int_t i=1; i < hist->GetNbinsX(); i++) {
+ Int_t nsum=0;
+ Int_t imin = i;
+ Int_t imax = i;
+
+ for (Int_t idelta=0; idelta<nmaxBin; idelta++){
+ //
+ imin = TMath::Max(i-idelta,1);
+ imax = TMath::Min(i+idelta,hist->GetNbinsX());
+ nsum = TMath::Nint(hist->Integral(imin,imax,0,hist->GetNbinsY()));
+ if (nsum==0) break;
+ if (nsum>minEntries) break;
+ }
+ if (nsum<minEntries) continue;
+ //
+ hist->GetXaxis()->SetRange(imin,imax);
+ projectionHist = hist->ProjectionY("gain",imin,imax);
+ // Determine Median:
+ Float_t xMin = projectionHist->GetXaxis()->GetXmin();
+ Float_t xMax = projectionHist->GetXaxis()->GetXmax();
+ Float_t xMedian = (xMin+xMax)*0.5;
+ Float_t integral = 0;
+ for(Int_t jbin=1; jbin<projectionHist->GetNbinsX()-1; jbin++) {
+ integral+=projectionHist->GetBinContent(jbin);
+ }
+ //printf("Integral %f\t%f\n",integral, projectionHist->GetSum());
+ //
+ //
+ Float_t currentSum=0;
+ for(Int_t jbin=1; jbin<projectionHist->GetNbinsX()-1; jbin++) {
+ currentSum += projectionHist->GetBinContent(jbin);
+ if (currentSum<fracLow*integral) xMin = projectionHist->GetBinCenter(jbin);
+ if (currentSum<fracUp*integral) xMax = projectionHist->GetBinCenter(jbin+1);
+ if (currentSum<0.5*integral && projectionHist->GetBinContent(jbin)>0){
+ xMedian = (projectionHist->GetBinCenter(jbin)*projectionHist->GetBinContent(jbin)+
+ projectionHist->GetBinCenter(jbin+1)*projectionHist->GetBinContent(jbin+1))/
+ (projectionHist->GetBinContent(jbin)+projectionHist->GetBinContent(jbin+1));
+ }
+ }
+ //
+ Float_t rms = projectionHist->GetRMS();
+ // i += interval;
+ //
+ Double_t xcenter = hist->GetMean();
+ Double_t xrms = hist->GetRMS()+hist->GetXaxis()->GetBinWidth(1)/TMath::Sqrt(12.);
+ Double_t binWidth = projectionHist->GetXaxis()->GetBinWidth(1);
+ if (rms>0){
+ // cut on +- 4 RMS
+ projectionHist->Fit(&funcGaus,"QN","",xMin, xMax);
+ Double_t chi2 = funcGaus.GetChisquare();
+ //
+ xvec[counter] = xcenter;
+ yvec[counter] = funcGaus.GetParameter(1);
+ xerr[counter] = xrms;
+ yerr[counter] = funcGaus.GetParError(1);
+ if (useMedian) yvec[counter] = xMedian;
+ if (cstream){
+ (*cstream)<<"fitDebug"<<
+ "xcenter="<<xcenter<<
+ "xMin="<<xMin<<
+ "xMax="<<xMax<<
+ "xMedian="<<xMedian<<
+ "xFitM"<<yvec[counter]<<
+ "xFitS"<<yerr[counter]<<
+ "chi2="<<chi2<<
+ "\n";
+ }
+ counter++;
+ }else{
+ xvec[counter] = xcenter;
+ yvec[counter] = xMedian;
+ xerr[counter] = xrms;
+ yerr[counter] = binWidth/TMath::Sqrt(12.);
+ counter++;
+ }
+ delete projectionHist;
+ }
+
+ TGraphErrors * graphErrors = new TGraphErrors(counter, xvec, yvec, xerr, yerr);
+ delete [] xvec;
+ delete [] yvec;
+ delete [] xerr;
+ delete [] yerr;
+ delete hist;
+ return graphErrors;
}