1 void MakeEMCALResMisAlignment(TString geoname = "EMCAL_COMPLETE12SMV1"){
2 // Create TClonesArray of residual misalignment objects for EMCAL
4 const char* macroname = "MakeEMCALResMisAlignment.C";
5 if(geoname=="")geoname=AliEMCALGeometry::GetDefaultGeometryName();
6 const AliEMCALGeometry *emcalGeom = AliEMCALGeometry::GetInstance(geoname,"");
8 Error("MakeEMCALResMisAlignment","Cannot obtain AliEMCALGeometry singleton\n");
12 TClonesArray *array = new TClonesArray("AliAlignObjParams",emcalGeom->GetNumberOfSuperModules());
13 TClonesArray &alobj = *array;
16 // Activate CDB storage and load geometry from CDB
17 AliCDBManager* cdb = AliCDBManager::Instance();
18 if(!cdb->IsDefaultStorageSet()) cdb->SetDefaultStorage("local://$ALICE_ROOT/OCDB");
21 AliCDBStorage* storage;
23 if( TString(gSystem->Getenv("TOCDB")) == TString("kTRUE") ){
24 TString Storage = gSystem->Getenv("STORAGE");
25 if(!Storage.BeginsWith("local://") && !Storage.BeginsWith("alien://")) {
26 Error(macroname,"STORAGE variable set to %s is not valid. Exiting\n",Storage.Data());
29 storage = cdb->GetStorage(Storage.Data());
31 Error(macroname,"Unable to open storage %s\n",Storage.Data());
34 AliCDBPath path("GRP","Geometry","Data");
35 AliCDBEntry *entry = storage->Get(path.GetPath(),cdb->GetRun());
36 if(!entry) Fatal(macroname,"Could not get the specified CDB entry!");
38 TGeoManager* geom = (TGeoManager*) entry->GetObject();
39 AliGeomManager::SetGeometry(geom);
41 AliGeomManager::LoadGeometry(); //load geom from default CDB storage
44 Double_t dx, dy, dz, dpsi, dtheta, dphi;
46 const TString basepath = "EMCAL/FullSupermodule";
47 const TString hbasepath = "EMCAL/HalfSupermodule";
50 Int_t iIndex=0; // let all modules have index=0 in a layer with no LUT
51 AliGeomManager::ELayerID iLayer = AliGeomManager::kInvalidLayer;
52 UShort_t volid = AliGeomManager::LayerToVolUID(iLayer,iIndex);
58 // sigma translation = 1mm
59 // sigma rotation = 0.1 degree
60 TRandom *rnd = new TRandom(4321);
61 Double_t sigmatr = 0.05; // max shift in cm w.r.t. local RS
62 Double_t sigmarot = 0.1; // max rot in degrees w.r.t. local RS
65 dx = rnd->Gaus(0.,sigmatr);
66 dy = rnd->Gaus(0.,sigmatr);
67 dz = rnd->Gaus(0.,sigmatr);
68 dpsi = rnd->Gaus(0.,sigmarot);
69 dtheta = rnd->Gaus(0.,sigmarot);
70 dphi = rnd->Gaus(0.,sigmarot);
73 new(alobj[j++]) AliAlignObjParams(pathstr, volid, dx, dy, dz, dpsi, dtheta, dphi, kFALSE);
77 dx = rnd->Gaus(0.,sigmatr);
78 dy = rnd->Gaus(0.,sigmatr);
79 dz = rnd->Gaus(0.,sigmatr);
80 dpsi = rnd->Gaus(0.,sigmarot);
81 dtheta = rnd->Gaus(0.,sigmarot);
82 dphi = rnd->Gaus(0.,sigmarot);
85 new(alobj[j++]) AliAlignObjParams(pathstr, volid, dx, dy, dz, dpsi, dtheta, dphi, kTRUE);
88 if( TString(gSystem->Getenv("TOCDB")) != TString("kTRUE") ){
90 const char* filename = "EMCALresidualMisalignment.root";
91 TFile f(filename,"RECREATE");
93 Error(macroname,"cannot open file for output\n");
96 Info(macroname,"Saving alignment objects to the file %s", filename);
98 f.WriteObject(array,"EMCALAlignObjs","kSingleKey");
101 // save in CDB storage
102 AliCDBMetaData* md = new AliCDBMetaData();
103 md->SetResponsible("Jennifer Klay");
104 md->SetComment("Residual misalignment for EMCAL, produced with sigmatr=0.05 and sigmarot=0.1 in the local RS");
105 md->SetAliRootVersion(gSystem->Getenv("ARVERSION"));
106 AliCDBId id("EMCAL/Align/Data",0,AliCDBRunRange::Infinity());
107 storage->Put(array,id,md);