1 /**************************************************************************
2 * Copyright(c) 2007-2009, ALICE Experiment at CERN, All rights reserved. *
4 * Author: The ALICE Off-line Project. *
5 * Contributors are mentioned in the code where appropriate. *
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 **************************************************************************/
18 ///////////////////////////////////////////////////////////////////
20 // Implementation of the class for SDD preprocessing //
21 // Origin: E.Crescio, Torino, crescio@to.infn.it //
22 // F.Prino, Torino, prino@to.infn.it //
24 ///////////////////////////////////////////////////////////////////
26 #include "AliITSPreprocessorSDD.h"
27 #include "AliITSCalibrationSDD.h"
28 #include "AliITSDriftSpeedSDD.h"
29 #include "AliITSDriftSpeedArraySDD.h"
30 #include "AliITSDCSAnalyzerSDD.h"
31 #include "AliShuttleInterface.h"
32 #include "AliCDBEntry.h"
33 #include "AliCDBMetaData.h"
34 #include "TObjArray.h"
36 #include <TObjString.h>
40 const TString AliITSPreprocessorSDD::fgkNameHistoPedestals = "hpedestal";
41 const TString AliITSPreprocessorSDD::fgkNameHistoNoise = "hnoise";
42 ClassImp(AliITSPreprocessorSDD)
44 //______________________________________________________________________
45 AliITSPreprocessorSDD::AliITSPreprocessorSDD( AliShuttleInterface* shuttle):
46 AliPreprocessor("SDD", shuttle)
50 AddRunType("INJECTOR");
51 AddRunType("PHYSICS");
54 //______________________________________________________________________
55 UInt_t AliITSPreprocessorSDD::Process(TMap* dcsAliasMap){
57 gSystem->Sleep(30000);
59 // Get DDL map from OCDB
60 AliCDBEntry* entry = GetFromOCDB("Calib", "DDLMapSDD");
62 Log("DDL map file not found in OCDB.");
65 AliITSDDLModuleMapSDD* ddlmap = (AliITSDDLModuleMapSDD*)entry->GetObject();
67 Log("AliITSDDLModuleMapSDD object not in file.");
70 ddlmap->PrintDDLMap();
73 TString runType = GetRunType();
76 if (runType == "PULSER"){
77 Log("Process FXS files from PULSER RUN");
78 retcode=ProcessPulser(ddlmap);
79 }else if(runType== "INJECTOR"){
80 Log("Process FXS files from INJECTOR RUN");
81 retcode=ProcessInjector(ddlmap);
83 if(retcode!=0) return retcode;
85 Log("Process DCS data");
86 Bool_t retcodedcs =ProcessDCSDataPoints(dcsAliasMap);
87 if(retcodedcs) return 0;
91 //______________________________________________________________________
92 UInt_t AliITSPreprocessorSDD::ProcessPulser(AliITSDDLModuleMapSDD* ddlmap){
93 // Process FXS files from PULSER run (baseline, noise, gain)
94 // returns 0 in case of success,
95 // 1 in case of storage error,
96 // 2 in case of error with input files
97 TObjArray calSDD(kNumberOfSDD);
98 calSDD.SetOwner(kFALSE);
100 Float_t baseline,rawnoise,cmn,corn,gain;
101 Int_t isgoodan,i,im,is,isgoodmod,basmin,basoff;
103 Int_t numOfBadChannels[kNumberOfSDD];
105 TList* sourceList = GetFileSources(kDAQ, "SDD_Calib");
107 Log("Error: no sources found for SDD_Calib");
112 while (sourceList->At(ind)!=NULL) {
113 TObjString* tarId = (TObjString*) sourceList->At(ind);
114 TString tarName = GetFile(kDAQ, "SDD_Calib", tarId->GetString().Data());
115 if(tarName.Length()==0){
116 Log(Form("Baseline tar file from source %d not found.",ind));
120 command.Form("tar -xf %s",tarName.Data());
121 gSystem->Exec(command);
126 for(Int_t iddl=0;iddl<kNumberOfDDL;iddl++){
127 for(Int_t imod=0;imod<kModulesPerDDL;imod++){
128 Int_t modID=ddlmap->GetModuleNumber(iddl,imod);
129 if(modID==-1) continue;
130 modID-=240; // to have SDD modules numbering from 0 to 260
131 AliITSCalibrationSDD *cal = new AliITSCalibrationSDD("simulated");
132 cal->SetUseCorrectionMaps(0,0); // temporary disabling of maps
133 numOfBadChannels[modID]=0;
134 Int_t badch[kNumberOfChannels];
135 for(Int_t isid=0;isid<=1;isid++){
137 inpFileName.Form("./SDDbase_ddl%02dc%02d_sid%d.data",iddl,imod,isid);
139 FILE* basFil = fopen(inpFileName,"read");
141 Log(Form("File %s not found.",inpFileName.Data()));
145 fscanf(basFil,"%d %d %d\n",&im,&is,&isgoodmod);
146 if(!isgoodmod) cal->SetBad();
147 fscanf(basFil,"%d\n",&th);
148 fscanf(basFil,"%d\n",&tl);
149 cal->SetZSLowThreshold(isid,tl);
150 cal->SetZSHighThreshold(isid,th);
151 for(Int_t ian=0;ian<(kNumberOfChannels/2);ian++){
152 fscanf(basFil,"%d %d %f %d %d %f %f %f %f\n",&i,&isgoodan,&baseline,&basmin,&basoff,&rawnoise,&cmn,&corn,&gain);
154 if(isid==1) ich+=256;
156 Int_t ibad=numOfBadChannels[modID];
158 numOfBadChannels[modID]++;
160 cal->SetBaseline(ich,baseline-basoff);
161 cal->SetNoiseAfterElectronics(ich,rawnoise);
162 cal->SetGain(ich,gain);
164 cal->SetDeadChannels(numOfBadChannels[modID]);
165 for(Int_t ibad=0;ibad<numOfBadChannels[modID];ibad++){
166 cal->SetBadChannel(ibad,badch[ibad]);
170 Log(Form("Put calib obj for module %d (DDL %d Carlos %d)",modID,iddl,imod));
171 calSDD.AddAt(cal,modID);
174 AliCDBMetaData *md= new AliCDBMetaData();
175 md->SetResponsible("Francesco Prino");
176 md->SetBeamPeriod(0);
177 md->SetComment("AliITSCalibrationSDD from PEDESTAL+PULSER runs");
178 Bool_t retCode = Store("Calib","CalibSDD",&calSDD,md, 0, kTRUE);
179 if(retCode) return 0;
182 //______________________________________________________________________
183 UInt_t AliITSPreprocessorSDD::ProcessInjector(AliITSDDLModuleMapSDD* ddlmap){
184 // Process FXS files from injector events (INJECTOR or PHYSICS runs)
185 // returns 0 in case of success,
186 // 1 in case of storage error,
187 // 2 in case of error with input files
188 TObjArray vdrift(2*kNumberOfSDD);
189 vdrift.SetOwner(kFALSE);
192 Bool_t modSet[2*kNumberOfSDD]; // flag modules with good inj.
193 for(Int_t ihyb=0; ihyb<2*kNumberOfSDD; ihyb++) modSet[ihyb]=0;
196 Double_t param[4]; // parameters of poly fit
197 Double_t minValP0=4.; // min value for param[0]
198 Double_t maxValP0=9.; // max value for param[0]
199 Double_t minValP1=0.; // min value for param[1]
200 Double_t aveCoef[4]={0.,0.,0.,0.}; // average param for good mod.
201 Double_t defCoef[4]={6.53227,0.00128941,-5.14493e-06,0}; // default values for param
204 TList* sourceList = GetFileSources(kDAQ, "SDD_Injec");
206 Log("Error: no sources found for SDD_Injec");
210 while (sourceList->At(ind)!=NULL) {
211 TObjString* tarId = (TObjString*) sourceList->At(ind);
212 TString tarName = GetFile(kDAQ, "SDD_Injec", tarId->GetString().Data());
213 if(tarName.Length()==0){
214 Log(Form("Injector tar file from source %d not found.",ind));
218 command.Form("tar -xf %s",tarName.Data());
219 gSystem->Exec(command);
225 for(Int_t iddl=0;iddl<kNumberOfDDL;iddl++){
226 for(Int_t imod=0;imod<kModulesPerDDL;imod++){
227 Int_t modID=ddlmap->GetModuleNumber(iddl,imod);
228 if(modID==-1) continue;
229 modID-=240; // to have SDD modules numbering from 0 to 260
230 for(Int_t isid=0;isid<=1;isid++){
231 AliITSDriftSpeedArraySDD *arr=new AliITSDriftSpeedArraySDD();
233 inpFileName.Form("./SDDinj_ddl%02dc%02d_sid%d.data",iddl,imod,isid);
234 FILE* injFil = fopen(inpFileName,"read");
236 Log(Form("File %s not found.",inpFileName.Data()));
237 AliITSDriftSpeedSDD *dsp=new AliITSDriftSpeedSDD();
238 arr->AddDriftSpeed(dsp);
239 vdrift.AddAt(arr,2*modID+isid);
242 fscanf(injFil,"%d",&polDeg);
243 while (!feof(injFil)){
244 fscanf(injFil,"%d %d ",&evNumb,&timeStamp);
245 if(feof(injFil)) break;
246 for(Int_t ic=0;ic<4;ic++){
247 fscanf(injFil,"%f ",&auxP);
251 if(param[0]>minValP0 && param[0]<maxValP0 && param[1]>minValP1){
252 for(Int_t ic=0;ic<4;ic++) aveCoef[ic]+=param[ic];
254 AliITSDriftSpeedSDD *dsp=new AliITSDriftSpeedSDD(evNumb,timeStamp,polDeg,param);
255 arr->AddDriftSpeed(dsp);
256 modSet[2*modID+isid]=1;
259 Log(Form("Put calib obj for hybrid %d (DDL %d Carlos %d)",2*modID+isid,iddl,imod));
260 if(modSet[2*modID+isid]) vdrift.AddAt(arr,2*modID+isid);
265 // set drift speed for modules with bad injectors
266 for(Int_t ic=0;ic<4;ic++){
267 if(nPt>0) aveCoef[ic]/=nPt; // mean parameters
268 else aveCoef[ic]=defCoef[ic]; // default parameters
270 AliITSDriftSpeedSDD *avdsp=new AliITSDriftSpeedSDD(evNumb,timeStamp,polDeg,aveCoef);
272 for(Int_t ihyb=0; ihyb<2*kNumberOfSDD; ihyb++){
274 AliWarning(Form("No good injector events for mod. %d --> use average values",ihyb/2));
275 AliITSDriftSpeedArraySDD *arr=new AliITSDriftSpeedArraySDD();
276 arr->AddDriftSpeed(avdsp);
277 vdrift.AddAt(arr,ihyb);
282 AliCDBMetaData *md= new AliCDBMetaData();
283 md->SetResponsible("Francesco Prino");
284 md->SetBeamPeriod(0);
285 md->SetComment("AliITSDriftSpeedSDD from injector events");
286 Bool_t retCode = Store("Calib","DriftSpeedSDD",&vdrift,md,0, kTRUE);
287 if(retCode) return 0;
290 //______________________________________________________________________
291 Bool_t AliITSPreprocessorSDD::ProcessDCSDataPoints(TMap* dcsAliasMap){
293 AliITSDCSAnalyzerSDD *dcs=new AliITSDCSAnalyzerSDD();
294 dcs->AnalyzeData(dcsAliasMap);
295 TObjArray refDCS(kNumberOfSDD);
296 refDCS.SetOwner(kFALSE);
297 for(Int_t imod=0;imod<kNumberOfSDD;imod++){
298 AliITSDCSDataSDD *dcsdata=dcs->GetDCSData(imod);
301 AliCDBMetaData *md= new AliCDBMetaData();
302 md->SetResponsible("Francesco Prino");
303 md->SetBeamPeriod(0);
304 md->SetComment("AliITSDCSDataSDD objects from DCS DB");
305 Bool_t retCode = StoreReferenceData("DCS","DataSDD",&refDCS,md);