/**************************************************************************
 * Copyright(c) 1998-1999, 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.                  *
 **************************************************************************/

//-----------------------------------------------------------------------
// Example of task (running locally, on AliEn and CAF),
// which provides standard way of calculating acceptance and efficiency
// between different steps of the procedure.
// The ouptut of the task is a AliCFContainer from which the efficiencies
// can be calculated
//-----------------------------------------------------------------------
// Author : R. Vernet, Consorzio Cometa - Catania (it)
//-----------------------------------------------------------------------


#ifndef ALIPROTONCORRECTIONTASK_CXX
#define ALIPROTONCORRECTIONTASK_CXX

#include "AliProtonCorrectionTask.h"
#include "TCanvas.h"
#include "AliStack.h"
#include "TParticle.h"
#include "TH1I.h"
#include "AliMCEvent.h"
#include "AliAnalysisManager.h"
#include "AliESDEvent.h"
#include "AliAODEvent.h"
#include "AliCFManager.h"
#include "AliCFCutBase.h"
#include "AliCFContainer.h"
#include "TChain.h"
#include "AliESDtrack.h"
#include "AliLog.h"
//#include "AliTPCtrack.h"

ClassImp(AliProtonCorrectionTask)

//__________________________________________________________________________
AliProtonCorrectionTask::AliProtonCorrectionTask() :
  fReadTPCTracks(0),
  fReadAODData(0),
  fCFManagerProtons(0x0),
  fCFManagerAntiProtons(0x0),
  fQAHistList(0x0),
  fHistEventsProcessed(0x0)
{
  //
  //Default ctor
  //
}
//___________________________________________________________________________
AliProtonCorrectionTask::AliProtonCorrectionTask(const Char_t* name) :
  AliAnalysisTaskSE(name),
  fReadTPCTracks(0),
  fReadAODData(0),
  fCFManagerProtons(0x0),
  fCFManagerAntiProtons(0x0),
  fQAHistList(0x0),
  fHistEventsProcessed(0x0) {
  //
  // Constructor. Initialization of Inputs and Outputs
  //
  Info("AliProtonCorrectionTask","Calling Constructor");

  /*
    DefineInput(0) and DefineOutput(0)
    are taken care of by AliAnalysisTaskSE constructor
  */
  DefineOutput(1,TH1I::Class());
  DefineOutput(2,AliCFContainer::Class());
  DefineOutput(3,AliCFContainer::Class());
  DefineOutput(4,TList::Class());
}

//___________________________________________________________________________
AliProtonCorrectionTask& AliProtonCorrectionTask::operator=(const AliProtonCorrectionTask& c) {
  //
  // Assignment operator
  //
  if (this!=&c) {
    AliAnalysisTaskSE::operator=(c) ;
    fReadTPCTracks = c.fReadTPCTracks ;
    fReadAODData = c.fReadAODData ;
    fCFManagerProtons  = c.fCFManagerProtons;
    fCFManagerAntiProtons  = c.fCFManagerAntiProtons;
    fQAHistList = c.fQAHistList ;
    fHistEventsProcessed = c.fHistEventsProcessed;
  }
  return *this;
}

//___________________________________________________________________________
AliProtonCorrectionTask::AliProtonCorrectionTask(const AliProtonCorrectionTask& c) :
  AliAnalysisTaskSE(c),
  fReadTPCTracks(c.fReadTPCTracks),
  fReadAODData(c.fReadAODData),
  fCFManagerProtons(c.fCFManagerProtons),
  fCFManagerAntiProtons(c.fCFManagerAntiProtons),
  fQAHistList(c.fQAHistList),
  fHistEventsProcessed(c.fHistEventsProcessed) {
  //
  // Copy Constructor
  //
}

//___________________________________________________________________________
AliProtonCorrectionTask::~AliProtonCorrectionTask() {
  //
  //destructor
  //
  Info("~AliProtonCorrectionTask","Calling Destructor");
  if (fCFManagerProtons) delete fCFManagerProtons ;
  if (fCFManagerAntiProtons) delete fCFManagerAntiProtons ;
  if (fHistEventsProcessed) delete fHistEventsProcessed ;
  if (fQAHistList) {fQAHistList->Clear(); delete fQAHistList;}
}

//_________________________________________________
void AliProtonCorrectionTask::UserExec(Option_t *) {
  //
  // Main loop function
  //
  Info("UserExec","") ;

  AliVEvent*    fEvent = fInputEvent ;
  AliVParticle* track ;
  
  if (!fEvent) {
    Error("UserExec","NO EVENT FOUND!");
    return;
  }

  if (!fMCEvent) Error("UserExec","NO MC INFO FOUND");
  
  //pass the MC evt handler to the cuts that need it 
  fCFManagerProtons->SetEventInfo(fMCEvent);
  fCFManagerAntiProtons->SetEventInfo(fMCEvent);

  // MC-event selection
  Double_t containerInput[2] ;
        
  //__________________________________________________________//
  //loop on the MC event
  for (Int_t ipart=0; ipart<fMCEvent->GetNumberOfTracks(); ipart++) { 
    AliMCParticle *mcPart  = fMCEvent->GetTrack(ipart);

    //check the MC-level cuts
    if (!fCFManagerProtons->CheckParticleCuts(AliCFManager::kPartGenCuts,mcPart)) continue;
    
    containerInput[0] = Rapidity(mcPart->Px(),
				 mcPart->Py(),
				 mcPart->Pz());
    containerInput[1] = (Float_t)mcPart->Pt();
    //fill the container for Gen-level selection
    fCFManagerProtons->GetParticleContainer()->Fill(containerInput,kStepGenerated);

    //check the Acceptance-level cuts
    if (!fCFManagerProtons->CheckParticleCuts(AliCFManager::kPartAccCuts,mcPart)) continue;
    //fill the container for Acceptance-level selection
    fCFManagerProtons->GetParticleContainer()->Fill(containerInput,kStepReconstructible);
  }//loop over MC particles (protons)
  //__________________________________________________________//
  //loop on the MC event
  for (Int_t ipart=0; ipart<fMCEvent->GetNumberOfTracks(); ipart++) { 
    AliMCParticle *mcPart  = fMCEvent->GetTrack(ipart);

    //check the MC-level cuts
    if (!fCFManagerAntiProtons->CheckParticleCuts(AliCFManager::kPartGenCuts,mcPart)) continue;
    
    containerInput[0] = Rapidity(mcPart->Px(),
				 mcPart->Py(),
				 mcPart->Pz());
    containerInput[1] = (Float_t)mcPart->Pt();
    //fill the container for Gen-level selection
    fCFManagerAntiProtons->GetParticleContainer()->Fill(containerInput,kStepGenerated);

    //check the Acceptance-level cuts
    if (!fCFManagerAntiProtons->CheckParticleCuts(AliCFManager::kPartAccCuts,mcPart)) continue;
    //fill the container for Acceptance-level selection
    fCFManagerAntiProtons->GetParticleContainer()->Fill(containerInput,kStepReconstructible);
  }//loop over MC particles (antiprotons)

  //__________________________________________________________//
  //ESD track loop
  for (Int_t iTrack = 0; iTrack<fEvent->GetNumberOfTracks(); iTrack++) {
    track = fEvent->GetTrack(iTrack);
    
    if (fReadTPCTracks) {
      if (fReadAODData) {
	Error("UserExec","TPC-only tracks are not supported with AOD");
	return ;
      }
      AliESDtrack* esdTrack    = (AliESDtrack*) track;
      AliESDtrack* esdTrackTPC = new AliESDtrack();
      if (!esdTrack->FillTPCOnlyTrack(*esdTrackTPC)) {
	Error("UserExec","Could not retrieve TPC info");
	continue;
      }
      track = esdTrackTPC ;
    }

    if (!fCFManagerProtons->CheckParticleCuts(AliCFManager::kPartRecCuts,track)) continue;
    
    // is track associated to particle ?
    Int_t label = track->GetLabel();
    if (label<0) continue;
    AliMCParticle *mcPart  = fMCEvent->GetTrack(label);
    
    // check if this track was part of the signal
    if (!fCFManagerProtons->CheckParticleCuts(AliCFManager::kPartGenCuts,mcPart)) continue; 
    
    //fill the container
    containerInput[0] = Rapidity(track->Px(),
                                 track->Py(),
                                 track->Pz());
    containerInput[1] = track->Pt();
    fCFManagerProtons->GetParticleContainer()->Fill(containerInput,kStepReconstructed) ;   

    if (!fCFManagerProtons->CheckParticleCuts(AliCFManager::kPartSelCuts,track)) continue ;
    fCFManagerProtons->GetParticleContainer()->Fill(containerInput,kStepSelected);

    if (fReadTPCTracks) delete track;
  }
  //__________________________________________________________//
  //ESD track loop
  for (Int_t iTrack = 0; iTrack<fEvent->GetNumberOfTracks(); iTrack++) {
    track = fEvent->GetTrack(iTrack);
    
    if (fReadTPCTracks) {
      if (fReadAODData) {
	Error("UserExec","TPC-only tracks are not supported with AOD");
	return ;
      }
      AliESDtrack* esdTrack    = (AliESDtrack*) track;
      AliESDtrack* esdTrackTPC = new AliESDtrack();
      if (!esdTrack->FillTPCOnlyTrack(*esdTrackTPC)) {
	Error("UserExec","Could not retrieve TPC info");
	continue;
      }
      track = esdTrackTPC ;
    }

    if (!fCFManagerAntiProtons->CheckParticleCuts(AliCFManager::kPartRecCuts,track)) continue;
    
    // is track associated to particle ?
    Int_t label = track->GetLabel();
    if (label<0) continue;
    AliMCParticle *mcPart  = fMCEvent->GetTrack(label);
    
    // check if this track was part of the signal
    if (!fCFManagerAntiProtons->CheckParticleCuts(AliCFManager::kPartGenCuts,mcPart)) continue; 
    
    //fill the container
    containerInput[0] = Rapidity(track->Px(),
                                 track->Py(),
                                 track->Pz());
    containerInput[1] = track->Pt();
    fCFManagerAntiProtons->GetParticleContainer()->Fill(containerInput,kStepReconstructed) ;   

    if (!fCFManagerAntiProtons->CheckParticleCuts(AliCFManager::kPartSelCuts,track)) continue ;
    fCFManagerAntiProtons->GetParticleContainer()->Fill(containerInput,kStepSelected);

    if (fReadTPCTracks) delete track;
  }
  
  fHistEventsProcessed->Fill(0);

  /* PostData(0) is taken care of by AliAnalysisTaskSE */
  PostData(1,fHistEventsProcessed) ;
  PostData(2,fCFManagerProtons->GetParticleContainer()) ;
  PostData(3,fCFManagerAntiProtons->GetParticleContainer()) ;
  PostData(4,fQAHistList) ;
}


//___________________________________________________________________________
void AliProtonCorrectionTask::Terminate(Option_t*) {
  // 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.

  Info("Terminate","");
  AliAnalysisTaskSE::Terminate();

  //draw some example plots....

  AliCFContainer *cont= dynamic_cast<AliCFContainer*> (GetOutputData(2));

  TH1D* h00 =   cont->ShowProjection(0,0) ;
  TH1D* h01 =   cont->ShowProjection(0,1) ;
  TH1D* h02 =   cont->ShowProjection(0,2) ;
  TH1D* h03 =   cont->ShowProjection(0,3) ;

  TH1D* h10 =   cont->ShowProjection(1,0) ;
  TH1D* h11 =   cont->ShowProjection(1,1) ;
  TH1D* h12 =   cont->ShowProjection(1,2) ;
  TH1D* h13 =   cont->ShowProjection(1,3) ;

  TCanvas * c =new TCanvas("c","",1400,800);
  c->Divide(4,2);

  c->cd(1); h00->Draw("p");
  c->cd(2); h01->Draw("p");
  c->cd(3); h02->Draw("p");
  c->cd(4); h03->Draw("p");
  c->cd(5); h10->Draw("p");
  c->cd(6); h11->Draw("p");
  c->cd(7); h12->Draw("p");
  c->cd(8); h13->Draw("p");

  c->SaveAs("plots.eps");
}


//___________________________________________________________________________
void AliProtonCorrectionTask::UserCreateOutputObjects() {
  //HERE ONE CAN CREATE OUTPUT OBJECTS, IN PARTICULAR IF THE OBJECT PARAMETERS DON'T NEED
  //TO BE SET BEFORE THE EXECUTION OF THE TASK
  //
  Info("CreateOutputObjects","CreateOutputObjects of task %s", GetName());

  //slot #1
  OpenFile(1);
  fHistEventsProcessed = new TH1I("fHistEventsProcessed","",1,0,1) ;

//   OpenFile(2);
//   OpenFile(3);
}

//___________________________________________________________________________ 
Double_t AliProtonCorrectionTask::Rapidity(Double_t Px, Double_t Py, Double_t Pz) {
  //returns the rapidity of the (anti)proton
  Double_t fMass = 9.38270000000000048e-01;

  Double_t P = TMath::Sqrt(TMath::Power(Px,2) +
                           TMath::Power(Py,2) +
                           TMath::Power(Pz,2));
  Double_t energy = TMath::Sqrt(P*P + fMass*fMass);
  Double_t y = -999;
  if(energy != Pz)
    y = 0.5*TMath::Log((energy + Pz)/(energy - Pz));

  return y;
}

#endif