Memory leak in AliPHOSRawFitterv0 is fixed.
[u/mrichter/AliRoot.git] / PHOS / AliPHOSGeoUtils.cxx
CommitLineData
70a0fabe 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: AliPHOSGeometry.cxx 25590 2008-05-06 07:09:11Z prsnko $ */
17
18//_________________________________________________________________________
bb5c37a5 19// Geometry class for PHOS
70a0fabe 20// PHOS consists of the electromagnetic calorimeter (EMCA)
bb5c37a5 21// and a charged particle veto (CPV)
22// The EMCA/CPV modules are parametrized so that any configuration
70a0fabe 23// can be easily implemented
24// The title is used to identify the version of CPV used.
25//
26// -- Author: Yves Schutz (SUBATECH) & Dmitri Peressounko (RRC "KI" & SUBATECH)
27
28// --- ROOT system ---
29
bb5c37a5 30#include "TClonesArray.h"
70a0fabe 31#include "TVector3.h"
32#include "TParticle.h"
33#include <TGeoManager.h>
34#include <TGeoMatrix.h>
35
36// --- Standard library ---
37
38// --- AliRoot header files ---
39#include "AliPHOSEMCAGeometry.h"
40#include "AliPHOSCPVGeometry.h"
bcc9e89e 41#include "AliPHOSSupportGeometry.h"
70a0fabe 42#include "AliPHOSGeoUtils.h"
43
44ClassImp(AliPHOSGeoUtils)
45
46//____________________________________________________________________________
47AliPHOSGeoUtils::AliPHOSGeoUtils():
bcc9e89e 48 fGeometryEMCA(0x0),fGeometryCPV(0x0),fGeometrySUPP(0x0),
70a0fabe 49 fNModules(0),fNCristalsInModule(0),fNPhi(0),fNZ(0),
50 fNumberOfCPVPadsPhi(0),fNumberOfCPVPadsZ(0),
51 fNCellsXInStrip(0),fNCellsZInStrip(0),fNStripZ(0),
bb5c37a5 52 fCrystalShift(0.),fCryCellShift(0.),fCryStripShift(0.),fCellStep(0.),
53 fPadSizePhi(0.),fPadSizeZ(0.),fCPVBoxSizeY(0.),fMisalArray(0x0)
70a0fabe 54
55{
56 // default ctor
57 // must be kept public for root persistency purposes, but should never be called by the outside world
58}
59
60//____________________________________________________________________________
61AliPHOSGeoUtils::AliPHOSGeoUtils(const AliPHOSGeoUtils & rhs)
62 : TNamed(rhs),
bcc9e89e 63 fGeometryEMCA(0x0),fGeometryCPV(0x0),fGeometrySUPP(0x0),
70a0fabe 64 fNModules(0),fNCristalsInModule(0),fNPhi(0),fNZ(0),
65 fNumberOfCPVPadsPhi(0),fNumberOfCPVPadsZ(0),
66 fNCellsXInStrip(0),fNCellsZInStrip(0),fNStripZ(0),
bb5c37a5 67 fCrystalShift(0.),fCryCellShift(0.),fCryStripShift(0.),fCellStep(0.),
68 fPadSizePhi(0.),fPadSizeZ(0.),fCPVBoxSizeY(0.),fMisalArray(0x0)
70a0fabe 69{
70 Fatal("cpy ctor", "not implemented") ;
71}
72
73//____________________________________________________________________________
74AliPHOSGeoUtils::AliPHOSGeoUtils(const Text_t* name, const Text_t* title)
75 : TNamed(name, title),
bcc9e89e 76 fGeometryEMCA(0x0),fGeometryCPV(0x0),fGeometrySUPP(0x0),
70a0fabe 77 fNModules(0),fNCristalsInModule(0),fNPhi(0),fNZ(0),
78 fNumberOfCPVPadsPhi(0),fNumberOfCPVPadsZ(0),
79 fNCellsXInStrip(0),fNCellsZInStrip(0),fNStripZ(0),
bb5c37a5 80 fCrystalShift(0.),fCryCellShift(0.),fCryStripShift(0.),fCellStep(0.),
81 fPadSizePhi(0.),fPadSizeZ(0.),fCPVBoxSizeY(0.),fMisalArray(0x0)
70a0fabe 82{
83 // ctor only for normal usage
bcc9e89e 84
85 fGeometryEMCA = new AliPHOSEMCAGeometry() ;
86 fGeometryCPV = new AliPHOSCPVGeometry() ;
87 fGeometrySUPP = new AliPHOSSupportGeometry() ;
88
89 fNModules = 5;
90 fNPhi = fGeometryEMCA->GetNPhi() ;
91 fNZ = fGeometryEMCA->GetNZ() ;
92 fNCristalsInModule = fNPhi*fNZ ;
93 fNCellsXInStrip= fGeometryEMCA->GetNCellsXInStrip() ;
94 fNCellsZInStrip= fGeometryEMCA->GetNCellsZInStrip() ;
95 fNStripZ = fGeometryEMCA->GetNStripZ() ;
96 fXtlArrSize[0]=fGeometryEMCA->GetInnerThermoHalfSize()[0] ; //Wery close to the zise of the Xtl set
97 fXtlArrSize[1]=fGeometryEMCA->GetInnerThermoHalfSize()[1] ; //Wery close to the zise of the Xtl set
98 fXtlArrSize[2]=fGeometryEMCA->GetInnerThermoHalfSize()[2] ; //Wery close to the zise of the Xtl set
99
100 //calculate offset to crystal surface
a2bb6de5 101 const Float_t * inthermo = fGeometryEMCA->GetInnerThermoHalfSize() ;
102 const Float_t * strip = fGeometryEMCA->GetStripHalfSize() ;
103 const Float_t * splate = fGeometryEMCA->GetSupportPlateHalfSize();
104 const Float_t * crystal = fGeometryEMCA->GetCrystalHalfSize() ;
105 const Float_t * pin = fGeometryEMCA->GetAPDHalfSize() ;
106 const Float_t * preamp = fGeometryEMCA->GetPreampHalfSize() ;
bcc9e89e 107 fCrystalShift=-inthermo[1]+strip[1]+splate[1]+crystal[1]-fGeometryEMCA->GetAirGapLed()/2.+pin[1]+preamp[1] ;
108 fCryCellShift=crystal[1]-(fGeometryEMCA->GetAirGapLed()-2*pin[1]-2*preamp[1])/2;
bb5c37a5 109 fCryStripShift=fCryCellShift+splate[1] ;
bcc9e89e 110 fCellStep = 2.*fGeometryEMCA->GetAirCellHalfSize()[0] ;
111
bcc9e89e 112 fNumberOfCPVPadsPhi = fGeometryCPV->GetNumberOfCPVPadsPhi() ;
113 fNumberOfCPVPadsZ = fGeometryCPV->GetNumberOfCPVPadsZ() ;
114 fPadSizePhi = fGeometryCPV->GetCPVPadSizePhi() ;
115 fPadSizeZ = fGeometryCPV->GetCPVPadSizeZ() ;
116 fCPVBoxSizeY= fGeometryCPV->GetCPVBoxSize(1) ;
bb5c37a5 117
118 for(Int_t mod=0; mod<5; mod++){
119 fEMCMatrix[mod]=0 ;
120 for(Int_t istrip=0; istrip<224; istrip++)
121 fStripMatrix[mod][istrip]=0 ;
122 fCPVMatrix[mod]=0;
123 fPHOSMatrix[mod]=0 ;
124 }
125
70a0fabe 126}
127
128//____________________________________________________________________________
129AliPHOSGeoUtils & AliPHOSGeoUtils::operator = (const AliPHOSGeoUtils & /*rvalue*/) {
bcc9e89e 130
131 Fatal("assignment operator", "not implemented") ;
70a0fabe 132 return *this ;
133}
134
135//____________________________________________________________________________
136AliPHOSGeoUtils::~AliPHOSGeoUtils(void)
137{
138 // dtor
bcc9e89e 139 if(fGeometryEMCA){
140 delete fGeometryEMCA; fGeometryEMCA = 0 ;
141 }
142 if(fGeometryCPV){
143 delete fGeometryCPV; fGeometryCPV=0 ;
144 }
145 if(fGeometrySUPP){
146 delete fGeometrySUPP ; fGeometrySUPP=0 ;
147 }
bb5c37a5 148 if(fMisalArray){
149 delete fMisalArray; fMisalArray=0 ;
150 }
70a0fabe 151}
152//____________________________________________________________________________
153Bool_t AliPHOSGeoUtils::AbsToRelNumbering(Int_t absId, Int_t * relid) const
154{
155 // Converts the absolute numbering into the following array
156 // relid[0] = PHOS Module number 1:fNModules
157 // relid[1] = 0 if PbW04
158 // = -1 if CPV
159 // relid[2] = Row number inside a PHOS module
160 // relid[3] = Column number inside a PHOS module
161
162 Float_t id = absId ;
163
164 Int_t phosmodulenumber = (Int_t)TMath:: Ceil( id / fNCristalsInModule ) ;
165
166 if ( phosmodulenumber > fNModules ) { // it is a CPV pad
167
168 id -= fNPhi * fNZ * fNModules ;
169 Float_t nCPV = fNumberOfCPVPadsPhi * fNumberOfCPVPadsZ ;
170 relid[0] = (Int_t) TMath::Ceil( id / nCPV ) ;
171 relid[1] = -1 ;
172 id -= ( relid[0] - 1 ) * nCPV ;
173 relid[2] = (Int_t) TMath::Ceil( id / fNumberOfCPVPadsZ ) ;
174 relid[3] = (Int_t) ( id - ( relid[2] - 1 ) * fNumberOfCPVPadsZ ) ;
175 }
176 else { // it is a PW04 crystal
177
178 relid[0] = phosmodulenumber ;
179 relid[1] = 0 ;
180 id -= ( phosmodulenumber - 1 ) * fNPhi * fNZ ;
181 relid[2] = (Int_t)TMath::Ceil( id / fNZ ) ;
182 relid[3] = (Int_t)( id - ( relid[2] - 1 ) * fNZ ) ;
183 }
184 return kTRUE ;
185}
186//____________________________________________________________________________
187Bool_t AliPHOSGeoUtils::RelToAbsNumbering(const Int_t * relid, Int_t & absId) const
188{
189 // Converts the relative numbering into the absolute numbering
190 // EMCA crystals:
191 // absId = from 1 to fNModules * fNPhi * fNZ
192 // CPV pad:
193 // absId = from N(total PHOS crystals) + 1
194 // to NCPVModules * fNumberOfCPVPadsPhi * fNumberOfCPVPadsZ
195
196 if ( relid[1] == 0 ) { // it is a Phos crystal
197 absId =
198 ( relid[0] - 1 ) * fNPhi * fNZ // the offset of PHOS modules
199 + ( relid[2] - 1 ) * fNZ // the offset along phi
200 + relid[3] ; // the offset along z
201 }
202 else { // it is a CPV pad
203 absId = fNPhi * fNZ * fNModules // the offset to separate EMCA crystals from CPV pads
204 + ( relid[0] - 1 ) * fNumberOfCPVPadsPhi * fNumberOfCPVPadsZ // the pads offset of PHOS modules
205 + ( relid[2] - 1 ) * fNumberOfCPVPadsZ // the pads offset of a CPV row
206 + relid[3] ; // the column number
207 }
208
209 return kTRUE ;
210}
211
212//____________________________________________________________________________
213void AliPHOSGeoUtils::RelPosInModule(const Int_t * relid, Float_t & x, Float_t & z) const
214{
215 // Converts the relative numbering into the local PHOS-module (x, z) coordinates
216
70a0fabe 217 if(relid[1]==0){ //this is PHOS
218
219 Double_t pos[3]= {0.0,-fCryCellShift,0.}; //Position incide the crystal
220 Double_t posC[3]={0.0,0.0,0.}; //Global position
221
222 //Shift and possibly apply misalignment corrections
223 Int_t strip=1+((Int_t) TMath::Ceil((Double_t)relid[2]/fNCellsXInStrip))*fNStripZ-
224 (Int_t) TMath::Ceil((Double_t)relid[3]/fNCellsZInStrip) ;
bb5c37a5 225 pos[0]=((relid[2]-1)%fNCellsXInStrip-fNCellsXInStrip/2+0.5)*fCellStep ;
226 pos[2]=(-(relid[3]-1)%fNCellsZInStrip+fNCellsZInStrip/2-0.5)*fCellStep ;
227
228 Int_t mod = relid[0] ;
229 TGeoHMatrix * m2 = GetMatrixForStrip(mod, strip) ;
230 m2->LocalToMaster(pos,posC);
231
70a0fabe 232 //Return to PHOS local system
bb5c37a5 233 Double_t posL2[3]={posC[0],posC[1],posC[2]};
234 TGeoHMatrix *mPHOS2 = GetMatrixForModule(mod) ;
235 mPHOS2->MasterToLocal(posC,posL2);
236 x=posL2[0] ;
237 z=-posL2[2];
70a0fabe 238 return ;
239 }
240 else{//CPV
241 //first calculate position with respect to CPV plain
242 Int_t row = relid[2] ; //offset along x axis
243 Int_t column = relid[3] ; //offset along z axis
244 Double_t pos[3]= {0.0,0.0,0.}; //Position incide the CPV printed circuit
245 Double_t posC[3]={0.0,0.0,0.}; //Global position
246 pos[0] = - ( fNumberOfCPVPadsPhi/2. - row - 0.5 ) * fPadSizePhi ; // position of pad with respect
247 pos[2] = - ( fNumberOfCPVPadsZ /2. - column - 0.5 ) * fPadSizeZ ; // of center of PHOS module
248
249 //now apply possible shifts and rotations
bb5c37a5 250 TGeoHMatrix *m = GetMatrixForCPV(relid[0]) ;
251 m->LocalToMaster(pos,posC);
70a0fabe 252 //Return to PHOS local system
253 Double_t posL[3]={0.,0.,0.,} ;
bb5c37a5 254 TGeoHMatrix *mPHOS = GetMatrixForPHOS(relid[0]) ;
255 mPHOS->MasterToLocal(posC,posL);
70a0fabe 256 x=posL[0] ;
257 z=posL[1];
258 return ;
259
260 }
261
262}
263//____________________________________________________________________________
264void AliPHOSGeoUtils::RelPosToAbsId(Int_t module, Double_t x, Double_t z, Int_t & absId) const
265{
266 // converts local PHOS-module (x, z) coordinates to absId
267
bb5c37a5 268 //Calculate AbsId using ideal geometry. Should be sufficient for primary particles calculation
269 //(the only place where this method used currently)
270 Int_t relid[4]={module,0,1,1} ;
271 relid[2] = static_cast<Int_t>(TMath::Ceil( x/ fCellStep + fNPhi / 2.) );
272 relid[3] = static_cast<Int_t>(TMath::Ceil(-z/ fCellStep + fNZ / 2.) ) ;
273 if(relid[2]<1)relid[2]=1 ;
274 if(relid[3]<1)relid[3]=1 ;
275 if(relid[2]>fNPhi)relid[2]=fNPhi ;
276 if(relid[3]>fNZ)relid[3]=fNZ ;
277 RelToAbsNumbering(relid,absId) ;
278
279/*
70a0fabe 280 //find Global position
281 if (!gGeoManager){
282 printf("Geo manager not initialized\n");
283 abort() ;
284 }
285 Double_t posL[3]={x,-fCrystalShift,-z} ; //Only for EMC!!!
286 Double_t posG[3] ;
287 char path[100] ;
288 sprintf(path,"/ALIC_1/PHOS_%d/PEMC_1/PCOL_1/PTIO_1/PCOR_1/PAGA_1/PTII_1",module) ;
289 if (!gGeoManager->cd(path)){
290 printf("Geo manager can not find path \n");
291 abort() ;
292 }
293 TGeoHMatrix *mPHOS = gGeoManager->GetCurrentMatrix();
294 if (mPHOS){
295 mPHOS->LocalToMaster(posL,posG);
296 }
297 else{
298 printf("Geo matrixes are not loaded \n") ;
299 abort() ;
300 }
301
302 Int_t relid[4] ;
303 gGeoManager->FindNode(posG[0],posG[1],posG[2]) ;
304 //Check that path contains PSTR and extract strip number
305 TString cpath(gGeoManager->GetPath()) ;
306 Int_t indx = cpath.Index("PCEL") ;
307 if(indx==-1){ //for the few events when particle hits between srips use ideal geometry
308 relid[0] = module ;
309 relid[1] = 0 ;
310 relid[2] = static_cast<Int_t>(TMath::Ceil( x/ fCellStep + fNPhi / 2.) );
311 relid[3] = static_cast<Int_t>(TMath::Ceil(-z/ fCellStep + fNZ / 2.) ) ;
312 if(relid[2]<1)relid[2]=1 ;
313 if(relid[3]<1)relid[3]=1 ;
314 if(relid[2]>fNPhi)relid[2]=fNPhi ;
315 if(relid[3]>fNZ)relid[3]=fNZ ;
316 RelToAbsNumbering(relid,absId) ;
317 }
318 else{
319 Int_t indx2 = cpath.Index("/",indx) ;
320 if(indx2==-1)
321 indx2=cpath.Length() ;
322 TString cell=cpath(indx+5,indx2-indx-5) ;
323 Int_t icell=cell.Atoi() ;
324 indx = cpath.Index("PSTR") ;
325 indx2 = cpath.Index("/",indx) ;
326 TString strip=cpath(indx+5,indx2-indx-5) ;
327 Int_t iStrip = strip.Atoi() ;
328
329 Int_t row = fNStripZ - (iStrip - 1) % (fNStripZ) ;
330 Int_t col = (Int_t) TMath::Ceil((Double_t) iStrip/(fNStripZ)) -1 ;
331
332 // Absid for 8x2-strips. Looks nice :)
333 absId = (module-1)*fNCristalsInModule +
334 row * 2 + (col*fNCellsXInStrip + (icell - 1) / 2)*fNZ - (icell & 1 ? 1 : 0);
335
336 }
bb5c37a5 337*/
70a0fabe 338
339}
340
341//____________________________________________________________________________
342void AliPHOSGeoUtils::RelPosToRelId(Int_t module, Double_t x, Double_t z, Int_t * relId) const
343{
344 //Evaluates RelId of the crystall with given coordinates
345
346 Int_t absId ;
347 RelPosToAbsId(module, x,z,absId) ;
348 AbsToRelNumbering(absId,relId) ;
349}
350
351//____________________________________________________________________________
352void AliPHOSGeoUtils::RelPosInAlice(Int_t id, TVector3 & pos ) const
353{
354 // Converts the absolute numbering into the global ALICE coordinate system
355
356 if (!gGeoManager){
357 printf("Geo manager not initialized\n");
358 abort();
359 }
360
361 Int_t relid[4] ;
362
363 AbsToRelNumbering(id , relid) ;
364
365 //construct module name
70a0fabe 366 if(relid[1]==0){ //this is EMC
367
bb5c37a5 368 Double_t ps[3]= {0.0,-fCryStripShift,0.}; //Position incide the crystal
70a0fabe 369 Double_t psC[3]={0.0,0.0,0.}; //Global position
370
371 //Shift and possibly apply misalignment corrections
372 Int_t strip=1+((Int_t) TMath::Ceil((Double_t)relid[2]/fNCellsXInStrip))*fNStripZ-
373 (Int_t) TMath::Ceil((Double_t)relid[3]/fNCellsZInStrip) ;
bb5c37a5 374 ps[0]=((relid[2]-1)%fNCellsXInStrip-fNCellsXInStrip/2+0.5)*fCellStep ;
375 ps[2]=(-(relid[3]-1)%fNCellsZInStrip+fNCellsZInStrip/2-0.5)*fCellStep ;
376
377 Int_t mod = relid[0] ;
378 TGeoHMatrix * m2 = GetMatrixForStrip(mod, strip) ;
379 m2->LocalToMaster(ps,psC);
70a0fabe 380 pos.SetXYZ(psC[0],psC[1],psC[2]) ;
bb5c37a5 381
70a0fabe 382 }
383 else{
384 //first calculate position with respect to CPV plain
385 Int_t row = relid[2] ; //offset along x axis
386 Int_t column = relid[3] ; //offset along z axis
387 Double_t ps[3]= {0.0,fCPVBoxSizeY/2.,0.}; //Position on top of CPV
388 Double_t psC[3]={0.0,0.0,0.}; //Global position
389 pos[0] = - ( fNumberOfCPVPadsPhi/2. - row - 0.5 ) * fPadSizePhi ; // position of pad with respect
390 pos[2] = - ( fNumberOfCPVPadsZ /2. - column - 0.5 ) * fPadSizeZ ; // of center of PHOS module
391
392 //now apply possible shifts and rotations
bb5c37a5 393 TGeoHMatrix *m = GetMatrixForCPV(relid[0]) ;
394 m->LocalToMaster(ps,psC);
70a0fabe 395 pos.SetXYZ(psC[0],psC[1],-psC[2]) ;
396 }
397}
398
399//____________________________________________________________________________
400void AliPHOSGeoUtils::Local2Global(Int_t mod, Float_t x, Float_t z,
401 TVector3& globalPosition) const
402{
70a0fabe 403 Double_t posL[3]={x,-fCrystalShift,-z} ; //Only for EMC!!!
404 Double_t posG[3] ;
bb5c37a5 405 TGeoHMatrix *mPHOS = GetMatrixForModule(mod) ;
406 mPHOS->LocalToMaster(posL,posG);
70a0fabe 407 globalPosition.SetXYZ(posG[0],posG[1],posG[2]) ;
408}
409//____________________________________________________________________________
410void AliPHOSGeoUtils::Global2Local(TVector3& localPosition,
411 const TVector3& globalPosition,
412 Int_t module) const
413{
414 // Transforms a global position to the local coordinate system
415 // of the module
416 //Return to PHOS local system
417 Double_t posG[3]={globalPosition.X(),globalPosition.Y(),globalPosition.Z()} ;
418 Double_t posL[3]={0.,0.,0.} ;
bb5c37a5 419 TGeoHMatrix *mPHOS = GetMatrixForModule(module) ;
420 mPHOS->MasterToLocal(posG,posL);
70a0fabe 421 localPosition.SetXYZ(posL[0],posL[1]+fCrystalShift,-posL[2]) ;
422
423}
424//____________________________________________________________________________
f4aea312 425Bool_t AliPHOSGeoUtils::GlobalPos2RelId(TVector3 & global, Int_t * relId){
426 //Converts position in global ALICE coordinates to relId
427 //returns false if x,z coordinates are beyond PHOS
428 //distande to PHOS surface is NOT calculated
429 TVector3 loc ;
430 for(Int_t mod=1; mod<fNModules; mod++){
431 Global2Local(loc,global,mod) ;
432 //If in Acceptance
433 if((TMath::Abs(loc.Z())<fXtlArrSize[2]) && (TMath::Abs(loc.X())<fXtlArrSize[0])){
434 RelPosToRelId(mod,loc.X(),loc.Z(),relId);
435 return kTRUE ;
436 }
437 }
438 return kFALSE ;
439
440}
441//____________________________________________________________________________
70a0fabe 442Bool_t AliPHOSGeoUtils::ImpactOnEmc(const TParticle * particle,
443 Int_t & moduleNumber, Double_t & z, Double_t & x) const
444{
445 // Tells if a particle enters PHOS and evaluates hit position
446 Double_t vtx[3]={particle->Vx(),particle->Vy(),particle->Vz()} ;
447 return ImpactOnEmc(vtx,particle->Theta(),particle->Phi(),moduleNumber,z,x);
448}
449
450//____________________________________________________________________________
451Bool_t AliPHOSGeoUtils::ImpactOnEmc(const Double_t * vtx, Double_t theta, Double_t phi,
452 Int_t & moduleNumber, Double_t & z, Double_t & x) const
453{
454 // calculates the impact coordinates on PHOS of a neutral particle
455 // emitted in the vertex vtx[3] with direction vec(p) in the ALICE global coordinate system
456 TVector3 p(TMath::Sin(theta)*TMath::Cos(phi),TMath::Sin(theta)*TMath::Sin(phi),TMath::Cos(theta)) ;
457 return ImpactOnEmc(vtx,p,moduleNumber,z,x) ;
458
459}
460//____________________________________________________________________________
461Bool_t AliPHOSGeoUtils::ImpactOnEmc(const Double_t * vtx, const TVector3 &p,
462 Int_t & moduleNumber, Double_t & z, Double_t & x) const
463{
464 // calculates the impact coordinates on PHOS of a neutral particle
465 // emitted in the vertex vtx[3] with direction theta and phi in the ALICE global coordinate system
466 TVector3 v(vtx[0],vtx[1],vtx[2]) ;
467
70a0fabe 468 for(Int_t imod=1; imod<=fNModules ; imod++){
469 //create vector from (0,0,0) to center of crystal surface of imod module
470 Double_t tmp[3]={0.,-fCrystalShift,0.} ;
471
bb5c37a5 472 TGeoHMatrix *m = GetMatrixForModule(imod) ;
70a0fabe 473 Double_t posG[3]={0.,0.,0.} ;
bb5c37a5 474 m->LocalToMaster(tmp,posG);
70a0fabe 475 TVector3 n(posG[0],posG[1],posG[2]) ;
476 Double_t direction=n.Dot(p) ;
477 if(direction<=0.)
478 continue ; //momentum directed FROM module
479 Double_t fr = (n.Mag2()-n.Dot(v))/direction ;
480 //Calculate direction in module plain
481 n-=v+fr*p ;
482 n*=-1. ;
483 if(TMath::Abs(TMath::Abs(n.Z())<fXtlArrSize[2]) && n.Pt()<fXtlArrSize[0]){
484 moduleNumber = imod ;
485 z=n.Z() ;
486 x=TMath::Sign(n.Pt(),n.X()) ;
487 //no need to return to local system since we calcilated distance from module center
488 //and tilts can not be significant.
489 return kTRUE ;
490 }
491 }
492 //Not in acceptance
493 x=0; z=0 ;
494 moduleNumber=0 ;
495 return kFALSE ;
496
497}
70a0fabe 498//____________________________________________________________________________
bcc9e89e 499void AliPHOSGeoUtils::GetIncidentVector(const TVector3 &vtx, Int_t module, Float_t x,Float_t z, TVector3 &vInc) const {
500 //Calculates vector pointing from vertex to current poisition in module local frame
501 //Note that PHOS local system and ALICE global have opposite z directions
70a0fabe 502
bcc9e89e 503 Global2Local(vInc,vtx,module) ;
504 vInc.SetXYZ(vInc.X()+x,vInc.Y(),vInc.Z()+z) ;
70a0fabe 505}
bb5c37a5 506//____________________________________________________________________________
507TGeoHMatrix * AliPHOSGeoUtils::GetMatrixForModule(Int_t mod)const {
508 //Provides shift-rotation matrix for module mod
bcc9e89e 509
bb5c37a5 510 //If GeoManager exists, take matrixes from it
511 if(gGeoManager){
512 char path[255] ;
513 sprintf(path,"/ALIC_1/PHOS_%d/PEMC_1/PCOL_1/PTIO_1/PCOR_1/PAGA_1/PTII_1",mod) ;
514 // sprintf(path,"/ALIC_1/PHOS_%d",relid[0]) ;
515 if (!gGeoManager->cd(path)){
516 printf("Geo manager can not find path \n");
517 abort();
518 }
519 return gGeoManager->GetCurrentMatrix();
520 }
521 if(fEMCMatrix[mod-1]){
522 return fEMCMatrix[mod-1] ;
523 }
524 else{
525 printf("Can not find PHOS misalignment matrixes\n") ;
526 printf("Either import TGeoManager from geometry.root or \n");
527 printf("read stored matrixes from AliESD Header: \n") ;
528 printf("AliPHOSGeoUtils::SetMisalMatrixes(header->GetPHOSMisalMatrix()) \n") ;
529 abort() ;
530 }
531 return 0 ;
532}
533//____________________________________________________________________________
534TGeoHMatrix * AliPHOSGeoUtils::GetMatrixForStrip(Int_t mod, Int_t strip)const {
535 //Provides shift-rotation matrix for strip unit of the module mod
536
537 //If GeoManager exists, take matrixes from it
538 if(gGeoManager){
539 char path[255] ;
540 sprintf(path,"/ALIC_1/PHOS_%d/PEMC_1/PCOL_1/PTIO_1/PCOR_1/PAGA_1/PTII_1/PSTR_%d",mod,strip) ;
541 if (!gGeoManager->cd(path)){
542 printf("Geo manager can not find path \n");
543 abort() ;
544 }
545 return gGeoManager->GetCurrentMatrix();
546 }
547 if(fStripMatrix[mod-1][strip-1]){
548 return fStripMatrix[mod-1][strip-1] ;
549 }
550 else{
551 printf("Can not find PHOS misalignment matrixes\n") ;
552 printf("Either import TGeoManager from geometry.root or \n");
553 printf("read stored matrixes from AliESD Header: \n") ;
554 printf("AliPHOSGeoUtils::SetMisalMatrixes(header->GetPHOSMisalMatrix()) \n") ;
555 abort() ;
556 }
557 return 0 ;
558}
559//____________________________________________________________________________
560TGeoHMatrix * AliPHOSGeoUtils::GetMatrixForCPV(Int_t mod)const {
561 //Provides shift-rotation matrix for CPV of the module mod
562
563 //If GeoManager exists, take matrixes from it
564 if(gGeoManager){
565 char path[255] ;
566 //now apply possible shifts and rotations
567 sprintf(path,"/ALIC_1/PHOS_%d/PCPV_1",mod) ;
568 if (!gGeoManager->cd(path)){
569 printf("Geo manager can not find path \n");
570 abort() ;
571 }
572 return gGeoManager->GetCurrentMatrix();
573 }
574 if(fCPVMatrix[mod-1]){
575 return fCPVMatrix[mod-1] ;
576 }
577 else{
578 printf("Can not find PHOS misalignment matrixes\n") ;
579 printf("Either import TGeoManager from geometry.root or \n");
580 printf("read stored matrixes from AliESD Header: \n") ;
581 printf("AliPHOSGeoUtils::SetMisalMatrixes(header->GetPHOSMisalMatrix()) \n") ;
582 abort() ;
583 }
584 return 0 ;
585}
586//____________________________________________________________________________
587TGeoHMatrix * AliPHOSGeoUtils::GetMatrixForPHOS(Int_t mod)const {
588 //Provides shift-rotation matrix for PHOS (EMC+CPV)
589
590 //If GeoManager exists, take matrixes from it
591 if(gGeoManager){
592 char path[255] ;
593 sprintf(path,"/ALIC_1/PHOS_%d",mod) ;
594 if (!gGeoManager->cd(path)){
595 printf("Geo manager can not find path \n");
596 abort() ;
597 }
598 return gGeoManager->GetCurrentMatrix();
599 }
600 if(fPHOSMatrix[mod-1]){
601 return fPHOSMatrix[mod-1] ;
602 }
603 else{
604 printf("Can not find PHOS misalignment matrixes\n") ;
605 printf("Either import TGeoManager from geometry.root or \n");
606 printf("read stored matrixes from AliESD Header: \n") ;
607 printf("AliPHOSGeoUtils::SetMisalMatrixes(header->GetPHOSMisalMatrix()) \n") ;
608 abort() ;
609 }
610 return 0 ;
611}
612//____________________________________________________________________________
613void AliPHOSGeoUtils::SetMisalMatrix(TGeoHMatrix * m, Int_t mod){
614 //Fills pointers to geo matrixes
615
616 fPHOSMatrix[mod]=m ;
617 //If modules does not exist, make sure all its matrixes are zero
618 if(m==NULL){
619 fEMCMatrix[mod]=NULL ;
620 Int_t istrip=0 ;
621 for(Int_t irow = 0; irow < fGeometryEMCA->GetNStripX(); irow ++){
622 for(Int_t icol = 0; icol < fGeometryEMCA->GetNStripZ(); icol ++){
623 fStripMatrix[mod][istrip]=NULL ;
624 }
625 }
626 fCPVMatrix[mod]=NULL ;
627 return ;
628 }
629
630 //Calculate maxtrixes for PTII
631 if(!fMisalArray)
632 fMisalArray = new TClonesArray("TGeoHMatrix",1120+10) ;
633 Int_t nr = fMisalArray->GetEntriesFast() ;
634 Double_t rotEMC[9]={1.,0.,0.,0.,0.,-1.,0.,1.,0.} ;
635 const Float_t * inthermo = fGeometryEMCA->GetInnerThermoHalfSize() ;
636 const Float_t * strip = fGeometryEMCA->GetStripHalfSize() ;
637 const Float_t * covparams = fGeometryEMCA->GetAlCoverParams() ;
638 const Float_t * warmcov = fGeometryEMCA->GetWarmAlCoverHalfSize() ;
639 Float_t z = fGeometryCPV->GetCPVBoxSize(1) / 2. - warmcov[2] + covparams[3]-inthermo[1] ;
640 Double_t locTII[3]={0.,0.,z} ;
641 Double_t globTII[3] ;
642
643 TGeoHMatrix * mTII = new((*fMisalArray)[nr])TGeoHMatrix() ;
644 mTII->SetRotation(rotEMC) ;
645 mTII->MultiplyLeft(fPHOSMatrix[mod]) ;
646 fPHOSMatrix[mod]->LocalToMaster(locTII,globTII) ;
647 mTII->SetTranslation(globTII) ;
648 fEMCMatrix[mod]=mTII ;
649
650 //Now calculate ideal matrixes for strip misalignment.
651 //For the moment we can not store them in ESDHeader
652
653 Double_t loc[3]={0.,inthermo[1] - strip[1],0.} ;
654 Double_t glob[3] ;
655
656 Int_t istrip=0 ;
657 for(Int_t irow = 0; irow < fGeometryEMCA->GetNStripX(); irow ++){
658 loc[0] = (2*irow + 1 - fGeometryEMCA->GetNStripX())* strip[0] ;
659 for(Int_t icol = 0; icol < fGeometryEMCA->GetNStripZ(); icol ++){
660 loc[2] = (2*icol + 1 - fGeometryEMCA->GetNStripZ()) * strip[2] ;
661 fEMCMatrix[mod]->LocalToMaster(loc,glob) ;
662 TGeoHMatrix * mSTR = new((*fMisalArray)[nr])TGeoHMatrix(*(fEMCMatrix[mod])) ; //Use same rotation as PHOS module
663 mSTR->SetTranslation(glob) ;
664 fStripMatrix[mod][istrip]=mSTR ;
665 nr++ ;
666 istrip++;
667 }
668 }
669
670 //Now calculate CPV matrixes
671 const Float_t * emcParams = fGeometryEMCA->GetEMCParams() ;
672 Double_t globCPV[3] ;
673 Double_t locCPV[3]={0.,0.,- emcParams[3]} ;
674 Double_t rot[9]={1.,0.,0.,0.,0.,1.,0.,-1.,0.} ;
675
676 TGeoHMatrix * mCPV = new((*fMisalArray)[nr])TGeoHMatrix() ;
677 mCPV->SetRotation(rot) ;
678 mCPV->MultiplyLeft(fPHOSMatrix[mod]) ;
679 mCPV->ReflectY(kFALSE) ;
680 fPHOSMatrix[mod]->LocalToMaster(locCPV,globCPV) ;
681 mCPV->SetTranslation(globCPV) ;
682 fCPVMatrix[mod]=mCPV ;
683
684}
685