Finished geometry objects defninistions, and fixed bugs in SSD cone geometry.

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

diff --git a/ITS/AliITSFindClustersV2.C b/ITS/AliITSFindClustersV2.C
index 28424495d8455f66218d84d941b66fd44cff1338..9521a59e4bc0dbe32d3e9a5cf6418d79dfa8a716 100644 (file)
--- a/ITS/AliITSFindClustersV2.C
+++ b/ITS/AliITSFindClustersV2.C
@@ -1,136 +1,57 @@
+/****************************************************************************
+ *           Origin: I.Belikov, CERN, Jouri.Belikov@cern.ch                 *
+ ****************************************************************************/
+
 #ifndef __CINT__
   #include <iostream.h>
 
   #include "AliRun.h"
   #include "AliITS.h"
   #include "AliITSgeom.h"
-  #include "AliITSRecPoint.h"
-  #include "AliITSclusterV2.h"
+  #include "AliITSclustererV2.h"
 
   #include "TFile.h"
-  #include "TTree.h"
-  #include "TParticle.h"
+  #include "TStopwatch.h"
 #endif
 
-Int_t AliITSFindClustersV2() {
-/****************************************************************
- *  This macro converts AliITSRecPoint(s) to AliITSclusterV2(s) *
- ****************************************************************/
-   cerr<<"AliITSRecPoint(s) -> AliITSclusterV2(s)...\n";
+Int_t AliITSFindClustersV2(Char_t SlowOrFast='s',Int_t eventn=1) {
 
-   if (gAlice) {delete gAlice; gAlice=0;}
+   cerr<<"Looking for clusters...\n";
 
    TFile *in=TFile::Open("galice.root");
-   if (!in->IsOpen()) { cerr<<"Can't open galice.root !\n"; return 1; }
-
+   if (!in->IsOpen()) {cerr<<"Can't open galice.root !\n"; return 2;}
    if (!(gAlice=(AliRun*)in->Get("gAlice"))) {
       cerr<<"Can't find gAlice !\n";
       return 2;
    }
-   gAlice->GetEvent(0);
-
    AliITS *ITS  = (AliITS*)gAlice->GetModule("ITS");
    if (!ITS) { cerr<<"Can't find the ITS !\n"; return 3; }
+
    AliITSgeom *geom=ITS->GetITSgeom();
- 
+
    TFile *out=TFile::Open("AliITSclustersV2.root","new");
    if (!out->IsOpen()) {
-      cerr<<"Delete old AliITSclustersV2.root !\n"; 
-      return 4;
-   }
+      cerr<<"Delete old AliITSclustersV2.root !\n"; return 1;}
    geom->Write();
 
-   TClonesArray *clusters=new TClonesArray("AliITSclusterV2",10000);
-   TTree *cTree=new TTree("TreeC_ITS_0","ITS clusters");
-   cTree->Branch("Clusters",&clusters);
-
-   TTree *pTree=gAlice->TreeR();
-   if (!pTree) { cerr<<"Can't get TreeR !\n"; return 5; }
-   TBranch *branch=pTree->GetBranch("ITSRecPoints");
-   if (!branch) { cerr<<"Can't get ITSRecPoints branch !\n"; return 6; }
-   TClonesArray *points=new TClonesArray("AliITSRecPoint",10000);
-   branch->SetAddress(&points);
-
-   TClonesArray &cl=*clusters;
-   Int_t nclusters=0;
-   Int_t nentr=(Int_t)pTree->GetEntries();
-
-   cerr<<"Number of entries: "<<nentr<<endl;
-
-   Float_t lp[5]; Int_t lab[6]; //Why can't it be inside a loop ?
-
-   for (Int_t i=0; i<nentr; i++) {
-       points->Clear();
-       pTree->GetEvent(i);
-       Int_t ncl=points->GetEntriesFast(); if (ncl==0){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);
-       nclusters+=ncl;
-
-       Float_t kmip=1; // ADC->mip normalization factor for the SDD and SSD 
-       if(lay==4 || lay==3){kmip=280.;};
-       if(lay==6 || lay==5){kmip=38.;};
-
-       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(); lp[4]/=kmip;
-          //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];
-          if (label>=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();
+   TStopwatch timer;
+   AliITSclustererV2 clusterer(geom);
+   for (Int_t i=0; i<eventn; i++) {
+       cerr<<"Processing event number: "<<i<<endl;
+       gAlice->GetEvent(i);
+       //ITS->MakeTreeC(); //To make the V1 cluster finders happy
+       clusterer.SetEvent(i);
+       if (SlowOrFast=='s') clusterer.Digits2Clusters(in,out);
+       else                 clusterer.Hits2Clusters(in,out);
    }
-   cTree->Write();
-
-   cerr<<"Number of clusters: "<<nclusters<<endl;
-
-   delete cTree; delete clusters; delete points;
+   timer.Stop(); timer.Print();
 
    delete gAlice; gAlice=0;
-
-   in->Close();
    out->Close();
+   in->Close();
 
    return 0;
-
 }
 
 
 
-
-
-
-
-
-
-
-
-
-
-