fixed the tainted variables
[u/mrichter/AliRoot.git] / ITS / AliITSPreprocessorSDD.cxx
index 4d85965..4f1616a 100644 (file)
@@ -41,10 +41,20 @@ const TString AliITSPreprocessorSDD::fgkNameHistoPedestals = "hpedestal";
 const TString AliITSPreprocessorSDD::fgkNameHistoNoise = "hnoise";
 ClassImp(AliITSPreprocessorSDD)
 
+//______________________________________________________________________
+AliITSPreprocessorSDD::AliITSPreprocessorSDD( AliShuttleInterface* shuttle):
+    AliPreprocessor("SDD", shuttle)
+{
+  // constructor
+  AddRunType("PULSER");
+  AddRunType("INJECTOR");
+  AddRunType("PHYSICS"); 
+}
 
 //______________________________________________________________________
 UInt_t AliITSPreprocessorSDD::Process(TMap* dcsAliasMap){
 
+
   // Get DDL map from OCDB
   AliCDBEntry* entry = GetFromOCDB("Calib", "DDLMapSDD");
   if(!entry){
@@ -56,34 +66,39 @@ UInt_t AliITSPreprocessorSDD::Process(TMap* dcsAliasMap){
     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;
   Int_t numOfBadChannels[kNumberOfSDD];
   
   TList* sourceList = GetFileSources(kDAQ, "SDD_Calib");
@@ -100,11 +115,23 @@ Bool_t AliITSPreprocessorSDD::ProcessPulser(AliITSDDLModuleMapSDD* ddlmap){
       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++){
@@ -112,20 +139,48 @@ Bool_t AliITSPreprocessorSDD::ProcessPulser(AliITSDDLModuleMapSDD* ddlmap){
       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();
+
+       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){ 
@@ -133,7 +188,7 @@ Bool_t AliITSPreprocessorSDD::ProcessPulser(AliITSDDLModuleMapSDD* ddlmap){
            badch[ibad]=ich;
            numOfBadChannels[modID]++;
          }
-         cal->SetBaseline(ich,baseline);
+         cal->SetBaseline(ich,baseline-basoff);
          cal->SetNoiseAfterElectronics(ich,rawnoise);
          cal->SetGain(ich,gain);
        }
@@ -143,6 +198,8 @@ Bool_t AliITSPreprocessorSDD::ProcessPulser(AliITSDDLModuleMapSDD* ddlmap){
        }
        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);
     }
   }
@@ -151,18 +208,32 @@ Bool_t AliITSPreprocessorSDD::ProcessPulser(AliITSDDLModuleMapSDD* ddlmap){
   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){ 
@@ -177,12 +248,14 @@ Bool_t AliITSPreprocessorSDD::ProcessInjector(AliITSDDLModuleMapSDD* ddlmap){
       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);
@@ -190,33 +263,88 @@ Bool_t AliITSPreprocessorSDD::ProcessInjector(AliITSDDLModuleMapSDD* ddlmap){
       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",&param[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){
@@ -236,3 +364,4 @@ Bool_t AliITSPreprocessorSDD::ProcessDCSDataPoints(TMap* dcsAliasMap){
   Bool_t retCode = StoreReferenceData("DCS","DataSDD",&refDCS,md);
   return retCode;
 }
+