TString runType = GetRunType();
Log(Form(" AliHMPIDPreprocessor: RunType is %s",runType.Data()));
-
+ Bool_t statusNoise=kFALSE, statusDcs=kFALSE;
// start to check event type and procedures
Log("HMPID - Process in Preprocessor started");
} else {
Log("HMPID - Pedestal processing successful!!"); return kFALSE; // ok for pedestals
}
- } else if ( runType=="STANDALONE" || runType=="PHYSICS"){
- if (!ProcDcs(pMap)){
- Log("HMPID - ERROR - DCS processing failed!!"); return kTRUE; // error in DCS processing
- } else {
- Log("HMPID - DCS processing successful!!"); return kFALSE; // ok for DCS
- }
- } else {
+ }//CALIBRATION
+ else if ( runType=="STANDALONE" || runType=="PHYSICS"){
+ statusDcs=ProcDcs(pMap);
+ statusNoise=ProcNoiseMap();
+ if(!statusDcs || !statusNoise) { Log(Form("HMPID - ERROR - Noise Map(%d) and/or DCS(%d) processing failed!! (0=OK, 1=FAILED)",statusNoise,statusDcs)); return kTRUE; } // error in Noise Map or DCS processing
+ else { Log("HMPID - Noise Map and DCS processing successful!!"); return kFALSE;} // ok
+ }//STANDALONE or PHYSICS run
+ else {
Log("HMPID - Nothing to do with preprocessor for HMPID, bye!"); return kFALSE; // ok - nothing done
}
}//Process()
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+Bool_t AliHMPIDPreprocessor::ProcNoiseMap()
+{
+ //
+ // Goal: Process the Noise Map created by the HMP Physics DA to mask
+ // noisy channels from reconstruction and follow changes in accepatnce
+ // eg. DDL turn on/off after PEDESTAL run and between PHYSICS runs.
+ // Returns kFALSE on success
+
+ Bool_t stProcNoise=kFALSE;
+ TFile *fNoiseFile;
+ TH2F *hNoiseMap = 0x0;
+
+ TList *pNoiseSource=GetFileSources(kDAQ,"HmpPhysicsDaNoiseMap.root"); //get list of DAQ source names containing id "HmpPhysicsDaNoiseMap" --> defined in HMPIDphysda.cxx
+ if(!pNoiseSource) {Log(Form("ERROR: Retrieval of sources for noise map: HmpPhysicsDaNoiseMap.root is failed!")); return stProcNoise;}
+ if(!(TObjString*)pNoiseSource->At(0)) {Log(Form("ERROR: empty list received from DAQ Source!")); return stProcNoise;}
+
+ TString noiseFile = GetFile(kDAQ,Form("HmpPhysicsDaNoiseMap.root"),((TObjString*)pNoiseSource->At(0))->GetName());
+ if(noiseFile.Length()==0) {Log(Form("ERROR retrieving noise map file: HmpPhysicsDaNoiseMap.root")); return stProcNoise;}
+
+ fNoiseFile = TFile::Open(noiseFile.Data(),"read");
+ if(!fNoiseFile) {Log(Form("ERROR cannot open NoiseFile: %s!",noiseFile.Data())); return stProcNoise;}
+ hNoiseMap = (TH2F*) fNoiseFile->Get("hHmpNoiseMaps");
+
+ AliCDBMetaData metaDataHisto;
+ metaDataHisto.SetBeamPeriod(0);
+ metaDataHisto.SetResponsible("AliHMPIDPreprocessor");
+ metaDataHisto.SetComment("AliHMPIDPreprocessor stores the Noise Map object as Reference Data.");
+ AliInfo("Storing Reference Data");
+ stProcNoise = Store("Calib","NoiseMap",hNoiseMap,&metaDataHisto,0,kTRUE);
+ if(!stProcNoise) {
+ Log("HMPID - failure to store Noise Map data results in OCDB");
+ }
+ return stProcNoise;
+}//ProcNoiseMap
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Bool_t AliHMPIDPreprocessor::ProcDcs(TMap* pMap)
{
// Process: 1 (old). inlet and outlet C6F14 temperature, stores TObjArray of 21 TF1, where TF1 is Nmean=f(t), one per radiator
Double_t xP,yP;
- TF1 **pTin = new TF1*[21];
- TF1 **pTout = new TF1*[21];
+// TF1 **pTin = new TF1*[21];
+// TF1 **pTout = new TF1*[21];
+ TF1 *pTin[21];
+ TF1 *pTout[21];
// evaluate Environment Pressure
// evaluate High Voltage
- for(Int_t iSec=0;iSec<6;iSec++){
+ for(Int_t iSec=0;iSec<6;iSec++){
TObjArray *pHV=(TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_MP%i/HMP_MP%i_PW/HMP_MP%i_SEC%i/HMP_MP%i_SEC%i_HV.actual.vMon",iCh,iCh,iCh,iSec,iCh,iSec));
if(!pHV) {
AliWarning(Form(" No Data Points from HMP_MP%1i_SEC%1i_HV.actual.vMon!",iCh,iSec));
}
delete pGrHV;
} else {AliWarning(" No Data Points from HMP_MP0-6_SEC0-5_HV.actual.vMon!");return kFALSE;}
- }
-
+ }
// evaluate Qthre
arQthre.AddAt(new TF1(Form("HMP_QthreC%iS%i",iCh,iSec),
Form("3*10^(3.01e-3*HV%i_%i - 4.72)+170745848*exp(-(P%i+Penv)*0.0162012)",iCh,iSec,iCh),fStartTime,fEndTime),6*iCh+iSec);
+
+ //arQthre.AddAt(new TF1(Form("HMP_QthreC%iS%i",iCh,iSec),"100",fStartTime,fEndTime),6*iCh+iSec);
}
// evaluate Temperatures: in and out of the radiators
// T in
pTin[3*iCh+iRad] = new TF1(Form("Tin%i%i" ,iCh,iRad),"[0]+[1]*x",fStartTime,fEndTime);
pTout[3*iCh+iRad] = new TF1(Form("Tout%i%i",iCh,iRad),"[0]+[1]*x",fStartTime,fEndTime);
-
- TObjArray *pT1=(TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_MP%i/HMP_MP%i_LIQ_LOOP.actual.sensors.Rad%iIn_Temp",iCh,iCh,iRad));
+
+ //pTin[3*iCh+iRad] = new TF1(Form("Tin%i%i" ,iCh,iRad),"21",fStartTime,fEndTime);
+ //pTout[3*iCh+iRad] = new TF1(Form("Tout%i%i",iCh,iRad),"22",fStartTime,fEndTime);
+
+ TObjArray *pT1=(TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_MP%i/HMP_MP%i_LIQ_LOOP.actual.sensors.Rad%iIn_Temp",iCh,iCh,iRad));
if(!pT1) {
AliWarning(Form(" No Data Points from HMP_MP%1i_LIQ_LOOP.actual.sensors.Rad%1iIn_Temp!",iCh,iRad));
return kFALSE;
// Returns: kTRUE on success
Bool_t stPedStore=kFALSE;
+ Bool_t stDeadMaskedStore=kFALSE;
AliHMPIDDigit dig;
AliHMPIDRawStream rs;
Int_t nSigCut,r,d,a,hard; Float_t mean,sigma;
Int_t runNumber,ldcId,timeStamp,nEv,nDdlEv,nBadEv; Char_t tName[10];
Float_t nBadEvPer;
- TObjArray aDaqSig(7); aDaqSig.SetOwner(kTRUE); for(Int_t i=0;i<7;i++) aDaqSig.AddAt(new TMatrix(160,144),i); //TObjArray of 7 TMatrixF, m(padx,pady)=sigma
+ TObjArray aDaqSig(7); aDaqSig.SetOwner(kTRUE); for(Int_t i=0;i<7;i++) aDaqSig.AddAt(new TMatrix(160,144),i); //TObjArray of 7 TMatrixF, m(padx,pady)=sigma
+ TObjArray aDeadMasked(7); aDeadMasked.SetOwner(kTRUE); for(Int_t i=0;i<7;i++) aDeadMasked.AddAt(new TMatrix(160,144),i); //TObjArray of 7 TMatrixF, m(padx,pady)=pedestal
for(Int_t iddl=0;iddl<AliHMPIDRawStream::kNDDL;iddl++) //retrieve the files from LDCs independently the DDL<->LDC connection
{
if(!infile.is_open()) {Log("No pedestal file found for HMPID,bye!");continue;}
TMatrix *pM=(TMatrixF*)aDaqSig.At(iddl/2);
-
+ TMatrix *pDM=(TMatrixF*)aDeadMasked.At(iddl/2);
infile>>tName>>runNumber;Printf("Xcheck: reading run %i",runNumber);
infile>>tName>>ldcId;
infile>>tName>>timeStamp;
dig.SetPad(rs.GetPad(iddl,r,d,a));
dig.SetQ((Int_t)mean);
(*pM)(dig.PadChX(),dig.PadChY()) = sigma;
+ if( (mean == AliHMPIDParam::kPadMeanZeroCharge && sigma == AliHMPIDParam::kPadSigmaZeroCharge) ||
+ (mean == AliHMPIDParam::kPadMeanMasked && sigma == AliHMPIDParam::kPadSigmaMasked) )
+ {(*pDM)(dig.PadChX(),dig.PadChY()) = mean;}
}
}
infile.close();
Log(Form("Pedestal file for DDL %i read successfully",iddl));
+
+
}//LDCs reading entries
}//DDL
metaData.SetResponsible("AliHMPIDPreprocessor");
metaData.SetComment("HMPID processor fills TObjArrays.");
stPedStore = Store("Calib","DaqSig",&aDaqSig,&metaData,0,kTRUE);
-// stPedStore = Store("Calib","DaqSig",&aDaqSig,&metaData);
- if(!stPedStore) {
- Log("HMPID - failure to store PEDESTAL data results in OCDB");
- }
- return stPedStore;
+ if(!stPedStore) { Log("HMPID - failure to store PEDESTAL data results in OCDB"); }
+ stDeadMaskedStore = Store("Calib","Masked",&aDeadMasked,&metaData,0,kTRUE);
+ if(!stDeadMaskedStore) { Log("HMPID - failure to store DEAD & MASKED channel map in OCDB"); }
+ Bool_t pedRes=stPedStore*stDeadMaskedStore;
+ return pedRes;
}//ProcPed()
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
pVal=(AliDCSValue*)pWaveLenght->At(0);
Double_t lambda = pVal->GetFloat();
+ if(lambda<150. || lambda>230.){
+ AliWarning(Form("Wrong value for HMP_DET/HMP_INFR/HMP_INFR_TRANPLANT/HMP_INFR_TRANPLANT_MEASURE.mesure%i.waveLenght -----> Default E mean used!!!!!",i));
+ return DefaultEMean(); // to be checked
+ }
+
Double_t photEn = 1239.842609/lambda; // 1239.842609 from nm to eV
if(photEn<AliHMPIDParam::EPhotMin() || photEn>AliHMPIDParam::EPhotMax()) continue;
// evaluate 15 mm of thickness C6F14 Trans
Double_t aTransRad;
+ Double_t aConvFactor = 1.0 - 0.3/1.8;
+
if(aRefFreon*aRefArgon>0) {
- aTransRad = TMath::Power((aCellFreon/aRefFreon)/(aCellArgon/aRefArgon)*aCorrFactor,1.5);
+ aTransRad = TMath::Power((aCellFreon/aRefFreon)/(aCellArgon/aRefArgon)*aCorrFactor,aConvFactor);
} else {
return DefaultEMean();
}
git://git.uio.no / u / mrichter / AliRoot.git / blobdiff