Using the new ZDC-related methods

[u/mrichter/AliRoot.git] / PWG0 / dNdEta / AliMultiplicityMCSelector.cxx

/* $Id$ */

#include "AliMultiplicityMCSelector.h"

#include <TStyle.h>
#include <TSystem.h>
#include <TCanvas.h>
#include <TVector3.h>
#include <TChain.h>
#include <TFile.h>
#include <TH2F.h>
#include <TH3F.h>
#include <TParticle.h>
#include <TRandom.h>
#include <TNtuple.h>
#include <TObjString.h>
#include <TF1.h>

#include <AliLog.h>
#include <AliESD.h>
#include <AliStack.h>
#include <AliHeader.h>
#include <AliGenEventHeader.h>
#include <AliMultiplicity.h>

#include "esdTrackCuts/AliESDtrackCuts.h"
#include "AliPWG0Helper.h"
#include "AliPWG0depHelper.h"
#include "dNdEta/AliMultiplicityCorrection.h"
#include "AliCorrection.h"
#include "AliCorrectionMatrix3D.h"

#define TPCMEASUREMENT
//#define ITSMEASUREMENT

ClassImp(AliMultiplicityMCSelector)

AliMultiplicityMCSelector::AliMultiplicityMCSelector() :
  AliSelectorRL(),
  fMultiplicity(0),
  fEsdTrackCuts(0),
  fSystSkipParticles(kFALSE),
  fSelectProcessType(0),
  fParticleSpecies(0),
  fPtSpectrum(0)
{
  //
  // Constructor. Initialization of pointers
  //

  for (Int_t i = 0; i<4; i++)
    fParticleCorrection[i] = 0;
}

AliMultiplicityMCSelector::~AliMultiplicityMCSelector()
{
  //
  // Destructor
  //

  // histograms are in the output list and deleted when the output
  // list is deleted by the TSelector dtor
}

void AliMultiplicityMCSelector::Begin(TTree* tree)
{
  // Begin function

  AliSelectorRL::Begin(tree);

  ReadUserObjects(tree);
}

void AliMultiplicityMCSelector::ReadUserObjects(TTree* tree)
{
  // read the user objects, called from slavebegin and begin

  if (!fEsdTrackCuts && fInput)
    fEsdTrackCuts = dynamic_cast<AliESDtrackCuts*> (fInput->FindObject("AliESDtrackCuts"));

  if (!fEsdTrackCuts && tree)
    fEsdTrackCuts = dynamic_cast<AliESDtrackCuts*> (tree->GetUserInfo()->FindObject("AliESDtrackCuts"));

  if (!fEsdTrackCuts)
     AliDebug(AliLog::kError, "ERROR: Could not read EsdTrackCuts from input list.");

  if (!fPtSpectrum && fInput)
    fPtSpectrum = dynamic_cast<TH1*> (fInput->FindObject("pt-spectrum"));

  if (!fPtSpectrum && tree)
    fPtSpectrum = dynamic_cast<TH1*> (tree->GetUserInfo()->FindObject("pt-spectrum"));
}

void AliMultiplicityMCSelector::SlaveBegin(TTree* tree)
{
  // The SlaveBegin() function is called after the Begin() function.
  // When running with PROOF SlaveBegin() is called on each slave server.
  // The tree argument is deprecated (on PROOF 0 is passed).

  AliSelector::SlaveBegin(tree);

  ReadUserObjects(tree);

  fMultiplicity = new AliMultiplicityCorrection("Multiplicity", "Multiplicity");

  TString option(GetOption());
  if (option.Contains("skip-particles"))
  {
    fSystSkipParticles = kTRUE;
    AliInfo("WARNING: Systematic study enabled. Particles will be skipped.");
  }

  if (option.Contains("particle-efficiency"))
    for (Int_t i = 0; i<4; i++)
      fParticleCorrection[i] = new AliCorrection(Form("correction_%d", i), Form("correction_%d", i));

  if (option.Contains("only-process-type-nd"))
    fSelectProcessType = 1;

  if (option.Contains("only-process-type-sd"))
    fSelectProcessType = 2;

  if (option.Contains("only-process-type-dd"))
    fSelectProcessType = 3;

  if (fSelectProcessType != 0)
    AliInfo(Form("WARNING: Systematic study enabled. Only considering process type %d", fSelectProcessType));

  if (option.Contains("pt-spectrum-hist"))
  {
    TFile* file = TFile::Open("ptspectrum_fit.root");
    if (file)
    {
      TString subStr(option(option.Index("pt-spectrum")+17, 3));
      TString histName(Form("ptspectrum_%s", subStr.Data()));
      AliInfo(Form("Pt-Spectrum modification. Using %s.", histName.Data()));
      fPtSpectrum = (TH1*) file->Get(histName);
      if (!fPtSpectrum)
	AliError("Histogram not found");
    }
    else
      AliError("Could not open ptspectrum_fit.root. Pt Spectrum study could not be enabled.");

    if (fPtSpectrum)
      AliInfo("WARNING: Systematic study enabled. Pt spectrum will be modified");
  }

  if (option.Contains("pt-spectrum-func"))
  {
    if (fPtSpectrum)
    {
      Printf("Using function from input list for systematic p_t study");
    }
    else
    {
      fPtSpectrum = new TH1F("fPtSpectrum", "fPtSpectrum", 1, 0, 100);
      fPtSpectrum->SetBinContent(1, 1);
    }

    if (fPtSpectrum)
      AliInfo("WARNING: Systematic study enabled. Pt spectrum will be modified");
  }

  if (option.Contains("particle-species"))
    fParticleSpecies = new TNtuple("fParticleSpecies", "fParticleSpecies", "vtx:Pi_True:K_True:p_True:o_True:Pi_Rec:K_Rec:p_Rec:o_Rec:nolabel:doublePrim:doubleCount");

  // TODO set seed for random generator
}

void AliMultiplicityMCSelector::Init(TTree* tree)
{
  // read the user objects

  AliSelectorRL::Init(tree);

  // enable only the needed branches
  if (tree)
  {
    tree->SetBranchStatus("*", 0);
    tree->SetBranchStatus("fTriggerMask", 1);
    tree->SetBranchStatus("fSPDVertex*", 1);

    #ifdef ITSMEASUREMENT
      tree->SetBranchStatus("fSPDMult*", 1);
    #endif

    #ifdef TPCMEASUREMENT
      AliESDtrackCuts::EnableNeededBranches(tree);
      tree->SetBranchStatus("fTracks.fLabel", 1);
    #endif

    tree->SetCacheSize(0);
  }
}

Bool_t AliMultiplicityMCSelector::Process(Long64_t entry)
{
  // The Process() function is called for each entry in the tree (or possibly
  // keyed object in the case of PROOF) to be processed. The entry argument
  // specifies which entry in the currently loaded tree is to be processed.
  // It can be passed to either TTree::GetEntry() or TBranch::GetEntry()
  // to read either all or the required parts of the data. When processing
  // keyed objects with PROOF, the object is already loaded and is available
  // via the fObject pointer.
  //
  // This function should contain the "body" of the analysis. It can contain
  // simple or elaborate selection criteria, run algorithms on the data
  // of the event and typically fill histograms.

  // WARNING when a selector is used with a TChain, you must use
  //  the pointer to the current TTree to call GetEntry(entry).
  //  The entry is always the local entry number in the current tree.
  //  Assuming that fTree is the pointer to the TChain being processed,
  //  use fTree->GetTree()->GetEntry(entry).

  if (AliSelectorRL::Process(entry) == kFALSE)
    return kFALSE;

  // Check prerequisites
  if (!fESD)
  {
    AliDebug(AliLog::kError, "ESD branch not available");
    return kFALSE;
  }

  if (!fEsdTrackCuts)
  {
    AliDebug(AliLog::kError, "fESDTrackCuts not available");
    return kFALSE;
  }

  AliHeader* header = GetHeader();
  if (!header)
  {
    AliDebug(AliLog::kError, "Header not available");
    return kFALSE;
  }

  AliStack* stack = GetStack();
  if (!stack)
  {
    AliDebug(AliLog::kError, "Stack not available");
    return kFALSE;
  }

  if (fSelectProcessType > 0)
  {
    // getting process information; NB: this only works for Pythia
    Int_t processtype = AliPWG0depHelper::GetPythiaEventProcessType(header);

    Bool_t processEvent = kFALSE;

    // non diffractive
    if (fSelectProcessType == 1 && processtype !=92 && processtype !=93 && processtype != 94)
      processEvent = kTRUE;

    // single diffractive
    if (fSelectProcessType == 2 && (processtype == 92 || processtype == 93))
      processEvent = kTRUE;

    // double diffractive
    if (fSelectProcessType == 3 && processtype == 94)
      processEvent = kTRUE;

    if (!processEvent)
    {
      AliDebug(AliLog::kDebug, Form("Skipping this event, because it is not of the requested process type (%d)", processtype));
      return kTRUE;
    }
  }

  Bool_t eventTriggered = AliPWG0Helper::IsEventTriggered(fESD);
  eventTriggered = kTRUE; // no generated trigger for the simulated events
  Bool_t eventVertex = AliPWG0Helper::IsVertexReconstructed(fESD);

  // get the ESD vertex
  const AliESDVertex* vtxESD = fESD->GetVertex();
  Double_t vtx[3];
  vtxESD->GetXYZ(vtx);

  // get the MC vertex
  AliGenEventHeader* genHeader = header->GenEventHeader();
  TArrayF vtxMC(3);
  genHeader->PrimaryVertex(vtxMC);

  // get tracklets
  const AliMultiplicity* mult = fESD->GetMultiplicity();
  if (!mult)
  {
    AliDebug(AliLog::kError, "AliMultiplicity not available");
    return kFALSE;
  }

  //const Float_t kPtCut = 0.3;

  // get number of tracks from MC
  // loop over mc particles
  Int_t nPrim  = stack->GetNprimary();
  Int_t nMCPart = stack->GetNtrack();

  // tracks in different eta ranges
  Int_t nMCTracks05 = 0;
  Int_t nMCTracks09 = 0;
  Int_t nMCTracks15 = 0;
  Int_t nMCTracks20 = 0;
  Int_t nMCTracksAll = 0;

  // tracks per particle species, in |eta| < 2 (systematic study)
  Int_t nMCTracksSpecies[4]; // (pi, K, p, other)
  for (Int_t i = 0; i<4; ++i)
    nMCTracksSpecies[i] = 0;
  // eta range for nMCTracksSpecies, nESDTracksSpecies
#ifdef ITSMEASUREMENT
  const Float_t etaRange = 2.0;
#else
  const Float_t etaRange = 0.9;
#endif

  for (Int_t iMc = 0; iMc < nPrim; ++iMc)
  {
    AliDebug(AliLog::kDebug+1, Form("MC Loop: Processing particle %d.", iMc));

    TParticle* particle = stack->Particle(iMc);

    if (!particle)
    {
      AliDebug(AliLog::kError, Form("UNEXPECTED: particle with label %d not found in stack (mc loop).", iMc));
      continue;
    }

    Bool_t debug = kFALSE;
    if (AliPWG0Helper::IsPrimaryCharged(particle, nPrim, debug) == kFALSE)
    {
      //printf("%d) DROPPED ", iMC);
      //particle->Print();
      continue;
    }

    //printf("%d) OK      ", iMC);
    //particle->Print();

    //if (particle->Pt() < kPtCut)
    //  continue;

    Int_t particleWeight = 1;

    Float_t pt = particle->Pt();

    // in case of systematic study, weight according to the change of the pt spectrum
    // it cannot be just multiplied because we cannot count "half of a particle"
    // instead a random generator decides if the particle is counted twice (if value > 1)
    // or not (if value < 0)
    if (fPtSpectrum)
    {
      Int_t bin = fPtSpectrum->FindBin(pt);
      if (bin > 0 && bin <= fPtSpectrum->GetNbinsX())
      {
        Float_t factor = fPtSpectrum->GetBinContent(bin);
        if (factor > 0)
        {
          Float_t random = gRandom->Uniform();
          if (factor > 1 && random < factor - 1)
          {
            particleWeight = 2;
          }
          else if (factor < 1 && random < 1 - factor)
            particleWeight = 0;
        }
      }
    }

    //Printf("MC weight is: %d", particleWeight);

    if (TMath::Abs(particle->Eta()) < 0.5)
      nMCTracks05 += particleWeight;

    if (TMath::Abs(particle->Eta()) < 0.9)
      nMCTracks09 += particleWeight;

    if (TMath::Abs(particle->Eta()) < 1.5)
      nMCTracks15 += particleWeight;

    if (TMath::Abs(particle->Eta()) < 2.0)
      nMCTracks20 += particleWeight;

    nMCTracksAll += particleWeight;

    if (fParticleCorrection[0] || fParticleSpecies)
    {
      Int_t id = -1;
      switch (TMath::Abs(particle->GetPdgCode()))
      {
        case 211: id = 0; break;
        case 321: id = 1; break;
        case 2212: id = 2; break;
        default: id = 3; break;
      }
      if (TMath::Abs(particle->Eta()) < etaRange)
        nMCTracksSpecies[id]++;
      if (fParticleCorrection[id])
        fParticleCorrection[id]->GetTrackCorrection()->FillGene(vtxMC[2], particle->Eta(), particle->Pt());
    }
  }// end of mc particle

  fMultiplicity->FillGenerated(vtxMC[2], eventTriggered, eventVertex, (Int_t) nMCTracks05, (Int_t) nMCTracks09, (Int_t) nMCTracks15, (Int_t) nMCTracks20, (Int_t) nMCTracksAll);

  if (!eventTriggered || !eventVertex)
    return kTRUE;

  Int_t nESDTracks05 = 0;
  Int_t nESDTracks09 = 0;
  Int_t nESDTracks15 = 0;
  Int_t nESDTracks20 = 0;

  // tracks per particle species, in |eta| < 2 (systematic study)
  Int_t nESDTracksSpecies[7]; // (pi, K, p, other, nolabel, doublecount_prim, doublecount_all)
  for (Int_t i = 0; i<7; ++i)
    nESDTracksSpecies[i] = 0;

  Bool_t* foundPrimaries = new Bool_t[nPrim];   // to prevent double counting
  for (Int_t i=0; i<nPrim; i++)
    foundPrimaries[i] = kFALSE;

  Bool_t* foundTracks = new Bool_t[nMCPart];    // to prevent double counting
  for (Int_t i=0; i<nMCPart; i++)
    foundTracks[i] = kFALSE;

#ifdef ITSMEASUREMENT
  // get multiplicity from ITS tracklets
  for (Int_t i=0; i<mult->GetNumberOfTracklets(); ++i)
  {
    //printf("%d %f %f %f\n", i, mult->GetTheta(i), mult->GetPhi(i), mult->GetDeltaPhi(i));

    // This removes non-tracklets in PDC06 data. Very bad solution. New solution is implemented for newer data. Keeping this for compatibility.
    if (mult->GetDeltaPhi(i) < -1000)
      continue;

    // systematic study: 10% lower efficiency
    if (fSystSkipParticles && (gRandom->Uniform() < 0.1))
      continue;

    Float_t theta = mult->GetTheta(i);
    Float_t eta   = -TMath::Log(TMath::Tan(theta/2.));

    // TODO define needed, because this only works with new AliRoot
    Int_t label = mult->GetLabel(i);
#endif
#ifdef TPCMEASUREMENT
  // get multiplicity from ESD tracks
  TObjArray* list = fEsdTrackCuts->GetAcceptedTracks(fESD);
  Int_t nGoodTracks = list->GetEntries();
  // loop over esd tracks
  for (Int_t i=0; i<nGoodTracks; i++)
  {
    AliESDtrack* esdTrack = dynamic_cast<AliESDtrack*> (list->At(i));
    if (!esdTrack)
    {
      AliDebug(AliLog::kError, Form("ERROR: Could not retrieve track %d.", i));
      continue;
    }

    Double_t p[3];
    esdTrack->GetConstrainedPxPyPz(p); 
    TVector3 vector(p);

    Float_t theta = vector.Theta();
    Float_t eta   = -TMath::Log(TMath::Tan(theta/2.));

    Int_t label = esdTrack->GetLabel();

    //Float_t pt = vector.Pt();
    //if (pt < kPtCut)
    //  continue;
#endif

    Int_t particleWeight = 1;

    // in case of systematic study, weight according to the change of the pt spectrum
    if (fPtSpectrum)
    {
      TParticle* mother = 0;

      // preserve label for later
      Int_t labelCopy = label;
      if (labelCopy >= 0)
        labelCopy = AliPWG0depHelper::FindPrimaryMotherLabel(stack, labelCopy);
      if (labelCopy >= 0)
        mother = stack->Particle(labelCopy);

      // in case of pt study we do not count particles w/o label, because they cannot be scaled
      if (!mother)
        continue;

      // it cannot be just multiplied because we cannot count "half of a particle"
      // instead a random generator decides if the particle is counted twice (if value > 1) 
      // or not (if value < 0)
      Int_t bin = fPtSpectrum->FindBin(mother->Pt());
      if (bin > 0 && bin <= fPtSpectrum->GetNbinsX())
      {
        Float_t factor = fPtSpectrum->GetBinContent(bin);
        if (factor > 0)
        {
          Float_t random = gRandom->Uniform();
          if (factor > 1 && random < factor - 1)
          {
            particleWeight = 2;
          }
          else if (factor < 1 && random < 1 - factor)
            particleWeight = 0;
        }
      }
    }

    //Printf("ESD weight is: %d", particleWeight);

    if (TMath::Abs(eta) < 0.5)
      nESDTracks05 += particleWeight;

    if (TMath::Abs(eta) < 0.9)
      nESDTracks09 += particleWeight;

    if (TMath::Abs(eta) < 1.5)
      nESDTracks15 += particleWeight;

    if (TMath::Abs(eta) < 2.0)
      nESDTracks20 += particleWeight;


    if (fParticleCorrection[0] || fParticleSpecies)
    {
      Int_t motherLabel = -1;
      TParticle* mother = 0;

      // find mother
      if (label >= 0)
        motherLabel = AliPWG0depHelper::FindPrimaryMotherLabel(stack, label);
      if (motherLabel >= 0)
        mother = stack->Particle(motherLabel);

      if (!mother)
      {
        // count tracks that did not have a label
        if (TMath::Abs(eta) < etaRange)
          nESDTracksSpecies[4]++;
        continue;
      }

      // get particle type (pion, proton, kaon, other)
      Int_t id = -1;
      switch (TMath::Abs(mother->GetPdgCode()))
      {
        case 211: id = 0; break;
        case 321: id = 1; break;
        case 2212: id = 2; break;
        default: id = 3; break;
      }

      // double counting is ok for particle ratio study
      if (TMath::Abs(eta) < etaRange)
        nESDTracksSpecies[id]++;

      // double counting is not ok for efficiency study

      // check if we already counted this particle, this way distinguishes double counted particles (bug/artefact in tracking) or double counted primaries due to secondaries (physics)
      if (foundTracks[label])
      {
        if (TMath::Abs(eta) < etaRange)
          nESDTracksSpecies[6]++;
        continue;
      }
      foundTracks[label] = kTRUE;

      // particle (primary) already counted?
      if (foundPrimaries[motherLabel])
      {
        if (TMath::Abs(eta) < etaRange)
          nESDTracksSpecies[5]++;
        continue;
      }
      foundPrimaries[motherLabel] = kTRUE;

      if (fParticleCorrection[id])
        fParticleCorrection[id]->GetTrackCorrection()->FillMeas(vtxMC[2], mother->Eta(), mother->Pt());
    }
  }

  delete[] foundTracks;
  delete[] foundPrimaries;

  if ((Int_t) nMCTracks20 == 0 && nESDTracks20 > 3)
    printf("WARNING: Event %lld has %d generated and %d reconstructed...\n", entry, nMCTracks20, nESDTracks20);

  //printf("%.2f generated and %.2f reconstructed\n", nMCTracks20, nESDTracks20);

  //Printf("%f %f %f %f %f %f %f %f %f %f", vtxMC[2], nMCTracks05, nMCTracks09, nMCTracks15, nMCTracks20, nMCTracksAll, nESDTracks05, nESDTracks09, nESDTracks15, nESDTracks20);

  //Printf("%f %f %f %f %f %f %f %f %f %f", vtxMC[2], nMCTracks05, nMCTracks09, nMCTracks15, nMCTracks20, nMCTracksAll, nESDTracks05, nESDTracks09, nESDTracks15, nESDTracks20);

  fMultiplicity->FillMeasured(vtx[2], nESDTracks05, nESDTracks09, nESDTracks15, nESDTracks20);

  // fill response matrix using vtxMC (best guess)
  fMultiplicity->FillCorrection(vtxMC[2],  nMCTracks05,  nMCTracks09,  nMCTracks15,  nMCTracks20,  nMCTracksAll,  nESDTracks05,  nESDTracks09,  nESDTracks15,  nESDTracks20);

  if (fParticleSpecies)
    fParticleSpecies->Fill(vtxMC[2], nMCTracksSpecies[0], nMCTracksSpecies[1], nMCTracksSpecies[2], nMCTracksSpecies[3], nESDTracksSpecies[0], nESDTracksSpecies[1], nESDTracksSpecies[2], nESDTracksSpecies[3], nESDTracksSpecies[4], nESDTracksSpecies[5], nESDTracksSpecies[6]);

  //Printf("%d = %d %d %d %d %d %d %d", (Int_t) nESDTracks20, nESDTracksSpecies[0], nESDTracksSpecies[1], nESDTracksSpecies[2], nESDTracksSpecies[3], nESDTracksSpecies[4], nESDTracksSpecies[5], nESDTracksSpecies[6]);

  return kTRUE;
}

void AliMultiplicityMCSelector::SlaveTerminate()
{
  // The SlaveTerminate() function is called after all entries or objects
  // have been processed. When running with PROOF SlaveTerminate() is called
  // on each slave server.

  AliSelector::SlaveTerminate();

  // Add the histograms to the output on each slave server
  if (!fOutput)
  {
    AliDebug(AliLog::kError, Form("ERROR: Output list not initialized."));
    return;
  }

  fOutput->Add(fMultiplicity);
  for (Int_t i = 0; i < 4; ++i)
    fOutput->Add(fParticleCorrection[i]);

  fOutput->Add(fParticleSpecies);
}

void AliMultiplicityMCSelector::Terminate()
{
  // The Terminate() function is the last function to be called during
  // a query. It always runs on the client, it can be used to present
  // the results graphically or save the results to file.

  AliSelector::Terminate();

  fMultiplicity = dynamic_cast<AliMultiplicityCorrection*> (fOutput->FindObject("Multiplicity"));
  for (Int_t i = 0; i < 4; ++i)
    fParticleCorrection[i] = dynamic_cast<AliCorrection*> (fOutput->FindObject(Form("correction_%d", i)));
  fParticleSpecies = dynamic_cast<TNtuple*> (fOutput->FindObject("fParticleSpecies"));

  if (!fMultiplicity)
  {
    AliDebug(AliLog::kError, Form("ERROR: Histograms not available %p", (void*) fMultiplicity));
    return;
  }

  TFile* file = TFile::Open("multiplicityMC.root", "RECREATE");

  fMultiplicity->SaveHistograms();
  for (Int_t i = 0; i < 4; ++i)
    if (fParticleCorrection[i])
      fParticleCorrection[i]->SaveHistograms();
  if (fParticleSpecies)
    fParticleSpecies->Write();

  TObjString option(GetOption());
  option.Write();

  file->Close();

  //fMultiplicity->DrawHistograms();
}