[u/mrichter/AliRoot.git] / STEER / AliAODTagCreator.cxx

/**************************************************************************
 * Author: Panos Christakoglou.                                           *
 * 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.                  *
 **************************************************************************/

/* $Id$ */

//-----------------------------------------------------------------
//           AliAODTagCreator class
//   This is the class to deal with the tag creation (post process)
//   Origin: Panos Christakoglou, UOA-CERN, Panos.Christakoglou@cern.ch
//-----------------------------------------------------------------

//ROOT
#include <Riostream.h>
#include <TFile.h>
#include <TString.h>
#include <TTree.h>
#include <TSystem.h>
#include <TChain.h>
#include <TLorentzVector.h>

//ROOT-AliEn
#include <TGrid.h>
#include <TGridResult.h>

//AliRoot
#include "AliRunTag.h"
#include "AliEventTag.h"
#include "AliPID.h"
#include "AliAODEvent.h"
#include "AliAODVertex.h"
#include "AliLog.h"

#include "AliAODTagCreator.h"


ClassImp(AliAODTagCreator)


//______________________________________________________________________________
  AliAODTagCreator::AliAODTagCreator() :
    AliTagCreator(), 
    fChain(0), 
    fAODEvent(0), 
    fTreeT(0), 
    fRunTag(0),
    fTreeTEsd(0), 
    fRunTagEsd(0)  
{
  //==============Default constructor for a AliAODTagCreator================
}

//______________________________________________________________________________
AliAODTagCreator::~AliAODTagCreator() {
//================Default destructor for a AliAODTagCreator===================
  delete fChain;
  delete fAODEvent;
}

//______________________________________________________________________________
Bool_t AliAODTagCreator::ReadGridCollection(TGridResult *fresult) {
  // Reads the entry of the TGridResult and creates the tags
  Int_t nEntries = fresult->GetEntries();

  TString alienUrl;
  const char* guid;
  const char* md5;
  const char* turl;
  Long64_t size = -1;

  fChain = new TChain("aodTree");
 
  for(Int_t i = 0; i < nEntries; i++) {
    alienUrl = fresult->GetKey(i,"turl");
    guid = fresult->GetKey(i,"guid");
    if(fresult->GetKey(i,"size")) size = atol (fresult->GetKey(i,"size"));
    md5 = fresult->GetKey(i,"md5");
    turl = fresult->GetKey(i,"turl");
    if(md5 && !strlen(guid)) md5 = 0;
    if(guid && !strlen(guid)) guid = 0;
    
    fChain->Add(alienUrl);
  }//grid result loop
  
  AliInfo(Form("AOD chain created......."));	
  AliInfo(Form("Chain entries: %d",fChain->GetEntries()));	

  CreateTag(fChain, "grid");
  
  return kTRUE;
}

//______________________________________________________________________________
Bool_t AliAODTagCreator::ReadLocalCollection(const char *localpath) {
  // Checks the different subdirs of the given local path and in the
  // case where it finds an AliAODs.root file it creates the tags
  
  void *dira =  gSystem->OpenDirectory(localpath);
  Char_t fPath[256];
  const char * dirname = 0x0;
  const char * filename = 0x0;
  const char * pattern = "AliAODs.root"; 

  fChain = new TChain("aodTree");

  while((dirname = gSystem->GetDirEntry(dira))) {
    sprintf(fPath,"%s/%s",localpath,dirname);
    void *dirb =  gSystem->OpenDirectory(fPath);
    while((filename = gSystem->GetDirEntry(dirb))) {
      if(strstr(filename,pattern)) {
	TString aodFileName;
	aodFileName = fPath;
	aodFileName += "/";
	aodFileName += pattern;
	fChain->Add(aodFileName);
      }//pattern check
    }//child directory's entry loop
  }//parent directory's entry loop

  AliInfo(Form("AOD chain created......."));	
  AliInfo(Form("Chain entries: %d",fChain->GetEntries()));	

  CreateTag(fChain, "local");

  return kTRUE;
}

//______________________________________________________________________________
Bool_t AliAODTagCreator::ReadCAFCollection(const char *filename) {
  // Temporary solution for CAF: Takes as an input the ascii file that
  // lists the AODs stored in the SE of the CAF and creates the tags.

  // Open the input stream
  ifstream in;
  in.open(filename);

  TString aodfile;

  fChain = new TChain("aodTree");

  // Read the input list of files and add them to the chain
  while(in.good()) {
    in >> aodfile;
    if (!aodfile.Contains("root")) continue; // protection
    fChain->Add(aodfile);
  }

  AliInfo(Form("AOD chain created......."));	
  AliInfo(Form("Chain entries: %d",fChain->GetEntries()));	

  CreateTag(fChain, "proof");

  return kTRUE;
}

//__________________________________________________________________________
void AliAODTagCreator::CreateAODTags(Int_t fFirstEvent, Int_t fLastEvent, TList */*grpList*/) {
  // Creates tag files for AODs

    AliInfo(Form("Creating the AOD tags......."));	
    
    TFile *file = TFile::Open("AliAOD.root");
    if (!file || !file->IsOpen()) {
	AliError(Form("opening failed"));
	delete file;
	return ;
    }

    fChain = new TChain("aodTree");
    fChain->Add("AliAOD.root");
    
    fAODEvent = new AliAODEvent();
    fAODEvent->ReadFromTree(fChain);
    
    Int_t lastEvent = 0;  
    if(fLastEvent == -1) lastEvent = (Int_t)fChain->GetEntries();
    else lastEvent = fLastEvent;


    char fileName[256];
    sprintf(fileName, "Run%d.Event%d_%d.AOD.tag.root", 
	    fAODEvent->GetRunNumber(), fFirstEvent, lastEvent );
    AliInfo(Form("writing tags to file %s", fileName));
    AliDebug(1, Form("writing tags to file %s", fileName));
 
    TFile* ftag = TFile::Open(fileName, "recreate");

    AliRunTag *fRunTag = new AliRunTag();
    fTreeT = new TTree("T","A Tree with event tags");
    TBranch * btag = fTreeT->Branch("AliTAG", &fRunTag);
    btag->SetCompressionLevel(9);

    CreateTags();

    ftag->cd();
    fTreeT->Fill();
    fRunTag->Clear();
    fTreeT->Write();
    ftag->Close();
    file->cd();
    file->Close();
}

//_____________________________________________________________________________
void AliAODTagCreator::CreateTag(TChain* chain, const char *type) {
    
    // Private method that creates tag files
    //


    //reading the esd tag file                                                  
    fTreeTEsd = new TChain("T");
    const char * tagPattern = "ESD.tag";
    // Open the working directory
    void * dirp = gSystem->OpenDirectory(gSystem->pwd());
    const char * name = 0x0;
    // Add all files matching *pattern* to the chain
    while((name = gSystem->GetDirEntry(dirp))) {
	if (strstr(name,tagPattern)) fTreeTEsd->Add(name);
    }//directory loop
    AliInfo(Form("Chained tag files: %d", fTreeTEsd->GetEntries()));
  
    
    fChain = chain;
    
    TString fSession = type;
    TString fguid, fmd5, fturl;
    fAODEvent = new AliAODEvent();
    fAODEvent->ReadFromTree(fChain);

    Int_t firstEvent = 0;
    
    TString localFileName = "Run"; 
    localFileName += fAODEvent->GetRunNumber(); 
    localFileName += ".Event"; 
    localFileName += firstEvent; 
    localFileName += "_"; 
    localFileName += chain->GetEntries(); //localFileName += "."; localFileName += Counter;
    localFileName += ".AOD.tag.root";
    
    TString fileName;
    
    if(fStorage == 0) {
	fileName = localFileName.Data();      
	AliInfo(Form("Writing tags to local file: %s",fileName.Data()));
    }
    else if(fStorage == 1) {
	TString alienLocation = "/alien";
	alienLocation += gGrid->Pwd();
	alienLocation += fgridpath.Data();
	alienLocation += "/";
	alienLocation +=  localFileName;
	alienLocation += "?se=";
	alienLocation += fSE.Data();
	fileName = alienLocation.Data();
	AliInfo(Form("Writing tags to grid file: %s",fileName.Data()));
    }
    
    TFile* ftag = TFile::Open(fileName, "recreate");
    
    fRunTag = new AliRunTag();
    fTreeT  = new TTree("T", "A Tree with event tags");
    TBranch * btag = fTreeT->Branch("AliTAG", &fRunTag);
    btag->SetCompressionLevel(9);
    
    // Access information from esd tag
    fRunTagEsd = new AliRunTag();
    fTreeTEsd->SetBranchAddress("AliTAG",&fRunTagEsd);
    // Creating new information of aod
    AliInfo(Form("Creating the AOD tags......."));
    CreateTags(type);
    ftag->cd();
    fRunTag->Clear();
    fTreeT->Write();
    ftag->Close();
}

void AliAODTagCreator::CreateTags(const char* type)
{
    // Event loop for tag creation
    TString fturl;
    TString fguid;
    Int_t   oldRun = -1;
    fChain->GetEntry(0);
    TFile *f = fChain->GetFile();
    TString ftempGuid = f->GetUUID().AsString();
    // Loop over events 
    Int_t nEvents = fChain->GetEntries();
    Int_t ntags    = 0;
    Int_t tagentry = 0;
    const TClonesArray *evTagList = 0;

    for (Int_t iEventNumber = 0; iEventNumber < nEvents; iEventNumber++) {
	// Copy old tag information
	if (iEventNumber >= ntags) {
	    fTreeTEsd->GetEntry(tagentry++);
	    fRunTag->CopyStandardContent(fRunTagEsd);
	    evTagList = fRunTagEsd->GetEventTags();
	    ntags += evTagList->GetEntries();
	}

	// Create a new Tag
	AliEventTag* evTag = new AliEventTag();
	// Read event
	fChain->GetEntry(iEventNumber);
	if (iEventNumber == 0) oldRun = fAODEvent->GetRunNumber();
	// Reference to the input file
	TFile *file = fChain->GetFile();
	const TUrl *url = file->GetEndpointUrl();
	fguid = file->GetUUID().AsString();

	if (type == "grid") {
	    TString fturltemp = "alien://"; fturltemp += url->GetFile();
	    fturl = fturltemp(0,fturltemp.Index(".root",5,0,TString::kExact)+5);
	} else {
	    fturl = url->GetFile();
	}
	
	fAODEvent->GetStdContent();
	
	// Fill the event tag from the aod informatiom
	FillEventTag(fAODEvent, evTag);
	// Set the event and input file references
	evTag->SetEventId(iEventNumber+1);
	evTag->SetGUID(fguid);
	if(type == "grid") {
	    evTag->SetMD5(0);
	    evTag->SetTURL(fturl);
	    evTag->SetSize(0);
	    }
	else evTag->SetPath(fturl);

	// Check if a new run has to be created
	// File has changed
	if(fguid != ftempGuid) {
	    ftempGuid = fguid;
	    fTreeT->Fill();
	    fRunTag->Clear("");
	}
	// Run# has changed
	if (oldRun != (fAODEvent->GetRunNumber()))
	{
	    oldRun = fAODEvent->GetRunNumber();
	    fTreeT->Fill();
	    fRunTag->Clear("");
	}
	
	// Add the event tag
	fRunTag->AddEventTag(*evTag);
	delete evTag;
	// Last event
	if(iEventNumber+1 == fChain->GetEntries()) {
	    fTreeT->Fill();
	    fRunTag->Clear("");
	}      
    }//event loop
}


void AliAODTagCreator::FillEventTag(AliAODEvent* aod, AliEventTag* evTag)
{
// 
// Fill the event tag information	
    //
    fAODEvent = aod;
    
    //
    Float_t fLowPtCut      =  1.0;
    Float_t fHighPtCut     =  3.0;
    Float_t fVeryHighPtCut = 10.0;
    ////////////                            
    Double_t partFrac[10] = {0.01, 0.01, 0.85, 0.10, 0.05, 0., 0., 0., 0., 0.};
    
    // Creates the tags for all the events in a given AOD file
    Int_t   ntrack = 0;
    Int_t   nPos = 0, nNeg = 0, nNeutr =0;
    Int_t   nKinks = 0, nV0s = 0, nCascades = 0;
    Int_t   nK0s = 0, nNeutrons = 0, nPi0s = 0, nGamas = 0;
    Int_t   nProtons = 0,  nKaons = 0, nPions = 0, nMuons = 0, nElectrons = 0;
    Int_t   nCh1GeV = 0, nCh3GeV = 0, nCh10GeV = 0;
    Int_t   nMu1GeV = 0, nMu3GeV = 0, nMu10GeV = 0;
    Int_t   nEl1GeV = 0, nEl3GeV = 0, nEl10GeV = 0;
    Float_t maxPt =  .0, meanPt = .0, totalP =  .0;

    Int_t nTracks = fAODEvent->GetNTracks();
    // loop over vertices 
    Int_t nVtxs = fAODEvent->GetNumberOfVertices();
    for (Int_t nVtx = 0; nVtx < nVtxs; nVtx++) {
	AliAODVertex *vertex = fAODEvent->GetVertex(nVtx);
	if(vertex->GetType() == 1) nKinks    += 1;
	if(vertex->GetType() == 2) nV0s      += 1;
	if(vertex->GetType() == 3) nCascades += 1;
    }
    for (Int_t nTr = 0; nTr < nTracks; nTr++) {
	AliAODTrack *track = fAODEvent->GetTrack(nTr);
	
	Double_t fPt = track->Pt();
	if(fPt > maxPt) maxPt = fPt;
	if(track->Charge() > 0) {
	    nPos++;
	    if(fPt > fLowPtCut)      nCh1GeV++;
	    if(fPt > fHighPtCut)     nCh3GeV++;
	    if(fPt > fVeryHighPtCut) nCh10GeV++;
	}
	if(track->Charge() < 0) {
	    nNeg++;
	    if(fPt > fLowPtCut)      nCh1GeV++;
	    if(fPt > fHighPtCut)     nCh3GeV++;
	    if(fPt > fVeryHighPtCut) nCh10GeV++;
	    }
	if(track->Charge() == 0) nNeutr++;
	//PID
	const Double32_t *prob = track->PID();
	Double_t rcc = 0.0;
	for(Int_t i = 0; i < AliPID::kSPECIES; i++) rcc += prob[i]*partFrac[i];
	if(rcc == 0.0) continue;
	//Bayes' formula  
	Double_t w[10];
	for(Int_t i = 0; i < AliPID::kSPECIES; i++) w[i] = prob[i]*partFrac[i]/rcc;
	
	//protons
	if ((w[4]>w[3])&&(w[4]>w[2])&&(w[4]>w[1])&&(w[4]>w[0])) nProtons++;
	//kaons
	if ((w[3]>w[4])&&(w[3]>w[2])&&(w[3]>w[1])&&(w[3]>w[0])) nKaons++;
	//pions
	if ((w[2]>w[4])&&(w[2]>w[3])&&(w[2]>w[1])&&(w[2]>w[0])) nPions++;
	//muons 
	if ((w[1]>w[4])&&(w[1]>w[3])&&(w[1]>w[2])&&(w[1]>w[0])) {
	    nMuons++;
	    if(fPt > fLowPtCut)      nMu1GeV++;
	    if(fPt > fHighPtCut)     nMu3GeV++;
	    if(fPt > fVeryHighPtCut) nMu10GeV++;
	}
	//electrons  
	if ((w[0]>w[4])&&(w[0]>w[3])&&(w[0]>w[2])&&(w[0]>w[1])) {
	    nElectrons++;
	    if(fPt > fLowPtCut) nEl1GeV++;
	    if(fPt > fHighPtCut) nEl3GeV++;
	    if(fPt > fVeryHighPtCut) nEl10GeV++;
	}
	    
	totalP += track->P();
	meanPt += fPt;
	ntrack++;
    }//track loop
    //
    // Fill the event tags  
    if(ntrack != 0)
	meanPt = meanPt/ntrack;
    
    
    evTag->SetNumOfTracks(nTracks);
    evTag->SetNumOfPosTracks(nPos);
    evTag->SetNumOfNegTracks(nNeg);
    evTag->SetNumOfNeutrTracks(nNeutr);
    
    evTag->SetNumOfV0s(nV0s);
    evTag->SetNumOfCascades(nCascades);
    evTag->SetNumOfKinks(nKinks);
    
    evTag->SetNumOfProtons(nProtons);
    evTag->SetNumOfKaons(nKaons);
    evTag->SetNumOfPions(nPions);
    evTag->SetNumOfMuons(nMuons);
    evTag->SetNumOfElectrons(nElectrons);
    evTag->SetNumOfPhotons(nGamas);
    evTag->SetNumOfPi0s(nPi0s);
    evTag->SetNumOfNeutrons(nNeutrons);
    evTag->SetNumOfKaon0s(nK0s);
    
    evTag->SetNumOfChargedAbove1GeV(nCh1GeV);
    evTag->SetNumOfChargedAbove3GeV(nCh3GeV);
    evTag->SetNumOfChargedAbove10GeV(nCh10GeV);
    evTag->SetNumOfMuonsAbove1GeV(nMu1GeV);
    evTag->SetNumOfMuonsAbove3GeV(nMu3GeV);
    evTag->SetNumOfMuonsAbove10GeV(nMu10GeV);
    evTag->SetNumOfElectronsAbove1GeV(nEl1GeV);
    evTag->SetNumOfElectronsAbove3GeV(nEl3GeV);
    evTag->SetNumOfElectronsAbove10GeV(nEl10GeV);
	
    evTag->SetTotalMomentum(totalP);
    evTag->SetMeanPt(meanPt);
    evTag->SetMaxPt(maxPt);
}
Commit	Line	Data
a1069ee1	1	/**************************************************************************
	2	* Author: Panos Christakoglou. *
	3	* Contributors are mentioned in the code where appropriate. *
	4	* *
	5	* Permission to use, copy, modify and distribute this software and its *
	6	* documentation strictly for non-commercial purposes is hereby granted *
	7	* without fee, provided that the above copyright notice appears in all *
	8	* copies and that both the copyright notice and this permission notice *
	9	* appear in the supporting documentation. The authors make no claims *
	10	* about the suitability of this software for any purpose. It is *
	11	* provided "as is" without express or implied warranty. *
	12	**************************************************************************/
	13
	14	/* $Id$ */
	15
	16	//-----------------------------------------------------------------
	17	// AliAODTagCreator class
	18	// This is the class to deal with the tag creation (post process)
	19	// Origin: Panos Christakoglou, UOA-CERN, Panos.Christakoglou@cern.ch
	20	//-----------------------------------------------------------------
	21
	22	//ROOT
	23	#include <Riostream.h>
	24	#include <TFile.h>
	25	#include <TString.h>
	26	#include <TTree.h>
	27	#include <TSystem.h>
	28	#include <TChain.h>
	29	#include <TLorentzVector.h>
	30
	31	//ROOT-AliEn
	32	#include <TGrid.h>
	33	#include <TGridResult.h>
	34
	35	//AliRoot
	36	#include "AliRunTag.h"
	37	#include "AliEventTag.h"
	38	#include "AliPID.h"
a1069ee1	39	#include "AliAODEvent.h"
	40	#include "AliAODVertex.h"
	41	#include "AliLog.h"
	42
	43	#include "AliAODTagCreator.h"
	44
	45
	46	ClassImp(AliAODTagCreator)
	47
	48
	49	//______________________________________________________________________________
	50	AliAODTagCreator::AliAODTagCreator() :
6e557e6d	51	AliTagCreator(),
	52	fChain(0),
	53	fAODEvent(0),
	54	fTreeT(0),
	55	fRunTag(0),
	56	fTreeTEsd(0),
	57	fRunTagEsd(0)
	58	{
a1069ee1	59	//==============Default constructor for a AliAODTagCreator================
	60	}
	61
	62	//______________________________________________________________________________
	63	AliAODTagCreator::~AliAODTagCreator() {
	64	//================Default destructor for a AliAODTagCreator===================
103d3fba	65	delete fChain;
6e557e6d	66	delete fAODEvent;
a1069ee1	67	}
	68
	69	//______________________________________________________________________________
	70	Bool_t AliAODTagCreator::ReadGridCollection(TGridResult *fresult) {
	71	// Reads the entry of the TGridResult and creates the tags
	72	Int_t nEntries = fresult->GetEntries();
	73
103d3fba	74	TString alienUrl;
	75	const char* guid;
	76	const char* md5;
	77	const char* turl;
	78	Long64_t size = -1;
	79
6e557e6d	80	fChain = new TChain("aodTree");
6e557e6d	81
103d3fba	82	for(Int_t i = 0; i < nEntries; i++) {
	83	alienUrl = fresult->GetKey(i,"turl");
	84	guid = fresult->GetKey(i,"guid");
	85	if(fresult->GetKey(i,"size")) size = atol (fresult->GetKey(i,"size"));
	86	md5 = fresult->GetKey(i,"md5");
	87	turl = fresult->GetKey(i,"turl");
	88	if(md5 && !strlen(guid)) md5 = 0;
	89	if(guid && !strlen(guid)) guid = 0;
	90
	91	fChain->Add(alienUrl);
103d3fba	92	}//grid result loop
	93
	94	AliInfo(Form("AOD chain created......."));
	95	AliInfo(Form("Chain entries: %d",fChain->GetEntries()));
6e557e6d	96
6e557e6d	97	CreateTag(fChain, "grid");
103d3fba	98
	99	return kTRUE;
	100	}
	101
a1069ee1	102	//______________________________________________________________________________
a1069ee1	103	Bool_t AliAODTagCreator::ReadLocalCollection(const char *localpath) {
103d3fba	104	// Checks the different subdirs of the given local path and in the
6e557e6d	105	// case where it finds an AliAODs.root file it creates the tags
103d3fba	106
	107	void *dira = gSystem->OpenDirectory(localpath);
	108	Char_t fPath[256];
	109	const char * dirname = 0x0;
	110	const char * filename = 0x0;
	111	const char * pattern = "AliAODs.root";
	112
6e557e6d	113	fChain = new TChain("aodTree");
6e557e6d	114
103d3fba	115	while((dirname = gSystem->GetDirEntry(dira))) {
	116	sprintf(fPath,"%s/%s",localpath,dirname);
	117	void *dirb = gSystem->OpenDirectory(fPath);
	118	while((filename = gSystem->GetDirEntry(dirb))) {
	119	if(strstr(filename,pattern)) {
6e557e6d	120	TString aodFileName;
	121	aodFileName = fPath;
	122	aodFileName += "/";
	123	aodFileName += pattern;
	124	fChain->Add(aodFileName);
103d3fba	125	}//pattern check
	126	}//child directory's entry loop
	127	}//parent directory's entry loop
	128
	129	AliInfo(Form("AOD chain created......."));
	130	AliInfo(Form("Chain entries: %d",fChain->GetEntries()));
6e557e6d	131
6e557e6d	132	CreateTag(fChain, "local");
103d3fba	133
	134	return kTRUE;
	135	}
	136
a1069ee1	137	//______________________________________________________________________________
a1069ee1	138	Bool_t AliAODTagCreator::ReadCAFCollection(const char *filename) {
103d3fba	139	// Temporary solution for CAF: Takes as an input the ascii file that
6e557e6d	140	// lists the AODs stored in the SE of the CAF and creates the tags.
103d3fba	141
	142	// Open the input stream
	143	ifstream in;
	144	in.open(filename);
	145
6e557e6d	146	TString aodfile;
	147
	148	fChain = new TChain("aodTree");
	149
103d3fba	150	// Read the input list of files and add them to the chain
103d3fba	151	while(in.good()) {
6e557e6d	152	in >> aodfile;
	153	if (!aodfile.Contains("root")) continue; // protection
	154	fChain->Add(aodfile);
103d3fba	155	}
	156
	157	AliInfo(Form("AOD chain created......."));
	158	AliInfo(Form("Chain entries: %d",fChain->GetEntries()));
6e557e6d	159
6e557e6d	160	CreateTag(fChain, "proof");
103d3fba	161
	162	return kTRUE;
	163	}
	164
a1069ee1	165	//__________________________________________________________________________
786172af	166	void AliAODTagCreator::CreateAODTags(Int_t fFirstEvent, Int_t fLastEvent, TList /grpList*/) {
6e557e6d	167	// Creates tag files for AODs
a1069ee1	168
6e557e6d	169	AliInfo(Form("Creating the AOD tags......."));
a1069ee1	170
6e557e6d	171	TFile *file = TFile::Open("AliAOD.root");
	172	if (!file \|\| !file->IsOpen()) {
	173	AliError(Form("opening failed"));
	174	delete file;
	175	return ;
a1069ee1	176	}
a1069ee1	177
6e557e6d	178	fChain = new TChain("aodTree");
6e557e6d	179	fChain->Add("AliAOD.root");
a1069ee1	180
6e557e6d	181	fAODEvent = new AliAODEvent();
6e557e6d	182	fAODEvent->ReadFromTree(fChain);
a1069ee1	183
6e557e6d	184	Int_t lastEvent = 0;
	185	if(fLastEvent == -1) lastEvent = (Int_t)fChain->GetEntries();
	186	else lastEvent = fLastEvent;
	187
a1069ee1	188
6e557e6d	189	char fileName[256];
	190	sprintf(fileName, "Run%d.Event%d_%d.AOD.tag.root",
	191	fAODEvent->GetRunNumber(), fFirstEvent, lastEvent );
	192	AliInfo(Form("writing tags to file %s", fileName));
	193	AliDebug(1, Form("writing tags to file %s", fileName));
	194
	195	TFile* ftag = TFile::Open(fileName, "recreate");
	196
	197	AliRunTag *fRunTag = new AliRunTag();
	198	fTreeT = new TTree("T","A Tree with event tags");
	199	TBranch * btag = fTreeT->Branch("AliTAG", &fRunTag);
	200	btag->SetCompressionLevel(9);
	201
	202	CreateTags();
	203
	204	ftag->cd();
	205	fTreeT->Fill();
	206	fRunTag->Clear();
	207	fTreeT->Write();
	208	ftag->Close();
	209	file->cd();
	210	file->Close();
a1069ee1	211	}
a1069ee1	212
103d3fba	213	//_____________________________________________________________________________
5222362f	214	void AliAODTagCreator::CreateTag(TChain* chain, const char *type) {
6e557e6d	215
	216	// Private method that creates tag files
	217	//
	218
	219
	220	//reading the esd tag file
	221	fTreeTEsd = new TChain("T");
	222	const char * tagPattern = "ESD.tag";
	223	// Open the working directory
	224	void * dirp = gSystem->OpenDirectory(gSystem->pwd());
	225	const char * name = 0x0;
	226	// Add all files matching pattern to the chain
	227	while((name = gSystem->GetDirEntry(dirp))) {
	228	if (strstr(name,tagPattern)) fTreeTEsd->Add(name);
	229	}//directory loop
	230	AliInfo(Form("Chained tag files: %d", fTreeTEsd->GetEntries()));
fcc6b05f	231
6e557e6d	232
	233	fChain = chain;
	234
	235	TString fSession = type;
	236	TString fguid, fmd5, fturl;
	237	fAODEvent = new AliAODEvent();
	238	fAODEvent->ReadFromTree(fChain);
103d3fba	239
6e557e6d	240	Int_t firstEvent = 0;
	241
	242	TString localFileName = "Run";
	243	localFileName += fAODEvent->GetRunNumber();
	244	localFileName += ".Event";
	245	localFileName += firstEvent;
	246	localFileName += "_";
	247	localFileName += chain->GetEntries(); //localFileName += "."; localFileName += Counter;
	248	localFileName += ".AOD.tag.root";
	249
	250	TString fileName;
103d3fba	251
6e557e6d	252	if(fStorage == 0) {
	253	fileName = localFileName.Data();
	254	AliInfo(Form("Writing tags to local file: %s",fileName.Data()));
103d3fba	255	}
6e557e6d	256	else if(fStorage == 1) {
	257	TString alienLocation = "/alien";
	258	alienLocation += gGrid->Pwd();
	259	alienLocation += fgridpath.Data();
	260	alienLocation += "/";
	261	alienLocation += localFileName;
	262	alienLocation += "?se=";
	263	alienLocation += fSE.Data();
	264	fileName = alienLocation.Data();
	265	AliInfo(Form("Writing tags to grid file: %s",fileName.Data()));
103d3fba	266	}
103d3fba	267
6e557e6d	268	TFile* ftag = TFile::Open(fileName, "recreate");
	269
	270	fRunTag = new AliRunTag();
	271	fTreeT = new TTree("T", "A Tree with event tags");
	272	TBranch * btag = fTreeT->Branch("AliTAG", &fRunTag);
	273	btag->SetCompressionLevel(9);
	274
	275	// Access information from esd tag
	276	fRunTagEsd = new AliRunTag();
	277	fTreeTEsd->SetBranchAddress("AliTAG",&fRunTagEsd);
	278	// Creating new information of aod
	279	AliInfo(Form("Creating the AOD tags......."));
	280	CreateTags(type);
	281	ftag->cd();
	282	fRunTag->Clear();
	283	fTreeT->Write();
	284	ftag->Close();
103d3fba	285	}
103d3fba	286
6e557e6d	287	void AliAODTagCreator::CreateTags(const char* type)
	288	{
	289	// Event loop for tag creation
	290	TString fturl;
	291	TString fguid;
	292	Int_t oldRun = -1;
	293	fChain->GetEntry(0);
	294	TFile *f = fChain->GetFile();
	295	TString ftempGuid = f->GetUUID().AsString();
	296	// Loop over events
	297	Int_t nEvents = fChain->GetEntries();
	298	Int_t ntags = 0;
	299	Int_t tagentry = 0;
	300	const TClonesArray *evTagList = 0;
	301
	302	for (Int_t iEventNumber = 0; iEventNumber < nEvents; iEventNumber++) {
	303	// Copy old tag information
	304	if (iEventNumber >= ntags) {
	305	fTreeTEsd->GetEntry(tagentry++);
	306	fRunTag->CopyStandardContent(fRunTagEsd);
	307	evTagList = fRunTagEsd->GetEventTags();
	308	ntags += evTagList->GetEntries();
	309	}
5b8d5d69	310
6e557e6d	311	// Create a new Tag
	312	AliEventTag* evTag = new AliEventTag();
	313	// Read event
	314	fChain->GetEntry(iEventNumber);
	315	if (iEventNumber == 0) oldRun = fAODEvent->GetRunNumber();
	316	// Reference to the input file
	317	TFile *file = fChain->GetFile();
	318	const TUrl *url = file->GetEndpointUrl();
	319	fguid = file->GetUUID().AsString();
	320
	321	if (type == "grid") {
	322	TString fturltemp = "alien://"; fturltemp += url->GetFile();
	323	fturl = fturltemp(0,fturltemp.Index(".root",5,0,TString::kExact)+5);
	324	} else {
	325	fturl = url->GetFile();
	326	}
	327
	328	fAODEvent->GetStdContent();
	329
	330	// Fill the event tag from the aod informatiom
	331	FillEventTag(fAODEvent, evTag);
	332	// Set the event and input file references
	333	evTag->SetEventId(iEventNumber+1);
	334	evTag->SetGUID(fguid);
	335	if(type == "grid") {
	336	evTag->SetMD5(0);
	337	evTag->SetTURL(fturl);
	338	evTag->SetSize(0);
	339	}
	340	else evTag->SetPath(fturl);
	341
	342	// Check if a new run has to be created
	343	// File has changed
	344	if(fguid != ftempGuid) {
	345	ftempGuid = fguid;
	346	fTreeT->Fill();
	347	fRunTag->Clear("");
	348	}
	349	// Run# has changed
	350	if (oldRun != (fAODEvent->GetRunNumber()))
	351	{
	352	oldRun = fAODEvent->GetRunNumber();
	353	fTreeT->Fill();
	354	fRunTag->Clear("");
	355	}
	356
	357	// Add the event tag
	358	fRunTag->AddEventTag(*evTag);
	359	delete evTag;
	360	// Last event
	361	if(iEventNumber+1 == fChain->GetEntries()) {
	362	fTreeT->Fill();
	363	fRunTag->Clear("");
	364	}
	365	}//event loop
	366	}
5b8d5d69	367
5b8d5d69	368
5b8d5d69	369
6e557e6d	370	void AliAODTagCreator::FillEventTag(AliAODEvent* aod, AliEventTag* evTag)
	371	{
	372	//
	373	// Fill the event tag information
	374	//
	375	fAODEvent = aod;
	376
	377	//
	378	Float_t fLowPtCut = 1.0;
	379	Float_t fHighPtCut = 3.0;
	380	Float_t fVeryHighPtCut = 10.0;
	381	////////////
	382	Double_t partFrac[10] = {0.01, 0.01, 0.85, 0.10, 0.05, 0., 0., 0., 0., 0.};
	383
	384	// Creates the tags for all the events in a given AOD file
	385	Int_t ntrack = 0;
	386	Int_t nPos = 0, nNeg = 0, nNeutr =0;
	387	Int_t nKinks = 0, nV0s = 0, nCascades = 0;
	388	Int_t nK0s = 0, nNeutrons = 0, nPi0s = 0, nGamas = 0;
	389	Int_t nProtons = 0, nKaons = 0, nPions = 0, nMuons = 0, nElectrons = 0;
	390	Int_t nCh1GeV = 0, nCh3GeV = 0, nCh10GeV = 0;
	391	Int_t nMu1GeV = 0, nMu3GeV = 0, nMu10GeV = 0;
	392	Int_t nEl1GeV = 0, nEl3GeV = 0, nEl10GeV = 0;
	393	Float_t maxPt = .0, meanPt = .0, totalP = .0;
	394
	395	Int_t nTracks = fAODEvent->GetNTracks();
5b8d5d69	396	// loop over vertices
6e557e6d	397	Int_t nVtxs = fAODEvent->GetNumberOfVertices();
5b8d5d69	398	for (Int_t nVtx = 0; nVtx < nVtxs; nVtx++) {
6e557e6d	399	AliAODVertex *vertex = fAODEvent->GetVertex(nVtx);
	400	if(vertex->GetType() == 1) nKinks += 1;
	401	if(vertex->GetType() == 2) nV0s += 1;
	402	if(vertex->GetType() == 3) nCascades += 1;
5b8d5d69	403	}
5b8d5d69	404	for (Int_t nTr = 0; nTr < nTracks; nTr++) {
6e557e6d	405	AliAODTrack *track = fAODEvent->GetTrack(nTr);
	406
	407	Double_t fPt = track->Pt();
	408	if(fPt > maxPt) maxPt = fPt;
	409	if(track->Charge() > 0) {
	410	nPos++;
	411	if(fPt > fLowPtCut) nCh1GeV++;
	412	if(fPt > fHighPtCut) nCh3GeV++;
	413	if(fPt > fVeryHighPtCut) nCh10GeV++;
	414	}
	415	if(track->Charge() < 0) {
	416	nNeg++;
	417	if(fPt > fLowPtCut) nCh1GeV++;
	418	if(fPt > fHighPtCut) nCh3GeV++;
	419	if(fPt > fVeryHighPtCut) nCh10GeV++;
	420	}
	421	if(track->Charge() == 0) nNeutr++;
	422	//PID
	423	const Double32_t *prob = track->PID();
	424	Double_t rcc = 0.0;
	425	for(Int_t i = 0; i < AliPID::kSPECIES; i++) rcc += prob[i]*partFrac[i];
	426	if(rcc == 0.0) continue;
	427	//Bayes' formula
	428	Double_t w[10];
	429	for(Int_t i = 0; i < AliPID::kSPECIES; i++) w[i] = prob[i]*partFrac[i]/rcc;
	430
	431	//protons
	432	if ((w[4]>w[3])&&(w[4]>w[2])&&(w[4]>w[1])&&(w[4]>w[0])) nProtons++;
	433	//kaons
	434	if ((w[3]>w[4])&&(w[3]>w[2])&&(w[3]>w[1])&&(w[3]>w[0])) nKaons++;
	435	//pions
	436	if ((w[2]>w[4])&&(w[2]>w[3])&&(w[2]>w[1])&&(w[2]>w[0])) nPions++;
	437	//muons
	438	if ((w[1]>w[4])&&(w[1]>w[3])&&(w[1]>w[2])&&(w[1]>w[0])) {
	439	nMuons++;
	440	if(fPt > fLowPtCut) nMu1GeV++;
	441	if(fPt > fHighPtCut) nMu3GeV++;
	442	if(fPt > fVeryHighPtCut) nMu10GeV++;
	443	}
	444	//electrons
	445	if ((w[0]>w[4])&&(w[0]>w[3])&&(w[0]>w[2])&&(w[0]>w[1])) {
	446	nElectrons++;
	447	if(fPt > fLowPtCut) nEl1GeV++;
	448	if(fPt > fHighPtCut) nEl3GeV++;
	449	if(fPt > fVeryHighPtCut) nEl10GeV++;
	450	}
	451
	452	totalP += track->P();
	453	meanPt += fPt;
	454	ntrack++;
5b8d5d69	455	}//track loop
6e557e6d	456	//
5b8d5d69	457	// Fill the event tags
5b8d5d69	458	if(ntrack != 0)
6e557e6d	459	meanPt = meanPt/ntrack;
a1069ee1	460
7ee67d2a	461
5b8d5d69	462	evTag->SetNumOfTracks(nTracks);
a1069ee1	463	evTag->SetNumOfPosTracks(nPos);
	464	evTag->SetNumOfNegTracks(nNeg);
	465	evTag->SetNumOfNeutrTracks(nNeutr);
	466
5b8d5d69	467	evTag->SetNumOfV0s(nV0s);
	468	evTag->SetNumOfCascades(nCascades);
	469	evTag->SetNumOfKinks(nKinks);
a1069ee1	470
	471	evTag->SetNumOfProtons(nProtons);
	472	evTag->SetNumOfKaons(nKaons);
	473	evTag->SetNumOfPions(nPions);
	474	evTag->SetNumOfMuons(nMuons);
	475	evTag->SetNumOfElectrons(nElectrons);
	476	evTag->SetNumOfPhotons(nGamas);
	477	evTag->SetNumOfPi0s(nPi0s);
	478	evTag->SetNumOfNeutrons(nNeutrons);
	479	evTag->SetNumOfKaon0s(nK0s);
	480
	481	evTag->SetNumOfChargedAbove1GeV(nCh1GeV);
	482	evTag->SetNumOfChargedAbove3GeV(nCh3GeV);
	483	evTag->SetNumOfChargedAbove10GeV(nCh10GeV);
	484	evTag->SetNumOfMuonsAbove1GeV(nMu1GeV);
	485	evTag->SetNumOfMuonsAbove3GeV(nMu3GeV);
	486	evTag->SetNumOfMuonsAbove10GeV(nMu10GeV);
	487	evTag->SetNumOfElectronsAbove1GeV(nEl1GeV);
	488	evTag->SetNumOfElectronsAbove3GeV(nEl3GeV);
	489	evTag->SetNumOfElectronsAbove10GeV(nEl10GeV);
6e557e6d	490
a1069ee1	491	evTag->SetTotalMomentum(totalP);
	492	evTag->SetMeanPt(meanPt);
	493	evTag->SetMaxPt(maxPt);
5b8d5d69	494	}