7d4040ce6b12444bb4dea77c59c7a87347f6982a
[u/mrichter/AliRoot.git] / TPC / AliTPCPreprocessor.cxx
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
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 
50
51 //
52 // This class is the SHUTTLE preprocessor for the TPC detector.
53 //
54
55 ClassImp(AliTPCPreprocessor)
56
57 //______________________________________________________________________________________________
58 AliTPCPreprocessor::AliTPCPreprocessor(AliShuttleInterface* shuttle) :
59   AliPreprocessor("TPC",shuttle),
60   fConfEnv(0), fTemp(0), fHighVoltage(0), fConfigOK(kTRUE), fROC(0)
61 {
62   // constructor
63   fROC = AliTPCROC::Instance();
64 }
65 //______________________________________________________________________________________________
66  AliTPCPreprocessor::AliTPCPreprocessor(const AliTPCPreprocessor&  ) :
67    AliPreprocessor("TPC",0),
68    fConfEnv(0), fTemp(0), fHighVoltage(0), fConfigOK(kTRUE), fROC(0)
69  {
70
71    Fatal("AliTPCPreprocessor", "copy constructor not implemented");
72 //
73 // //  fTemp = new AliTPCSensorTempArray(*(org.fTemp));
74  }
75
76 //______________________________________________________________________________________________
77 AliTPCPreprocessor::~AliTPCPreprocessor()
78 {
79   // destructor
80
81   delete fTemp;
82   delete fHighVoltage;
83 }
84 //______________________________________________________________________________________________
85 AliTPCPreprocessor& AliTPCPreprocessor::operator = (const AliTPCPreprocessor& )
86 {
87   Fatal("operator =", "assignment operator not implemented");
88   return *this;
89 }
90
91
92 //______________________________________________________________________________________________
93 void AliTPCPreprocessor::Initialize(Int_t run, UInt_t startTime,
94         UInt_t endTime)
95 {
96   // Creates AliTestDataDCS object -- start maps half an hour beforre actual run start
97
98   UInt_t startTimeLocal = startTime-1800;
99
100   AliPreprocessor::Initialize(run, startTimeLocal, endTime);
101
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()));
105
106   // Preprocessor configuration
107
108         AliCDBEntry* entry = GetFromOCDB("Config", "Preprocessor");
109         if (entry) fConfEnv = (TEnv*) entry->GetObject();
110         if ( fConfEnv==0 ) {
111            Log("AliTPCPreprocsessor: Preprocessor Config OCDB entry missing.\n");
112            fConfigOK = kFALSE;
113            return;
114         }
115
116   // Temperature sensors
117
118        TTree *confTree = 0;
119
120        TString tempConf = fConfEnv->GetValue("Temperature","ON");
121        tempConf.ToUpper();
122        if (tempConf != "OFF" ) {
123         entry = GetFromOCDB("Config", "Temperature");
124         if (entry) confTree = (TTree*) entry->GetObject();
125         if ( confTree==0 ) {
126            Log("AliTPCPreprocsessor: Temperature Config OCDB entry missing.\n");
127            fConfigOK = kFALSE;
128            return;
129         }
130         fTemp = new AliTPCSensorTempArray(startTimeLocal, fEndTime, confTree, kAmandaTemp);
131         fTemp->SetValCut(kValCutTemp);
132         fTemp->SetDiffCut(kDiffCutTemp);
133        }
134
135   // High voltage measurements
136
137       TString hvConf = fConfEnv->GetValue("HighVoltage","ON");
138       hvConf.ToUpper();
139       if (hvConf != "OFF" ) { 
140         confTree=0;
141         entry=0;
142         entry = GetFromOCDB("Config", "HighVoltage");
143         if (entry) confTree = (TTree*) entry->GetObject();
144         if ( confTree==0 ) {
145            Log("AliTPCPreprocsessor: High Voltage Config OCDB entry missing.\n");
146            fConfigOK = kFALSE;
147            return;
148         }
149         fHighVoltage = new AliDCSSensorArray(startTimeLocal, fEndTime, confTree);
150       }
151 }
152
153 //______________________________________________________________________________________________
154 UInt_t AliTPCPreprocessor::Process(TMap* dcsAliasMap)
155 {
156   // Fills data into TPC calibrations objects
157
158   // Amanda servers provide information directly through dcsAliasMap
159
160   
161   if (!fConfigOK) return 9;
162   UInt_t result = 0;
163   TObjArray *resultArray = new TObjArray();
164   TString errorHandling = fConfEnv->GetValue("ErrorHandling","ON");
165   errorHandling.ToUpper();
166   TObject * status;
167
168   UInt_t dcsResult=0;
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);
174   } else {
175     if (!dcsAliasMap) return 9;
176     if (dcsAliasMap->GetEntries() == 0 ) return 9;
177   }
178
179
180   
181
182   TString runType = GetRunType();
183
184   // Temperature sensors are processed by AliTPCCalTemp
185
186   TString tempConf = fConfEnv->GetValue("Temperature","ON");
187   tempConf.ToUpper();
188   if (tempConf != "OFF" ) {
189     UInt_t tempResult = MapTemperature(dcsAliasMap);
190     result=tempResult;
191     status = new TParameter<int>("tempResult",tempResult);
192     resultArray->Add(status);
193   }
194
195   // High Voltage recordings
196
197
198   TString hvConf = fConfEnv->GetValue("HighVoltage","ON");
199   hvConf.ToUpper();
200   if (hvConf != "OFF" ) { 
201    UInt_t hvResult = MapHighVoltage(dcsAliasMap);
202    result+=hvResult;
203    status = new TParameter<int>("hvResult",hvResult);
204    resultArray->Add(status);
205  }
206
207   // Other calibration information will be retrieved through FXS files
208   //  examples:
209   //    TList* fileSourcesDAQ = GetFile(AliShuttleInterface::kDAQ, "pedestals");
210   //    const char* fileNamePed = GetFile(AliShuttleInterface::kDAQ, "pedestals", "LDC1");
211   //
212   //    TList* fileSourcesHLT = GetFile(AliShuttleInterface::kHLT, "calib");
213   //    const char* fileNameHLT = GetFile(AliShuttleInterface::kHLT, "calib", "LDC1");
214
215   // pedestal entries
216
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");
221     source.ToUpper();
222     if (source != "OFF" ) { 
223      if ( source == "HLT") pedestalSource[0] = AliShuttleInterface::kHLT;
224      if (!GetHLTStatus()) pedestalSource[0] = AliShuttleInterface::kDAQ;
225      if (source == "HLTDAQ" ) {
226          numSources=2;
227          pedestalSource[0] = AliShuttleInterface::kHLT;
228          pedestalSource[1] = AliShuttleInterface::kDAQ;
229      }
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;
235      }
236      result += pedestalResult;
237      status = new TParameter<int>("pedestalResult",pedestalResult);
238      resultArray->Add(status);
239     }
240   }
241
242   // pulser trigger processing
243
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");
248     source.ToUpper();
249     if ( source != "OFF") { 
250      if ( source == "HLT") pulserSource[0] = AliShuttleInterface::kHLT;
251      if (!GetHLTStatus()) pulserSource[0] = AliShuttleInterface::kDAQ;
252      if (source == "HLTDAQ" ) {
253          numSources=2;
254          pulserSource[0] = AliShuttleInterface::kHLT;
255          pulserSource[1] = AliShuttleInterface::kDAQ;
256      }
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;
262      }
263      result += pulserResult;
264      status = new TParameter<int>("pulserResult",pulserResult);
265      resultArray->Add(status);
266     }
267   }
268
269
270
271   // Central Electrode processing
272
273 //  if( runType == kPhysicsRunType || runType == kStandAloneRunType || 
274 //      runType == kDaqRunType ) {    
275
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");
280     source.ToUpper();
281     if ( source != "OFF" ) { 
282      if ( source == "HLT") ceSource[0] = AliShuttleInterface::kHLT;
283      if (!GetHLTStatus()) ceSource[0] = AliShuttleInterface::kDAQ;
284      if (source == "HLTDAQ" ) {
285         numSources=2;
286         ceSource[0] = AliShuttleInterface::kHLT;
287         ceSource[1] = AliShuttleInterface::kDAQ;
288      }
289      if (source == "DAQHLT" ) numSources=2;
290      UInt_t ceResult=0;
291      for (Int_t i=0; i<numSources; i++ ) {      
292        ceResult = ExtractCE(ceSource[i]);
293        if ( ceResult == 0 ) break;
294      }
295      result += ceResult;
296      status = new TParameter<int>("ceResult",ceResult);
297      resultArray->Add(status);
298     }
299   }
300   
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();
308     return 0;
309   } else { 
310     return result;
311   }
312 }
313 //______________________________________________________________________________________________
314 UInt_t AliTPCPreprocessor::MapTemperature(TMap* dcsAliasMap)
315 {
316
317    // extract DCS temperature maps. Perform fits to save space
318
319   UInt_t result=0;
320   TMap *map = fTemp->ExtractDCS(dcsAliasMap);
321   if (map) {
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"));
326     } else { 
327       Log ("Too few temperature maps fitted. \n");
328       result = 9;
329     }
330   } else {
331     Log("No temperature map extracted. \n");
332     result=9;
333   }
334   delete map;
335   // Now store the final CDB file
336
337   if ( result == 0 ) {
338         AliCDBMetaData metaData;
339         metaData.SetBeamPeriod(0);
340         metaData.SetResponsible("Haavard Helstrup");
341         metaData.SetComment("Preprocessor AliTPC data base entries.");
342
343         Bool_t storeOK = Store("Calib", "Temperature", fTemp, &metaData, 0, kFALSE);
344         if ( !storeOK )  result=1;
345
346    }
347
348    return result;
349
350 }
351
352 //______________________________________________________________________________________________
353 UInt_t AliTPCPreprocessor::MapHighVoltage(TMap* dcsAliasMap)
354 {
355
356    // extract DCS HV maps. Perform fits to save space
357
358   UInt_t result=0;
359   TMap *map = fHighVoltage->ExtractDCS(dcsAliasMap);
360   if (map) {
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"));
365     } else { 
366       Log ("Too few high voltage recordings fitted. \n");
367       result = 9;
368     }
369   } else {
370     Log("No high voltage recordings extracted. \n");
371     result=9;
372   }
373   delete map;
374   // Now store the final CDB file
375
376   if ( result == 0 ) {
377         AliCDBMetaData metaData;
378         metaData.SetBeamPeriod(0);
379         metaData.SetResponsible("Haavard Helstrup");
380         metaData.SetComment("Preprocessor AliTPC data base entries.");
381
382         Bool_t storeOK = Store("Calib", "HighVoltage", fHighVoltage, &metaData, 0, kFALSE);
383         if ( !storeOK )  result=1;
384
385    }
386
387    return result;
388
389 }
390
391
392 //______________________________________________________________________________________________
393
394 UInt_t AliTPCPreprocessor::ExtractPedestals(Int_t sourceFXS)
395 {
396  //
397  //  Read pedestal file from file exchage server
398  //  Keep original entry from OCDB in case no new pedestals are available
399  //
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");
406  }
407
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");
414  }
415
416
417  UInt_t result=0;
418
419  Int_t nSectors = fROC->GetNSectors();
420  TList* list = GetFileSources(sourceFXS,"pedestals");
421  
422  if (list && list->GetEntries()>0) {
423
424 //  loop through all files from LDCs
425
426     Bool_t changed=false;
427     UInt_t index = 0;
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);
434         if (!f) {
435           Log ("Error opening pedestal file.");
436           result =2;
437           break;
438         }
439         AliTPCCalibPedestal *calPed;
440         f->GetObject("tpcCalibPedestal",calPed);
441         if ( !calPed ) {
442           Log ("No pedestal calibration object in file.");
443           result = 2;
444           break;
445         }
446
447         //  replace entries for the sectors available in the present file
448
449         changed=true;
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);
455         }
456       }
457      ++index;
458     }  // while(list)
459 //
460 //  Store updated pedestal entry to OCDB
461 //
462     if (changed) {
463      AliCDBMetaData metaData;
464      metaData.SetBeamPeriod(0);
465      metaData.SetResponsible("Haavard Helstrup");
466      metaData.SetComment("Preprocessor AliTPC data base entries."); 
467  
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;
472     }
473   } else {
474     Log ("Error: no entries in input file list!");
475     result = 1;
476   }
477
478   return result;
479 }
480
481 //______________________________________________________________________________________________
482
483
484 UInt_t AliTPCPreprocessor::ExtractPulser(Int_t sourceFXS)
485 {
486  //
487  //  Read pulser calibration file from file exchage server
488  //  Keep original entry from OCDB in case no new pulser calibration is available
489  //
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;    
499  }
500
501  pulserTmean = (AliTPCCalPad*)pulserObjects->FindObject("PulserTmean");
502  if ( !pulserTmean ) {
503     pulserTmean = new AliTPCCalPad("PulserTmean","PulserTmean");
504     pulserObjects->Add(pulserTmean);
505  }
506  pulserTrms = (AliTPCCalPad*)pulserObjects->FindObject("PulserTrms");
507  if ( !pulserTrms )  { 
508     pulserTrms = new AliTPCCalPad("PulserTrms","PulserTrms");
509     pulserObjects->Add(pulserTrms);
510  }
511  pulserQmean = (AliTPCCalPad*)pulserObjects->FindObject("PulserQmean");
512  if ( !pulserQmean )  { 
513     pulserQmean = new AliTPCCalPad("PulserQmean","PulserQmean");
514     pulserObjects->Add(pulserQmean);
515  }
516
517
518  UInt_t result=0;
519
520  Int_t nSectors = fROC->GetNSectors();
521  TList* list = GetFileSources(sourceFXS,"pulser");
522  
523  if (list && list->GetEntries()>0) {
524
525 //  loop through all files from LDCs
526
527     Bool_t changed=false;
528     UInt_t index = 0;
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);
535         if (!f) {
536           Log ("Error opening pulser file.");
537           result =2;
538           break;
539         }
540         AliTPCCalibPulser *calPulser;
541         f->GetObject("tpcCalibPulser",calPulser);
542         if ( !calPulser ) {
543           Log ("No pulser calibration object in file.");
544           result = 2;
545           break;
546         }
547
548         //  replace entries for the sectors available in the present file
549
550         changed=true;
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);
558         }
559       }
560      ++index;
561     }  // while(list)
562 //
563 //  Store updated pedestal entry to OCDB
564 //
565     if (changed) {
566      AliCDBMetaData metaData;
567      metaData.SetBeamPeriod(0);
568      metaData.SetResponsible("Haavard Helstrup");
569      metaData.SetComment("Preprocessor AliTPC data base entries.");
570
571      Bool_t storeOK = Store("Calib", "Pulser", pulserObjects, &metaData, 0, kTRUE);
572      if ( !storeOK ) ++result;
573     }  
574   } else {
575     Log ("Error: no entries in input file list!");
576     result = 1;
577   }
578
579   return result;
580 }
581
582 UInt_t AliTPCPreprocessor::ExtractCE(Int_t sourceFXS)
583 {
584  //
585  //  Read Central Electrode file from file exchage server
586  //  Keep original entry from OCDB in case no new CE calibration is available
587  //
588  TObjArray    *ceObjects=0;
589  AliTPCCalPad *ceTmean=0;
590  AliTPCCalPad *ceTrms=0;
591  AliTPCCalPad *ceQmean=0;
592  TObjArray    *rocTtime=0;  
593  TObjArray    *rocQtime=0;  
594
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;    
600  }
601
602  Int_t nSectors = fROC->GetNSectors();
603
604  ceTmean = (AliTPCCalPad*)ceObjects->FindObject("CETmean");
605  if ( !ceTmean ) {
606     ceTmean = new AliTPCCalPad("CETmean","CETmean");
607     ceObjects->Add(ceTmean);
608  }
609  ceTrms = (AliTPCCalPad*)ceObjects->FindObject("CETrms");
610  if ( !ceTrms )  { 
611     ceTrms = new AliTPCCalPad("CETrms","CETrms");
612     ceObjects->Add(ceTrms);
613  }
614  ceQmean = (AliTPCCalPad*)ceObjects->FindObject("CEQmean");
615  if ( !ceQmean )  { 
616     ceQmean = new AliTPCCalPad("CEQmean","CEQmean");
617     ceObjects->Add(ceQmean);
618  }
619  //!new from here please have a look!!!
620  rocTtime = (TObjArray*)ceObjects->FindObject("rocTtime");
621  if ( !rocTtime ) {
622      rocTtime = new TObjArray(nSectors);
623      rocTtime->SetName("rocTtime");
624      ceObjects->Add(rocTtime);
625  }
626  
627  rocQtime = (TObjArray*)ceObjects->FindObject("rocQtime");
628  if ( !rocQtime ) {
629      rocQtime = new TObjArray(nSectors);
630      rocQtime->SetName("rocQtime");
631      ceObjects->Add(rocQtime);
632  }
633
634
635  UInt_t result=0;
636
637  TList* list = GetFileSources(sourceFXS,"CE");
638  
639  if (list && list->GetEntries()>0) {
640
641 //  loop through all files from LDCs
642
643     UInt_t index = 0;
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);
650         if (!f) {
651           Log ("Error opening central electrode file.");
652           result =2;
653           break;
654         }
655         AliTPCCalibCE *calCE;
656         f->GetObject("tpcCalibCE",calCE);
657
658         //  replace entries for the sectors available in the present file
659
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);         
671         }
672       }
673      ++index;
674     }  // while(list)
675 //
676 //  Store updated pedestal entry to OCDB
677 //
678     AliCDBMetaData metaData;
679     metaData.SetBeamPeriod(0);
680     metaData.SetResponsible("Haavard Helstrup");
681     metaData.SetComment("Preprocessor AliTPC data base entries.");
682
683     Bool_t storeOK = Store("Calib", "CE", ceObjects, &metaData, 0, kTRUE);
684     if ( !storeOK ) ++result;
685     
686   } else {
687     Log ("Error: no entries!");
688     result = 1;
689   }
690
691   return result;
692 }