[u/mrichter/AliRoot.git] / FMD / AliFMDBackgroundCorrection.cxx

/**************************************************************************
 * Copyright(c) 2004, ALICE Experiment at CERN, All rights reserved. *
 *                                                                        *
 * Author: The ALICE Off-line Project.                                    *
 * Contributors are mentioned in the code where appropriate.              *
 *                                                                        *
 * Permission to use, copy, modify and distribute this software and its   *
 * documentation strictly for non-commercial purposes is hereby granted   *
 * without fee, provided that the above copyright notice appears in all   *
 * copies and that both the copyright notice and this permission notice   *
 * appear in the supporting documentation. The authors make no claims     *
 * about the suitability of this software for any purpose. It is          *
 * provided "as is" without express or implied warranty.                  *
 **************************************************************************/

// Thil class computes background corrections for the FMD. The correction is computed 
// in eta,phi cells and the objects stored can be put into alien to use with analysis.
// It is based on the AliFMDInput class that is used to loop over hits and primaries.
//
// Author: Hans Hjersing Dalsgaard, NBI, hans.dalsgaard@cern.ch
//
//

#include "AliSimulation.h"
#include "TStopwatch.h"
#include "iostream"
#include "TGrid.h"
#include "AliRunLoader.h"
#include "AliGeomManager.h"
#include "AliFMDGeometry.h"
#include "AliStack.h"
#include "TParticle.h"
#include "TDatabasePDG.h"
#include "TParticlePDG.h"
#include "AliRun.h"
#include "AliFMDBackgroundCorrection.h"
#include "TSystem.h"
#include "AliCDBManager.h"
#include "TTree.h"
#include "TClonesArray.h"
#include "TBranch.h"
#include "AliFMDHit.h"
#include "AliLoader.h" 
#include "AliFMD.h"
#include "TH2F.h"
#include "AliGenEventHeader.h"
#include "AliHeader.h"
#include "TFile.h"
#include "TAxis.h"
#include "AliCDBId.h"
#include "AliCDBMetaData.h"
#include "TROOT.h"
#include "AliFMDParameters.h"
#include "AliLog.h"
#include "TList.h"
#include "AliFMDAnaParameters.h"
#include "AliFMDAnaCalibBackgroundCorrection.h"
#include "AliTrackReference.h"
#include "AliFMDStripIndex.h"

ClassImp(AliFMDBackgroundCorrection)
//_____________________________________________________________________
AliFMDBackgroundCorrection::AliFMDBackgroundCorrection() : 
  TNamed(),
  fCorrectionArray(),
  fPrimaryList()
{} 

//_____________________________________________________________________
AliFMDBackgroundCorrection::AliFMDInputBG::AliFMDInputBG(Bool_t hits_not_trackref) : 
  AliFMDInput("galice.root"),
  fPrimaryArray(),
  fHitArray(),
  fPrim(0),
  fHits(0),
  fZvtxCut(0),
  fNvtxBins(0),
  fPrevTrack(-1),
  fPrevDetector(-1),
  fPrevRing('Q'),
  fPrevSec(-1),
  fNbinsEta(100)
{
  AddLoad(kTracks); 
  if(hits_not_trackref)
    AddLoad(kHits);
  else
    AddLoad(kTrackRefs);
  AddLoad(kKinematics); 
  AddLoad(kHeader);
}

//_____________________________________________________________________

void AliFMDBackgroundCorrection::GenerateBackgroundCorrection(Bool_t from_hits,
							      const Int_t nvtxbins,
							      Float_t zvtxcut, 
							      const Int_t nBinsEta, 
							      Bool_t storeInAlien, 
							      Int_t runNo,
							      Int_t endRunNo, 
							      const Char_t* filename, 
							      Bool_t simulate,
							      Int_t nEvents,
							      Bool_t inFile,
							      const Char_t* infilename) {
  
  //TGrid::Connect("alien:",0,0,"t");
  if(simulate)
    Simulate(nEvents);
  else {
    //AliCDBManager::Instance()->SetDefaultStorage("alien://Folder=/alice/data/2008/LHC08d/OCDB/");
    AliCDBManager::Instance()->SetDefaultStorage("local://$ALICE_ROOT");
    AliCDBManager::Instance()->SetRun(runNo);
    
#if defined(__CINT__)
    gSystem->Load("liblhapdf");
    gSystem->Load("libEGPythia6");
    gSystem->Load("libpythia6");
    gSystem->Load("libAliPythia6");
    gSystem->Load("libgeant321");
#endif
      // 
  }  
  
  //Setting up the geometry
  //-----------------------------------------------
  if (AliGeomManager::GetGeometry() == NULL)
    AliGeomManager::LoadGeometry();
  
  AliFMDGeometry* geo = AliFMDGeometry::Instance();
  geo->Init();
  geo->InitTransformations();
    
  AliInfo("Processing hits and primaries ");
  
  AliFMDInputBG input(from_hits);
  
  if(!inFile) {
  
    input.SetVtxCutZ(zvtxcut);
    input.SetNvtxBins(nvtxbins);
    input.SetNbinsEta(nBinsEta);
    input.Run();
  }
  
  AliInfo(Form("Found %d primaries and %d hits.", input.GetNprim(),input.GetNhits()));
  TObjArray* hitArray ;
  TObjArray* primaryArray;
  if(inFile) {
    TFile* infile = TFile::Open(infilename);
    hitArray     = new TObjArray();
    primaryArray = new TObjArray();
    
    for(Int_t det =1; det<=3;det++)
      {
	TObjArray* detArrayHits = new TObjArray();
	detArrayHits->SetName(Form("FMD%d",det));
	hitArray->AddAtAndExpand(detArrayHits,det);
	Int_t nRings = (det==1 ? 1 : 2);
	for(Int_t ring = 0;ring<nRings;ring++)
	  {
	    
	    Char_t ringChar = (ring == 0 ? 'I' : 'O');
	    TObjArray* vtxArrayHits = new TObjArray();
	    vtxArrayHits->SetName(Form("FMD%d%c",det,ringChar));
	    detArrayHits->AddAtAndExpand(vtxArrayHits,ring);
	    for(Int_t v=0; v<nvtxbins;v++)
	      {
	      
		TH2F* hHits          = (TH2F*)infile->Get(Form("hHits_FMD%d%c_vtx%d",det,ringChar,v));
		
		
	      vtxArrayHits->AddAtAndExpand(hHits,v);
	      	      
	    } 
	}
      
    }
    
    for(Int_t iring = 0; iring<2;iring++) {
      Char_t ringChar = (iring == 0 ? 'I' : 'O');
      TObjArray* ringArray = new TObjArray();
      ringArray->SetName(Form("FMD_%c",ringChar));
      primaryArray->AddAtAndExpand(ringArray,iring);
      for(Int_t v=0; v<nvtxbins;v++) {
	
	TH2F* hPrimary       = (TH2F*)infile->Get(Form("hPrimary_FMD_%c_vtx%d",ringChar,v));
	ringArray->AddAtAndExpand(hPrimary,v);
      }
    }
    
    
  }
  else {
    hitArray     = input.GetHits();
    primaryArray = input.GetPrimaries();
  }
  fCorrectionArray.SetName("FMD_bg_correction");
  fCorrectionArray.SetOwner();
   
  TList* primaryList     = new TList();
  primaryList->SetName("primaries");
  
  TList* hitList     = new TList();
  hitList->SetName("hits");
  TList* corrList    = new TList();
  corrList->SetName("corrections");
  
  AliFMDAnaCalibBackgroundCorrection* background = new AliFMDAnaCalibBackgroundCorrection();
  
  for(Int_t det= 1; det <=3; det++) {
    Int_t nRings = (det==1 ? 1 : 2);
    
    TObjArray* detArrayCorrection = new TObjArray();
    detArrayCorrection->SetName(Form("FMD%d",det));
    fCorrectionArray.AddAtAndExpand(detArrayCorrection,det);
    
    
    for(Int_t iring = 0; iring<nRings; iring++) {
      TObjArray* primRingArray = (TObjArray*)primaryArray->At(iring);
      Char_t ringChar = (iring == 0 ? 'I' : 'O');
      TObjArray* vtxArrayCorrection = new TObjArray();
      vtxArrayCorrection->SetName(Form("FMD%d%c",det,ringChar));
      detArrayCorrection->AddAtAndExpand(vtxArrayCorrection,iring);
      
      for(Int_t vertexBin=0;vertexBin<nvtxbins;vertexBin++) {
	TObjArray* detArray  = (TObjArray*)hitArray->At(det);
	TObjArray* vtxArray  = (TObjArray*)detArray->At(iring);
	TH2F* hHits          = (TH2F*)vtxArray->At(vertexBin);
	hitList->Add(hHits);
	TH2F* hPrimary  = (TH2F*)primRingArray->At(vertexBin);
	primaryList->Add(hPrimary);
	TH2F* hCorrection = (TH2F*)hHits->Clone(Form("FMD%d%c_vtxbin_%d_correction",det,ringChar,vertexBin));
	hCorrection->Divide(hPrimary);
	corrList->Add(hCorrection);
	hCorrection->SetTitle(hCorrection->GetName());
	vtxArrayCorrection->AddAtAndExpand(hCorrection,vertexBin);
	background->SetBgCorrection(det,ringChar,vertexBin,hCorrection);
      }
      
    }
  }
  
  TAxis refAxis(nvtxbins,-1*zvtxcut,zvtxcut);
  if(inFile) {
    TFile* infile = TFile::Open(infilename);
    TAxis* refaxis = (TAxis*)infile->Get("vertexbins");
    background->SetRefAxis(refaxis);
      
  }
  else background->SetRefAxis(&refAxis);
  
  TFile*  fout = new TFile(filename,"RECREATE");
  refAxis.Write("vertexbins");
  
  hitList->Write();
  primaryList->Write();
  corrList->Write();
   
  TObjArray* container = new TObjArray();
  container->SetOwner();
  container->AddAtAndExpand(&refAxis,0);
  container->AddAtAndExpand(&fCorrectionArray,1);
  container->AddAtAndExpand(hitArray,2);
  container->AddAtAndExpand(primaryArray,3);
  
  
  if(storeInAlien) {
    AliCDBManager* cdb = AliCDBManager::Instance();
    cdb->SetDefaultStorage("local://$ALICE_ROOT");
    AliCDBId      id(AliFMDAnaParameters::GetBackgroundPath(),runNo,endRunNo);
    
    AliCDBMetaData* meta = new AliCDBMetaData;				
    meta->SetResponsible(gSystem->GetUserInfo()->fRealName.Data());	
    meta->SetAliRootVersion(gROOT->GetVersion());			
    meta->SetBeamPeriod(1);						
    meta->SetComment("Background Correction for FMD");
    meta->SetProperty("key1", background );
    cdb->Put(background, id, meta);
    
  }
  
  fout->Close();
 
  
  }

//_____________________________________________________________________
void AliFMDBackgroundCorrection::Simulate(Int_t nEvents) {
  
  AliSimulation sim ; 
  sim.SetRunNumber(0);
  TGrid::Connect("alien:",0,0,"t");
  sim.SetDefaultStorage("alien://Folder=/alice/data/2008/LHC08d/OCDB/");
  sim.SetConfigFile("Config.C");
  sim.SetRunQA("FMD:");
  TStopwatch timer;
  timer.Start();
  sim.RunSimulation(nEvents);    
  timer.Stop();
  timer.Print();
  
}

//_____________________________________________________________________
Bool_t 
AliFMDBackgroundCorrection::AliFMDInputBG::ProcessHit(AliFMDHit* h, 
						      TParticle* /*p*/) 
{
  
  if(!h)
    return kTRUE;
  Bool_t retval = ProcessEvent(h->Detector(),
			       h->Ring(),
			       h->Sector(),
			       h->Strip(),
			       h->Track(),
			       h->Q());
  
  return retval;
}
//_____________________________________________________________________
Bool_t 
AliFMDBackgroundCorrection::AliFMDInputBG::ProcessTrackRef(AliTrackReference* tr, 
							   TParticle* p) 
{
  if(!tr)
    return kTRUE;
  UShort_t det,sec,strip;
  Char_t   ring;
  AliFMDStripIndex::Unpack(tr->UserId(),det,ring,sec,strip);
  Int_t         nTrack  = tr->GetTrack();
  TDatabasePDG* pdgDB   = TDatabasePDG::Instance();
  TParticlePDG* pdgPart = pdgDB->GetParticle(p->GetPdgCode());
  Float_t       charge  = (pdgPart ? pdgPart->Charge() : 0);
  Bool_t        retval  = ProcessEvent(det,ring,sec,strip,nTrack,charge);
  return retval;
  
}
//_____________________________________________________________________
Bool_t 
AliFMDBackgroundCorrection::AliFMDInputBG::ProcessEvent(UShort_t det,
							Char_t   ring, 
							UShort_t sec, 
							UShort_t strip,
							Int_t    nTrack,
							Float_t  charge)
{
  
  AliGenEventHeader* genHeader = fLoader->GetHeader()->GenEventHeader();
  TArrayF vertex;
  genHeader->PrimaryVertex(vertex);
  
  if(TMath::Abs(vertex.At(2)) > fZvtxCut) 
    return kTRUE;
  
  Double_t delta           = 2 * fZvtxCut / fNvtxBins;
  Double_t vertexBinDouble = (vertex.At(2) + fZvtxCut) / delta;
  Int_t    vertexBin       = Int_t(vertexBinDouble);
  
  if(charge !=  0 && 
     (nTrack != fPrevTrack || 
      det != fPrevDetector || 
      ring != fPrevRing) ||
     sec != fPrevSec) {
    Double_t x,y,z;
    AliFMDGeometry* fmdgeo = AliFMDGeometry::Instance();
    fmdgeo->Detector2XYZ(det,ring,sec,strip,x,y,z);
    
    Int_t iring = (ring == 'I' ? 0 : 1);
    
    TObjArray* detArray  = (TObjArray*)fHitArray.At(det);
    TObjArray* vtxArray  = (TObjArray*)detArray->At(iring);
    TH2F* hHits          = (TH2F*)vtxArray->At(vertexBin);
    
    Float_t   phi   = TMath::ATan2(y,x);
    if(phi<0) phi   = phi+2*TMath::Pi();
    Float_t   r     = TMath::Sqrt(TMath::Power(x,2)+TMath::Power(y,2));
    Float_t   theta = TMath::ATan2(r,z-vertex.At(2));
    Float_t   eta   = -1*TMath::Log(TMath::Tan(0.5*theta));
    hHits->Fill(eta,phi);
    fHits++;
    
  }
  
  fPrevDetector = det;
  fPrevRing     = ring;
  fPrevSec      = sec;
  fPrevTrack    = nTrack;
  
  return kTRUE;

}

//_____________________________________________________________________
Bool_t AliFMDBackgroundCorrection::AliFMDInputBG::Init() 
{
  fPrimaryArray.SetOwner();
  fPrimaryArray.SetName("FMD_primary");
  
  for(Int_t iring = 0; iring<2;iring++) {
    Char_t ringChar = (iring == 0 ? 'I' : 'O');
    TObjArray* ringArray = new TObjArray();
    ringArray->SetName(Form("FMD_%c",ringChar));
    fPrimaryArray.AddAtAndExpand(ringArray,iring);
    Int_t nSec = (iring == 1 ? 40 : 20);
    for(Int_t v=0; v<fNvtxBins;v++) {

      TH2F* hPrimary       = new TH2F(Form("hPrimary_FMD_%c_vtx%d",ringChar,v),
				      Form("hPrimary_FMD_%c_vtx%d",ringChar,v),
				      fNbinsEta, -6,6, nSec, 0,2*TMath::Pi());
      hPrimary->Sumw2();
      ringArray->AddAtAndExpand(hPrimary,v);
    }
  }
  
  
  fHitArray.SetOwner();
  fHitArray.SetName("FMD_hits");
   
  for(Int_t det =1; det<=3;det++) {
    TObjArray* detArrayHits = new TObjArray();
    detArrayHits->SetName(Form("FMD%d",det));
    fHitArray.AddAtAndExpand(detArrayHits,det);
    Int_t nRings = (det==1 ? 1 : 2);
    for(Int_t ring = 0;ring<nRings;ring++) {
      Int_t nSec = (ring == 1 ? 40 : 20);
      Char_t ringChar = (ring == 0 ? 'I' : 'O');
      TObjArray* vtxArrayHits = new TObjArray();
      vtxArrayHits->SetName(Form("FMD%d%c",det,ringChar));
      detArrayHits->AddAtAndExpand(vtxArrayHits,ring);
      for(Int_t v=0; v<fNvtxBins;v++) {
	TH2F* hHits = new TH2F(Form("hHits_FMD%d%c_vtx%d", det,ringChar,v),
			       Form("hHits_FMD%d%c_vtx%d", det,ringChar,v),
			       fNbinsEta, -6,6, nSec, 0, 2*TMath::Pi());
	hHits->Sumw2();
	vtxArrayHits->AddAtAndExpand(hHits,v);
	
      } 
    }
  }

  AliFMDInput::Init();
  
  return kTRUE;
}
//_____________________________________________________________________

Bool_t AliFMDBackgroundCorrection::AliFMDInputBG::Begin(Int_t event ) 
{

  Bool_t             retVal    = AliFMDInput::Begin(event); 
  AliStack*          partStack = fLoader->Stack();
  Int_t              nTracks   = partStack->GetNtrack();
  AliGenEventHeader* genHeader = fLoader->GetHeader()->GenEventHeader();
  TArrayF vertex;
  genHeader->PrimaryVertex(vertex);
  
  if(TMath::Abs(vertex.At(2)) > fZvtxCut) 
    return kTRUE;
  
  Double_t delta           = 2*fZvtxCut/fNvtxBins;
  Double_t vertexBinDouble = (vertex.At(2) + fZvtxCut) / delta;
  Int_t    vertexBin       = (Int_t)vertexBinDouble;
  
  for(Int_t j=0;j<nTracks;j++) {
    TParticle* p           = partStack->Particle(j);
    TDatabasePDG* pdgDB    = TDatabasePDG::Instance();
    TParticlePDG* pdgPart  = pdgDB->GetParticle(p->GetPdgCode());
    Float_t       charge   = (pdgPart ? pdgPart->Charge() : 0);
    Float_t       phi      = TMath::ATan2(p->Py(),p->Px());
    
    if(phi<0) phi = phi+2*TMath::Pi();
    if(p->Theta() == 0) continue;
    Float_t eta   = -1*TMath::Log(TMath::Tan(0.5*p->Theta()));
    
    Bool_t primary = partStack->IsPhysicalPrimary(j);
    //(charge!=0)&&(TMath::Abs(p->Vx() - vertex.At(0))<0.01)&&(TMath::Abs(p->Vy() - vertex.At(1))<0.01)&&(TMath::Abs(p->Vz() - vertex.At(2))<0.01);
    if(primary && charge !=0) {
      
      fPrim++;
      TObjArray* innerArray = (TObjArray*)fPrimaryArray.At(0);
      TObjArray* outerArray = (TObjArray*)fPrimaryArray.At(1);
      
      TH2F* hPrimaryInner  = (TH2F*)innerArray->At(vertexBin);
      TH2F* hPrimaryOuter  = (TH2F*)outerArray->At(vertexBin);
      hPrimaryInner->Fill(eta,phi);
      hPrimaryOuter->Fill(eta,phi);
    }
  }
  
  return retVal;
}
//_____________________________________________________________________
//
// EOF
//
Commit	Line	Data
df0d5480	1	/**************************************************************************
	2	* Copyright(c) 2004, ALICE Experiment at CERN, All rights reserved. *
	3	* *
	4	* Author: The ALICE Off-line Project. *
	5	* Contributors are mentioned in the code where appropriate. *
	6	* *
	7	* Permission to use, copy, modify and distribute this software and its *
	8	* documentation strictly for non-commercial purposes is hereby granted *
	9	* without fee, provided that the above copyright notice appears in all *
	10	* copies and that both the copyright notice and this permission notice *
	11	* appear in the supporting documentation. The authors make no claims *
	12	* about the suitability of this software for any purpose. It is *
	13	* provided "as is" without express or implied warranty. *
	14	**************************************************************************/
	15
	16	// Thil class computes background corrections for the FMD. The correction is computed
	17	// in eta,phi cells and the objects stored can be put into alien to use with analysis.
	18	// It is based on the AliFMDInput class that is used to loop over hits and primaries.
	19	//
	20	// Author: Hans Hjersing Dalsgaard, NBI, hans.dalsgaard@cern.ch
	21	//
	22	//
	23
	24	#include "AliSimulation.h"
	25	#include "TStopwatch.h"
	26	#include "iostream"
	27	#include "TGrid.h"
	28	#include "AliRunLoader.h"
	29	#include "AliGeomManager.h"
	30	#include "AliFMDGeometry.h"
	31	#include "AliStack.h"
	32	#include "TParticle.h"
	33	#include "TDatabasePDG.h"
	34	#include "TParticlePDG.h"
	35	#include "AliRun.h"
	36	#include "AliFMDBackgroundCorrection.h"
	37	#include "TSystem.h"
	38	#include "AliCDBManager.h"
	39	#include "TTree.h"
	40	#include "TClonesArray.h"
	41	#include "TBranch.h"
	42	#include "AliFMDHit.h"
	43	#include "AliLoader.h"
	44	#include "AliFMD.h"
	45	#include "TH2F.h"
	46	#include "AliGenEventHeader.h"
	47	#include "AliHeader.h"
	48	#include "TFile.h"
	49	#include "TAxis.h"
	50	#include "AliCDBId.h"
	51	#include "AliCDBMetaData.h"
	52	#include "TROOT.h"
	53	#include "AliFMDParameters.h"
	54	#include "AliLog.h"
26c8b5ff	55	#include "TList.h"
8dc823cc	56	#include "AliFMDAnaParameters.h"
b82e76e0	57	#include "AliFMDAnaCalibBackgroundCorrection.h"
08d168d9	58	#include "AliTrackReference.h"
08d168d9	59	#include "AliFMDStripIndex.h"
df0d5480	60
	61	ClassImp(AliFMDBackgroundCorrection)
	62	//_____________________________________________________________________
	63	AliFMDBackgroundCorrection::AliFMDBackgroundCorrection() :
	64	TNamed(),
ca3af5d9	65	fCorrectionArray(),
ca3af5d9	66	fPrimaryList()
df0d5480	67	{}
	68
	69	//_____________________________________________________________________
08d168d9	70	AliFMDBackgroundCorrection::AliFMDInputBG::AliFMDInputBG(Bool_t hits_not_trackref) :
5d5bc6be	71	AliFMDInput("galice.root"),
8dc823cc	72	fPrimaryArray(),
8dc823cc	73	fHitArray(),
df0d5480	74	fPrim(0),
	75	fHits(0),
	76	fZvtxCut(0),
	77	fNvtxBins(0),
	78	fPrevTrack(-1),
	79	fPrevDetector(-1),
	80	fPrevRing('Q'),
5d5bc6be	81	fPrevSec(-1),
df0d5480	82	fNbinsEta(100)
	83	{
	84	AddLoad(kTracks);
08d168d9	85	if(hits_not_trackref)
	86	AddLoad(kHits);
	87	else
	88	AddLoad(kTrackRefs);
df0d5480	89	AddLoad(kKinematics);
	90	AddLoad(kHeader);
	91	}
	92
	93	//_____________________________________________________________________
	94
08d168d9	95	void AliFMDBackgroundCorrection::GenerateBackgroundCorrection(Bool_t from_hits,
08d168d9	96	const Int_t nvtxbins,
df0d5480	97	Float_t zvtxcut,
ca3af5d9	98	const Int_t nBinsEta,
df0d5480	99	Bool_t storeInAlien,
	100	Int_t runNo,
	101	Int_t endRunNo,
	102	const Char_t* filename,
	103	Bool_t simulate,
109e97cd	104	Int_t nEvents,
	105	Bool_t inFile,
	106	const Char_t* infilename) {
df0d5480	107
ca3af5d9	108	//TGrid::Connect("alien:",0,0,"t");
df0d5480	109	if(simulate)
	110	Simulate(nEvents);
	111	else {
ca3af5d9	112	//AliCDBManager::Instance()->SetDefaultStorage("alien://Folder=/alice/data/2008/LHC08d/OCDB/");
ca3af5d9	113	AliCDBManager::Instance()->SetDefaultStorage("local://$ALICE_ROOT");
df0d5480	114	AliCDBManager::Instance()->SetRun(runNo);
	115
	116	#if defined(__CINT__)
	117	gSystem->Load("liblhapdf");
	118	gSystem->Load("libEGPythia6");
	119	gSystem->Load("libpythia6");
	120	gSystem->Load("libAliPythia6");
	121	gSystem->Load("libgeant321");
	122	#endif
ca3af5d9	123	//
df0d5480	124	}
	125
	126	//Setting up the geometry
	127	//-----------------------------------------------
	128	if (AliGeomManager::GetGeometry() == NULL)
	129	AliGeomManager::LoadGeometry();
	130
	131	AliFMDGeometry* geo = AliFMDGeometry::Instance();
	132	geo->Init();
	133	geo->InitTransformations();
ca3af5d9	134
df0d5480	135	AliInfo("Processing hits and primaries ");
df0d5480	136
08d168d9	137	AliFMDInputBG input(from_hits);
df0d5480	138
109e97cd	139	if(!inFile) {
	140
	141	input.SetVtxCutZ(zvtxcut);
	142	input.SetNvtxBins(nvtxbins);
	143	input.SetNbinsEta(nBinsEta);
	144	input.Run();
	145	}
df0d5480	146
109e97cd	147	AliInfo(Form("Found %d primaries and %d hits.", input.GetNprim(),input.GetNhits()));
	148	TObjArray* hitArray ;
	149	TObjArray* primaryArray;
	150	if(inFile) {
	151	TFile* infile = TFile::Open(infilename);
	152	hitArray = new TObjArray();
	153	primaryArray = new TObjArray();
	154
	155	for(Int_t det =1; det<=3;det++)
	156	{
	157	TObjArray* detArrayHits = new TObjArray();
	158	detArrayHits->SetName(Form("FMD%d",det));
	159	hitArray->AddAtAndExpand(detArrayHits,det);
	160	Int_t nRings = (det==1 ? 1 : 2);
	161	for(Int_t ring = 0;ring<nRings;ring++)
	162	{
	163
	164	Char_t ringChar = (ring == 0 ? 'I' : 'O');
	165	TObjArray* vtxArrayHits = new TObjArray();
	166	vtxArrayHits->SetName(Form("FMD%d%c",det,ringChar));
	167	detArrayHits->AddAtAndExpand(vtxArrayHits,ring);
	168	for(Int_t v=0; v<nvtxbins;v++)
	169	{
	170
	171	TH2F* hHits = (TH2F*)infile->Get(Form("hHits_FMD%d%c_vtx%d",det,ringChar,v));
	172
	173
	174	vtxArrayHits->AddAtAndExpand(hHits,v);
	175
	176	}
	177	}
	178
	179	}
	180
	181	for(Int_t iring = 0; iring<2;iring++) {
	182	Char_t ringChar = (iring == 0 ? 'I' : 'O');
	183	TObjArray* ringArray = new TObjArray();
	184	ringArray->SetName(Form("FMD_%c",ringChar));
	185	primaryArray->AddAtAndExpand(ringArray,iring);
	186	for(Int_t v=0; v<nvtxbins;v++) {
	187
	188	TH2F* hPrimary = (TH2F*)infile->Get(Form("hPrimary_FMD_%c_vtx%d",ringChar,v));
	189	ringArray->AddAtAndExpand(hPrimary,v);
	190	}
	191	}
	192
	193
	194	}
	195	else {
	196	hitArray = input.GetHits();
	197	primaryArray = input.GetPrimaries();
	198	}
df0d5480	199	fCorrectionArray.SetName("FMD_bg_correction");
df0d5480	200	fCorrectionArray.SetOwner();
ca3af5d9	201
ca3af5d9	202	TList* primaryList = new TList();
26c8b5ff	203	primaryList->SetName("primaries");
ca3af5d9	204
26c8b5ff	205	TList* hitList = new TList();
	206	hitList->SetName("hits");
	207	TList* corrList = new TList();
	208	corrList->SetName("corrections");
109e97cd	209
b82e76e0	210	AliFMDAnaCalibBackgroundCorrection* background = new AliFMDAnaCalibBackgroundCorrection();
b82e76e0	211
df0d5480	212	for(Int_t det= 1; det <=3; det++) {
	213	Int_t nRings = (det==1 ? 1 : 2);
	214
	215	TObjArray* detArrayCorrection = new TObjArray();
	216	detArrayCorrection->SetName(Form("FMD%d",det));
	217	fCorrectionArray.AddAtAndExpand(detArrayCorrection,det);
	218
	219
	220	for(Int_t iring = 0; iring<nRings; iring++) {
	221	TObjArray* primRingArray = (TObjArray*)primaryArray->At(iring);
	222	Char_t ringChar = (iring == 0 ? 'I' : 'O');
	223	TObjArray* vtxArrayCorrection = new TObjArray();
	224	vtxArrayCorrection->SetName(Form("FMD%d%c",det,ringChar));
	225	detArrayCorrection->AddAtAndExpand(vtxArrayCorrection,iring);
	226
	227	for(Int_t vertexBin=0;vertexBin<nvtxbins;vertexBin++) {
	228	TObjArray* detArray = (TObjArray*)hitArray->At(det);
	229	TObjArray* vtxArray = (TObjArray*)detArray->At(iring);
	230	TH2F* hHits = (TH2F*)vtxArray->At(vertexBin);
26c8b5ff	231	hitList->Add(hHits);
df0d5480	232	TH2F* hPrimary = (TH2F*)primRingArray->At(vertexBin);
26c8b5ff	233	primaryList->Add(hPrimary);
df0d5480	234	TH2F* hCorrection = (TH2F*)hHits->Clone(Form("FMD%d%c_vtxbin_%d_correction",det,ringChar,vertexBin));
ca3af5d9	235	hCorrection->Divide(hPrimary);
26c8b5ff	236	corrList->Add(hCorrection);
8dc823cc	237	hCorrection->SetTitle(hCorrection->GetName());
df0d5480	238	vtxArrayCorrection->AddAtAndExpand(hCorrection,vertexBin);
b82e76e0	239	background->SetBgCorrection(det,ringChar,vertexBin,hCorrection);
df0d5480	240	}
	241
	242	}
	243	}
	244
	245	TAxis refAxis(nvtxbins,-1*zvtxcut,zvtxcut);
109e97cd	246	if(inFile) {
	247	TFile* infile = TFile::Open(infilename);
	248	TAxis* refaxis = (TAxis*)infile->Get("vertexbins");
	249	background->SetRefAxis(refaxis);
	250
	251	}
	252	else background->SetRefAxis(&refAxis);
df0d5480	253
8dc823cc	254	TFile* fout = new TFile(filename,"RECREATE");
df0d5480	255	refAxis.Write("vertexbins");
26c8b5ff	256
	257	hitList->Write();
	258	primaryList->Write();
	259	corrList->Write();
ca3af5d9	260
8dc823cc	261	TObjArray* container = new TObjArray();
	262	container->SetOwner();
	263	container->AddAtAndExpand(&refAxis,0);
	264	container->AddAtAndExpand(&fCorrectionArray,1);
	265	container->AddAtAndExpand(hitArray,2);
	266	container->AddAtAndExpand(primaryArray,3);
b82e76e0	267
b82e76e0	268
df0d5480	269	if(storeInAlien) {
	270	AliCDBManager* cdb = AliCDBManager::Instance();
	271	cdb->SetDefaultStorage("local://$ALICE_ROOT");
8dc823cc	272	AliCDBId id(AliFMDAnaParameters::GetBackgroundPath(),runNo,endRunNo);
df0d5480	273
	274	AliCDBMetaData* meta = new AliCDBMetaData;
	275	meta->SetResponsible(gSystem->GetUserInfo()->fRealName.Data());
	276	meta->SetAliRootVersion(gROOT->GetVersion());
	277	meta->SetBeamPeriod(1);
	278	meta->SetComment("Background Correction for FMD");
b82e76e0	279	meta->SetProperty("key1", background );
b82e76e0	280	cdb->Put(background, id, meta);
df0d5480	281
	282	}
	283
8dc823cc	284	fout->Close();
8dc823cc	285
df0d5480	286
ca3af5d9	287	}
ca3af5d9	288
df0d5480	289	//_____________________________________________________________________
	290	void AliFMDBackgroundCorrection::Simulate(Int_t nEvents) {
	291
	292	AliSimulation sim ;
	293	sim.SetRunNumber(0);
	294	TGrid::Connect("alien:",0,0,"t");
	295	sim.SetDefaultStorage("alien://Folder=/alice/data/2008/LHC08d/OCDB/");
	296	sim.SetConfigFile("Config.C");
	297	sim.SetRunQA("FMD:");
	298	TStopwatch timer;
	299	timer.Start();
	300	sim.RunSimulation(nEvents);
	301	timer.Stop();
	302	timer.Print();
	303
	304	}
	305
	306	//_____________________________________________________________________
faf80567	307	Bool_t
	308	AliFMDBackgroundCorrection::AliFMDInputBG::ProcessHit(AliFMDHit* h,
	309	TParticle* /p/)
	310	{
df0d5480	311
08d168d9	312	if(!h)
08d168d9	313	return kTRUE;
faf80567	314	Bool_t retval = ProcessEvent(h->Detector(),
faf80567	315	h->Ring(),
98accb9e	316	h->Sector(),
98accb9e	317	h->Strip(),
faf80567	318	h->Track(),
faf80567	319	h->Q());
08d168d9	320
	321	return retval;
	322	}
	323	//_____________________________________________________________________
faf80567	324	Bool_t
	325	AliFMDBackgroundCorrection::AliFMDInputBG::ProcessTrackRef(AliTrackReference* tr,
	326	TParticle* p)
	327	{
08d168d9	328	if(!tr)
	329	return kTRUE;
	330	UShort_t det,sec,strip;
	331	Char_t ring;
	332	AliFMDStripIndex::Unpack(tr->UserId(),det,ring,sec,strip);
faf80567	333	Int_t nTrack = tr->GetTrack();
faf80567	334	TDatabasePDG* pdgDB = TDatabasePDG::Instance();
08d168d9	335	TParticlePDG* pdgPart = pdgDB->GetParticle(p->GetPdgCode());
faf80567	336	Float_t charge = (pdgPart ? pdgPart->Charge() : 0);
faf80567	337	Bool_t retval = ProcessEvent(det,ring,sec,strip,nTrack,charge);
08d168d9	338	return retval;
	339
	340	}
	341	//_____________________________________________________________________
faf80567	342	Bool_t
	343	AliFMDBackgroundCorrection::AliFMDInputBG::ProcessEvent(UShort_t det,
	344	Char_t ring,
	345	UShort_t sec,
	346	UShort_t strip,
	347	Int_t nTrack,
	348	Float_t charge)
08d168d9	349	{
08d168d9	350
df0d5480	351	AliGenEventHeader* genHeader = fLoader->GetHeader()->GenEventHeader();
	352	TArrayF vertex;
	353	genHeader->PrimaryVertex(vertex);
	354
	355	if(TMath::Abs(vertex.At(2)) > fZvtxCut)
	356	return kTRUE;
	357
faf80567	358	Double_t delta = 2 * fZvtxCut / fNvtxBins;
df0d5480	359	Double_t vertexBinDouble = (vertex.At(2) + fZvtxCut) / delta;
faf80567	360	Int_t vertexBin = Int_t(vertexBinDouble);
df0d5480	361
faf80567	362	if(charge != 0 &&
	363	(nTrack != fPrevTrack \|\|
	364	det != fPrevDetector \|\|
5d5bc6be	365	ring != fPrevRing) \|\|
5d5bc6be	366	sec != fPrevSec) {
08d168d9	367	Double_t x,y,z;
	368	AliFMDGeometry* fmdgeo = AliFMDGeometry::Instance();
	369	fmdgeo->Detector2XYZ(det,ring,sec,strip,x,y,z);
	370
	371	Int_t iring = (ring == 'I' ? 0 : 1);
	372
	373	TObjArray* detArray = (TObjArray*)fHitArray.At(det);
	374	TObjArray* vtxArray = (TObjArray*)detArray->At(iring);
	375	TH2F* hHits = (TH2F*)vtxArray->At(vertexBin);
	376
faf80567	377	Float_t phi = TMath::ATan2(y,x);
	378	if(phi<0) phi = phi+2*TMath::Pi();
	379	Float_t r = TMath::Sqrt(TMath::Power(x,2)+TMath::Power(y,2));
98accb9e	380	Float_t theta = TMath::ATan2(r,z-vertex.At(2));
faf80567	381	Float_t eta = -1TMath::Log(TMath::Tan(0.5theta));
08d168d9	382	hHits->Fill(eta,phi);
08d168d9	383	fHits++;
5d5bc6be	384
08d168d9	385	}
ca3af5d9	386
5d5bc6be	387	fPrevDetector = det;
	388	fPrevRing = ring;
	389	fPrevSec = sec;
	390	fPrevTrack = nTrack;
	391
df0d5480	392	return kTRUE;
08d168d9	393
df0d5480	394	}
	395
	396	//_____________________________________________________________________
faf80567	397	Bool_t AliFMDBackgroundCorrection::AliFMDInputBG::Init()
faf80567	398	{
df0d5480	399	fPrimaryArray.SetOwner();
	400	fPrimaryArray.SetName("FMD_primary");
	401
	402	for(Int_t iring = 0; iring<2;iring++) {
	403	Char_t ringChar = (iring == 0 ? 'I' : 'O');
	404	TObjArray* ringArray = new TObjArray();
	405	ringArray->SetName(Form("FMD_%c",ringChar));
	406	fPrimaryArray.AddAtAndExpand(ringArray,iring);
	407	Int_t nSec = (iring == 1 ? 40 : 20);
	408	for(Int_t v=0; v<fNvtxBins;v++) {
	409
	410	TH2F* hPrimary = new TH2F(Form("hPrimary_FMD_%c_vtx%d",ringChar,v),
	411	Form("hPrimary_FMD_%c_vtx%d",ringChar,v),
	412	fNbinsEta, -6,6, nSec, 0,2*TMath::Pi());
b82e76e0	413	hPrimary->Sumw2();
df0d5480	414	ringArray->AddAtAndExpand(hPrimary,v);
	415	}
	416	}
	417
	418
	419	fHitArray.SetOwner();
	420	fHitArray.SetName("FMD_hits");
	421
faf80567	422	for(Int_t det =1; det<=3;det++) {
	423	TObjArray* detArrayHits = new TObjArray();
	424	detArrayHits->SetName(Form("FMD%d",det));
	425	fHitArray.AddAtAndExpand(detArrayHits,det);
	426	Int_t nRings = (det==1 ? 1 : 2);
	427	for(Int_t ring = 0;ring<nRings;ring++) {
	428	Int_t nSec = (ring == 1 ? 40 : 20);
	429	Char_t ringChar = (ring == 0 ? 'I' : 'O');
	430	TObjArray* vtxArrayHits = new TObjArray();
	431	vtxArrayHits->SetName(Form("FMD%d%c",det,ringChar));
	432	detArrayHits->AddAtAndExpand(vtxArrayHits,ring);
	433	for(Int_t v=0; v<fNvtxBins;v++) {
	434	TH2F* hHits = new TH2F(Form("hHits_FMD%d%c_vtx%d", det,ringChar,v),
	435	Form("hHits_FMD%d%c_vtx%d", det,ringChar,v),
	436	fNbinsEta, -6,6, nSec, 0, 2*TMath::Pi());
	437	hHits->Sumw2();
	438	vtxArrayHits->AddAtAndExpand(hHits,v);
	439
	440	}
df0d5480	441	}
faf80567	442	}
df0d5480	443
df0d5480	444	AliFMDInput::Init();
df0d5480	445
df0d5480	446	return kTRUE;
df0d5480	447	}
ca3af5d9	448	//_____________________________________________________________________
ca3af5d9	449
faf80567	450	Bool_t AliFMDBackgroundCorrection::AliFMDInputBG::Begin(Int_t event )
faf80567	451	{
df0d5480	452
faf80567	453	Bool_t retVal = AliFMDInput::Begin(event);
	454	AliStack* partStack = fLoader->Stack();
	455	Int_t nTracks = partStack->GetNtrack();
ca3af5d9	456	AliGenEventHeader* genHeader = fLoader->GetHeader()->GenEventHeader();
	457	TArrayF vertex;
	458	genHeader->PrimaryVertex(vertex);
	459
	460	if(TMath::Abs(vertex.At(2)) > fZvtxCut)
	461	return kTRUE;
	462
faf80567	463	Double_t delta = 2*fZvtxCut/fNvtxBins;
ca3af5d9	464	Double_t vertexBinDouble = (vertex.At(2) + fZvtxCut) / delta;
faf80567	465	Int_t vertexBin = (Int_t)vertexBinDouble;
	466
	467	for(Int_t j=0;j<nTracks;j++) {
5d5bc6be	468	TParticle* p = partStack->Particle(j);
	469	TDatabasePDG* pdgDB = TDatabasePDG::Instance();
	470	TParticlePDG* pdgPart = pdgDB->GetParticle(p->GetPdgCode());
	471	Float_t charge = (pdgPart ? pdgPart->Charge() : 0);
	472	Float_t phi = TMath::ATan2(p->Py(),p->Px());
faf80567	473
	474	if(phi<0) phi = phi+2*TMath::Pi();
	475	if(p->Theta() == 0) continue;
	476	Float_t eta = -1TMath::Log(TMath::Tan(0.5p->Theta()));
	477
	478	Bool_t primary = partStack->IsPhysicalPrimary(j);
	479	//(charge!=0)&&(TMath::Abs(p->Vx() - vertex.At(0))<0.01)&&(TMath::Abs(p->Vy() - vertex.At(1))<0.01)&&(TMath::Abs(p->Vz() - vertex.At(2))<0.01);
	480	if(primary && charge !=0) {
	481
	482	fPrim++;
	483	TObjArray* innerArray = (TObjArray*)fPrimaryArray.At(0);
	484	TObjArray* outerArray = (TObjArray*)fPrimaryArray.At(1);
	485
	486	TH2F* hPrimaryInner = (TH2F*)innerArray->At(vertexBin);
	487	TH2F* hPrimaryOuter = (TH2F*)outerArray->At(vertexBin);
	488	hPrimaryInner->Fill(eta,phi);
	489	hPrimaryOuter->Fill(eta,phi);
	490	}
	491	}
109e97cd	492
ca3af5d9	493	return retVal;
	494	}
	495	//_____________________________________________________________________
	496	//
	497	// EOF
	498	//
df0d5480	499
df0d5480	500