[u/mrichter/AliRoot.git] / ITS / AliITSPreprocessorSDD.cxx

/**************************************************************************
 * Copyright(c) 2007-2009, ALICE Experiment at CERN, All rights reserved. *
 *                                                                        *
 * Author: The ALICE Off-line Project.                                    *
 * Contributors are mentioned in the code where appropriate.              *
 *                                                                        *
 * Permission to use, copy, modify and distribute this software and its   *
 * documentation strictly for non-commercial purposes is hereby granted   *
 * without fee, provided that the above copyright notice appears in all   *
 * copies and that both the copyright notice and this permission notice   *
 * appear in the supporting documentation. The authors make no claims     *
 * about the suitability of this software for any purpose. It is          *
 * provided "as is" without express or implied warranty.                  *
 **************************************************************************/

/* $Id$ */

///////////////////////////////////////////////////////////////////
//                                                               //
// Implementation of the class for SDD preprocessing             //
// Origin: E.Crescio, Torino, crescio@to.infn.it                 //
//         F.Prino, Torino, prino@to.infn.it                     //
//                                                               //
///////////////////////////////////////////////////////////////////

#include "AliITSPreprocessorSDD.h"
#include "AliITSCalibrationSDD.h"
#include "AliITSDriftSpeedSDD.h"
#include "AliITSDriftSpeedArraySDD.h"
#include "AliITSDCSAnalyzerSDD.h"
#include "AliShuttleInterface.h"
#include "AliCDBEntry.h"
#include "AliCDBMetaData.h"
#include "TObjArray.h"
#include "AliLog.h"
#include <TObjString.h>
#include <TSystem.h>
#include <TList.h>

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){
    Log("DDL map file not found in OCDB.");  
    return 2;
  }
  AliITSDDLModuleMapSDD* ddlmap = (AliITSDDLModuleMapSDD*)entry->GetObject();
  if(!ddlmap){ 
    Log("AliITSDDLModuleMapSDD object not in file.");
    return 2;
  }
  ddlmap->PrintDDLMap();

  //preprocessing
  TString runType = GetRunType();
  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);
  }
  if(retcode!=0) return retcode;

  Log("Process DCS data");
  Bool_t retcodedcs =ProcessDCSDataPoints(dcsAliasMap);
  if(retcodedcs) return 0; 
  else return 1;           

}
//______________________________________________________________________
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);

  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");
  if (!sourceList){ 
    Log("Error: no sources found for SDD_Calib");
    return 2;
  }

  Int_t ind = 0;
  while (sourceList->At(ind)!=NULL) {
    TObjString* tarId = (TObjString*) sourceList->At(ind);
    TString tarName = GetFile(kDAQ, "SDD_Calib", tarId->GetString().Data());
    if(tarName.Length()==0){
      Log(Form("Baseline tar file from source %d not found.",ind));
      return 2;
    }
    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++){
      Int_t modID=ddlmap->GetModuleNumber(iddl,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++){
	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.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;
	}

	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++){
	  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){ 
	    Int_t ibad=numOfBadChannels[modID];
	    badch[ibad]=ich;
	    numOfBadChannels[modID]++;
	  }
	  cal->SetBaseline(ich,baseline-basoff);
	  cal->SetNoiseAfterElectronics(ich,rawnoise);
	  cal->SetGain(ich,gain);
	}
	cal->SetDeadChannels(numOfBadChannels[modID]);
	for(Int_t ibad=0;ibad<numOfBadChannels[modID];ibad++){
	  cal->SetBadChannel(ibad,badch[ibad]);
	}
	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);
    }
  }
  AliCDBMetaData *md= new AliCDBMetaData();
  md->SetResponsible("Francesco Prino");
  md->SetBeamPeriod(0);
  md->SetComment("AliITSCalibrationSDD from PEDESTAL+PULSER runs");
  Bool_t retCode = Store("Calib","CalibSDD",&calSDD,md, 0, kTRUE);
  if(retCode) return 0;
  else return 1;
}
//______________________________________________________________________
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);
  Int_t evNumb,polDeg; 
  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("Error: no sources found for SDD_Injec");
    return 2;
  }
  Int_t ind = 0;
  while (sourceList->At(ind)!=NULL) {
    TObjString* tarId = (TObjString*) sourceList->At(ind);
    TString tarName = GetFile(kDAQ, "SDD_Injec", tarId->GetString().Data());
    if(tarName.Length()==0){
      Log(Form("Injector tar file from source %d not found.",ind));
      return 2;
    }
    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);
      if(modID==-1) continue;
      modID-=240; // to have SDD modules numbering from 0 to 260
      for(Int_t isid=0;isid<=1;isid++){
	AliITSDriftSpeedArraySDD *arr=new AliITSDriftSpeedArraySDD();
	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.Data()));
	  continue;
	}
	retfscf=fscanf(injFil,"%d",&polDeg);
	while (!feof(injFil)){
	  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(polDeg>=0 && polDeg<=AliITSDriftSpeedSDD::GetMaxPolDeg() && 
	       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]));
	    }
	  }
	}
	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,3,aveCoefLay3);
  AliITSDriftSpeedSDD *avdsp4=new AliITSDriftSpeedSDD(evNumb,timeStamp,3,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);
  if(retCode) return 0;
  else return 1;
}
//______________________________________________________________________
Bool_t AliITSPreprocessorSDD::ProcessDCSDataPoints(TMap* dcsAliasMap){
  // Process DCS data
  AliITSDCSAnalyzerSDD *dcs=new AliITSDCSAnalyzerSDD();
  dcs->AnalyzeData(dcsAliasMap);
  TObjArray refDCS(kNumberOfSDD);
  refDCS.SetOwner(kFALSE);
  for(Int_t imod=0;imod<kNumberOfSDD;imod++){
    AliITSDCSDataSDD *dcsdata=dcs->GetDCSData(imod);
    refDCS.Add(dcsdata);
  }    
  AliCDBMetaData *md= new AliCDBMetaData();
  md->SetResponsible("Francesco Prino");
  md->SetBeamPeriod(0);
  md->SetComment("AliITSDCSDataSDD objects from DCS DB");
  Bool_t retCode = StoreReferenceData("DCS","DataSDD",&refDCS,md);
  return retCode;
}
Commit	Line	Data
	1	/**************************************************************************
	2	* Copyright(c) 2007-2009, ALICE Experiment at CERN, All rights reserved. *
	3	* *
	4	* Author: The ALICE Off-line Project. *
	5	* Contributors are mentioned in the code where appropriate. *
	6	* *
	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	**************************************************************************/
	15
	16	/* $Id$ */
	17
	18	///////////////////////////////////////////////////////////////////
	19	// //
	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 //
	23	// //
	24	///////////////////////////////////////////////////////////////////
	25
	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"
	35	#include "AliLog.h"
	36	#include <TObjString.h>
	37	#include <TSystem.h>
	38	#include <TList.h>
	39
	40	const TString AliITSPreprocessorSDD::fgkNameHistoPedestals = "hpedestal";
	41	const TString AliITSPreprocessorSDD::fgkNameHistoNoise = "hnoise";
	42	ClassImp(AliITSPreprocessorSDD)
	43
	44	//______________________________________________________________________
	45	AliITSPreprocessorSDD::AliITSPreprocessorSDD( AliShuttleInterface* shuttle):
	46	AliPreprocessor("SDD", shuttle)
	47	{
	48	// constructor
	49	AddRunType("PULSER");
	50	AddRunType("INJECTOR");
	51	AddRunType("PHYSICS");
	52	}
	53
	54	//______________________________________________________________________
	55	UInt_t AliITSPreprocessorSDD::Process(TMap* dcsAliasMap){
	56
	57
	58	// Get DDL map from OCDB
	59	AliCDBEntry* entry = GetFromOCDB("Calib", "DDLMapSDD");
	60	if(!entry){
	61	Log("DDL map file not found in OCDB.");
	62	return 2;
	63	}
	64	AliITSDDLModuleMapSDD* ddlmap = (AliITSDDLModuleMapSDD*)entry->GetObject();
	65	if(!ddlmap){
	66	Log("AliITSDDLModuleMapSDD object not in file.");
	67	return 2;
	68	}
	69	ddlmap->PrintDDLMap();
	70
	71	//preprocessing
	72	TString runType = GetRunType();
	73	Int_t retcode=0;
	74
	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);
	81	}
	82	if(retcode!=0) return retcode;
	83
	84	Log("Process DCS data");
	85	Bool_t retcodedcs =ProcessDCSDataPoints(dcsAliasMap);
	86	if(retcodedcs) return 0;
	87	else return 1;
	88
	89	}
	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);
	98
	99	Float_t baseline,rawnoise,cmn,corn,gain;
	100	Int_t isgoodan,i,im,is,isgoodmod,basmin,basoff;
	101	Int_t th,tl;
	102	Int_t numOfBadChannels[kNumberOfSDD];
	103
	104	TList* sourceList = GetFileSources(kDAQ, "SDD_Calib");
	105	if (!sourceList){
	106	Log("Error: no sources found for SDD_Calib");
	107	return 2;
	108	}
	109
	110	Int_t ind = 0;
	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));
	116	return 2;
	117	}
	118	TString command;
	119	command.Form("tar -xf %s",tarName.Data());
	120	gSystem->Exec(command);
	121	ind++;
	122	}
	123	delete sourceList;
	124	// Read ADC sampling frequency from fee.conf
	125	Int_t amSamplFreq=40;
	126	Int_t retfscf;
	127	FILE* feefil=fopen("fee.conf","r");
	128	if(feefil){
	129	retfscf=fscanf(feefil,"%d \n",&amSamplFreq);
	130	fclose(feefil);
	131	Log(Form("AM sampling frequency = %d MHz",amSamplFreq));
	132	}else{
	133	Log("File fee.conf not found. AM sampling set at 40 MHz by default");
	134	}
	135
	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];
	145	Bool_t sid0ok=kTRUE;
	146	Bool_t sid1ok=kTRUE;
	147	for(Int_t isid=0;isid<=1;isid++){
	148	TString inpFileName;
	149	inpFileName.Form("./SDDbase_ddl%02dc%02d_sid%d.data",iddl,imod,isid);
	150
	151	FILE* basFil = fopen(inpFileName,"read");
	152	if (basFil == 0) {
	153	Log(Form("File %s not found.",inpFileName.Data()));
	154	if(isid==0){
	155	sid0ok=kFALSE;
	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);
	159	}else{
	160	sid1ok=kFALSE;
	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);
	164	}
	165	continue;
	166	}
	167
	168	retfscf=fscanf(basFil,"%d %d %d\n",&im,&is,&isgoodmod);
	169	if(!isgoodmod){
	170	if(isid==0){
	171	sid0ok=kFALSE;
	172	for(Int_t iChip=0; iChip<4; iChip++) cal->SetChipBad(iChip);
	173	}else{
	174	sid1ok=kFALSE;
	175	for(Int_t iChip=4; iChip<8; iChip++) cal->SetChipBad(iChip);
	176	}
	177	}
	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);
	184	Int_t ich=ian;
	185	if(isid==1) ich+=256;
	186	if(!isgoodan){
	187	Int_t ibad=numOfBadChannels[modID];
	188	badch[ibad]=ich;
	189	numOfBadChannels[modID]++;
	190	}
	191	cal->SetBaseline(ich,baseline-basoff);
	192	cal->SetNoiseAfterElectronics(ich,rawnoise);
	193	cal->SetGain(ich,gain);
	194	}
	195	cal->SetDeadChannels(numOfBadChannels[modID]);
	196	for(Int_t ibad=0;ibad<numOfBadChannels[modID];ibad++){
	197	cal->SetBadChannel(ibad,badch[ibad]);
	198	}
	199	fclose(basFil);
	200	}
	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);
	204	}
	205	}
	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;
	212	else return 1;
	213	}
	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);
	222	Int_t evNumb,polDeg;
	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;
	228
	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
	236	Float_t auxP;
	237
	238	TList* sourceList = GetFileSources(kDAQ, "SDD_Injec");
	239	if (!sourceList){
	240	Log("Error: no sources found for SDD_Injec");
	241	return 2;
	242	}
	243	Int_t ind = 0;
	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));
	249	return 2;
	250	}
	251	TString command;
	252	command.Form("tar -xf %s",tarName.Data());
	253	gSystem->Exec(command);
	254	ind++;
	255	}
	256	delete sourceList;
	257	Int_t retfscf;
	258
	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();
	266	TString inpFileName;
	267	inpFileName.Form("./SDDinj_ddl%02dc%02d_sid%d.data",iddl,imod,isid);
	268	FILE* injFil = fopen(inpFileName,"read");
	269	if (injFil == 0) {
	270	Log(Form("File %s not found.",inpFileName.Data()));
	271	continue;
	272	}
	273	retfscf=fscanf(injFil,"%d",&polDeg);
	274	while (!feof(injFil)){
	275	retfscf=fscanf(injFil,"%d %u ",&evNumb,&timeStamp);
	276	if(evNumb==-99){
	277	statusInj=timeStamp;
	278	arr->SetInjectorStatus(statusInj);
	279	}else{
	280	if(feof(injFil)) break;
	281	for(Int_t ic=0;ic<4;ic++){
	282	retfscf=fscanf(injFil,"%f ",&auxP);
	283	param[ic]=auxP;
	284	}
	285
	286	if(polDeg>=0 && polDeg<=AliITSDriftSpeedSDD::GetMaxPolDeg() &&
	287	param[0]>minValP0 && param[0]<maxValP0 && param[1]>minValP1){
	288	if(polDeg==3){
	289	if(modID<kNumberOfSDDLay3){
	290	for(Int_t ic=0;ic<4;ic++) aveCoefLay3[ic]+=param[ic];
	291	nPtLay3++;
	292	}else{
	293	for(Int_t ic=0;ic<4;ic++) aveCoefLay4[ic]+=param[ic];
	294	nPtLay4++;
	295	}
	296	}
	297	AliITSDriftSpeedSDD *dsp=new AliITSDriftSpeedSDD(evNumb,timeStamp,polDeg,param);
	298	arr->AddDriftSpeed(dsp);
	299	modSet[2*modID+isid]=1;
	300	}else{
	301	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]));
	302	}
	303	}
	304	}
	305	fclose(injFil);
	306	Log(Form("Put calib obj for hybrid %d (DDL %d Carlos %d)",2*modID+isid,iddl,imod));
	307	if(modSet[2modID+isid]) vdrift.AddAt(arr,2modID+isid);
	308	}
	309	}
	310	}
	311
	312	// set drift speed for modules with bad injectors
	313	for(Int_t ic=0;ic<4;ic++){
	314	if(nPtLay3>0) aveCoefLay3[ic]/=nPtLay3; // mean parameters
	315	else aveCoefLay3[ic]=defCoef[ic]; // default parameters
	316	if(nPtLay4>0) aveCoefLay4[ic]/=nPtLay4; // mean parameters
	317	else aveCoefLay4[ic]=defCoef[ic]; // default parameters
	318	}
	319	AliITSDriftSpeedSDD *avdsp3=new AliITSDriftSpeedSDD(evNumb,timeStamp,3,aveCoefLay3);
	320	AliITSDriftSpeedSDD *avdsp4=new AliITSDriftSpeedSDD(evNumb,timeStamp,3,aveCoefLay4);
	321
	322	for(Int_t ihyb=0; ihyb<2*kNumberOfSDDLay3; ihyb++){
	323	if(modSet[ihyb]==0){
	324	AliWarning(Form("No good injector events for mod. %d side %d --> use average values for layer 3",ihyb/2,ihyb%2));
	325	AliITSDriftSpeedArraySDD *arr=new AliITSDriftSpeedArraySDD();
	326	arr->AddDriftSpeed(avdsp3);
	327	arr->SetInjectorStatus(0);
	328	vdrift.AddAt(arr,ihyb);
	329	}
	330	}
	331
	332	for(Int_t ihyb=2kNumberOfSDDLay3; ihyb<2kNumberOfSDD; ihyb++){
	333	if(modSet[ihyb]==0){
	334	AliWarning(Form("No good injector events for mod. %d side %d --> use average values for layer 4",ihyb/2,ihyb%2));
	335	AliITSDriftSpeedArraySDD *arr=new AliITSDriftSpeedArraySDD();
	336	arr->AddDriftSpeed(avdsp4);
	337	arr->SetInjectorStatus(0);
	338	vdrift.AddAt(arr,ihyb);
	339	}
	340	}
	341
	342	AliCDBMetaData *md= new AliCDBMetaData();
	343	md->SetResponsible("Francesco Prino");
	344	md->SetBeamPeriod(0);
	345	md->SetComment("AliITSDriftSpeedSDD from injector events");
	346	Bool_t retCode = Store("Calib","DriftSpeedSDD",&vdrift,md,0, kTRUE);
	347	if(retCode) return 0;
	348	else return 1;
	349	}
	350	//______________________________________________________________________
	351	Bool_t AliITSPreprocessorSDD::ProcessDCSDataPoints(TMap* dcsAliasMap){
	352	// Process DCS data
	353	AliITSDCSAnalyzerSDD *dcs=new AliITSDCSAnalyzerSDD();
	354	dcs->AnalyzeData(dcsAliasMap);
	355	TObjArray refDCS(kNumberOfSDD);
	356	refDCS.SetOwner(kFALSE);
	357	for(Int_t imod=0;imod<kNumberOfSDD;imod++){
	358	AliITSDCSDataSDD *dcsdata=dcs->GetDCSData(imod);
	359	refDCS.Add(dcsdata);
	360	}
	361	AliCDBMetaData *md= new AliCDBMetaData();
	362	md->SetResponsible("Francesco Prino");
	363	md->SetBeamPeriod(0);
	364	md->SetComment("AliITSDCSDataSDD objects from DCS DB");
	365	Bool_t retCode = StoreReferenceData("DCS","DataSDD",&refDCS,md);
	366	return retCode;
	367	}
	368