[u/mrichter/AliRoot.git] / ITS / AliBarrelReconstruction4ITS.C

/****************************************************************************
 * This macro is supposed to do reconstruction in the barrel ALICE trackers *
 * (Make sure you have TPC digits and ITS hits before using this macro !!!) *
 * It does the following steps (April 12, 2001):                            *
 *                   1) TPC cluster finding                                 *
 *                   2) TPC track finding                                   *
 *                   3) ITS cluster finding V2 (via fast points !)          *
 *                   4) ITS track finding V2                                *
 *                   5) ITS back track propagation V2                       *
 *                   6) TPC back track propagation                          *
 *                (Origin: I.Belikov, CERN, Jouri.Belikov@cern.ch)          *
 ****************************************************************************/

#ifndef __CINT__
  #include "alles.h"
  #include "AliMagF.h"
  #include "AliTPCtracker.h"

  #include "AliITS.h"
  #include "AliITSgeom.h"
  #include "AliITSRecPoint.h"
  #include "AliITSclusterV2.h"
  #include "AliITSsimulationFastPoints.h"
  #include "AliITStrackerV2.h"
#endif

Int_t TPCFindClusters(const Char_t *inname, const Char_t *outname, Int_t n);
Int_t TPCFindTracks(const Char_t *inname, const Char_t *outname, Int_t n);
Int_t TPCSortTracks(const Char_t *inname, const Char_t *inname2, const Char_t *outname,  Int_t n);
Int_t TPCPropagateBack(const Char_t *inname, const Char_t *outname);

Int_t ITSFindClusters(const Char_t *inname,  const Char_t *outname, Int_t n);
Int_t ITSFindTracks(const Char_t *inname, const Char_t *inname2, const Char_t *outname, Int_t n);
Int_t ITSPropagateBack(const Char_t *inname, const Char_t *outname);


Int_t AliBarrelReconstruction4ITS(Int_t n=1) {
   const Char_t *TPCdigName="rfio:galice.root";
   const Char_t *TPCclsName="AliTPCclusters.root";
   const Char_t *TPCtrkName="AliTPCtracks.root";
   const Char_t *TPCtrkNameS="AliTPCtracksSorted.root";


   const Char_t *ITSdigName="rfio:galice.root";
   const Char_t *ITSclsName="AliITSclustersV2.root";
   const Char_t *ITStrkName="AliITStracksV2.root";

   AliKalmanTrack::SetConvConst(100/0.299792458/0.2/gAlice->Field()->Factor());

    
// ********** Find TPC clusters *********** //
   if (TPCFindClusters(TPCdigName,TPCclsName, n)) {
      cerr<<"Failed to get TPC clusters !\n";
      return 1;
   }      

// ********** Find TPC tracks *********** //
    if (TPCFindTracks(TPCclsName,TPCtrkName,n)) {
      cerr<<"Failed to get TPC tracks !\n";
      return 1;
    }
  
// ********** Sort and label TPC tracks *********** //
   if (TPCSortTracks(TPCclsName,TPCtrkName,TPCtrkNameS,n)) {
      cerr<<"Failed to sort TPC tracks !\n";
      return 1;
    }
/*   
// ********** Find ITS clusters *********** //
   if (ITSFindClusters(ITSdigName,ITSclsName,n)) {
      cerr<<"Failed to get ITS clusters !\n";
      return 1;
   }
   
// ********** Find ITS tracks *********** //
   {
     //TFile *clsFile=TFile::Open(ITSclsName);
   if (ITSFindTracks(TPCtrkNameS,ITSclsName,ITStrkName,n)) {
      cerr<<"Failed to get ITS tracks !\n";
      return 1;
   }
   //clsFile->Close();
   }
   return 1;
// ********** Back propagation of the ITS tracks *********** //
   {TFile *clsFile=TFile::Open(ITSclsName);
   if (ITSPropagateBack(ITStrkName,TPCtrkNameS)) {
      cerr<<"Failed to propagate back the ITS tracks !\n";
      return 1;
   }
   clsFile->Close();}


// ********** Back propagation of the TPC tracks *********** //
   {TFile *clsFile=TFile::Open(TPCclsName);
   if (TPCPropagateBack(TPCtrkName,TPCtrkName)) {
      cerr<<"Failed to propagate back the TPC tracks !\n";
      return 1;
   }
   clsFile->Close();}
*/
   return 0;
}


Int_t TPCFindClusters(const Char_t *inname, const Char_t *outname, Int_t n) {
   Int_t rc=0;
   const Char_t *name="TPCFindClusters";
   cerr<<'\n'<<name<<"...\n";
   gBenchmark->Start(name);

   TFile *out=TFile::Open(outname,"recreate");
   TFile *in =TFile::Open(inname);

   AliTPCParam *param=(AliTPCParam *)in->Get("75x40_100x60");
   if (!param) {cerr<<"TPC parameters have not been found !\n"; return 1;}
   AliTPCv2 tpc;
   tpc.SetParam(param);

   //tpc.Digits2Clusters(out); //MI change
   for (Int_t i=0;i<n;i++){
     printf("Processing event %d\n",i);
     tpc.Digits2Clusters(out,i);
     //	 AliTPCclusterer::Digits2Clusters(dig, out, i);
   }
   in->Close();
   out->Close();
   gBenchmark->Stop(name);
   gBenchmark->Show(name);

   return rc;
}

Int_t TPCFindTracks(const Char_t *inname, const Char_t *outname, Int_t n) {
   Int_t rc=0;
   const Char_t *name="TPCFindTracks";
   cerr<<'\n'<<name<<"...\n";
   gBenchmark->Start(name);
   TFile *out=TFile::Open(outname,"recreate");
   TFile *in =TFile::Open(inname);
   AliTPCParam *param=(AliTPCParam *)in->Get("75x40_100x60");
   if (!param) {cerr<<"TPC parameters have not been found !\n"; return 1;}

   //AliTPCtracker *tracker=new AliTPCtracker(param);
   //rc=tracker->Clusters2Tracks(0,out);
   //delete tracker;

   for (Int_t i=0;i<n;i++){
     printf("Processing event %d\n",i);
     AliTPCtracker *tracker = new AliTPCtracker(param,i);
     //Int_t rc=
       tracker->Clusters2Tracks(0,out);
     delete tracker;
   }

   in->Close();
   out->Close();
   gBenchmark->Stop(name);
   gBenchmark->Show(name);

   return rc;
}
Int_t TPCSortTracks(const Char_t *inname, const Char_t *inname2, const Char_t * outname,  Int_t eventn){
   Int_t rc=0;
   const Char_t *name="TPCSortTracks";
   cerr<<'\n'<<name<<"...\n";
   gBenchmark->Start(name);

   TFile *out =TFile::Open(outname,"recreate");
   TFile *in1 =TFile::Open(inname);
   TFile *in2 =TFile::Open(inname2);


   AliTPCParam *param=(AliTPCParam *)in1->Get("75x40_100x60");
   if (!param) {cerr<<"TPC parameters have not been found !\n"; return 1;}


   // loop over events 
   for (Int_t event=0;event<eventn; event++){
     TObjArray tarray(10000);
     AliTPCtrack *iotrack=0;
     Int_t i;


     in2->cd();
     char   tname[100];
     sprintf(tname,"TreeT_TPC_%d",event);

     TTree *tracktree=(TTree*)in2->Get(tname);
     TBranch *tbranch=tracktree->GetBranch("tracks");
     Int_t nentr=(Int_t)tracktree->GetEntries();
     for (i=0; i<nentr; i++) {
       iotrack=new AliTPCtrack;
       tbranch->SetAddress(&iotrack);
       tracktree->GetEvent(i);
       tarray.AddLast(iotrack);
     }   
     tarray.Sort();
     // in2->Close();
     
     //assign thacks GEANT labels
     in1->cd();
     AliTPCtracker *tracker = new AliTPCtracker(param,event);
     tracker->LoadInnerSectors();
     tracker->LoadOuterSectors();
     for (i=0; i<nentr; i++) {
       iotrack=(AliTPCtrack*)tarray.UncheckedAt(i);
       tracker->CookLabel(iotrack,0.1);
     }   
     delete tracker;
     //in->Close();
     //end of GEANT label assignment
     
     tracktree=new TTree(tname,"Tree with TPC tracks");
     tracktree->Branch("tracks","AliTPCtrack",&iotrack,32000,0);
     for (i=0; i<nentr; i++) {
       iotrack=(AliTPCtrack*)tarray.UncheckedAt(i);
       tracktree->Fill();
     }
     out->cd();
     tracktree->Write();
   }

   out->Close();
   in2->Close();
   in1->Close();

   gBenchmark->Stop(name);
   gBenchmark->Show(name);

   return rc;
}

Int_t ITSFindClusters(const Char_t *inname, const Char_t *outname, Int_t n) {
   Int_t rc=0;
   const Char_t *name="ITSFindClusters";
   cerr<<'\n'<<name<<"...\n";
   gBenchmark->Start(name);
   TFile *out=TFile::Open(outname,"recreate");
   TFile *in =TFile::Open(inname,"update");

   if (!(gAlice=(AliRun*)in->Get("gAlice"))) {
      cerr<<"Can't get gAlice !\n";
      return 1;
   }

   AliITS *ITS  = (AliITS*)gAlice->GetModule("ITS");
   if (!ITS) { cerr<<"Can't get the ITS !\n"; return 1;}
   AliITSgeom *geom=ITS->GetITSgeom();
   out->cd();   
   geom->Write();
     
   Int_t ev=0;
   for (ev = 0; ev<n; ev++){
     in->cd();   // !!!! MI directory must point to galice. - othervise problem with Tree -connection
     gAlice->GetEvent(ev);
     //gAlice->TreeR()->Reset();   //reset reconstructed tree

     
     TTree *pTree=gAlice->TreeR();
     if (!pTree){
       gAlice->MakeTree("R");
       pTree = gAlice->TreeR();
     }
     TBranch *branch=pTree->GetBranch("ITSRecPoints");
     if (!branch) {
       //if not reconstructed ITS branch do reconstruction 
       ITS->MakeBranch("R",0);
       //////////////// Taken from ITSHitsToFastPoints.C ///////////////////////
       AliITSsimulationFastPoints *sim = new AliITSsimulationFastPoints();
       for (Int_t i=0;i<3;i++) { ITS->SetSimulationModel(i,sim); }
       Int_t nsignal=25;
       Int_t size=-1;
       Int_t bgr_ev=Int_t(ev/nsignal);
       ITS->HitsToFastRecPoints(ev,bgr_ev,size," ","All"," ");
       //////////////////////////////////////////////////////////////////////////
       gAlice->GetEvent(ev);   //MI comment  - in HitsToFast... they reset treeR to 0 
       //they overwrite full reconstructed event ???? ... so lets connect TreeR one more
       //time
     }


     out->cd();
     TClonesArray *clusters=new TClonesArray("AliITSclusterV2",10000);
     char   cname[100];
     sprintf(cname,"TreeC_ITS_%d",ev);
  
     TTree *cTree=new TTree(cname,"ITS clusters");
     cTree->Branch("Clusters",&clusters);
     
     pTree=gAlice->TreeR();
     if (!pTree) { cerr<<"Can't get TreeR !\n"; return 1; }
     branch=pTree->GetBranch("ITSRecPoints");
     if (!branch) { cerr<<"Can't get ITSRecPoints branch !\n"; return 1;}
     TClonesArray *points=new TClonesArray("AliITSRecPoint",10000);
     branch->SetAddress(&points);
     
     TClonesArray &cl=*clusters;
     Int_t nclusters=0;
     Int_t nentr=(Int_t)pTree->GetEntries();
     AliITSgeom *geom=ITS->GetITSgeom();

     for (Int_t i=0; i<nentr; i++) {
       if (!pTree->GetEvent(i)) {cTree->Fill(); continue;}
       Int_t lay,lad,det; geom->GetModuleId(i,lay,lad,det);
       Float_t x,y,zshift; geom->GetTrans(lay,lad,det,x,y,zshift); 
       Double_t rot[9];    geom->GetRotMatrix(lay,lad,det,rot);
       Double_t yshift = x*rot[0] + y*rot[1];
       Int_t ndet=(lad-1)*geom->GetNdetectors(lay) + (det-1);
       Int_t ncl=points->GetEntriesFast();
       nclusters+=ncl;
       for (Int_t j=0; j<ncl; j++) {
	 AliITSRecPoint *p=(AliITSRecPoint*)points->UncheckedAt(j);
	 Float_t lp[5];
	 lp[0]=-p->GetX()-yshift; if (lay==1) lp[0]=-lp[0];
	 lp[1]=p->GetZ()+zshift;
	 lp[2]=p->GetSigmaX2();
	 lp[3]=p->GetSigmaZ2();
	 lp[4]=p->GetQ();
	 Int_t lab[6]; 
	 lab[0]=p->GetLabel(0);lab[1]=p->GetLabel(1);lab[2]=p->GetLabel(2);
	 lab[3]=ndet;
	 
	 Int_t label=lab[0];
	 TParticle *part=(TParticle*)gAlice->Particle(label);
	 label=-3;
	 while (part->P() < 0.005) {
	   Int_t m=part->GetFirstMother();
	   if (m<0) {cerr<<"Primary momentum: "<<part->P()<<endl; break;}
	   label=m;
	   part=(TParticle*)gAlice->Particle(label);
	 }
	 if      (lab[1]<0) lab[1]=label;
	 else if (lab[2]<0) lab[2]=label;
	 else cerr<<"No empty labels !\n";
	 
	 new(cl[j]) AliITSclusterV2(lab,lp);
       }
       cTree->Fill(); clusters->Delete();
       points->Delete();
     }
     cTree->Write();
     cerr<<"Number of clusters: "<<nclusters<<endl;
     delete cTree; delete clusters; delete points;

   }

   delete gAlice; gAlice=0;
   in->Close();
   out->Close();
   gBenchmark->Stop(name);
   gBenchmark->Show(name);

   return rc;
}

Int_t ITSFindTracks(const Char_t * inname, const Char_t *inname2, const Char_t *outname, Int_t n) {
   Int_t rc=0;
   const Char_t *name="ITSFindTracks";
   cerr<<'\n'<<name<<"...\n";
   gBenchmark->Start(name);


   TFile *out=TFile::Open(outname,"recreate");
   TFile *in =TFile::Open(inname);
   TFile *in2 =TFile::Open(inname2);

   AliITSgeom *geom=(AliITSgeom*)gFile->Get("AliITSgeom");
   if (!geom) { cerr<<"can't get ITS geometry !\n"; return 1;}


   for (Int_t i=0;i<n;i++){
     AliITStrackerV2 tracker(geom,i);
     rc=tracker.Clusters2Tracks(in,out);
   }

   in->Close();
   in2->Close();
   out->Close();

   gBenchmark->Stop(name);
   gBenchmark->Show(name);

   return rc;
}

Int_t ITSPropagateBack(const Char_t *inname, const Char_t *outname) {
   
  Int_t rc=0;
  /*
   const Char_t *name="ITSPropagateBack";
   cerr<<'\n'<<name<<"...\n";
   gBenchmark->Start(name);

   AliITSgeom *geom=(AliITSgeom*)gFile->Get("AliITSgeom");
   if (!geom) { cerr<<"can't get ITS geometry !\n"; return 1;}
   AliITStrackerV2 tracker(geom);

   TFile *out=TFile::Open(outname,"update");
   TFile *in =TFile::Open(inname);
   rc=tracker.PropagateBack(in,out);
   in->Close();
   out->Close();

   gBenchmark->Stop(name);
   gBenchmark->Show(name);
  */
   return rc;
}

Int_t TPCPropagateBack(const Char_t *inname, const Char_t *outname) {
   Int_t rc=0;
   const Char_t *name="TPCPropagateBack";
   cerr<<'\n'<<name<<"...\n";
   gBenchmark->Start(name);

   AliTPCParam *param=(AliTPCParam *)gFile->Get("75x40_100x60");
   if (!param) {cerr<<"TPC parameters have not been found !\n"; return 1;}
   AliTPCtracker *tracker=new AliTPCtracker(param);

   TFile *out=TFile::Open(outname,"update");
   TFile *in =TFile::Open(inname);
   rc=tracker->PropagateBack(in,out);
   delete tracker;
   in->Close();
   out->Close();

   gBenchmark->Stop(name);
   gBenchmark->Show(name);

   return rc;
}
Commit	Line	Data
c6f60ee1	1	/****************************************************************************
	2	* This macro is supposed to do reconstruction in the barrel ALICE trackers *
	3	* (Make sure you have TPC digits and ITS hits before using this macro !!!) *
	4	* It does the following steps (April 12, 2001): *
	5	* 1) TPC cluster finding *
	6	* 2) TPC track finding *
	7	* 3) ITS cluster finding V2 (via fast points !) *
	8	* 4) ITS track finding V2 *
	9	* 5) ITS back track propagation V2 *
	10	* 6) TPC back track propagation *
	11	* (Origin: I.Belikov, CERN, Jouri.Belikov@cern.ch) *
	12	****************************************************************************/
	13
	14	#ifndef __CINT__
	15	#include "alles.h"
	16	#include "AliMagF.h"
	17	#include "AliTPCtracker.h"
	18
	19	#include "AliITS.h"
	20	#include "AliITSgeom.h"
	21	#include "AliITSRecPoint.h"
	22	#include "AliITSclusterV2.h"
	23	#include "AliITSsimulationFastPoints.h"
	24	#include "AliITStrackerV2.h"
	25	#endif
	26
	27	Int_t TPCFindClusters(const Char_t inname, const Char_t outname, Int_t n);
	28	Int_t TPCFindTracks(const Char_t inname, const Char_t outname, Int_t n);
	29	Int_t TPCSortTracks(const Char_t inname, const Char_t inname2, const Char_t *outname, Int_t n);
	30	Int_t TPCPropagateBack(const Char_t inname, const Char_t outname);
	31
	32	Int_t ITSFindClusters(const Char_t inname, const Char_t outname, Int_t n);
	33	Int_t ITSFindTracks(const Char_t inname, const Char_t inname2, const Char_t *outname, Int_t n);
	34	Int_t ITSPropagateBack(const Char_t inname, const Char_t outname);
	35
	36
	37	Int_t AliBarrelReconstruction4ITS(Int_t n=1) {
	38	const Char_t *TPCdigName="rfio:galice.root";
	39	const Char_t *TPCclsName="AliTPCclusters.root";
	40	const Char_t *TPCtrkName="AliTPCtracks.root";
	41	const Char_t *TPCtrkNameS="AliTPCtracksSorted.root";
	42
	43
	44	const Char_t *ITSdigName="rfio:galice.root";
	45	const Char_t *ITSclsName="AliITSclustersV2.root";
	46	const Char_t *ITStrkName="AliITStracksV2.root";
	47
	48	AliKalmanTrack::SetConvConst(100/0.299792458/0.2/gAlice->Field()->Factor());
	49
	50
	51	// ******** Find TPC clusters ********* //
	52	if (TPCFindClusters(TPCdigName,TPCclsName, n)) {
	53	cerr<<"Failed to get TPC clusters !\n";
	54	return 1;
	55	}
	56
	57	// ******** Find TPC tracks ********* //
	58	if (TPCFindTracks(TPCclsName,TPCtrkName,n)) {
	59	cerr<<"Failed to get TPC tracks !\n";
	60	return 1;
	61	}
	62
	63	// ******** Sort and label TPC tracks ********* //
	64	if (TPCSortTracks(TPCclsName,TPCtrkName,TPCtrkNameS,n)) {
65	cerr<<"Failed to sort TPC tracks !\n";
66	return 1;
67	}
68	/*
69	// ******** Find ITS clusters ********* //
70	if (ITSFindClusters(ITSdigName,ITSclsName,n)) {
71	cerr<<"Failed to get ITS clusters !\n";
72	return 1;
73	}
74
75	// ******** Find ITS tracks ********* //
76	{
77	//TFile *clsFile=TFile::Open(ITSclsName);
78	if (ITSFindTracks(TPCtrkNameS,ITSclsName,ITStrkName,n)) {
79	cerr<<"Failed to get ITS tracks !\n";
80	return 1;
81	}
82	//clsFile->Close();
83	}
84	return 1;
85	// ******** Back propagation of the ITS tracks ********* //
86	{TFile *clsFile=TFile::Open(ITSclsName);
87	if (ITSPropagateBack(ITStrkName,TPCtrkNameS)) {
88	cerr<<"Failed to propagate back the ITS tracks !\n";
89	return 1;
90	}
91	clsFile->Close();}
92
93
94	// ******** Back propagation of the TPC tracks ********* //
95	{TFile *clsFile=TFile::Open(TPCclsName);
96	if (TPCPropagateBack(TPCtrkName,TPCtrkName)) {
97	cerr<<"Failed to propagate back the TPC tracks !\n";
98	return 1;
99	}
100	clsFile->Close();}
101	*/
102	return 0;
103	}
104
105
106	Int_t TPCFindClusters(const Char_t inname, const Char_t outname, Int_t n) {
107	Int_t rc=0;
108	const Char_t *name="TPCFindClusters";
109	cerr<<'\n'<<name<<"...\n";
110	gBenchmark->Start(name);
111
112	TFile *out=TFile::Open(outname,"recreate");
113	TFile *in =TFile::Open(inname);
114
115	AliTPCParam param=(AliTPCParam )in->Get("75x40_100x60");
116	if (!param) {cerr<<"TPC parameters have not been found !\n"; return 1;}
117	AliTPCv2 tpc;
118	tpc.SetParam(param);
119
120	//tpc.Digits2Clusters(out); //MI change
121	for (Int_t i=0;i<n;i++){
122	printf("Processing event %d\n",i);
123	tpc.Digits2Clusters(out,i);
124	// AliTPCclusterer::Digits2Clusters(dig, out, i);
125	}
126	in->Close();
127	out->Close();
128	gBenchmark->Stop(name);
129	gBenchmark->Show(name);
130
131	return rc;
132	}
133
134	Int_t TPCFindTracks(const Char_t inname, const Char_t outname, Int_t n) {
135	Int_t rc=0;
136	const Char_t *name="TPCFindTracks";
137	cerr<<'\n'<<name<<"...\n";
138	gBenchmark->Start(name);
139	TFile *out=TFile::Open(outname,"recreate");
140	TFile *in =TFile::Open(inname);
141	AliTPCParam param=(AliTPCParam )in->Get("75x40_100x60");
142	if (!param) {cerr<<"TPC parameters have not been found !\n"; return 1;}
143
144	//AliTPCtracker *tracker=new AliTPCtracker(param);
145	//rc=tracker->Clusters2Tracks(0,out);
146	//delete tracker;
147
148	for (Int_t i=0;i<n;i++){
149	printf("Processing event %d\n",i);
150	AliTPCtracker *tracker = new AliTPCtracker(param,i);
151	//Int_t rc=
152	tracker->Clusters2Tracks(0,out);
153	delete tracker;
154	}
155
156	in->Close();
157	out->Close();
158	gBenchmark->Stop(name);
159	gBenchmark->Show(name);
160
161	return rc;
162	}
163	Int_t TPCSortTracks(const Char_t inname, const Char_t inname2, const Char_t * outname, Int_t eventn){
164	Int_t rc=0;
165	const Char_t *name="TPCSortTracks";
166	cerr<<'\n'<<name<<"...\n";
167	gBenchmark->Start(name);
168
169	TFile *out =TFile::Open(outname,"recreate");
170	TFile *in1 =TFile::Open(inname);
171	TFile *in2 =TFile::Open(inname2);
172
173
174	AliTPCParam param=(AliTPCParam )in1->Get("75x40_100x60");
175	if (!param) {cerr<<"TPC parameters have not been found !\n"; return 1;}
176
177
178
179	// loop over events
180	for (Int_t event=0;event<eventn; event++){
181	TObjArray tarray(10000);
182	AliTPCtrack *iotrack=0;
183	Int_t i;
184
185
186	in2->cd();
187	char tname[100];
188	sprintf(tname,"TreeT_TPC_%d",event);
189
190	TTree tracktree=(TTree)in2->Get(tname);
191	TBranch *tbranch=tracktree->GetBranch("tracks");
192	Int_t nentr=(Int_t)tracktree->GetEntries();
193	for (i=0; i<nentr; i++) {
194	iotrack=new AliTPCtrack;
195	tbranch->SetAddress(&iotrack);
196	tracktree->GetEvent(i);
197	tarray.AddLast(iotrack);
198	}
199	tarray.Sort();
200	// in2->Close();
201
202	//assign thacks GEANT labels
203	in1->cd();
204	AliTPCtracker *tracker = new AliTPCtracker(param,event);
205	tracker->LoadInnerSectors();
206	tracker->LoadOuterSectors();
207	for (i=0; i<nentr; i++) {
208	iotrack=(AliTPCtrack*)tarray.UncheckedAt(i);
209	tracker->CookLabel(iotrack,0.1);
210	}
211	delete tracker;
212	//in->Close();
213	//end of GEANT label assignment
214
215	tracktree=new TTree(tname,"Tree with TPC tracks");
216	tracktree->Branch("tracks","AliTPCtrack",&iotrack,32000,0);
217	for (i=0; i<nentr; i++) {
218	iotrack=(AliTPCtrack*)tarray.UncheckedAt(i);
219	tracktree->Fill();
220	}
221	out->cd();
222	tracktree->Write();
223	}
224
225	out->Close();
226	in2->Close();
227	in1->Close();
228
229	gBenchmark->Stop(name);
230	gBenchmark->Show(name);
231
232	return rc;
233	}
234
235	Int_t ITSFindClusters(const Char_t inname, const Char_t outname, Int_t n) {
236	Int_t rc=0;
237	const Char_t *name="ITSFindClusters";
238	cerr<<'\n'<<name<<"...\n";
239	gBenchmark->Start(name);
240	TFile *out=TFile::Open(outname,"recreate");
241	TFile *in =TFile::Open(inname,"update");
242
243	if (!(gAlice=(AliRun*)in->Get("gAlice"))) {
244	cerr<<"Can't get gAlice !\n";
245	return 1;
246	}
247
248	AliITS ITS = (AliITS)gAlice->GetModule("ITS");
249	if (!ITS) { cerr<<"Can't get the ITS !\n"; return 1;}
250	AliITSgeom *geom=ITS->GetITSgeom();
251	out->cd();
252	geom->Write();
253
254	Int_t ev=0;
255	for (ev = 0; ev<n; ev++){
256	in->cd(); // !!!! MI directory must point to galice. - othervise problem with Tree -connection
257	gAlice->GetEvent(ev);
258	//gAlice->TreeR()->Reset(); //reset reconstructed tree
259
260
261	TTree *pTree=gAlice->TreeR();
262	if (!pTree){
263	gAlice->MakeTree("R");
264	pTree = gAlice->TreeR();
265	}
266	TBranch *branch=pTree->GetBranch("ITSRecPoints");
267	if (!branch) {
268	//if not reconstructed ITS branch do reconstruction
269	ITS->MakeBranch("R",0);
270	//////////////// Taken from ITSHitsToFastPoints.C ///////////////////////
271	AliITSsimulationFastPoints *sim = new AliITSsimulationFastPoints();
272	for (Int_t i=0;i<3;i++) { ITS->SetSimulationModel(i,sim); }
273	Int_t nsignal=25;
274	Int_t size=-1;
275	Int_t bgr_ev=Int_t(ev/nsignal);
276	ITS->HitsToFastRecPoints(ev,bgr_ev,size," ","All"," ");
277	//////////////////////////////////////////////////////////////////////////
278	gAlice->GetEvent(ev); //MI comment - in HitsToFast... they reset treeR to 0
279	//they overwrite full reconstructed event ???? ... so lets connect TreeR one more
280	//time
281	}
282
283
284
285	out->cd();
286	TClonesArray *clusters=new TClonesArray("AliITSclusterV2",10000);
287	char cname[100];
288	sprintf(cname,"TreeC_ITS_%d",ev);
289
290	TTree *cTree=new TTree(cname,"ITS clusters");
291	cTree->Branch("Clusters",&clusters);
292
293	pTree=gAlice->TreeR();
294	if (!pTree) { cerr<<"Can't get TreeR !\n"; return 1; }
295	branch=pTree->GetBranch("ITSRecPoints");
296	if (!branch) { cerr<<"Can't get ITSRecPoints branch !\n"; return 1;}
297	TClonesArray *points=new TClonesArray("AliITSRecPoint",10000);
298	branch->SetAddress(&points);
299
300	TClonesArray &cl=*clusters;
301	Int_t nclusters=0;
302	Int_t nentr=(Int_t)pTree->GetEntries();
303	AliITSgeom *geom=ITS->GetITSgeom();
304
305	for (Int_t i=0; i<nentr; i++) {
306	if (!pTree->GetEvent(i)) {cTree->Fill(); continue;}
307	Int_t lay,lad,det; geom->GetModuleId(i,lay,lad,det);
308	Float_t x,y,zshift; geom->GetTrans(lay,lad,det,x,y,zshift);
309	Double_t rot[9]; geom->GetRotMatrix(lay,lad,det,rot);
310	Double_t yshift = xrot[0] + yrot[1];
311	Int_t ndet=(lad-1)*geom->GetNdetectors(lay) + (det-1);
312	Int_t ncl=points->GetEntriesFast();
313	nclusters+=ncl;
314	for (Int_t j=0; j<ncl; j++) {
315	AliITSRecPoint p=(AliITSRecPoint)points->UncheckedAt(j);
316	Float_t lp[5];
317	lp[0]=-p->GetX()-yshift; if (lay==1) lp[0]=-lp[0];
318	lp[1]=p->GetZ()+zshift;
319	lp[2]=p->GetSigmaX2();
320	lp[3]=p->GetSigmaZ2();
321	lp[4]=p->GetQ();
322	Int_t lab[6];
323	lab[0]=p->GetLabel(0);lab[1]=p->GetLabel(1);lab[2]=p->GetLabel(2);
324	lab[3]=ndet;
325
326	Int_t label=lab[0];
327	TParticle part=(TParticle)gAlice->Particle(label);
328	label=-3;
329	while (part->P() < 0.005) {
330	Int_t m=part->GetFirstMother();
331	if (m<0) {cerr<<"Primary momentum: "<<part->P()<<endl; break;}
332	label=m;
333	part=(TParticle*)gAlice->Particle(label);
334	}
335	if (lab[1]<0) lab[1]=label;
336	else if (lab[2]<0) lab[2]=label;
337	else cerr<<"No empty labels !\n";
338
339	new(cl[j]) AliITSclusterV2(lab,lp);
340	}
341	cTree->Fill(); clusters->Delete();
342	points->Delete();
343	}
344	cTree->Write();
345	cerr<<"Number of clusters: "<<nclusters<<endl;
346	delete cTree; delete clusters; delete points;
347
348	}
349
350	delete gAlice; gAlice=0;
351	in->Close();
352	out->Close();
353	gBenchmark->Stop(name);
354	gBenchmark->Show(name);
355
356	return rc;
357	}
358
359	Int_t ITSFindTracks(const Char_t * inname, const Char_t inname2, const Char_t outname, Int_t n) {
360	Int_t rc=0;
361	const Char_t *name="ITSFindTracks";
362	cerr<<'\n'<<name<<"...\n";
363	gBenchmark->Start(name);
364
365
366	TFile *out=TFile::Open(outname,"recreate");
367	TFile *in =TFile::Open(inname);
368	TFile *in2 =TFile::Open(inname2);
369
370	AliITSgeom geom=(AliITSgeom)gFile->Get("AliITSgeom");
371	if (!geom) { cerr<<"can't get ITS geometry !\n"; return 1;}
372
373
374	for (Int_t i=0;i<n;i++){
375	AliITStrackerV2 tracker(geom,i);
376	rc=tracker.Clusters2Tracks(in,out);
377	}
378
379	in->Close();
380	in2->Close();
381	out->Close();
382
383	gBenchmark->Stop(name);
384	gBenchmark->Show(name);
385
386	return rc;
387	}
388
389	Int_t ITSPropagateBack(const Char_t inname, const Char_t outname) {
390
391	Int_t rc=0;
392	/*
393	const Char_t *name="ITSPropagateBack";
394	cerr<<'\n'<<name<<"...\n";
395	gBenchmark->Start(name);
396
397	AliITSgeom geom=(AliITSgeom)gFile->Get("AliITSgeom");
398	if (!geom) { cerr<<"can't get ITS geometry !\n"; return 1;}
399	AliITStrackerV2 tracker(geom);
400
401	TFile *out=TFile::Open(outname,"update");
402	TFile *in =TFile::Open(inname);
403	rc=tracker.PropagateBack(in,out);
404	in->Close();
405	out->Close();
406
407	gBenchmark->Stop(name);
408	gBenchmark->Show(name);
409	*/
410	return rc;
411	}
412
413	Int_t TPCPropagateBack(const Char_t inname, const Char_t outname) {
414	Int_t rc=0;
415	const Char_t *name="TPCPropagateBack";
416	cerr<<'\n'<<name<<"...\n";
417	gBenchmark->Start(name);
418
419	AliTPCParam param=(AliTPCParam )gFile->Get("75x40_100x60");
420	if (!param) {cerr<<"TPC parameters have not been found !\n"; return 1;}
421	AliTPCtracker *tracker=new AliTPCtracker(param);
422
423	TFile *out=TFile::Open(outname,"update");
424	TFile *in =TFile::Open(inname);
425	rc=tracker->PropagateBack(in,out);
426	delete tracker;
427	in->Close();
428	out->Close();
429
430	gBenchmark->Stop(name);
431	gBenchmark->Show(name);
432
433	return rc;
434	}
435