1 /**************************************************************************
2 * Copyright(c) 1998-1999, 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 **************************************************************************/
18 //-------------------------------------------------------------------------
19 // Class AliGRPPreprocessor
20 // Global Run Parameters (GRP) preprocessor
21 // Origin: Panos Christakoglou, UOA-CERN, Panos.Christakoglou@cern.ch
22 // Modified: Ernesto.Lopez.Torres@cern.ch CEADEN-CERN
23 //-------------------------------------------------------------------------
28 #include <TObjString.h>
29 #include <TTimeStamp.h>
32 #include <TParameter.h>
35 #include "AliGRPPreprocessor.h"
36 #include "AliGRPDCS.h"
37 #include "AliGRPObject.h"
38 #include "AliDCSSensor.h"
39 #include "AliSplineFit.h"
40 #include "AliDCSSensorArray.h"
42 #include "AliTriggerConfiguration.h"
43 #include "AliTriggerRunScalers.h"
45 #include "AliCDBMetaData.h"
49 class AliShuttleInterface;
53 // needed for ReceivePromptRecoParameters
54 #include <TSQLServer.h>
55 #include <TSQLResult.h>
57 #include <AliCDBManager.h>
58 #include <AliCDBMetaData.h>
60 #include <AliTriggerConfiguration.h>
62 const Double_t kFitFraction = 0.7; // Fraction of DCS sensor fits required
64 ClassImp(AliGRPPreprocessor)
66 //_______________________________________________________________
68 const Int_t AliGRPPreprocessor::fgknDAQLbPar = 8; // num parameters in the logbook
69 const Int_t AliGRPPreprocessor::fgknDCSDP = 50; // number of dcs dps
70 const Int_t AliGRPPreprocessor::fgknDCSDP_HallProbes = 40; // number of dcs dps
71 const char* AliGRPPreprocessor::fgkDCSDataPoints[AliGRPPreprocessor::fgknDCSDP] = {
72 "LHCState", // missing in DCS
75 "LHCLuminosity", // missing in DCS
76 "BeamIntensity", // missing in DCS
82 "L3_BSF17_Temperature",
86 "L3_BSF4_Temperature",
90 "L3_BKF17_Temperature",
94 "L3_BKF4_Temperature",
98 "L3_BSF13_Temperature",
102 "L3_BSF8_Temperature",
106 "L3_BKF13_Temperature",
110 "L3_BKF8_Temperature",
114 "Dipole_Inside_Temperature",
118 "Dipole_Outside_Temperature",
120 "CavernAtmosPressure",
121 "SurfaceAtmosPressure"
124 const char* AliGRPPreprocessor::fgkDCSDataPoints_HallProbes[AliGRPPreprocessor::fgknDCSDP_HallProbes] = {
128 "L3_BSF17_Temperature",
132 "L3_BSF4_Temperature",
136 "L3_BKF17_Temperature",
140 "L3_BKF4_Temperature",
144 "L3_BSF13_Temperature",
148 "L3_BSF8_Temperature",
152 "L3_BKF13_Temperature",
156 "L3_BKF8_Temperature",
160 "Dipole_Inside_Temperature",
164 "Dipole_Outside_Temperature",
167 const Short_t kSensors = 48; // start index position of sensor in DCS DPs
168 const Short_t kNumSensors = 2; // Number of sensors in DCS DPs
170 const char* AliGRPPreprocessor::fgkLHCState[20] = {
176 "U", "UNSTABLE BEAMS",
183 const char* kppError[] = {
185 "(DAQ logbook ERROR)",
188 "(DCS data points ERROR)",
189 "(Trigger Configuration ERROR)"
192 //_______________________________________________________________
194 AliGRPPreprocessor::AliGRPPreprocessor(AliShuttleInterface* shuttle):
195 AliPreprocessor("GRP",shuttle), fPressure(0)
197 // constructor - shuttle must be instantiated!
199 AddRunType("PHYSICS");
202 //_______________________________________________________________
204 AliGRPPreprocessor::~AliGRPPreprocessor()
211 //_______________________________________________________________
213 void AliGRPPreprocessor::Initialize(Int_t run, UInt_t startTime, UInt_t endTime)
215 // Initialize preprocessor
217 AliPreprocessor::Initialize(run, startTime, endTime);
219 AliInfo("Initialization of the GRP preprocessor.");
220 TClonesArray * array = new TClonesArray("AliDCSSensor",kNumSensors);
221 for(Int_t j = 0; j < kNumSensors; j++) {
222 AliDCSSensor * sens = new ((*array)[j])AliDCSSensor;
223 sens->SetStringID(fgkDCSDataPoints[j+kSensors]);
225 AliInfo(Form("Pressure Entries: %d",array->GetEntries()));
227 // fPressure = new AliDCSSensorArray(fStartTime, fEndTime, array);
228 fPressure = new AliDCSSensorArray(GetStartTimeDCSQuery(), GetEndTimeDCSQuery(), array);
231 //_______________________________________________________________
233 UInt_t AliGRPPreprocessor::Process(TMap* valueMap)
235 // process data retrieved by the Shuttle
237 AliGRPObject *grpobj = new AliGRPObject(); // object to store data
239 //=================//
241 //=================//
244 grpobj = ProcessDaqLB();
246 //=================//
248 //=================//
249 UInt_t iDaqFxs = ProcessDaqFxs();
251 Log(Form("DAQ FXS, successful!"));
253 Log(Form("DAQ FXS, could not store run raw tag file!!!"));
257 //=================//
259 //=================//
260 UInt_t iDcsFxs = ProcessDcsFxs();
262 Log(Form("DCS FXS, successful!"));
264 Log(Form("DCS FXS, Could not store CTP run configuration and scalers!!!"));
268 //=================//
269 // DCS data points //
270 //=================//
271 Log(Form("Starting DCS Query at %d and finishing at %d",GetStartTimeDCSQuery(),GetEndTimeDCSQuery()));
272 Int_t entries = ProcessDcsDPs( valueMap, grpobj );
273 Log(Form("entries found = %d",entries));
274 if( entries < fgknDCSDP-7 ) { // FIXME (!= ) LHState and pressure map are not working yet... and removing the 4 values for the missing HP
275 Log(Form("Problem with the DCS data points!!!"));
277 } else Log(Form("DCS data points, successful!"));
279 //=======================//
280 // Trigger Configuration //
281 //=======================//
282 // either from DAQ logbook.....
283 const char * triggerConf = GetTriggerConfiguration();
284 if (triggerConf!= NULL) {
285 Log("Found trigger configuration in DAQ logbook");
286 AliTriggerConfiguration *runcfg = AliTriggerConfiguration::LoadConfigurationFromString(triggerConf);
288 Log("Bad CTP run configuration file from DAQ logbook! The corresponding CDB entry will not be filled!");
292 TString titleCTPcfg = Form("CTP cfg for run %i from DAQ",fRun);
293 runcfg->SetTitle(titleCTPcfg);
294 AliCDBMetaData metaData;
295 metaData.SetBeamPeriod(0);
296 metaData.SetResponsible("Roman Lietava");
297 metaData.SetComment("CTP run configuration from DAQ logbook");
298 if (!Store("CTP","Config", runcfg, &metaData, 0, 0)) {
299 Log("Unable to store the CTP run configuration object to OCDB!");
304 /* the DCS should not been used any more to access this stuff!!!
305 // ...or from DCS FXS
307 Log("No trigger configuration found in the DAQ logbook!! Trying reading from DCS FXS...");
308 TString runcfgfile = GetFile(kDCS, "CTP_runconfig", "");
309 if (runcfgfile.IsNull()) {
310 Log("No CTP runconfig files has been found in DCS FXS!");
314 Log(Form("File with Id CTP_runconfig found! Copied to %s",runcfgfile.Data()));
315 AliTriggerConfiguration *runcfg = AliTriggerConfiguration::LoadConfiguration(runcfgfile);
317 Log("Bad CTP run configuration file from DCS FXS! The corresponding CDB entry will not be filled!");
321 TString titleCTPcfg = Form("CTP cfg for run %i from DCS",fRun);
322 runcfg->SetTitle(titleCTPcfg);
323 AliCDBMetaData metaData;
324 metaData.SetBeamPeriod(0);
325 metaData.SetResponsible("Roman Lietava");
326 metaData.SetComment("CTP run configuration from DCS FXS");
327 if (!Store("CTP","Config", runcfg, &metaData, 0, 0)) {
328 Log("Unable to store the CTP run configuration object to OCDB!");
336 md.SetResponsible("Ernesto Lopez Torres");
337 md.SetComment("Output parameters from the GRP preprocessor.");
339 Bool_t result = kTRUE;
340 Log("Before storing");
341 result = Store("GRP", "Data", grpobj, &md);
344 if (result && !error ) {
345 Log("GRP Preprocessor Success");
348 Log( Form("GRP Preprocessor FAILS!!! %s%s%s%s%s",
349 kppError[(error&1)?1:0],
350 kppError[(error&2)?2:0],
351 kppError[(error&4)?3:0],
352 kppError[(error&8)?4:0],
353 kppError[(error&16)?5:0]
359 //_______________________________________________________________
361 AliGRPObject* AliGRPPreprocessor::ProcessDaqLB()
363 //Getting the DAQ lb information
365 time_t timeStart = (time_t)(((TString)GetRunParameter("DAQ_time_start")).Atoi());
366 time_t timeEnd = (time_t)(((TString)GetRunParameter("DAQ_time_end")).Atoi());
367 Float_t beamEnergy = (Float_t)(((TString)GetRunParameter("beamEnergy")).Atof());
368 TString beamType = (TString)GetRunParameter("beamType");
369 Char_t numberOfDetectors = (Char_t)(((TString)GetRunParameter("numberOfDetectors")).Atoi());
370 UInt_t detectorMask= (UInt_t)(((TString)GetRunParameter("detectorMask")).Atoi());
371 TString lhcPeriod = (TString)GetRunParameter("LHCperiod");
372 TString runType = (TString)GetRunType();
374 AliGRPObject* grpObj = new AliGRPObject();
377 grpObj->SetTimeStart(timeStart);
378 Log(Form("Start time for run %d: %d",fRun, (Int_t)timeStart));
381 Log(Form("Start time not put in logbook, setting to invalid in GRP entry!"));
385 grpObj->SetTimeEnd(timeEnd);
386 Log(Form("End time for run %d: %i",fRun, (Int_t)timeEnd));
389 Log(Form("End time not put in logbook, setting to invalid in GRP entry!"));
392 if (beamEnergy != 0){
393 grpObj->SetBeamEnergy(beamEnergy);
394 Log(Form("Beam Energy for run %d: %f",fRun, beamEnergy));
397 Log(Form("Beam Energy not put in logbook, setting to invalid in GRP entry!"));
400 Log(Form("Beam Type for run %d: %s",fRun, beamType.Data()));
402 if (beamType.Length() != 0){
403 grpObj->SetBeamType(beamType);
404 Log(Form("Beam Type for run %d: %s",fRun, beamType.Data()));
407 Log(Form("Beam Type not put in logbook, setting to invalid in GRP entry!"));
410 if (numberOfDetectors != 0){
411 grpObj->SetNumberOfDetectors(numberOfDetectors);
412 Log(Form("Number Of Detectors for run %d: %d",fRun, (Int_t)numberOfDetectors));
415 Log(Form("Number Of Detectors not put in logbook, setting to invalid in GRP entry!"));
418 if (detectorMask != 0){
419 grpObj->SetDetectorMask(detectorMask);
420 Log(Form("Detector Mask for run %d: %d",fRun, detectorMask));
423 Log(Form("Detector Mask not put in logbook, setting to invalid in GRP entry!"));
426 if (lhcPeriod.Length() != 0) {
427 grpObj->SetLHCPeriod(lhcPeriod);
428 Log(Form("LHC period (DAQ) for run %d: %s",fRun, lhcPeriod.Data()));
430 Log(Form("LHCperiod not put in logbook, setting to invalid in GRP entry!"));
432 if (runType.Length() != 0) {
433 grpObj->SetRunType(runType);
434 Log(Form("Run Type (DAQ) for run %d: %s",fRun, runType.Data()));
436 Log(Form("Run Type not put in logbook, setting to invalid in GRP entry!"));
442 //_______________________________________________________________
444 UInt_t AliGRPPreprocessor::ProcessDaqFxs()
446 //======DAQ FXS======//
448 TList* list = GetFileSources(kDAQ);
450 Log("No raw data tag list: connection problems with DAQ FXS logbook!");
454 if (list->GetEntries() == 0) {
455 Log("no raw data tags in this run: nothing to merge!");
460 TChain *fRawTagChain = new TChain("T");
462 TIterator* iter = list->MakeIterator();
464 while ((obj = iter->Next())) {
465 TObjString* objStr = dynamic_cast<TObjString*> (obj);
467 Log(Form("Found source %s", objStr->String().Data()));
468 TList* list2 = GetFileIDs(kDAQ, objStr->String());
470 Log("No list with ids from DAQ was found: connection problems with DAQ FXS logbook!");
471 delete fRawTagChain; fRawTagChain=0;
474 Log(Form("Number of ids: %d",list2->GetEntries()));
475 for(Int_t i = 0; i < list2->GetEntries(); i++) {
476 TObjString *idStr = (TObjString *)list2->At(i);
477 TString fileName = GetFile(kDAQ,idStr->String().Data(),objStr->String().Data());
478 if (fileName.Length() > 0) {
479 Log(Form("Adding file in the chain: %s",fileName.Data()));
480 fRawTagChain->Add(fileName.Data());
483 Log(Form("Could not retrieve file with id %s from source %s: "
484 "connection problems with DAQ FXS!",
485 idStr->String().Data(), objStr->String().Data()));
487 delete list2; list2=0;
488 delete fRawTagChain; fRawTagChain=0;
496 TString fRawDataFileName = "GRP_Merged.tag.root";
497 Log(Form("Merging %d raw data tags into file: %s", nFiles, fRawDataFileName.Data()));
499 if( fRawTagChain->Merge(fRawDataFileName) < 1 ) {
500 Log("Error merging raw data files!!!");
504 TString outputfile = Form("Run%d.Merged.RAW.tag.root", fRun);
505 Bool_t result = StoreRunMetadataFile(fRawDataFileName.Data(),outputfile.Data());
508 Log("Problem storing raw data tags in local file!!!");
510 Log("Raw data tags merged successfully!!");
515 delete fRawTagChain; fRawTagChain=0;
517 if (result == kFALSE) {
525 //_______________________________________________________________
526 UInt_t AliGRPPreprocessor::ProcessDcsFxs()
529 // Get the CTP counters information
530 TList* list = GetFileSources(kDCS,"CTP_xcounters");
532 Log("No CTP counters file: connection problems with DAQ FXS logbook!");
536 if (list->GetEntries() == 0) {
537 Log("No CTP counters file to be processed!");
543 while ((source = dynamic_cast<TObjString *> (iter.Next()))) {
544 TString countersfile = GetFile(kDCS, "CTP_xcounters", source->GetName());
545 if (countersfile.IsNull()) {
546 Log("No CTP counters files has been found: empty source!");
549 Log(Form("File with Id CTP_xcounters found in source %s! Copied to %s",source->GetName(),countersfile.Data()));
550 AliTriggerRunScalers *scalers = AliTriggerRunScalers::ReadScalers(countersfile);
552 Log("Bad CTP counters file! The corresponding CDB entry will not be filled!");
556 AliCDBMetaData metaData;
557 metaData.SetBeamPeriod(0);
558 metaData.SetResponsible("Roman Lietava");
559 metaData.SetComment("CTP scalers");
560 if (!Store("CTP","Scalers", scalers, &metaData, 0, 0)) {
561 Log("Unable to store the CTP scalers object to OCDB!");
572 //_______________________________________________________________
574 Int_t AliGRPPreprocessor::ProcessDcsDPs(TMap* valueMap, AliGRPObject* grpObj)
578 // processing DCS DPs
582 Int_t nLHCEntries = 0;
583 Int_t nL3Entries = 0;
584 Int_t nDipoleEntries = 0;
585 Int_t nEnvEntries = 0;
586 Int_t nHallProbesEntries = 0;
587 nLHCEntries = ProcessLHCDPs(valueMap, grpObj);
588 nL3Entries = ProcessL3DPs(valueMap, grpObj);
589 nDipoleEntries = ProcessDipoleDPs(valueMap, grpObj);
590 nEnvEntries = ProcessEnvDPs(valueMap, grpObj);
591 nHallProbesEntries = ProcessHPDPs(valueMap, grpObj);
593 entries = nLHCEntries + nL3Entries + nDipoleEntries + nEnvEntries + nHallProbesEntries;
598 //_______________________________________________________________
600 Int_t AliGRPPreprocessor::ProcessL3DPs(TMap* valueMap, AliGRPObject* grpObj)
602 Int_t nL3Entries = 0;
603 TObjArray *array = 0x0;
606 AliInfo(Form("==========L3Polarity==========="));
607 indexDP = kL3Polarity;
608 array = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[indexDP]);
610 Log(Form("%s not found in the map!!!",fgkDCSDataPoints[indexDP]));
613 Char_t charDCS = ProcessBool(array);
614 grpObj->SetL3Polarity(charDCS);
618 if (array) array = 0x0;
620 AliInfo(Form("==========L3Current==========="));
621 indexDP = kL3Current;
622 array = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[indexDP]);
624 Log(Form("%s not found in the map!!!",fgkDCSDataPoints[indexDP]));
627 Float_t *floatDCS = ProcessFloatAll(array);
628 grpObj->SetL3Current(floatDCS);
636 //_______________________________________________________________
638 Int_t AliGRPPreprocessor::ProcessDipoleDPs(TMap* valueMap, AliGRPObject* grpObj)
640 Int_t nDipoleEntries = 0;
641 TObjArray *array = 0x0;
644 AliInfo(Form("==========DipolePolarity==========="));
645 indexDP = kDipolePolarity;
646 AliInfo(Form("indexDP = %d",indexDP));
647 array = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[indexDP]);
648 AliInfo(Form("array entries = %d",array->GetEntries()));
650 Log(Form("%s not found in the map!!!",fgkDCSDataPoints[indexDP]));
653 Bool_t charDCS = ProcessBool(array);
654 grpObj->SetDipolePolarity(charDCS);
658 if (array) array = 0x0;
660 AliInfo(Form("==========DipoleCurrent==========="));
661 indexDP = kDipoleCurrent;
662 array = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[indexDP]);
664 Log(Form("%s not found in the map!!!",fgkDCSDataPoints[indexDP]));
667 Float_t *floatDCS = ProcessFloatAll(array);
668 grpObj->SetDipoleCurrent(floatDCS);
673 return nDipoleEntries;
676 //_______________________________________________________________
678 Int_t AliGRPPreprocessor::ProcessEnvDPs(TMap* valueMap, AliGRPObject* grpObj)
680 Int_t nEnvEntries = 0;
681 TObjArray *array = 0x0;
684 AliInfo(Form("==========CavernTemperature==========="));
685 indexDP = kCavernTemperature;
686 array = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[indexDP]);
688 Log(Form("%s not found in the map!!!",fgkDCSDataPoints[indexDP]));
691 Float_t *floatDCS = ProcessFloatAll(array);
692 grpObj->SetCavernTemperature(floatDCS);
696 if (array) array = 0x0;
698 AliInfo(Form("==========AtmosPressures (Cavern + Surface)==========="));
699 AliDCSSensorArray *dcsSensorArray = GetPressureMap(valueMap);
700 dcsSensorArray->Print();
701 AliInfo(Form("fPressure = %p",fPressure));
702 AliInfo(Form("dcsSensorArray = %p",dcsSensorArray));
703 if( fPressure->NumFits()==0 ) {
704 Log("Problem with the pressure sensor values!!!");
707 AliInfo(Form("==========CavernAtmosPressure==========="));
708 indexDP = kCavernAtmosPressure;
709 AliDCSSensor* sensorCavernP2 = dcsSensorArray->GetSensor(fgkDCSDataPoints[indexDP]);
710 AliDebug(2,Form("sensorCavernP2 = %p", sensorCavernP2));
711 if( sensorCavernP2->GetFit() ) {
712 Log(Form("<%s> for run %d: Sensor Fit found",fgkDCSDataPoints[indexDP], fRun));
713 grpObj->SetCavernAtmosPressure(sensorCavernP2);
716 //if (sensorP2) delete sensorP2;
718 Log(Form("ERROR Sensor Fit for %s not found: ", fgkDCSDataPoints[indexDP] ));
720 AliInfo(Form("==========SurfaceAtmosPressure==========="));
721 indexDP = kSurfaceAtmosPressure;
722 AliDCSSensor* sensorP2 = dcsSensorArray->GetSensor(fgkDCSDataPoints[indexDP]);
723 AliDebug(2,Form("sensorP2 = %p", sensorP2));
724 if( sensorP2->GetFit() ) {
725 Log(Form("<%s> for run %d: Sensor Fit found",fgkDCSDataPoints[indexDP], fRun));
726 grpObj->SetSurfaceAtmosPressure(sensorP2);
729 //if (sensorP2) delete sensorP2;
731 Log(Form("ERROR Sensor Fit for %s not found: ", fgkDCSDataPoints[indexDP] ));
736 /* indexDP = kCavernAtmosPressure;
737 array = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[indexDP]);
739 Log(Form("%s not found in the map!!!",fgkDCSDataPoints[indexDP]));
742 Float_t *floatDCS = ProcessFloatAll(array);
743 grpObj->SetCavernAtmosPressure(floatDCS);
749 if (array) array = 0x0;
751 AliInfo(Form("==========SurfaceAtmosPressure==========="));
752 indexDP = kSurfaceAtmosPressure;
753 AliDCSSensorArray *dcsSensorArray = GetPressureMap(valueMap);
754 dcsSensorArray->Print();
755 AliInfo(Form("fPressure = %p",fPressure));
756 AliInfo(Form("dcsSensorArray = %p",dcsSensorArray));
757 if( fPressure->NumFits()==0 ) {
758 Log("Problem with the pressure sensor values!!!");
761 AliDCSSensor* sensorP2 = dcsSensorArray->GetSensor(fgkDCSDataPoints[indexDP]);
762 AliDebug(2,Form("sensorP2 = %p", sensorP2));
763 if( sensorP2->GetFit() ) {
764 Log(Form("<%s> for run %d: Sensor Fit found",fgkDCSDataPoints[indexDP], fRun));
765 grpObj->SetSurfaceAtmosPressure(sensorP2);
768 //if (sensorP2) delete sensorP2;
770 Log(Form("ERROR Sensor Fit for %s not found: ", fgkDCSDataPoints[indexDP] ));
778 //_______________________________________________________________
780 Int_t AliGRPPreprocessor::ProcessHPDPs(TMap* valueMap, AliGRPObject* grpObj)
782 Int_t nHPEntries = 0;
783 TObjArray *array = 0x0;
786 if (fgknDCSDP_HallProbes != AliGRPObject::GetNumberOfHP()){
787 AliError(Form("Number of Hall probes expected in GRP Preprocessor (i.e. %d) different from number of Hall Probes foreseen in GRP object (i.e. %d). Looping on entries from GRP object anyway.", fgknDCSDP_HallProbes, AliGRPObject::GetNumberOfHP()));
789 for (indexDP = 0; indexDP < AliGRPObject::GetNumberOfHP(); indexDP++){
790 AliInfo(Form("==========%s===========",AliGRPObject::GetHPDP(indexDP)));
791 array = (TObjArray *)valueMap->GetValue(AliGRPObject::GetHPDP(indexDP));
793 Log(Form("%s not found in the map!!!",AliGRPObject::GetHPDP(indexDP)));
796 Float_t *floatDCS = ProcessFloatAll(array);
797 AliDebug(2,Form("value[0] = %f, value[1] = %f, value[2] = %f, value[3] = %f, value[4] = %f",floatDCS[0],floatDCS[1],floatDCS[2],floatDCS[3],floatDCS[4]));
798 grpObj->SetHallProbes((AliGRPObject::DP_HallProbes)indexDP,floatDCS);
799 for (Int_t kk = 0 ; kk< 5; kk++){
800 AliDebug(2,Form("HallProbe[%d][%d]=%f",indexDP,kk,grpObj->GetHallProbes((AliGRPObject::DP_HallProbes)indexDP,(AliGRPObject::Stats)kk)));
807 Log(Form("Hall Probes = %d ", nHPEntries));
811 //_______________________________________________________________
813 Int_t AliGRPPreprocessor::ProcessLHCDPs(TMap* valueMap, AliGRPObject* grpObj)
817 // processing of LHC related DCS DPs, i.e.:
823 Int_t nLHCEntries = 0;
824 TObjArray *array = 0x0;
827 AliInfo(Form("==========LHCState==========="));
829 array = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[indexDP]);
831 Log(Form("%s not found in the map!!!",fgkDCSDataPoints[indexDP]));
834 TString stringDCS = ProcessChar(array);
835 if (stringDCS.Length()!=0) {
836 Bool_t found = kFALSE;
837 for( Int_t i=0; i<20; i+=2 ) {
838 if( stringDCS.CompareTo(fgkLHCState[i]) == 0 ) {
839 stringDCS = fgkLHCState[i+1];
845 Log(Form("<%s> for run %d: %s",fgkDCSDataPoints[indexDP],fRun, stringDCS.Data()));
846 grpObj->SetLHCState(stringDCS);
849 Log(Form("%s values found not valid!",fgkDCSDataPoints[indexDP]));
850 grpObj->SetLHCState(AliGRPObject::GetInvalidString());
854 Log(Form("%s not valid (null length), string set as invalid!",fgkDCSDataPoints[indexDP]));
855 grpObj->SetLHCState(AliGRPObject::GetInvalidString());
860 if (array) array = 0x0;
862 AliInfo(Form("==========LHCLuminosity==========="));
863 indexDP = kLHCLuminosity;
864 array = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[indexDP]);
866 Log(Form("%s not found in the map!!!",fgkDCSDataPoints[indexDP]));
869 Float_t *floatDCS = ProcessFloatAll(array);
870 grpObj->SetLHCLuminosity(floatDCS);
873 AliSplineFit* splfit = GetSplineFit(array,fgkDCSDataPoints[indexDP]);
874 grpObj->SetLHCLuminositySplineFit(splfit);
879 if (array) array = 0x0;
881 AliInfo(Form("==========BeamIntensity==========="));
882 indexDP = kBeamIntensity;
883 array = (TObjArray *)valueMap->GetValue(fgkDCSDataPoints[indexDP]);
885 Log(Form("%s not found in the map!!!",fgkDCSDataPoints[indexDP]));
888 Float_t *floatDCS = ProcessFloatAll(array);
889 grpObj->SetBeamIntensity(floatDCS);
892 AliSplineFit* splfit1 = GetSplineFit(array,fgkDCSDataPoints[indexDP]);
893 grpObj->SetBeamIntensitySplineFit(splfit1);
900 //_________________________________________________________________________
902 AliSplineFit* AliGRPPreprocessor::GetSplineFit(TObjArray *array, const TString& stringID){
904 Int_t entriesarray = array->GetEntries();
905 Float_t* value = new Float_t[entriesarray];
906 Float_t* time = new Float_t[entriesarray];
907 AliDCSValue* v = 0x0;
908 for (Int_t iarray = 0; iarray < entriesarray; iarray++){
909 v = (AliDCSValue*)array->At(iarray);
910 value[iarray] = v->GetFloat();
911 time[iarray] = v->GetTimeStamp();
912 AliInfo(Form("iarray = %d, value = %f, time = %f",iarray,value[iarray],time[iarray]));
914 TGraph* gr = new TGraph(entriesarray,value,time);
916 AliWarning(Form("%s: no input graph to compute SplineFit",stringID.Data()));
919 AliSplineFit *fit = new AliSplineFit();
920 fit->SetMinPoints(10);
921 fit->InitKnots(gr,10,10,0.0);
925 AliWarning(Form("%s: no fit performed",stringID.Data()));
931 //_________________________________________________________________________
933 TString AliGRPPreprocessor::ProcessChar(TObjArray *array)
940 TString aDCSString="";
942 AliDCSValue *v = 0x0;
943 for(Int_t iCount = 0; iCount < array->GetEntries(); iCount++) {
944 v = (AliDCSValue *)array->At(iCount);
945 if ((v->GetTimeStamp() < GetStartTimeDCSQuery()) || (v->GetTimeStamp() > GetEndTimeDCSQuery())) {
946 AliError(Form("DCS values for the parameter outside the queried interval"));
950 if (aDCSString != v->GetChar())
951 AliError(Form("DCS values for the parameter changed from %s to %c within the queried interval", aDCSString.Data(), (Char_t)v->GetChar()));
953 aDCSString = (TString)v->GetChar(); // keeping always last value in the array
958 //__________________________________________________________________________________________________________________
960 Float_t* AliGRPPreprocessor::ProcessFloatAll(TObjArray* array)
963 // processing Float values using Mean, Median, Standard Deviation wrt Mean, Standar Deviation wrt Median
965 // parameters[0] = mean
966 // parameters[1] = truncated mean (calculated excluding points outside +/- 3RMS from mean
967 // parameters[2] = median
968 // parameters[3] = standard deviation wrt mean
969 // parameters[4] = standard deviation wrt median
972 Float_t* parameters = new Float_t[5];
973 Double_t aDCSArrayMean = 0; // Mean
974 Double_t aDCSArrayTruncMean = 0;// Truncated Mean
975 Double_t aDCSArrayMedian = 0; // Median
976 Double_t aDCSArraySDMean = 0; // Standard Deviation wrt Mean
977 Double_t aDCSArraySDMedian = 0; // Standard Deviation wrt Median
978 Float_t aDCSArraySum = 0.0;
983 Int_t nCounts = array->GetEntries();
984 Float_t *tempArray = new Float_t[nCounts];
985 for(Int_t i = 0; i < nCounts; i++) {
986 AliDCSValue *v = (AliDCSValue *)array->At(i);
987 if((v->GetTimeStamp() >= GetStartTimeDCSQuery()) &&(v->GetTimeStamp() <= GetEndTimeDCSQuery())) {
988 aDCSArraySum += v->GetFloat();
989 tempArray[i] = v->GetFloat();
990 AliDebug(2,Form("%d-th entry = %f",i,tempArray[i]));
996 aDCSArrayMean = TMath::Mean(nCounts,tempArray);
997 aDCSArrayMedian = TMath::Median(nCounts,tempArray);
998 aDCSArraySDMean = TMath::RMS(nCounts,tempArray);
999 // computing standard deviation wrt median
1000 AliDebug(2,Form("maximum = %f, minimum = %f", aDCSArrayMean+3*aDCSArraySDMean, aDCSArrayMean-3*aDCSArraySDMean));
1001 for (Int_t i = 0; i < iCounts; i++){
1002 AliDCSValue *v = (AliDCSValue *)array->At(i);
1003 AliDebug(2,Form("maximum = %f, minimum = %f", aDCSArrayMean+3*aDCSArraySDMean, aDCSArrayMean-3*aDCSArraySDMean));
1004 AliDebug(2,Form("%i-th entry = %f",i, v->GetFloat()));
1005 if ((v->GetFloat()<=aDCSArrayMean+3*aDCSArraySDMean) && (v->GetFloat()>=aDCSArrayMean-3*aDCSArraySDMean)){
1006 temp1+=v->GetFloat();
1008 AliDebug(2,Form("temp1 = %f, iCounts1 = %i",temp1,iCounts1));
1010 temp += (v->GetFloat()-aDCSArrayMedian)*(v->GetFloat()-aDCSArrayMedian);
1012 AliDebug(3,Form("temp before the ratio = %f, with %d counts", temp, iCounts));
1014 AliDebug(3,Form("temp after the ratio = %f", temp));
1016 aDCSArraySDMedian = TMath::Sqrt(temp);
1019 AliInfo(Form("Radical = 0 in computing standard deviation wrt median! Setting it to zero...."));
1020 aDCSArraySDMedian = 0;
1023 AliError(Form("Radical < 0 in computing standard deviation! Setting it to invalid...."));
1024 aDCSArraySDMedian = AliGRPObject::GetInvalidFloat();
1028 aDCSArrayMean = AliGRPObject::GetInvalidFloat();
1029 aDCSArrayMedian = AliGRPObject::GetInvalidFloat();
1030 aDCSArraySDMean = AliGRPObject::GetInvalidFloat();
1032 AliDebug(2,Form("iCounts1 = %d and temp1 = %f",iCounts1, temp1));
1034 aDCSArrayTruncMean = temp1/iCounts1;
1037 aDCSArrayTruncMean = AliGRPObject::GetInvalidFloat();
1042 AliDebug(2,Form("mean within %d counts = %f ",nCounts,aDCSArrayMean));
1043 AliDebug(2,Form("truncated mean within %d counts = %f (%i values used)",nCounts,aDCSArrayTruncMean,iCounts1));
1044 AliDebug(2,Form("median within %d counts = %f ",nCounts,aDCSArrayMedian));
1045 AliDebug(2,Form("standard deviation with mean within %d counts = %f ",nCounts,aDCSArraySDMean));
1046 AliDebug(2,Form("standard deviation with median within %d counts = %f ",nCounts,aDCSArraySDMedian));
1048 parameters[0] = aDCSArrayMean;
1049 parameters[1] = aDCSArrayTruncMean;
1050 parameters[2] = aDCSArrayMedian;
1051 parameters[3] = aDCSArraySDMean;
1052 parameters[4] = aDCSArraySDMedian;
1054 // AliDebug(2,Form("mean = %f, truncated mean = %f, median = %f, SD wrt mean = %f, SD wrt median = %f ",parameters[0],parameters[1],parameters[2],parameters[3],parameters[4]));
1055 AliInfo(Form("mean = %f, truncated mean = %f, median = %f, SD wrt mean = %f, SD wrt median = %f ",parameters[0],parameters[1],parameters[2],parameters[3],parameters[4]));
1061 //_______________________________________________________________
1063 Char_t AliGRPPreprocessor::ProcessBool(TObjArray* array)
1066 // processing Boolean values
1069 Bool_t aDCSBool = kTRUE;
1071 AliDCSValue *v = 0x0;
1073 for(Int_t iCount = 0; iCount < array->GetEntries(); iCount++) {
1074 v = (AliDCSValue *)array->At(iCount);
1075 if ((v->GetTimeStamp() < GetStartTimeDCSQuery()) || (v->GetTimeStamp() > GetEndTimeDCSQuery())) {
1076 AliError(Form("DCS values for the parameter outside the queried interval"));
1080 if (aDCSBool != v->GetBool())
1081 AliError(Form("DCS values for the parameter changed from %d to %d within the queried interval", (UInt_t)aDCSBool, (UInt_t)v->GetBool()));
1083 aDCSBool = v->GetBool(); // always keeping last value
1086 Char_t caDCSBool = (Char_t)aDCSBool;
1091 //_______________________________________________________________
1093 Float_t AliGRPPreprocessor::ProcessInt(TObjArray* array)
1096 // processing Int values, returning mean
1099 Float_t aDCSArraySum = 0.0;
1100 Float_t aDCSArrayMean = 0.0;
1102 AliDCSValue* v = 0x0;
1104 for(Int_t iCount = 0; iCount < array->GetEntries(); iCount++) {
1105 v = (AliDCSValue *)array->At(iCount);
1106 if((v->GetTimeStamp() >= GetStartTimeDCSQuery()) &&(v->GetTimeStamp() <= GetEndTimeDCSQuery())) {
1107 aDCSArraySum += v->GetInt();
1112 if(iCounts != 0) aDCSArrayMean = aDCSArraySum/iCounts;
1113 else aDCSArrayMean = AliGRPObject::GetInvalidFloat();
1115 return aDCSArrayMean;
1118 //_______________________________________________________________
1120 Float_t AliGRPPreprocessor::ProcessUInt(TObjArray* array)
1123 // processing Int values, returning mean
1126 Float_t aDCSArraySum = 0.0;
1127 Float_t aDCSArrayMean = 0.0;
1129 AliDCSValue* v = 0x0;
1131 for(Int_t iCount = 0; iCount < array->GetEntries(); iCount++) {
1132 v = (AliDCSValue *)array->At(iCount);
1133 if((v->GetTimeStamp() >= GetStartTimeDCSQuery()) &&(v->GetTimeStamp() <= GetEndTimeDCSQuery())) {
1134 aDCSArraySum += v->GetUInt();
1139 if(iCounts != 0) aDCSArrayMean = aDCSArraySum/iCounts;
1140 else aDCSArrayMean = AliGRPObject::GetInvalidFloat();
1142 return aDCSArrayMean;
1147 //_______________________________________________________________
1149 AliDCSSensorArray *AliGRPPreprocessor::GetPressureMap(TMap* dcsAliasMap)
1151 // extract DCS pressure maps. Perform fits to save space
1153 AliInfo ("here ok");
1154 TMap *map = fPressure->ExtractDCS(dcsAliasMap);
1156 fPressure->MakeSplineFit(map);
1157 Double_t fitFraction = fPressure->NumFits()/fPressure->NumSensors();
1158 if (fitFraction > kFitFraction ) {
1159 AliInfo(Form("Pressure values extracted, %d fits performed.", fPressure->NumFits()));
1161 AliInfo("Too few pressure maps fitted!!!");
1164 AliInfo("no atmospheric pressure map extracted!!!");
1173 //_______________________________________________________________
1174 Int_t AliGRPPreprocessor::ReceivePromptRecoParameters(UInt_t run, const char* dbHost, Int_t dbPort, const char* dbName, const char* user, const char* password, const char *cdbRoot)
1177 // Retrieves logbook and trigger information from the online logbook
1178 // This information is needed for prompt reconstruction
1182 // DAQ params: dbHost, dbPort, dbName, user, password, logbookTable, triggerTable
1186 // positive on success: the return code is the run number of last run processed of the same run type already processed by the SHUTTLE
1187 // 0 on success and no run was found
1188 // negative on error
1190 // This function is NOT called during the preprocessor run in the Shuttle!
1198 AliCDBManager* cdb = AliCDBManager::Instance();
1199 cdb->SetDefaultStorage(cdbRoot);
1202 TSQLServer* server = TSQLServer::Connect(Form("mysql://%s:%d/%s", dbHost, dbPort, dbName), user, password);
1206 Printf("ERROR: Could not connect to DAQ LB");
1212 sqlQuery.Form("SELECT DAQ_time_start, run_type, detectorMask FROM logbook WHERE run = %d", run);
1213 TSQLResult* result = server->Query(sqlQuery);
1216 Printf("ERROR: Can't execute query <%s>!", sqlQuery.Data());
1220 if (result->GetRowCount() == 0)
1222 Printf("ERROR: Run %d not found", run);
1227 TSQLRow* row = result->Next();
1230 Printf("ERROR: Could not receive data from run %d", run);
1235 TString runType(row->GetField(1));
1238 grpData.Add(new TObjString("DAQ_time_start"), new TObjString(row->GetField(0)));
1239 grpData.Add(new TObjString("run_type"), new TObjString(runType));
1240 grpData.Add(new TObjString("detectorMask"), new TObjString(row->GetField(2)));
1248 Printf("Storing GRP/GRP/Data object with the following content");
1251 AliCDBMetaData metadata;
1252 metadata.SetResponsible("Jan Fiete Grosse-Oetringhaus");
1253 metadata.SetComment("GRP Output parameters received during online running");
1255 AliCDBId id("GRP/GRP/Data", run, run);
1256 Bool_t success = cdb->Put(&grpData, id, &metadata);
1258 grpData.DeleteAll();
1262 Printf("ERROR: Could not store GRP/GRP/Data into OCDB");
1266 // Receive trigger information
1267 sqlQuery.Form("SELECT configFile FROM logbook_trigger_config WHERE run = %d", run);
1268 result = server->Query(sqlQuery);
1271 Printf("ERROR: Can't execute query <%s>!", sqlQuery.Data());
1275 if (result->GetRowCount() == 0)
1277 Printf("ERROR: Run %d not found in logbook_trigger_config", run);
1282 row = result->Next();
1285 Printf("ERROR: Could not receive logbook_trigger_config data from run %d", run);
1290 TString triggerConfig(row->GetField(0));
1298 Printf("Found trigger configuration: %s", triggerConfig.Data());
1300 AliTriggerConfiguration *runcfg = AliTriggerConfiguration::LoadConfigurationFromString(triggerConfig);
1303 Printf("ERROR: Could not create CTP configuration object");
1307 metadata.SetComment("CTP run configuration received during online running");
1309 AliCDBId id2("GRP/CTP/Config", run, run);
1310 success = cdb->Put(runcfg, id2, &metadata);
1317 Printf("ERROR: Could not store GRP/CTP/Config into OCDB");
1321 // get last run with same run type that was already processed by the SHUTTLE
1323 sqlQuery.Form("SELECT max(logbook.run) FROM logbook LEFT JOIN logbook_shuttle ON logbook_shuttle.run = logbook.run WHERE run_type = '%s' AND shuttle_done = 1", runType.Data());
1324 result = server->Query(sqlQuery);
1327 Printf("ERROR: Can't execute query <%s>!", sqlQuery.Data());
1331 if (result->GetRowCount() == 0)
1333 Printf("ERROR: No result with query <%s>", sqlQuery.Data());
1338 row = result->Next();
1341 Printf("ERROR: Could not receive data for query <%s>", sqlQuery.Data());
1346 TString lastRunStr(row->GetField(0));
1347 Int_t lastRun = lastRunStr.Atoi();
1349 Printf("Last run with same run type %s is %d", runType.Data(), lastRun);