]> git.uio.no Git - u/mrichter/AliRoot.git/blame_incremental - TPC/AliTPCPreprocessor.cxx
Updates to include new run types CALIBRATION_PULSER and STANDALONE_PULSER
[u/mrichter/AliRoot.git] / TPC / AliTPCPreprocessor.cxx
... / ...
CommitLineData
1/**************************************************************************
2 * Copyright(c) 2007, 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
17#include "AliTPCPreprocessor.h"
18#include "AliShuttleInterface.h"
19
20#include "AliCDBMetaData.h"
21#include "AliDCSValue.h"
22#include "AliLog.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"
30#include "TFile.h"
31#include "TTree.h"
32#include "TGraph.h"
33#include "TEnv.h"
34#include "TParameter.h"
35
36#include <TTimeStamp.h>
37
38const Int_t kValCutTemp = 100; // discard temperatures > 100 degrees
39const Int_t kDiffCutTemp = 5; // discard temperature differences > 5 degrees
40const TString kPedestalRunType = "PEDESTAL"; // pedestal run identifier
41const TString kPulserRunType = "CALIBRATION_PULSER"; // pulser run identifier
42const TString kPhysicsRunType = "PHYSICS"; // physics run identifier
43const TString kStandAloneRunType = "STANDALONE"; // standalone run identifier
44const TString kStandAlonePulserRunType = "STANDALONE_PULSER"; // standalone run identifier
45const TString kCosmicRunType = "COSMIC"; // cosmic run identifier
46const TString kLaserRunType = "LASER"; // laser run identifier
47const TString kDaqRunType = "DAQ"; // DAQ run identifier
48const TString kAmandaTemp = "TPC_PT_%d_TEMPERATURE"; // Amanda string for temperature entries
49//const Double_t kFitFraction = 0.7; // Fraction of DCS sensor fits required
50const Double_t kFitFraction = -1.0; // Don't require minimum number of fits in commissioning run
51
52//
53// This class is the SHUTTLE preprocessor for the TPC detector.
54//
55
56ClassImp(AliTPCPreprocessor)
57
58//______________________________________________________________________________________________
59AliTPCPreprocessor::AliTPCPreprocessor(AliShuttleInterface* shuttle) :
60 AliPreprocessor("TPC",shuttle),
61 fConfEnv(0), fTemp(0), fHighVoltage(0), fHighVoltageStat(0), fConfigOK(kTRUE), fROC(0)
62{
63 // constructor
64 fROC = AliTPCROC::Instance();
65
66 // define run types to be processed
67
68 AddRunType(kPedestalRunType);
69 AddRunType(kPulserRunType);
70 AddRunType(kPhysicsRunType);
71 AddRunType(kStandAloneRunType);
72 AddRunType(kStandAlonePulserRunType);
73 AddRunType(kCosmicRunType);
74 AddRunType(kLaserRunType);
75 AddRunType(kDaqRunType);
76
77}
78//______________________________________________________________________________________________
79 AliTPCPreprocessor::AliTPCPreprocessor(const AliTPCPreprocessor& ) :
80 AliPreprocessor("TPC",0),
81 fConfEnv(0), fTemp(0), fHighVoltage(0), fHighVoltageStat(0), fConfigOK(kTRUE), fROC(0)
82 {
83
84 Fatal("AliTPCPreprocessor", "copy constructor not implemented");
85//
86// // fTemp = new AliTPCSensorTempArray(*(org.fTemp));
87 }
88
89//______________________________________________________________________________________________
90AliTPCPreprocessor::~AliTPCPreprocessor()
91{
92 // destructor
93
94 delete fTemp;
95 delete fHighVoltage;
96}
97//______________________________________________________________________________________________
98AliTPCPreprocessor& AliTPCPreprocessor::operator = (const AliTPCPreprocessor& )
99{
100 Fatal("operator =", "assignment operator not implemented");
101 return *this;
102}
103
104
105//______________________________________________________________________________________________
106void AliTPCPreprocessor::Initialize(Int_t run, UInt_t startTime,
107 UInt_t endTime)
108{
109 // Creates AliTestDataDCS object -- start maps half an hour beforre actual run start
110
111 UInt_t startTimeLocal = startTime-1800;
112
113 AliPreprocessor::Initialize(run, startTimeLocal, endTime);
114
115 AliInfo(Form("\n\tRun %d \n\tStartTime %s \n\tEndTime %s", run,
116 TTimeStamp((time_t)startTime,0).AsString(),
117 TTimeStamp((time_t)endTime,0).AsString()));
118
119 // Preprocessor configuration
120
121 AliCDBEntry* entry = GetFromOCDB("Config", "Preprocessor");
122 if (entry) fConfEnv = (TEnv*) entry->GetObject();
123 if ( fConfEnv==0 ) {
124 Log("AliTPCPreprocsessor: Preprocessor Config OCDB entry missing.\n");
125 fConfigOK = kFALSE;
126 return;
127 }
128
129 // Temperature sensors
130
131 TTree *confTree = 0;
132
133 TString tempConf = fConfEnv->GetValue("Temperature","ON");
134 tempConf.ToUpper();
135 if (tempConf != "OFF" ) {
136 entry = GetFromOCDB("Config", "Temperature");
137 if (entry) confTree = (TTree*) entry->GetObject();
138 if ( confTree==0 ) {
139 Log("AliTPCPreprocsessor: Temperature Config OCDB entry missing.\n");
140 fConfigOK = kFALSE;
141 return;
142 }
143 fTemp = new AliTPCSensorTempArray(startTimeLocal, fEndTime, confTree, kAmandaTemp);
144 fTemp->SetValCut(kValCutTemp);
145 fTemp->SetDiffCut(kDiffCutTemp);
146 }
147
148 // High voltage measurements
149
150 TString hvConf = fConfEnv->GetValue("HighVoltage","ON");
151 hvConf.ToUpper();
152 if (hvConf != "OFF" ) {
153 confTree=0;
154 entry=0;
155 entry = GetFromOCDB("Config", "HighVoltage");
156 if (entry) confTree = (TTree*) entry->GetObject();
157 if ( confTree==0 ) {
158 Log("AliTPCPreprocsessor: High Voltage Config OCDB entry missing.\n");
159 fConfigOK = kFALSE;
160 return;
161 }
162 fHighVoltage = new AliDCSSensorArray(startTimeLocal, fEndTime, confTree);
163 }
164
165 // High voltage status values
166
167 TString hvStatConf = fConfEnv->GetValue("HighVoltageStat","ON");
168 hvStatConf.ToUpper();
169 if (hvStatConf != "OFF" ) {
170 confTree=0;
171 entry=0;
172 entry = GetFromOCDB("Config", "HighVoltageStat");
173 if (entry) confTree = (TTree*) entry->GetObject();
174 if ( confTree==0 ) {
175 Log("AliTPCPreprocsessor: High Voltage Status Config OCDB entry missing.\n");
176 fConfigOK = kFALSE;
177 return;
178 }
179 fHighVoltageStat = new AliDCSSensorArray(startTimeLocal, fEndTime, confTree);
180 }
181}
182
183//______________________________________________________________________________________________
184UInt_t AliTPCPreprocessor::Process(TMap* dcsAliasMap)
185{
186 // Fills data into TPC calibrations objects
187
188 // Amanda servers provide information directly through dcsAliasMap
189
190
191 if (!fConfigOK) return 9;
192 UInt_t result = 0;
193 TObjArray *resultArray = new TObjArray();
194 TString errorHandling = fConfEnv->GetValue("ErrorHandling","ON");
195 errorHandling.ToUpper();
196 TObject * status;
197
198 UInt_t dcsResult=0;
199 if (errorHandling == "OFF" ) {
200 if (!dcsAliasMap) dcsResult=1;
201 if (dcsAliasMap->GetEntries() == 0 ) dcsResult=1;
202 status = new TParameter<int>("dcsResult",dcsResult);
203 resultArray->Add(status);
204 } else {
205 if (!dcsAliasMap) return 9;
206 if (dcsAliasMap->GetEntries() == 0 ) return 9;
207 }
208
209
210
211
212 TString runType = GetRunType();
213
214 // Temperature sensors are processed by AliTPCCalTemp
215
216 TString tempConf = fConfEnv->GetValue("Temperature","ON");
217 tempConf.ToUpper();
218 if (tempConf != "OFF" ) {
219 UInt_t tempResult = MapTemperature(dcsAliasMap);
220 result=tempResult;
221 status = new TParameter<int>("tempResult",tempResult);
222 resultArray->Add(status);
223 }
224
225 // High Voltage recordings
226
227
228 TString hvConf = fConfEnv->GetValue("HighVoltage","ON");
229 hvConf.ToUpper();
230 if (hvConf != "OFF" ) {
231 UInt_t hvResult = MapHighVoltage(dcsAliasMap);
232 result+=hvResult;
233 status = new TParameter<int>("hvResult",hvResult);
234 resultArray->Add(status);
235 }
236
237 // Other calibration information will be retrieved through FXS files
238 // examples:
239 // TList* fileSourcesDAQ = GetFile(AliShuttleInterface::kDAQ, "pedestals");
240 // const char* fileNamePed = GetFile(AliShuttleInterface::kDAQ, "pedestals", "LDC1");
241 //
242 // TList* fileSourcesHLT = GetFile(AliShuttleInterface::kHLT, "calib");
243 // const char* fileNameHLT = GetFile(AliShuttleInterface::kHLT, "calib", "LDC1");
244
245 // pedestal entries
246
247 if(runType == kPedestalRunType) {
248 Int_t numSources = 1;
249 Int_t pedestalSource[2] = {AliShuttleInterface::kDAQ,AliShuttleInterface::kHLT} ;
250 TString source = fConfEnv->GetValue("Pedestal","DAQ");
251 source.ToUpper();
252 if (source != "OFF" ) {
253 if ( source == "HLT") pedestalSource[0] = AliShuttleInterface::kHLT;
254 if (!GetHLTStatus()) pedestalSource[0] = AliShuttleInterface::kDAQ;
255 if (source == "HLTDAQ" ) {
256 numSources=2;
257 pedestalSource[0] = AliShuttleInterface::kHLT;
258 pedestalSource[1] = AliShuttleInterface::kDAQ;
259 }
260 if (source == "DAQHLT" ) numSources=2;
261 UInt_t pedestalResult=0;
262 for (Int_t i=0; i<numSources; i++ ) {
263 pedestalResult = ExtractPedestals(pedestalSource[i]);
264 if ( pedestalResult == 0 ) break;
265 }
266 result += pedestalResult;
267 status = new TParameter<int>("pedestalResult",pedestalResult);
268 resultArray->Add(status);
269 }
270 }
271
272 // pulser trigger processing
273
274 if(runType == kPulserRunType) {
275 Int_t numSources = 1;
276 Int_t pulserSource[2] = {AliShuttleInterface::kDAQ,AliShuttleInterface::kHLT} ;
277 TString source = fConfEnv->GetValue("Pulser","DAQ");
278 source.ToUpper();
279 if ( source != "OFF") {
280 if ( source == "HLT") pulserSource[0] = AliShuttleInterface::kHLT;
281 if (!GetHLTStatus()) pulserSource[0] = AliShuttleInterface::kDAQ;
282 if (source == "HLTDAQ" ) {
283 numSources=2;
284 pulserSource[0] = AliShuttleInterface::kHLT;
285 pulserSource[1] = AliShuttleInterface::kDAQ;
286 }
287 if (source == "DAQHLT" ) numSources=2;
288 UInt_t pulserResult=0;
289 for (Int_t i=0; i<numSources; i++ ) {
290 pulserResult = ExtractPulser(pulserSource[i]);
291 if ( pulserResult == 0 ) break;
292 }
293 result += pulserResult;
294 status = new TParameter<int>("pulserResult",pulserResult);
295 resultArray->Add(status);
296 }
297 }
298
299
300
301 // Central Electrode processing
302
303 if( runType == kPhysicsRunType || runType == kStandAloneRunType ||
304 runType == kDaqRunType ) {
305
306// if (true) { // do CE processing for all run types
307 Int_t numSources = 1;
308 Int_t ceSource[2] = {AliShuttleInterface::kDAQ,AliShuttleInterface::kHLT} ;
309 TString source = fConfEnv->GetValue("CE","DAQ");
310 source.ToUpper();
311 if ( source != "OFF" ) {
312 if ( source == "HLT") ceSource[0] = AliShuttleInterface::kHLT;
313 if (!GetHLTStatus()) ceSource[0] = AliShuttleInterface::kDAQ;
314 if (source == "HLTDAQ" ) {
315 numSources=2;
316 ceSource[0] = AliShuttleInterface::kHLT;
317 ceSource[1] = AliShuttleInterface::kDAQ;
318 }
319 if (source == "DAQHLT" ) numSources=2;
320 UInt_t ceResult=0;
321 for (Int_t i=0; i<numSources; i++ ) {
322 ceResult = ExtractCE(ceSource[i]);
323 if ( ceResult == 0 ) break;
324 }
325 result += ceResult;
326 status = new TParameter<int>("ceResult",ceResult);
327 resultArray->Add(status);
328 }
329 }
330
331 if (errorHandling == "OFF" ) {
332 AliCDBMetaData metaData;
333 metaData.SetBeamPeriod(0);
334 metaData.SetResponsible("Haavard Helstrup");
335 metaData.SetComment("Preprocessor AliTPC status.");
336 Store("Calib", "PreprocStatus", resultArray, &metaData, 0, kFALSE);
337 resultArray->Delete();
338 return 0;
339 } else {
340 return result;
341 }
342}
343//______________________________________________________________________________________________
344UInt_t AliTPCPreprocessor::MapTemperature(TMap* dcsAliasMap)
345{
346
347 // extract DCS temperature maps. Perform fits to save space
348
349 UInt_t result=0;
350 TMap *map = fTemp->ExtractDCS(dcsAliasMap);
351 if (map) {
352 fTemp->MakeSplineFit(map);
353 Double_t fitFraction = 1.0*fTemp->NumFits()/fTemp->NumSensors();
354 if (fitFraction > kFitFraction ) {
355 AliInfo(Form("Temperature values extracted, fits performed.\n"));
356 } else {
357 Log ("Too few temperature maps fitted. \n");
358 result = 9;
359 }
360 } else {
361 Log("No temperature map extracted. \n");
362 result=9;
363 }
364 delete map;
365 // Now store the final CDB file
366
367 if ( result == 0 ) {
368 AliCDBMetaData metaData;
369 metaData.SetBeamPeriod(0);
370 metaData.SetResponsible("Haavard Helstrup");
371 metaData.SetComment("Preprocessor AliTPC data base entries.");
372
373 Bool_t storeOK = Store("Calib", "Temperature", fTemp, &metaData, 0, kFALSE);
374 if ( !storeOK ) result=1;
375
376 }
377
378 return result;
379
380}
381
382//______________________________________________________________________________________________
383UInt_t AliTPCPreprocessor::MapHighVoltage(TMap* dcsAliasMap)
384{
385
386 // extract DCS HV maps. Perform fits to save space
387
388 UInt_t result=0;
389 TMap *map = fHighVoltage->ExtractDCS(dcsAliasMap);
390 if (map) {
391 fHighVoltage->MakeSplineFit(map);
392 Double_t fitFraction = 1.0*fHighVoltage->NumFits()/fHighVoltage->NumSensors();
393 if (fitFraction > kFitFraction ) {
394 AliInfo(Form("High voltage recordings extracted, fits performed.\n"));
395 } else {
396 Log ("Too few high voltage recordings fitted. \n");
397 result = 9;
398 }
399 } else {
400 Log("No high voltage recordings extracted. \n");
401 result=9;
402 }
403 delete map;
404
405 TString hvStatConf = fConfEnv->GetValue("HighVoltageStat","ON");
406 hvStatConf.ToUpper();
407 if (hvStatConf != "OFF" ) {
408 TMap *map2 = fHighVoltageStat->ExtractDCS(dcsAliasMap);
409 if (map2) {
410 fHighVoltageStat->StoreGraph(map2);
411 } else {
412 Log("No high voltage status recordings extracted. \n");
413 result=9;
414 }
415 delete map2;
416
417 // add status maps to high voltage sensor array
418
419 fHighVoltage->AddSensors(fHighVoltageStat);
420 }
421 // Now store the final CDB file
422
423 if ( result == 0 ) {
424 AliCDBMetaData metaData;
425 metaData.SetBeamPeriod(0);
426 metaData.SetResponsible("Haavard Helstrup");
427 metaData.SetComment("Preprocessor AliTPC data base entries.");
428
429 Bool_t storeOK = Store("Calib", "HighVoltage", fHighVoltage, &metaData, 0, kFALSE);
430 if ( !storeOK ) result=1;
431
432 }
433
434 return result;
435
436}
437
438
439//______________________________________________________________________________________________
440
441UInt_t AliTPCPreprocessor::ExtractPedestals(Int_t sourceFXS)
442{
443 //
444 // Read pedestal file from file exchage server
445 // Keep original entry from OCDB in case no new pedestals are available
446 //
447 AliTPCCalPad *calPadPed=0;
448 AliCDBEntry* entry = GetFromOCDB("Calib", "Pedestals");
449 if (entry) calPadPed = (AliTPCCalPad*)entry->GetObject();
450 if ( calPadPed==NULL ) {
451 Log("AliTPCPreprocsessor: No previous TPC pedestal entry available.\n");
452 calPadPed = new AliTPCCalPad("PedestalsMean","PedestalsMean");
453 }
454
455 AliTPCCalPad *calPadRMS=0;
456 entry = GetFromOCDB("Calib", "PadNoise");
457 if (entry) calPadRMS = (AliTPCCalPad*)entry->GetObject();
458 if ( calPadRMS==NULL ) {
459 Log("AliTPCPreprocsessor: No previous TPC noise entry available.\n");
460 calPadRMS = new AliTPCCalPad("PedestalsRMS","PedestalsRMS");
461 }
462
463
464 UInt_t result=0;
465
466 Int_t nSectors = fROC->GetNSectors();
467 TList* list = GetFileSources(sourceFXS,"pedestals");
468
469 if (list && list->GetEntries()>0) {
470
471// loop through all files from LDCs
472
473 Bool_t changed=false;
474 UInt_t index = 0;
475 while (list->At(index)!=NULL) {
476 TObjString* fileNameEntry = (TObjString*) list->At(index);
477 if (fileNameEntry!=NULL) {
478 TString fileName = GetFile(sourceFXS, "pedestals",
479 fileNameEntry->GetString().Data());
480 TFile *f = TFile::Open(fileName);
481 if (!f) {
482 Log ("Error opening pedestal file.");
483 result =2;
484 break;
485 }
486 AliTPCCalibPedestal *calPed;
487 f->GetObject("tpcCalibPedestal",calPed);
488 if ( !calPed ) {
489 Log ("No pedestal calibration object in file.");
490 result = 2;
491 break;
492 }
493
494 // replace entries for the sectors available in the present file
495
496 changed=true;
497 for (Int_t sector=0; sector<nSectors; sector++) {
498 AliTPCCalROC *rocPed=calPed->GetCalRocPedestal(sector, kFALSE);
499 if ( rocPed ) calPadPed->SetCalROC(rocPed,sector);
500 AliTPCCalROC *rocRMS=calPed->GetCalRocRMS(sector, kFALSE);
501 if ( rocRMS ) calPadRMS->SetCalROC(rocRMS,sector);
502 }
503 delete calPed;
504 f->Close();
505 }
506 ++index;
507 } // while(list)
508//
509// Store updated pedestal entry to OCDB
510//
511 if (changed) {
512 AliCDBMetaData metaData;
513 metaData.SetBeamPeriod(0);
514 metaData.SetResponsible("Haavard Helstrup");
515 metaData.SetComment("Preprocessor AliTPC data base entries.");
516
517 Bool_t storeOK = Store("Calib", "Pedestals", calPadPed, &metaData, 0, kTRUE);
518 if ( !storeOK ) ++result;
519 storeOK = Store("Calib", "PadNoise", calPadRMS, &metaData, 0, kTRUE);
520 if ( !storeOK ) ++result;
521 }
522 } else {
523 Log ("Error: no entries in input file list!");
524 result = 1;
525 }
526
527 return result;
528}
529
530//______________________________________________________________________________________________
531
532
533UInt_t AliTPCPreprocessor::ExtractPulser(Int_t sourceFXS)
534{
535 //
536 // Read pulser calibration file from file exchage server
537 // Keep original entry from OCDB in case no new pulser calibration is available
538 //
539 TObjArray *pulserObjects=0;
540 AliTPCCalPad *pulserTmean=0;
541 AliTPCCalPad *pulserTrms=0;
542 AliTPCCalPad *pulserQmean=0;
543 AliCDBEntry* entry = GetFromOCDB("Calib", "Pulser");
544 if (entry) pulserObjects = (TObjArray*)entry->GetObject();
545 if ( pulserObjects==NULL ) {
546 Log("AliTPCPreprocsessor: No previous TPC pulser entry available.\n");
547 pulserObjects = new TObjArray;
548 }
549
550 pulserTmean = (AliTPCCalPad*)pulserObjects->FindObject("PulserTmean");
551 if ( !pulserTmean ) {
552 pulserTmean = new AliTPCCalPad("PulserTmean","PulserTmean");
553 pulserObjects->Add(pulserTmean);
554 }
555 pulserTrms = (AliTPCCalPad*)pulserObjects->FindObject("PulserTrms");
556 if ( !pulserTrms ) {
557 pulserTrms = new AliTPCCalPad("PulserTrms","PulserTrms");
558 pulserObjects->Add(pulserTrms);
559 }
560 pulserQmean = (AliTPCCalPad*)pulserObjects->FindObject("PulserQmean");
561 if ( !pulserQmean ) {
562 pulserQmean = new AliTPCCalPad("PulserQmean","PulserQmean");
563 pulserObjects->Add(pulserQmean);
564 }
565
566
567 UInt_t result=0;
568
569 Int_t nSectors = fROC->GetNSectors();
570 TList* list = GetFileSources(sourceFXS,"pulser");
571
572 if (list && list->GetEntries()>0) {
573
574// loop through all files from LDCs
575
576 Bool_t changed=false;
577 UInt_t index = 0;
578 while (list->At(index)!=NULL) {
579 TObjString* fileNameEntry = (TObjString*) list->At(index);
580 if (fileNameEntry!=NULL) {
581 TString fileName = GetFile(sourceFXS, "pulser",
582 fileNameEntry->GetString().Data());
583 TFile *f = TFile::Open(fileName);
584 if (!f) {
585 Log ("Error opening pulser file.");
586 result =2;
587 break;
588 }
589 AliTPCCalibPulser *calPulser;
590 f->GetObject("tpcCalibPulser",calPulser);
591 if ( !calPulser ) {
592 Log ("No pulser calibration object in file.");
593 result = 2;
594 break;
595 }
596
597 // replace entries for the sectors available in the present file
598
599 changed=true;
600 for (Int_t sector=0; sector<nSectors; sector++) {
601 AliTPCCalROC *rocTmean=calPulser->GetCalRocT0(sector);
602 if ( rocTmean ) pulserTmean->SetCalROC(rocTmean,sector);
603 AliTPCCalROC *rocTrms=calPulser->GetCalRocRMS(sector);
604 if ( rocTrms ) pulserTrms->SetCalROC(rocTrms,sector);
605 AliTPCCalROC *rocQmean=calPulser->GetCalRocQ(sector);
606 if ( rocQmean ) pulserQmean->SetCalROC(rocQmean,sector);
607 }
608 delete calPulser;
609 f->Close();
610 }
611 ++index;
612 } // while(list)
613//
614// Store updated pedestal entry to OCDB
615//
616 if (changed) {
617 AliCDBMetaData metaData;
618 metaData.SetBeamPeriod(0);
619 metaData.SetResponsible("Haavard Helstrup");
620 metaData.SetComment("Preprocessor AliTPC data base entries.");
621
622 Bool_t storeOK = Store("Calib", "Pulser", pulserObjects, &metaData, 0, kTRUE);
623 if ( !storeOK ) ++result;
624 }
625 } else {
626 Log ("Error: no entries in input file list!");
627 result = 1;
628 }
629
630 return result;
631}
632
633UInt_t AliTPCPreprocessor::ExtractCE(Int_t sourceFXS)
634{
635 //
636 // Read Central Electrode file from file exchage server
637 // Keep original entry from OCDB in case no new CE calibration is available
638 //
639 TObjArray *ceObjects=0;
640 AliTPCCalPad *ceTmean=0;
641 AliTPCCalPad *ceTrms=0;
642 AliTPCCalPad *ceQmean=0;
643 TObjArray *rocTtime=0;
644 TObjArray *rocQtime=0;
645
646 AliCDBEntry* entry = GetFromOCDB("Calib", "CE");
647 if (entry) ceObjects = (TObjArray*)entry->GetObject();
648 if ( ceObjects==NULL ) {
649 Log("AliTPCPreprocsessor: No previous TPC central electrode entry available.\n");
650 ceObjects = new TObjArray;
651 }
652
653 Int_t nSectors = fROC->GetNSectors();
654
655 ceTmean = (AliTPCCalPad*)ceObjects->FindObject("CETmean");
656 if ( !ceTmean ) {
657 ceTmean = new AliTPCCalPad("CETmean","CETmean");
658 ceObjects->Add(ceTmean);
659 }
660 ceTrms = (AliTPCCalPad*)ceObjects->FindObject("CETrms");
661 if ( !ceTrms ) {
662 ceTrms = new AliTPCCalPad("CETrms","CETrms");
663 ceObjects->Add(ceTrms);
664 }
665 ceQmean = (AliTPCCalPad*)ceObjects->FindObject("CEQmean");
666 if ( !ceQmean ) {
667 ceQmean = new AliTPCCalPad("CEQmean","CEQmean");
668 ceObjects->Add(ceQmean);
669 }
670 //!new from here please have a look!!!
671 rocTtime = (TObjArray*)ceObjects->FindObject("rocTtime");
672 if ( !rocTtime ) {
673 rocTtime = new TObjArray(nSectors);
674 rocTtime->SetName("rocTtime");
675 ceObjects->Add(rocTtime);
676 }
677
678 rocQtime = (TObjArray*)ceObjects->FindObject("rocQtime");
679 if ( !rocQtime ) {
680 rocQtime = new TObjArray(nSectors);
681 rocQtime->SetName("rocQtime");
682 ceObjects->Add(rocQtime);
683 }
684
685
686 UInt_t result=0;
687
688 TList* list = GetFileSources(sourceFXS,"CE");
689
690 if (list && list->GetEntries()>0) {
691
692// loop through all files from LDCs
693
694 UInt_t index = 0;
695 while (list->At(index)!=NULL) {
696 TObjString* fileNameEntry = (TObjString*) list->At(index);
697 if (fileNameEntry!=NULL) {
698 TString fileName = GetFile(sourceFXS, "CE",
699 fileNameEntry->GetString().Data());
700 TFile *f = TFile::Open(fileName);
701 if (!f) {
702 Log ("Error opening central electrode file.");
703 result =2;
704 break;
705 }
706 AliTPCCalibCE *calCE;
707 f->GetObject("tpcCalibCE",calCE);
708
709 // replace entries for the sectors available in the present file
710
711 for (Int_t sector=0; sector<nSectors; sector++) {
712 AliTPCCalROC *rocTmean=calCE->GetCalRocT0(sector);
713 if ( rocTmean ) ceTmean->SetCalROC(rocTmean,sector);
714 AliTPCCalROC *rocTrms=calCE->GetCalRocRMS(sector);
715 if ( rocTrms ) ceTrms->SetCalROC(rocTrms,sector);
716 AliTPCCalROC *rocQmean=calCE->GetCalRocQ(sector);
717 if ( rocQmean ) ceQmean->SetCalROC(rocQmean,sector);
718 TGraph *grT=calCE->MakeGraphTimeCE(sector,0,2); // T time graph
719 if ( grT ) rocTtime->AddAt(grT,sector);
720 TGraph *grQ=calCE->MakeGraphTimeCE(sector,0,3); // Q time graph
721 if ( grQ ) rocTtime->AddAt(grQ,sector);
722 }
723 delete calCE;
724 f->Close();
725 }
726 ++index;
727 } // while(list)
728//
729// Store updated pedestal entry to OCDB
730//
731 AliCDBMetaData metaData;
732 metaData.SetBeamPeriod(0);
733 metaData.SetResponsible("Haavard Helstrup");
734 metaData.SetComment("Preprocessor AliTPC data base entries.");
735
736 Bool_t storeOK = Store("Calib", "CE", ceObjects, &metaData, 0, kTRUE);
737 if ( !storeOK ) ++result;
738
739 } else {
740 Log ("Error: no entries!");
741 result = 1;
742 }
743
744 return result;
745}