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){
58 // Get DDL map from OCDB
59 AliCDBEntry* entry = GetFromOCDB("Calib", "DDLMapSDD");
61 Log("DDL map file not found in OCDB.");
64 AliITSDDLModuleMapSDD* ddlmap = (AliITSDDLModuleMapSDD*)entry->GetObject();
66 Log("AliITSDDLModuleMapSDD object not in file.");
69 ddlmap->PrintDDLMap();
72 TString runType = GetRunType();
75 if (runType == "PULSER"){
76 Log("Process FXS files from PULSER RUN");
77 retcode=ProcessPulser(ddlmap);
78 }else if(runType== "INJECTOR"){
79 Log("Process FXS files from INJECTOR RUN");
80 retcode=ProcessInjector(ddlmap);
82 if(retcode!=0) return retcode;
84 Log("Process DCS data");
85 Bool_t retcodedcs =ProcessDCSDataPoints(dcsAliasMap);
86 if(retcodedcs) return 0;
90 //______________________________________________________________________
91 UInt_t AliITSPreprocessorSDD::ProcessPulser(AliITSDDLModuleMapSDD* ddlmap){
92 // Process FXS files from PULSER run (baseline, noise, gain)
93 // returns 0 in case of success,
94 // 1 in case of storage error,
95 // 2 in case of error with input files
96 TObjArray calSDD(kNumberOfSDD);
97 calSDD.SetOwner(kFALSE);
99 Float_t baseline,rawnoise,cmn,corn,gain;
100 Int_t isgoodan,i,im,is,isgoodmod,basmin,basoff;
102 Int_t numOfBadChannels[kNumberOfSDD];
104 TList* sourceList = GetFileSources(kDAQ, "SDD_Calib");
106 Log("Error: no sources found for SDD_Calib");
111 while (sourceList->At(ind)!=NULL) {
112 TObjString* tarId = (TObjString*) sourceList->At(ind);
113 TString tarName = GetFile(kDAQ, "SDD_Calib", tarId->GetString().Data());
114 if(tarName.Length()==0){
115 Log(Form("Baseline tar file from source %d not found.",ind));
119 command.Form("tar -xf %s",tarName.Data());
120 gSystem->Exec(command);
124 // Read ADC sampling frequency from fee.conf
125 Int_t amSamplFreq=40;
127 FILE* feefil=fopen("fee.conf","r");
129 retfscf=fscanf(feefil,"%d \n",&amSamplFreq);
131 Log(Form("AM sampling frequency = %d MHz",amSamplFreq));
133 Log("File fee.conf not found. AM sampling set at 40 MHz by default");
136 for(Int_t iddl=0;iddl<kNumberOfDDL;iddl++){
137 for(Int_t imod=0;imod<kModulesPerDDL;imod++){
138 Int_t modID=ddlmap->GetModuleNumber(iddl,imod);
139 if(modID==-1) continue;
140 modID-=240; // to have SDD modules numbering from 0 to 260
141 AliITSCalibrationSDD *cal = new AliITSCalibrationSDD("simulated");
142 if(amSamplFreq!=40) cal->SetAMAt20MHz();
143 numOfBadChannels[modID]=0;
144 Int_t badch[kNumberOfChannels];
147 for(Int_t isid=0;isid<=1;isid++){
149 inpFileName.Form("./SDDbase_ddl%02dc%02d_sid%d.data",iddl,imod,isid);
151 FILE* basFil = fopen(inpFileName,"read");
153 Log(Form("File %s not found.",inpFileName.Data()));
156 for(Int_t iChip=0; iChip<4; iChip++) cal->SetChipBad(iChip);
157 cal->SetDeadChannels(cal->GetDeadChannels()+256);
158 for(Int_t iAnode=0; iAnode<256; iAnode++) cal->SetBadChannel(iAnode,iAnode);
161 for(Int_t iChip=4; iChip<8; iChip++) cal->SetChipBad(iChip);
162 cal->SetDeadChannels(cal->GetDeadChannels()+256);
163 for(Int_t iAnode=0; iAnode<256; iAnode++) cal->SetBadChannel(iAnode,iAnode+256);
168 retfscf=fscanf(basFil,"%d %d %d\n",&im,&is,&isgoodmod);
172 for(Int_t iChip=0; iChip<4; iChip++) cal->SetChipBad(iChip);
175 for(Int_t iChip=4; iChip<8; iChip++) cal->SetChipBad(iChip);
178 retfscf=fscanf(basFil,"%d\n",&th);
179 retfscf=fscanf(basFil,"%d\n",&tl);
180 cal->SetZSLowThreshold(isid,tl);
181 cal->SetZSHighThreshold(isid,th);
182 for(Int_t ian=0;ian<(kNumberOfChannels/2);ian++){
183 retfscf=fscanf(basFil,"%d %d %f %d %d %f %f %f %f\n",&i,&isgoodan,&baseline,&basmin,&basoff,&rawnoise,&cmn,&corn,&gain);
185 if(isid==1) ich+=256;
187 Int_t ibad=numOfBadChannels[modID];
189 numOfBadChannels[modID]++;
191 cal->SetBaseline(ich,baseline-basoff);
192 cal->SetNoiseAfterElectronics(ich,rawnoise);
193 cal->SetGain(ich,gain);
195 cal->SetDeadChannels(numOfBadChannels[modID]);
196 for(Int_t ibad=0;ibad<numOfBadChannels[modID];ibad++){
197 cal->SetBadChannel(ibad,badch[ibad]);
201 if(!sid0ok && !sid1ok) cal->SetBad();
202 Log(Form("Put calib obj for module %d (DDL %d Carlos %d)",modID,iddl,imod));
203 calSDD.AddAt(cal,modID);
206 AliCDBMetaData *md= new AliCDBMetaData();
207 md->SetResponsible("Francesco Prino");
208 md->SetBeamPeriod(0);
209 md->SetComment("AliITSCalibrationSDD from PEDESTAL+PULSER runs");
210 Bool_t retCode = Store("Calib","CalibSDD",&calSDD,md, 0, kTRUE);
211 if(retCode) return 0;
214 //______________________________________________________________________
215 UInt_t AliITSPreprocessorSDD::ProcessInjector(AliITSDDLModuleMapSDD* ddlmap){
216 // Process FXS files from injector events (INJECTOR or PHYSICS runs)
217 // returns 0 in case of success,
218 // 1 in case of storage error,
219 // 2 in case of error with input files
220 TObjArray vdrift(2*kNumberOfSDD);
221 vdrift.SetOwner(kFALSE);
223 UInt_t timeStamp,statusInj;
224 Bool_t modSet[2*kNumberOfSDD]; // flag modules with good inj.
225 for(Int_t ihyb=0; ihyb<2*kNumberOfSDD; ihyb++) modSet[ihyb]=0;
226 Double_t nPtLay3 = 0;
227 Double_t nPtLay4 = 0;
229 Double_t param[4]; // parameters of poly fit
230 Double_t minValP0=5.; // min value for param[0]
231 Double_t maxValP0=8.; // max value for param[0]
232 Double_t minValP1=0.; // min value for param[1]
233 Double_t aveCoefLay3[4]={0.,0.,0.,0.}; // average param for good mod.
234 Double_t aveCoefLay4[4]={0.,0.,0.,0.}; // average param for good mod.
235 Double_t defCoef[4]={6.53227,0.00128941,-5.14493e-06,0}; // default values for param
238 TList* sourceList = GetFileSources(kDAQ, "SDD_Injec");
240 Log("Error: no sources found for SDD_Injec");
244 while (sourceList->At(ind)!=NULL) {
245 TObjString* tarId = (TObjString*) sourceList->At(ind);
246 TString tarName = GetFile(kDAQ, "SDD_Injec", tarId->GetString().Data());
247 if(tarName.Length()==0){
248 Log(Form("Injector tar file from source %d not found.",ind));
252 command.Form("tar -xf %s",tarName.Data());
253 gSystem->Exec(command);
259 for(Int_t iddl=0;iddl<kNumberOfDDL;iddl++){
260 for(Int_t imod=0;imod<kModulesPerDDL;imod++){
261 Int_t modID=ddlmap->GetModuleNumber(iddl,imod);
262 if(modID==-1) continue;
263 modID-=240; // to have SDD modules numbering from 0 to 260
264 for(Int_t isid=0;isid<=1;isid++){
265 AliITSDriftSpeedArraySDD *arr=new AliITSDriftSpeedArraySDD();
267 inpFileName.Form("./SDDinj_ddl%02dc%02d_sid%d.data",iddl,imod,isid);
268 FILE* injFil = fopen(inpFileName,"read");
270 Log(Form("File %s not found.",inpFileName.Data()));
273 retfscf=fscanf(injFil,"%d",&polDeg);
274 while (!feof(injFil)){
275 retfscf=fscanf(injFil,"%d %u ",&evNumb,&timeStamp);
278 arr->SetInjectorStatus(statusInj);
280 if(feof(injFil)) break;
281 for(Int_t ic=0;ic<4;ic++){
282 retfscf=fscanf(injFil,"%f ",&auxP);
286 if(param[0]>minValP0 && param[0]<maxValP0 && param[1]>minValP1){
288 if(modID<kNumberOfSDDLay3){
289 for(Int_t ic=0;ic<4;ic++) aveCoefLay3[ic]+=param[ic];
292 for(Int_t ic=0;ic<4;ic++) aveCoefLay4[ic]+=param[ic];
296 AliITSDriftSpeedSDD *dsp=new AliITSDriftSpeedSDD(evNumb,timeStamp,polDeg,param);
297 arr->AddDriftSpeed(dsp);
298 modSet[2*modID+isid]=1;
300 Log(Form("Module %d side %d not accepted, degree=%d, params=%g %g %g %g",modID+240,isid,polDeg,param[0],param[1],param[2],param[3]));
305 Log(Form("Put calib obj for hybrid %d (DDL %d Carlos %d)",2*modID+isid,iddl,imod));
306 if(modSet[2*modID+isid]) vdrift.AddAt(arr,2*modID+isid);
311 // set drift speed for modules with bad injectors
312 for(Int_t ic=0;ic<4;ic++){
313 if(nPtLay3>0) aveCoefLay3[ic]/=nPtLay3; // mean parameters
314 else aveCoefLay3[ic]=defCoef[ic]; // default parameters
315 if(nPtLay4>0) aveCoefLay4[ic]/=nPtLay4; // mean parameters
316 else aveCoefLay4[ic]=defCoef[ic]; // default parameters
318 AliITSDriftSpeedSDD *avdsp3=new AliITSDriftSpeedSDD(evNumb,timeStamp,polDeg,aveCoefLay3);
319 AliITSDriftSpeedSDD *avdsp4=new AliITSDriftSpeedSDD(evNumb,timeStamp,polDeg,aveCoefLay4);
321 for(Int_t ihyb=0; ihyb<2*kNumberOfSDDLay3; ihyb++){
323 AliWarning(Form("No good injector events for mod. %d side %d --> use average values for layer 3",ihyb/2,ihyb%2));
324 AliITSDriftSpeedArraySDD *arr=new AliITSDriftSpeedArraySDD();
325 arr->AddDriftSpeed(avdsp3);
326 arr->SetInjectorStatus(0);
327 vdrift.AddAt(arr,ihyb);
331 for(Int_t ihyb=2*kNumberOfSDDLay3; ihyb<2*kNumberOfSDD; ihyb++){
333 AliWarning(Form("No good injector events for mod. %d side %d --> use average values for layer 4",ihyb/2,ihyb%2));
334 AliITSDriftSpeedArraySDD *arr=new AliITSDriftSpeedArraySDD();
335 arr->AddDriftSpeed(avdsp4);
336 arr->SetInjectorStatus(0);
337 vdrift.AddAt(arr,ihyb);
341 AliCDBMetaData *md= new AliCDBMetaData();
342 md->SetResponsible("Francesco Prino");
343 md->SetBeamPeriod(0);
344 md->SetComment("AliITSDriftSpeedSDD from injector events");
345 Bool_t retCode = Store("Calib","DriftSpeedSDD",&vdrift,md,0, kTRUE);
346 if(retCode) return 0;
349 //______________________________________________________________________
350 Bool_t AliITSPreprocessorSDD::ProcessDCSDataPoints(TMap* dcsAliasMap){
352 AliITSDCSAnalyzerSDD *dcs=new AliITSDCSAnalyzerSDD();
353 dcs->AnalyzeData(dcsAliasMap);
354 TObjArray refDCS(kNumberOfSDD);
355 refDCS.SetOwner(kFALSE);
356 for(Int_t imod=0;imod<kNumberOfSDD;imod++){
357 AliITSDCSDataSDD *dcsdata=dcs->GetDCSData(imod);
360 AliCDBMetaData *md= new AliCDBMetaData();
361 md->SetResponsible("Francesco Prino");
362 md->SetBeamPeriod(0);
363 md->SetComment("AliITSDCSDataSDD objects from DCS DB");
364 Bool_t retCode = StoreReferenceData("DCS","DataSDD",&refDCS,md);