Some of the coding violations corrected
[u/mrichter/AliRoot.git] / TPC / AliTPCclusterer.cxx
1 /**************************************************************************
2  * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
3  *                                                                        *
4  * Author: The ALICE Off-line Project.                                    *
5  * Contributors are mentioned in the code where appropriate.              *
6  *                                                                        *
7  * Permission to use, copy, modify and distribute this software and its   *
8  * documentation strictly for non-commercial purposes is hereby granted   *
9  * without fee, provided that the above copyright notice appears in all   *
10  * copies and that both the copyright notice and this permission notice   *
11  * appear in the supporting documentation. The authors make no claims     *
12  * about the suitability of this software for any purpose. It is          *
13  * provided "as is" without express or implied warranty.                  *
14  **************************************************************************/
15
16 /* $Id$ */
17
18 //-------------------------------------------------------
19 //          Implementation of the TPC clusterer
20 //
21 //   Origin: Jouri Belikov, CERN, Jouri.Belikov@cern.ch 
22 //-------------------------------------------------------
23
24 #include "AliTPCclusterer.h"
25 #include "AliTPCcluster.h"
26 #include <TObjArray.h>
27 #include <TFile.h>
28 #include "AliDigits.h"
29 #include "AliSimDigits.h"
30 #include "AliTPCParam.h"
31 #include "AliTPCClustersRow.h"
32 #include <TTree.h>
33
34 ClassImp(AliTPCclusterer)
35
36
37 //____________________________________________________
38 AliTPCclusterer::AliTPCclusterer(const AliTPCclusterer &param)
39                 :TObject(),
40                  fPar(0)
41 {
42   //
43   // dummy
44   //
45   fPar = param.fPar;
46 }
47 //-----------------------------------------------------
48 AliTPCclusterer & AliTPCclusterer::operator =(const AliTPCclusterer & param)
49 {
50   //
51   // assignment operator - dummy
52   //
53     fPar = param.fPar;
54   return (*this);
55 }
56 //____________________________________________________
57 void AliTPCclusterer::FindPeaks(Int_t k,Int_t max,
58 AliBin *b,Int_t *idx,UInt_t *msk,Int_t& n) {
59   //find local maxima
60   if (n<31)
61   if (IsMaximum(k,max,b)) {
62     idx[n]=k; msk[n]=(2<<n);
63     n++;
64   }
65   b[k].SetMask(0);
66   if (b[k-max].GetMask()&1) FindPeaks(k-max,max,b,idx,msk,n);
67   if (b[k-1  ].GetMask()&1) FindPeaks(k-1  ,max,b,idx,msk,n);
68   if (b[k+max].GetMask()&1) FindPeaks(k+max,max,b,idx,msk,n);
69   if (b[k+1  ].GetMask()&1) FindPeaks(k+1  ,max,b,idx,msk,n);
70 }
71
72 void AliTPCclusterer::MarkPeak(Int_t k, Int_t max, AliBin *bins, UInt_t m) {
73   //mark this peak
74   UShort_t q=bins[k].GetQ();
75
76   bins[k].SetMask(bins[k].GetMask()|m); 
77
78   if (bins[k-max].GetQ() <= q)
79      if ((bins[k-max].GetMask()&m) == 0) MarkPeak(k-max,max,bins,m);
80   if (bins[k-1  ].GetQ() <= q)
81      if ((bins[k-1  ].GetMask()&m) == 0) MarkPeak(k-1  ,max,bins,m);
82   if (bins[k+max].GetQ() <= q)
83      if ((bins[k+max].GetMask()&m) == 0) MarkPeak(k+max,max,bins,m);
84   if (bins[k+1  ].GetQ() <= q)
85      if ((bins[k+1  ].GetMask()&m) == 0) MarkPeak(k+1  ,max,bins,m);
86 }
87
88 void AliTPCclusterer::MakeCluster(Int_t k,Int_t max,AliBin *bins,UInt_t m,
89 AliTPCcluster &c) {
90   //make cluster using digits of this peak
91   Float_t q=(Float_t)bins[k].GetQ();
92   Int_t i=k/max, j=k-i*max;
93
94   c.SetQ(c.GetQ()+q);
95   c.SetY(c.GetY()+i*q); 
96   c.SetZ(c.GetZ()+j*q); 
97   c.SetSigmaY2(c.GetSigmaY2()+i*i*q);
98   c.SetSigmaZ2(c.GetSigmaZ2()+j*j*q);
99
100   bins[k].SetMask(0xFFFFFFFE);
101   
102   if (bins[k-max].GetMask() == m) MakeCluster(k-max,max,bins,m,c);
103   if (bins[k-1  ].GetMask() == m) MakeCluster(k-1  ,max,bins,m,c);
104   if (bins[k+max].GetMask() == m) MakeCluster(k+max,max,bins,m,c);
105   if (bins[k+1  ].GetMask() == m) MakeCluster(k+1  ,max,bins,m,c);
106 }
107
108 //_____________________________________________________________________________
109 Int_t AliTPCclusterer::Digits2Clusters(TTree *dTree, TTree *cTree) {
110   //-----------------------------------------------------------------
111   // This is a simple cluster finder.
112   //-----------------------------------------------------------------
113   TBranch *branch=dTree->GetBranch("Segment");
114   if (!branch) {
115      Error("Digits2Cluster","Can't get the branch !");
116      return 1;
117   }
118   AliSimDigits digarr, *dummy=&digarr;
119   branch->SetAddress(&dummy);
120   
121   AliTPCClustersRow ddd,*clrow=&ddd;
122   clrow = new AliTPCClustersRow("AliTPCcluster");
123   cTree->Branch("Segment","AliTPCClustersRow",&clrow,32000,200);    
124
125   const Int_t kMAXZ=fPar->GetMaxTBin()+2;
126
127   Int_t nclusters=0;
128
129   Int_t nentries = (Int_t)dTree->GetEntries();
130   for (Int_t n=0; n<nentries; n++) {
131    
132     Int_t sec, row;
133     dTree->GetEvent(n);
134
135     if (!fPar->AdjustSectorRow(digarr.GetID(),sec,row)) {
136        Error("Digits2Clusters","!nvalid segment ID ! %d",digarr.GetID());
137        continue;
138     }
139
140     clrow->SetID(digarr.GetID());
141
142     cTree->GetBranch("Segment")->SetAddress(&clrow);
143
144     Float_t rx=fPar->GetPadRowRadii(sec,row);
145
146     Int_t npads, sign;
147     {
148        const Int_t kNIS=fPar->GetNInnerSector(), kNOS=fPar->GetNOuterSector();
149        if (sec < kNIS) {
150           npads = fPar->GetNPadsLow(row);
151           sign = (sec < kNIS/2) ? 1 : -1;
152        } else {
153           npads = fPar->GetNPadsUp(row);
154           sign = ((sec-kNIS) < kNOS/2) ? 1 : -1;
155        }
156     }
157
158     const Int_t kMAXBIN=kMAXZ*(npads+2);
159     AliBin *bins=new AliBin[kMAXBIN];
160     for (Int_t ii=0;ii<kMAXBIN;ii++) {
161        bins[ii].SetQ(0); bins[ii].SetMask(0xFFFFFFFE);
162     }
163
164     digarr.First();
165     do {
166        Short_t dig=digarr.CurrentDigit();
167        if (dig<=fPar->GetZeroSup()) continue;
168        Int_t j=digarr.CurrentRow()+1, i=digarr.CurrentColumn()+1;
169        bins[i*kMAXZ+j].SetQ(dig);
170        bins[i*kMAXZ+j].SetMask(1);
171     } while (digarr.Next());
172
173     Int_t ncl=0;
174     for (Int_t i=0; i<kMAXBIN; i++) {
175       if ((bins[i].GetMask()&1) == 0) continue;
176       Int_t idx[32]; UInt_t msk[32]; Int_t npeaks=0;
177       FindPeaks(i, kMAXZ, bins, idx, msk, npeaks);
178
179       if (npeaks>30) continue;
180
181       Int_t k,l;
182       for (k=0; k<npeaks-1; k++){//mark adjacent peaks
183         if (idx[k] < 0) continue; //this peak is already removed
184         for (l=k+1; l<npeaks; l++) {
185            if (idx[l] < 0) continue; //this peak is already removed
186            Int_t ki=idx[k]/kMAXZ, kj=idx[k] - ki*kMAXZ;
187            Int_t li=idx[l]/kMAXZ, lj=idx[l] - li*kMAXZ;
188            Int_t di=TMath::Abs(ki - li);
189            Int_t dj=TMath::Abs(kj - lj);
190            if (di>1 || dj>1) continue;
191            if (bins[idx[k]].GetQ() > bins[idx[l]].GetQ()) {
192               msk[l]=msk[k];
193               idx[l]*=-1;
194            } else {
195               msk[k]=msk[l];
196               idx[k]*=-1;
197               break;
198            } 
199         }
200       }
201
202       for (k=0; k<npeaks; k++) {
203         MarkPeak(TMath::Abs(idx[k]), kMAXZ, bins, msk[k]);
204       }
205         
206       for (k=0; k<npeaks; k++) {
207          if (idx[k] < 0) continue; //removed peak
208          AliTPCcluster c;
209          MakeCluster(idx[k], kMAXZ, bins, msk[k], c);
210          if (c.GetQ() < 5) continue; //noise cluster
211          c.SetY(c.GetY()/c.GetQ());
212          c.SetZ(c.GetZ()/c.GetQ());
213
214          Float_t s2 = c.GetSigmaY2()/c.GetQ() - c.GetY()*c.GetY();
215          Float_t w=fPar->GetPadPitchWidth(sec);
216          c.SetSigmaY2((s2 + 1./12.)*w*w);
217          if (s2 != 0.) {
218            c.SetSigmaY2(c.GetSigmaY2()*0.108);
219            if (sec<fPar->GetNInnerSector()) c.SetSigmaY2(c.GetSigmaY2()*2.07);
220          }
221
222          s2 = c.GetSigmaZ2()/c.GetQ() - c.GetZ()*c.GetZ();
223          w=fPar->GetZWidth();
224          c.SetSigmaZ2((s2 + 1./12.)*w*w);
225          if (s2 != 0.) {
226            c.SetSigmaZ2(c.GetSigmaZ2()*0.169);
227            if (sec<fPar->GetNInnerSector()) c.SetSigmaZ2(c.GetSigmaZ2()*1.77);
228          }
229
230          c.SetY((c.GetY() - 0.5 - 0.5*npads)*fPar->GetPadPitchWidth(sec));
231          c.SetZ(fPar->GetZWidth()*(c.GetZ()-1)); 
232          c.SetZ(c.GetZ() - 3.*fPar->GetZSigma()); // PASA delay 
233          c.SetZ(sign*(fPar->GetZLength(sec) - c.GetZ()));
234
235          if (rx<230./250.*TMath::Abs(c.GetZ())) continue;
236
237          Int_t ki=idx[k]/kMAXZ, kj=idx[k] - ki*kMAXZ;
238          c.SetLabel(digarr.GetTrackID(kj-1,ki-1,0),0);
239          c.SetLabel(digarr.GetTrackID(kj-1,ki-1,1),1);
240          c.SetLabel(digarr.GetTrackID(kj-1,ki-1,2),2);
241
242          c.SetQ(bins[idx[k]].GetQ());
243
244          if (ki==1 || ki==npads || kj==1 || kj==kMAXZ-2) {
245            c.SetSigmaY2(c.GetSigmaY2()*25.);
246            c.SetSigmaZ2(c.GetSigmaZ2()*4.);
247          }
248          clrow->InsertCluster(&c); ncl++;
249       }
250     }
251     cTree->Fill();
252
253     clrow->GetArray()->Clear();
254
255     nclusters+=ncl;
256
257     delete[] bins;  
258   }
259
260   Info("Digits2Cluster","Number of found clusters : %d",nclusters);
261
262   return 0;
263 }
264