//______________________________________________________________________
UInt_t AliITSPreprocessorSDD::Process(TMap* dcsAliasMap){
+
// Get DDL map from OCDB
AliCDBEntry* entry = GetFromOCDB("Calib", "DDLMapSDD");
if(!entry){
Log("AliITSDDLModuleMapSDD object not in file.");
return 2;
}
+ ddlmap->PrintDDLMap();
//preprocessing
TString runType = GetRunType();
- Bool_t retcode;
+ Int_t retcode=0;
if (runType == "PULSER"){
+ Log("Process FXS files from PULSER RUN");
retcode=ProcessPulser(ddlmap);
}else if(runType== "INJECTOR"){
+ Log("Process FXS files from INJECTOR RUN");
retcode=ProcessInjector(ddlmap);
- }else{
- // do nothing for other run types
- retcode=1;
}
- if(retcode){
- Bool_t retcodedcs =ProcessDCSDataPoints(dcsAliasMap);
- if(retcodedcs) return 0;
- }
- return 1;
+ if(retcode!=0) return retcode;
+
+ Log("Process DCS data");
+ Bool_t retcodedcs =ProcessDCSDataPoints(dcsAliasMap);
+ if(retcodedcs) return 0;
+ else return 1;
+
}
//______________________________________________________________________
-Bool_t AliITSPreprocessorSDD::ProcessPulser(AliITSDDLModuleMapSDD* ddlmap){
+UInt_t AliITSPreprocessorSDD::ProcessPulser(AliITSDDLModuleMapSDD* ddlmap){
// Process FXS files from PULSER run (baseline, noise, gain)
+ // returns 0 in case of success,
+ // 1 in case of storage error,
+ // 2 in case of error with input files
TObjArray calSDD(kNumberOfSDD);
calSDD.SetOwner(kFALSE);
- Char_t command[100];
- Char_t inpFileName[100];
+
Float_t baseline,rawnoise,cmn,corn,gain;
Int_t isgoodan,i,im,is,isgoodmod,basmin,basoff;
Int_t th,tl;
Log(Form("Baseline tar file from source %d not found.",ind));
return 2;
}
- sprintf(command,"tar -xf %s",tarName.Data());
+ TString command;
+ command.Form("tar -xf %s",tarName.Data());
gSystem->Exec(command);
ind++;
}
delete sourceList;
+ // Read ADC sampling frequency from fee.conf
+ Int_t amSamplFreq=40;
+ Int_t retfscf;
+ FILE* feefil=fopen("fee.conf","r");
+ if(feefil){
+ retfscf=fscanf(feefil,"%d \n",&amSamplFreq);
+ fclose(feefil);
+ Log(Form("AM sampling frequency = %d MHz",amSamplFreq));
+ }else{
+ Log("File fee.conf not found. AM sampling set at 40 MHz by default");
+ }
for(Int_t iddl=0;iddl<kNumberOfDDL;iddl++){
for(Int_t imod=0;imod<kModulesPerDDL;imod++){
if(modID==-1) continue;
modID-=240; // to have SDD modules numbering from 0 to 260
AliITSCalibrationSDD *cal = new AliITSCalibrationSDD("simulated");
+ if(amSamplFreq!=40) cal->SetAMAt20MHz();
numOfBadChannels[modID]=0;
Int_t badch[kNumberOfChannels];
+ Bool_t sid0ok=kTRUE;
+ Bool_t sid1ok=kTRUE;
for(Int_t isid=0;isid<=1;isid++){
- sprintf(inpFileName,"./SDDbase_ddl%02dc%02d_sid%d.data",iddl,imod,isid);
+ TString inpFileName;
+ inpFileName.Form("./SDDbase_ddl%02dc%02d_sid%d.data",iddl,imod,isid);
+
FILE* basFil = fopen(inpFileName,"read");
if (basFil == 0) {
- Log(Form("File %s not found.",inpFileName));
- cal->SetBad();
+ Log(Form("File %s not found.",inpFileName.Data()));
+ if(isid==0){
+ sid0ok=kFALSE;
+ for(Int_t iChip=0; iChip<4; iChip++) cal->SetChipBad(iChip);
+ cal->SetDeadChannels(cal->GetDeadChannels()+256);
+ for(Int_t iAnode=0; iAnode<256; iAnode++) cal->SetBadChannel(iAnode,iAnode);
+ }else{
+ sid1ok=kFALSE;
+ for(Int_t iChip=4; iChip<8; iChip++) cal->SetChipBad(iChip);
+ cal->SetDeadChannels(cal->GetDeadChannels()+256);
+ for(Int_t iAnode=0; iAnode<256; iAnode++) cal->SetBadChannel(iAnode,iAnode+256);
+ }
continue;
}
- fscanf(basFil,"%d %d %d\n",&im,&is,&isgoodmod);
- if(!isgoodmod) cal->SetBad();
- fscanf(basFil,"%d\n",&th);
- fscanf(basFil,"%d\n",&tl);
+
+ retfscf=fscanf(basFil,"%d %d %d\n",&im,&is,&isgoodmod);
+ if(!isgoodmod){
+ if(isid==0){
+ sid0ok=kFALSE;
+ for(Int_t iChip=0; iChip<4; iChip++) cal->SetChipBad(iChip);
+ }else{
+ sid1ok=kFALSE;
+ for(Int_t iChip=4; iChip<8; iChip++) cal->SetChipBad(iChip);
+ }
+ }
+ retfscf=fscanf(basFil,"%d\n",&th);
+ retfscf=fscanf(basFil,"%d\n",&tl);
cal->SetZSLowThreshold(isid,tl);
cal->SetZSHighThreshold(isid,th);
for(Int_t ian=0;ian<(kNumberOfChannels/2);ian++){
- fscanf(basFil,"%d %d %f %d %d %f %f %f %f\n",&i,&isgoodan,&baseline,&basmin,&basoff,&rawnoise,&cmn,&corn,&gain);
+ retfscf=fscanf(basFil,"%d %d %f %d %d %f %f %f %f\n",&i,&isgoodan,&baseline,&basmin,&basoff,&rawnoise,&cmn,&corn,&gain);
Int_t ich=ian;
if(isid==1) ich+=256;
if(!isgoodan){
}
fclose(basFil);
}
+ if(!sid0ok && !sid1ok) cal->SetBad();
+ Log(Form("Put calib obj for module %d (DDL %d Carlos %d)",modID,iddl,imod));
calSDD.AddAt(cal,modID);
}
}
md->SetBeamPeriod(0);
md->SetComment("AliITSCalibrationSDD from PEDESTAL+PULSER runs");
Bool_t retCode = Store("Calib","CalibSDD",&calSDD,md, 0, kTRUE);
- return retCode;
+ if(retCode) return 0;
+ else return 1;
}
//______________________________________________________________________
-Bool_t AliITSPreprocessorSDD::ProcessInjector(AliITSDDLModuleMapSDD* ddlmap){
+UInt_t AliITSPreprocessorSDD::ProcessInjector(AliITSDDLModuleMapSDD* ddlmap){
// Process FXS files from injector events (INJECTOR or PHYSICS runs)
+ // returns 0 in case of success,
+ // 1 in case of storage error,
+ // 2 in case of error with input files
TObjArray vdrift(2*kNumberOfSDD);
vdrift.SetOwner(kFALSE);
- Char_t command[100];
- Char_t inpFileName[100];
Int_t evNumb,polDeg;
- UInt_t timeStamp;
- Float_t param[4];
+ UInt_t timeStamp,statusInj;
+ Bool_t modSet[2*kNumberOfSDD]; // flag modules with good inj.
+ for(Int_t ihyb=0; ihyb<2*kNumberOfSDD; ihyb++) modSet[ihyb]=0;
+ Double_t nPtLay3 = 0;
+ Double_t nPtLay4 = 0;
+
+ Double_t param[4]; // parameters of poly fit
+ Double_t minValP0=5.; // min value for param[0]
+ Double_t maxValP0=8.; // max value for param[0]
+ Double_t minValP1=0.; // min value for param[1]
+ Double_t aveCoefLay3[4]={0.,0.,0.,0.}; // average param for good mod.
+ Double_t aveCoefLay4[4]={0.,0.,0.,0.}; // average param for good mod.
+ Double_t defCoef[4]={6.53227,0.00128941,-5.14493e-06,0}; // default values for param
+ Float_t auxP;
TList* sourceList = GetFileSources(kDAQ, "SDD_Injec");
if (!sourceList){
Log(Form("Injector tar file from source %d not found.",ind));
return 2;
}
- sprintf(command,"tar -xf %s",tarName.Data());
+ TString command;
+ command.Form("tar -xf %s",tarName.Data());
gSystem->Exec(command);
ind++;
}
delete sourceList;
-
+ Int_t retfscf;
+
for(Int_t iddl=0;iddl<kNumberOfDDL;iddl++){
for(Int_t imod=0;imod<kModulesPerDDL;imod++){
Int_t modID=ddlmap->GetModuleNumber(iddl,imod);
modID-=240; // to have SDD modules numbering from 0 to 260
for(Int_t isid=0;isid<=1;isid++){
AliITSDriftSpeedArraySDD *arr=new AliITSDriftSpeedArraySDD();
- sprintf(inpFileName,"./SDDinj_ddl%02dc%02d_sid%d.data",iddl,imod,isid);
+ TString inpFileName;
+ inpFileName.Form("./SDDinj_ddl%02dc%02d_sid%d.data",iddl,imod,isid);
FILE* injFil = fopen(inpFileName,"read");
if (injFil == 0) {
- Log(Form("File %s not found.",inpFileName));
- AliITSDriftSpeedSDD *dsp=new AliITSDriftSpeedSDD();
- arr->AddDriftSpeed(dsp);
- vdrift.AddAt(arr,2*modID+isid);
+ Log(Form("File %s not found.",inpFileName.Data()));
continue;
}
- fscanf(injFil,"%d",&polDeg);
+ retfscf=fscanf(injFil,"%d",&polDeg);
while (!feof(injFil)){
- fscanf(injFil,"%d %d",&evNumb,&timeStamp);
- if(feof(injFil)) break;
- for(Int_t ic=0;ic<4;ic++) fscanf(injFil,"%f",¶m[ic]);
- AliITSDriftSpeedSDD *dsp=new AliITSDriftSpeedSDD(evNumb,timeStamp,polDeg,param);
- arr->AddDriftSpeed(dsp);
+ retfscf=fscanf(injFil,"%d %u ",&evNumb,&timeStamp);
+ if(evNumb==-99){
+ statusInj=timeStamp;
+ arr->SetInjectorStatus(statusInj);
+ }else{
+ if(feof(injFil)) break;
+ for(Int_t ic=0;ic<4;ic++){
+ retfscf=fscanf(injFil,"%f ",&auxP);
+ param[ic]=auxP;
+ }
+
+ if(param[0]>minValP0 && param[0]<maxValP0 && param[1]>minValP1){
+ if(polDeg==3){
+ if(modID<kNumberOfSDDLay3){
+ for(Int_t ic=0;ic<4;ic++) aveCoefLay3[ic]+=param[ic];
+ nPtLay3++;
+ }else{
+ for(Int_t ic=0;ic<4;ic++) aveCoefLay4[ic]+=param[ic];
+ nPtLay4++;
+ }
+ }
+ AliITSDriftSpeedSDD *dsp=new AliITSDriftSpeedSDD(evNumb,timeStamp,polDeg,param);
+ arr->AddDriftSpeed(dsp);
+ modSet[2*modID+isid]=1;
+ }else{
+ 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]));
+ }
+ }
}
- vdrift.AddAt(arr,2*modID+isid);
+ fclose(injFil);
+ Log(Form("Put calib obj for hybrid %d (DDL %d Carlos %d)",2*modID+isid,iddl,imod));
+ if(modSet[2*modID+isid]) vdrift.AddAt(arr,2*modID+isid);
}
}
}
+
+ // set drift speed for modules with bad injectors
+ for(Int_t ic=0;ic<4;ic++){
+ if(nPtLay3>0) aveCoefLay3[ic]/=nPtLay3; // mean parameters
+ else aveCoefLay3[ic]=defCoef[ic]; // default parameters
+ if(nPtLay4>0) aveCoefLay4[ic]/=nPtLay4; // mean parameters
+ else aveCoefLay4[ic]=defCoef[ic]; // default parameters
+ }
+ AliITSDriftSpeedSDD *avdsp3=new AliITSDriftSpeedSDD(evNumb,timeStamp,polDeg,aveCoefLay3);
+ AliITSDriftSpeedSDD *avdsp4=new AliITSDriftSpeedSDD(evNumb,timeStamp,polDeg,aveCoefLay4);
+
+ for(Int_t ihyb=0; ihyb<2*kNumberOfSDDLay3; ihyb++){
+ if(modSet[ihyb]==0){
+ AliWarning(Form("No good injector events for mod. %d side %d --> use average values for layer 3",ihyb/2,ihyb%2));
+ AliITSDriftSpeedArraySDD *arr=new AliITSDriftSpeedArraySDD();
+ arr->AddDriftSpeed(avdsp3);
+ arr->SetInjectorStatus(0);
+ vdrift.AddAt(arr,ihyb);
+ }
+ }
+
+ for(Int_t ihyb=2*kNumberOfSDDLay3; ihyb<2*kNumberOfSDD; ihyb++){
+ if(modSet[ihyb]==0){
+ AliWarning(Form("No good injector events for mod. %d side %d --> use average values for layer 4",ihyb/2,ihyb%2));
+ AliITSDriftSpeedArraySDD *arr=new AliITSDriftSpeedArraySDD();
+ arr->AddDriftSpeed(avdsp4);
+ arr->SetInjectorStatus(0);
+ vdrift.AddAt(arr,ihyb);
+ }
+ }
+
AliCDBMetaData *md= new AliCDBMetaData();
md->SetResponsible("Francesco Prino");
md->SetBeamPeriod(0);
md->SetComment("AliITSDriftSpeedSDD from injector events");
Bool_t retCode = Store("Calib","DriftSpeedSDD",&vdrift,md,0, kTRUE);
- return retCode;
+ if(retCode) return 0;
+ else return 1;
}
//______________________________________________________________________
Bool_t AliITSPreprocessorSDD::ProcessDCSDataPoints(TMap* dcsAliasMap){
Bool_t retCode = StoreReferenceData("DCS","DataSDD",&refDCS,md);
return retCode;
}
+