1 /**************************************************************************
2 * Copyright(c) 2007, 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 **************************************************************************/
17 #include "AliTPCPreprocessor.h"
18 #include "AliShuttleInterface.h"
20 #include "AliCDBMetaData.h"
21 #include "AliDCSValue.h"
23 #include "AliTPCSensorTempArray.h"
24 #include "AliTPCROC.h"
25 #include "AliTPCCalROC.h"
26 #include "AliTPCCalPad.h"
27 #include "AliTPCCalibPedestal.h"
28 #include "AliTPCCalibPulser.h"
29 #include "AliTPCCalibCE.h"
34 #include "TParameter.h"
36 #include <TTimeStamp.h>
38 const Int_t kValCutTemp = 100; // discard temperatures > 100 degrees
39 const Int_t kDiffCutTemp = 5; // discard temperature differences > 5 degrees
40 const TString kPedestalRunType = "PEDESTAL"; // pedestal run identifier
41 const TString kPulserRunType = "PULSER"; // pulser run identifier
42 const TString kPhysicsRunType = "PHYSICS"; // physics run identifier
43 const TString kStandAloneRunType = "STANDALONE"; // standalone run identifier
44 const TString kCosmicRunType = "COSMIC"; // cosmic run identifier
45 const TString kLaserRunType = "LASER"; // laser run identifier
46 const TString kDaqRunType = "DAQ"; // DAQ run identifier
47 const TString kAmandaTemp = "TPC_PT_%d_TEMPERATURE"; // Amanda string for temperature entries
48 //const Double_t kFitFraction = 0.7; // Fraction of DCS sensor fits required
49 const Double_t kFitFraction = -1.0; // Don't require minimum number of fits in commissioning run
52 // This class is the SHUTTLE preprocessor for the TPC detector.
55 ClassImp(AliTPCPreprocessor)
57 //______________________________________________________________________________________________
58 AliTPCPreprocessor::AliTPCPreprocessor(AliShuttleInterface* shuttle) :
59 AliPreprocessor("TPC",shuttle),
60 fConfEnv(0), fTemp(0), fHighVoltage(0), fConfigOK(kTRUE), fROC(0)
63 fROC = AliTPCROC::Instance();
65 //______________________________________________________________________________________________
66 AliTPCPreprocessor::AliTPCPreprocessor(const AliTPCPreprocessor& ) :
67 AliPreprocessor("TPC",0),
68 fConfEnv(0), fTemp(0), fHighVoltage(0), fConfigOK(kTRUE), fROC(0)
71 Fatal("AliTPCPreprocessor", "copy constructor not implemented");
73 // // fTemp = new AliTPCSensorTempArray(*(org.fTemp));
76 //______________________________________________________________________________________________
77 AliTPCPreprocessor::~AliTPCPreprocessor()
84 //______________________________________________________________________________________________
85 AliTPCPreprocessor& AliTPCPreprocessor::operator = (const AliTPCPreprocessor& )
87 Fatal("operator =", "assignment operator not implemented");
92 //______________________________________________________________________________________________
93 void AliTPCPreprocessor::Initialize(Int_t run, UInt_t startTime,
96 // Creates AliTestDataDCS object -- start maps half an hour beforre actual run start
98 UInt_t startTimeLocal = startTime-1800;
100 AliPreprocessor::Initialize(run, startTimeLocal, endTime);
102 AliInfo(Form("\n\tRun %d \n\tStartTime %s \n\tEndTime %s", run,
103 TTimeStamp((time_t)startTime,0).AsString(),
104 TTimeStamp((time_t)endTime,0).AsString()));
106 // Preprocessor configuration
108 AliCDBEntry* entry = GetFromOCDB("Config", "Preprocessor");
109 if (entry) fConfEnv = (TEnv*) entry->GetObject();
111 Log("AliTPCPreprocsessor: Preprocessor Config OCDB entry missing.\n");
116 // Temperature sensors
120 TString tempConf = fConfEnv->GetValue("Temperature","ON");
122 if (tempConf != "OFF" ) {
123 entry = GetFromOCDB("Config", "Temperature");
124 if (entry) confTree = (TTree*) entry->GetObject();
126 Log("AliTPCPreprocsessor: Temperature Config OCDB entry missing.\n");
130 fTemp = new AliTPCSensorTempArray(startTimeLocal, fEndTime, confTree, kAmandaTemp);
131 fTemp->SetValCut(kValCutTemp);
132 fTemp->SetDiffCut(kDiffCutTemp);
135 // High voltage measurements
137 TString hvConf = fConfEnv->GetValue("HighVoltage","ON");
139 if (hvConf != "OFF" ) {
142 entry = GetFromOCDB("Config", "HighVoltage");
143 if (entry) confTree = (TTree*) entry->GetObject();
145 Log("AliTPCPreprocsessor: High Voltage Config OCDB entry missing.\n");
149 fHighVoltage = new AliDCSSensorArray(startTimeLocal, fEndTime, confTree);
153 //______________________________________________________________________________________________
154 UInt_t AliTPCPreprocessor::Process(TMap* dcsAliasMap)
156 // Fills data into TPC calibrations objects
158 // Amanda servers provide information directly through dcsAliasMap
161 if (!fConfigOK) return 9;
163 TObjArray *resultArray = new TObjArray();
164 TString errorHandling = fConfEnv->GetValue("ErrorHandling","ON");
165 errorHandling.ToUpper();
169 if (errorHandling == "OFF" ) {
170 if (!dcsAliasMap) dcsResult=1;
171 if (dcsAliasMap->GetEntries() == 0 ) dcsResult=1;
172 status = new TParameter<int>("dcsResult",dcsResult);
173 resultArray->Add(status);
175 if (!dcsAliasMap) return 9;
176 if (dcsAliasMap->GetEntries() == 0 ) return 9;
182 TString runType = GetRunType();
184 // Temperature sensors are processed by AliTPCCalTemp
186 TString tempConf = fConfEnv->GetValue("Temperature","ON");
188 if (tempConf != "OFF" ) {
189 UInt_t tempResult = MapTemperature(dcsAliasMap);
191 status = new TParameter<int>("tempResult",tempResult);
192 resultArray->Add(status);
195 // High Voltage recordings
198 TString hvConf = fConfEnv->GetValue("HighVoltage","ON");
200 if (hvConf != "OFF" ) {
201 UInt_t hvResult = MapHighVoltage(dcsAliasMap);
203 status = new TParameter<int>("hvResult",hvResult);
204 resultArray->Add(status);
207 // Other calibration information will be retrieved through FXS files
209 // TList* fileSourcesDAQ = GetFile(AliShuttleInterface::kDAQ, "pedestals");
210 // const char* fileNamePed = GetFile(AliShuttleInterface::kDAQ, "pedestals", "LDC1");
212 // TList* fileSourcesHLT = GetFile(AliShuttleInterface::kHLT, "calib");
213 // const char* fileNameHLT = GetFile(AliShuttleInterface::kHLT, "calib", "LDC1");
217 if(runType == kPedestalRunType) {
218 Int_t numSources = 1;
219 Int_t pedestalSource[2] = {AliShuttleInterface::kDAQ,AliShuttleInterface::kHLT} ;
220 TString source = fConfEnv->GetValue("Pedestal","DAQ");
222 if (source != "OFF" ) {
223 if ( source == "HLT") pedestalSource[0] = AliShuttleInterface::kHLT;
224 if (!GetHLTStatus()) pedestalSource[0] = AliShuttleInterface::kDAQ;
225 if (source == "HLTDAQ" ) {
227 pedestalSource[0] = AliShuttleInterface::kHLT;
228 pedestalSource[1] = AliShuttleInterface::kDAQ;
230 if (source == "DAQHLT" ) numSources=2;
231 UInt_t pedestalResult=0;
232 for (Int_t i=0; i<numSources; i++ ) {
233 UInt_t pedestalResult = ExtractPedestals(pedestalSource[i]);
234 if ( pedestalResult == 0 ) break;
236 result += pedestalResult;
237 status = new TParameter<int>("pedestalResult",pedestalResult);
238 resultArray->Add(status);
242 // pulser trigger processing
244 if(runType == kPulserRunType) {
245 Int_t numSources = 1;
246 Int_t pulserSource[2] = {AliShuttleInterface::kDAQ,AliShuttleInterface::kHLT} ;
247 TString source = fConfEnv->GetValue("Pulser","DAQ");
249 if ( source != "OFF") {
250 if ( source == "HLT") pulserSource[0] = AliShuttleInterface::kHLT;
251 if (!GetHLTStatus()) pulserSource[0] = AliShuttleInterface::kDAQ;
252 if (source == "HLTDAQ" ) {
254 pulserSource[0] = AliShuttleInterface::kHLT;
255 pulserSource[1] = AliShuttleInterface::kDAQ;
257 if (source == "DAQHLT" ) numSources=2;
258 UInt_t pulserResult=0;
259 for (Int_t i=0; i<numSources; i++ ) {
260 pulserResult = ExtractPulser(pulserSource[i]);
261 if ( pulserResult == 0 ) break;
263 result += pulserResult;
264 status = new TParameter<int>("pulserResult",pulserResult);
265 resultArray->Add(status);
271 // Central Electrode processing
273 // if( runType == kPhysicsRunType || runType == kStandAloneRunType ||
274 // runType == kDaqRunType ) {
276 if (true) { // do CE processing for all run types
277 Int_t numSources = 1;
278 Int_t ceSource[2] = {AliShuttleInterface::kDAQ,AliShuttleInterface::kHLT} ;
279 TString source = fConfEnv->GetValue("CE","DAQ");
281 if ( source != "OFF" ) {
282 if ( source == "HLT") ceSource[0] = AliShuttleInterface::kHLT;
283 if (!GetHLTStatus()) ceSource[0] = AliShuttleInterface::kDAQ;
284 if (source == "HLTDAQ" ) {
286 ceSource[0] = AliShuttleInterface::kHLT;
287 ceSource[1] = AliShuttleInterface::kDAQ;
289 if (source == "DAQHLT" ) numSources=2;
291 for (Int_t i=0; i<numSources; i++ ) {
292 ceResult = ExtractCE(ceSource[i]);
293 if ( ceResult == 0 ) break;
296 status = new TParameter<int>("ceResult",ceResult);
297 resultArray->Add(status);
301 if (errorHandling == "OFF" ) {
302 AliCDBMetaData metaData;
303 metaData.SetBeamPeriod(0);
304 metaData.SetResponsible("Haavard Helstrup");
305 metaData.SetComment("Preprocessor AliTPC status.");
306 Store("Calib", "PreprocStatus", resultArray, &metaData, 0, kFALSE);
307 resultArray->Delete();
313 //______________________________________________________________________________________________
314 UInt_t AliTPCPreprocessor::MapTemperature(TMap* dcsAliasMap)
317 // extract DCS temperature maps. Perform fits to save space
320 TMap *map = fTemp->ExtractDCS(dcsAliasMap);
322 fTemp->MakeSplineFit(map);
323 Double_t fitFraction = 1.0*fTemp->NumFits()/fTemp->NumSensors();
324 if (fitFraction > kFitFraction ) {
325 AliInfo(Form("Temperature values extracted, fits performed.\n"));
327 Log ("Too few temperature maps fitted. \n");
331 Log("No temperature map extracted. \n");
335 // Now store the final CDB file
338 AliCDBMetaData metaData;
339 metaData.SetBeamPeriod(0);
340 metaData.SetResponsible("Haavard Helstrup");
341 metaData.SetComment("Preprocessor AliTPC data base entries.");
343 Bool_t storeOK = Store("Calib", "Temperature", fTemp, &metaData, 0, kFALSE);
344 if ( !storeOK ) result=1;
352 //______________________________________________________________________________________________
353 UInt_t AliTPCPreprocessor::MapHighVoltage(TMap* dcsAliasMap)
356 // extract DCS HV maps. Perform fits to save space
359 TMap *map = fHighVoltage->ExtractDCS(dcsAliasMap);
361 fHighVoltage->MakeSplineFit(map);
362 Double_t fitFraction = 1.0*fHighVoltage->NumFits()/fHighVoltage->NumSensors();
363 if (fitFraction > kFitFraction ) {
364 AliInfo(Form("High voltage recordings extracted, fits performed.\n"));
366 Log ("Too few high voltage recordings fitted. \n");
370 Log("No high voltage recordings extracted. \n");
374 // Now store the final CDB file
377 AliCDBMetaData metaData;
378 metaData.SetBeamPeriod(0);
379 metaData.SetResponsible("Haavard Helstrup");
380 metaData.SetComment("Preprocessor AliTPC data base entries.");
382 Bool_t storeOK = Store("Calib", "HighVoltage", fHighVoltage, &metaData, 0, kFALSE);
383 if ( !storeOK ) result=1;
392 //______________________________________________________________________________________________
394 UInt_t AliTPCPreprocessor::ExtractPedestals(Int_t sourceFXS)
397 // Read pedestal file from file exchage server
398 // Keep original entry from OCDB in case no new pedestals are available
400 AliTPCCalPad *calPadPed=0;
401 AliCDBEntry* entry = GetFromOCDB("Calib", "Pedestals");
402 if (entry) calPadPed = (AliTPCCalPad*)entry->GetObject();
403 if ( calPadPed==NULL ) {
404 Log("AliTPCPreprocsessor: No previous TPC pedestal entry available.\n");
405 calPadPed = new AliTPCCalPad("PedestalsMean","PedestalsMean");
408 AliTPCCalPad *calPadRMS=0;
409 entry = GetFromOCDB("Calib", "PadNoise");
410 if (entry) calPadRMS = (AliTPCCalPad*)entry->GetObject();
411 if ( calPadRMS==NULL ) {
412 Log("AliTPCPreprocsessor: No previous TPC noise entry available.\n");
413 calPadRMS = new AliTPCCalPad("PedestalsRMS","PedestalsRMS");
419 Int_t nSectors = fROC->GetNSectors();
420 TList* list = GetFileSources(sourceFXS,"pedestals");
422 if (list && list->GetEntries()>0) {
424 // loop through all files from LDCs
426 Bool_t changed=false;
428 while (list->At(index)!=NULL) {
429 TObjString* fileNameEntry = (TObjString*) list->At(index);
430 if (fileNameEntry!=NULL) {
431 TString fileName = GetFile(sourceFXS, "pedestals",
432 fileNameEntry->GetString().Data());
433 TFile *f = TFile::Open(fileName);
435 Log ("Error opening pedestal file.");
439 AliTPCCalibPedestal *calPed;
440 f->GetObject("tpcCalibPedestal",calPed);
442 Log ("No pedestal calibration object in file.");
447 // replace entries for the sectors available in the present file
450 for (Int_t sector=0; sector<nSectors; sector++) {
451 AliTPCCalROC *rocPed=calPed->GetCalRocPedestal(sector, kFALSE);
452 if ( rocPed ) calPadPed->SetCalROC(rocPed,sector);
453 AliTPCCalROC *rocRMS=calPed->GetCalRocRMS(sector, kFALSE);
454 if ( rocRMS ) calPadRMS->SetCalROC(rocRMS,sector);
460 // Store updated pedestal entry to OCDB
463 AliCDBMetaData metaData;
464 metaData.SetBeamPeriod(0);
465 metaData.SetResponsible("Haavard Helstrup");
466 metaData.SetComment("Preprocessor AliTPC data base entries.");
468 Bool_t storeOK = Store("Calib", "Pedestals", calPadPed, &metaData, 0, kTRUE);
469 if ( !storeOK ) ++result;
470 storeOK = Store("Calib", "PadNoise", calPadRMS, &metaData, 0, kTRUE);
471 if ( !storeOK ) ++result;
474 Log ("Error: no entries in input file list!");
481 //______________________________________________________________________________________________
484 UInt_t AliTPCPreprocessor::ExtractPulser(Int_t sourceFXS)
487 // Read pulser calibration file from file exchage server
488 // Keep original entry from OCDB in case no new pulser calibration is available
490 TObjArray *pulserObjects=0;
491 AliTPCCalPad *pulserTmean=0;
492 AliTPCCalPad *pulserTrms=0;
493 AliTPCCalPad *pulserQmean=0;
494 AliCDBEntry* entry = GetFromOCDB("Calib", "Pulser");
495 if (entry) pulserObjects = (TObjArray*)entry->GetObject();
496 if ( pulserObjects==NULL ) {
497 Log("AliTPCPreprocsessor: No previous TPC pulser entry available.\n");
498 pulserObjects = new TObjArray;
501 pulserTmean = (AliTPCCalPad*)pulserObjects->FindObject("PulserTmean");
502 if ( !pulserTmean ) {
503 pulserTmean = new AliTPCCalPad("PulserTmean","PulserTmean");
504 pulserObjects->Add(pulserTmean);
506 pulserTrms = (AliTPCCalPad*)pulserObjects->FindObject("PulserTrms");
508 pulserTrms = new AliTPCCalPad("PulserTrms","PulserTrms");
509 pulserObjects->Add(pulserTrms);
511 pulserQmean = (AliTPCCalPad*)pulserObjects->FindObject("PulserQmean");
512 if ( !pulserQmean ) {
513 pulserQmean = new AliTPCCalPad("PulserQmean","PulserQmean");
514 pulserObjects->Add(pulserQmean);
520 Int_t nSectors = fROC->GetNSectors();
521 TList* list = GetFileSources(sourceFXS,"pulser");
523 if (list && list->GetEntries()>0) {
525 // loop through all files from LDCs
527 Bool_t changed=false;
529 while (list->At(index)!=NULL) {
530 TObjString* fileNameEntry = (TObjString*) list->At(index);
531 if (fileNameEntry!=NULL) {
532 TString fileName = GetFile(sourceFXS, "pulser",
533 fileNameEntry->GetString().Data());
534 TFile *f = TFile::Open(fileName);
536 Log ("Error opening pulser file.");
540 AliTPCCalibPulser *calPulser;
541 f->GetObject("tpcCalibPulser",calPulser);
543 Log ("No pulser calibration object in file.");
548 // replace entries for the sectors available in the present file
551 for (Int_t sector=0; sector<nSectors; sector++) {
552 AliTPCCalROC *rocTmean=calPulser->GetCalRocT0(sector);
553 if ( rocTmean ) pulserTmean->SetCalROC(rocTmean,sector);
554 AliTPCCalROC *rocTrms=calPulser->GetCalRocRMS(sector);
555 if ( rocTrms ) pulserTrms->SetCalROC(rocTrms,sector);
556 AliTPCCalROC *rocQmean=calPulser->GetCalRocQ(sector);
557 if ( rocQmean ) pulserQmean->SetCalROC(rocQmean,sector);
563 // Store updated pedestal entry to OCDB
566 AliCDBMetaData metaData;
567 metaData.SetBeamPeriod(0);
568 metaData.SetResponsible("Haavard Helstrup");
569 metaData.SetComment("Preprocessor AliTPC data base entries.");
571 Bool_t storeOK = Store("Calib", "Pulser", pulserObjects, &metaData, 0, kTRUE);
572 if ( !storeOK ) ++result;
575 Log ("Error: no entries in input file list!");
582 UInt_t AliTPCPreprocessor::ExtractCE(Int_t sourceFXS)
585 // Read Central Electrode file from file exchage server
586 // Keep original entry from OCDB in case no new CE calibration is available
588 TObjArray *ceObjects=0;
589 AliTPCCalPad *ceTmean=0;
590 AliTPCCalPad *ceTrms=0;
591 AliTPCCalPad *ceQmean=0;
592 TObjArray *rocTtime=0;
593 TObjArray *rocQtime=0;
595 AliCDBEntry* entry = GetFromOCDB("Calib", "CE");
596 if (entry) ceObjects = (TObjArray*)entry->GetObject();
597 if ( ceObjects==NULL ) {
598 Log("AliTPCPreprocsessor: No previous TPC central electrode entry available.\n");
599 ceObjects = new TObjArray;
602 Int_t nSectors = fROC->GetNSectors();
604 ceTmean = (AliTPCCalPad*)ceObjects->FindObject("CETmean");
606 ceTmean = new AliTPCCalPad("CETmean","CETmean");
607 ceObjects->Add(ceTmean);
609 ceTrms = (AliTPCCalPad*)ceObjects->FindObject("CETrms");
611 ceTrms = new AliTPCCalPad("CETrms","CETrms");
612 ceObjects->Add(ceTrms);
614 ceQmean = (AliTPCCalPad*)ceObjects->FindObject("CEQmean");
616 ceQmean = new AliTPCCalPad("CEQmean","CEQmean");
617 ceObjects->Add(ceQmean);
619 //!new from here please have a look!!!
620 rocTtime = (TObjArray*)ceObjects->FindObject("rocTtime");
622 rocTtime = new TObjArray(nSectors);
623 rocTtime->SetName("rocTtime");
624 ceObjects->Add(rocTtime);
627 rocQtime = (TObjArray*)ceObjects->FindObject("rocQtime");
629 rocQtime = new TObjArray(nSectors);
630 rocQtime->SetName("rocQtime");
631 ceObjects->Add(rocQtime);
637 TList* list = GetFileSources(sourceFXS,"CE");
639 if (list && list->GetEntries()>0) {
641 // loop through all files from LDCs
644 while (list->At(index)!=NULL) {
645 TObjString* fileNameEntry = (TObjString*) list->At(index);
646 if (fileNameEntry!=NULL) {
647 TString fileName = GetFile(sourceFXS, "CE",
648 fileNameEntry->GetString().Data());
649 TFile *f = TFile::Open(fileName);
651 Log ("Error opening central electrode file.");
655 AliTPCCalibCE *calCE;
656 f->GetObject("tpcCalibCE",calCE);
658 // replace entries for the sectors available in the present file
660 for (Int_t sector=0; sector<nSectors; sector++) {
661 AliTPCCalROC *rocTmean=calCE->GetCalRocT0(sector);
662 if ( rocTmean ) ceTmean->SetCalROC(rocTmean,sector);
663 AliTPCCalROC *rocTrms=calCE->GetCalRocRMS(sector);
664 if ( rocTrms ) ceTrms->SetCalROC(rocTrms,sector);
665 AliTPCCalROC *rocQmean=calCE->GetCalRocQ(sector);
666 if ( rocQmean ) ceQmean->SetCalROC(rocQmean,sector);
667 TGraph *grT=calCE->MakeGraphTimeCE(sector,0,2); // T time graph
668 if ( grT ) rocTtime->AddAt(grT,sector);
669 TGraph *grQ=calCE->MakeGraphTimeCE(sector,0,3); // Q time graph
670 if ( grQ ) rocTtime->AddAt(grQ,sector);
676 // Store updated pedestal entry to OCDB
678 AliCDBMetaData metaData;
679 metaData.SetBeamPeriod(0);
680 metaData.SetResponsible("Haavard Helstrup");
681 metaData.SetComment("Preprocessor AliTPC data base entries.");
683 Bool_t storeOK = Store("Calib", "CE", ceObjects, &metaData, 0, kTRUE);
684 if ( !storeOK ) ++result;
687 Log ("Error: no entries!");